Rev 606 | Go to most recent revision | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 606 | Rev 610 | ||
---|---|---|---|
1 | /* |
1 | /* |
2 | * Copyright (C) 2005 Ondrej Palkovsky |
2 | * Copyright (C) 2005 Ondrej Palkovsky |
3 | * All rights reserved. |
3 | * All rights reserved. |
4 | * |
4 | * |
5 | * Redistribution and use in source and binary forms, with or without |
5 | * Redistribution and use in source and binary forms, with or without |
6 | * modification, are permitted provided that the following conditions |
6 | * modification, are permitted provided that the following conditions |
7 | * are met: |
7 | * are met: |
8 | * |
8 | * |
9 | * - Redistributions of source code must retain the above copyright |
9 | * - Redistributions of source code must retain the above copyright |
10 | * notice, this list of conditions and the following disclaimer. |
10 | * notice, this list of conditions and the following disclaimer. |
11 | * - Redistributions in binary form must reproduce the above copyright |
11 | * - Redistributions in binary form must reproduce the above copyright |
12 | * notice, this list of conditions and the following disclaimer in the |
12 | * notice, this list of conditions and the following disclaimer in the |
13 | * documentation and/or other materials provided with the distribution. |
13 | * documentation and/or other materials provided with the distribution. |
14 | * - The name of the author may not be used to endorse or promote products |
14 | * - The name of the author may not be used to endorse or promote products |
15 | * derived from this software without specific prior written permission. |
15 | * derived from this software without specific prior written permission. |
16 | * |
16 | * |
17 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
17 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
18 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
18 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
19 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
19 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
20 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
20 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
21 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
21 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
22 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
22 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
23 | * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
23 | * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
24 | * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
24 | * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
25 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
25 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
26 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
26 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
27 | */ |
27 | */ |
28 | 28 | ||
29 | #include <arch/drivers/arc.h> |
29 | #include <arch/drivers/arc.h> |
30 | #include <arch/mm/page.h> |
30 | #include <arch/mm/page.h> |
31 | #include <print.h> |
31 | #include <print.h> |
32 | #include <arch.h> |
32 | #include <arch.h> |
33 | #include <arch/byteorder.h> |
33 | #include <arch/byteorder.h> |
34 | #include <arch/mm/frame.h> |
34 | #include <arch/mm/frame.h> |
35 | #include <mm/frame.h> |
35 | #include <mm/frame.h> |
36 | #include <interrupt.h> |
36 | #include <interrupt.h> |
37 | #include <align.h> |
37 | #include <align.h> |
38 | #include <console/console.h> |
38 | #include <console/console.h> |
39 | 39 | ||
40 | /* This is a good joke, SGI HAS different types than NT bioses... */ |
40 | /* This is a good joke, SGI HAS different types than NT bioses... */ |
41 | /* Here is the SGI type */ |
41 | /* Here is the SGI type */ |
42 | static char *basetypes[] = { |
42 | static char *basetypes[] = { |
43 | "ExceptionBlock", |
43 | "ExceptionBlock", |
44 | "SystemParameterBlock", |
44 | "SystemParameterBlock", |
45 | "FreeContiguous", |
45 | "FreeContiguous", |
46 | "FreeMemory", |
46 | "FreeMemory", |
47 | "BadMemory", |
47 | "BadMemory", |
48 | "LoadedProgram", |
48 | "LoadedProgram", |
49 | "FirmwareTemporary", |
49 | "FirmwareTemporary", |
50 | "FirmwarePermanent" |
50 | "FirmwarePermanent" |
51 | }; |
51 | }; |
52 | 52 | ||
53 | static char *ctypes[] = { |
53 | static char *ctypes[] = { |
54 | "ARC_type", |
54 | "ARC_type", |
55 | "CPU_type", |
55 | "CPU_type", |
56 | "FPU_type", |
56 | "FPU_type", |
57 | "PrimaryICache", |
57 | "PrimaryICache", |
58 | "PrimaryDCache", |
58 | "PrimaryDCache", |
59 | "SecondaryICache", |
59 | "SecondaryICache", |
60 | "SecondaryDCache", |
60 | "SecondaryDCache", |
61 | "SecondaryCache", |
61 | "SecondaryCache", |
62 | "Memory", |
62 | "Memory", |
63 | "EISAAdapter", |
63 | "EISAAdapter", |
64 | "TCAdapter", |
64 | "TCAdapter", |
65 | "SCSIAdapter", |
65 | "SCSIAdapter", |
66 | "DTIAdapter", |
66 | "DTIAdapter", |
67 | "MultiFunctionAdapter", |
67 | "MultiFunctionAdapter", |
68 | "DiskController", |
68 | "DiskController", |
69 | "TapeController", |
69 | "TapeController", |
70 | "CDROMController", |
70 | "CDROMController", |
71 | "WORMController", |
71 | "WORMController", |
72 | "SerialController", |
72 | "SerialController", |
73 | "NetworkController", |
73 | "NetworkController", |
74 | "DisplayController", |
74 | "DisplayController", |
75 | "ParallelController", |
75 | "ParallelController", |
76 | "PointerController", |
76 | "PointerController", |
77 | "KeyboardController", |
77 | "KeyboardController", |
78 | "AudioController", |
78 | "AudioController", |
79 | "OtherController", |
79 | "OtherController", |
80 | "DiskPeripheral", |
80 | "DiskPeripheral", |
81 | "FloppyDiskPeripheral", |
81 | "FloppyDiskPeripheral", |
82 | "TapePeripheral", |
82 | "TapePeripheral", |
83 | "ModemPeripheral", |
83 | "ModemPeripheral", |
84 | "MonitorPeripheral", |
84 | "MonitorPeripheral", |
85 | "PrinterPeripheral", |
85 | "PrinterPeripheral", |
86 | "PointerPeripheral", |
86 | "PointerPeripheral", |
87 | "KeyboardPeripheral", |
87 | "KeyboardPeripheral", |
88 | "TerminalPeripheral", |
88 | "TerminalPeripheral", |
89 | "OtherPeripheral", |
89 | "OtherPeripheral", |
90 | "LinePeripheral", |
90 | "LinePeripheral", |
91 | "NetworkPeripheral" |
91 | "NetworkPeripheral" |
92 | "OtherPeripheral", |
92 | "OtherPeripheral", |
93 | "XTalkAdapter", |
93 | "XTalkAdapter", |
94 | "PCIAdapter", |
94 | "PCIAdapter", |
95 | "GIOAdapter", |
95 | "GIOAdapter", |
96 | "TPUAdapter", |
96 | "TPUAdapter", |
97 | "Anonymous" |
97 | "Anonymous" |
98 | }; |
98 | }; |
99 | 99 | ||
100 | static arc_sbp *sbp = (arc_sbp *)PA2KA(0x1000); |
100 | static arc_sbp *sbp = (arc_sbp *)PA2KA(0x1000); |
101 | static arc_func_vector_t *arc_entry; |
101 | static arc_func_vector_t *arc_entry; |
102 | 102 | ||
103 | 103 | ||
104 | static void arc_putchar(char ch); |
104 | static void arc_putchar(char ch); |
105 | 105 | ||
106 | /** Return true if ARC is available */ |
106 | /** Return true if ARC is available */ |
107 | int arc_enabled(void) |
107 | int arc_enabled(void) |
108 | { |
108 | { |
109 | return sbp != NULL; |
109 | return sbp != NULL; |
110 | } |
110 | } |
111 | 111 | ||
112 | static void arc_print_component(arc_component *c) |
112 | static void arc_print_component(arc_component *c) |
113 | { |
113 | { |
114 | int i; |
114 | int i; |
115 | 115 | ||
116 | printf("%s: ",ctypes[c->type]); |
116 | printf("%s: ",ctypes[c->type]); |
117 | for (i=0;i < c->identifier_len;i++) |
117 | for (i=0;i < c->identifier_len;i++) |
118 | arc_putchar(c->identifier[i]); |
118 | arc_putchar(c->identifier[i]); |
119 | arc_putchar('\n'); |
119 | arc_putchar('\n'); |
120 | } |
120 | } |
121 | 121 | ||
122 | void arc_print_devices(void) |
122 | void arc_print_devices(void) |
123 | { |
123 | { |
124 | arc_component *c,*next; |
124 | arc_component *c,*next; |
125 | 125 | ||
126 | if (!arc_enabled()) |
126 | if (!arc_enabled()) |
127 | return; |
127 | return; |
128 | 128 | ||
129 | c = arc_entry->getchild(NULL); |
129 | c = arc_entry->getchild(NULL); |
130 | while (c) { |
130 | while (c) { |
131 | arc_print_component(c); |
131 | arc_print_component(c); |
132 | next = arc_entry->getchild(c); |
132 | next = arc_entry->getchild(c); |
133 | while (!next) { |
133 | while (!next) { |
134 | next = arc_entry->getpeer(c); |
134 | next = arc_entry->getpeer(c); |
135 | if (!next) |
135 | if (!next) |
136 | c = arc_entry->getparent(c); |
136 | c = arc_entry->getparent(c); |
137 | if (!c) |
137 | if (!c) |
138 | return; |
138 | return; |
139 | } |
139 | } |
140 | c = next; |
140 | c = next; |
141 | } |
141 | } |
142 | } |
142 | } |
143 | 143 | ||
144 | void arc_print_memory_map(void) |
144 | void arc_print_memory_map(void) |
145 | { |
145 | { |
146 | arc_memdescriptor_t *desc; |
146 | arc_memdescriptor_t *desc; |
147 | 147 | ||
148 | if (!arc_enabled()) |
148 | if (!arc_enabled()) |
149 | return; |
149 | return; |
150 | 150 | ||
151 | printf("Memory map:\n"); |
151 | printf("Memory map:\n"); |
152 | 152 | ||
153 | desc = arc_entry->getmemorydescriptor(NULL); |
153 | desc = arc_entry->getmemorydescriptor(NULL); |
154 | while (desc) { |
154 | while (desc) { |
155 | printf("%s: %d (size: %dKB)\n",basetypes[desc->type], |
155 | printf("%s: %d (size: %dKB)\n",basetypes[desc->type], |
156 | desc->basepage * ARC_FRAME, |
156 | desc->basepage * ARC_FRAME, |
157 | desc->basecount*ARC_FRAME/1024); |
157 | desc->basecount*ARC_FRAME/1024); |
158 | desc = arc_entry->getmemorydescriptor(desc); |
158 | desc = arc_entry->getmemorydescriptor(desc); |
159 | } |
159 | } |
160 | } |
160 | } |
161 | 161 | ||
162 | /** Print charactor to console */ |
162 | /** Print charactor to console */ |
163 | static void arc_putchar(char ch) |
163 | static void arc_putchar(char ch) |
164 | { |
164 | { |
165 | __u32 cnt; |
165 | __u32 cnt; |
166 | ipl_t ipl; |
166 | ipl_t ipl; |
167 | 167 | ||
168 | /* TODO: Should be spinlock? */ |
168 | /* TODO: Should be spinlock? */ |
169 | ipl = interrupts_disable(); |
169 | ipl = interrupts_disable(); |
170 | arc_entry->write(1, &ch, 1, &cnt); |
170 | arc_entry->write(1, &ch, 1, &cnt); |
171 | interrupts_restore(ipl); |
171 | interrupts_restore(ipl); |
172 | 172 | ||
173 | } |
173 | } |
174 | 174 | ||
175 | /** Initialize ARC structure |
175 | /** Initialize ARC structure |
176 | * |
176 | * |
177 | * @return 0 - ARC OK, -1 - ARC does not exist |
177 | * @return 0 - ARC OK, -1 - ARC does not exist |
178 | */ |
178 | */ |
179 | int arc_init(void) |
179 | int arc_init(void) |
180 | { |
180 | { |
181 | if (sbp->signature != ARC_MAGIC) { |
181 | if (sbp->signature != ARC_MAGIC) { |
182 | sbp = NULL; |
182 | sbp = NULL; |
183 | return -1; |
183 | return -1; |
184 | } |
184 | } |
185 | arc_entry = sbp->firmwarevector; |
185 | arc_entry = sbp->firmwarevector; |
186 | 186 | ||
187 | arc_putchar('A'); |
187 | arc_putchar('A'); |
188 | arc_putchar('R'); |
188 | arc_putchar('R'); |
189 | arc_putchar('C'); |
189 | arc_putchar('C'); |
190 | arc_putchar('\n'); |
190 | arc_putchar('\n'); |
191 | } |
191 | } |
192 | 192 | ||
193 | static bool kbd_polling_enabled; |
193 | static bool kbd_polling_enabled; |
194 | static chardev_t console; |
194 | static chardev_t console; |
195 | 195 | ||
196 | /** Try to get character, return character or -1 if not available */ |
196 | /** Try to get character, return character or -1 if not available */ |
197 | static void arc_keyboard_poll(void) |
197 | static void arc_keyboard_poll(void) |
198 | { |
198 | { |
199 | char ch; |
199 | char ch; |
200 | __u32 count; |
200 | __u32 count; |
201 | long result; |
201 | long result; |
202 | 202 | ||
203 | if (! kbd_polling_enabled) |
203 | if (! kbd_polling_enabled) |
204 | return; |
204 | return; |
205 | 205 | ||
206 | if (arc_entry->getreadstatus(0)) |
206 | if (arc_entry->getreadstatus(0)) |
207 | return; |
207 | return; |
208 | result = arc_entry->read(0, &ch, 1, &count); |
208 | result = arc_entry->read(0, &ch, 1, &count); |
209 | if (result || count!=1) { |
209 | if (result || count!=1) { |
210 | return; |
210 | return; |
211 | } |
211 | } |
212 | if (ch == '\r') |
212 | if (ch == '\r') |
213 | ch = '\n'; |
213 | ch = '\n'; |
214 | if (ch == 0x7f) |
214 | if (ch == 0x7f) |
215 | ch = '\b'; |
215 | ch = '\b'; |
216 | 216 | ||
217 | chardev_push_character(&console, ch); |
217 | chardev_push_character(&console, ch); |
218 | } |
218 | } |
219 | 219 | ||
- | 220 | static char arc_read(chardev_t *dev) |
|
- | 221 | { |
|
- | 222 | char ch; |
|
- | 223 | __u32 count; |
|
- | 224 | long result; |
|
- | 225 | ||
- | 226 | result = arc_entry->read(0, &ch, 1, &count); |
|
- | 227 | if (result || count!=1) { |
|
- | 228 | printf("Error reading from ARC keyboard.\n"); |
|
- | 229 | cpu_halt(); |
|
- | 230 | } |
|
- | 231 | if (ch == '\r') |
|
- | 232 | return '\n'; |
|
- | 233 | if (ch == 0x7f) |
|
- | 234 | return '\b'; |
|
- | 235 | return ch; |
|
- | 236 | } |
|
- | 237 | ||
220 | static void arc_write(chardev_t *dev, const char ch) |
238 | static void arc_write(chardev_t *dev, const char ch) |
221 | { |
239 | { |
222 | arc_putchar(ch); |
240 | arc_putchar(ch); |
223 | } |
241 | } |
224 | 242 | ||
225 | static void arc_enable(chardev_t *dev) |
243 | static void arc_enable(chardev_t *dev) |
226 | { |
244 | { |
227 | kbd_polling_enabled = true; |
245 | kbd_polling_enabled = true; |
228 | } |
246 | } |
229 | 247 | ||
230 | static void arc_disable(chardev_t *dev) |
248 | static void arc_disable(chardev_t *dev) |
231 | { |
249 | { |
232 | kbd_polling_enabled = false; |
250 | kbd_polling_enabled = false; |
233 | } |
251 | } |
234 | 252 | ||
235 | static chardev_operations_t arc_ops = { |
253 | static chardev_operations_t arc_ops = { |
236 | .resume = arc_enable, |
254 | .resume = arc_enable, |
237 | .suspend = arc_disable, |
255 | .suspend = arc_disable, |
238 | .write = arc_write |
256 | .write = arc_write, |
- | 257 | .read = arc_read |
|
239 | }; |
258 | }; |
240 | 259 | ||
241 | iroutine old_timer; |
260 | iroutine old_timer; |
242 | /** Do polling on timer interrupt */ |
261 | /** Do polling on timer interrupt */ |
243 | static void timer_replace(int n, void *stack) |
262 | static void timer_replace(int n, void *stack) |
244 | { |
263 | { |
245 | arc_keyboard_poll(); |
264 | arc_keyboard_poll(); |
246 | old_timer(n, stack); |
265 | old_timer(n, stack); |
247 | arc_keyboard_poll(); |
266 | arc_keyboard_poll(); |
248 | } |
267 | } |
249 | 268 | ||
250 | void arc_console(void) |
269 | void arc_console(void) |
251 | { |
270 | { |
252 | kbd_polling_enabled = true; |
271 | kbd_polling_enabled = true; |
253 | 272 | ||
254 | chardev_initialize("arc_console", &console, &arc_ops); |
273 | chardev_initialize("arc_console", &console, &arc_ops); |
255 | old_timer = int_register(TIMER_IRQ, "arc_kb_poll", timer_replace); |
274 | old_timer = int_register(TIMER_IRQ, "arc_kb_poll", timer_replace); |
256 | stdin = &console; |
275 | stdin = &console; |
257 | stdout = &console; |
276 | stdout = &console; |
258 | } |
277 | } |
259 | 278 | ||
260 | /* Initialize frame zones from ARC firmware. |
279 | /* Initialize frame zones from ARC firmware. |
261 | * In the future we may use even the FirmwareTemporary regions, |
280 | * In the future we may use even the FirmwareTemporary regions, |
262 | * currently we use the FreeMemory (what about the LoadedProgram?) |
281 | * currently we use the FreeMemory (what about the LoadedProgram?) |
263 | */ |
282 | */ |
264 | void arc_frame_init(void) |
283 | void arc_frame_init(void) |
265 | { |
284 | { |
266 | arc_memdescriptor_t *desc; |
285 | arc_memdescriptor_t *desc; |
267 | int total = 0; |
286 | int total = 0; |
268 | __address base; |
287 | __address base; |
269 | size_t basesize; |
288 | size_t basesize; |
270 | unsigned int i,j; |
289 | unsigned int i,j; |
271 | 290 | ||
272 | desc = arc_entry->getmemorydescriptor(NULL); |
291 | desc = arc_entry->getmemorydescriptor(NULL); |
273 | while (desc) { |
292 | while (desc) { |
274 | if (desc->type == FreeMemory || |
293 | if (desc->type == FreeMemory || |
275 | desc->type == FreeContiguous) { |
294 | desc->type == FreeContiguous) { |
276 | base = desc->basepage*ARC_FRAME; |
295 | base = desc->basepage*ARC_FRAME; |
277 | basesize = desc->basecount*ARC_FRAME; |
296 | basesize = desc->basecount*ARC_FRAME; |
278 | 297 | ||
279 | if (base % FRAME_SIZE ) { |
298 | if (base % FRAME_SIZE ) { |
280 | basesize -= FRAME_SIZE - (base % FRAME_SIZE); |
299 | basesize -= FRAME_SIZE - (base % FRAME_SIZE); |
281 | base = ALIGN_UP(base, FRAME_SIZE); |
300 | base = ALIGN_UP(base, FRAME_SIZE); |
282 | } |
301 | } |
283 | basesize = ALIGN_DOWN(basesize, FRAME_SIZE); |
302 | basesize = ALIGN_DOWN(basesize, FRAME_SIZE); |
284 | 303 | ||
285 | total += basesize; |
304 | total += basesize; |
286 | zone_create_in_region(base, basesize); |
305 | zone_create_in_region(base, basesize); |
287 | } |
306 | } |
288 | desc = arc_entry->getmemorydescriptor(desc); |
307 | desc = arc_entry->getmemorydescriptor(desc); |
289 | } |
308 | } |
290 | 309 | ||
291 | config.memory_size = total; |
310 | config.memory_size = total; |
292 | } |
311 | } |
293 | 312 | ||
294 | 313 |