]> git.lizzy.rs Git - plan9front.git/blob - sys/src/libmach/k.c
libaml: fix gc bug, need to amltake()/amldrop() temporary buffer
[plan9front.git] / sys / src / libmach / k.c
1 /*
2  * sparc definition
3  */
4 #include <u.h>
5 #include <libc.h>
6 #include <bio.h>
7 #include <mach.h>
8
9 #pragma pack on
10 #include "/sparc/include/ureg.h"
11 #pragma pack off
12
13 #define REGOFF(x)       (uintptr)(&((struct Ureg *) 0)->x)
14
15 #define R1              REGOFF(r1)
16 #define R7              REGOFF(r7)
17 #define PC              REGOFF(pc)
18 #define R15             REGOFF(r15)
19
20 #define REGSIZE         sizeof(struct Ureg)
21 #define FP_REG(x)       (REGSIZE+4*(x))
22 #define FPREGSIZE       (33*4)
23
24 Reglist sparcreglist[] = {
25         {"Y",           REGOFF(y),      RINT|RRDONLY, 'X'},
26         {"TBR",         REGOFF(tbr),    RINT|RRDONLY, 'X'},
27         {"PSR",         REGOFF(psr),    RINT|RRDONLY, 'X'},
28         {"PC",          REGOFF(pc),     RINT, 'X'},
29         {"R1",          REGOFF(r1),     RINT, 'X'},
30         {"R2",          REGOFF(r2),     RINT, 'X'},
31         {"R3",          REGOFF(r3),     RINT, 'X'},
32         {"R4",          REGOFF(r4),     RINT, 'X'},
33         {"R5",          REGOFF(r5),     RINT, 'X'},
34         {"R6",          REGOFF(r6),     RINT, 'X'},
35         {"R7",          REGOFF(r7),     RINT, 'X'},
36         {"R8",          REGOFF(r8),     RINT, 'X'},
37         {"R9",          REGOFF(r9),     RINT, 'X'},
38         {"R10",         REGOFF(r10),    RINT, 'X'},
39         {"R11",         REGOFF(r11),    RINT, 'X'},
40         {"R12",         REGOFF(r12),    RINT, 'X'},
41         {"R13",         REGOFF(r13),    RINT, 'X'},
42         {"R14",         REGOFF(r14),    RINT, 'X'},
43         {"R15",         REGOFF(r15),    RINT, 'X'},
44         {"R16",         REGOFF(r16),    RINT, 'X'},
45         {"R17",         REGOFF(r17),    RINT, 'X'},
46         {"R18",         REGOFF(r18),    RINT, 'X'},
47         {"R19",         REGOFF(r19),    RINT, 'X'},
48         {"R20",         REGOFF(r20),    RINT, 'X'},
49         {"R21",         REGOFF(r21),    RINT, 'X'},
50         {"R22",         REGOFF(r22),    RINT, 'X'},
51         {"R23",         REGOFF(r23),    RINT, 'X'},
52         {"R24",         REGOFF(r24),    RINT, 'X'},
53         {"R25",         REGOFF(r25),    RINT, 'X'},
54         {"R26",         REGOFF(r26),    RINT, 'X'},
55         {"R27",         REGOFF(r27),    RINT, 'X'},
56         {"R28",         REGOFF(r28),    RINT, 'X'},
57         {"R29",         REGOFF(r29),    RINT, 'X'},
58         {"R30",         REGOFF(r30),    RINT, 'X'},
59         {"R31",         REGOFF(r31),    RINT, 'X'},
60         {"NPC",         REGOFF(npc),    RINT, 'X'},
61
62         {"FSR",         FP_REG(0),      RINT, 'X'},
63         {"F0",          FP_REG(1),      RFLT, 'F'},
64         {"F1",          FP_REG(2),      RFLT, 'f'},
65         {"F2",          FP_REG(3),      RFLT, 'F'},
66         {"F3",          FP_REG(4),      RFLT, 'f'},
67         {"F4",          FP_REG(5),      RFLT, 'F'},
68         {"F5",          FP_REG(6),      RFLT, 'f'},
69         {"F6",          FP_REG(7),      RFLT, 'F'},
70         {"F7",          FP_REG(8),      RFLT, 'f'},
71         {"F8",          FP_REG(9),      RFLT, 'F'},
72         {"F9",          FP_REG(10),     RFLT, 'f'},
73         {"F10",         FP_REG(11),     RFLT, 'F'},
74         {"F11",         FP_REG(12),     RFLT, 'f'},
75         {"F12",         FP_REG(13),     RFLT, 'F'},
76         {"F13",         FP_REG(14),     RFLT, 'f'},
77         {"F14",         FP_REG(15),     RFLT, 'F'},
78         {"F15",         FP_REG(16),     RFLT, 'f'},
79         {"F16",         FP_REG(17),     RFLT, 'F'},
80         {"F17",         FP_REG(18),     RFLT, 'f'},
81         {"F18",         FP_REG(19),     RFLT, 'F'},
82         {"F19",         FP_REG(20),     RFLT, 'f'},
83         {"F20",         FP_REG(21),     RFLT, 'F'},
84         {"F21",         FP_REG(22),     RFLT, 'f'},
85         {"F22",         FP_REG(23),     RFLT, 'F'},
86         {"F23",         FP_REG(24),     RFLT, 'f'},
87         {"F24",         FP_REG(25),     RFLT, 'F'},
88         {"F25",         FP_REG(26),     RFLT, 'f'},
89         {"F26",         FP_REG(27),     RFLT, 'F'},
90         {"F27",         FP_REG(28),     RFLT, 'f'},
91         {"F28",         FP_REG(29),     RFLT, 'F'},
92         {"F29",         FP_REG(30),     RFLT, 'f'},
93         {"F30",         FP_REG(31),     RFLT, 'F'},
94         {"F31",         FP_REG(32),     RFLT, 'f'},
95         {  0 }
96 };
97
98 /*
99  * sparc has same stack format as mips
100  */
101 Mach msparc =
102 {
103         "sparc",
104         MSPARC,         /* machine type */
105         sparcreglist,   /* register list */
106         REGSIZE,        /* register set size in bytes */
107         FPREGSIZE,      /* floating point register size in bytes */
108         "PC",           /* name of PC */
109         "R1",           /* name of SP */
110         "R15",          /* name of link register */
111         "setSB",        /* static base register name */
112         0,              /* value */
113         0x1000,         /* page size */
114         0xE0000000ULL,  /* kernel base */
115         0xE0000000ULL,  /* kernel text mask */
116         0x7FFFFFFFULL,  /* user stack top */
117         4,              /* quantization of pc */
118         4,              /* szaddr */
119         4,              /* szreg */
120         4,              /* szfloat */
121         8,              /* szdouble */
122 };