diff options
Diffstat (limited to 'arch/powerpc/xmon/start_32.c')
-rw-r--r-- | arch/powerpc/xmon/start_32.c | 441 |
1 files changed, 0 insertions, 441 deletions
diff --git a/arch/powerpc/xmon/start_32.c b/arch/powerpc/xmon/start_32.c deleted file mode 100644 index c2464df4217e..000000000000 --- a/arch/powerpc/xmon/start_32.c +++ /dev/null | |||
@@ -1,441 +0,0 @@ | |||
1 | /* | ||
2 | * Copyright (C) 1996 Paul Mackerras. | ||
3 | */ | ||
4 | #include <linux/config.h> | ||
5 | #include <linux/string.h> | ||
6 | #include <asm/machdep.h> | ||
7 | #include <asm/io.h> | ||
8 | #include <asm/page.h> | ||
9 | #include <linux/adb.h> | ||
10 | #include <linux/pmu.h> | ||
11 | #include <linux/cuda.h> | ||
12 | #include <linux/kernel.h> | ||
13 | #include <linux/errno.h> | ||
14 | #include <linux/bitops.h> | ||
15 | #include <asm/xmon.h> | ||
16 | #include <asm/prom.h> | ||
17 | #include <asm/bootx.h> | ||
18 | #include <asm/machdep.h> | ||
19 | #include <asm/errno.h> | ||
20 | #include <asm/pmac_feature.h> | ||
21 | #include <asm/processor.h> | ||
22 | #include <asm/delay.h> | ||
23 | #include <asm/btext.h> | ||
24 | #include <asm/time.h> | ||
25 | #include "nonstdio.h" | ||
26 | |||
27 | static volatile unsigned char __iomem *sccc, *sccd; | ||
28 | unsigned int TXRDY, RXRDY, DLAB; | ||
29 | |||
30 | static int use_serial; | ||
31 | static int use_screen; | ||
32 | static int via_modem; | ||
33 | static int xmon_use_sccb; | ||
34 | static struct device_node *channel_node; | ||
35 | |||
36 | void buf_access(void) | ||
37 | { | ||
38 | if (DLAB) | ||
39 | sccd[3] &= ~DLAB; /* reset DLAB */ | ||
40 | } | ||
41 | |||
42 | extern int adb_init(void); | ||
43 | |||
44 | #ifdef CONFIG_PPC_CHRP | ||
45 | /* | ||
46 | * This looks in the "ranges" property for the primary PCI host bridge | ||
47 | * to find the physical address of the start of PCI/ISA I/O space. | ||
48 | * It is basically a cut-down version of pci_process_bridge_OF_ranges. | ||
49 | */ | ||
50 | static unsigned long chrp_find_phys_io_base(void) | ||
51 | { | ||
52 | struct device_node *node; | ||
53 | unsigned int *ranges; | ||
54 | unsigned long base = CHRP_ISA_IO_BASE; | ||
55 | int rlen = 0; | ||
56 | int np; | ||
57 | |||
58 | node = find_devices("isa"); | ||
59 | if (node != NULL) { | ||
60 | node = node->parent; | ||
61 | if (node == NULL || node->type == NULL | ||
62 | || strcmp(node->type, "pci") != 0) | ||
63 | node = NULL; | ||
64 | } | ||
65 | if (node == NULL) | ||
66 | node = find_devices("pci"); | ||
67 | if (node == NULL) | ||
68 | return base; | ||
69 | |||
70 | ranges = (unsigned int *) get_property(node, "ranges", &rlen); | ||
71 | np = prom_n_addr_cells(node) + 5; | ||
72 | while ((rlen -= np * sizeof(unsigned int)) >= 0) { | ||
73 | if ((ranges[0] >> 24) == 1 && ranges[2] == 0) { | ||
74 | /* I/O space starting at 0, grab the phys base */ | ||
75 | base = ranges[np - 3]; | ||
76 | break; | ||
77 | } | ||
78 | ranges += np; | ||
79 | } | ||
80 | return base; | ||
81 | } | ||
82 | #endif /* CONFIG_PPC_CHRP */ | ||
83 | |||
84 | void xmon_map_scc(void) | ||
85 | { | ||
86 | #ifdef CONFIG_PPC_MULTIPLATFORM | ||
87 | volatile unsigned char __iomem *base; | ||
88 | |||
89 | if (_machine == _MACH_Pmac) { | ||
90 | struct device_node *np; | ||
91 | unsigned long addr; | ||
92 | #ifdef CONFIG_BOOTX_TEXT | ||
93 | if (!use_screen && !use_serial | ||
94 | && !machine_is_compatible("iMac")) { | ||
95 | /* see if there is a keyboard in the device tree | ||
96 | with a parent of type "adb" */ | ||
97 | for (np = find_devices("keyboard"); np; np = np->next) | ||
98 | if (np->parent && np->parent->type | ||
99 | && strcmp(np->parent->type, "adb") == 0) | ||
100 | break; | ||
101 | |||
102 | /* needs to be hacked if xmon_printk is to be used | ||
103 | from within find_via_pmu() */ | ||
104 | #ifdef CONFIG_ADB_PMU | ||
105 | if (np != NULL && boot_text_mapped && find_via_pmu()) | ||
106 | use_screen = 1; | ||
107 | #endif | ||
108 | #ifdef CONFIG_ADB_CUDA | ||
109 | if (np != NULL && boot_text_mapped && find_via_cuda()) | ||
110 | use_screen = 1; | ||
111 | #endif | ||
112 | } | ||
113 | if (!use_screen && (np = find_devices("escc")) != NULL) { | ||
114 | /* | ||
115 | * look for the device node for the serial port | ||
116 | * we're using and see if it says it has a modem | ||
117 | */ | ||
118 | char *name = xmon_use_sccb? "ch-b": "ch-a"; | ||
119 | char *slots; | ||
120 | int l; | ||
121 | |||
122 | np = np->child; | ||
123 | while (np != NULL && strcmp(np->name, name) != 0) | ||
124 | np = np->sibling; | ||
125 | if (np != NULL) { | ||
126 | /* XXX should parse this properly */ | ||
127 | channel_node = np; | ||
128 | slots = get_property(np, "slot-names", &l); | ||
129 | if (slots != NULL && l >= 10 | ||
130 | && strcmp(slots+4, "Modem") == 0) | ||
131 | via_modem = 1; | ||
132 | } | ||
133 | } | ||
134 | btext_drawstring("xmon uses "); | ||
135 | if (use_screen) | ||
136 | btext_drawstring("screen and keyboard\n"); | ||
137 | else { | ||
138 | if (via_modem) | ||
139 | btext_drawstring("modem on "); | ||
140 | btext_drawstring(xmon_use_sccb? "printer": "modem"); | ||
141 | btext_drawstring(" port\n"); | ||
142 | } | ||
143 | |||
144 | #endif /* CONFIG_BOOTX_TEXT */ | ||
145 | |||
146 | #ifdef CHRP_ESCC | ||
147 | addr = 0xc1013020; | ||
148 | #else | ||
149 | addr = 0xf3013020; | ||
150 | #endif | ||
151 | TXRDY = 4; | ||
152 | RXRDY = 1; | ||
153 | |||
154 | np = find_devices("mac-io"); | ||
155 | if (np && np->n_addrs) | ||
156 | addr = np->addrs[0].address + 0x13020; | ||
157 | base = (volatile unsigned char *) ioremap(addr & PAGE_MASK, PAGE_SIZE); | ||
158 | sccc = base + (addr & ~PAGE_MASK); | ||
159 | sccd = sccc + 0x10; | ||
160 | |||
161 | } else { | ||
162 | base = (volatile unsigned char *) isa_io_base; | ||
163 | |||
164 | #ifdef CONFIG_PPC_CHRP | ||
165 | if (_machine == _MACH_chrp) | ||
166 | base = (volatile unsigned char __iomem *) | ||
167 | ioremap(chrp_find_phys_io_base(), 0x1000); | ||
168 | #endif | ||
169 | |||
170 | sccc = base + 0x3fd; | ||
171 | sccd = base + 0x3f8; | ||
172 | if (xmon_use_sccb) { | ||
173 | sccc -= 0x100; | ||
174 | sccd -= 0x100; | ||
175 | } | ||
176 | TXRDY = 0x20; | ||
177 | RXRDY = 1; | ||
178 | DLAB = 0x80; | ||
179 | } | ||
180 | #elif defined(CONFIG_GEMINI) | ||
181 | /* should already be mapped by the kernel boot */ | ||
182 | sccc = (volatile unsigned char __iomem *) 0xffeffb0d; | ||
183 | sccd = (volatile unsigned char __iomem *) 0xffeffb08; | ||
184 | TXRDY = 0x20; | ||
185 | RXRDY = 1; | ||
186 | DLAB = 0x80; | ||
187 | #elif defined(CONFIG_405GP) | ||
188 | sccc = (volatile unsigned char __iomem *)0xef600305; | ||
189 | sccd = (volatile unsigned char __iomem *)0xef600300; | ||
190 | TXRDY = 0x20; | ||
191 | RXRDY = 1; | ||
192 | DLAB = 0x80; | ||
193 | #endif /* platform */ | ||
194 | } | ||
195 | |||
196 | static int scc_initialized = 0; | ||
197 | |||
198 | void xmon_init_scc(void); | ||
199 | extern void cuda_poll(void); | ||
200 | |||
201 | static inline void do_poll_adb(void) | ||
202 | { | ||
203 | #ifdef CONFIG_ADB_PMU | ||
204 | if (sys_ctrler == SYS_CTRLER_PMU) | ||
205 | pmu_poll_adb(); | ||
206 | #endif /* CONFIG_ADB_PMU */ | ||
207 | #ifdef CONFIG_ADB_CUDA | ||
208 | if (sys_ctrler == SYS_CTRLER_CUDA) | ||
209 | cuda_poll(); | ||
210 | #endif /* CONFIG_ADB_CUDA */ | ||
211 | } | ||
212 | |||
213 | int xmon_write(void *ptr, int nb) | ||
214 | { | ||
215 | char *p = ptr; | ||
216 | int i, c, ct; | ||
217 | |||
218 | #ifdef CONFIG_SMP | ||
219 | static unsigned long xmon_write_lock; | ||
220 | int lock_wait = 1000000; | ||
221 | int locked; | ||
222 | |||
223 | while ((locked = test_and_set_bit(0, &xmon_write_lock)) != 0) | ||
224 | if (--lock_wait == 0) | ||
225 | break; | ||
226 | #endif | ||
227 | |||
228 | #ifdef CONFIG_BOOTX_TEXT | ||
229 | if (use_screen) { | ||
230 | /* write it on the screen */ | ||
231 | for (i = 0; i < nb; ++i) | ||
232 | btext_drawchar(*p++); | ||
233 | goto out; | ||
234 | } | ||
235 | #endif | ||
236 | if (!scc_initialized) | ||
237 | xmon_init_scc(); | ||
238 | ct = 0; | ||
239 | for (i = 0; i < nb; ++i) { | ||
240 | while ((*sccc & TXRDY) == 0) | ||
241 | do_poll_adb(); | ||
242 | c = p[i]; | ||
243 | if (c == '\n' && !ct) { | ||
244 | c = '\r'; | ||
245 | ct = 1; | ||
246 | --i; | ||
247 | } else { | ||
248 | ct = 0; | ||
249 | } | ||
250 | buf_access(); | ||
251 | *sccd = c; | ||
252 | eieio(); | ||
253 | } | ||
254 | |||
255 | out: | ||
256 | #ifdef CONFIG_SMP | ||
257 | if (!locked) | ||
258 | clear_bit(0, &xmon_write_lock); | ||
259 | #endif | ||
260 | return nb; | ||
261 | } | ||
262 | |||
263 | int xmon_wants_key; | ||
264 | int xmon_adb_keycode; | ||
265 | |||
266 | #ifdef CONFIG_BOOTX_TEXT | ||
267 | static int xmon_adb_shiftstate; | ||
268 | |||
269 | static unsigned char xmon_keytab[128] = | ||
270 | "asdfhgzxcv\000bqwer" /* 0x00 - 0x0f */ | ||
271 | "yt123465=97-80]o" /* 0x10 - 0x1f */ | ||
272 | "u[ip\rlj'k;\\,/nm." /* 0x20 - 0x2f */ | ||
273 | "\t `\177\0\033\0\0\0\0\0\0\0\0\0\0" /* 0x30 - 0x3f */ | ||
274 | "\0.\0*\0+\0\0\0\0\0/\r\0-\0" /* 0x40 - 0x4f */ | ||
275 | "\0\0000123456789\0\0\0"; /* 0x50 - 0x5f */ | ||
276 | |||
277 | static unsigned char xmon_shift_keytab[128] = | ||
278 | "ASDFHGZXCV\000BQWER" /* 0x00 - 0x0f */ | ||
279 | "YT!@#$^%+(&_*)}O" /* 0x10 - 0x1f */ | ||
280 | "U{IP\rLJ\"K:|<?NM>" /* 0x20 - 0x2f */ | ||
281 | "\t ~\177\0\033\0\0\0\0\0\0\0\0\0\0" /* 0x30 - 0x3f */ | ||
282 | "\0.\0*\0+\0\0\0\0\0/\r\0-\0" /* 0x40 - 0x4f */ | ||
283 | "\0\0000123456789\0\0\0"; /* 0x50 - 0x5f */ | ||
284 | |||
285 | static int xmon_get_adb_key(void) | ||
286 | { | ||
287 | int k, t, on; | ||
288 | |||
289 | xmon_wants_key = 1; | ||
290 | for (;;) { | ||
291 | xmon_adb_keycode = -1; | ||
292 | t = 0; | ||
293 | on = 0; | ||
294 | do { | ||
295 | if (--t < 0) { | ||
296 | on = 1 - on; | ||
297 | btext_drawchar(on? 0xdb: 0x20); | ||
298 | btext_drawchar('\b'); | ||
299 | t = 200000; | ||
300 | } | ||
301 | do_poll_adb(); | ||
302 | } while (xmon_adb_keycode == -1); | ||
303 | k = xmon_adb_keycode; | ||
304 | if (on) | ||
305 | btext_drawstring(" \b"); | ||
306 | |||
307 | /* test for shift keys */ | ||
308 | if ((k & 0x7f) == 0x38 || (k & 0x7f) == 0x7b) { | ||
309 | xmon_adb_shiftstate = (k & 0x80) == 0; | ||
310 | continue; | ||
311 | } | ||
312 | if (k >= 0x80) | ||
313 | continue; /* ignore up transitions */ | ||
314 | k = (xmon_adb_shiftstate? xmon_shift_keytab: xmon_keytab)[k]; | ||
315 | if (k != 0) | ||
316 | break; | ||
317 | } | ||
318 | xmon_wants_key = 0; | ||
319 | return k; | ||
320 | } | ||
321 | #endif /* CONFIG_BOOTX_TEXT */ | ||
322 | |||
323 | int xmon_readchar(void) | ||
324 | { | ||
325 | #ifdef CONFIG_BOOTX_TEXT | ||
326 | if (use_screen) | ||
327 | return xmon_get_adb_key(); | ||
328 | #endif | ||
329 | if (!scc_initialized) | ||
330 | xmon_init_scc(); | ||
331 | while ((*sccc & RXRDY) == 0) | ||
332 | do_poll_adb(); | ||
333 | buf_access(); | ||
334 | return *sccd; | ||
335 | } | ||
336 | |||
337 | int xmon_read_poll(void) | ||
338 | { | ||
339 | if ((*sccc & RXRDY) == 0) { | ||
340 | do_poll_adb(); | ||
341 | return -1; | ||
342 | } | ||
343 | buf_access(); | ||
344 | return *sccd; | ||
345 | } | ||
346 | |||
347 | static unsigned char scc_inittab[] = { | ||
348 | 13, 0, /* set baud rate divisor */ | ||
349 | 12, 1, | ||
350 | 14, 1, /* baud rate gen enable, src=rtxc */ | ||
351 | 11, 0x50, /* clocks = br gen */ | ||
352 | 5, 0xea, /* tx 8 bits, assert DTR & RTS */ | ||
353 | 4, 0x46, /* x16 clock, 1 stop */ | ||
354 | 3, 0xc1, /* rx enable, 8 bits */ | ||
355 | }; | ||
356 | |||
357 | void xmon_init_scc(void) | ||
358 | { | ||
359 | if ( _machine == _MACH_chrp ) | ||
360 | { | ||
361 | sccd[3] = 0x83; eieio(); /* LCR = 8N1 + DLAB */ | ||
362 | sccd[0] = 12; eieio(); /* DLL = 9600 baud */ | ||
363 | sccd[1] = 0; eieio(); | ||
364 | sccd[2] = 0; eieio(); /* FCR = 0 */ | ||
365 | sccd[3] = 3; eieio(); /* LCR = 8N1 */ | ||
366 | sccd[1] = 0; eieio(); /* IER = 0 */ | ||
367 | } | ||
368 | else if ( _machine == _MACH_Pmac ) | ||
369 | { | ||
370 | int i, x; | ||
371 | unsigned long timeout; | ||
372 | |||
373 | if (channel_node != 0) | ||
374 | pmac_call_feature( | ||
375 | PMAC_FTR_SCC_ENABLE, | ||
376 | channel_node, | ||
377 | PMAC_SCC_ASYNC | PMAC_SCC_FLAG_XMON, 1); | ||
378 | printk(KERN_INFO "Serial port locked ON by debugger !\n"); | ||
379 | if (via_modem && channel_node != 0) { | ||
380 | unsigned int t0; | ||
381 | |||
382 | pmac_call_feature( | ||
383 | PMAC_FTR_MODEM_ENABLE, | ||
384 | channel_node, 0, 1); | ||
385 | printk(KERN_INFO "Modem powered up by debugger !\n"); | ||
386 | t0 = get_tbl(); | ||
387 | timeout = 3 * tb_ticks_per_sec; | ||
388 | if (timeout == 0) | ||
389 | /* assume 25MHz if tb_ticks_per_sec not set */ | ||
390 | timeout = 75000000; | ||
391 | while (get_tbl() - t0 < timeout) | ||
392 | eieio(); | ||
393 | } | ||
394 | /* use the B channel if requested */ | ||
395 | if (xmon_use_sccb) { | ||
396 | sccc = (volatile unsigned char *) | ||
397 | ((unsigned long)sccc & ~0x20); | ||
398 | sccd = sccc + 0x10; | ||
399 | } | ||
400 | for (i = 20000; i != 0; --i) { | ||
401 | x = *sccc; eieio(); | ||
402 | } | ||
403 | *sccc = 9; eieio(); /* reset A or B side */ | ||
404 | *sccc = ((unsigned long)sccc & 0x20)? 0x80: 0x40; eieio(); | ||
405 | for (i = 0; i < sizeof(scc_inittab); ++i) { | ||
406 | *sccc = scc_inittab[i]; | ||
407 | eieio(); | ||
408 | } | ||
409 | } | ||
410 | scc_initialized = 1; | ||
411 | if (via_modem) { | ||
412 | for (;;) { | ||
413 | xmon_write("ATE1V1\r", 7); | ||
414 | if (xmon_expect("OK", 5)) { | ||
415 | xmon_write("ATA\r", 4); | ||
416 | if (xmon_expect("CONNECT", 40)) | ||
417 | break; | ||
418 | } | ||
419 | xmon_write("+++", 3); | ||
420 | xmon_expect("OK", 3); | ||
421 | } | ||
422 | } | ||
423 | } | ||
424 | |||
425 | void xmon_enter(void) | ||
426 | { | ||
427 | #ifdef CONFIG_ADB_PMU | ||
428 | if (_machine == _MACH_Pmac) { | ||
429 | pmu_suspend(); | ||
430 | } | ||
431 | #endif | ||
432 | } | ||
433 | |||
434 | void xmon_leave(void) | ||
435 | { | ||
436 | #ifdef CONFIG_ADB_PMU | ||
437 | if (_machine == _MACH_Pmac) { | ||
438 | pmu_resume(); | ||
439 | } | ||
440 | #endif | ||
441 | } | ||