sizeof_1_ = 8;
aggr _1_
{
       'D' 0 llength;
       'D' 4 hlength;
};

defn
_1_(addr) {
       complex _1_ addr;
       print(" llength ", addr.llength, "\n");
       print(" hlength ", addr.hlength, "\n");
};

sizeof_2_ = 8;
aggr _2_
{
       'V' 0 length;
       {
       'D' 0 llength;
       'D' 4 hlength;
       };
};

defn
_2_(addr) {
       complex _2_ addr;
       print(" length  ", addr.length, "\n");
       print("_1_ {\n");
               _1_(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 = 4;
aggr Lock
{
       'D' 0 val;
};

defn
Lock(addr) {
       complex Lock addr;
       print(" val     ", addr.val, "\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 = 16;
aggr QLock
{
       Lock 0 lock;
       'D' 4 locked;
       'A' QLp 8 $head;
       'A' QLp 12 $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 = 20;
aggr RWLock
{
       Lock 0 lock;
       'D' 4 readers;
       'D' 8 writer;
       'A' QLp 12 $head;
       'A' QLp 16 $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;
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 = 116;
aggr Dir
{
       'a' 0 name;
       'a' 28 uid;
       'a' 56 gid;
       Qid 84 qid;
       'U' 92 mode;
       'D' 96 atime;
       'D' 100 mtime;
       {
       'V' 104 length;
       {
       'D' 104 llength;
       'D' 108 hlength;
       };
       };
       'u' 112 type;
       'u' 114 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("_2_ {\n");
               _2_(addr+104);
       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");
};

Bsize = 8192;
Bungetsize = 4;
Bmagic = 3227993;
Beof = -1;
Bbad = -2;
Binactive = 0;
Bractive = 1;
Bwactive = 2;
Bracteof = 3;
sizeofBiobufhdr = 52;
aggr Biobufhdr
{
       'D' 0 icount;
       'D' 4 ocount;
       'D' 8 rdline;
       'D' 12 runesize;
       'D' 16 state;
       'D' 20 fid;
       'D' 24 flag;
       'V' 28 offset;
       'D' 36 bsize;
       'X' 40 bbuf;
       'X' 44 ebuf;
       'X' 48 gbuf;
};

defn
Biobufhdr(addr) {
       complex Biobufhdr addr;
       print(" icount  ", addr.icount, "\n");
       print(" ocount  ", addr.ocount, "\n");
       print(" rdline  ", addr.rdline, "\n");
       print(" runesize        ", addr.runesize, "\n");
       print(" state   ", addr.state, "\n");
       print(" fid     ", addr.fid, "\n");
       print(" flag    ", addr.flag, "\n");
       print(" offset  ", addr.offset, "\n");
       print(" bsize   ", addr.bsize, "\n");
       print(" bbuf    ", addr.bbuf\X, "\n");
       print(" ebuf    ", addr.ebuf\X, "\n");
       print(" gbuf    ", addr.gbuf\X, "\n");
};

sizeofBiobuf = 8248;
aggr Biobuf
{
       {
       'D' 0 icount;
       'D' 4 ocount;
       'D' 8 rdline;
       'D' 12 runesize;
       'D' 16 state;
       'D' 20 fid;
       'D' 24 flag;
       'V' 28 offset;
       'D' 36 bsize;
       'X' 40 bbuf;
       'X' 44 ebuf;
       'X' 48 gbuf;
       };
       'a' 52 b;
};

defn
Biobuf(addr) {
       complex Biobuf addr;
       print("Biobufhdr {\n");
               Biobufhdr(addr+0);
       print("}\n");
       print(" b       ", addr.b, "\n");
};

sizeof_3_ = 4;
aggr _3_
{
       'X' 0 sp;
       'X' 0 rsp;
};

defn
_3_(addr) {
       complex _3_ addr;
       print(" sp      ", addr.sp\X, "\n");
       print(" rsp     ", addr.rsp\X, "\n");
};

sizeof_4_ = 4;
aggr _4_
{
       'X' 0 ep;
       'X' 0 rep;
};

defn
_4_(addr) {
       complex _4_ addr;
       print(" ep      ", addr.ep\X, "\n");
       print(" rep     ", addr.rep\X, "\n");
};

sizeofResub = 8;
aggr Resub
{
       {
       'X' 0 sp;
       'X' 0 rsp;
       };
       {
       'X' 4 ep;
       'X' 4 rep;
       };
};

defn
Resub(addr) {
       complex Resub addr;
       print("_3_ {\n");
               _3_(addr+0);
       print("}\n");
       print("_4_ {\n");
               _4_(addr+4);
       print("}\n");
};

sizeofReclass = 132;
aggr Reclass
{
       'X' 0 end;
       'a' 4 spans;
};

defn
Reclass(addr) {
       complex Reclass addr;
       print(" end     ", addr.end\X, "\n");
       print(" spans   ", addr.spans, "\n");
};

sizeof_5_ = 4;
aggr _5_
{
       'A' Reclass 0 cp;
       'u' 0 r;
       'D' 0 subid;
       'X' 0 right;
};

defn
_5_(addr) {
       complex _5_ addr;
       print(" cp      ", addr.cp\X, "\n");
       print(" r       ", addr.r, "\n");
       print(" subid   ", addr.subid, "\n");
       print(" right   ", addr.right\X, "\n");
};

sizeof_6_ = 4;
aggr _6_
{
       'X' 0 left;
       'X' 0 next;
};

defn
_6_(addr) {
       complex _6_ addr;
       print(" left    ", addr.left\X, "\n");
       print(" next    ", addr.next\X, "\n");
};

sizeofReinst = 12;
aggr Reinst
{
       'D' 0 type;
       {
       'A' Reclass 4 cp;
       'u' 4 r;
       'D' 4 subid;
       'A' Reinst 4 right;
       };
       {
       'A' Reinst 8 left;
       'A' Reinst 8 next;
       };
};

defn
Reinst(addr) {
       complex Reinst addr;
       print(" type    ", addr.type, "\n");
       print("_5_ {\n");
               _5_(addr+4);
       print("}\n");
       print("_6_ {\n");
               _6_(addr+8);
       print("}\n");
};

sizeofReprog = 2176;
aggr Reprog
{
       'A' Reinst 0 startinst;
       'a' 4 class;
       'a' 2116 firstinst;
};

defn
Reprog(addr) {
       complex Reprog addr;
       print(" startinst       ", addr.startinst\X, "\n");
       print(" class   ", addr.class, "\n");
       print(" firstinst       ", addr.firstinst, "\n");
};

complex Biobuf bout;
sizeofBufblock = 16;
aggr Bufblock
{
       'A' Bufblock 0 next;
       'X' 4 start;
       'X' 8 end;
       'X' 12 current;
};

defn
Bufblock(addr) {
       complex Bufblock addr;
       print(" next    ", addr.next\X, "\n");
       print(" start   ", addr.start\X, "\n");
       print(" end     ", addr.end\X, "\n");
       print(" current ", addr.current\X, "\n");
};

sizeofWord = 8;
aggr Word
{
       'X' 0 s;
       'A' Word 4 next;
};

defn
Word(addr) {
       complex Word addr;
       print(" s       ", addr.s\X, "\n");
       print(" next    ", addr.next\X, "\n");
};

sizeofEnvy = 8;
aggr Envy
{
       'X' 0 name;
       'A' Word 4 values;
};

defn
Envy(addr) {
       complex Envy addr;
       print(" name    ", addr.name\X, "\n");
       print(" values  ", addr.values\X, "\n");
};

complex Envy envy;
sizeofRule = 44;
aggr Rule
{
       'X' 0 target;
       'A' Word 4 $tail;
       'X' 8 recipe;
       'd' 12 attr;
       'd' 14 line;
       'X' 16 file;
       'A' Word 20 alltargets;
       'D' 24 rule;
       'A' Reprog 28 pat;
       'X' 32 prog;
       'A' Rule 36 chain;
       'A' Rule 40 next;
};

defn
Rule(addr) {
       complex Rule addr;
       print(" target  ", addr.target\X, "\n");
       print(" $tail   ", addr.$tail\X, "\n");
       print(" recipe  ", addr.recipe\X, "\n");
       print(" attr    ", addr.attr, "\n");
       print(" line    ", addr.line, "\n");
       print(" file    ", addr.file\X, "\n");
       print(" alltargets      ", addr.alltargets\X, "\n");
       print(" rule    ", addr.rule, "\n");
       print(" pat     ", addr.pat\X, "\n");
       print(" prog    ", addr.prog\X, "\n");
       print(" chain   ", addr.chain\X, "\n");
       print(" next    ", addr.next\X, "\n");
};

complex Rule rules;
complex Rule metarules;
complex Rule patrule;
sizeofArc = 64;
aggr Arc
{
       'd' 0 flag;
       'X' 4 n;
       'A' Rule 8 r;
       'X' 12 stem;
       'X' 16 prog;
       'a' 20 match;
       'A' Arc 60 next;
};

defn
Arc(addr) {
       complex Arc addr;
       print(" flag    ", addr.flag, "\n");
       print(" n       ", addr.n\X, "\n");
       print(" r       ", addr.r\X, "\n");
       print(" stem    ", addr.stem\X, "\n");
       print(" prog    ", addr.prog\X, "\n");
       print(" match   ", addr.match, "\n");
       print(" next    ", addr.next\X, "\n");
};

sizeofNode = 20;
aggr Node
{
       'X' 0 name;
       'D' 4 time;
       'u' 8 flags;
       'A' Arc 12 prereqs;
       'A' Node 16 next;
};

defn
Node(addr) {
       complex Node addr;
       print(" name    ", addr.name\X, "\n");
       print(" time    ", addr.time, "\n");
       print(" flags   ", addr.flags, "\n");
       print(" prereqs ", addr.prereqs\X, "\n");
       print(" next    ", addr.next\X, "\n");
};

sizeofJob = 40;
aggr Job
{
       'A' Rule 0 r;
       'A' Node 4 n;
       'X' 8 stem;
       'X' 12 match;
       'A' Word 16 p;
       'A' Word 20 np;
       'A' Word 24 t;
       'A' Word 28 at;
       'D' 32 nproc;
       'A' Job 36 next;
};

defn
Job(addr) {
       complex Job addr;
       print(" r       ", addr.r\X, "\n");
       print(" n       ", addr.n\X, "\n");
       print(" stem    ", addr.stem\X, "\n");
       print(" match   ", addr.match\X, "\n");
       print(" p       ", addr.p\X, "\n");
       print(" np      ", addr.np\X, "\n");
       print(" t       ", addr.t\X, "\n");
       print(" at      ", addr.at\X, "\n");
       print(" nproc   ", addr.nproc, "\n");
       print(" next    ", addr.next\X, "\n");
};

complex Job jobs;
sizeofSymtab = 16;
aggr Symtab
{
       'd' 0 space;
       'X' 4 name;
       'X' 8 value;
       'A' Symtab 12 next;
};

defn
Symtab(addr) {
       complex Symtab addr;
       print(" space   ", addr.space, "\n");
       print(" name    ", addr.name\X, "\n");
       print(" value   ", addr.value\X, "\n");
       print(" next    ", addr.next\X, "\n");
};

S_VAR = 0;
S_TARGET = 1;
S_TIME = 2;
S_PID = 3;
S_NODE = 4;
S_AGG = 5;
S_BITCH = 6;
S_NOEXPORT = 7;
S_OVERRIDE = 8;
S_OUTOFDATE = 9;
S_MAKEFILE = 10;
S_MAKEVAR = 11;
S_EXPORTED = 12;
S_BULKED = 13;
S_WESET = 14;
S_INTERNAL = 15;
complex Word readenv:w;
complex Word encodenulls:w;
complex Word encodenulls:$head;
complex Envy exportenv:e;
complex Word exportenv:w;
complex Symtab exportenv:sy;
complex Dir dirtime:d;
complex Waitmsg waitfor:wm;
complex Bufblock execsh:buf;
complex Envy execsh:e;
complex Envy pipecmd:e;
complex Dir chgtime:sbuf;
complex Resub rcopy:match;
complex Dir mkdirstat:buf;

You are viewing proxied material from sdf.org. The copyright of proxied material belongs to its original authors. Any comments or complaints in relation to proxied material should be directed to the original authors of the content concerned. Please see the disclaimer for more details.