sizeof_1_ = 8;aggr _1_{ 'V' 0 length;}; defn_1_(addr) { complex _1_ addr; print(" length ", addr.length, "\n");}; sizeof_2_ = 8;aggr _2_{ 'D' 0 lo; 'D' 4 hi;}; defn_2_(addr) { complex _2_ addr; print(" lo ", addr.lo, "\n"); print(" hi ", addr.hi, "\n");}; sizeofFPdbleword = 8;aggr FPdbleword{ 'F' 0 x; { 'D' 0 lo; 'D' 4 hi; };}; defnFPdbleword(addr) { complex FPdbleword addr; print(" x ", addr.x, "\n"); print("_2_ {\n"); _2_(addr+0); print("}\n");}; UTFmax = 3;Runesync = 128;Runeself = 128;Runeerror = 128;sizeofFconv = 24;aggr Fconv{ 'X' 0 out; 'X' 4 eout; 'D' 8 f1; 'D' 12 f2; 'D' 16 f3; 'D' 20 chr;}; defnFconv(addr) { complex Fconv addr; print(" out ", addr.out\X, "\n"); print(" eout ", addr.eout\X, "\n"); print(" f1 ", addr.f1, "\n"); print(" f2 ", addr.f2, "\n"); print(" f3 ", addr.f3, "\n"); print(" chr ", addr.chr, "\n");}; 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;}; defnTm(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;sizeofLock = 8;aggr Lock{ 'D' 0 val;}; defnLock(addr) { complex Lock addr; print(" val ", addr.val, "\n");}; sizeofQLp = 16;aggr QLp{ 'D' 0 inuse; 'A' QLp 4 next; 'C' 8 state;}; defnQLp(addr) { complex QLp addr; print(" inuse ", addr.inuse, "\n"); print(" next ", addr.next\X, "\n"); print(" state ", addr.state, "\n");}; sizeofQLock = 24;aggr QLock{ Lock 0 lock; 'D' 8 locked; 'A' QLp 12 $head; 'A' QLp 16 $tail;}; defnQLock(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;}; defnRWLock(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");}; 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 = 8;aggr Qid{ 'U' 0 path; 'U' 4 vers;}; defnQid(addr) { complex Qid addr; print(" path ", addr.path, "\n"); print(" vers ", addr.vers, "\n");}; sizeofDir = 128;aggr Dir{ 'a' 0 name; 'a' 28 uid; 'a' 56 gid; Qid 88 qid; 'U' 96 mode; 'D' 100 atime; 'D' 104 mtime; { 'V' 112 length; }; 'u' 120 type; 'u' 122 dev;}; defnDir(addr) { complex Dir addr; print(" name ", addr.name, "\n"); print(" uid ", addr.uid, "\n"); print(" gid ", addr.gid, "\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("_1_ {\n"); _1_(addr+112); print("}\n"); print(" type ", addr.type, "\n"); print(" dev ", addr.dev, "\n");}; sizeofWaitmsg = 112;aggr Waitmsg{ 'a' 0 pid; 'a' 12 time; 'a' 48 msg;}; defnWaitmsg(addr) { complex Waitmsg addr; print(" pid ", addr.pid, "\n"); print(" time ", addr.time, "\n"); print(" msg ", addr.msg, "\n");}; sizeofChannel = 160;aggr Channel{ 'D' 0 s; 'U' 4 f; 'U' 8 n; 'D' 12 e; 'D' 16 freed; 'U' 20 qused; 'a' 24 qentry; 'a' 152 v;}; defnChannel(addr) { complex Channel addr; print(" s ", addr.s, "\n"); print(" f ", addr.f, "\n"); print(" n ", addr.n, "\n"); print(" e ", addr.e, "\n"); print(" freed ", addr.freed, "\n"); print(" qused ", addr.qused, "\n"); print(" qentry ", addr.qentry, "\n"); print(" v ", addr.v, "\n");}; sizeofAlt = 24;aggr Alt{ 'A' Channel 0 c; 'X' 4 v; 'D' 8 op; 'A' Channel 12 tag; 'U' 16 q;}; defnAlt(addr) { complex Alt addr; print(" c ", addr.c\X, "\n"); print(" v ", addr.v\X, "\n"); print(" op ", addr.op, "\n"); print(" tag ", addr.tag\X, "\n"); print(" q ", addr.q, "\n");}; sizeofRef = 8;aggr Ref{ 'D' 0 ref;}; defnRef(addr) { complex Ref addr; print(" ref ", addr.ref, "\n");}; Running = 0;Runnable = 1;Rendezvous = 2;Callnil = 0;Callalt = 1;Callsnd = 2;Callrcv = 3;DOEXEC = 1;DOEXIT = 2;DOPROC = 3;sizeofTqueue = 16;aggr Tqueue{ Lock 0 lock; 'X' 8 $head; 'X' 12 $tail;}; defnTqueue(addr) { complex Tqueue addr; print("Lock lock {\n"); Lock(addr.lock); print("}\n"); print(" $head ", addr.$head\X, "\n"); print(" $tail ", addr.$tail\X, "\n");}; sizeofThread = 80;aggr Thread{ Lock 0 lock; 'D' 8 id; 'D' 12 grp; 'D' 16 state; 'D' 20 exiting; 'D' 24 call; 'X' 28 cmdname; 'A' Thread 32 next; 'A' Thread 36 nextt; 'X' 40 proc; 'U' 44 tag; 'A' Alt 48 alt; 'U' 52 value; 'A' Thread 56 garbage; 'a' 60 env; 'X' 68 stk; 'U' 72 stksize;}; defnThread(addr) { complex Thread addr; print("Lock lock {\n"); Lock(addr.lock); print("}\n"); print(" id ", addr.id, "\n"); print(" grp ", addr.grp, "\n"); print(" state ", addr.state, "\n"); print(" exiting ", addr.exiting, "\n"); print(" call ", addr.call, "\n"); print(" cmdname ", addr.cmdname\X, "\n"); print(" next ", addr.next\X, "\n"); print(" nextt ", addr.nextt\X, "\n"); print(" proc ", addr.proc\X, "\n"); print(" tag ", addr.tag, "\n"); print(" alt ", addr.alt\X, "\n"); print(" value ", addr.value, "\n"); print(" garbage ", addr.garbage\X, "\n"); print(" env ", addr.env, "\n"); print(" stk ", addr.stk\X, "\n"); print(" stksize ", addr.stksize, "\n");}; sizeofProc = 144;aggr Proc{ Lock 0 lock; 'D' 8 pid; 'a' 12 oldenv; 'D' 20 nthreads; Tqueue 24 threads; Tqueue 40 runnable; 'A' Thread 56 curthread; 'D' 60 blocked; 'U' 64 nextID; 'A' Proc 68 next; 'X' 72 arg; 'a' 76 str; 'U' 140 udata;}; defnProc(addr) { complex Proc addr; print("Lock lock {\n"); Lock(addr.lock); print("}\n"); print(" pid ", addr.pid, "\n"); print(" oldenv ", addr.oldenv, "\n"); print(" nthreads ", addr.nthreads, "\n"); print("Tqueue threads {\n"); Tqueue(addr.threads); print("}\n"); print("Tqueue runnable {\n"); Tqueue(addr.runnable); print("}\n"); print(" curthread ", addr.curthread\X, "\n"); print(" blocked ", addr.blocked, "\n"); print(" nextID ", addr.nextID, "\n"); print(" next ", addr.next\X, "\n"); print(" arg ", addr.arg\X, "\n"); print(" str ", addr.str, "\n"); print(" udata ", addr.udata, "\n");}; sizeofNewproc = 24;aggr Newproc{ 'X' 0 stack; 'U' 4 stacksize; 'X' 8 stackptr; 'U' 12 launcher; 'D' 16 grp;}; defnNewproc(addr) { complex Newproc addr; print(" stack ", addr.stack\X, "\n"); print(" stacksize ", addr.stacksize, "\n"); print(" stackptr ", addr.stackptr\X, "\n"); print(" launcher ", addr.launcher, "\n"); print(" grp ", addr.grp, "\n");}; sizeofExecproc = 4112;aggr Execproc{ 'A' Proc 0 procp; 'X' 4 file; 'X' 8 arg; 'a' 12 data;}; defnExecproc(addr) { complex Execproc addr; print(" procp ", addr.procp\X, "\n"); print(" file ", addr.file\X, "\n"); print(" arg ", addr.arg\X, "\n"); print(" data ", addr.data, "\n");}; sizeofPqueue = 16;aggr Pqueue{ Lock 0 lock; 'A' Proc 8 $head; 'A' Proc 12 $tail;}; defnPqueue(addr) { complex Pqueue addr; print("Lock lock {\n"); Lock(addr.lock); print("}\n"); print(" $head ", addr.$head\X, "\n"); print(" $tail ", addr.$tail\X, "\n");}; complex Pqueue pq;complex Proc procp;complex Thread dontkill;complex Tqueue rendez;complex Lock rendezlock;complex Channel thewaitchan;complex Pqueue pq;complex Proc procp;complex Proc notehandler:p;complex Thread notehandler:t;complex Thread threadexits:t;complex Thread threadexits:new;complex Proc threadexits:p;complex Channel threadexits:c;complex Waitmsg threadexits:w;complex Channel threadexitsall:c;complex Thread yield:new;complex Thread yield:t;complex Proc yield:p;Lines 1–500 of 1064. Load more
sizeof_1_ = 8; aggr _1_ { 'V' 0 length; }; defn _1_(addr) { complex _1_ addr; print(" length ", addr.length, "\n"); }; sizeof_2_ = 8; aggr _2_ { 'D' 0 lo; 'D' 4 hi; }; defn _2_(addr) { complex _2_ addr; print(" lo ", addr.lo, "\n"); print(" hi ", addr.hi, "\n"); }; sizeofFPdbleword = 8; aggr FPdbleword { 'F' 0 x; { 'D' 0 lo; 'D' 4 hi; }; }; defn FPdbleword(addr) { complex FPdbleword addr; print(" x ", addr.x, "\n"); print("_2_ {\n"); _2_(addr+0); print("}\n"); }; UTFmax = 3; Runesync = 128; Runeself = 128; Runeerror = 128; sizeofFconv = 24; aggr Fconv { 'X' 0 out; 'X' 4 eout; 'D' 8 f1; 'D' 12 f2; 'D' 16 f3; 'D' 20 chr; }; defn Fconv(addr) { complex Fconv addr; print(" out ", addr.out\X, "\n"); print(" eout ", addr.eout\X, "\n"); print(" f1 ", addr.f1, "\n"); print(" f2 ", addr.f2, "\n"); print(" f3 ", addr.f3, "\n"); print(" chr ", addr.chr, "\n"); }; 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; sizeofLock = 8; aggr Lock { 'D' 0 val; }; defn Lock(addr) { complex Lock addr; print(" val ", addr.val, "\n"); }; sizeofQLp = 16; 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 = 24; 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"); }; 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 = 8; aggr Qid { 'U' 0 path; 'U' 4 vers; }; defn Qid(addr) { complex Qid addr; print(" path ", addr.path, "\n"); print(" vers ", addr.vers, "\n"); }; sizeofDir = 128; aggr Dir { 'a' 0 name; 'a' 28 uid; 'a' 56 gid; Qid 88 qid; 'U' 96 mode; 'D' 100 atime; 'D' 104 mtime; { 'V' 112 length; }; 'u' 120 type; 'u' 122 dev; }; defn Dir(addr) { complex Dir addr; print(" name ", addr.name, "\n"); print(" uid ", addr.uid, "\n"); print(" gid ", addr.gid, "\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("_1_ {\n"); _1_(addr+112); print("}\n"); print(" type ", addr.type, "\n"); print(" dev ", addr.dev, "\n"); }; sizeofWaitmsg = 112; aggr Waitmsg { 'a' 0 pid; 'a' 12 time; 'a' 48 msg; }; defn Waitmsg(addr) { complex Waitmsg addr; print(" pid ", addr.pid, "\n"); print(" time ", addr.time, "\n"); print(" msg ", addr.msg, "\n"); }; sizeofChannel = 160; aggr Channel { 'D' 0 s; 'U' 4 f; 'U' 8 n; 'D' 12 e; 'D' 16 freed; 'U' 20 qused; 'a' 24 qentry; 'a' 152 v; }; defn Channel(addr) { complex Channel addr; print(" s ", addr.s, "\n"); print(" f ", addr.f, "\n"); print(" n ", addr.n, "\n"); print(" e ", addr.e, "\n"); print(" freed ", addr.freed, "\n"); print(" qused ", addr.qused, "\n"); print(" qentry ", addr.qentry, "\n"); print(" v ", addr.v, "\n"); }; sizeofAlt = 24; aggr Alt { 'A' Channel 0 c; 'X' 4 v; 'D' 8 op; 'A' Channel 12 tag; 'U' 16 q; }; defn Alt(addr) { complex Alt addr; print(" c ", addr.c\X, "\n"); print(" v ", addr.v\X, "\n"); print(" op ", addr.op, "\n"); print(" tag ", addr.tag\X, "\n"); print(" q ", addr.q, "\n"); }; sizeofRef = 8; aggr Ref { 'D' 0 ref; }; defn Ref(addr) { complex Ref addr; print(" ref ", addr.ref, "\n"); }; Running = 0; Runnable = 1; Rendezvous = 2; Callnil = 0; Callalt = 1; Callsnd = 2; Callrcv = 3; DOEXEC = 1; DOEXIT = 2; DOPROC = 3; sizeofTqueue = 16; aggr Tqueue { Lock 0 lock; 'X' 8 $head; 'X' 12 $tail; }; defn Tqueue(addr) { complex Tqueue addr; print("Lock lock {\n"); Lock(addr.lock); print("}\n"); print(" $head ", addr.$head\X, "\n"); print(" $tail ", addr.$tail\X, "\n"); }; sizeofThread = 80; aggr Thread { Lock 0 lock; 'D' 8 id; 'D' 12 grp; 'D' 16 state; 'D' 20 exiting; 'D' 24 call; 'X' 28 cmdname; 'A' Thread 32 next; 'A' Thread 36 nextt; 'X' 40 proc; 'U' 44 tag; 'A' Alt 48 alt; 'U' 52 value; 'A' Thread 56 garbage; 'a' 60 env; 'X' 68 stk; 'U' 72 stksize; }; defn Thread(addr) { complex Thread addr; print("Lock lock {\n"); Lock(addr.lock); print("}\n"); print(" id ", addr.id, "\n"); print(" grp ", addr.grp, "\n"); print(" state ", addr.state, "\n"); print(" exiting ", addr.exiting, "\n"); print(" call ", addr.call, "\n"); print(" cmdname ", addr.cmdname\X, "\n"); print(" next ", addr.next\X, "\n"); print(" nextt ", addr.nextt\X, "\n"); print(" proc ", addr.proc\X, "\n"); print(" tag ", addr.tag, "\n"); print(" alt ", addr.alt\X, "\n"); print(" value ", addr.value, "\n"); print(" garbage ", addr.garbage\X, "\n"); print(" env ", addr.env, "\n"); print(" stk ", addr.stk\X, "\n"); print(" stksize ", addr.stksize, "\n"); }; sizeofProc = 144; aggr Proc { Lock 0 lock; 'D' 8 pid; 'a' 12 oldenv; 'D' 20 nthreads; Tqueue 24 threads; Tqueue 40 runnable; 'A' Thread 56 curthread; 'D' 60 blocked; 'U' 64 nextID; 'A' Proc 68 next; 'X' 72 arg; 'a' 76 str; 'U' 140 udata; }; defn Proc(addr) { complex Proc addr; print("Lock lock {\n"); Lock(addr.lock); print("}\n"); print(" pid ", addr.pid, "\n"); print(" oldenv ", addr.oldenv, "\n"); print(" nthreads ", addr.nthreads, "\n"); print("Tqueue threads {\n"); Tqueue(addr.threads); print("}\n"); print("Tqueue runnable {\n"); Tqueue(addr.runnable); print("}\n"); print(" curthread ", addr.curthread\X, "\n"); print(" blocked ", addr.blocked, "\n"); print(" nextID ", addr.nextID, "\n"); print(" next ", addr.next\X, "\n"); print(" arg ", addr.arg\X, "\n"); print(" str ", addr.str, "\n"); print(" udata ", addr.udata, "\n"); }; sizeofNewproc = 24; aggr Newproc { 'X' 0 stack; 'U' 4 stacksize; 'X' 8 stackptr; 'U' 12 launcher; 'D' 16 grp; }; defn Newproc(addr) { complex Newproc addr; print(" stack ", addr.stack\X, "\n"); print(" stacksize ", addr.stacksize, "\n"); print(" stackptr ", addr.stackptr\X, "\n"); print(" launcher ", addr.launcher, "\n"); print(" grp ", addr.grp, "\n"); }; sizeofExecproc = 4112; aggr Execproc { 'A' Proc 0 procp; 'X' 4 file; 'X' 8 arg; 'a' 12 data; }; defn Execproc(addr) { complex Execproc addr; print(" procp ", addr.procp\X, "\n"); print(" file ", addr.file\X, "\n"); print(" arg ", addr.arg\X, "\n"); print(" data ", addr.data, "\n"); }; sizeofPqueue = 16; aggr Pqueue { Lock 0 lock; 'A' Proc 8 $head; 'A' Proc 12 $tail; }; defn Pqueue(addr) { complex Pqueue addr; print("Lock lock {\n"); Lock(addr.lock); print("}\n"); print(" $head ", addr.$head\X, "\n"); print(" $tail ", addr.$tail\X, "\n"); }; complex Pqueue pq; complex Proc procp; complex Thread dontkill; complex Tqueue rendez; complex Lock rendezlock; complex Channel thewaitchan; complex Pqueue pq; complex Proc procp; complex Proc notehandler:p; complex Thread notehandler:t; complex Thread threadexits:t; complex Thread threadexits:new; complex Proc threadexits:p; complex Channel threadexits:c; complex Waitmsg threadexits:w; complex Channel threadexitsall:c; complex Thread yield:new; complex Thread yield:t; complex Proc yield:p;