--- /sys/src/ape/lib/9/68020/getcallerpc.s Sun Nov 20 02:39:26 2005 +++ /sys/src/ape/lib/9/68020/getcallerpc.s Thu Jan 1 01:00:00 1970 @@ -1,3 +0,0 @@ -TEXT getcallerpc(SB), $0 - MOVL (a+0(FP)), R0 - RTS --- /sys/src/ape/lib/9/68020/getfcr.s Thu Feb 28 19:46:34 2002 +++ /sys/src/ape/lib/9/68020/getfcr.s Thu Jan 1 01:00:00 1970 @@ -1,19 +0,0 @@ -TEXT getfsr(SB), $0 - MOVL $0, R0 - MOVL FPSR, R0 - RTS - -TEXT setfsr(SB), $0 - MOVL new+0(FP), R1 - MOVL R1, FPSR - RTS - -TEXT getfcr(SB), $0 - MOVL $0, R0 - MOVL FPCR, R0 - RTS - -TEXT setfcr(SB), $0 - MOVL new+0(FP), R1 - MOVL R1, FPCR - RTS --- /sys/src/ape/lib/ap/68020/cycles.c Sun Feb 8 23:10:23 2009 +++ /sys/src/ape/lib/ap/68020/cycles.c Thu Jan 1 01:00:00 1970 @@ -1,5 +0,0 @@ -void -_cycles(unsigned long long *u) -{ - *u = 0; -} --- /sys/src/ape/lib/ap/68020/lock.c Thu Feb 28 19:46:29 2002 +++ /sys/src/ape/lib/ap/68020/lock.c Thu Jan 1 01:00:00 1970 @@ -1,26 +0,0 @@ -#define _LOCK_EXTENSION -#include "../plan9/sys9.h" -#include - -int tas(int*); - -void -lock(Lock *lk) -{ - while(tas(&lk->val)) - _SLEEP(0); -} - -int -canlock(Lock *lk) -{ - if(tas(&lk->val)) - return 0; - return 1; -} - -void -unlock(Lock *lk) -{ - lk->val = 0; -} --- /sys/src/ape/lib/ap/68020/main9.s Thu Feb 28 19:46:29 2002 +++ /sys/src/ape/lib/ap/68020/main9.s Thu Jan 1 01:00:00 1970 @@ -1,9 +0,0 @@ -TEXT _main(SB), 1, $16 - MOVL $a6base(SB), A6 - PEA inargv+0(FP) - MOVL inargc-4(FP), TOS - BSR _envsetup(SB) - BSR main(SB) - MOVL R0,TOS - BSR exit(SB) - RTS --- /sys/src/ape/lib/ap/68020/main9p.s Sat Feb 21 01:06:11 2009 +++ /sys/src/ape/lib/ap/68020/main9p.s Thu Jan 1 01:00:00 1970 @@ -1,43 +0,0 @@ -#define NPRIVATES 16 - -GLOBL _tos(SB), $4 -GLOBL _privates(SB), $4 -GLOBL _nprivates(SB), $4 - -TEXT _mainp(SB), 1, $(3*4+NPRIVATES*4) - MOVL $a6base(SB), A6 - - /* _tos = arg */ - MOVL R0, _tos(SB) /* return value of sys exec!! */ - LEA private+8(SP), _privates(SB) - MOVL $NPRIVATES, _nprivates(SB) - - /* _profmain(); */ - BSR _profmain(SB) - - /* _tos->prof.pp = _tos->prof.next; */ - MOVL _tos+0(SB),A1 - MOVL 4(A1),(A1) - - BSR _envsetup(SB) - - /* main(argc, argv, environ); */ - MOVL environ(SB), TOS - PEA inargv+0(FP) - MOVL inargc-4(FP), TOS - BSR main(SB) - -loop: - MOVL R0,TOS - BSR exit(SB) - LEA _profin(SB), A0 /* force loading of profile */ - BRA loop - - -TEXT _savearg(SB), 1, $0 - RTS - -TEXT _callpc(SB), 1, $0 - MOVL argp+0(FP), A0 - MOVL 4(A0), R0 - RTS --- /sys/src/ape/lib/ap/68020/memchr.s Thu Feb 28 19:46:29 2002 +++ /sys/src/ape/lib/ap/68020/memchr.s Thu Jan 1 01:00:00 1970 @@ -1,15 +0,0 @@ - TEXT memchr(SB),$0 - MOVL n+8(FP),R0 - BEQ ret - MOVL s1+0(FP),A1 - MOVL c+4(FP),R1 - -l1: CMPB R1,(A1)+ - BEQ eq - SUBL $1,R0 - BNE l1 - RTS - -eq: MOVL A1,R0 - SUBL $1,R0 -ret: RTS --- /sys/src/ape/lib/ap/68020/memcmp.s Thu Feb 28 19:46:29 2002 +++ /sys/src/ape/lib/ap/68020/memcmp.s Thu Jan 1 01:00:00 1970 @@ -1,18 +0,0 @@ - TEXT memcmp(SB),$0 - MOVL n+8(FP),R0 - BEQ ret - MOVL s1+0(FP),A2 - MOVL s2+4(FP),A1 - -l1: CMPB (A1)+,(A2)+ - BNE neq - SUBL $1,R0 - BNE l1 - RTS - -neq: BCS gtr - MOVL $-1,R0 - RTS - -gtr: MOVL $1,R0 -ret: RTS --- /sys/src/ape/lib/ap/68020/memcpy.s Thu Feb 28 19:46:29 2002 +++ /sys/src/ape/lib/ap/68020/memcpy.s Thu Jan 1 01:00:00 1970 @@ -1,98 +0,0 @@ - TEXT memcpy(SB), $0 - - MOVL n+8(FP),R0 - BEQ return - BGT ok - MOVL 0, R0 -ok: - MOVL s1+0(FP),A2 - MOVL s2+4(FP),A1 - - CMPL A2,A1 - BHI back - -/* - * speed depends on source allignment - * destination allignment is secondary - * byte-at-a-time foreward copy to - * get source (A1) alligned. - */ -f1: - MOVL A1, R1 - ANDL $3, R1 - BEQ f2 - SUBL $1, R0 - BLT return - MOVB (A1)+, (A2)+ - BRA f1 -/* - * quad-long-at-a-time forward copy - */ -f2: - SUBL $16, R0 - BLT f3 - MOVL (A1)+, (A2)+ - MOVL (A1)+, (A2)+ - MOVL (A1)+, (A2)+ - MOVL (A1)+, (A2)+ - BRA f2 - -/* - * cleanup byte-at-a-time - */ -f3: - ADDL $15, R0 - BLT return -f4: - MOVB (A1)+, (A2)+ - SUBL $1, R0 - BGE f4 - BRA return - -return: - MOVL s1+0(FP),R0 - RTS - -/* - * everything the same, but - * copy backwards - */ -back: - ADDL R0, A1 - ADDL R0, A2 - -/* - * byte-at-a-time backward copy to - * get source (A1) alligned. - */ -b1: - MOVL A1, R1 - ANDL $3, R1 - BEQ b2 - SUBL $1, R0 - BLT return - MOVB -(A1), -(A2) - BRA b1 -/* - * quad-long-at-a-time backward copy - */ -b2: - SUBL $16, R0 - BLT b3 - MOVL -(A1), -(A2) - MOVL -(A1), -(A2) - MOVL -(A1), -(A2) - MOVL -(A1), -(A2) - BRA b2 - -/* - * cleanup byte-at-a-time backward - */ -b3: - ADDL $15, R0 - BLT return -b4: - MOVB -(A1), -(A2) - SUBL $1, R0 - BGE b4 - BRA return --- /sys/src/ape/lib/ap/68020/memmove.s Thu Feb 28 19:46:29 2002 +++ /sys/src/ape/lib/ap/68020/memmove.s Thu Jan 1 01:00:00 1970 @@ -1,99 +0,0 @@ - TEXT memmove(SB), $0 -move: - - MOVL n+8(FP),R0 - BEQ return - BGT ok - MOVL 0, R0 -ok: - MOVL s1+0(FP),A2 - MOVL s2+4(FP),A1 - - CMPL A2,A1 - BHI back - -/* - * speed depends on source allignment - * destination allignment is secondary - * byte-at-a-time foreward copy to - * get source (A1) alligned. - */ -f1: - MOVL A1, R1 - ANDL $3, R1 - BEQ f2 - SUBL $1, R0 - BLT return - MOVB (A1)+, (A2)+ - BRA f1 -/* - * quad-long-at-a-time forward copy - */ -f2: - SUBL $16, R0 - BLT f3 - MOVL (A1)+, (A2)+ - MOVL (A1)+, (A2)+ - MOVL (A1)+, (A2)+ - MOVL (A1)+, (A2)+ - BRA f2 - -/* - * cleanup byte-at-a-time - */ -f3: - ADDL $15, R0 - BLT return -f4: - MOVB (A1)+, (A2)+ - SUBL $1, R0 - BGE f4 - BRA return - -return: - MOVL s1+0(FP),R0 - RTS - -/* - * everything the same, but - * copy backwards - */ -back: - ADDL R0, A1 - ADDL R0, A2 - -/* - * byte-at-a-time backward copy to - * get source (A1) alligned. - */ -b1: - MOVL A1, R1 - ANDL $3, R1 - BEQ b2 - SUBL $1, R0 - BLT return - MOVB -(A1), -(A2) - BRA b1 -/* - * quad-long-at-a-time backward copy - */ -b2: - SUBL $16, R0 - BLT b3 - MOVL -(A1), -(A2) - MOVL -(A1), -(A2) - MOVL -(A1), -(A2) - MOVL -(A1), -(A2) - BRA b2 - -/* - * cleanup byte-at-a-time backward - */ -b3: - ADDL $15, R0 - BLT return -b4: - MOVB -(A1), -(A2) - SUBL $1, R0 - BGE b4 - BRA return --- /sys/src/ape/lib/ap/68020/memset.s Thu Feb 28 19:46:29 2002 +++ /sys/src/ape/lib/ap/68020/memset.s Thu Jan 1 01:00:00 1970 @@ -1,47 +0,0 @@ - TEXT memset(SB), $0 - MOVL n+8(FP), R0 - BLE return - MOVL s1+0(FP), A1 - CLRL R1 - MOVB c+7(FP), R1 - BEQ l1 - -/* - * create 4 replicated copies - * of the byte in R1 - */ - MOVL R1, R2 - ASLL $8, R2 - ORL R2, R1 - MOVL R1, R2 - SWAP R2 - ORL R2, R1 - -/* - * quad-long-at-a-time set - * destination allignment is not - * very important. - */ -l1: - SUBL $16, R0 - BLT l2 - MOVL R1, (A1)+ - MOVL R1, (A1)+ - MOVL R1, (A1)+ - MOVL R1, (A1)+ - BRA l1 - -/* - * cleanup byte-at-a-time - */ -l2: - ADDL $15, R0 - BLT return -l3: - MOVB R1, (A1)+ - SUBL $1, R0 - BGE l3 - -return: - MOVL s1+0(FP),R0 - RTS --- /sys/src/ape/lib/ap/68020/mkfile Sun Feb 8 21:33:36 2009 +++ /sys/src/ape/lib/ap/68020/mkfile Thu Jan 1 01:00:00 1970 @@ -1,28 +0,0 @@ -APE=/sys/src/ape -<$APE/config -LIB=/$objtype/lib/ape/libap.a -OFILES=\ - cycles.$O\ - lock.$O\ - main9.$O\ - main9p.$O\ - memchr.$O\ - memcmp.$O\ - memcpy.$O\ - memmove.$O\ - memset.$O\ - notetramp.$O\ - setjmp.$O\ - strcat.$O\ - strchr.$O\ - strcmp.$O\ - strcpy.$O\ - strlen.$O\ - tas.$O\ - vlop.$O\ - vlrt.$O\ - - -#include - -/* A stack to hold pcs when signals nest */ -#define MAXSIGSTACK 20 -typedef struct Pcstack Pcstack; -static struct Pcstack { - int sig; - void (*hdlr)(int, char*, Ureg*); - unsigned long restorepc; - Ureg *u; -} pcstack[MAXSIGSTACK]; -static int nstack = 0; - -static void notecont(Ureg*, char*); - -void -_notetramp(int sig, void (*hdlr)(int, char*, Ureg*), Ureg *u) -{ - Pcstack *p; - - if(nstack >= MAXSIGSTACK) - _NOTED(1); /* nesting too deep; just do system default */ - p = &pcstack[nstack]; - p->restorepc = u->pc; - p->sig = sig; - p->hdlr = hdlr; - p->u = u; - nstack++; - u->pc = (unsigned long) notecont; - _NOTED(2); /* NSAVE: clear note but hold state */ -} - -static void -notecont(Ureg *u, char *s) -{ - Pcstack *p; - void(*f)(int, char*, Ureg*); - - p = &pcstack[nstack-1]; - f = p->hdlr; - u->pc = p->restorepc; - nstack--; - (*f)(p->sig, s, u); - _NOTED(3); /* NRSTR */ -} - -#define JMPBUFPC 1 -#define JMPBUFSP 0 - -extern sigset_t _psigblocked; - -void -siglongjmp(sigjmp_buf j, int ret) -{ - struct Ureg *u; - - if(j[0]) - _psigblocked = j[1]; - if(nstack == 0 || pcstack[nstack-1].u->sp > j[2+JMPBUFSP]) - longjmp(j+2, ret); - u = pcstack[nstack-1].u; - nstack--; - u->r0 = ret; - if(ret == 0) - u->r0 = 1; - u->pc = j[2+JMPBUFPC]; - u->sp = j[2+JMPBUFSP] + 4; - _NOTED(3); /* NRSTR */ -} --- /sys/src/ape/lib/ap/68020/setjmp.s Thu Feb 28 19:46:29 2002 +++ /sys/src/ape/lib/ap/68020/setjmp.s Thu Jan 1 01:00:00 1970 @@ -1,26 +0,0 @@ -TEXT setjmp(SB), 1, $0 - MOVL b+0(FP), A0 - MOVL A7, (A0)+ - MOVL (A7), (A0) - CLRL R0 - RTS - -TEXT sigsetjmp(SB), 1, $0 - MOVL b+0(FP), A0 - MOVW savemask+4(FP), R1 - MOVW R1, (A0)+ - MOVW $_psigblocked(SB), R1 - MOVW R1, (A0)+ - MOVL A7, (A0)+ - MOVL (A7), (A0) - CLRL R0 - RTS - -TEXT longjmp(SB), 1, $0 - MOVL b+0(FP), A0 - MOVL r+4(FP), R0 - BNE ok /* ansi: "longjmp(0) => longjmp(1)" */ - MOVL $1, R0 /* bless their pointed heads */ -ok: MOVL (A0)+, A7 - MOVL (A0), (A7) - RTS --- /sys/src/ape/lib/ap/68020/strcat.s Thu Feb 28 19:46:29 2002 +++ /sys/src/ape/lib/ap/68020/strcat.s Thu Jan 1 01:00:00 1970 @@ -1,15 +0,0 @@ - TEXT strcat(SB), $0 - MOVL s1+0(FP), A2 - MOVL s2+4(FP), A1 - -l1: TSTB (A2)+ - BNE l1 - - MOVB (A1)+, -1(A2) - BEQ done - -l2: MOVB (A1)+, (A2)+ - BNE l2 - -done: MOVL s1+0(FP), R0 - RTS --- /sys/src/ape/lib/ap/68020/strchr.s Thu Feb 28 19:46:29 2002 +++ /sys/src/ape/lib/ap/68020/strchr.s Thu Jan 1 01:00:00 1970 @@ -1,27 +0,0 @@ - TEXT strchr(SB), $0 - - MOVL s+0(FP), A0 - MOVB c+7(FP), R2 - BEQ null - -l: - MOVB (A0)+, R1 - BEQ out - CMPB R1, R2 - BNE l - - MOVL A0, R0 - ADDL $-1, R0 - RTS - -out: - CLRL R0 - RTS - -null: - TSTB (A0)+ - BNE null - - MOVL A0, R0 - ADDL $-1, R0 - RTS --- /sys/src/ape/lib/ap/68020/strcmp.s Thu Feb 28 19:46:29 2002 +++ /sys/src/ape/lib/ap/68020/strcmp.s Thu Jan 1 01:00:00 1970 @@ -1,20 +0,0 @@ - TEXT strcmp(SB), $0 - MOVL s1+0(FP), A2 - MOVL s2+4(FP), A1 - -l1: MOVB (A1)+, R0 - BEQ end - CMPB R0, (A2)+ - BEQ l1 - - BCS gtr - MOVL $-1, R0 - RTS - -gtr: MOVL $1, R0 - RTS - -end: TSTB (A2) - BNE gtr - CLRL R0 - RTS --- /sys/src/ape/lib/ap/68020/strcpy.s Thu Feb 28 19:46:29 2002 +++ /sys/src/ape/lib/ap/68020/strcpy.s Thu Jan 1 01:00:00 1970 @@ -1,10 +0,0 @@ - TEXT strcpy(SB), $0 - - MOVL s1+0(FP), A2 - MOVL s2+4(FP), A1 - -l1: MOVB (A1)+, (A2)+ - BNE l1 - - MOVL s1+0(FP), R0 - RTS --- /sys/src/ape/lib/ap/68020/strlen.s Thu Feb 28 19:46:29 2002 +++ /sys/src/ape/lib/ap/68020/strlen.s Thu Jan 1 01:00:00 1970 @@ -1,18 +0,0 @@ - TEXT strlen(SB), $0 - MOVL s+0(FP), A1 - - TSTB (A1)+ - BEQ null - MOVL A1, A2 - -l1: - TSTB (A1)+ - BNE l1 - - SUBL A2, A1 - MOVL A1, R0 - RTS - -null: - MOVL $0, R0 - RTS --- /sys/src/ape/lib/ap/68020/tas.s Thu Feb 28 19:46:29 2002 +++ /sys/src/ape/lib/ap/68020/tas.s Thu Jan 1 01:00:00 1970 @@ -1,9 +0,0 @@ -TEXT tas(SB), $0 - - MOVL $0, R0 - MOVL a+0(FP), A0 - TAS (A0) - BEQ tas_1 - MOVL $1, R0 -tas_1: - RTS --- /sys/src/ape/lib/ap/68020/vlop.s Thu Feb 28 19:46:29 2002 +++ /sys/src/ape/lib/ap/68020/vlop.s Thu Jan 1 01:00:00 1970 @@ -1,23 +0,0 @@ -TEXT _mulv(SB), $0 - MOVL r+0(FP), A0 - MOVL a+8(FP), R0 - - WORD $0x4c2f - WORD $0x0401 - WORD $0x0014 -/* - * MULUL b+16(FP), R0:R1 - * philw made me do it! - */ - - MOVL a+4(FP), R2 - MULUL b+16(FP), R2 - ADDL R2, R1 - - MOVL a+8(FP), R2 - MULUL b+12(FP), R2 - ADDL R2, R1 - - MOVL R1, (A0)+ - MOVL R0, (A0) - RTS --- /sys/src/ape/lib/ap/68020/vlrt.c Thu Feb 28 19:46:29 2002 +++ /sys/src/ape/lib/ap/68020/vlrt.c Thu Jan 1 01:00:00 1970 @@ -1,730 +0,0 @@ -typedef unsigned long ulong; -typedef unsigned int uint; -typedef unsigned short ushort; -typedef unsigned char uchar; -typedef signed char schar; - -#define SIGN(n) (1UL<<(n-1)) - -typedef struct Vlong Vlong; -struct Vlong -{ - union - { - struct - { - ulong hi; - ulong lo; - }; - struct - { - ushort hims; - ushort hils; - ushort loms; - ushort lols; - }; - }; -}; - -void abort(void); - -void -_addv(Vlong *r, Vlong a, Vlong b) -{ - ulong lo, hi; - - lo = a.lo + b.lo; - hi = a.hi + b.hi; - if(lo < a.lo) - hi++; - r->lo = lo; - r->hi = hi; -} - -void -_subv(Vlong *r, Vlong a, Vlong b) -{ - ulong lo, hi; - - lo = a.lo - b.lo; - hi = a.hi - b.hi; - if(lo > a.lo) - hi--; - r->lo = lo; - r->hi = hi; -} - -void -_d2v(Vlong *y, double d) -{ - union { double d; struct Vlong; } x; - ulong xhi, xlo, ylo, yhi; - int sh; - - x.d = d; - - xhi = (x.hi & 0xfffff) | 0x100000; - xlo = x.lo; - sh = 1075 - ((x.hi >> 20) & 0x7ff); - - ylo = 0; - yhi = 0; - if(sh >= 0) { - /* v = (hi||lo) >> sh */ - if(sh < 32) { - if(sh == 0) { - ylo = xlo; - yhi = xhi; - } else { - ylo = (xlo >> sh) | (xhi << (32-sh)); - yhi = xhi >> sh; - } - } else { - if(sh == 32) { - ylo = xhi; - } else - if(sh < 64) { - ylo = xhi >> (sh-32); - } - } - } else { - /* v = (hi||lo) << -sh */ - sh = -sh; - if(sh <= 10) { - ylo = xlo << sh; - yhi = (xhi << sh) | (xlo >> (32-sh)); - } else { - /* overflow */ - yhi = d; /* causes something awful */ - } - } - if(x.hi & SIGN(32)) { - if(ylo != 0) { - ylo = -ylo; - yhi = ~yhi; - } else - yhi = -yhi; - } - - y->hi = yhi; - y->lo = ylo; -} - -void -_f2v(Vlong *y, float f) -{ - - _d2v(y, f); -} - -double -_v2d(Vlong x) -{ - if(x.hi & SIGN(32)) { - if(x.lo) { - x.lo = -x.lo; - x.hi = ~x.hi; - } else - x.hi = -x.hi; - return -((long)x.hi*4294967296. + x.lo); - } - return (long)x.hi*4294967296. + x.lo; -} - -float -_v2f(Vlong x) -{ - return _v2d(x); -} - -static void -dodiv(Vlong num, Vlong den, Vlong *q, Vlong *r) -{ - ulong numlo, numhi, denhi, denlo, quohi, quolo, t; - int i; - - numhi = num.hi; - numlo = num.lo; - denhi = den.hi; - denlo = den.lo; - - /* - * get a divide by zero - */ - if(denlo==0 && denhi==0) { - numlo = numlo / denlo; - } - - /* - * set up the divisor and find the number of iterations needed - */ - if(numhi >= SIGN(32)) { - quohi = SIGN(32); - quolo = 0; - } else { - quohi = numhi; - quolo = numlo; - } - i = 0; - while(denhi < quohi || (denhi == quohi && denlo < quolo)) { - denhi = (denhi<<1) | (denlo>>31); - denlo <<= 1; - i++; - } - - quohi = 0; - quolo = 0; - for(; i >= 0; i--) { - quohi = (quohi<<1) | (quolo>>31); - quolo <<= 1; - if(numhi > denhi || (numhi == denhi && numlo >= denlo)) { - t = numlo; - numlo -= denlo; - if(numlo > t) - numhi--; - numhi -= denhi; - quolo |= 1; - } - denlo = (denlo>>1) | (denhi<<31); - denhi >>= 1; - } - - if(q) { - q->lo = quolo; - q->hi = quohi; - } - if(r) { - r->lo = numlo; - r->hi = numhi; - } -} - -void -_divvu(Vlong *q, Vlong n, Vlong d) -{ - - if(n.hi == 0 && d.hi == 0) { - q->hi = 0; - q->lo = n.lo / d.lo; - return; - } - dodiv(n, d, q, 0); -} - -void -_modvu(Vlong *r, Vlong n, Vlong d) -{ - - if(n.hi == 0 && d.hi == 0) { - r->hi = 0; - r->lo = n.lo % d.lo; - return; - } - dodiv(n, d, 0, r); -} - -static void -vneg(Vlong *v) -{ - - if(v->lo == 0) { - v->hi = -v->hi; - return; - } - v->lo = -v->lo; - v->hi = ~v->hi; -} - -void -_divv(Vlong *q, Vlong n, Vlong d) -{ - long nneg, dneg; - - if(n.hi == (((long)n.lo)>>31) && d.hi == (((long)d.lo)>>31)) { - q->lo = (long)n.lo / (long)d.lo; - q->hi = ((long)q->lo) >> 31; - return; - } - nneg = n.hi >> 31; - if(nneg) - vneg(&n); - dneg = d.hi >> 31; - if(dneg) - vneg(&d); - dodiv(n, d, q, 0); - if(nneg != dneg) - vneg(q); -} - -void -_modv(Vlong *r, Vlong n, Vlong d) -{ - long nneg, dneg; - - if(n.hi == (((long)n.lo)>>31) && d.hi == (((long)d.lo)>>31)) { - r->lo = (long)n.lo % (long)d.lo; - r->hi = ((long)r->lo) >> 31; - return; - } - nneg = n.hi >> 31; - if(nneg) - vneg(&n); - dneg = d.hi >> 31; - if(dneg) - vneg(&d); - dodiv(n, d, 0, r); - if(nneg) - vneg(r); -} - -void -_rshav(Vlong *r, Vlong a, int b) -{ - long t; - - t = a.hi; - if(b >= 32) { - r->hi = t>>31; - if(b >= 64) { - /* this is illegal re C standard */ - r->lo = t>>31; - return; - } - r->lo = t >> (b-32); - return; - } - if(b <= 0) { - r->hi = t; - r->lo = a.lo; - return; - } - r->hi = t >> b; - r->lo = (t << (32-b)) | (a.lo >> b); -} - -void -_rshlv(Vlong *r, Vlong a, int b) -{ - ulong t; - - t = a.hi; - if(b >= 32) { - r->hi = 0; - if(b >= 64) { - /* this is illegal re C standard */ - r->lo = 0; - return; - } - r->lo = t >> (b-32); - return; - } - if(b <= 0) { - r->hi = t; - r->lo = a.lo; - return; - } - r->hi = t >> b; - r->lo = (t << (32-b)) | (a.lo >> b); -} - -void -_lshv(Vlong *r, Vlong a, int b) -{ - ulong t; - - t = a.lo; - if(b >= 32) { - r->lo = 0; - if(b >= 64) { - /* this is illegal re C standard */ - r->hi = 0; - return; - } - r->hi = t << (b-32); - return; - } - if(b <= 0) { - r->lo = t; - r->hi = a.hi; - return; - } - r->lo = t << b; - r->hi = (t >> (32-b)) | (a.hi << b); -} - -void -_andv(Vlong *r, Vlong a, Vlong b) -{ - r->hi = a.hi & b.hi; - r->lo = a.lo & b.lo; -} - -void -_orv(Vlong *r, Vlong a, Vlong b) -{ - r->hi = a.hi | b.hi; - r->lo = a.lo | b.lo; -} - -void -_xorv(Vlong *r, Vlong a, Vlong b) -{ - r->hi = a.hi ^ b.hi; - r->lo = a.lo ^ b.lo; -} - -void -_negv(Vlong *r, Vlong a) -{ - if(a.lo == 0) { - r->hi = -a.hi; - r->lo = 0; - return; - } - r->hi = ~a.hi; - r->lo = -a.lo; -} - -void -_vpp(Vlong *l, Vlong *r) -{ - - l->hi = r->hi; - l->lo = r->lo; - r->lo++; - if(r->lo == 0) - r->hi++; -} - -void -_vmm(Vlong *l, Vlong *r) -{ - - l->hi = r->hi; - l->lo = r->lo; - if(r->lo == 0) - r->hi--; - r->lo--; -} - -void -_ppv(Vlong *l, Vlong *r) -{ - - r->lo++; - if(r->lo == 0) - r->hi++; - l->hi = r->hi; - l->lo = r->lo; -} - -void -_mmv(Vlong *l, Vlong *r) -{ - - if(r->lo == 0) - r->hi--; - r->lo--; - l->hi = r->hi; - l->lo = r->lo; -} - -void -_vasop(Vlong *ret, void *lv, void fn(Vlong*, Vlong, Vlong), int type, Vlong rv) -{ - Vlong t, u; - - u = *ret; - switch(type) { - default: - abort(); - break; - - case 1: /* schar */ - t.lo = *(schar*)lv; - t.hi = t.lo >> 31; - fn(&u, t, rv); - *(schar*)lv = u.lo; - break; - - case 2: /* uchar */ - t.lo = *(uchar*)lv; - t.hi = 0; - fn(&u, t, rv); - *(uchar*)lv = u.lo; - break; - - case 3: /* short */ - t.lo = *(short*)lv; - t.hi = t.lo >> 31; - fn(&u, t, rv); - *(short*)lv = u.lo; - break; - - case 4: /* ushort */ - t.lo = *(ushort*)lv; - t.hi = 0; - fn(&u, t, rv); - *(ushort*)lv = u.lo; - break; - - case 9: /* int */ - t.lo = *(int*)lv; - t.hi = t.lo >> 31; - fn(&u, t, rv); - *(int*)lv = u.lo; - break; - - case 10: /* uint */ - t.lo = *(uint*)lv; - t.hi = 0; - fn(&u, t, rv); - *(uint*)lv = u.lo; - break; - - case 5: /* long */ - t.lo = *(long*)lv; - t.hi = t.lo >> 31; - fn(&u, t, rv); - *(long*)lv = u.lo; - break; - - case 6: /* ulong */ - t.lo = *(ulong*)lv; - t.hi = 0; - fn(&u, t, rv); - *(ulong*)lv = u.lo; - break; - - case 7: /* vlong */ - case 8: /* uvlong */ - fn(&u, *(Vlong*)lv, rv); - *(Vlong*)lv = u; - break; - } - *ret = u; -} - -void -_p2v(Vlong *ret, void *p) -{ - long t; - - t = (ulong)p; - ret->lo = t; - ret->hi = 0; -} - -void -_sl2v(Vlong *ret, long sl) -{ - long t; - - t = sl; - ret->lo = t; - ret->hi = t >> 31; -} - -void -_ul2v(Vlong *ret, ulong ul) -{ - long t; - - t = ul; - ret->lo = t; - ret->hi = 0; -} - -void -_si2v(Vlong *ret, int si) -{ - long t; - - t = si; - ret->lo = t; - ret->hi = t >> 31; -} - -void -_ui2v(Vlong *ret, uint ui) -{ - long t; - - t = ui; - ret->lo = t; - ret->hi = 0; -} - -void -_sh2v(Vlong *ret, long sh) -{ - long t; - - t = (sh << 16) >> 16; - ret->lo = t; - ret->hi = t >> 31; -} - -void -_uh2v(Vlong *ret, ulong ul) -{ - long t; - - t = ul & 0xffff; - ret->lo = t; - ret->hi = 0; -} - -void -_sc2v(Vlong *ret, long uc) -{ - long t; - - t = (uc << 24) >> 24; - ret->lo = t; - ret->hi = t >> 31; -} - -void -_uc2v(Vlong *ret, ulong ul) -{ - long t; - - t = ul & 0xff; - ret->lo = t; - ret->hi = 0; -} - -long -_v2sc(Vlong rv) -{ - long t; - - t = rv.lo & 0xff; - return (t << 24) >> 24; -} - -long -_v2uc(Vlong rv) -{ - - return rv.lo & 0xff; -} - -long -_v2sh(Vlong rv) -{ - long t; - - t = rv.lo & 0xffff; - return (t << 16) >> 16; -} - -long -_v2uh(Vlong rv) -{ - - return rv.lo & 0xffff; -} - -long -_v2sl(Vlong rv) -{ - - return rv.lo; -} - -long -_v2ul(Vlong rv) -{ - - return rv.lo; -} - -long -_v2si(Vlong rv) -{ - - return rv.lo; -} - -long -_v2ui(Vlong rv) -{ - - return rv.lo; -} - -int -_testv(Vlong rv) -{ - return rv.lo || rv.hi; -} - -int -_eqv(Vlong lv, Vlong rv) -{ - return lv.lo == rv.lo && lv.hi == rv.hi; -} - -int -_nev(Vlong lv, Vlong rv) -{ - return lv.lo != rv.lo || lv.hi != rv.hi; -} - -int -_ltv(Vlong lv, Vlong rv) -{ - return (long)lv.hi < (long)rv.hi || - (lv.hi == rv.hi && lv.lo < rv.lo); -} - -int -_lev(Vlong lv, Vlong rv) -{ - return (long)lv.hi < (long)rv.hi || - (lv.hi == rv.hi && lv.lo <= rv.lo); -} - -int -_gtv(Vlong lv, Vlong rv) -{ - return (long)lv.hi > (long)rv.hi || - (lv.hi == rv.hi && lv.lo > rv.lo); -} - -int -_gev(Vlong lv, Vlong rv) -{ - return (long)lv.hi > (long)rv.hi || - (lv.hi == rv.hi && lv.lo >= rv.lo); -} - -int -_lov(Vlong lv, Vlong rv) -{ - return lv.hi < rv.hi || - (lv.hi == rv.hi && lv.lo < rv.lo); -} - -int -_lsv(Vlong lv, Vlong rv) -{ - return lv.hi < rv.hi || - (lv.hi == rv.hi && lv.lo <= rv.lo); -} - -int -_hiv(Vlong lv, Vlong rv) -{ - return lv.hi > rv.hi || - (lv.hi == rv.hi && lv.lo > rv.lo); -} - -int -_hsv(Vlong lv, Vlong rv) -{ - return lv.hi > rv.hi || - (lv.hi == rv.hi && lv.lo >= rv.lo); -} --- /sys/src/ape/lib/sec/port/libc.h Wed May 29 03:37:18 2013 +++ /sys/src/ape/lib/sec/port/libc.h Fri Sep 20 00:24:49 2013 @@ -14,7 +14,7 @@ #include #include #include -#include +// #include #define nelem(x) (sizeof(x)/sizeof((x)[0])) @@ -64,6 +64,37 @@ char *msg; } Waitmsg; +/* + * Time-of-day + */ + +typedef +struct Tm +{ + int sec; + int min; + int hour; + int mday; + int mon; + int year; + int wday; + int yday; + char zone[4]; + int tzoff; +} Tm; + +extern Tm* gmtime(long); +extern Tm* localtime(long); +extern char* asctime(Tm*); +extern char* ctime(long); +extern double cputime(void); +extern long times(long*); +extern long tm2sec(Tm*); +extern vlong nsec(void); + +extern void cycles(uvlong*); /* 64-bit value of the cycle counter if there is one, 0 if there isn't */ + +extern long time(long*); extern int _AWAIT(char*, int); extern int _ALARM(unsigned long); --- /sys/src/ape/lib/sec/port/mkfile Wed May 29 03:37:18 2013 +++ /sys/src/ape/lib/sec/port/mkfile Fri Sep 20 00:24:49 2013 @@ -41,13 +41,14 @@ = 0) + return a; + v = &e->val; + if(v->tag == VSeq){ + print("Seq\n"); + for(el = v->u.seqval; el!=nil; el = el->tl){ + if((a = getalgo(&el->hd)) >= 0) + return a; + } + } + return -1; +} + +static void edump(Elem e); + +RSApub* +asn1toRSApub(uchar *der, int nder) +{ + Elem e; + Elist *el, *l; + int n; + Bits *b; + RSApub *key; + mpint *mp; + + if(decode(der, nder, &e) != ASN_OK){ + print("didn't parse\n"); + return nil; + } + if(!is_seq(&e, &el)){ + print("no seq"); + return nil; + } + if((n = elistlen(el)) != 2){ + print("bad length %d\n", n); + return nil; + } + if((n = getalgo(&el->hd)) < 0){ + print("no algo\n"); + return nil; + } + if(n != 0){ + print("cant do algorithm %d\n", n); + return nil; + } + if(!is_bitstring(&el->tl->hd, &b)){ + print("no bits\n"); + return nil; + } + if(decode(b->data, b->len, &e) != ASN_OK){ + print("no second decode\n"); + return nil; + } + if(!is_seq(&e, &el)){ + print("no second seq\n"); + return nil; + } + if(elistlen(el) != 2){ + print("no second length\n"); + return nil; + } + key = rsapuballoc(); + + l = el; + + key->n = mp = asn1mpint(&el->hd); + if(mp == nil) + goto errret; + + el = el->tl; + key->ek = mp = asn1mpint(&el->hd); + if(mp == nil) + goto errret; + + if(l != nil) + freeelist(l); + return key; +errret: + if(l != nil) + freeelist(l); + rsapubfree(key); + return nil; +} + char* X509verify(uchar *cert, int ncert, RSApub *pk) { @@ -2288,13 +2379,13 @@ { Elem e; char utc[50]; - struct tm *tm0 = gmtime(&t); + Tm *tm = gmtime(t); e.tag.class = Universal; e.tag.num = UTCTime; e.val.tag = VString; snprint(utc, 50, "%.2d%.2d%.2d%.2d%.2d%.2dZ", - tm0->tm_year % 100, tm0->tm_mon+1, tm0->tm_mday, tm0->tm_hour, tm0->tm_min, tm0->tm_sec); + tm->year % 100, tm->mon+1, tm->mday, tm->hour, tm->min, tm->sec); e.val.u.stringval = estrdup(utc); return e; } @@ -2383,6 +2474,34 @@ return mkseq(el); } +uchar* +RSApubtoasn1(RSApub *pub, int *keylen) +{ + Elem pubkey; + Bytes *pkbytes; + uchar *key; + + key = nil; + pubkey = mkseq(mkel(mkbigint(pub->n),mkel(mkint(mptoi(pub->ek)),nil))); + if(encode(pubkey, &pkbytes) != ASN_OK) + goto errret; + freevalfields(&pubkey.val); + pubkey = mkseq( + mkel(mkalg(ALG_rsaEncryption), + mkel(mkbits(pkbytes->data, pkbytes->len), + nil))); + freebytes(pkbytes); + if(encode(pubkey, &pkbytes) != ASN_OK) + goto errret; + if(keylen) + *keylen = pkbytes->len; + key = malloc(pkbytes->len); + memmove(key, pkbytes->data, pkbytes->len); + free(pkbytes); +errret: + freevalfields(&pubkey.val); + return key; +} uchar* X509gen(RSApriv *priv, char *subj, ulong valid[2], int *certlen) @@ -2564,7 +2683,10 @@ case VBigInt: print("BigInt[%d] %.2x%.2x...",v.u.bigintval->len,v.u.bigintval->data[0],v.u.bigintval->data[1]); break; case VReal: print("Real..."); break; case VOther: print("Other..."); break; - case VBitString: print("BitString..."); break; + case VBitString: print("BitString"); + for(i = 0; ilen; i++) + print(" %02x", v.u.bitstringval->data[i]); + break; case VNull: print("Null"); break; case VEOC: print("EOC..."); break; case VObjId: print("ObjId"); --- /sys/src/cmd/awk/awkgram.c Thu Jan 1 01:00:00 1970 +++ /sys/src/cmd/awk/awkgram.c Fri Sep 20 00:27:47 2013 @@ -0,0 +1,1620 @@ + +#line 26 "/sys/src/cmd/awk/awkgram.y" +#include +#include +#include "awk.h" + +#define makedfa(a,b) compre(a) + +void checkdup(Node *list, Cell *item); +int yywrap(void) { return(1); } + +Node *beginloc = 0; +Node *endloc = 0; +int infunc = 0; /* = 1 if in arglist or body of func */ +int inloop = 0; /* = 1 if in while, for, do */ +char *curfname = 0; /* current function name */ +Node *arglist = 0; /* list of args for current function */ + +#line 43 "/sys/src/cmd/awk/awkgram.y" +typedef union { + Node *p; + Cell *cp; + int i; + char *s; +} YYSTYPE; +extern int yyerrflag; +#ifndef YYMAXDEPTH +#define YYMAXDEPTH 150 +#endif +YYSTYPE yylval; +YYSTYPE yyval; +#define FIRSTTOKEN 57346 +#define PROGRAM 57347 +#define PASTAT 57348 +#define PASTAT2 57349 +#define XBEGIN 57350 +#define XEND 57351 +#define NL 57352 +#define ARRAY 57353 +#define MATCH 57354 +#define NOTMATCH 57355 +#define MATCHOP 57356 +#define FINAL 57357 +#define DOT 57358 +#define ALL 57359 +#define CCL 57360 +#define NCCL 57361 +#define CHAR 57362 +#define OR 57363 +#define STAR 57364 +#define QUEST 57365 +#define PLUS 57366 +#define AND 57367 +#define BOR 57368 +#define APPEND 57369 +#define EQ 57370 +#define GE 57371 +#define GT 57372 +#define LE 57373 +#define LT 57374 +#define NE 57375 +#define IN 57376 +#define ARG 57377 +#define BLTIN 57378 +#define BREAK 57379 +#define CLOSE 57380 +#define CONTINUE 57381 +#define DELETE 57382 +#define DO 57383 +#define EXIT 57384 +#define FOR 57385 +#define FUNC 57386 +#define SUB 57387 +#define GSUB 57388 +#define IF 57389 +#define INDEX 57390 +#define LSUBSTR 57391 +#define MATCHFCN 57392 +#define NEXT 57393 +#define NEXTFILE 57394 +#define ADD 57395 +#define MINUS 57396 +#define MULT 57397 +#define DIVIDE 57398 +#define MOD 57399 +#define ASSIGN 57400 +#define ASGNOP 57401 +#define ADDEQ 57402 +#define SUBEQ 57403 +#define MULTEQ 57404 +#define DIVEQ 57405 +#define MODEQ 57406 +#define POWEQ 57407 +#define PRINT 57408 +#define PRINTF 57409 +#define SPRINTF 57410 +#define ELSE 57411 +#define INTEST 57412 +#define CONDEXPR 57413 +#define POSTINCR 57414 +#define PREINCR 57415 +#define POSTDECR 57416 +#define PREDECR 57417 +#define VAR 57418 +#define IVAR 57419 +#define VARNF 57420 +#define CALL 57421 +#define NUMBER 57422 +#define STRING 57423 +#define REGEXPR 57424 +#define GETLINE 57425 +#define RETURN 57426 +#define SPLIT 57427 +#define SUBSTR 57428 +#define WHILE 57429 +#define CAT 57430 +#define NOT 57431 +#define UMINUS 57432 +#define POWER 57433 +#define DECR 57434 +#define INCR 57435 +#define INDIRECT 57436 +#define LASTTOKEN 57437 +#define YYEOFCODE 1 +#define YYERRCODE 2 + +#line 447 "/sys/src/cmd/awk/awkgram.y" + + +void setfname(Cell *p) +{ + if (isarr(p)) + SYNTAX("%s is an array, not a function", p->nval); + else if (isfcn(p)) + SYNTAX("you can't define function %s more than once", p->nval); + curfname = p->nval; +} + +int constnode(Node *p) +{ + return isvalue(p) && ((Cell *) (p->narg[0]))->csub == CCON; +} + +char *strnode(Node *p) +{ + return ((Cell *)(p->narg[0]))->sval; +} + +Node *notnull(Node *n) +{ + switch (n->nobj) { + case LE: case LT: case EQ: case NE: case GT: case GE: + case BOR: case AND: case NOT: + return n; + default: + return op2(NE, n, nullnode); + } +} + +void checkdup(Node *vl, Cell *cp) /* check if name already in list */ +{ + char *s = cp->nval; + for ( ; vl; vl = vl->nnext) { + if (strcmp(s, ((Cell *)(vl->narg[0]))->nval) == 0) { + SYNTAX("duplicate argument %s", s); + break; + } + } +} +short yyexca[] = +{-1, 0, + 1, 28, + 8, 28, + 9, 28, + 12, 28, + 13, 28, + 16, 28, + 45, 28, + 46, 28, + 54, 28, + 55, 28, + 56, 28, + 58, 28, + 60, 28, + 78, 28, + 86, 28, + 87, 28, + 88, 28, + 89, 28, + 90, 28, + 91, 28, + 95, 28, + 97, 28, + 98, 28, + 101, 28, + 102, 28, + 105, 28, + 108, 28, + 109, 28, + 110, 28, + -2, 0, +-1, 1, + 1, -1, + -2, 0, +-1, 157, + 15, 30, + -2, 0, +-1, 176, + 14, 0, + 24, 0, + 38, 0, + 39, 0, + 40, 0, + 41, 0, + 42, 0, + 43, 0, + 44, 0, + -2, 63, +-1, 177, + 14, 0, + 24, 0, + 38, 0, + 39, 0, + 40, 0, + 41, 0, + 42, 0, + 43, 0, + 44, 0, + -2, 64, +-1, 178, + 14, 0, + 24, 0, + 38, 0, + 39, 0, + 40, 0, + 41, 0, + 42, 0, + 43, 0, + 44, 0, + -2, 65, +-1, 179, + 14, 0, + 24, 0, + 38, 0, + 39, 0, + 40, 0, + 41, 0, + 42, 0, + 43, 0, + 44, 0, + -2, 66, +-1, 180, + 14, 0, + 24, 0, + 38, 0, + 39, 0, + 40, 0, + 41, 0, + 42, 0, + 43, 0, + 44, 0, + -2, 67, +-1, 181, + 14, 0, + 24, 0, + 38, 0, + 39, 0, + 40, 0, + 41, 0, + 42, 0, + 43, 0, + 44, 0, + -2, 68, +-1, 183, + 14, 0, + 24, 0, + 38, 0, + 39, 0, + 40, 0, + 41, 0, + 42, 0, + 43, 0, + 44, 0, + -2, 70, +-1, 290, + 24, 0, + 44, 0, + -2, 53, +-1, 334, + 17, 30, + -2, 0, +-1, 356, + 17, 30, + -2, 0, +}; +#define YYNPROD 185 +#define YYPRIVATE 57344 +#define YYLAST 4170 +short yyact[] = +{ + 17, 278, 254, 137, 244, 229, 102, 200, 53, 66, + 24, 105, 42, 155, 103, 104, 100, 138, 112, 309, + 54, 185, 215, 42, 100, 254, 100, 100, 100, 250, + 224, 121, 122, 123, 9, 107, 82, 42, 315, 83, + 162, 254, 107, 103, 104, 103, 104, 124, 253, 206, + 42, 190, 245, 41, 22, 43, 113, 113, 279, 133, + 317, 142, 10, 146, 41, 353, 43, 149, 150, 152, + 153, 148, 352, 163, 136, 100, 42, 23, 41, 22, + 43, 277, 147, 351, 132, 62, 156, 85, 168, 169, + 11, 41, 22, 43, 322, 321, 50, 190, 79, 80, + 100, 319, 23, 86, 182, 270, 259, 100, 100, 100, + 100, 100, 100, 100, 134, 23, 276, 41, 233, 43, + 108, 109, 110, 111, 332, 100, 112, 203, 205, 110, + 111, 190, 190, 112, 140, 11, 211, 336, 325, 139, + 212, 234, 100, 140, 235, 220, 100, 170, 311, 222, + 190, 167, 100, 219, 136, 227, 279, 156, 190, 158, + 190, 157, 190, 100, 285, 221, 266, 231, 261, 136, + 130, 129, 100, 237, 100, 228, 100, 100, 100, 100, + 100, 100, 100, 128, 100, 190, 252, 100, 100, 136, + 136, 260, 190, 3, 100, 6, 127, 126, 188, 19, + 7, 6, 100, 47, 313, 125, 7, 100, 48, 100, + 100, 100, 120, 119, 100, 100, 51, 16, 16, 190, + 217, 140, 275, 218, 143, 115, 271, 154, 272, 4, + 144, 131, 318, 100, 100, 100, 100, 163, 49, 163, + 163, 163, 163, 20, 274, 163, 348, 100, 294, 362, + 239, 295, 289, 293, 365, 1, 100, 100, 72, 96, + 39, 225, 5, 58, 67, 223, 240, 114, 61, 116, + 117, 118, 164, 60, 301, 302, 249, 283, 81, 286, + 287, 288, 290, 8, 100, 292, 159, 100, 100, 100, + 310, 100, 136, 100, 156, 160, 314, 2, 100, 0, + 100, 100, 0, 0, 100, 0, 100, 100, 100, 0, + 0, 0, 0, 0, 335, 0, 165, 163, 96, 0, + 0, 0, 0, 0, 0, 334, 0, 0, 342, 156, + 343, 0, 0, 0, 100, 341, 0, 0, 0, 100, + 347, 100, 0, 116, 231, 100, 100, 0, 349, 357, + 96, 194, 195, 196, 197, 198, 199, 338, 0, 360, + 356, 0, 361, 363, 156, 0, 231, 0, 207, 358, + 136, 239, 0, 0, 239, 239, 239, 0, 239, 0, + 239, 0, 0, 364, 0, 96, 366, 240, 0, 96, + 240, 240, 240, 0, 240, 96, 240, 0, 0, 0, + 258, 0, 0, 0, 339, 0, 243, 0, 0, 0, + 0, 0, 0, 0, 0, 96, 0, 96, 21, 96, + 96, 96, 96, 96, 96, 96, 239, 96, 0, 0, + 96, 96, 0, 0, 0, 0, 164, 257, 164, 164, + 164, 164, 240, 0, 164, 96, 0, 0, 0, 0, + 262, 0, 96, 96, 96, 0, 0, 96, 96, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 96, 280, 281, 282, + 165, 0, 165, 165, 165, 165, 0, 0, 165, 0, + 96, 0, 166, 0, 0, 0, 0, 0, 0, 96, + 96, 0, 0, 0, 0, 74, 189, 191, 0, 0, + 15, 0, 0, 184, 0, 0, 164, 0, 0, 0, + 0, 0, 0, 0, 106, 0, 0, 243, 0, 0, + 243, 243, 243, 0, 243, 0, 243, 0, 0, 0, + 0, 96, 0, 96, 96, 0, 0, 96, 0, 96, + 96, 96, 0, 0, 0, 15, 0, 15, 0, 0, + 165, 236, 141, 0, 0, 145, 0, 0, 0, 0, + 0, 151, 0, 0, 0, 0, 230, 96, 0, 0, + 0, 0, 243, 0, 96, 0, 0, 0, 96, 96, + 171, 173, 175, 176, 177, 178, 179, 180, 181, 183, + 0, 0, 0, 0, 0, 0, 0, 186, 187, 263, + 264, 265, 0, 267, 268, 269, 0, 0, 0, 201, + 0, 0, 0, 0, 0, 201, 201, 0, 0, 0, + 0, 208, 209, 210, 201, 213, 214, 0, 189, 0, + 0, 0, 0, 0, 0, 0, 0, 101, 0, 0, + 296, 0, 0, 0, 0, 0, 0, 0, 241, 0, + 0, 291, 0, 0, 232, 0, 0, 106, 0, 98, + 97, 0, 298, 246, 0, 0, 0, 0, 242, 42, + 28, 0, 0, 0, 304, 0, 0, 0, 0, 45, + 46, 0, 33, 0, 34, 255, 312, 256, 0, 0, + 0, 0, 0, 0, 0, 324, 327, 329, 330, 0, + 0, 0, 37, 0, 0, 189, 0, 0, 0, 0, + 41, 22, 43, 29, 35, 38, 0, 238, 316, 32, + 0, 36, 40, 0, 337, 27, 26, 0, 0, 99, + 0, 0, 30, 31, 23, 0, 0, 0, 0, 0, + 0, 201, 0, 0, 0, 0, 0, 297, 0, 0, + 0, 0, 0, 0, 299, 0, 0, 0, 0, 300, + 303, 0, 0, 305, 306, 307, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 106, 0, 0, 0, 0, 0, 75, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 16, 18, 0, 68, + 44, 0, 359, 0, 0, 0, 333, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 340, 0, 0, 0, 0, 0, 344, 0, 345, 42, + 28, 55, 56, 57, 73, 69, 59, 70, 0, 45, + 46, 71, 33, 0, 34, 63, 64, 0, 0, 0, + 0, 0, 0, 0, 0, 75, 0, 0, 0, 0, + 77, 78, 37, 52, 0, 16, 18, 0, 68, 44, + 41, 22, 43, 29, 35, 38, 0, 0, 0, 32, + 65, 36, 40, 76, 0, 27, 26, 0, 0, 25, + 0, 0, 30, 31, 23, 0, 0, 0, 42, 28, + 55, 56, 57, 73, 69, 59, 70, 0, 45, 46, + 71, 33, 0, 34, 63, 64, 0, 0, 0, 0, + 0, 0, 75, 0, 0, 0, 0, 0, 0, 77, + 78, 37, 16, 18, 0, 68, 44, 0, 308, 41, + 22, 43, 29, 35, 38, 0, 0, 0, 32, 65, + 36, 40, 76, 0, 27, 26, 0, 0, 25, 0, + 0, 30, 31, 23, 0, 42, 28, 55, 56, 57, + 73, 69, 59, 70, 0, 45, 46, 71, 33, 0, + 34, 63, 64, 0, 0, 0, 0, 0, 0, 0, + 0, 75, 0, 0, 0, 0, 77, 78, 37, 273, + 0, 16, 18, 0, 68, 44, 41, 22, 43, 29, + 35, 38, 0, 0, 0, 32, 65, 36, 40, 76, + 0, 27, 26, 0, 0, 25, 0, 0, 30, 31, + 23, 0, 0, 0, 42, 28, 55, 56, 57, 73, + 69, 59, 70, 0, 45, 46, 71, 33, 0, 34, + 63, 64, 0, 0, 0, 0, 0, 0, 75, 0, + 0, 0, 0, 0, 0, 77, 78, 37, 16, 18, + 0, 68, 44, 0, 248, 41, 22, 43, 29, 35, + 38, 0, 0, 0, 32, 65, 36, 40, 76, 0, + 27, 26, 0, 0, 25, 0, 0, 30, 31, 23, + 0, 42, 28, 55, 56, 57, 73, 69, 59, 70, + 0, 45, 46, 71, 33, 0, 34, 63, 64, 0, + 0, 0, 0, 0, 0, 75, 0, 0, 0, 0, + 0, 0, 77, 78, 37, 16, 18, 0, 68, 44, + 0, 247, 41, 22, 43, 29, 35, 38, 0, 0, + 0, 32, 65, 36, 40, 76, 0, 27, 26, 0, + 0, 25, 0, 0, 30, 31, 23, 0, 42, 28, + 55, 56, 57, 73, 69, 59, 70, 0, 45, 46, + 71, 33, 0, 34, 63, 64, 0, 0, 0, 0, + 0, 0, 75, 0, 0, 0, 0, 0, 0, 77, + 78, 37, 16, 18, 0, 68, 44, 0, 226, 41, + 22, 43, 29, 35, 38, 0, 0, 0, 32, 65, + 36, 40, 76, 0, 27, 26, 0, 0, 25, 0, + 0, 30, 31, 23, 0, 42, 28, 55, 56, 57, + 73, 69, 59, 70, 0, 45, 46, 71, 33, 0, + 34, 63, 64, 0, 0, 0, 0, 0, 0, 75, + 0, 0, 0, 0, 0, 0, 77, 78, 37, 16, + 18, 0, 68, 44, 0, 216, 41, 22, 43, 29, + 35, 38, 0, 0, 0, 32, 65, 36, 40, 76, + 0, 27, 26, 0, 0, 25, 0, 0, 30, 31, + 23, 0, 42, 28, 55, 56, 57, 73, 69, 59, + 70, 0, 45, 46, 71, 33, 0, 34, 63, 64, + 0, 0, 0, 0, 0, 0, 75, 0, 0, 0, + 0, 0, 0, 77, 78, 37, 16, 18, 0, 68, + 44, 0, 135, 41, 22, 43, 29, 35, 38, 0, + 0, 0, 32, 65, 36, 40, 76, 0, 27, 26, + 0, 0, 25, 0, 0, 30, 31, 23, 0, 42, + 28, 55, 56, 57, 73, 69, 59, 70, 0, 45, + 46, 71, 33, 0, 34, 63, 64, 0, 0, 0, + 0, 0, 0, 75, 0, 0, 0, 0, 0, 0, + 77, 78, 37, 16, 18, 0, 68, 44, 0, 0, + 41, 22, 43, 29, 35, 38, 0, 0, 0, 32, + 65, 36, 40, 76, 0, 27, 26, 0, 0, 25, + 0, 0, 30, 31, 23, 0, 42, 28, 55, 56, + 57, 73, 69, 59, 70, 0, 45, 46, 71, 33, + 0, 34, 63, 64, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 77, 78, 37, + 0, 0, 0, 0, 0, 0, 0, 41, 22, 43, + 29, 35, 38, 0, 0, 0, 32, 65, 36, 40, + 76, 0, 27, 26, 0, 0, 25, 0, 0, 30, + 31, 23, 190, 0, 101, 95, 0, 0, 331, 0, + 0, 0, 0, 0, 0, 93, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 98, 97, 0, 87, + 88, 89, 90, 91, 92, 94, 42, 28, 0, 0, + 0, 0, 0, 0, 0, 0, 45, 46, 0, 33, + 0, 34, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 37, + 0, 0, 0, 0, 0, 0, 0, 41, 22, 43, + 29, 35, 38, 0, 84, 0, 32, 0, 36, 40, + 0, 0, 27, 26, 0, 0, 99, 0, 0, 30, + 31, 23, 190, 0, 101, 95, 0, 0, 328, 0, + 0, 0, 0, 0, 0, 93, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 98, 97, 0, 87, + 88, 89, 90, 91, 92, 94, 42, 28, 0, 0, + 0, 0, 0, 0, 0, 0, 45, 46, 0, 33, + 0, 34, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 37, + 0, 0, 0, 0, 0, 0, 0, 41, 22, 43, + 29, 35, 38, 0, 84, 0, 32, 0, 36, 40, + 0, 0, 27, 26, 0, 0, 99, 0, 0, 30, + 31, 23, 190, 0, 101, 95, 0, 0, 326, 0, + 0, 0, 0, 0, 0, 93, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 98, 97, 0, 87, + 88, 89, 90, 91, 92, 94, 42, 28, 0, 0, + 0, 0, 0, 0, 0, 0, 45, 46, 0, 33, + 0, 34, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 37, + 0, 0, 0, 0, 0, 0, 0, 41, 22, 43, + 29, 35, 38, 0, 84, 0, 32, 0, 36, 40, + 0, 0, 27, 26, 0, 0, 99, 0, 0, 30, + 31, 23, 140, 0, 0, 101, 95, 139, 0, 0, + 0, 0, 0, 0, 0, 0, 93, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 98, 97, 0, + 87, 88, 89, 90, 91, 92, 94, 42, 28, 0, + 0, 0, 0, 0, 0, 0, 0, 45, 46, 0, + 33, 0, 34, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 37, 0, 0, 0, 0, 0, 0, 0, 41, 22, + 43, 29, 35, 38, 0, 84, 0, 32, 0, 36, + 40, 0, 0, 27, 26, 0, 0, 99, 0, 0, + 30, 31, 23, 190, 0, 101, 95, 0, 0, 192, + 0, 0, 0, 0, 0, 0, 93, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 98, 97, 0, + 87, 88, 89, 90, 91, 92, 94, 42, 28, 0, + 0, 0, 0, 0, 0, 0, 0, 45, 46, 0, + 33, 0, 34, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 37, 0, 0, 0, 0, 0, 0, 0, 41, 22, + 43, 29, 35, 38, 0, 84, 0, 32, 0, 36, + 40, 0, 0, 27, 26, 101, 95, 99, 0, 355, + 30, 31, 23, 0, 0, 0, 93, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 98, 97, 0, + 87, 88, 89, 90, 91, 92, 94, 42, 28, 0, + 0, 0, 0, 0, 0, 0, 0, 45, 46, 0, + 33, 0, 34, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 37, 0, 0, 0, 0, 0, 0, 0, 41, 22, + 43, 29, 35, 38, 0, 84, 0, 32, 0, 36, + 40, 0, 0, 27, 26, 101, 95, 99, 0, 354, + 30, 31, 23, 0, 0, 0, 93, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 98, 97, 0, + 87, 88, 89, 90, 91, 92, 94, 42, 28, 0, + 0, 0, 0, 0, 0, 0, 0, 45, 46, 0, + 33, 0, 34, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 37, 0, 0, 0, 0, 0, 0, 0, 41, 22, + 43, 29, 35, 38, 0, 84, 0, 32, 0, 36, + 40, 0, 0, 27, 26, 101, 95, 99, 0, 350, + 30, 31, 23, 0, 0, 0, 93, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 98, 97, 0, + 87, 88, 89, 90, 91, 92, 94, 42, 28, 0, + 0, 0, 0, 0, 0, 0, 0, 45, 46, 0, + 33, 0, 34, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 37, 0, 0, 0, 0, 0, 0, 0, 41, 22, + 43, 29, 35, 38, 0, 84, 0, 32, 0, 36, + 40, 0, 0, 27, 26, 0, 0, 99, 0, 0, + 30, 31, 23, 101, 95, 346, 0, 0, 0, 0, + 0, 0, 0, 0, 93, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 98, 97, 0, 87, 88, + 89, 90, 91, 92, 94, 42, 28, 0, 0, 0, + 0, 0, 0, 0, 0, 45, 46, 0, 33, 0, + 34, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 37, 0, + 0, 0, 0, 0, 0, 0, 41, 22, 43, 29, + 35, 38, 0, 84, 0, 32, 0, 36, 40, 0, + 0, 27, 26, 101, 95, 99, 0, 323, 30, 31, + 23, 0, 0, 0, 93, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 98, 97, 0, 87, 88, + 89, 90, 91, 92, 94, 42, 28, 0, 0, 0, + 0, 0, 0, 0, 0, 45, 46, 0, 33, 0, + 34, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 37, 0, + 0, 0, 0, 0, 0, 0, 41, 22, 43, 29, + 35, 38, 0, 84, 0, 32, 0, 36, 40, 0, + 0, 27, 26, 101, 95, 99, 0, 320, 30, 31, + 23, 0, 0, 0, 93, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 98, 97, 0, 87, 88, + 89, 90, 91, 92, 94, 42, 28, 0, 0, 0, + 0, 0, 0, 0, 0, 45, 46, 0, 33, 0, + 34, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 37, 0, + 0, 0, 0, 0, 0, 0, 41, 22, 43, 29, + 35, 38, 0, 84, 0, 32, 0, 36, 40, 0, + 0, 27, 26, 101, 95, 99, 0, 279, 30, 31, + 23, 0, 0, 0, 93, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 98, 97, 0, 87, 88, + 89, 90, 91, 92, 94, 42, 28, 0, 0, 0, + 0, 0, 0, 0, 0, 45, 46, 0, 33, 0, + 34, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 37, 0, + 0, 0, 0, 0, 0, 0, 41, 22, 43, 29, + 35, 38, 0, 84, 0, 32, 0, 36, 40, 0, + 0, 27, 26, 0, 190, 99, 101, 95, 30, 31, + 23, 0, 0, 0, 0, 0, 0, 93, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 98, 97, + 0, 87, 88, 89, 90, 91, 92, 94, 42, 28, + 0, 0, 0, 0, 0, 0, 0, 0, 45, 46, + 0, 33, 0, 34, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 37, 0, 0, 0, 0, 0, 0, 0, 41, + 22, 43, 29, 35, 38, 0, 84, 0, 32, 0, + 36, 40, 0, 0, 27, 26, 101, 95, 99, 0, + 192, 30, 31, 23, 0, 0, 0, 93, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 98, 97, + 0, 87, 88, 89, 90, 91, 92, 94, 42, 28, + 0, 0, 0, 0, 0, 0, 0, 0, 45, 46, + 0, 33, 0, 34, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 37, 0, 0, 0, 0, 0, 0, 0, 41, + 22, 43, 29, 35, 38, 0, 84, 0, 32, 0, + 36, 40, 0, 0, 27, 26, 101, 95, 99, 0, + 0, 30, 31, 23, 0, 0, 0, 93, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 98, 97, + 0, 87, 88, 89, 90, 91, 92, 94, 42, 28, + 0, 0, 0, 0, 0, 0, 0, 0, 45, 46, + 0, 33, 0, 34, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 37, 0, 0, 0, 0, 0, 0, 0, 41, + 22, 43, 29, 35, 38, 0, 84, 251, 32, 0, + 36, 40, 0, 0, 27, 26, 101, 95, 99, 0, + 0, 30, 31, 23, 0, 0, 0, 93, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 98, 97, + 0, 87, 88, 89, 90, 91, 92, 94, 42, 28, + 0, 0, 0, 0, 0, 0, 0, 0, 45, 46, + 0, 33, 0, 34, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 37, 0, 0, 0, 0, 0, 0, 0, 41, + 22, 43, 29, 35, 38, 0, 84, 0, 32, 0, + 36, 40, 0, 0, 27, 26, 101, 95, 99, 0, + 0, 30, 31, 23, 0, 0, 0, 93, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 98, 0, + 0, 87, 88, 89, 90, 91, 92, 94, 42, 28, + 0, 0, 0, 0, 0, 0, 0, 0, 45, 46, + 0, 33, 0, 34, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 37, 0, 0, 0, 0, 0, 0, 0, 41, + 22, 43, 29, 35, 38, 101, 95, 0, 32, 0, + 36, 40, 0, 0, 27, 26, 93, 0, 99, 0, + 0, 30, 31, 23, 0, 0, 0, 0, 0, 0, + 87, 88, 89, 90, 91, 92, 94, 42, 28, 0, + 0, 0, 0, 0, 0, 0, 0, 45, 46, 0, + 33, 0, 34, 0, 0, 75, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 18, 0, 0, 44, + 37, 0, 0, 0, 0, 0, 0, 0, 41, 22, + 43, 29, 35, 38, 0, 0, 0, 32, 0, 36, + 40, 0, 0, 27, 26, 0, 0, 99, 42, 28, + 30, 31, 23, 73, 0, 0, 0, 0, 45, 46, + 0, 33, 0, 34, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 77, + 78, 37, 0, 0, 101, 0, 0, 0, 0, 41, + 22, 43, 29, 35, 38, 241, 0, 0, 32, 0, + 36, 40, 0, 0, 27, 26, 98, 97, 25, 0, + 0, 30, 31, 23, 0, 242, 42, 28, 0, 0, + 0, 0, 0, 0, 0, 0, 45, 46, 0, 33, + 0, 34, 0, 0, 0, 0, 0, 12, 13, 0, + 0, 16, 18, 0, 0, 44, 0, 0, 0, 37, + 0, 0, 0, 0, 0, 0, 0, 41, 22, 43, + 29, 35, 38, 0, 238, 0, 32, 0, 36, 40, + 0, 0, 27, 26, 42, 28, 99, 0, 0, 30, + 31, 23, 0, 14, 45, 46, 0, 33, 0, 34, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 37, 0, 0, + 101, 0, 0, 0, 0, 41, 22, 43, 29, 35, + 38, 241, 0, 0, 32, 0, 36, 40, 0, 0, + 27, 26, 98, 0, 25, 0, 0, 30, 31, 23, + 0, 242, 42, 28, 0, 0, 0, 0, 0, 0, + 0, 0, 45, 46, 0, 33, 0, 34, 0, 0, + 0, 0, 0, 0, 0, 140, 0, 0, 18, 0, + 139, 44, 0, 0, 0, 37, 0, 0, 0, 0, + 0, 0, 0, 41, 22, 43, 29, 35, 38, 0, + 254, 0, 32, 18, 36, 40, 44, 0, 27, 26, + 42, 28, 99, 0, 0, 30, 31, 23, 0, 0, + 45, 46, 0, 33, 0, 34, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 42, 28, 0, 0, 0, + 0, 0, 0, 37, 0, 45, 46, 0, 33, 0, + 34, 41, 22, 43, 29, 35, 38, 0, 0, 0, + 32, 0, 36, 40, 0, 0, 27, 26, 37, 0, + 25, 101, 0, 30, 31, 23, 41, 22, 43, 29, + 35, 38, 241, 0, 0, 32, 0, 36, 40, 0, + 0, 27, 26, 0, 0, 25, 0, 0, 30, 31, + 23, 0, 242, 42, 28, 0, 0, 0, 0, 0, + 0, 0, 0, 45, 46, 0, 33, 0, 34, 0, + 0, 0, 0, 0, 0, 0, 174, 0, 0, 284, + 0, 0, 44, 0, 0, 0, 37, 0, 0, 0, + 0, 0, 0, 0, 41, 22, 43, 29, 35, 38, + 0, 172, 0, 32, 284, 36, 40, 44, 0, 27, + 26, 42, 28, 99, 0, 0, 30, 31, 23, 0, + 0, 45, 46, 0, 33, 0, 34, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 42, 28, 0, 0, + 0, 0, 0, 0, 37, 0, 45, 46, 0, 33, + 0, 34, 41, 22, 43, 29, 35, 38, 0, 254, + 0, 32, 284, 36, 40, 44, 0, 27, 26, 37, + 0, 25, 0, 0, 30, 31, 23, 41, 22, 43, + 29, 35, 38, 0, 0, 0, 32, 18, 36, 40, + 44, 204, 27, 26, 42, 28, 25, 0, 0, 30, + 31, 23, 0, 0, 45, 46, 0, 33, 0, 34, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 42, + 28, 0, 0, 0, 0, 0, 0, 37, 0, 45, + 46, 0, 33, 0, 34, 41, 22, 43, 29, 35, + 38, 0, 0, 0, 32, 18, 36, 40, 44, 202, + 27, 26, 37, 0, 25, 0, 0, 30, 31, 23, + 41, 22, 43, 29, 35, 38, 0, 174, 0, 32, + 18, 36, 40, 44, 0, 27, 26, 42, 28, 25, + 0, 0, 30, 31, 23, 0, 0, 45, 46, 0, + 33, 0, 34, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 42, 28, 0, 0, 0, 0, 0, 0, + 37, 0, 45, 46, 0, 33, 0, 34, 41, 22, + 43, 29, 35, 38, 0, 172, 0, 32, 18, 36, + 40, 44, 0, 27, 26, 37, 0, 25, 0, 0, + 30, 31, 23, 41, 22, 43, 29, 35, 38, 0, + 0, 0, 32, 18, 36, 40, 44, 0, 27, 26, + 42, 28, 25, 0, 0, 30, 31, 23, 0, 0, + 45, 46, 0, 33, 0, 34, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 42, 28, 0, 0, 0, + 0, 0, 0, 37, 0, 45, 46, 0, 33, 0, + 34, 41, 22, 43, 29, 35, 38, 0, 0, 0, + 32, 284, 36, 40, 44, 0, 27, 26, 37, 0, + 25, 0, 0, 30, 31, 23, 41, 22, 43, 29, + 35, 38, 0, 0, 0, 32, 101, 36, 40, 0, + 0, 27, 26, 42, 28, 25, 0, 0, 30, 31, + 23, 0, 0, 45, 46, 0, 33, 0, 34, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 42, 28, + 0, 0, 0, 0, 0, 0, 37, 0, 45, 46, + 0, 33, 0, 34, 41, 22, 43, 29, 35, 38, + 0, 0, 193, 32, 161, 36, 40, 44, 0, 27, + 26, 37, 0, 25, 0, 0, 30, 31, 23, 41, + 22, 43, 29, 35, 38, 0, 0, 0, 32, 101, + 36, 40, 44, 0, 27, 26, 42, 28, 99, 0, + 0, 30, 31, 23, 0, 0, 45, 46, 0, 33, + 0, 34, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 42, 28, 0, 0, 0, 0, 0, 0, 37, + 0, 45, 46, 0, 33, 0, 34, 41, 22, 43, + 29, 35, 38, 0, 0, 0, 32, 101, 36, 40, + 0, 0, 27, 26, 37, 0, 25, 0, 0, 30, + 31, 23, 41, 22, 43, 29, 35, 38, 0, 0, + 0, 32, 101, 36, 40, 0, 0, 27, 26, 42, + 28, 25, 0, 0, 30, 31, 23, 0, 0, 45, + 46, 0, 33, 0, 34, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 42, 28, 0, 0, 0, 0, + 0, 0, 37, 0, 45, 46, 0, 33, 0, 34, + 41, 22, 43, 29, 35, 38, 0, 0, 0, 32, + 0, 36, 40, 0, 0, 27, 26, 37, 0, 99, + 0, 0, 30, 31, 23, 41, 22, 43, 29, 35, + 38, 0, 0, 0, 0, 0, 36, 40, 0, 0, + 27, 26, 0, 0, 99, 0, 0, 30, 31, 23 +}; +short yypact[] = +{ + 191,-1000,-1000,-1000,3259, 193,-1000,-1000, 185,-1000, + 205, 863, 206, 206, -50,2903,-1000, -63,3810,-1000, + 19, 38,-1000,4034,-1000,3976,4034,4034, 200, 199, + -33, -33, 5, 192, 184,-1000, 183, 170,-1000, 158, + 157,-1000,-1000,-1000,-1000,-1000,-1000,-1000,-1000,3259, + 863,3810,-1000,1334,-1000, 124,3810, 124, 214,3385, +-1000,1401, 863, 124, 124,3385, 124,-1000, 211,-1000, + 148, 146,3951, -22,2903,-1000, 138,-1000,-1000, 863, + 863, 134,-1000,-1000,3810,3785,3727,3810,3810,3810, +3810,3810,3810,3810, -22, -74, 19,-1000,-1000,4034, + -94,3810,3810,-1000,-1000, 181,1902,3893,4034,4034, +4034,4034,4034,3810,-1000,-1000, -89, -89, -89,3702, +3644,-1000,-1000, 7,4034,3810,3810,3810,3810,3810, +3810, -70,-1000,1267, 206,-1000,-1000,-1000, 213, 211, +-1000,1802,-1000,-1000,1401,1802,-1000, -49,1200,-1000, +-1000,1802,-1000,-1000,1401,-1000, 213,3133,3810, 104, + 208,3810,3201, -65,-1000, 19, 33,3810,1133,1066, + -57,2813,-1000,2993,-1000,3072,4059,4059,4059,4059, +4059,4059,-1000,4059,-1000, -33,2723,2903, 4,3410, +-1000,3410,-1000,4034, -89, 26, 26, -89, -89, -89, + 86,2903,-1000, 174,-1000, 151,4034, 19,2633,2633, +2633, 149, 208,2633,2633, 89,-1000, 863,-1000,-1000, +-1000,-1000,-1000, 999,-1000, 212,-1000,-1000,-1000, 101, + 37,-1000,2540,4034,4034,4034,3619, 147,3868,3561, +3536,3868, -22, 19,3868,3810,2540,-1000,-1000, 139, +-1000,3810,-1000, -22,-1000,2903,2903, 19,3410,-1000, +-1000,-1000, 19,3410,3410, 31,-1000,3410,3410,3410, +-1000, 930, -80,-1000,-1000,-1000, 133, -22, 194,-1000, + 19, 19, 19,3201,3810, -6, 634,3327,3478,-1000, +4059,-1000,3201, 40, 194, 194, 15,2903,-1000,2903, +2450, 78, 77,2360, 121,1701,1601,1501,-1000, 111, +3810, 211, 41,-1000, 120, -22,3868,-1000, 206,-1000, +-1000,-1000,-1000,-1000,3410,-1000,-1000, -8,-1000, -8, +3410,-1000,3810,2270,3133, 194, -6,-1000,3201, 863, +2172, 66, 55, 48,2082,1992, 211, 41,1401, 794, +-1000,-1000,-1000,-1000,-1000, 124,3133, 194,-1000,-1000, +-1000, 41,1401, 194,-1000,1401,-1000 +}; +short yypgo[] = +{ + 0, 297, 505, 40, 11, 295, 7, 286, 243, 199, + 62, 34, 283, 10, 9, 5, 20, 8, 0, 418, + 278, 276, 273, 268, 265, 264, 263, 3, 262, 229, + 85, 261, 1, 400, 17, 13, 103, 87, 260, 258, + 255, 254, 249, 246, 232, 231, 230, 228, 227 +}; +short yyr1[] = +{ + 0, 40, 40, 36, 36, 37, 37, 33, 33, 26, + 26, 24, 24, 41, 22, 42, 22, 43, 22, 20, + 20, 23, 30, 30, 34, 34, 35, 35, 29, 29, + 15, 15, 1, 1, 10, 11, 11, 11, 11, 11, + 11, 11, 44, 11, 12, 12, 6, 6, 3, 3, + 3, 3, 3, 3, 3, 3, 3, 3, 3, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, + 2, 2, 2, 2, 2, 2, 2, 2, 4, 4, + 5, 5, 7, 7, 7, 39, 39, 28, 28, 28, + 28, 31, 31, 9, 9, 45, 13, 32, 32, 14, + 14, 14, 14, 14, 14, 14, 14, 27, 27, 16, + 16, 16, 46, 47, 16, 16, 16, 16, 16, 16, + 16, 16, 16, 16, 16, 16, 48, 16, 16, 17, + 17, 38, 38, 8, 8, 8, 8, 8, 8, 8, + 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, + 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, + 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, + 8, 8, 8, 8, 18, 18, 18, 18, 21, 21, + 21, 19, 19, 19, 25 +}; +short yyr2[] = +{ + 0, 1, 1, 1, 2, 1, 2, 1, 2, 1, + 2, 1, 2, 0, 12, 0, 10, 0, 8, 1, + 1, 4, 1, 2, 1, 2, 0, 1, 0, 1, + 0, 1, 1, 3, 1, 1, 4, 3, 6, 3, + 4, 4, 0, 9, 1, 3, 1, 3, 3, 5, + 3, 3, 3, 3, 3, 5, 2, 1, 1, 3, + 5, 3, 3, 3, 3, 3, 3, 3, 3, 3, + 3, 3, 5, 4, 3, 2, 1, 1, 3, 3, + 1, 3, 0, 1, 3, 1, 1, 1, 1, 2, + 2, 1, 2, 1, 2, 0, 4, 1, 2, 4, + 4, 4, 2, 5, 2, 1, 1, 1, 2, 2, + 3, 2, 0, 0, 9, 3, 2, 1, 4, 2, + 3, 2, 2, 3, 2, 2, 0, 3, 2, 1, + 2, 1, 1, 4, 3, 3, 3, 3, 3, 3, + 2, 2, 2, 3, 4, 1, 3, 4, 2, 2, + 2, 2, 4, 3, 2, 1, 6, 6, 3, 6, + 6, 1, 8, 8, 6, 4, 1, 6, 6, 8, + 8, 8, 6, 1, 1, 4, 1, 2, 0, 1, + 3, 1, 1, 1, 4 +}; +short yychk[] = +{ +-1000, -40, -1, 2, -29, -28, 10, 15, -12, -11, + -10, -30, 8, 9, 54, -2, 12, -18, 13, -9, + -8, -19, 87, 110, -13, 105, 102, 101, 46, 89, + 108, 109, 95, 58, 60, 90, 97, 78, 91, -38, + 98, 86, 45, 88, 16, 55, 56, 10, 15, -29, + -30, 11, 10, -17, -16, 47, 48, 49, -26, 52, + -22, -23, -30, 61, 62, 96, -14, -25, 15, 51, + 53, 57, -39, 50, -2, 2, 99, 76, 77, -30, + -30, -20, 86, 89, 93, -37, -36, 38, 39, 40, + 41, 42, 43, 24, 44, 14, -8, 36, 35, 105, + -18, 13, 69, 108, 109, -4, -2, 16, 101, 102, + 103, 104, 107, 19, -8, -9, -8, -8, -8, 13, + 13, -18, -18, -18, 42, 13, 13, 13, 13, 13, + 13, -45, -11, -17, -10, 18, -16, -27, -34, 15, + 10, -2, -27, 10, -46, -2, -27, -16, -17, -27, + -27, -2, -27, -27, -48, -35, -34, 13, 13, -7, + -5, 13, -3, -18, -9, -8, -19, 13, -17, -17, + 13, -2, 10, -2, 10, -2, -2, -2, -2, -2, + -2, -2, -13, -2, -19, 95, -2, -2, 17, -33, + 11, -33, 17, 69, -8, -8, -8, -8, -8, -8, + -6, -2, 17, -6, 17, -6, 42, -8, -2, -2, + -2, -6, -13, -2, -2, 92, 18, -30, 10, -35, + -27, -16, -27, -24, 79, -31, 18, -27, -16, -15, + -19, -14, -2, 14, 37, 40, -33, -4, 93, -37, + -36, 24, 44, -8, 69, 19, -2, 18, 18, -21, + 86, 94, -18, 44, 10, -2, -2, -8, -33, 20, + 17, 17, -8, -33, -33, -33, 17, -33, -33, -33, + 16, -17, -47, 10, -16, 10, 15, 44, -32, 17, + -8, -8, -8, -3, 13, 17, -3, -3, -3, -13, + -3, -19, -3, -6, -32, -32, -33, -2, -19, -2, + -2, -13, -13, -2, -19, -2, -2, -2, 18, 99, + -35, 15, -19, 10, -4, 44, 94, 20, -44, 86, + 17, 17, 17, 17, -33, 17, 17, -33, 17, -33, + -33, 17, 13, -2, -35, -32, 17, -19, -3, -30, + -2, -13, -18, -18, -2, -2, 15, -15, -43, -17, + 17, 17, 17, 17, 17, 17, -35, -32, -16, 18, + -27, -15, -42, -32, -16, -41, -16 +}; +short yydef[] = +{ + -2, -2, 1, 2, 32, 29, 87, 88, 28, 44, + 35, 0, 0, 0, 0, 34, 22, 173, 0, 76, + 77, 174, 176, 0, 93, 0, 0, 0, 145, 0, + 0, 0, 155, 0, 0, 161, 0, 0, 166, 0, + 0, 181, 182, 183, 95, 131, 132, 89, 90, 33, + 0, 0, 23, 0, 129, 0, 0, 0, 112, 0, + 117, 0, 0, 0, 0, 0, 0, 126, 26, 9, + 0, 0, 82, 0, 105, 106, 0, 85, 86, 0, + 0, 0, 19, 20, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 75, 5, 3, 0, + 173, 0, 0, 150, 151, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 177, 94, 142, 140, 141, 0, + 0, 148, 149, 154, 0, 0, 0, 0, 0, 0, + 0, 0, 45, 0, 37, 39, 130, 109, 107, 26, + 24, 0, 111, 10, 0, 0, 116, 119, 0, 121, + 122, 0, 124, 125, 0, 128, 27, -2, 0, 102, + 83, 0, 80, 173, 57, 58, 104, 0, 0, 0, + 178, 0, 6, 61, 4, 62, -2, -2, -2, -2, + -2, -2, 69, -2, 71, 74, 0, 59, 0, 0, + 7, 0, 158, 0, 137, 134, 135, 136, 138, 139, + 0, 46, 143, 0, 146, 0, 0, 153, 0, 0, + 0, 0, 93, 0, 0, 0, 36, 0, 25, 108, + 110, 113, 115, 0, 11, 120, 91, 123, 127, 0, + 174, 31, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 56, 0, 0, 0, 40, 41, 0, + 179, 0, 73, 0, 8, 79, 78, 133, 0, 175, + 144, 147, 152, 0, 0, 0, 165, 0, 0, 0, + 96, 0, 0, 12, 118, 92, 26, 0, 21, 97, + 99, 100, 101, 81, 0, 84, 0, 50, 51, 52, + -2, 54, 48, 0, 184, 42, 0, 60, 72, 47, + 0, 93, 93, 0, 0, 0, 0, 0, 38, 0, + 0, 26, 0, 98, 0, 0, 0, 103, 0, 180, + 156, 157, 159, 160, 0, 164, 167, 0, 168, 0, + 0, 172, 0, 0, -2, 17, 0, 55, 49, 0, + 0, 93, 0, 0, 0, 0, 26, 0, 0, 0, + 162, 163, 169, 170, 171, 0, -2, 15, 18, 43, + 114, 0, 0, 13, 16, 0, 14 +}; +short yytok1[] = +{ + 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 104, 0, 0, + 13, 17, 103, 101, 11, 102, 0, 16, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 94, 15, + 0, 0, 0, 93, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 19, 0, 20, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, + 0, 0, 0, 12, 14, 18 +}; +short yytok2[] = +{ + 2, 3, 4, 5, 6, 7, 8, 9, 10, 21, + 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, + 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, + 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, + 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, + 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, + 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, + 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, + 92, 95, 96, 97, 98, 99, 100, 105, 106, 107, + 108, 109, 110, 111 +}; +long yytok3[] = +{ + 0 +}; +#define YYFLAG -1000 +#define YYERROR goto yyerrlab +#define YYACCEPT return(0) +#define YYABORT return(1) +#define yyclearin yychar = -1 +#define yyerrok yyerrflag = 0 + +#ifdef yydebug +#include "y.debug" +#else +#define yydebug 0 +char* yytoknames[1]; /* for debugging */ +char* yystates[1]; /* for debugging */ +#endif + +/* parser for yacc output */ + +int yynerrs = 0; /* number of errors */ +int yyerrflag = 0; /* error recovery flag */ + +char* +yytokname(int yyc) +{ + static char x[16]; + + if(yyc > 0 && yyc <= sizeof(yytoknames)/sizeof(yytoknames[0])) + if(yytoknames[yyc-1]) + return yytoknames[yyc-1]; + sprintf(x, "<%d>", yyc); + return x; +} + +char* +yystatname(int yys) +{ + static char x[16]; + + if(yys >= 0 && yys < sizeof(yystates)/sizeof(yystates[0])) + if(yystates[yys]) + return yystates[yys]; + sprintf(x, "<%d>\n", yys); + return x; +} + +long +yylex1(void) +{ + long yychar; + long *t3p; + int c; + + yychar = yylex(); + if(yychar <= 0) { + c = yytok1[0]; + goto out; + } + if(yychar < sizeof(yytok1)/sizeof(yytok1[0])) { + c = yytok1[yychar]; + goto out; + } + if(yychar >= YYPRIVATE) + if(yychar < YYPRIVATE+sizeof(yytok2)/sizeof(yytok2[0])) { + c = yytok2[yychar-YYPRIVATE]; + goto out; + } + for(t3p=yytok3;; t3p+=2) { + c = t3p[0]; + if(c == yychar) { + c = t3p[1]; + goto out; + } + if(c == 0) + break; + } + c = 0; + +out: + if(c == 0) + c = yytok2[1]; /* unknown char */ + if(yydebug >= 3) + printf("lex %.4lX %s\n", yychar, yytokname(c)); + return c; +} + +int +yyparse(void) +{ + struct + { + YYSTYPE yyv; + int yys; + } yys[YYMAXDEPTH], *yyp, *yypt; + short *yyxi; + int yyj, yym, yystate, yyn, yyg; + YYSTYPE save1, save2; + int save3, save4; + long yychar; + + save1 = yylval; + save2 = yyval; + save3 = yynerrs; + save4 = yyerrflag; + + yystate = 0; + yychar = -1; + yynerrs = 0; + yyerrflag = 0; + yyp = &yys[-1]; + goto yystack; + +ret0: + yyn = 0; + goto ret; + +ret1: + yyn = 1; + goto ret; + +ret: + yylval = save1; + yyval = save2; + yynerrs = save3; + yyerrflag = save4; + return yyn; + +yystack: + /* put a state and value onto the stack */ + if(yydebug >= 4) + printf("char %s in %s", yytokname(yychar), yystatname(yystate)); + + yyp++; + if(yyp >= &yys[YYMAXDEPTH]) { + yyerror("yacc stack overflow"); + goto ret1; + } + yyp->yys = yystate; + yyp->yyv = yyval; + +yynewstate: + yyn = yypact[yystate]; + if(yyn <= YYFLAG) + goto yydefault; /* simple state */ + if(yychar < 0) + yychar = yylex1(); + yyn += yychar; + if(yyn < 0 || yyn >= YYLAST) + goto yydefault; + yyn = yyact[yyn]; + if(yychk[yyn] == yychar) { /* valid shift */ + yychar = -1; + yyval = yylval; + yystate = yyn; + if(yyerrflag > 0) + yyerrflag--; + goto yystack; + } + +yydefault: + /* default state action */ + yyn = yydef[yystate]; + if(yyn == -2) { + if(yychar < 0) + yychar = yylex1(); + + /* look through exception table */ + for(yyxi=yyexca;; yyxi+=2) + if(yyxi[0] == -1 && yyxi[1] == yystate) + break; + for(yyxi += 2;; yyxi += 2) { + yyn = yyxi[0]; + if(yyn < 0 || yyn == yychar) + break; + } + yyn = yyxi[1]; + if(yyn < 0) + goto ret0; + } + if(yyn == 0) { + /* error ... attempt to resume parsing */ + switch(yyerrflag) { + case 0: /* brand new error */ + yyerror("syntax error"); + if(yydebug >= 1) { + printf("%s", yystatname(yystate)); + printf("saw %s\n", yytokname(yychar)); + } +yyerrlab: + yynerrs++; + + case 1: + case 2: /* incompletely recovered error ... try again */ + yyerrflag = 3; + + /* find a state where "error" is a legal shift action */ + while(yyp >= yys) { + yyn = yypact[yyp->yys] + YYERRCODE; + if(yyn >= 0 && yyn < YYLAST) { + yystate = yyact[yyn]; /* simulate a shift of "error" */ + if(yychk[yystate] == YYERRCODE) + goto yystack; + } + + /* the current yyp has no shift onn "error", pop stack */ + if(yydebug >= 2) + printf("error recovery pops state %d, uncovers %d\n", + yyp->yys, (yyp-1)->yys ); + yyp--; + } + /* there is no state on the stack with an error shift ... abort */ + goto ret1; + + case 3: /* no shift yet; clobber input char */ + if(yydebug >= YYEOFCODE) + printf("error recovery discards %s\n", yytokname(yychar)); + if(yychar == YYEOFCODE) + goto ret1; + yychar = -1; + goto yynewstate; /* try again in the same state */ + } + } + + /* reduction by production yyn */ + if(yydebug >= 2) + printf("reduce %d in:\n\t%s", yyn, yystatname(yystate)); + + yypt = yyp; + yyp -= yyr2[yyn]; + yyval = (yyp+1)->yyv; + yym = yyn; + + /* consult goto table to find next state */ + yyn = yyr1[yyn]; + yyg = yypgo[yyn]; + yyj = yyg + yyp->yys + 1; + + if(yyj >= YYLAST || yychk[yystate=yyact[yyj]] != -yyn) + yystate = yyact[yyg]; + switch(yym) { + +case 1: +#line 100 "/sys/src/cmd/awk/awkgram.y" +{ if (errorflag==0) + winner = (Node *)stat3(PROGRAM, beginloc, yypt[-0].yyv.p, endloc); } break; +case 2: +#line 102 "/sys/src/cmd/awk/awkgram.y" +{ yyclearin; bracecheck(); SYNTAX("bailing out"); } break; +case 13: +#line 126 "/sys/src/cmd/awk/awkgram.y" +{inloop++;} break; +case 14: +#line 127 "/sys/src/cmd/awk/awkgram.y" +{ --inloop; yyval.p = stat4(FOR, yypt[-9].yyv.p, notnull(yypt[-6].yyv.p), yypt[-3].yyv.p, yypt[-0].yyv.p); } break; +case 15: +#line 128 "/sys/src/cmd/awk/awkgram.y" +{inloop++;} break; +case 16: +#line 129 "/sys/src/cmd/awk/awkgram.y" +{ --inloop; yyval.p = stat4(FOR, yypt[-7].yyv.p, NIL, yypt[-3].yyv.p, yypt[-0].yyv.p); } break; +case 17: +#line 130 "/sys/src/cmd/awk/awkgram.y" +{inloop++;} break; +case 18: +#line 131 "/sys/src/cmd/awk/awkgram.y" +{ --inloop; yyval.p = stat3(IN, yypt[-5].yyv.p, makearr(yypt[-3].yyv.p), yypt[-0].yyv.p); } break; +case 19: +#line 135 "/sys/src/cmd/awk/awkgram.y" +{ setfname(yypt[-0].yyv.cp); } break; +case 20: +#line 136 "/sys/src/cmd/awk/awkgram.y" +{ setfname(yypt[-0].yyv.cp); } break; +case 21: +#line 140 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = notnull(yypt[-1].yyv.p); } break; +case 26: +#line 152 "/sys/src/cmd/awk/awkgram.y" +{ yyval.i = 0; } break; +case 28: +#line 157 "/sys/src/cmd/awk/awkgram.y" +{ yyval.i = 0; } break; +case 30: +#line 163 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = 0; } break; +case 32: +#line 168 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = 0; } break; +case 33: +#line 169 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = yypt[-1].yyv.p; } break; +case 34: +#line 173 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = notnull(yypt[-0].yyv.p); } break; +case 35: +#line 177 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = stat2(PASTAT, yypt[-0].yyv.p, stat2(PRINT, rectonode(), NIL)); } break; +case 36: +#line 178 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = stat2(PASTAT, yypt[-3].yyv.p, yypt[-1].yyv.p); } break; +case 37: +#line 179 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = pa2stat(yypt[-2].yyv.p, yypt[-0].yyv.p, stat2(PRINT, rectonode(), NIL)); } break; +case 38: +#line 180 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = pa2stat(yypt[-5].yyv.p, yypt[-3].yyv.p, yypt[-1].yyv.p); } break; +case 39: +#line 181 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = stat2(PASTAT, NIL, yypt[-1].yyv.p); } break; +case 40: +#line 183 "/sys/src/cmd/awk/awkgram.y" +{ beginloc = linkum(beginloc, yypt[-1].yyv.p); yyval.p = 0; } break; +case 41: +#line 185 "/sys/src/cmd/awk/awkgram.y" +{ endloc = linkum(endloc, yypt[-1].yyv.p); yyval.p = 0; } break; +case 42: +#line 186 "/sys/src/cmd/awk/awkgram.y" +{infunc++;} break; +case 43: +#line 187 "/sys/src/cmd/awk/awkgram.y" +{ infunc--; curfname=0; defn((Cell *)yypt[-7].yyv.p, yypt[-5].yyv.p, yypt[-1].yyv.p); yyval.p = 0; } break; +case 45: +#line 192 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = linkum(yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 47: +#line 197 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = linkum(yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 48: +#line 201 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 49: +#line 203 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op3(CONDEXPR, notnull(yypt[-4].yyv.p), yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 50: +#line 205 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(BOR, notnull(yypt[-2].yyv.p), notnull(yypt[-0].yyv.p)); } break; +case 51: +#line 207 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(AND, notnull(yypt[-2].yyv.p), notnull(yypt[-0].yyv.p)); } break; +case 52: +#line 208 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op3(yypt[-1].yyv.i, NIL, yypt[-2].yyv.p, (Node*)makedfa(yypt[-0].yyv.s, 0)); } break; +case 53: +#line 210 "/sys/src/cmd/awk/awkgram.y" +{ if (constnode(yypt[-0].yyv.p)) + yyval.p = op3(yypt[-1].yyv.i, NIL, yypt[-2].yyv.p, (Node*)makedfa(strnode(yypt[-0].yyv.p), 0)); + else + yyval.p = op3(yypt[-1].yyv.i, (Node *)1, yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 54: +#line 214 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(INTEST, yypt[-2].yyv.p, makearr(yypt[-0].yyv.p)); } break; +case 55: +#line 215 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(INTEST, yypt[-3].yyv.p, makearr(yypt[-0].yyv.p)); } break; +case 56: +#line 216 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(CAT, yypt[-1].yyv.p, yypt[-0].yyv.p); } break; +case 59: +#line 222 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 60: +#line 224 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op3(CONDEXPR, notnull(yypt[-4].yyv.p), yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 61: +#line 226 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(BOR, notnull(yypt[-2].yyv.p), notnull(yypt[-0].yyv.p)); } break; +case 62: +#line 228 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(AND, notnull(yypt[-2].yyv.p), notnull(yypt[-0].yyv.p)); } break; +case 63: +#line 229 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 64: +#line 230 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 65: +#line 231 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 66: +#line 232 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 67: +#line 233 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 68: +#line 234 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(yypt[-1].yyv.i, yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 69: +#line 235 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op3(yypt[-1].yyv.i, NIL, yypt[-2].yyv.p, (Node*)makedfa(yypt[-0].yyv.s, 0)); } break; +case 70: +#line 237 "/sys/src/cmd/awk/awkgram.y" +{ if (constnode(yypt[-0].yyv.p)) + yyval.p = op3(yypt[-1].yyv.i, NIL, yypt[-2].yyv.p, (Node*)makedfa(strnode(yypt[-0].yyv.p), 0)); + else + yyval.p = op3(yypt[-1].yyv.i, (Node *)1, yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 71: +#line 241 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(INTEST, yypt[-2].yyv.p, makearr(yypt[-0].yyv.p)); } break; +case 72: +#line 242 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(INTEST, yypt[-3].yyv.p, makearr(yypt[-0].yyv.p)); } break; +case 73: +#line 243 "/sys/src/cmd/awk/awkgram.y" +{ + if (safe) SYNTAX("cmd | getline is unsafe"); + else yyval.p = op3(GETLINE, yypt[-0].yyv.p, itonp(yypt[-2].yyv.i), yypt[-3].yyv.p); } break; +case 74: +#line 246 "/sys/src/cmd/awk/awkgram.y" +{ + if (safe) SYNTAX("cmd | getline is unsafe"); + else yyval.p = op3(GETLINE, (Node*)0, itonp(yypt[-1].yyv.i), yypt[-2].yyv.p); } break; +case 75: +#line 249 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(CAT, yypt[-1].yyv.p, yypt[-0].yyv.p); } break; +case 78: +#line 255 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = linkum(yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 79: +#line 256 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = linkum(yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 81: +#line 261 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = linkum(yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 82: +#line 265 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = rectonode(); } break; +case 84: +#line 267 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = yypt[-1].yyv.p; } break; +case 93: +#line 284 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op3(MATCH, NIL, rectonode(), (Node*)makedfa(yypt[-0].yyv.s, 0)); } break; +case 94: +#line 285 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op1(NOT, notnull(yypt[-0].yyv.p)); } break; +case 95: +#line 289 "/sys/src/cmd/awk/awkgram.y" +{startreg();} break; +case 96: +#line 289 "/sys/src/cmd/awk/awkgram.y" +{ yyval.s = yypt[-1].yyv.s; } break; +case 99: +#line 297 "/sys/src/cmd/awk/awkgram.y" +{ + if (safe) SYNTAX("print | is unsafe"); + else yyval.p = stat3(yypt[-3].yyv.i, yypt[-2].yyv.p, itonp(yypt[-1].yyv.i), yypt[-0].yyv.p); } break; +case 100: +#line 300 "/sys/src/cmd/awk/awkgram.y" +{ + if (safe) SYNTAX("print >> is unsafe"); + else yyval.p = stat3(yypt[-3].yyv.i, yypt[-2].yyv.p, itonp(yypt[-1].yyv.i), yypt[-0].yyv.p); } break; +case 101: +#line 303 "/sys/src/cmd/awk/awkgram.y" +{ + if (safe) SYNTAX("print > is unsafe"); + else yyval.p = stat3(yypt[-3].yyv.i, yypt[-2].yyv.p, itonp(yypt[-1].yyv.i), yypt[-0].yyv.p); } break; +case 102: +#line 306 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = stat3(yypt[-1].yyv.i, yypt[-0].yyv.p, NIL, NIL); } break; +case 103: +#line 307 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = stat2(DELETE, makearr(yypt[-3].yyv.p), yypt[-1].yyv.p); } break; +case 104: +#line 308 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = stat2(DELETE, makearr(yypt[-0].yyv.p), 0); } break; +case 105: +#line 309 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = exptostat(yypt[-0].yyv.p); } break; +case 106: +#line 310 "/sys/src/cmd/awk/awkgram.y" +{ yyclearin; SYNTAX("illegal statement"); } break; +case 109: +#line 319 "/sys/src/cmd/awk/awkgram.y" +{ if (!inloop) SYNTAX("break illegal outside of loops"); + yyval.p = stat1(BREAK, NIL); } break; +case 110: +#line 321 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = stat1(CLOSE, yypt[-1].yyv.p); } break; +case 111: +#line 322 "/sys/src/cmd/awk/awkgram.y" +{ if (!inloop) SYNTAX("continue illegal outside of loops"); + yyval.p = stat1(CONTINUE, NIL); } break; +case 112: +#line 324 "/sys/src/cmd/awk/awkgram.y" +{inloop++;} break; +case 113: +#line 324 "/sys/src/cmd/awk/awkgram.y" +{--inloop;} break; +case 114: +#line 325 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = stat2(DO, yypt[-6].yyv.p, notnull(yypt[-2].yyv.p)); } break; +case 115: +#line 326 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = stat1(EXIT, yypt[-1].yyv.p); } break; +case 116: +#line 327 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = stat1(EXIT, NIL); } break; +case 118: +#line 329 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = stat3(IF, yypt[-3].yyv.p, yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 119: +#line 330 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = stat3(IF, yypt[-1].yyv.p, yypt[-0].yyv.p, NIL); } break; +case 120: +#line 331 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = yypt[-1].yyv.p; } break; +case 121: +#line 332 "/sys/src/cmd/awk/awkgram.y" +{ if (infunc) + SYNTAX("next is illegal inside a function"); + yyval.p = stat1(NEXT, NIL); } break; +case 122: +#line 335 "/sys/src/cmd/awk/awkgram.y" +{ if (infunc) + SYNTAX("nextfile is illegal inside a function"); + yyval.p = stat1(NEXTFILE, NIL); } break; +case 123: +#line 338 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = stat1(RETURN, yypt[-1].yyv.p); } break; +case 124: +#line 339 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = stat1(RETURN, NIL); } break; +case 126: +#line 341 "/sys/src/cmd/awk/awkgram.y" +{inloop++;} break; +case 127: +#line 341 "/sys/src/cmd/awk/awkgram.y" +{ --inloop; yyval.p = stat2(WHILE, yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 128: +#line 342 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = 0; } break; +case 130: +#line 347 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = linkum(yypt[-1].yyv.p, yypt[-0].yyv.p); } break; +case 133: +#line 355 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(DIVEQ, yypt[-3].yyv.p, yypt[-0].yyv.p); } break; +case 134: +#line 356 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(ADD, yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 135: +#line 357 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(MINUS, yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 136: +#line 358 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(MULT, yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 137: +#line 359 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(DIVIDE, yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 138: +#line 360 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(MOD, yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 139: +#line 361 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(POWER, yypt[-2].yyv.p, yypt[-0].yyv.p); } break; +case 140: +#line 362 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op1(UMINUS, yypt[-0].yyv.p); } break; +case 141: +#line 363 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = yypt[-0].yyv.p; } break; +case 142: +#line 364 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op1(NOT, notnull(yypt[-0].yyv.p)); } break; +case 143: +#line 365 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(BLTIN, itonp(yypt[-2].yyv.i), rectonode()); } break; +case 144: +#line 366 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(BLTIN, itonp(yypt[-3].yyv.i), yypt[-1].yyv.p); } break; +case 145: +#line 367 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(BLTIN, itonp(yypt[-0].yyv.i), rectonode()); } break; +case 146: +#line 368 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(CALL, celltonode(yypt[-2].yyv.cp,CVAR), NIL); } break; +case 147: +#line 369 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(CALL, celltonode(yypt[-3].yyv.cp,CVAR), yypt[-1].yyv.p); } break; +case 148: +#line 370 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op1(PREDECR, yypt[-0].yyv.p); } break; +case 149: +#line 371 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op1(PREINCR, yypt[-0].yyv.p); } break; +case 150: +#line 372 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op1(POSTDECR, yypt[-1].yyv.p); } break; +case 151: +#line 373 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op1(POSTINCR, yypt[-1].yyv.p); } break; +case 152: +#line 374 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op3(GETLINE, yypt[-2].yyv.p, itonp(yypt[-1].yyv.i), yypt[-0].yyv.p); } break; +case 153: +#line 375 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op3(GETLINE, NIL, itonp(yypt[-1].yyv.i), yypt[-0].yyv.p); } break; +case 154: +#line 376 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op3(GETLINE, yypt[-0].yyv.p, NIL, NIL); } break; +case 155: +#line 377 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op3(GETLINE, NIL, NIL, NIL); } break; +case 156: +#line 379 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(INDEX, yypt[-3].yyv.p, yypt[-1].yyv.p); } break; +case 157: +#line 381 "/sys/src/cmd/awk/awkgram.y" +{ SYNTAX("index() doesn't permit regular expressions"); + yyval.p = op2(INDEX, yypt[-3].yyv.p, (Node*)yypt[-1].yyv.s); } break; +case 158: +#line 383 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = yypt[-1].yyv.p; } break; +case 159: +#line 385 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op3(MATCHFCN, NIL, yypt[-3].yyv.p, (Node*)makedfa(yypt[-1].yyv.s, 1)); } break; +case 160: +#line 387 "/sys/src/cmd/awk/awkgram.y" +{ if (constnode(yypt[-1].yyv.p)) + yyval.p = op3(MATCHFCN, NIL, yypt[-3].yyv.p, (Node*)makedfa(strnode(yypt[-1].yyv.p), 1)); + else + yyval.p = op3(MATCHFCN, (Node *)1, yypt[-3].yyv.p, yypt[-1].yyv.p); } break; +case 161: +#line 391 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = celltonode(yypt[-0].yyv.cp, CCON); } break; +case 162: +#line 393 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op4(SPLIT, yypt[-5].yyv.p, makearr(yypt[-3].yyv.p), yypt[-1].yyv.p, (Node*)STRING); } break; +case 163: +#line 395 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op4(SPLIT, yypt[-5].yyv.p, makearr(yypt[-3].yyv.p), (Node*)makedfa(yypt[-1].yyv.s, 1), (Node *)REGEXPR); } break; +case 164: +#line 397 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op4(SPLIT, yypt[-3].yyv.p, makearr(yypt[-1].yyv.p), NIL, (Node*)STRING); } break; +case 165: +#line 398 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op1(yypt[-3].yyv.i, yypt[-1].yyv.p); } break; +case 166: +#line 399 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = celltonode(yypt[-0].yyv.cp, CCON); } break; +case 167: +#line 401 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op4(yypt[-5].yyv.i, NIL, (Node*)makedfa(yypt[-3].yyv.s, 1), yypt[-1].yyv.p, rectonode()); } break; +case 168: +#line 403 "/sys/src/cmd/awk/awkgram.y" +{ if (constnode(yypt[-3].yyv.p)) + yyval.p = op4(yypt[-5].yyv.i, NIL, (Node*)makedfa(strnode(yypt[-3].yyv.p), 1), yypt[-1].yyv.p, rectonode()); + else + yyval.p = op4(yypt[-5].yyv.i, (Node *)1, yypt[-3].yyv.p, yypt[-1].yyv.p, rectonode()); } break; +case 169: +#line 408 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op4(yypt[-7].yyv.i, NIL, (Node*)makedfa(yypt[-5].yyv.s, 1), yypt[-3].yyv.p, yypt[-1].yyv.p); } break; +case 170: +#line 410 "/sys/src/cmd/awk/awkgram.y" +{ if (constnode(yypt[-5].yyv.p)) + yyval.p = op4(yypt[-7].yyv.i, NIL, (Node*)makedfa(strnode(yypt[-5].yyv.p), 1), yypt[-3].yyv.p, yypt[-1].yyv.p); + else + yyval.p = op4(yypt[-7].yyv.i, (Node *)1, yypt[-5].yyv.p, yypt[-3].yyv.p, yypt[-1].yyv.p); } break; +case 171: +#line 415 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op3(SUBSTR, yypt[-5].yyv.p, yypt[-3].yyv.p, yypt[-1].yyv.p); } break; +case 172: +#line 417 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op3(SUBSTR, yypt[-3].yyv.p, yypt[-1].yyv.p, NIL); } break; +case 175: +#line 423 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op2(ARRAY, makearr(yypt[-3].yyv.p), yypt[-1].yyv.p); } break; +case 176: +#line 424 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op1(INDIRECT, celltonode(yypt[-0].yyv.cp, CVAR)); } break; +case 177: +#line 425 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op1(INDIRECT, yypt[-0].yyv.p); } break; +case 178: +#line 429 "/sys/src/cmd/awk/awkgram.y" +{ arglist = yyval.p = 0; } break; +case 179: +#line 430 "/sys/src/cmd/awk/awkgram.y" +{ arglist = yyval.p = celltonode(yypt[-0].yyv.cp,CVAR); } break; +case 180: +#line 431 "/sys/src/cmd/awk/awkgram.y" +{ + checkdup(yypt[-2].yyv.p, yypt[-0].yyv.cp); + arglist = yyval.p = linkum(yypt[-2].yyv.p,celltonode(yypt[-0].yyv.cp,CVAR)); } break; +case 181: +#line 437 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = celltonode(yypt[-0].yyv.cp, CVAR); } break; +case 182: +#line 438 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op1(ARG, itonp(yypt[-0].yyv.i)); } break; +case 183: +#line 439 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = op1(VARNF, (Node *) yypt[-0].yyv.cp); } break; +case 184: +#line 444 "/sys/src/cmd/awk/awkgram.y" +{ yyval.p = notnull(yypt[-1].yyv.p); } break; + } + goto yystack; /* stack new state and value */ +} --- /sys/src/cmd/jpg/rgbv.h Thu Jan 1 01:00:00 1970 +++ /sys/src/cmd/jpg/rgbv.h Fri Sep 20 00:32:28 2013 @@ -0,0 +1,294 @@ +uint rgbmap[256] = { + 0x000000, 0x000044, 0x000088, 0x0000CC, 0x004400, 0x004444, 0x004488, 0x0044CC, + 0x008800, 0x008844, 0x008888, 0x0088CC, 0x00CC00, 0x00CC44, 0x00CC88, 0x00CCCC, + 0x00DDDD, 0x111111, 0x000055, 0x000099, 0x0000DD, 0x005500, 0x005555, 0x004C99, + 0x0049DD, 0x009900, 0x00994C, 0x009999, 0x0093DD, 0x00DD00, 0x00DD49, 0x00DD93, + 0x00EE9E, 0x00EEEE, 0x222222, 0x000066, 0x0000AA, 0x0000EE, 0x006600, 0x006666, + 0x0055AA, 0x004FEE, 0x00AA00, 0x00AA55, 0x00AAAA, 0x009EEE, 0x00EE00, 0x00EE4F, + 0x00FF55, 0x00FFAA, 0x00FFFF, 0x333333, 0x000077, 0x0000BB, 0x0000FF, 0x007700, + 0x007777, 0x005DBB, 0x0055FF, 0x00BB00, 0x00BB5D, 0x00BBBB, 0x00AAFF, 0x00FF00, + 0x440044, 0x440088, 0x4400CC, 0x444400, 0x444444, 0x444488, 0x4444CC, 0x448800, + 0x448844, 0x448888, 0x4488CC, 0x44CC00, 0x44CC44, 0x44CC88, 0x44CCCC, 0x440000, + 0x550000, 0x550055, 0x4C0099, 0x4900DD, 0x555500, 0x555555, 0x4C4C99, 0x4949DD, + 0x4C9900, 0x4C994C, 0x4C9999, 0x4993DD, 0x49DD00, 0x49DD49, 0x49DD93, 0x49DDDD, + 0x4FEEEE, 0x660000, 0x660066, 0x5500AA, 0x4F00EE, 0x666600, 0x666666, 0x5555AA, + 0x4F4FEE, 0x55AA00, 0x55AA55, 0x55AAAA, 0x4F9EEE, 0x4FEE00, 0x4FEE4F, 0x4FEE9E, + 0x55FFAA, 0x55FFFF, 0x770000, 0x770077, 0x5D00BB, 0x5500FF, 0x777700, 0x777777, + 0x5D5DBB, 0x5555FF, 0x5DBB00, 0x5DBB5D, 0x5DBBBB, 0x55AAFF, 0x55FF00, 0x55FF55, + 0x880088, 0x8800CC, 0x884400, 0x884444, 0x884488, 0x8844CC, 0x888800, 0x888844, + 0x888888, 0x8888CC, 0x88CC00, 0x88CC44, 0x88CC88, 0x88CCCC, 0x880000, 0x880044, + 0x99004C, 0x990099, 0x9300DD, 0x994C00, 0x994C4C, 0x994C99, 0x9349DD, 0x999900, + 0x99994C, 0x999999, 0x9393DD, 0x93DD00, 0x93DD49, 0x93DD93, 0x93DDDD, 0x990000, + 0xAA0000, 0xAA0055, 0xAA00AA, 0x9E00EE, 0xAA5500, 0xAA5555, 0xAA55AA, 0x9E4FEE, + 0xAAAA00, 0xAAAA55, 0xAAAAAA, 0x9E9EEE, 0x9EEE00, 0x9EEE4F, 0x9EEE9E, 0x9EEEEE, + 0xAAFFFF, 0xBB0000, 0xBB005D, 0xBB00BB, 0xAA00FF, 0xBB5D00, 0xBB5D5D, 0xBB5DBB, + 0xAA55FF, 0xBBBB00, 0xBBBB5D, 0xBBBBBB, 0xAAAAFF, 0xAAFF00, 0xAAFF55, 0xAAFFAA, + 0xCC00CC, 0xCC4400, 0xCC4444, 0xCC4488, 0xCC44CC, 0xCC8800, 0xCC8844, 0xCC8888, + 0xCC88CC, 0xCCCC00, 0xCCCC44, 0xCCCC88, 0xCCCCCC, 0xCC0000, 0xCC0044, 0xCC0088, + 0xDD0093, 0xDD00DD, 0xDD4900, 0xDD4949, 0xDD4993, 0xDD49DD, 0xDD9300, 0xDD9349, + 0xDD9393, 0xDD93DD, 0xDDDD00, 0xDDDD49, 0xDDDD93, 0xDDDDDD, 0xDD0000, 0xDD0049, + 0xEE004F, 0xEE009E, 0xEE00EE, 0xEE4F00, 0xEE4F4F, 0xEE4F9E, 0xEE4FEE, 0xEE9E00, + 0xEE9E4F, 0xEE9E9E, 0xEE9EEE, 0xEEEE00, 0xEEEE4F, 0xEEEE9E, 0xEEEEEE, 0xEE0000, + 0xFF0000, 0xFF0055, 0xFF00AA, 0xFF00FF, 0xFF5500, 0xFF5555, 0xFF55AA, 0xFF55FF, + 0xFFAA00, 0xFFAA55, 0xFFAAAA, 0xFFAAFF, 0xFFFF00, 0xFFFF55, 0xFFFFAA, 0xFFFFFF, +}; + +uchar closestrgb[16*16*16] = { + 0,17,17,1,1,18,35,52,2,19,36,53,3,20,37,54, + 17,17,17,1,1,18,35,52,2,19,36,53,3,20,37,54, + 17,17,34,5,5,5,35,6,6,6,23,7,7,7,24,41, + 4,4,5,5,5,5,6,6,6,6,23,7,7,7,24,41, + 4,4,5,5,5,22,22,6,6,23,40,40,7,24,41,41, + 21,21,5,5,22,22,39,39,6,23,40,57,57,24,41,58, + 38,38,38,9,22,39,39,56,56,40,40,57,57,57,41,58, + 55,55,9,9,9,39,56,56,10,10,57,11,11,11,28,58, + 8,8,9,9,9,9,56,10,10,10,27,11,11,11,28,45, + 25,25,9,9,26,26,43,10,10,27,27,44,11,28,45,45, + 42,42,26,26,43,43,43,60,27,27,44,44,61,28,45,62, + 59,59,13,13,43,60,60,14,14,44,44,61,61,15,45,62, + 12,12,13,13,13,60,60,14,14,14,61,61,15,15,16,62, + 29,29,13,13,30,30,60,14,14,31,31,15,15,16,16,33, + 46,46,30,30,47,47,47,31,31,32,32,32,16,16,33,33, + 63,63,47,47,47,48,48,48,32,32,49,49,49,33,33,50, + 17,17,17,1,1,18,35,52,2,19,36,53,3,20,37,54, + 17,17,34,34,1,18,35,52,2,19,36,53,3,20,37,54, + 17,34,34,34,51,5,35,6,6,6,23,7,7,7,24,41, + 4,34,34,51,5,5,6,6,6,6,23,7,7,7,24,41, + 4,4,51,5,5,22,22,6,6,23,40,40,7,24,41,41, + 21,21,5,5,22,22,39,39,6,23,40,57,57,24,41,58, + 38,38,38,9,22,39,39,56,56,40,40,57,57,57,41,58, + 55,55,9,9,9,39,56,56,10,10,57,11,11,11,28,58, + 8,8,9,9,9,9,56,10,10,10,27,11,11,11,28,45, + 25,25,9,9,26,26,43,10,10,27,27,44,11,28,45,45, + 42,42,26,26,43,43,43,60,27,27,44,44,61,28,45,62, + 59,59,13,13,43,60,60,14,14,44,44,61,61,15,45,62, + 12,12,13,13,13,60,60,14,14,14,61,61,15,15,16,62, + 29,29,13,13,30,30,60,14,14,31,31,15,15,16,16,33, + 46,46,30,30,47,47,47,31,31,32,32,32,16,16,33,33, + 63,63,47,47,47,48,48,48,32,32,49,49,49,33,33,50, + 17,17,34,64,64,64,35,65,65,65,82,66,66,66,83,100, + 17,34,34,34,51,64,35,65,65,65,82,66,66,66,83,100, + 34,34,34,51,51,51,69,69,69,69,69,70,70,70,87,87, + 67,34,51,51,51,68,69,69,69,69,86,70,70,70,87,87, + 67,51,51,51,68,68,69,69,69,69,86,70,70,70,87,104, + 67,67,51,68,68,68,39,69,69,69,40,70,70,70,87,58, + 38,38,72,72,72,39,39,56,73,73,40,57,74,74,87,58, + 71,71,72,72,72,72,56,73,73,73,73,74,74,74,74,91, + 71,71,72,72,72,72,73,73,73,73,73,74,74,74,91,91, + 71,71,72,72,72,72,73,73,73,73,90,74,74,91,91,108, + 88,88,72,89,89,43,43,73,73,90,44,44,74,91,91,62, + 75,75,76,76,76,76,60,77,77,77,44,78,78,78,78,62, + 75,75,76,76,76,76,77,77,77,77,77,78,78,78,78,95, + 75,75,76,76,76,76,77,77,77,94,94,78,78,78,95,95, + 92,92,93,93,93,93,93,77,94,94,94,78,78,95,95,96, + 109,109,93,93,110,48,48,94,94,111,49,49,95,95,96,50, + 79,79,64,64,64,64,65,65,65,65,82,66,66,66,83,100, + 79,34,34,51,64,64,65,65,65,65,82,66,66,66,83,100, + 67,34,51,51,51,68,69,69,69,69,86,70,70,70,87,87, + 67,51,51,51,68,68,69,69,69,69,86,70,70,70,87,104, + 67,67,51,68,68,68,69,69,69,69,86,70,70,70,87,104, + 67,67,68,68,68,85,85,69,69,86,86,70,70,87,87,104, + 71,71,72,72,72,85,85,73,73,86,103,103,74,87,104,121, + 71,71,72,72,72,72,73,73,73,73,73,74,74,74,91,91, + 71,71,72,72,72,72,73,73,73,73,90,74,74,74,91,108, + 71,71,72,72,72,89,89,73,73,90,90,74,74,91,91,108, + 88,88,89,89,89,89,106,73,90,90,107,107,91,91,108,108, + 75,75,76,76,76,76,106,77,77,77,107,78,78,78,108,125, + 75,75,76,76,76,76,77,77,77,77,94,78,78,78,95,95, + 75,75,76,76,76,93,93,77,77,94,94,78,78,95,95,95, + 92,92,93,93,93,93,110,94,94,94,111,111,95,95,95,96, + 109,109,93,110,110,110,127,94,111,111,111,112,95,95,96,96, + 79,79,64,64,64,81,81,65,65,82,99,99,66,83,100,100, + 79,79,51,64,64,81,81,65,65,82,99,99,66,83,100,100, + 67,51,51,51,68,68,69,69,69,69,86,70,70,70,87,104, + 67,67,51,68,68,68,69,69,69,69,86,70,70,70,87,104, + 67,67,68,68,68,85,85,69,69,86,86,70,70,87,87,104, + 84,84,68,68,85,85,85,69,69,86,103,103,70,87,104,121, + 84,84,72,72,85,85,85,102,73,86,103,120,120,87,104,121, + 71,71,72,72,72,72,102,73,73,73,73,74,74,74,91,121, + 71,71,72,72,72,72,73,73,73,73,90,74,74,91,91,108, + 88,88,72,72,89,89,89,73,73,90,90,74,74,91,108,108, + 105,105,89,89,89,106,106,73,90,90,107,107,91,91,108,125, + 105,105,76,76,76,106,123,77,77,77,107,124,78,78,108,125, + 75,75,76,76,76,76,123,77,77,77,94,78,78,78,95,125, + 92,92,76,76,93,93,93,77,94,94,94,78,78,95,95,96, + 109,109,93,93,93,110,110,94,94,111,111,111,95,95,96,96, + 109,109,110,110,110,127,127,127,111,111,112,112,112,96,96,96, + 80,80,64,64,81,81,98,98,65,82,99,116,116,83,100,117, + 80,80,64,64,81,81,98,98,65,82,99,116,116,83,100,117, + 67,67,51,68,68,68,98,69,69,69,99,70,70,70,87,117, + 67,67,68,68,68,85,85,69,69,86,86,70,70,87,87,104, + 84,84,68,68,85,85,85,69,69,86,103,103,70,87,104,121, + 84,84,68,85,85,85,85,102,86,86,103,120,120,87,104,121, + 101,101,101,85,85,85,102,102,86,103,103,120,120,120,104,121, + 101,101,72,72,72,102,102,102,73,73,120,120,74,74,91,121, + 71,71,72,72,72,89,89,73,73,90,90,74,74,91,91,108, + 88,88,72,89,89,89,106,73,90,90,107,107,74,91,108,108, + 105,105,105,89,106,106,106,123,90,107,107,107,124,108,108,125, + 122,122,76,76,106,123,123,123,77,107,107,124,124,124,125,125, + 122,122,76,76,76,123,123,77,77,77,124,124,124,78,95,125, + 92,92,76,93,93,93,123,77,94,94,111,124,78,95,95,96, + 109,109,93,93,110,110,110,94,94,111,111,112,95,95,96,96, + 126,126,126,110,127,127,127,127,111,111,112,112,112,96,96,113, + 97,97,97,143,81,98,98,115,115,99,99,116,116,116,100,117, + 97,97,97,143,81,98,98,115,115,99,99,116,116,116,100,117, + 97,97,131,131,131,98,98,115,132,132,99,116,133,133,87,117, + 130,130,131,131,131,85,85,132,132,86,103,103,133,87,104,121, + 84,84,131,131,85,85,85,102,132,86,103,120,120,87,104,121, + 101,101,101,85,85,85,102,102,86,103,103,120,120,120,104,121, + 101,101,101,85,85,102,102,102,119,103,120,120,120,120,121,121, + 118,118,118,135,102,102,102,119,119,119,120,120,120,137,91,121, + 118,118,135,135,135,89,119,119,119,90,90,137,137,91,108,108, + 105,105,135,89,89,106,106,119,90,90,107,107,137,91,108,125, + 105,105,105,106,106,106,123,123,90,107,107,124,124,108,108,125, + 122,122,122,106,123,123,123,123,140,107,124,124,124,124,125,125, + 122,122,139,139,123,123,123,123,140,140,124,124,124,124,95,125, + 122,122,139,93,93,123,123,140,94,94,111,124,124,95,95,96, + 109,109,93,110,110,110,127,94,111,111,111,112,95,95,96,96, + 126,126,126,127,127,127,127,127,111,112,112,112,112,96,96,113, + 114,114,143,143,143,98,115,115,128,128,116,129,129,129,146,117, + 114,114,143,143,143,98,115,115,128,128,116,129,129,129,146,117, + 130,130,131,131,131,131,115,132,132,132,132,133,133,133,133,150, + 130,130,131,131,131,131,132,132,132,132,132,133,133,133,150,150, + 130,130,131,131,131,131,102,132,132,132,132,133,133,133,150,121, + 101,101,131,131,131,102,102,102,132,132,120,120,133,133,150,121, + 118,118,118,135,102,102,102,119,119,119,120,120,120,137,150,121, + 118,118,135,135,135,102,119,119,119,136,136,137,137,137,137,154, + 134,134,135,135,135,135,119,119,136,136,136,137,137,137,154,154, + 134,134,135,135,135,135,119,136,136,136,153,137,137,137,154,154, + 122,122,135,135,135,123,123,136,136,153,107,124,124,154,154,125, + 138,138,139,139,139,123,123,140,140,140,124,124,141,141,141,125, + 138,138,139,139,139,139,123,140,140,140,124,141,141,141,141,158, + 138,138,139,139,139,139,140,140,140,140,157,141,141,141,158,158, + 155,155,139,156,156,156,156,140,157,157,157,141,141,158,158,158, + 126,126,156,156,127,127,127,157,157,157,112,112,158,158,158,113, + 142,142,143,143,143,143,115,128,128,128,145,129,129,129,146,163, + 142,142,143,143,143,143,115,128,128,128,145,129,129,129,146,163, + 130,130,131,131,131,131,132,132,132,132,132,133,133,133,150,150, + 130,130,131,131,131,131,132,132,132,132,149,133,133,133,150,167, + 130,130,131,131,131,131,132,132,132,132,149,133,133,150,150,167, + 130,130,131,131,131,148,148,132,132,149,149,133,133,150,150,167, + 118,118,135,135,135,148,119,119,119,149,149,137,137,150,167,167, + 134,134,135,135,135,135,119,119,136,136,136,137,137,137,154,154, + 134,134,135,135,135,135,119,136,136,136,153,137,137,137,154,154, + 134,134,135,135,135,152,152,136,136,153,153,137,137,154,154,171, + 151,151,135,152,152,152,152,136,153,153,153,170,154,154,171,171, + 138,138,139,139,139,139,140,140,140,140,170,141,141,141,141,171, + 138,138,139,139,139,139,140,140,140,140,157,141,141,141,158,158, + 138,138,139,139,156,156,156,140,140,157,157,141,141,158,158,158, + 155,155,156,156,156,156,173,157,157,157,174,141,158,158,158,175, + 172,172,156,173,173,173,173,157,157,174,174,174,158,158,175,175, + 159,159,143,143,144,144,161,128,128,145,145,162,129,146,163,163, + 159,159,143,143,144,144,161,128,128,145,145,162,129,146,163,163, + 130,130,131,131,131,131,132,132,132,132,149,133,133,150,150,167, + 130,130,131,131,131,148,148,132,132,149,149,133,133,150,150,167, + 147,147,131,131,148,148,148,132,132,149,149,133,133,150,167,167, + 147,147,131,148,148,148,165,132,149,149,166,166,133,150,167,167, + 164,164,135,148,148,165,165,119,149,149,166,166,137,150,167,184, + 134,134,135,135,135,135,119,136,136,136,153,137,137,137,154,154, + 134,134,135,135,135,152,152,136,136,153,153,137,137,154,154,171, + 151,151,135,152,152,152,152,136,153,153,153,170,154,154,171,171, + 151,151,152,152,152,169,169,153,153,153,170,170,154,154,171,171, + 168,168,139,139,139,169,169,140,140,170,170,170,141,141,171,188, + 138,138,139,139,139,139,140,140,140,157,157,141,141,141,158,158, + 155,155,156,156,156,156,156,140,157,157,157,141,141,158,158,175, + 172,172,156,156,173,173,173,157,157,174,174,174,158,158,175,175, + 172,172,173,173,173,173,190,157,174,174,174,191,158,175,175,175, + 160,160,144,144,161,161,161,178,145,145,162,162,179,146,163,180, + 160,160,144,144,161,161,161,178,145,145,162,162,179,146,163,180, + 147,147,131,148,148,161,161,132,132,149,162,162,133,150,150,180, + 147,147,148,148,148,148,165,132,149,149,166,166,150,150,167,167, + 164,164,148,148,148,165,165,132,149,149,166,166,150,150,167,184, + 164,164,164,148,165,165,165,182,149,166,166,166,183,167,167,184, + 164,164,164,165,165,165,182,182,149,166,166,183,183,167,167,184, + 181,181,135,135,135,182,182,136,136,153,166,183,183,154,154,184, + 151,151,135,152,152,152,152,136,153,153,153,170,154,154,171,171, + 151,151,152,152,152,169,169,153,153,153,170,170,154,154,171,171, + 168,168,168,169,169,169,169,169,153,170,170,170,187,171,171,188, + 168,168,168,169,169,169,186,186,170,170,170,187,187,187,188,188, + 185,185,139,156,156,186,186,186,157,157,187,187,187,158,158,188, + 155,155,156,156,156,173,173,157,157,157,174,187,158,158,158,175, + 172,172,156,173,173,173,173,157,174,174,174,191,158,158,175,175, + 189,189,189,173,190,190,190,190,174,174,191,191,191,175,175,176, + 177,177,206,206,161,178,178,207,207,162,162,179,179,192,163,180, + 177,177,206,206,161,178,178,207,207,162,162,179,179,192,163,180, + 193,193,194,194,194,194,178,195,195,195,162,196,196,196,196,180, + 193,193,194,194,194,194,165,195,195,195,166,196,196,196,167,184, + 164,164,194,194,194,165,182,195,195,195,166,183,196,196,167,184, + 181,181,194,194,165,182,182,182,195,166,166,183,183,183,184,184, + 181,181,181,165,182,182,182,182,199,166,183,183,183,183,184,184, + 197,197,198,198,198,182,182,199,199,199,183,183,200,200,200,184, + 197,197,198,198,198,198,199,199,199,199,170,200,200,200,200,171, + 168,168,198,198,198,169,169,199,199,170,170,170,200,200,171,188, + 168,168,168,169,169,169,186,186,170,170,170,187,187,187,188,188, + 185,185,202,202,186,186,186,186,203,170,187,187,187,187,188,188, + 185,185,202,202,202,186,186,203,203,203,187,187,187,204,204,188, + 201,201,202,202,202,186,186,203,203,203,187,187,204,204,175,175, + 172,172,202,173,173,190,190,203,203,174,191,191,204,175,175,176, + 189,189,189,190,190,190,190,190,174,191,191,191,191,175,176,176, + 205,205,206,206,206,178,178,207,207,207,179,179,192,192,209,180, + 205,205,206,206,206,178,178,207,207,207,179,179,192,192,209,180, + 193,193,194,194,194,194,195,195,195,195,195,196,196,196,196,213, + 193,193,194,194,194,194,195,195,195,195,212,196,196,196,213,213, + 193,193,194,194,194,194,182,195,195,195,212,196,196,196,213,184, + 181,181,194,194,194,182,182,195,195,195,183,183,183,196,213,184, + 181,181,198,198,182,182,182,182,199,199,183,183,183,183,213,184, + 197,197,198,198,198,198,182,199,199,199,183,200,200,200,200,217, + 197,197,198,198,198,198,199,199,199,199,216,200,200,200,217,217, + 197,197,198,198,198,198,199,199,199,216,216,200,200,200,217,217, + 185,185,198,215,215,186,186,186,216,216,187,187,187,217,217,188, + 185,185,202,202,202,186,186,203,203,203,187,187,187,204,204,188, + 201,201,202,202,202,186,186,203,203,203,187,187,204,204,204,221, + 201,201,202,202,202,202,186,203,203,203,220,204,204,204,221,221, + 218,218,202,219,219,219,219,203,220,220,220,204,204,221,221,221, + 189,189,219,219,190,190,190,220,220,220,191,191,221,221,221,176, + 222,222,206,206,223,223,178,207,207,208,208,192,192,209,209,226, + 222,222,206,206,223,223,178,207,207,208,208,192,192,209,209,226, + 193,193,194,194,194,194,195,195,195,212,212,196,196,196,213,213, + 193,193,194,194,194,211,211,195,195,212,212,196,196,213,213,213, + 210,210,194,194,211,211,211,195,212,212,212,196,196,213,213,230, + 210,210,194,211,211,211,182,195,212,212,229,183,196,213,213,230, + 181,181,198,211,211,182,182,199,212,212,229,183,183,213,213,230, + 197,197,198,198,198,198,199,199,199,199,216,200,200,200,217,217, + 197,197,198,198,215,215,215,199,199,216,216,200,200,217,217,217, + 214,214,215,215,215,215,215,199,216,216,216,200,200,217,217,234, + 214,214,215,215,215,232,232,216,216,216,233,187,217,217,217,234, + 201,201,202,202,202,186,186,203,203,203,187,187,204,204,234,234, + 201,201,202,202,202,202,186,203,203,203,220,204,204,204,221,221, + 218,218,202,219,219,219,219,203,220,220,220,204,204,221,221,221, + 218,218,219,219,219,219,219,220,220,220,220,237,221,221,221,238, + 235,235,219,219,236,236,236,220,220,237,237,237,221,221,238,238, + 239,239,223,223,224,224,224,208,208,225,225,225,209,209,226,226, + 239,239,223,223,224,224,224,208,208,225,225,225,209,209,226,226, + 210,210,211,211,211,211,211,195,212,212,212,196,196,213,213,230, + 210,210,211,211,211,211,228,212,212,212,229,229,213,213,213,230, + 227,227,211,211,211,228,228,212,212,229,229,229,213,213,230,230, + 227,227,211,211,228,228,228,212,212,229,229,246,213,213,230,230, + 227,227,211,228,228,228,245,212,229,229,229,246,213,213,230,230, + 214,214,198,215,215,215,215,199,216,216,216,200,200,217,217,217, + 214,214,215,215,215,215,232,216,216,216,233,200,217,217,217,234, + 231,231,215,215,232,232,232,216,216,233,233,233,217,217,234,234, + 231,231,215,232,232,232,232,216,233,233,233,250,217,217,234,234, + 231,231,202,232,232,249,249,203,203,233,250,250,204,234,234,251, + 218,218,202,219,219,219,219,203,220,220,220,204,204,221,221,221, + 218,218,219,219,219,219,219,220,220,220,220,237,221,221,221,238, + 235,235,219,219,236,236,236,220,220,237,237,237,221,221,238,238, + 235,235,236,236,236,236,236,220,237,237,237,254,221,238,238,238, + 240,240,224,224,224,241,241,241,225,225,242,242,242,226,226,243, + 240,240,224,224,224,241,241,241,225,225,242,242,242,226,226,243, + 227,227,211,211,228,241,241,212,212,229,242,242,213,213,230,243, + 227,227,211,228,228,228,245,212,229,229,229,246,213,213,230,230, + 227,227,228,228,228,245,245,245,229,229,246,246,246,230,230,230, + 244,244,244,228,245,245,245,245,229,229,246,246,246,230,230,247, + 244,244,244,245,245,245,245,245,229,246,246,246,246,230,230,247, + 244,244,215,215,245,245,245,216,216,216,246,246,217,217,217,247, + 231,231,215,232,232,232,232,216,216,233,233,233,217,217,234,234, + 231,231,232,232,232,232,249,216,233,233,233,250,217,234,234,234, + 248,248,248,232,249,249,249,249,233,233,250,250,250,234,234,251, + 248,248,248,249,249,249,249,249,233,250,250,250,250,234,251,251, + 248,248,219,219,249,249,249,220,220,220,250,250,221,221,221,251, + 235,235,219,219,236,236,236,220,220,237,237,237,221,221,238,238, + 235,235,236,236,236,236,236,220,237,237,237,254,221,238,238,238, + 252,252,252,236,236,253,253,253,237,237,254,254,254,238,238,255, +}; + --- /sys/src/cmd/jpg/ycbcr.h Thu Jan 1 01:00:00 1970 +++ /sys/src/cmd/jpg/ycbcr.h Fri Sep 20 00:32:28 2013 @@ -0,0 +1,294 @@ +uint ycbcrmap[256] = { + 0x008080, 0x07A27A, 0x0FC474, 0x17E66F, 0x276963, 0x2F8B5E, 0x37AD58, 0x3FCF52, + 0x4F5247, 0x577441, 0x5F963C, 0x67B836, 0x773C2A, 0x7F5E25, 0x87801F, 0x8FA21A, + 0x9AA511, 0x118080, 0x09AA79, 0x11CC73, 0x19EE6E, 0x31635C, 0x3B8E55, 0x3EB353, + 0x44D64F, 0x594D3F, 0x627339, 0x6B9933, 0x6FBD30, 0x813623, 0x8A5B1D, 0x928017, + 0x9D800F, 0xA6A809, 0x228080, 0x0BB377, 0x13D572, 0x1BF76C, 0x3B5E55, 0x47914D, + 0x45B84E, 0x49DC4B, 0x634738, 0x6D7231, 0x779C2B, 0x77C22A, 0x8B311C, 0x945815, + 0x9F560E, 0xA98007, 0xB2AB00, 0x338080, 0x0DBB76, 0x15DD70, 0x1DFF6B, 0x45584E, + 0x539444, 0x4BBE49, 0x4EE347, 0x6D4231, 0x78702A, 0x839F22, 0x80C724, 0x952B15, + 0x1C969C, 0x23B896, 0x2BDA91, 0x3C5E85, 0x448080, 0x4BA27A, 0x53C474, 0x644769, + 0x6B6963, 0x738B5E, 0x7BAD58, 0x8C304C, 0x935247, 0x9B7441, 0xA3963C, 0x1474A2, + 0x1971AA, 0x239CA3, 0x28BF99, 0x2FE292, 0x4B5586, 0x558080, 0x54A679, 0x59CA73, + 0x704065, 0x79665F, 0x818C59, 0x85B154, 0x972A47, 0x9F4E42, 0xA8733C, 0xB09836, + 0xBE9A30, 0x1E6EB3, 0x2AA1AA, 0x2CC69C, 0x32E994, 0x5A4D88, 0x668080, 0x5EAA79, + 0x61CF73, 0x7D3963, 0x86635C, 0x908E55, 0x8FB551, 0xA32343, 0xAC4B3D, 0xB57237, + 0xC27231, 0xCC9C2B, 0x236BBB, 0x31A7B1, 0x31CD9F, 0x36F195, 0x694489, 0x778080, + 0x67AF78, 0x68D572, 0x893260, 0x946058, 0x9E8F51, 0x9AB84E, 0xAF1D3F, 0xB84738, + 0x38ADB8, 0x3FCFB3, 0x5052A7, 0x5874A2, 0x60969C, 0x67B896, 0x783C8B, 0x805E85, + 0x888080, 0x8FA27A, 0xA0256E, 0xA84769, 0xAF6963, 0xB78B5E, 0x2869C4, 0x308BBE, + 0x368CC6, 0x3FB2C0, 0x45D5B7, 0x5A4DAC, 0x6373A6, 0x6B99A0, 0x6FBD98, 0x87338C, + 0x905986, 0x998080, 0x9BA579, 0xAD1D6C, 0xB64267, 0xBE6761, 0xC68C5B, 0x2D66CC, + 0x3263D5, 0x3C8DCE, 0x46B8C7, 0x4ADCBB, 0x6447B1, 0x6E71AA, 0x789CA3, 0x78C29A, + 0x962B8D, 0xA05586, 0xAA8080, 0xA7A879, 0xBA166B, 0xC33D64, 0xCC655E, 0xD68D58, + 0xE58E55, 0x3760DD, 0x428ED5, 0x4DBDCE, 0x4FE2C0, 0x6E41B6, 0x7970AF, 0x839FA7, + 0x81C69C, 0xA5228F, 0xB05187, 0xBB8080, 0xB3AA79, 0xC80E6A, 0xD23963, 0xDB635C, + 0x54C3D5, 0x6447C9, 0x6C69C4, 0x748BBE, 0x7CADB8, 0x8C30AD, 0x9452A7, 0x9C74A2, + 0xA4969C, 0xB41A90, 0xBC3C8B, 0xC45E85, 0xCC8080, 0x3C5DE6, 0x447FE0, 0x4CA1DA, + 0x52A4E2, 0x5BC9DC, 0x6C42CF, 0x7567CA, 0x7D8CC3, 0x86B1BD, 0x982AB0, 0xA04EAB, + 0xA973A5, 0xB1989E, 0xC31191, 0xCC368C, 0xD45A86, 0xDD8080, 0x425AEE, 0x4A7FE8, + 0x507FF0, 0x59A6EA, 0x62CEE3, 0x753DD5, 0x7E65CF, 0x878CC9, 0x90B4C2, 0xA323B4, + 0xAC4BAE, 0xB572A8, 0xBF9AA1, 0xD20993, 0xDB308C, 0xE45886, 0xEE8080, 0x4757F7, + 0x4C54FF, 0x557FF8, 0x5FA9F1, 0x69D4EA, 0x7E38DB, 0x8763D5, 0x918DCE, 0x9BB8C7, + 0xB01CB8, 0xB947B1, 0xC371AA, 0xCD9CA3, 0xE10094, 0xEB2B8D, 0xF55586, 0xFF8080, +}; + +uchar closestycbcr[16*16*16] = { + 8,55,55,38,21,21,4,4,4,0,79,79,80,114,142,159, + 8,55,38,38,21,4,4,4,4,0,79,79,80,114,142,159, + 55,55,38,21,21,4,4,4,0,0,79,79,80,114,142,159, + 55,38,38,21,4,4,4,4,0,0,79,79,80,114,142,159, + 55,38,21,21,4,4,4,0,0,0,79,79,80,114,142,159, + 38,38,21,4,4,4,4,0,0,0,79,79,80,114,142,159, + 38,21,21,4,4,4,0,0,0,0,79,79,80,114,142,159, + 38,21,4,4,4,4,0,0,0,0,79,79,80,114,142,159, + 21,21,4,4,4,4,0,0,0,0,79,79,80,114,142,159, + 21,4,4,4,4,0,0,0,0,17,79,79,80,114,142,159, + 5,5,5,5,5,1,1,1,1,1,64,64,64,143,143,144, + 22,5,5,5,18,18,18,18,18,18,64,64,81,98,143,144, + 6,6,6,52,52,52,52,52,52,52,65,65,98,115,115,128, + 6,6,6,2,2,2,2,2,2,2,65,65,82,115,128,145, + 23,23,36,36,36,36,36,36,36,36,82,99,99,116,145,162, + 7,7,3,3,3,3,3,3,3,3,66,66,116,116,129,129, + 25,8,8,55,38,38,21,4,4,67,67,80,97,142,159,160, + 25,8,55,55,38,21,21,4,4,67,79,80,97,142,159,160, + 8,8,55,38,38,21,4,4,4,67,79,80,97,142,159,160, + 8,55,55,38,21,21,4,4,4,79,79,80,97,142,159,160, + 8,55,38,38,21,4,4,4,4,79,79,80,97,142,159,160, + 55,55,38,21,21,4,4,4,0,79,79,80,97,142,159,160, + 55,38,38,21,4,4,4,4,0,79,79,80,97,142,159,160, + 55,38,21,21,4,4,4,0,0,79,79,80,97,142,159,160, + 38,38,21,4,4,4,4,17,17,17,79,80,97,142,159,160, + 5,5,5,5,5,5,1,1,17,34,64,64,143,143,143,144, + 22,22,5,5,5,5,1,1,1,64,64,81,81,143,144,161, + 39,22,22,22,5,35,35,35,35,35,81,81,98,115,144,178, + 6,6,6,6,6,2,2,2,2,65,65,65,115,128,128,145, + 23,23,23,23,19,19,19,19,19,65,82,82,99,128,145,162, + 57,7,7,7,53,53,53,53,53,66,66,116,116,129,129,179, + 24,7,7,7,20,20,20,20,20,66,66,83,116,129,146,146, + 42,25,25,8,55,38,38,21,4,67,67,67,114,142,160,177, + 42,25,8,8,55,38,21,21,4,67,67,97,114,142,160,177, + 25,25,8,55,55,38,21,4,4,67,67,97,114,142,160,177, + 25,8,8,55,38,38,21,4,4,67,67,97,114,142,160,177, + 25,8,55,55,38,21,21,4,4,67,80,97,114,142,160,177, + 8,8,55,38,38,21,4,4,4,67,80,97,114,142,160,177, + 8,55,55,38,21,21,4,4,4,79,80,97,114,142,160,177, + 8,55,38,38,21,4,4,4,17,79,80,97,114,142,160,177, + 55,55,38,21,21,4,4,34,34,34,80,97,114,142,160,177, + 9,9,22,5,5,5,5,5,34,64,64,81,143,143,144,206, + 39,39,22,22,22,5,5,18,18,64,81,98,98,144,161,178, + 56,39,39,6,6,6,6,52,52,65,65,98,115,128,178,178, + 23,23,23,6,6,6,19,19,19,65,82,82,128,145,145,207, + 40,40,40,40,23,36,36,36,36,82,99,116,116,145,162,179, + 57,7,7,7,7,3,3,3,3,66,66,116,129,129,179,192, + 41,41,24,24,24,37,37,37,37,83,100,100,146,146,163,192, + 59,42,25,25,8,55,55,38,67,67,84,130,130,159,177,205, + 42,42,25,8,8,55,38,38,67,67,84,130,130,159,177,205, + 42,25,25,8,55,55,38,21,67,67,67,130,130,159,177,205, + 42,25,8,8,55,38,38,21,67,67,67,130,142,159,177,205, + 25,25,8,55,55,38,21,21,67,67,67,114,142,159,177,205, + 25,25,8,55,38,38,21,4,67,67,67,114,142,159,177,205, + 25,8,8,55,38,21,21,4,67,67,80,114,142,159,177,205, + 25,8,55,55,38,21,4,4,34,67,80,114,142,159,177,205, + 9,9,9,9,5,5,5,51,51,51,64,143,143,144,206,206, + 9,9,9,22,22,22,5,5,51,64,81,143,143,144,161,206, + 56,56,39,39,39,22,22,6,69,81,98,98,115,161,178,178, + 10,56,56,6,6,6,6,6,65,65,65,115,128,145,207,207, + 10,40,40,40,23,23,23,19,82,82,99,99,145,145,162,208, + 57,57,57,57,7,7,7,53,66,66,116,116,129,162,179,192, + 11,24,24,24,24,7,7,20,66,83,83,129,146,146,192,192, + 58,58,41,41,41,41,37,37,100,100,117,117,163,163,180,209, + 12,59,42,42,25,8,8,71,71,84,101,130,147,193,193,222, + 59,59,42,25,25,8,55,71,84,84,101,130,147,193,205,222, + 59,42,42,25,8,8,55,71,84,84,84,130,130,193,205,222, + 59,42,25,25,8,55,55,38,84,84,130,130,130,160,205,222, + 42,42,25,8,8,55,38,67,67,84,130,130,130,160,205,222, + 42,25,25,8,55,55,38,67,67,84,130,130,159,160,205,222, + 42,25,8,8,55,38,38,67,67,67,130,130,159,160,205,222, + 25,9,9,9,55,38,21,51,51,68,131,131,159,160,206,222, + 26,9,9,9,9,22,5,68,68,68,131,143,144,161,206,223, + 26,26,9,39,39,22,22,68,68,68,98,143,144,161,178,223, + 10,56,56,56,39,39,6,69,69,69,115,115,128,178,207,207, + 10,10,10,40,23,23,23,69,69,82,128,128,145,162,207,208, + 11,11,57,57,40,40,40,70,70,99,116,129,162,162,179,225, + 11,11,57,57,7,7,7,70,70,66,116,129,146,179,192,209, + 28,41,41,41,41,41,24,87,100,100,100,146,163,163,209,209, + 58,58,58,58,58,58,58,54,117,117,117,163,180,180,180,226, + 29,12,59,59,42,25,71,71,71,101,118,147,164,193,193,210, + 12,12,59,42,42,25,71,71,71,101,101,147,164,193,193,210, + 12,59,59,42,25,25,71,71,101,101,130,147,164,193,193,239, + 12,59,42,42,25,8,71,71,101,101,130,147,147,193,193,239, + 59,59,42,25,25,8,71,71,84,101,130,147,147,193,222,239, + 59,42,42,25,8,8,55,71,84,101,130,130,147,193,222,239, + 59,42,25,25,8,55,55,84,84,84,130,130,147,177,222,239, + 13,26,9,9,9,9,72,68,68,131,131,131,148,206,206,223, + 43,26,26,9,9,9,22,68,85,85,131,131,161,178,223,224, + 43,43,56,56,56,39,39,69,85,85,132,132,178,178,207,224, + 27,10,10,10,56,56,69,69,69,132,132,132,145,207,207,208, + 27,27,27,10,40,40,40,86,86,103,132,145,162,179,208,225, + 11,11,11,57,57,57,70,70,70,133,133,129,179,179,192,242, + 28,28,11,11,41,24,24,87,87,87,129,146,163,192,209,209, + 45,45,58,58,58,58,41,104,104,117,163,163,180,180,226,226, + 62,58,58,58,58,58,58,121,117,117,117,180,180,180,243,243, + 46,29,12,12,59,42,88,88,88,118,134,164,181,193,210,227, + 29,29,12,59,59,42,88,88,88,118,118,164,181,193,210,227, + 29,12,12,59,42,42,71,71,118,118,118,164,181,193,210,227, + 29,12,59,59,42,25,71,71,101,118,147,164,181,193,210,227, + 12,12,59,42,42,25,71,71,101,118,147,164,193,193,210,240, + 12,59,59,42,25,25,71,71,101,101,147,164,193,193,210,240, + 13,13,42,26,9,9,72,72,101,101,131,148,194,194,194,240, + 13,43,43,26,26,9,72,72,85,131,131,148,194,194,223,241, + 60,60,43,26,26,56,72,85,102,102,148,165,194,194,224,241, + 14,27,10,10,10,56,73,102,102,132,132,132,195,207,208,225, + 44,27,27,27,10,10,73,86,103,132,132,149,195,208,225,225, + 44,44,44,11,11,57,103,103,120,133,133,166,179,179,225,242, + 28,28,11,11,11,57,70,87,87,133,133,150,192,192,209,226, + 45,45,28,28,58,41,104,104,104,150,150,163,180,209,226,226, + 62,62,45,58,58,58,121,121,121,121,180,180,180,180,243,243, + 62,62,58,58,58,58,121,121,121,121,180,180,180,180,243,243, + 63,46,29,29,12,75,105,105,105,134,151,197,181,227,244,244, + 46,46,29,12,12,75,105,105,134,134,134,181,181,227,244,244, + 46,29,29,12,59,75,88,88,134,134,134,181,181,210,227,244, + 46,29,12,12,59,88,88,88,118,134,134,181,181,210,227,244, + 29,29,12,59,59,88,88,88,118,134,164,181,181,210,227,244, + 29,12,12,59,42,88,88,88,118,118,164,181,193,210,227,244, + 13,13,13,13,26,72,72,72,135,135,148,165,194,211,228,228, + 30,60,60,43,43,72,72,72,102,135,165,165,194,211,228,241, + 14,60,60,60,43,73,73,102,119,119,165,182,195,195,228,241, + 14,14,27,27,27,73,73,73,119,132,149,195,195,212,225,242, + 61,44,44,44,27,90,90,120,120,149,166,166,212,212,242,242, + 61,61,61,11,11,74,74,120,120,133,133,196,196,196,242,242, + 45,45,28,28,28,74,74,104,104,150,150,167,196,209,226,243, + 62,62,45,45,45,91,121,121,121,167,167,184,180,226,243,243, + 62,62,62,62,58,121,121,121,121,184,184,184,180,243,243,243, + 62,62,62,62,58,121,121,121,121,184,184,180,180,243,243,243, + 63,63,46,29,75,75,122,122,151,151,151,197,197,244,244,244, + 63,63,46,29,75,75,122,122,151,151,151,197,197,244,244,244, + 63,46,46,29,75,75,122,122,151,151,151,197,197,244,244,244, + 63,46,29,29,75,75,105,105,134,151,151,197,197,227,244,244, + 46,46,29,12,75,75,105,105,134,151,197,197,210,227,244,244, + 30,30,13,13,76,76,89,135,135,135,198,198,211,228,245,245, + 30,30,13,13,76,89,89,89,135,135,165,182,211,228,245,245, + 47,60,60,60,60,106,106,119,119,119,182,182,228,228,245,245, + 14,14,14,14,77,73,73,119,136,136,182,195,195,212,229,246, + 31,14,14,44,44,90,90,90,136,136,166,166,212,229,246,246, + 15,61,61,61,44,74,74,137,137,166,183,183,196,246,246,242, + 15,15,15,28,91,91,74,137,137,150,183,196,213,213,230,243, + 62,62,62,45,45,91,91,121,167,167,184,184,213,230,243,243, + 62,62,62,62,62,108,121,121,184,184,184,184,230,247,243,243, + 62,62,62,62,62,125,121,121,184,184,184,184,247,243,243,243, + 62,62,62,62,62,121,121,121,184,184,184,184,247,243,243,243, + 63,63,63,46,92,92,122,138,138,168,168,214,214,231,244,244, + 63,63,63,46,92,92,122,138,138,168,168,214,214,231,244,244, + 63,63,46,46,92,92,122,138,151,168,197,197,214,244,244,244, + 63,63,46,29,75,75,122,138,151,168,197,197,214,244,244,244, + 63,46,46,29,75,75,122,122,151,151,197,197,214,244,244,244, + 47,47,30,30,76,76,106,139,152,152,198,198,215,245,245,245, + 48,47,30,30,76,123,123,123,152,152,198,198,228,245,245,245, + 48,31,14,14,77,123,123,136,136,136,199,199,245,245,245,245, + 32,31,31,14,77,90,90,136,136,153,199,199,229,229,246,246, + 32,32,61,61,107,107,107,153,153,153,183,183,229,246,246,246, + 16,15,15,61,78,91,91,137,137,137,183,183,213,246,246,246, + 16,16,16,45,108,108,108,154,154,154,184,213,230,230,247,247, + 33,62,62,62,125,125,125,154,171,184,184,230,230,247,247,243, + 62,62,62,62,125,125,125,125,184,184,184,184,247,247,247,243, + 62,62,62,62,125,125,125,121,184,184,184,184,247,247,243,243, + 62,62,62,62,125,125,125,121,184,184,184,184,247,247,243,243, + 63,63,63,126,109,109,138,155,155,185,185,231,231,248,248,244, + 63,63,63,109,109,109,138,138,138,185,185,231,231,248,248,244, + 63,63,63,109,109,109,138,138,168,185,185,231,231,248,244,244, + 63,63,63,109,109,92,138,138,168,185,214,214,231,248,244,244, + 48,48,47,93,93,93,139,139,139,169,198,215,215,232,245,245, + 48,48,47,93,93,93,139,139,169,169,215,215,232,245,245,245, + 48,48,48,93,93,123,123,140,169,169,215,215,232,245,245,245, + 32,32,31,77,77,77,140,140,153,199,199,216,216,246,246,246, + 49,32,32,94,94,107,107,153,153,170,216,216,246,246,246,246, + 49,49,15,78,78,124,124,137,170,200,200,200,246,246,246,246, + 16,16,16,78,78,124,124,154,154,200,200,217,230,230,247,247, + 33,33,16,95,125,125,125,171,171,171,217,230,247,247,247,247, + 50,33,62,125,125,125,125,171,188,184,184,247,247,247,247,247, + 50,62,62,125,125,125,125,188,188,184,184,247,247,247,247,247, + 50,62,62,125,125,125,125,188,184,184,184,247,247,247,247,247, + 50,62,62,125,125,125,125,188,184,184,184,247,247,247,247,243, + 63,63,63,126,126,126,155,172,172,201,201,248,248,248,248,248, + 63,63,63,126,126,126,155,155,172,201,201,248,248,248,248,248, + 63,63,63,126,126,126,155,155,185,201,201,248,248,248,248,248, + 63,63,63,126,126,126,155,155,185,202,202,248,248,248,248,244, + 48,48,48,110,110,110,139,156,202,202,232,232,249,249,249,245, + 48,48,48,110,110,110,156,156,186,186,232,232,249,249,245,245, + 48,48,48,94,94,140,140,140,186,186,216,216,249,249,245,245, + 49,49,111,111,94,140,140,140,170,216,216,233,233,246,246,246, + 49,49,111,111,111,124,141,170,170,187,233,233,250,246,246,246, + 49,16,95,95,95,141,141,141,187,200,217,217,217,246,246,246, + 33,33,95,95,95,141,141,171,171,217,217,234,247,247,247,247, + 50,50,96,96,125,125,188,188,188,188,234,234,247,247,247,247, + 50,50,50,125,125,125,188,188,188,188,234,247,247,247,247,247, + 50,50,50,125,125,125,188,188,188,188,247,247,247,247,247,247, + 50,50,62,125,125,125,188,188,188,188,247,247,247,247,247,247, + 50,50,62,125,125,125,188,188,188,184,247,247,247,247,247,247, + 63,63,126,126,126,126,189,189,189,218,218,248,248,248,248,248, + 63,63,126,126,126,126,172,172,201,218,218,248,248,248,248,248, + 63,63,126,126,126,172,172,172,201,218,218,248,248,248,248,248, + 48,48,127,127,127,156,173,173,202,202,219,249,249,249,249,249, + 48,48,127,127,127,173,173,173,202,202,249,249,249,249,249,249, + 48,48,127,127,127,173,173,173,186,203,249,249,249,249,249,249, + 49,49,111,111,111,157,157,157,203,203,233,233,250,250,250,246, + 49,49,112,112,112,157,157,157,187,203,233,250,250,250,250,246, + 49,49,112,112,112,141,141,187,187,204,250,250,250,250,246,246, + 50,33,96,96,96,158,158,158,204,217,234,234,234,251,247,247, + 50,50,96,96,96,158,158,188,188,234,234,251,251,247,247,247, + 50,50,113,113,113,175,188,188,188,234,251,251,251,247,247,247, + 50,50,113,113,113,125,188,188,188,251,251,251,247,247,247,247, + 50,50,113,113,125,125,188,188,188,251,251,251,247,247,247,247, + 50,50,113,113,125,125,188,188,188,251,251,247,247,247,247,247, + 50,50,113,125,125,125,188,188,188,251,251,247,247,247,247,247, + 63,126,126,126,126,189,189,189,235,235,235,252,248,248,248,248, + 63,126,126,126,126,189,189,189,218,235,235,235,248,248,248,248, + 63,126,126,126,126,189,189,189,219,219,235,248,248,248,248,248, + 48,127,127,127,127,190,190,190,219,219,236,249,249,249,249,249, + 48,127,127,127,127,190,190,190,219,219,236,249,249,249,249,249, + 48,127,127,127,127,174,174,203,203,220,220,249,249,249,249,249, + 49,112,112,112,112,174,174,174,220,220,250,250,250,250,250,250, + 49,112,112,112,112,174,191,191,204,204,250,250,250,250,250,250, + 49,112,112,112,158,158,158,204,204,204,250,250,250,250,250,250, + 50,113,113,113,113,175,175,175,221,234,251,251,251,251,251,247, + 50,113,113,113,113,175,175,188,188,251,251,251,251,251,251,247, + 50,113,113,113,113,176,176,188,188,251,251,251,251,251,247,247, + 50,113,113,113,113,176,188,188,188,251,251,251,251,251,247,247, + 50,113,113,113,113,176,188,188,188,251,251,251,251,247,247,247, + 50,113,113,113,113,188,188,188,188,251,251,251,251,247,247,247, + 50,113,113,113,113,188,188,188,188,251,251,251,247,247,247,247, + 126,126,126,126,189,189,189,189,235,252,252,252,252,248,248,248, + 126,126,126,126,189,189,189,189,235,252,252,252,252,248,248,248, + 127,127,127,127,190,190,190,190,236,236,253,253,249,249,249,249, + 127,127,127,127,190,190,190,190,236,236,253,253,249,249,249,249, + 127,127,127,127,190,190,190,190,236,236,253,249,249,249,249,249, + 112,112,112,112,191,191,191,220,220,237,237,250,250,250,250,250, + 112,112,112,112,191,191,191,191,237,237,237,250,250,250,250,250, + 112,112,112,112,191,191,191,221,221,221,250,250,250,250,250,250, + 113,113,113,113,175,175,175,221,221,221,251,251,251,251,251,251, + 113,113,113,113,176,176,176,221,238,238,251,251,251,251,251,251, + 113,113,113,113,176,176,176,176,238,251,251,251,251,251,251,251, + 113,113,113,113,176,176,176,176,251,251,251,251,251,251,251,247, + 113,113,113,113,176,176,176,176,251,251,251,251,251,251,251,247, + 113,113,113,113,176,176,176,188,251,251,251,251,251,251,251,247, + 113,113,113,113,176,176,176,188,251,251,251,251,251,251,247,247, + 113,113,113,113,176,176,188,188,251,251,251,251,251,251,247,247, + 254,254,254,254,254,254,254,254,254,254,254,254,254,254,254,254, + 254,254,254,254,254,254,254,254,254,254,254,254,254,254,254,254, + 254,254,254,254,254,254,254,254,254,254,254,254,254,254,254,254, + 254,254,254,254,254,254,254,254,254,254,254,254,254,254,254,254, + 254,254,254,254,254,254,254,254,254,254,254,254,254,254,254,254, + 254,254,254,254,254,254,254,254,254,254,254,254,254,254,254,254, + 254,254,254,254,254,254,254,254,254,254,254,254,254,254,254,254, + 254,254,254,254,254,254,254,254,254,254,254,254,254,254,254,254, + 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, + 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, + 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, + 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, + 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, + 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, + 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, + 255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255, +}; + --- /sys/src/libscribble/syms Thu Jan 1 01:00:00 1970 +++ /sys/src/libscribble/syms Fri Sep 20 00:08:15 2013 @@ -0,0 +1,1235 @@ +sizeof_1_ = 8; +aggr _1_ +{ + 'U' 0 lo; + 'U' 4 hi; +}; + +defn +_1_(addr) { + complex _1_ addr; + print(" lo ", addr.lo, "\n"); + print(" hi ", addr.hi, "\n"); +}; + +sizeofFPdbleword = 8; +aggr FPdbleword +{ + 'F' 0 x; + { + 'U' 0 lo; + 'U' 4 hi; + }; +}; + +defn +FPdbleword(addr) { + complex FPdbleword addr; + print(" x ", addr.x, "\n"); + print("_1_ {\n"); + _1_(addr+0); + print("}\n"); +}; + +UTFmax = 4; +Runesync = 128; +Runeself = 128; +Runeerror = 65533; +Runemax = 1114111; +Runemask = 2097151; +sizeofFmt = 48; +aggr Fmt +{ + 'b' 0 runes; + 'X' 4 start; + 'X' 8 to; + 'X' 12 stop; + 'X' 16 flush; + 'X' 20 farg; + 'D' 24 nfmt; + 'X' 28 args; + 'D' 32 r; + 'D' 36 width; + 'D' 40 prec; + 'U' 44 flags; +}; + +defn +Fmt(addr) { + complex Fmt addr; + print(" runes ", addr.runes, "\n"); + print(" start ", addr.start\X, "\n"); + print(" to ", addr.to\X, "\n"); + print(" stop ", addr.stop\X, "\n"); + print(" flush ", addr.flush\X, "\n"); + print(" farg ", addr.farg\X, "\n"); + print(" nfmt ", addr.nfmt, "\n"); + print(" args ", addr.args\X, "\n"); + print(" r ", addr.r, "\n"); + print(" width ", addr.width, "\n"); + print(" prec ", addr.prec, "\n"); + print(" flags ", addr.flags, "\n"); +}; + +FmtWidth = 1; +FmtLeft = 2; +FmtPrec = 4; +FmtSharp = 8; +FmtSpace = 16; +FmtSign = 32; +FmtZero = 64; +FmtUnsigned = 128; +FmtShort = 256; +FmtLong = 512; +FmtVLong = 1024; +FmtComma = 2048; +FmtByte = 4096; +FmtFlag = 8192; +sizeofTm = 40; +aggr Tm +{ + 'D' 0 sec; + 'D' 4 min; + 'D' 8 hour; + 'D' 12 mday; + 'D' 16 mon; + 'D' 20 year; + 'D' 24 wday; + 'D' 28 yday; + 'a' 32 zone; + 'D' 36 tzoff; +}; + +defn +Tm(addr) { + complex Tm addr; + print(" sec ", addr.sec, "\n"); + print(" min ", addr.min, "\n"); + print(" hour ", addr.hour, "\n"); + print(" mday ", addr.mday, "\n"); + print(" mon ", addr.mon, "\n"); + print(" year ", addr.year, "\n"); + print(" wday ", addr.wday, "\n"); + print(" yday ", addr.yday, "\n"); + print(" zone ", addr.zone, "\n"); + print(" tzoff ", addr.tzoff, "\n"); +}; + +PNPROC = 1; +PNGROUP = 2; +Profoff = 0; +Profuser = 1; +Profkernel = 2; +Proftime = 3; +Profsample = 4; +sizeofLock = 8; +aggr Lock +{ + 'D' 0 key; + 'D' 4 sem; +}; + +defn +Lock(addr) { + complex Lock addr; + print(" key ", addr.key, "\n"); + print(" sem ", addr.sem, "\n"); +}; + +sizeofQLp = 12; +aggr QLp +{ + 'D' 0 inuse; + 'A' QLp 4 next; + 'C' 8 state; +}; + +defn +QLp(addr) { + complex QLp addr; + print(" inuse ", addr.inuse, "\n"); + print(" next ", addr.next\X, "\n"); + print(" state ", addr.state, "\n"); +}; + +sizeofQLock = 20; +aggr QLock +{ + Lock 0 lock; + 'D' 8 locked; + 'A' QLp 12 $head; + 'A' QLp 16 $tail; +}; + +defn +QLock(addr) { + complex QLock addr; + print("Lock lock {\n"); + Lock(addr.lock); + print("}\n"); + print(" locked ", addr.locked, "\n"); + print(" $head ", addr.$head\X, "\n"); + print(" $tail ", addr.$tail\X, "\n"); +}; + +sizeofRWLock = 24; +aggr RWLock +{ + Lock 0 lock; + 'D' 8 readers; + 'D' 12 writer; + 'A' QLp 16 $head; + 'A' QLp 20 $tail; +}; + +defn +RWLock(addr) { + complex RWLock addr; + print("Lock lock {\n"); + Lock(addr.lock); + print("}\n"); + print(" readers ", addr.readers, "\n"); + print(" writer ", addr.writer, "\n"); + print(" $head ", addr.$head\X, "\n"); + print(" $tail ", addr.$tail\X, "\n"); +}; + +sizeofRendez = 12; +aggr Rendez +{ + 'A' QLock 0 l; + 'A' QLp 4 $head; + 'A' QLp 8 $tail; +}; + +defn +Rendez(addr) { + complex Rendez addr; + print(" l ", addr.l\X, "\n"); + print(" $head ", addr.$head\X, "\n"); + print(" $tail ", addr.$tail\X, "\n"); +}; + +sizeofNetConnInfo = 36; +aggr NetConnInfo +{ + 'X' 0 dir; + 'X' 4 root; + 'X' 8 spec; + 'X' 12 lsys; + 'X' 16 lserv; + 'X' 20 rsys; + 'X' 24 rserv; + 'X' 28 laddr; + 'X' 32 raddr; +}; + +defn +NetConnInfo(addr) { + complex NetConnInfo addr; + print(" dir ", addr.dir\X, "\n"); + print(" root ", addr.root\X, "\n"); + print(" spec ", addr.spec\X, "\n"); + print(" lsys ", addr.lsys\X, "\n"); + print(" lserv ", addr.lserv\X, "\n"); + print(" rsys ", addr.rsys\X, "\n"); + print(" rserv ", addr.rserv\X, "\n"); + print(" laddr ", addr.laddr\X, "\n"); + print(" raddr ", addr.raddr\X, "\n"); +}; + +RFNAMEG = 1; +RFENVG = 2; +RFFDG = 4; +RFNOTEG = 8; +RFPROC = 16; +RFMEM = 32; +RFNOWAIT = 64; +RFCNAMEG = 1024; +RFCENVG = 2048; +RFCFDG = 4096; +RFREND = 8192; +RFNOMNT = 16384; +sizeofQid = 16; +aggr Qid +{ + 'W' 0 path; + 'U' 8 vers; + 'b' 12 type; +}; + +defn +Qid(addr) { + complex Qid addr; + print(" path ", addr.path, "\n"); + print(" vers ", addr.vers, "\n"); + print(" type ", addr.type, "\n"); +}; + +sizeofDir = 60; +aggr Dir +{ + 'u' 0 type; + 'U' 4 dev; + Qid 8 qid; + 'U' 24 mode; + 'U' 28 atime; + 'U' 32 mtime; + 'V' 36 length; + 'X' 44 name; + 'X' 48 uid; + 'X' 52 gid; + 'X' 56 muid; +}; + +defn +Dir(addr) { + complex Dir addr; + print(" type ", addr.type, "\n"); + print(" dev ", addr.dev, "\n"); + print("Qid qid {\n"); + Qid(addr.qid); + print("}\n"); + print(" mode ", addr.mode, "\n"); + print(" atime ", addr.atime, "\n"); + print(" mtime ", addr.mtime, "\n"); + print(" length ", addr.length, "\n"); + print(" name ", addr.name\X, "\n"); + print(" uid ", addr.uid\X, "\n"); + print(" gid ", addr.gid\X, "\n"); + print(" muid ", addr.muid\X, "\n"); +}; + +sizeofWaitmsg = 20; +aggr Waitmsg +{ + 'D' 0 pid; + 'a' 4 time; + 'X' 16 msg; +}; + +defn +Waitmsg(addr) { + complex Waitmsg addr; + print(" pid ", addr.pid, "\n"); + print(" time ", addr.time, "\n"); + print(" msg ", addr.msg\X, "\n"); +}; + +sizeofIOchunk = 8; +aggr IOchunk +{ + 'X' 0 addr; + 'U' 4 len; +}; + +defn +IOchunk(addr) { + complex IOchunk addr; + print(" addr ", addr.addr\X, "\n"); + print(" len ", addr.len, "\n"); +}; + +sizeof_2_ = 32; +aggr _2_ +{ + 'D' 0 fd; + 'C' 4 flags; + 'C' 5 state; + 'X' 8 buf; + 'X' 12 rp; + 'X' 16 wp; + 'X' 20 lp; + 'D' 24 bufl; + 'a' 28 unbuf; +}; + +defn +_2_(addr) { + complex _2_ addr; + print(" fd ", addr.fd, "\n"); + print(" flags ", addr.flags, "\n"); + print(" state ", addr.state, "\n"); + print(" buf ", addr.buf\X, "\n"); + print(" rp ", addr.rp\X, "\n"); + print(" wp ", addr.wp\X, "\n"); + print(" lp ", addr.lp\X, "\n"); + print(" bufl ", addr.bufl, "\n"); + print(" unbuf ", addr.unbuf, "\n"); +}; + +DOpaque = 4294967295; +DTransparent = 0; +DBlack = 255; +DWhite = 4294967295; +DRed = 4278190335; +DGreen = 16711935; +DBlue = 65535; +DCyan = 16777215; +DMagenta = 4278255615; +DYellow = 4294902015; +DPaleyellow = 4294945535; +DDarkyellow = 4008615679; +DDarkgreen = 1149781247; +DPalegreen = 2868882175; +DMedgreen = 2295105791; +DDarkblue = 22015; +DPalebluegreen = 2868903935; +DPaleblue = 48127; +DBluegreen = 8947967; +DGreygreen = 1437248255; +DPalegreygreen = 2666458879; +DYellowgreen = 2576960767; +DMedblue = 39423; +DGreyblue = 6142975; +DPalegreyblue = 1234427391; +DPurpleblue = 2290666751; +DNotacolor = 4294967040; +DNofill = 4294967040; +Displaybufsize = 8000; +ICOSSCALE = 1024; +Borderwidth = 4; +Refbackup = 0; +Refnone = 1; +Refmesg = 2; +Endsquare = 0; +Enddisc = 1; +Endarrow = 2; +Endmask = 31; +Clear = 0; +SinD = 8; +DinS = 4; +SoutD = 2; +DoutS = 1; +S = 10; +SoverD = 11; +SatopD = 9; +SxorD = 3; +D = 5; +DoverS = 7; +DatopS = 6; +DxorS = 3; +Ncomp = 12; +CRed = 0; +CGreen = 1; +CBlue = 2; +CGrey = 3; +CAlpha = 4; +CMap = 5; +CIgnore = 6; +NChan = 7; +GREY1 = 49; +GREY2 = 50; +GREY4 = 52; +GREY8 = 56; +CMAP8 = 88; +RGB15 = 1627723045; +RGB16 = 333349; +RGB24 = 530472; +RGBA32 = 135800904; +ARGB32 = 1208490024; +XRGB32 = 1745360936; +BGR24 = 2627592; +ABGR32 = 1210587144; +XBGR32 = 1747458056; +sizeofPoint = 8; +aggr Point +{ + 'D' 0 x; + 'D' 4 y; +}; + +defn +Point(addr) { + complex Point addr; + print(" x ", addr.x, "\n"); + print(" y ", addr.y, "\n"); +}; + +sizeofRectangle = 16; +aggr Rectangle +{ + Point 0 min; + Point 8 max; +}; + +defn +Rectangle(addr) { + complex Rectangle addr; + print("Point min {\n"); + Point(addr.min); + print("}\n"); + print("Point max {\n"); + Point(addr.max); + print("}\n"); +}; + +sizeofScreen = 16; +aggr Screen +{ + 'X' 0 display; + 'D' 4 id; + 'X' 8 image; + 'X' 12 fill; +}; + +defn +Screen(addr) { + complex Screen addr; + print(" display ", addr.display\X, "\n"); + print(" id ", addr.id, "\n"); + print(" image ", addr.image\X, "\n"); + print(" fill ", addr.fill\X, "\n"); +}; + +sizeofDisplay = 180; +aggr Display +{ + QLock 0 qlock; + 'D' 20 locking; + 'D' 24 dirno; + 'D' 28 fd; + 'D' 32 reffd; + 'D' 36 ctlfd; + 'D' 40 imageid; + 'D' 44 $local; + 'X' 48 error; + 'X' 52 devdir; + 'X' 56 windir; + 'a' 60 oldlabel; + 'U' 124 dataqid; + 'X' 128 white; + 'X' 132 black; + 'X' 136 opaque; + 'X' 140 transparent; + 'X' 144 image; + 'X' 148 buf; + 'D' 152 bufsize; + 'X' 156 bufp; + 'X' 160 defaultfont; + 'X' 164 defaultsubfont; + 'X' 168 windows; + 'X' 172 screenimage; + 'D' 176 _isnewdisplay; +}; + +defn +Display(addr) { + complex Display addr; + print("QLock qlock {\n"); + QLock(addr.qlock); + print("}\n"); + print(" locking ", addr.locking, "\n"); + print(" dirno ", addr.dirno, "\n"); + print(" fd ", addr.fd, "\n"); + print(" reffd ", addr.reffd, "\n"); + print(" ctlfd ", addr.ctlfd, "\n"); + print(" imageid ", addr.imageid, "\n"); + print(" $local ", addr.$local, "\n"); + print(" error ", addr.error\X, "\n"); + print(" devdir ", addr.devdir\X, "\n"); + print(" windir ", addr.windir\X, "\n"); + print(" oldlabel ", addr.oldlabel, "\n"); + print(" dataqid ", addr.dataqid, "\n"); + print(" white ", addr.white\X, "\n"); + print(" black ", addr.black\X, "\n"); + print(" opaque ", addr.opaque\X, "\n"); + print(" transparent ", addr.transparent\X, "\n"); + print(" image ", addr.image\X, "\n"); + print(" buf ", addr.buf\X, "\n"); + print(" bufsize ", addr.bufsize, "\n"); + print(" bufp ", addr.bufp\X, "\n"); + print(" defaultfont ", addr.defaultfont\X, "\n"); + print(" defaultsubfont ", addr.defaultsubfont\X, "\n"); + print(" windows ", addr.windows\X, "\n"); + print(" screenimage ", addr.screenimage\X, "\n"); + print(" _isnewdisplay ", addr._isnewdisplay, "\n"); +}; + +sizeofImage = 60; +aggr Image +{ + 'A' Display 0 display; + 'D' 4 id; + Rectangle 8 r; + Rectangle 24 clipr; + 'D' 40 depth; + 'U' 44 chan; + 'D' 48 repl; + 'A' Screen 52 screen; + 'A' Image 56 next; +}; + +defn +Image(addr) { + complex Image addr; + print(" display ", addr.display\X, "\n"); + print(" id ", addr.id, "\n"); + print("Rectangle r {\n"); + Rectangle(addr.r); + print("}\n"); + print("Rectangle clipr {\n"); + Rectangle(addr.clipr); + print("}\n"); + print(" depth ", addr.depth, "\n"); + print(" chan ", addr.chan, "\n"); + print(" repl ", addr.repl, "\n"); + print(" screen ", addr.screen\X, "\n"); + print(" next ", addr.next\X, "\n"); +}; + +sizeofRGB = 12; +aggr RGB +{ + 'U' 0 red; + 'U' 4 green; + 'U' 8 blue; +}; + +defn +RGB(addr) { + complex RGB addr; + print(" red ", addr.red, "\n"); + print(" green ", addr.green, "\n"); + print(" blue ", addr.blue, "\n"); +}; + +sizeofFontchar = 8; +aggr Fontchar +{ + 'D' 0 x; + 'b' 4 top; + 'b' 5 bottom; + 'C' 6 left; + 'b' 7 width; +}; + +defn +Fontchar(addr) { + complex Fontchar addr; + print(" x ", addr.x, "\n"); + print(" top ", addr.top, "\n"); + print(" bottom ", addr.bottom, "\n"); + print(" left ", addr.left, "\n"); + print(" width ", addr.width, "\n"); +}; + +sizeofSubfont = 20; +aggr Subfont +{ + 'X' 0 name; + 'd' 4 n; + 'b' 6 height; + 'C' 7 ascent; + 'A' Fontchar 8 info; + 'A' Image 12 bits; + 'D' 16 ref; +}; + +defn +Subfont(addr) { + complex Subfont addr; + print(" name ", addr.name\X, "\n"); + print(" n ", addr.n, "\n"); + print(" height ", addr.height, "\n"); + print(" ascent ", addr.ascent, "\n"); + print(" info ", addr.info\X, "\n"); + print(" bits ", addr.bits\X, "\n"); + print(" ref ", addr.ref, "\n"); +}; + +LOG2NFCACHE = 6; +NFCACHE = 64; +NFLOOK = 5; +NFSUBF = 2; +MAXFCACHE = 1029; +MAXSUBF = 50; +DSUBF = 4; +SUBFAGE = 10000; +CACHEAGE = 10000; +sizeofCachefont = 20; +aggr Cachefont +{ + 'U' 0 min; + 'U' 4 max; + 'D' 8 offset; + 'X' 12 name; + 'X' 16 subfontname; +}; + +defn +Cachefont(addr) { + complex Cachefont addr; + print(" min ", addr.min, "\n"); + print(" max ", addr.max, "\n"); + print(" offset ", addr.offset, "\n"); + print(" name ", addr.name\X, "\n"); + print(" subfontname ", addr.subfontname\X, "\n"); +}; + +sizeofCacheinfo = 12; +aggr Cacheinfo +{ + 'u' 0 x; + 'b' 2 width; + 'C' 3 left; + 'U' 4 value; + 'u' 8 age; +}; + +defn +Cacheinfo(addr) { + complex Cacheinfo addr; + print(" x ", addr.x, "\n"); + print(" width ", addr.width, "\n"); + print(" left ", addr.left, "\n"); + print(" value ", addr.value, "\n"); + print(" age ", addr.age, "\n"); +}; + +sizeofCachesubf = 12; +aggr Cachesubf +{ + 'U' 0 age; + 'A' Cachefont 4 cf; + 'A' Subfont 8 f; +}; + +defn +Cachesubf(addr) { + complex Cachesubf addr; + print(" age ", addr.age, "\n"); + print(" cf ", addr.cf\X, "\n"); + print(" f ", addr.f\X, "\n"); +}; + +sizeofFont = 48; +aggr Font +{ + 'X' 0 name; + 'A' Display 4 display; + 'd' 8 height; + 'd' 10 ascent; + 'd' 12 width; + 'd' 14 nsub; + 'U' 16 age; + 'D' 20 maxdepth; + 'D' 24 ncache; + 'D' 28 nsubf; + 'A' Cacheinfo 32 cache; + 'A' Cachesubf 36 subf; + 'A' Cachefont 40 sub; + 'A' Image 44 cacheimage; +}; + +defn +Font(addr) { + complex Font addr; + print(" name ", addr.name\X, "\n"); + print(" display ", addr.display\X, "\n"); + print(" height ", addr.height, "\n"); + print(" ascent ", addr.ascent, "\n"); + print(" width ", addr.width, "\n"); + print(" nsub ", addr.nsub, "\n"); + print(" age ", addr.age, "\n"); + print(" maxdepth ", addr.maxdepth, "\n"); + print(" ncache ", addr.ncache, "\n"); + print(" nsubf ", addr.nsubf, "\n"); + print(" cache ", addr.cache\X, "\n"); + print(" subf ", addr.subf\X, "\n"); + print(" sub ", addr.sub\X, "\n"); + print(" cacheimage ", addr.cacheimage\X, "\n"); +}; + +complex Point ZP; +complex Rectangle ZR; +complex Display display; +complex Font font; +complex Image screen; +complex Screen _screen; +sizeofpen_point = 12; +aggr pen_point +{ + { + 'D' 0 x; + 'D' 4 y; + }; + 'D' 8 chaincode; +}; + +defn +pen_point(addr) { + complex pen_point addr; + print("Point {\n"); + Point(addr+0); + print("}\n"); + print(" chaincode ", addr.chaincode, "\n"); +}; + +sizeofStroke = 8; +aggr Stroke +{ + 'U' 0 npts; + 'A' pen_point 4 pts; +}; + +defn +Stroke(addr) { + complex Stroke addr; + print(" npts ", addr.npts, "\n"); + print(" pts ", addr.pts\X, "\n"); +}; + +sizeofScribble = 40; +aggr Scribble +{ + 'A' Point 0 pt; + 'D' 4 ppasize; + Stroke 8 ps; + 'X' 16 graf; + 'D' 20 capsLock; + 'D' 24 puncShift; + 'D' 28 tmpShift; + 'D' 32 ctrlShift; + 'D' 36 curCharSet; +}; + +defn +Scribble(addr) { + complex Scribble addr; + print(" pt ", addr.pt\X, "\n"); + print(" ppasize ", addr.ppasize, "\n"); + print("Stroke ps {\n"); + Stroke(addr.ps); + print("}\n"); + print(" graf ", addr.graf\X, "\n"); + print(" capsLock ", addr.capsLock, "\n"); + print(" puncShift ", addr.puncShift, "\n"); + print(" tmpShift ", addr.tmpShift, "\n"); + print(" ctrlShift ", addr.ctrlShift, "\n"); + print(" curCharSet ", addr.curCharSet, "\n"); +}; + +sizeof_3_ = 12; +aggr _3_ +{ + 'X' 0 ri_locale; + 'X' 4 ri_name; + 'X' 8 ri_subset; +}; + +defn +_3_(addr) { + complex _3_ addr; + print(" ri_locale ", addr.ri_locale\X, "\n"); + print(" ri_name ", addr.ri_name\X, "\n"); + print(" ri_subset ", addr.ri_subset\X, "\n"); +}; + +sizeof_4_ = 20; +aggr _4_ +{ + Rectangle 0 pr_area; + 'd' 16 pr_row; + 'd' 18 pr_col; +}; + +defn +_4_(addr) { + complex _4_ addr; + print("Rectangle pr_area {\n"); + Rectangle(addr.pr_area); + print("}\n"); + print(" pr_row ", addr.pr_row, "\n"); + print(" pr_col ", addr.pr_col, "\n"); +}; + +sizeof_ls_set = 4; +aggr _ls_set +{ + 'X' 0 aval; + 'X' 0 wval; +}; + +defn +_ls_set(addr) { + complex _ls_set addr; + print(" aval ", addr.aval\X, "\n"); + print(" wval ", addr.wval\X, "\n"); +}; + +sizeof_letterset = 8; +aggr _letterset +{ + 'C' 0 ls_type; + _ls_set 4 ls_set; +}; + +defn +_letterset(addr) { + complex _letterset addr; + print(" ls_type ", addr.ls_type, "\n"); + print("_ls_set ls_set {\n"); + _ls_set(addr.ls_set); + print("}\n"); +}; + +sizeof_5_ = 4; +aggr _5_ +{ + 'X' 0 gval; + 'X' 0 aval; + 'X' 0 wval; + 'X' 0 rcval; +}; + +defn +_5_(addr) { + complex _5_ addr; + print(" gval ", addr.gval\X, "\n"); + print(" aval ", addr.aval\X, "\n"); + print(" wval ", addr.wval\X, "\n"); + print(" rcval ", addr.rcval\X, "\n"); +}; + +sizeofrec_element = 12; +aggr rec_element +{ + 'C' 0 re_type; + _5_ 4 re_result; + 'b' 8 re_conf; +}; + +defn +rec_element(addr) { + complex rec_element addr; + print(" re_type ", addr.re_type, "\n"); + print("_5_ re_result {\n"); + _5_(addr.re_result); + print("}\n"); + print(" re_conf ", addr.re_conf, "\n"); +}; + +sizeofrec_alternative = 20; +aggr rec_alternative +{ + rec_element 0 ra_elem; + 'U' 12 ra_nalter; + 'A' rec_alternative 16 ra_next; +}; + +defn +rec_alternative(addr) { + complex rec_alternative addr; + print("rec_element ra_elem {\n"); + rec_element(addr.ra_elem); + print("}\n"); + print(" ra_nalter ", addr.ra_nalter, "\n"); + print(" ra_next ", addr.ra_next\X, "\n"); +}; + +sizeofgesture = 36; +aggr gesture +{ + 'X' 0 g_name; + 'U' 4 g_nhs; + 'A' pen_point 8 g_hspots; + Rectangle 12 g_bbox; + 'X' 28 g_action; + 'X' 32 g_wsinfo; +}; + +defn +gesture(addr) { + complex gesture addr; + print(" g_name ", addr.g_name\X, "\n"); + print(" g_nhs ", addr.g_nhs, "\n"); + print(" g_hspots ", addr.g_hspots\X, "\n"); + print("Rectangle g_bbox {\n"); + Rectangle(addr.g_bbox); + print("}\n"); + print(" g_action ", addr.g_action\X, "\n"); + print(" g_wsinfo ", addr.g_wsinfo\X, "\n"); +}; + +sizeofrec_correlation = 28; +aggr rec_correlation +{ + rec_element 0 ro_elem; + 'U' 12 ro_nstrokes; + 'A' Stroke 16 ro_strokes; + 'X' 20 ro_start; + 'X' 24 ro_stop; +}; + +defn +rec_correlation(addr) { + complex rec_correlation addr; + print("rec_element ro_elem {\n"); + rec_element(addr.ro_elem); + print("}\n"); + print(" ro_nstrokes ", addr.ro_nstrokes, "\n"); + print(" ro_strokes ", addr.ro_strokes\X, "\n"); + print(" ro_start ", addr.ro_start\X, "\n"); + print(" ro_stop ", addr.ro_stop\X, "\n"); +}; + +sizeof_wordset = 12; +aggr _wordset +{ + 'X' 0 ws_pathname; + 'X' 4 ws_recognizer; + 'X' 8 ws_internal; +}; + +defn +_wordset(addr) { + complex _wordset addr; + print(" ws_pathname ", addr.ws_pathname\X, "\n"); + print(" ws_recognizer ", addr.ws_recognizer\X, "\n"); + print(" ws_internal ", addr.ws_internal\X, "\n"); +}; + +sizeof_Recognizer = 88; +aggr _Recognizer +{ + 'U' 0 recognizer_magic; + 'X' 4 recognizer_version; + 'A' _3_ 8 recognizer_info; + 'X' 12 recognizer_specific; + 'X' 16 recognizer_load_state; + 'X' 20 recognizer_save_state; + 'X' 24 recognizer_error; + 'X' 28 recognizer_load_dictionary; + 'X' 32 recognizer_save_dictionary; + 'X' 36 recognizer_free_dictionary; + 'X' 40 recognizer_add_to_dictionary; + 'X' 44 recognizer_delete_from_dictionary; + 'X' 48 recognizer_set_context; + 'X' 52 recognizer_get_context; + 'X' 56 recognizer_clear; + 'X' 60 recognizer_get_buffer; + 'X' 64 recognizer_set_buffer; + 'X' 68 recognizer_translate; + 'X' 72 recognizer_get_extension_functions; + 'X' 76 recognizer_get_gesture_names; + 'X' 80 recognizer_set_gesture_action; + 'U' 84 recognizer_end_magic; +}; + +defn +_Recognizer(addr) { + complex _Recognizer addr; + print(" recognizer_magic ", addr.recognizer_magic, "\n"); + print(" recognizer_version ", addr.recognizer_version\X, "\n"); + print(" recognizer_info ", addr.recognizer_info\X, "\n"); + print(" recognizer_specific ", addr.recognizer_specific\X, "\n"); + print(" recognizer_load_state ", addr.recognizer_load_state\X, "\n"); + print(" recognizer_save_state ", addr.recognizer_save_state\X, "\n"); + print(" recognizer_error ", addr.recognizer_error\X, "\n"); + print(" recognizer_load_dictionary ", addr.recognizer_load_dictionary\X, "\n"); + print(" recognizer_save_dictionary ", addr.recognizer_save_dictionary\X, "\n"); + print(" recognizer_free_dictionary ", addr.recognizer_free_dictionary\X, "\n"); + print(" recognizer_add_to_dictionary ", addr.recognizer_add_to_dictionary\X, "\n"); + print(" recognizer_delete_from_dictionary ", addr.recognizer_delete_from_dictionary\X, "\n"); + print(" recognizer_set_context ", addr.recognizer_set_context\X, "\n"); + print(" recognizer_get_context ", addr.recognizer_get_context\X, "\n"); + print(" recognizer_clear ", addr.recognizer_clear\X, "\n"); + print(" recognizer_get_buffer ", addr.recognizer_get_buffer\X, "\n"); + print(" recognizer_set_buffer ", addr.recognizer_set_buffer\X, "\n"); + print(" recognizer_translate ", addr.recognizer_translate\X, "\n"); + print(" recognizer_get_extension_functions ", addr.recognizer_get_extension_functions\X, "\n"); + print(" recognizer_get_gesture_names ", addr.recognizer_get_gesture_names\X, "\n"); + print(" recognizer_set_gesture_action ", addr.recognizer_set_gesture_action\X, "\n"); + print(" recognizer_end_magic ", addr.recognizer_end_magic, "\n"); +}; + +sizeofPointList = 20; +aggr PointList +{ + { + 'U' 0 npts; + 'A' pen_point 4 pts; + }; + 'D' 8 xrange; + 'D' 12 yrange; + 'A' PointList 16 next; +}; + +defn +PointList(addr) { + complex PointList addr; + print("Stroke {\n"); + Stroke(addr+0); + print("}\n"); + print(" xrange ", addr.xrange, "\n"); + print(" yrange ", addr.yrange, "\n"); + print(" next ", addr.next\X, "\n"); +}; + +sizeof_6_ = 1608; +aggr _6_ +{ + 'X' 0 file_name; + 'D' 4 nclasses; + 'a' 8 ex; + 'a' 408 cnames; + 'a' 808 canonex; + 'a' 1208 dompts; +}; + +defn +_6_(addr) { + complex _6_ addr; + print(" file_name ", addr.file_name\X, "\n"); + print(" nclasses ", addr.nclasses, "\n"); + print(" ex ", addr.ex, "\n"); + print(" cnames ", addr.cnames, "\n"); + print(" canonex ", addr.canonex, "\n"); + print(" dompts ", addr.dompts, "\n"); +}; + +sizeof_7_ = 1612; +aggr _7_ +{ + 'U' 0 li_magic; + _6_ 4 li_rc; +}; + +defn +_7_(addr) { + complex _7_ addr; + print(" li_magic ", addr.li_magic, "\n"); + print("_6_ li_rc {\n"); + _6_(addr.li_rc); + print("}\n"); +}; + +complex PointList add_example:l; +complex pen_point add_example:pts; +complex pen_point add_example:lpts; +complex PointList add_example:p; +complex PointList delete_examples:l; +complex PointList delete_examples:p; +complex _6_ recognize_internal:rec; +complex Stroke recognize_internal:str; +complex PointList recognize_internal:stroke; +complex _2_ read_classifier_points:fd; +complex PointList read_classifier_points:ex; +complex pen_point read_classifier_points:pts; +complex _2_ read_classifier:fd; +complex _6_ read_classifier:rc; +complex _Recognizer recognizer_getClasses:r; +complex _7_ recognizer_getClasses:rec; +complex _Recognizer isa_li:r; +complex _Recognizer li_recognizer_get_example:r; +complex pen_point li_recognizer_get_example:points; +complex _7_ li_recognizer_get_example:rec; +complex PointList li_recognizer_get_example:pl; +complex _Recognizer li_recognizer_load:r; +complex _2_ li_recognizer_load:fd; +complex _7_ li_recognizer_load:rec; +complex _6_ li_recognizer_load:rc; +complex _Recognizer li_recognizer_error:rec; +complex _Recognizer li_recognizer_clear:r; +complex _7_ li_recognizer_clear:rec; +complex _Recognizer li_recognizer_translate:r; +complex Stroke li_recognizer_translate:tps; +complex rec_alternative li_recognizer_translate:ret; +complex _7_ li_recognizer_translate:rec; +complex _6_ li_recognizer_translate:rc; +complex _Recognizer li_recognizer_get_extension_functions:rec; +complex _3_ __recognizer_internal_initialize:ri; +complex _Recognizer __recognizer_internal_initialize:r; +complex _7_ __recognizer_internal_initialize:rec; +complex _6_ free_rClassifier:rc; +complex _Recognizer __recognizer_internal_finalize:r; +complex _7_ __recognizer_internal_finalize:rec; +sizeofRegionList = 16; +aggr RegionList +{ + 'D' 0 start; + 'D' 4 end; + 'D' 8 type; + 'A' RegionList 12 next; +}; + +defn +RegionList(addr) { + complex RegionList addr; + print(" start ", addr.start, "\n"); + print(" end ", addr.end, "\n"); + print(" type ", addr.type, "\n"); + print(" next ", addr.next\X, "\n"); +}; + +complex _6_ lialg_initialize:rec; +complex _6_ lialg_recognize_stroke:rec; +complex PointList lialg_recognize_stroke:stroke; +complex PointList lialg_recognize_stroke:input_dompts; +complex PointList lialg_recognize_stroke:curr_dompts; +complex PointList lialg_preprocess_stroke:points; +complex PointList lialg_compute_dominant_points:points; +complex PointList lialg_compute_dominant_points:ipts; +complex RegionList lialg_compute_dominant_points:regions; +complex PointList lialg_compute_dominant_points:dpts; +complex RegionList lialg_compute_dominant_points:curr; +complex RegionList lialg_compute_dominant_points:next; +complex PointList lialg_interpolate_points:points; +complex PointList lialg_interpolate_points:newpts; +complex pen_point lialg_interpolate_points:pta; +complex pen_point lialg_interpolate_points:ptb; +complex pen_point lialg_interpolate_points:startpt; +complex pen_point lialg_interpolate_points:endpt; +complex pen_point lialg_bresline:startpt; +complex pen_point lialg_bresline:endpt; +complex PointList lialg_bresline:newpts; +complex PointList lialg_compute_chain_code:pts; +complex pen_point lialg_compute_chain_code:startpt; +complex pen_point lialg_compute_chain_code:endpt; +complex PointList lialg_compute_unit_chain_code:pts; +complex pen_point lialg_compute_unit_chain_code:startpt; +complex pen_point lialg_compute_unit_chain_code:endpt; +complex PointList lialg_compute_regions:pts; +complex RegionList lialg_compute_regions:regions; +complex RegionList lialg_compute_regions:curr_reg; +complex RegionList lialg_compute_regions:next_reg; +complex RegionList lialg_compute_regions:next_reg; +complex RegionList lialg_compute_regions:tmp; +complex RegionList lialg_compute_regions:prev_reg; +complex RegionList lialg_compute_regions:saved_next; +complex PointList lialg_compute_dompts:pts; +complex RegionList lialg_compute_dompts:regions; +complex PointList lialg_compute_dompts:dpts; +complex RegionList lialg_compute_dompts:r; +complex RegionList lialg_compute_dompts:curr; +complex PointList lialg_compute_contour_angle_set:pts; +complex RegionList lialg_compute_contour_angle_set:regions; +complex RegionList lialg_compute_contour_angle_set:curr_reg; +complex PointList lialg_score_stroke:input_dompts; +complex PointList lialg_score_stroke:curr_dompts; +complex PointList lialg_compute_similarity:input_dompts; +complex PointList lialg_compute_similarity:curr_dompts; +complex PointList lialg_compute_similarity:A; +complex PointList lialg_compute_similarity:B; +complex PointList lialg_compute_distance:input_dompts; +complex PointList lialg_compute_distance:curr_dompts; +complex PointList lialg_compute_distance:A; +complex PointList lialg_compute_distance:B; +complex _6_ lialg_read_classifier_digest:rec; +complex _2_ lialg_read_classifier_digest:fp; +complex PointList lialg_read_classifier_digest:dpts; +complex _6_ lialg_canonicalize_examples:rec; +complex PointList lialg_canonicalize_examples:pts; +complex PointList lialg_canonicalize_examples:tmp; +complex PointList lialg_canonicalize_examples:avg; +complex PointList lialg_canonicalize_example_stroke:points; +complex PointList lialg_compute_equipoints:points; +complex pen_point lialg_compute_equipoints:equipoints; +complex PointList lialg_compute_pathlen:points; +complex PointList lialg_compute_pathlen_subset:points; +complex PointList lialg_filter_points:points; +complex pen_point lialg_filter_points:filtered_pts; +complex PointList lialg_translate_points:points; +complex PointList lialg_get_bounding_box:points; +complex pen_point lialg_get_bounding_box:pt; --- /sys/src/libthread/channel.acid Fri Jul 23 00:34:44 2010 +++ /sys/src/libthread/channel.acid Fri Sep 20 00:25:51 2013 @@ -31,10 +31,12 @@ print("}\n"); }; -UTFmax = 3; +UTFmax = 4; Runesync = 128; Runeself = 128; Runeerror = 65533; +Runemax = 1114111; +Runemask = 2097151; sizeofFmt = 48; aggr Fmt { @@ -120,16 +122,18 @@ Profkernel = 2; Proftime = 3; Profsample = 4; -sizeofLock = 4; +sizeofLock = 8; aggr Lock { - 'D' 0 val; + 'D' 0 key; + 'D' 4 sem; }; defn Lock(addr) { complex Lock addr; - print(" val ", addr.val, "\n"); + print(" key ", addr.key, "\n"); + print(" sem ", addr.sem, "\n"); }; sizeofQLp = 12; @@ -148,13 +152,13 @@ print(" state ", addr.state, "\n"); }; -sizeofQLock = 16; +sizeofQLock = 20; aggr QLock { Lock 0 lock; - 'D' 4 locked; - 'A' QLp 8 $head; - 'A' QLp 12 $tail; + 'D' 8 locked; + 'A' QLp 12 $head; + 'A' QLp 16 $tail; }; defn @@ -168,14 +172,14 @@ print(" $tail ", addr.$tail\X, "\n"); }; -sizeofRWLock = 20; +sizeofRWLock = 24; aggr RWLock { Lock 0 lock; - 'D' 4 readers; - 'D' 8 writer; - 'A' QLp 12 $head; - 'A' QLp 16 $tail; + 'D' 8 readers; + 'D' 12 writer; + 'A' QLp 16 $head; + 'A' QLp 20 $tail; }; defn @@ -408,11 +412,11 @@ RENDHASH = 13; Printsize = 2048; NPRIV = 8; -sizeofRgrp = 56; +sizeofRgrp = 60; aggr Rgrp { Lock 0 lock; - 'a' 4 hash; + 'a' 8 hash; }; defn @@ -440,31 +444,31 @@ print(" $tail ", addr.$tail\X, "\n"); }; -sizeofThread = 120; +sizeofThread = 124; aggr Thread { Lock 0 lock; - 'a' 4 sched; - 'D' 12 id; - 'D' 16 grp; - 'D' 20 moribund; - 'D' 24 state; - 'D' 28 nextstate; - 'X' 32 stk; - 'U' 36 stksize; - 'A' Thread 40 next; - 'X' 44 proc; - 'A' Thread 48 nextt; - 'D' 52 ret; - 'X' 56 cmdname; - 'D' 60 inrendez; - 'A' Thread 64 rendhash; - 'X' 68 rendtag; - 'X' 72 rendval; - 'D' 76 rendbreak; - 'D' 80 chan; - 'A' Alt 84 alt; - 'a' 88 udata; + 'a' 8 sched; + 'D' 16 id; + 'D' 20 grp; + 'D' 24 moribund; + 'D' 28 state; + 'D' 32 nextstate; + 'X' 36 stk; + 'U' 40 stksize; + 'A' Thread 44 next; + 'X' 48 proc; + 'A' Thread 52 nextt; + 'D' 56 ret; + 'X' 60 cmdname; + 'D' 64 inrendez; + 'A' Thread 68 rendhash; + 'X' 72 rendtag; + 'X' 76 rendval; + 'D' 80 rendbreak; + 'D' 84 chan; + 'A' Alt 88 alt; + 'a' 92 udata; }; defn @@ -512,34 +516,34 @@ print(" fd ", addr.fd, "\n"); }; -sizeofProc = 2424; +sizeofProc = 2432; aggr Proc { Lock 0 lock; - 'a' 4 sched; - 'D' 12 pid; - 'D' 16 splhi; - 'A' Thread 20 thread; - 'D' 24 needexec; - Execargs 28 exec; - 'A' Proc 44 newproc; - 'a' 48 exitstr; - 'D' 176 rforkflag; - 'D' 180 nthreads; - Tqueue 184 threads; - Tqueue 196 ready; - Lock 208 readylock; - 'a' 212 printbuf; - 'D' 2260 blocked; - 'D' 2264 pending; - 'D' 2268 nonotes; - 'U' 2272 nextID; - 'A' Proc 2276 next; - 'X' 2280 arg; - 'a' 2284 str; - 'X' 2412 wdata; - 'X' 2416 udata; - 'C' 2420 threadint; + 'a' 8 sched; + 'D' 16 pid; + 'D' 20 splhi; + 'A' Thread 24 thread; + 'D' 28 needexec; + Execargs 32 exec; + 'A' Proc 48 newproc; + 'a' 52 exitstr; + 'D' 180 rforkflag; + 'D' 184 nthreads; + Tqueue 188 threads; + Tqueue 200 ready; + Lock 212 readylock; + 'a' 220 printbuf; + 'D' 2268 blocked; + 'D' 2272 pending; + 'D' 2276 nonotes; + 'U' 2280 nextID; + 'A' Proc 2284 next; + 'X' 2288 arg; + 'a' 2292 str; + 'X' 2420 wdata; + 'X' 2424 udata; + 'C' 2428 threadint; }; defn @@ -582,12 +586,12 @@ print(" threadint ", addr.threadint, "\n"); }; -sizeofPqueue = 12; +sizeofPqueue = 16; aggr Pqueue { Lock 0 lock; - 'A' Proc 4 $head; - 'A' Proc 8 $tail; + 'A' Proc 8 $head; + 'A' Proc 12 $tail; }; defn --- /sys/src/libthread/sched.acid Fri Jul 23 00:34:44 2010 +++ /sys/src/libthread/sched.acid Fri Sep 20 00:25:51 2013 @@ -31,10 +31,12 @@ print("}\n"); }; -UTFmax = 3; +UTFmax = 4; Runesync = 128; Runeself = 128; Runeerror = 65533; +Runemax = 1114111; +Runemask = 2097151; sizeofFmt = 48; aggr Fmt { @@ -120,16 +122,18 @@ Profkernel = 2; Proftime = 3; Profsample = 4; -sizeofLock = 4; +sizeofLock = 8; aggr Lock { - 'D' 0 val; + 'D' 0 key; + 'D' 4 sem; }; defn Lock(addr) { complex Lock addr; - print(" val ", addr.val, "\n"); + print(" key ", addr.key, "\n"); + print(" sem ", addr.sem, "\n"); }; sizeofQLp = 12; @@ -148,13 +152,13 @@ print(" state ", addr.state, "\n"); }; -sizeofQLock = 16; +sizeofQLock = 20; aggr QLock { Lock 0 lock; - 'D' 4 locked; - 'A' QLp 8 $head; - 'A' QLp 12 $tail; + 'D' 8 locked; + 'A' QLp 12 $head; + 'A' QLp 16 $tail; }; defn @@ -168,14 +172,14 @@ print(" $tail ", addr.$tail\X, "\n"); }; -sizeofRWLock = 20; +sizeofRWLock = 24; aggr RWLock { Lock 0 lock; - 'D' 4 readers; - 'D' 8 writer; - 'A' QLp 12 $head; - 'A' QLp 16 $tail; + 'D' 8 readers; + 'D' 12 writer; + 'A' QLp 16 $head; + 'A' QLp 20 $tail; }; defn @@ -408,11 +412,11 @@ RENDHASH = 13; Printsize = 2048; NPRIV = 8; -sizeofRgrp = 56; +sizeofRgrp = 60; aggr Rgrp { Lock 0 lock; - 'a' 4 hash; + 'a' 8 hash; }; defn @@ -440,31 +444,31 @@ print(" $tail ", addr.$tail\X, "\n"); }; -sizeofThread = 120; +sizeofThread = 124; aggr Thread { Lock 0 lock; - 'a' 4 sched; - 'D' 12 id; - 'D' 16 grp; - 'D' 20 moribund; - 'D' 24 state; - 'D' 28 nextstate; - 'X' 32 stk; - 'U' 36 stksize; - 'A' Thread 40 next; - 'X' 44 proc; - 'A' Thread 48 nextt; - 'D' 52 ret; - 'X' 56 cmdname; - 'D' 60 inrendez; - 'A' Thread 64 rendhash; - 'X' 68 rendtag; - 'X' 72 rendval; - 'D' 76 rendbreak; - 'D' 80 chan; - 'A' Alt 84 alt; - 'a' 88 udata; + 'a' 8 sched; + 'D' 16 id; + 'D' 20 grp; + 'D' 24 moribund; + 'D' 28 state; + 'D' 32 nextstate; + 'X' 36 stk; + 'U' 40 stksize; + 'A' Thread 44 next; + 'X' 48 proc; + 'A' Thread 52 nextt; + 'D' 56 ret; + 'X' 60 cmdname; + 'D' 64 inrendez; + 'A' Thread 68 rendhash; + 'X' 72 rendtag; + 'X' 76 rendval; + 'D' 80 rendbreak; + 'D' 84 chan; + 'A' Alt 88 alt; + 'a' 92 udata; }; defn @@ -512,34 +516,34 @@ print(" fd ", addr.fd, "\n"); }; -sizeofProc = 2424; +sizeofProc = 2432; aggr Proc { Lock 0 lock; - 'a' 4 sched; - 'D' 12 pid; - 'D' 16 splhi; - 'A' Thread 20 thread; - 'D' 24 needexec; - Execargs 28 exec; - 'A' Proc 44 newproc; - 'a' 48 exitstr; - 'D' 176 rforkflag; - 'D' 180 nthreads; - Tqueue 184 threads; - Tqueue 196 ready; - Lock 208 readylock; - 'a' 212 printbuf; - 'D' 2260 blocked; - 'D' 2264 pending; - 'D' 2268 nonotes; - 'U' 2272 nextID; - 'A' Proc 2276 next; - 'X' 2280 arg; - 'a' 2284 str; - 'X' 2412 wdata; - 'X' 2416 udata; - 'C' 2420 threadint; + 'a' 8 sched; + 'D' 16 pid; + 'D' 20 splhi; + 'A' Thread 24 thread; + 'D' 28 needexec; + Execargs 32 exec; + 'A' Proc 48 newproc; + 'a' 52 exitstr; + 'D' 180 rforkflag; + 'D' 184 nthreads; + Tqueue 188 threads; + Tqueue 200 ready; + Lock 212 readylock; + 'a' 220 printbuf; + 'D' 2268 blocked; + 'D' 2272 pending; + 'D' 2276 nonotes; + 'U' 2280 nextID; + 'A' Proc 2284 next; + 'X' 2288 arg; + 'a' 2292 str; + 'X' 2420 wdata; + 'X' 2424 udata; + 'C' 2428 threadint; }; defn @@ -582,12 +586,12 @@ print(" threadint ", addr.threadint, "\n"); }; -sizeofPqueue = 12; +sizeofPqueue = 16; aggr Pqueue { Lock 0 lock; - 'A' Proc 4 $head; - 'A' Proc 8 $tail; + 'A' Proc 8 $head; + 'A' Proc 12 $tail; }; defn @@ -653,7 +657,7 @@ print(" what ", addr.what, "\n"); }; -sizeofTos = 56; +sizeofTos = 72; aggr Tos { _2_ 0 prof; @@ -662,6 +666,7 @@ 'V' 40 pcycles; 'U' 48 pid; 'U' 52 clock; + 'a' 56 kscr; }; defn @@ -675,6 +680,7 @@ print(" pcycles ", addr.pcycles, "\n"); print(" pid ", addr.pid, "\n"); print(" clock ", addr.clock, "\n"); + print(" kscr ", addr.kscr, "\n"); }; complex Tos _tos;