bring kernel acid library in sync (import from sources)

This commit is contained in:
cinap_lenrek 2012-09-18 18:11:16 +02:00
parent c3cd4fe746
commit 36f4f9fcd3

View file

@ -32,7 +32,7 @@ IHASHSIZE = 64;
defn imagecacheline(h) { defn imagecacheline(h) {
while h != 0 do { while h != 0 do {
complex Image h; complex Image h;
print (h\X, " ", qid(h.qid), " type ", h.type\D, " ref ", h.ref, " next ", h.next\X, " ", cname(h.c), "\n"); print (h\X, " ", qid(h.qid), " type ", h.type\D, " ref ", h.ref, " next ", h.next\X, " ", path(h.c.path), "\n");
h = h.hash; h = h.hash;
} }
} }
@ -46,10 +46,6 @@ defn imagecache() {
} }
} }
defn cname(c) {
return *(((Path)c.path).s\s);
}
// dump channels // dump channels
defn chan(c) { defn chan(c) {
local d, q; local d, q;
@ -60,9 +56,9 @@ defn chan(c) {
print("chan(", c\X, "): ref=", c.ref\D, " #", d.dc\r, c.dev\D, " (", q.path, " ", q.vers\D, " ", q.type\X, ")"); print("chan(", c\X, "): ref=", c.ref\D, " #", d.dc\r, c.dev\D, " (", q.path, " ", q.vers\D, " ", q.type\X, ")");
print(" fid=", c.fid\D, " iounit=", c.iounit\D); print(" fid=", c.fid\D, " iounit=", c.iounit\D);
if c.ref != 0 then { if c.ref != 0 then {
print(" ", cname(c), " mchan=", c.mchan\X); print(" ", path(c.path), " mchan=", c.mchan\X);
if c.mchan != 0 then { if c.mchan != 0 then {
print(" ", cname(c.mchan)); print(" ", path(c.mchan.path));
} }
} }
print("\n"); print("\n");
@ -190,7 +186,7 @@ defn procenv(p) {
e = p.egrp; e = p.egrp;
complex Egrp e; complex Egrp e;
v = e.entries; v = e.ent;
while v != 0 do { while v != 0 do {
complex Evalue v; complex Evalue v;
print(*(v.name\s), "="); print(*(v.name\s), "=");
@ -337,7 +333,7 @@ PTEPERTAB = (PTEMAPMEM/BY2PG);
defn up() { defn up() {
local mach; local mach;
MACHADDR = KZERO+0x4000; MACHADDR = KZERO+0x15000;
mach = MACHADDR; mach = MACHADDR;
complex Mach mach; complex Mach mach;
return mach.externup; return mach.externup;