From d9c2aa3a3366b60d5054c575801692579162a47f Mon Sep 17 00:00:00 2001 From: rsc Date: Mon, 19 Apr 2004 18:19:09 +0000 Subject: whoops --- acid/core | Bin 122880 -> 0 bytes acid/elflink | 54 ------------------------------------------------------ 2 files changed, 54 deletions(-) delete mode 100644 acid/core delete mode 100644 acid/elflink (limited to 'acid') diff --git a/acid/core b/acid/core deleted file mode 100644 index 16b613a7..00000000 Binary files a/acid/core and /dev/null differ diff --git a/acid/elflink b/acid/elflink deleted file mode 100644 index 8e9f2e76..00000000 --- a/acid/elflink +++ /dev/null @@ -1,54 +0,0 @@ -aggr Rdebug -{ - 'X' 0 version; - 'X' 4 map; -}; - -aggr Rmap -{ - 'X' 0 addr; - 'X' 4 name; - 'X' 8 dynsect; - 'X' 12 next; - 'X' 16 prev; -}; - -defn -rdebug() -{ - local a; - - a = _DYNAMIC; - while *a != 0 do { - if *a == 21 then // 21 == DT_DEBUG - return *(a+4); - a = a+8; - } - return 0; -} - -defn -rlink() -{ - local r, m, n; - - r = rdebug(); - if r == 0 then - return {}; - complex Rdebug r; - print("version ", r.version, "\n"); - - m = r.map; - n = 0; - while m != 0 && n < 100 do { - complex Rmap m; - print("map ", m\X, " base ", m.addr\X, " next ", m.next\X, " name "); - if m.name then - print(*(m.name\s)); - else - print("''"); - print("\n"); - m = m.next; - n = n+1; - } -} -- cgit v1.2.3