xref: /inferno-os/utils/libmach/t.c (revision d0e1d143ef6f03c75c008c7ec648859dd260cbab)
1 /*
2  * thumb definition
3  */
4 #include <lib9.h>
5 #include <bio.h>
6 #include "uregt.h"
7 #include "mach.h"
8 
9 
10 #define	REGOFF(x)	(ulong) (&((struct Ureg *) 0)->x)
11 
12 #define SP		REGOFF(r13)
13 #define PC		REGOFF(pc)
14 
15 #define	REGSIZE		sizeof(struct Ureg)
16 
17 Reglist thumbreglist[] =
18 {
19 	{"LINK",	REGOFF(link),		RINT|RRDONLY, 'X'},
20 	{"TYPE",	REGOFF(type),		RINT|RRDONLY, 'X'},
21 	{"PSR",		REGOFF(psr),		RINT|RRDONLY, 'X'},
22 	{"PC",		PC,			RINT, 'X'},
23 	{"SP",		SP,			RINT, 'X'},
24 	{"R15",		PC,			RINT, 'X'},
25 	{"R14",		REGOFF(r14),		RINT, 'X'},
26 	{"R13",		REGOFF(r13),		RINT, 'X'},
27 	{"R12",		REGOFF(r12),		RINT, 'X'},
28 	{"R11",		REGOFF(r11),		RINT, 'X'},
29 	{"R10",		REGOFF(r10),		RINT, 'X'},
30 	{"R9",		REGOFF(r9),		RINT, 'X'},
31 	{"R8",		REGOFF(r8),		RINT, 'X'},
32 	{"R7",		REGOFF(r7),		RINT, 'X'},
33 	{"R6",		REGOFF(r6),		RINT, 'X'},
34 	{"R5",		REGOFF(r5),		RINT, 'X'},
35 	{"R4",		REGOFF(r4),		RINT, 'X'},
36 	{"R3",		REGOFF(r3),		RINT, 'X'},
37 	{"R2",		REGOFF(r2),		RINT, 'X'},
38 	{"R1",		REGOFF(r1),		RINT, 'X'},
39 	{"R0",		REGOFF(r0),		RINT, 'X'},
40 	{  0 }
41 };
42 
43 	/* the machine description */
44 Mach mthumb =
45 {
46 	"thumb",
47 	MARM,	/*MTHUMB,*/		/* machine type */
48 	thumbreglist,	/* register set */
49 	REGSIZE,	/* register set size */
50 	0,		/* fp register set size */
51 	"PC",		/* name of PC */
52 	"SP",		/* name of SP */
53 	"R15",		/* name of link register */
54 	"setR12",	/* static base register name */
55 	0,		/* static base register value */
56 	0x1000,		/* page size */
57 	0x80000000,	/* kernel base */
58 	0,		/* kernel text mask */
59 	2,		/* quantization of pc */
60 	4,		/* szaddr */
61 	4,		/* szreg */
62 	4,		/* szfloat */
63 	8,		/* szdouble */
64 };
65 
66 typedef struct pcentry pcentry;
67 
68 struct pcentry{
69 	long start;
70 	long stop;
71 };
72 
73 static pcentry *pctab;
74 static int npctab;
75 
76 void
77 thumbpctab(Biobuf *b, Fhdr *fp)
78 {
79 	int n, o, ta;
80 	uchar c[8];
81 	pcentry *tab;
82 
83 	Bseek(b, fp->lnpcoff+fp->lnpcsz, 0);
84 	o = (int)Boffset(b);
85 	Bseek(b, 0, 2);
86 	n = (int)Boffset(b)-o;
87 	pctab = (pcentry*)malloc(n);
88 	if(pctab == 0)
89 		return;
90 	ta = fp->txtaddr;
91 	tab = pctab;
92 	Bseek(b, fp->lnpcoff+fp->lnpcsz, 0);
93 	while(Bread(b, c, sizeof(c)) == sizeof(c)){
94 		tab->start = ta + (c[0]<<24)|(c[1]<<16)|(c[2]<<8)|c[3];
95 		tab->stop = ta + (c[4]<<24)|(c[5]<<16)|(c[6]<<8)|c[7];
96 		tab++;
97 	}
98 	npctab = n/sizeof(c);
99 }
100 
101 int
102 thumbpclookup(ulong pc)
103 {
104 	ulong l, u, m;
105 	pcentry *tab = pctab;
106 
107 	l = 0;
108 	u = npctab-1;
109 	while(l < u){
110 		m = (l+u)/2;
111 		if(pc < tab[m].start)
112 			u = m-1;
113 		else if(pc > tab[m].stop)
114 			l = m+1;
115 		else
116 			l = u = m;
117 	}
118 	if(l == u && u >= 0 && u < npctab && tab[u].start <= pc && pc <= tab[u].stop)
119 		return 1;	// thumb
120 	return 0;	// arm
121 }
122 
123