2 84114f06 2004-04-19 devnull * init routines
4 84114f06 2004-04-19 devnull #include "defs.h"
5 84114f06 2004-04-19 devnull #include "fns.h"
7 84114f06 2004-04-19 devnull char *symfil;
8 84114f06 2004-04-19 devnull char *corfil;
10 84114f06 2004-04-19 devnull Map *symmap;
11 84114f06 2004-04-19 devnull Map *cormap;
12 84114f06 2004-04-19 devnull Regs *correg;
13 84114f06 2004-04-19 devnull Map *dotmap;
16 84114f06 2004-04-19 devnull setsym(void)
18 30880121 2005-01-07 devnull if(symhdr && symopen(symhdr) < 0)
19 30880121 2005-01-07 devnull dprint("symopen: %r\n");
21 84114f06 2004-04-19 devnull Symbol s;
22 84114f06 2004-04-19 devnull if (mach->sbreg && lookup(0, mach->sbreg, &s) < 0)
23 84114f06 2004-04-19 devnull mach->sb = s.loc.addr;
28 84114f06 2004-04-19 devnull setcor(void)
30 b030a6c3 2005-01-23 devnull static int mapped;
32 b030a6c3 2005-01-23 devnull if (corhdr) {
33 b030a6c3 2005-01-23 devnull if (!mapped) {
34 84114f06 2004-04-19 devnull if (mapfile(corhdr, 0, cormap, &correg) < 0)
35 84114f06 2004-04-19 devnull dprint("mapfile %s: %r\n", corfil);
36 b030a6c3 2005-01-23 devnull mapped = 1;
38 b030a6c3 2005-01-23 devnull free(correg);
39 b030a6c3 2005-01-23 devnull if (pid == 0 && corhdr->nthread > 0)
40 b030a6c3 2005-01-23 devnull pid = corhdr->thread[0].id;
41 b030a6c3 2005-01-23 devnull correg = coreregs(corhdr, pid);
42 b030a6c3 2005-01-23 devnull if(correg == nil)
43 b030a6c3 2005-01-23 devnull dprint("no such pid in core dump\n");
45 b030a6c3 2005-01-23 devnull unmapproc(cormap);
46 b030a6c3 2005-01-23 devnull unmapfile(corhdr, cormap);
47 b030a6c3 2005-01-23 devnull free(correg);
48 b030a6c3 2005-01-23 devnull correg = nil;
50 b030a6c3 2005-01-23 devnull if (pid > 0) {
51 b030a6c3 2005-01-23 devnull if (mapproc(pid, cormap, &correg) < 0)
52 b030a6c3 2005-01-23 devnull dprint("mapproc %d: %r\n", pid);
54 84114f06 2004-04-19 devnull dprint("no core image\n");
61 84114f06 2004-04-19 devnull dumbmap(int fd)
63 84114f06 2004-04-19 devnull Map *dumb;
66 84114f06 2004-04-19 devnull dumb = allocmap();
67 84114f06 2004-04-19 devnull memset(&s, 0, sizeof s);
68 84114f06 2004-04-19 devnull s.fd = fd;
69 84114f06 2004-04-19 devnull s.base = 0;
70 84114f06 2004-04-19 devnull s.offset = 0;
71 84114f06 2004-04-19 devnull s.size = 0xFFFFFFFF;
72 84114f06 2004-04-19 devnull s.name = "data";
73 84114f06 2004-04-19 devnull s.file = "<dumb>";
74 84114f06 2004-04-19 devnull if(addseg(dumb, s) < 0){
75 84114f06 2004-04-19 devnull freemap(dumb);
76 84114f06 2004-04-19 devnull return nil;
78 84114f06 2004-04-19 devnull if(mach == nil)
79 84114f06 2004-04-19 devnull mach = machcpu;
80 84114f06 2004-04-19 devnull return dumb;
84 84114f06 2004-04-19 devnull * set up maps for a direct process image (/proc)
87 84114f06 2004-04-19 devnull cmdmap(Map *map)
90 84114f06 2004-04-19 devnull char name[MAXSYM];
93 84114f06 2004-04-19 devnull readsym(name);
94 84114f06 2004-04-19 devnull i = findseg(map, name, nil);
95 84114f06 2004-04-19 devnull if (i < 0) /* not found */
96 84114f06 2004-04-19 devnull error("Invalid map name");
98 84114f06 2004-04-19 devnull if (expr(0)) {
99 cbeb0b26 2006-04-01 devnull /* if (strcmp(name, "text") == 0) */
100 cbeb0b26 2006-04-01 devnull /* textseg(expv, &fhdr); */
101 84114f06 2004-04-19 devnull map->seg[i].base = expv;
103 84114f06 2004-04-19 devnull error("Invalid base address");
104 84114f06 2004-04-19 devnull if (expr(0))
105 84114f06 2004-04-19 devnull map->seg[i].size = expv - map->seg[i].base;
107 84114f06 2004-04-19 devnull error("Invalid end address");
108 84114f06 2004-04-19 devnull if (expr(0))
109 84114f06 2004-04-19 devnull map->seg[i].offset = expv;
111 84114f06 2004-04-19 devnull error("Invalid file offset");
113 84114f06 2004-04-19 devnull if (rdc()=='?' && map == cormap) {
114 84114f06 2004-04-19 devnull if (fcor)
115 84114f06 2004-04-19 devnull close(fcor);
116 84114f06 2004-04-19 devnull fcor=fsym;
117 84114f06 2004-04-19 devnull corfil = symfil;
118 84114f06 2004-04-19 devnull cormap = symmap;
119 84114f06 2004-04-19 devnull } else if (lastc == '/' && map == symmap) {
120 84114f06 2004-04-19 devnull if (fsym)
121 84114f06 2004-04-19 devnull close(fsym);
122 84114f06 2004-04-19 devnull fsym=fcor;
123 84114f06 2004-04-19 devnull symfil=corfil;
124 84114f06 2004-04-19 devnull symmap=cormap;
126 84114f06 2004-04-19 devnull reread();
131 84114f06 2004-04-19 devnull kmsys(void)
135 84114f06 2004-04-19 devnull i = findseg(symmap, "text", symfil);
136 84114f06 2004-04-19 devnull if (i >= 0) {
137 84114f06 2004-04-19 devnull symmap->seg[i].base = symmap->seg[i].base&~mach->ktmask;
138 84114f06 2004-04-19 devnull symmap->seg[i].size = -symmap->seg[i].base;
140 84114f06 2004-04-19 devnull i = findseg(symmap, "data", symfil);
141 84114f06 2004-04-19 devnull if (i >= 0) {
142 84114f06 2004-04-19 devnull symmap->seg[i].base = symmap->seg[i].base&~mach->ktmask;
143 84114f06 2004-04-19 devnull symmap->seg[i].size = -symmap->seg[i].base;
148 84114f06 2004-04-19 devnull attachprocess(void)
150 84114f06 2004-04-19 devnull if (!adrflg) {
151 b030a6c3 2005-01-23 devnull dprint("usage: pid$a\n");
154 84114f06 2004-04-19 devnull pid = adrval;
155 84114f06 2004-04-19 devnull setcor();