]> git.lizzy.rs Git - plan9front.git/blob - sys/src/libmach/0.c
libaml: fix gc bug, need to amltake()/amldrop() temporary buffer
[plan9front.git] / sys / src / libmach / 0.c
1 /*
2  * mips r4k definition
3  *
4  * currently no compiler - not related to 0c
5  */
6 #include <u.h>
7 #include <libc.h>
8 #include <bio.h>
9 #include "mips2ureg.h"
10 #include <mach.h>
11
12 #define FPREGBYTES      4
13 #define REGOFF(x)       (ulong)(&((struct Ureg *) 0)->x)
14
15 #define SP              REGOFF(sp)
16 #define PC              REGOFF(pc)
17 #define R1              REGOFF(hr1)
18 #define R31             REGOFF(hr31)
19 #define FP_REG(x)       (R1+8+FPREGBYTES*(x))
20
21 #define REGSIZE         sizeof(struct Ureg)
22 #define FPREGSIZE       (FPREGBYTES*33)
23
24 Reglist mips2reglist[] = {
25         {"STATUS",      REGOFF(status),         RINT|RRDONLY, 'X'},
26         {"CAUSE",       REGOFF(cause),          RINT|RRDONLY, 'X'},
27         {"BADVADDR",    REGOFF(badvaddr),       RINT|RRDONLY, 'X'},
28         {"TLBVIRT",     REGOFF(tlbvirt),        RINT|RRDONLY, 'X'},
29         {"HI",          REGOFF(hhi),            RINT|RRDONLY, 'W'},
30         {"LO",          REGOFF(hlo),            RINT|RRDONLY, 'W'},
31         {"PC",          PC,             RINT, 'X'},
32         {"SP",          SP,             RINT, 'X'},
33         {"R31",         R31,            RINT, 'W'},
34         {"R30",         REGOFF(hr30),   RINT, 'W'},
35         {"R28",         REGOFF(hr28),   RINT, 'W'},
36         {"R27",         REGOFF(hr27),   RINT, 'W'},
37         {"R26",         REGOFF(hr26),   RINT, 'W'},
38         {"R25",         REGOFF(hr25),   RINT, 'W'},
39         {"R24",         REGOFF(hr24),   RINT, 'W'},
40         {"R23",         REGOFF(hr23),   RINT, 'W'},
41         {"R22",         REGOFF(hr22),   RINT, 'W'},
42         {"R21",         REGOFF(hr21),   RINT, 'W'},
43         {"R20",         REGOFF(hr20),   RINT, 'W'},
44         {"R19",         REGOFF(hr19),   RINT, 'W'},
45         {"R18",         REGOFF(hr18),   RINT, 'W'},
46         {"R17",         REGOFF(hr17),   RINT, 'W'},
47         {"R16",         REGOFF(hr16),   RINT, 'W'},
48         {"R15",         REGOFF(hr15),   RINT, 'W'},
49         {"R14",         REGOFF(hr14),   RINT, 'W'},
50         {"R13",         REGOFF(hr13),   RINT, 'W'},
51         {"R12",         REGOFF(hr12),   RINT, 'W'},
52         {"R11",         REGOFF(hr11),   RINT, 'W'},
53         {"R10",         REGOFF(hr10),   RINT, 'W'},
54         {"R9",          REGOFF(hr9),    RINT, 'W'},
55         {"R8",          REGOFF(hr8),    RINT, 'W'},
56         {"R7",          REGOFF(hr7),    RINT, 'W'},
57         {"R6",          REGOFF(hr6),    RINT, 'W'},
58         {"R5",          REGOFF(hr5),    RINT, 'W'},
59         {"R4",          REGOFF(hr4),    RINT, 'W'},
60         {"R3",          REGOFF(hr3),    RINT, 'W'},
61         {"R2",          REGOFF(hr2),    RINT, 'W'},
62         {"R1",          REGOFF(hr1),    RINT, 'W'},
63         {"F0",          FP_REG(0),      RFLT, 'F'},
64         {"F1",          FP_REG(1),      RFLT, 'f'},
65         {"F2",          FP_REG(2),      RFLT, 'F'},
66         {"F3",          FP_REG(3),      RFLT, 'f'},
67         {"F4",          FP_REG(4),      RFLT, 'F'},
68         {"F5",          FP_REG(5),      RFLT, 'f'},
69         {"F6",          FP_REG(6),      RFLT, 'F'},
70         {"F7",          FP_REG(7),      RFLT, 'f'},
71         {"F8",          FP_REG(8),      RFLT, 'F'},
72         {"F9",          FP_REG(9),      RFLT, 'f'},
73         {"F10",         FP_REG(10),     RFLT, 'F'},
74         {"F11",         FP_REG(11),     RFLT, 'f'},
75         {"F12",         FP_REG(12),     RFLT, 'F'},
76         {"F13",         FP_REG(13),     RFLT, 'f'},
77         {"F14",         FP_REG(14),     RFLT, 'F'},
78         {"F15",         FP_REG(15),     RFLT, 'f'},
79         {"F16",         FP_REG(16),     RFLT, 'F'},
80         {"F17",         FP_REG(17),     RFLT, 'f'},
81         {"F18",         FP_REG(18),     RFLT, 'F'},
82         {"F19",         FP_REG(19),     RFLT, 'f'},
83         {"F20",         FP_REG(20),     RFLT, 'F'},
84         {"F21",         FP_REG(21),     RFLT, 'f'},
85         {"F22",         FP_REG(22),     RFLT, 'F'},
86         {"F23",         FP_REG(23),     RFLT, 'f'},
87         {"F24",         FP_REG(24),     RFLT, 'F'},
88         {"F25",         FP_REG(25),     RFLT, 'f'},
89         {"F26",         FP_REG(26),     RFLT, 'F'},
90         {"F27",         FP_REG(27),     RFLT, 'f'},
91         {"F28",         FP_REG(28),     RFLT, 'F'},
92         {"F29",         FP_REG(29),     RFLT, 'f'},
93         {"F30",         FP_REG(30),     RFLT, 'F'},
94         {"F31",         FP_REG(31),     RFLT, 'f'},
95         {"FPCR",        FP_REG(32),     RFLT, 'X'},
96         {  0 }
97 };
98
99         /* mips r4k big-endian */
100 Mach mmips2be =
101 {
102         "mips2",
103         MMIPS2,         /* machine type */
104         mips2reglist,   /* register set */
105         REGSIZE,        /* number of bytes in reg set */
106         FPREGSIZE,      /* number of bytes in fp reg set */
107         "PC",           /* name of PC */
108         "SP",           /* name of SP */
109         "R31",          /* name of link register */
110         "setR30",       /* static base register name */
111         0,              /* SB value */
112         0x1000,         /* page size */
113         0xC0000000,     /* kernel base */
114         0x40000000,     /* kernel text mask */
115         0x7FFFFFFFULL,  /* user stack top */
116         4,              /* quantization of pc */
117         4,              /* szaddr */
118         8,              /* szreg */
119         4,              /* szfloat */
120         8,              /* szdouble */
121 };
122
123         /* mips r4k little-endian */
124 Mach mmips2le =
125 {
126         "mips2",
127         NMIPS2,         /* machine type */
128         mips2reglist,   /* register set */
129         REGSIZE,        /* number of bytes in reg set */
130         FPREGSIZE,      /* number of bytes in fp reg set */
131         "PC",           /* name of PC */
132         "SP",           /* name of SP */
133         "R31",          /* name of link register */
134         "setR30",       /* static base register name */
135         0,              /* SB value */
136         0x1000,         /* page size */
137         0xC0000000ULL,  /* kernel base */
138         0x40000000ULL,  /* kernel text mask */
139         0x7FFFFFFFULL,  /* user stack top */
140         4,              /* quantization of pc */
141         4,              /* szaddr */
142         8,              /* szreg */
143         4,              /* szfloat */
144         8,              /* szdouble */
145 };