1 | // SPDX-License-Identifier: GPL-2.0 |
2 | /* |
3 | * misc.c: Miscellaneous prom functions that don't belong |
4 | * anywhere else. |
5 | * |
6 | * Copyright (C) 1995 David S. Miller (davem@caip.rutgers.edu) |
7 | * Copyright (C) 1996,1997 Jakub Jelinek (jj@sunsite.mff.cuni.cz) |
8 | */ |
9 | |
10 | #include <linux/types.h> |
11 | #include <linux/kernel.h> |
12 | #include <linux/sched.h> |
13 | #include <linux/interrupt.h> |
14 | #include <linux/delay.h> |
15 | #include <linux/module.h> |
16 | |
17 | #include <asm/openprom.h> |
18 | #include <asm/oplib.h> |
19 | #include <asm/ldc.h> |
20 | |
21 | static int prom_service_exists(const char *service_name) |
22 | { |
23 | unsigned long args[5]; |
24 | |
25 | args[0] = (unsigned long) "test" ; |
26 | args[1] = 1; |
27 | args[2] = 1; |
28 | args[3] = (unsigned long) service_name; |
29 | args[4] = (unsigned long) -1; |
30 | |
31 | p1275_cmd_direct(args); |
32 | |
33 | if (args[4]) |
34 | return 0; |
35 | return 1; |
36 | } |
37 | |
38 | void prom_sun4v_guest_soft_state(void) |
39 | { |
40 | const char *svc = "SUNW,soft-state-supported" ; |
41 | unsigned long args[3]; |
42 | |
43 | if (!prom_service_exists(service_name: svc)) |
44 | return; |
45 | args[0] = (unsigned long) svc; |
46 | args[1] = 0; |
47 | args[2] = 0; |
48 | p1275_cmd_direct(args); |
49 | } |
50 | |
51 | /* Reset and reboot the machine with the command 'bcommand'. */ |
52 | void prom_reboot(const char *bcommand) |
53 | { |
54 | unsigned long args[4]; |
55 | |
56 | #ifdef CONFIG_SUN_LDOMS |
57 | if (ldom_domaining_enabled) |
58 | ldom_reboot(bcommand); |
59 | #endif |
60 | args[0] = (unsigned long) "boot" ; |
61 | args[1] = 1; |
62 | args[2] = 0; |
63 | args[3] = (unsigned long) bcommand; |
64 | |
65 | p1275_cmd_direct(args); |
66 | } |
67 | |
68 | /* Forth evaluate the expression contained in 'fstring'. */ |
69 | void prom_feval(const char *fstring) |
70 | { |
71 | unsigned long args[5]; |
72 | |
73 | if (!fstring || fstring[0] == 0) |
74 | return; |
75 | args[0] = (unsigned long) "interpret" ; |
76 | args[1] = 1; |
77 | args[2] = 1; |
78 | args[3] = (unsigned long) fstring; |
79 | args[4] = (unsigned long) -1; |
80 | |
81 | p1275_cmd_direct(args); |
82 | } |
83 | EXPORT_SYMBOL(prom_feval); |
84 | |
85 | /* Drop into the prom, with the chance to continue with the 'go' |
86 | * prom command. |
87 | */ |
88 | void prom_cmdline(void) |
89 | { |
90 | unsigned long args[3]; |
91 | unsigned long flags; |
92 | |
93 | local_irq_save(flags); |
94 | |
95 | #ifdef CONFIG_SMP |
96 | smp_capture(); |
97 | #endif |
98 | |
99 | args[0] = (unsigned long) "enter" ; |
100 | args[1] = 0; |
101 | args[2] = 0; |
102 | |
103 | p1275_cmd_direct(args); |
104 | |
105 | #ifdef CONFIG_SMP |
106 | smp_release(); |
107 | #endif |
108 | |
109 | local_irq_restore(flags); |
110 | } |
111 | |
112 | /* Drop into the prom, but completely terminate the program. |
113 | * No chance of continuing. |
114 | */ |
115 | void notrace prom_halt(void) |
116 | { |
117 | unsigned long args[3]; |
118 | |
119 | #ifdef CONFIG_SUN_LDOMS |
120 | if (ldom_domaining_enabled) |
121 | ldom_power_off(); |
122 | #endif |
123 | again: |
124 | args[0] = (unsigned long) "exit" ; |
125 | args[1] = 0; |
126 | args[2] = 0; |
127 | p1275_cmd_direct(args); |
128 | goto again; /* PROM is out to get me -DaveM */ |
129 | } |
130 | |
131 | void prom_halt_power_off(void) |
132 | { |
133 | unsigned long args[3]; |
134 | |
135 | #ifdef CONFIG_SUN_LDOMS |
136 | if (ldom_domaining_enabled) |
137 | ldom_power_off(); |
138 | #endif |
139 | args[0] = (unsigned long) "SUNW,power-off" ; |
140 | args[1] = 0; |
141 | args[2] = 0; |
142 | p1275_cmd_direct(args); |
143 | |
144 | /* if nothing else helps, we just halt */ |
145 | prom_halt(); |
146 | } |
147 | |
148 | /* Get the idprom and stuff it into buffer 'idbuf'. Returns the |
149 | * format type. 'num_bytes' is the number of bytes that your idbuf |
150 | * has space for. Returns 0xff on error. |
151 | */ |
152 | unsigned char prom_get_idprom(char *idbuf, int num_bytes) |
153 | { |
154 | int len; |
155 | |
156 | len = prom_getproplen(prom_root_node, "idprom" ); |
157 | if ((len >num_bytes) || (len == -1)) |
158 | return 0xff; |
159 | if (!prom_getproperty(prom_root_node, "idprom" , idbuf, num_bytes)) |
160 | return idbuf[0]; |
161 | |
162 | return 0xff; |
163 | } |
164 | |
165 | int prom_get_mmu_ihandle(void) |
166 | { |
167 | phandle node; |
168 | int ret; |
169 | |
170 | if (prom_mmu_ihandle_cache != 0) |
171 | return prom_mmu_ihandle_cache; |
172 | |
173 | node = prom_finddevice(prom_chosen_path); |
174 | ret = prom_getint(node, prom_mmu_name); |
175 | if (ret == -1 || ret == 0) |
176 | prom_mmu_ihandle_cache = -1; |
177 | else |
178 | prom_mmu_ihandle_cache = ret; |
179 | |
180 | return ret; |
181 | } |
182 | |
183 | static int prom_get_memory_ihandle(void) |
184 | { |
185 | static int memory_ihandle_cache; |
186 | phandle node; |
187 | int ret; |
188 | |
189 | if (memory_ihandle_cache != 0) |
190 | return memory_ihandle_cache; |
191 | |
192 | node = prom_finddevice("/chosen" ); |
193 | ret = prom_getint(node, "memory" ); |
194 | if (ret == -1 || ret == 0) |
195 | memory_ihandle_cache = -1; |
196 | else |
197 | memory_ihandle_cache = ret; |
198 | |
199 | return ret; |
200 | } |
201 | |
202 | /* Load explicit I/D TLB entries. */ |
203 | static long tlb_load(const char *type, unsigned long index, |
204 | unsigned long tte_data, unsigned long vaddr) |
205 | { |
206 | unsigned long args[9]; |
207 | |
208 | args[0] = (unsigned long) prom_callmethod_name; |
209 | args[1] = 5; |
210 | args[2] = 1; |
211 | args[3] = (unsigned long) type; |
212 | args[4] = (unsigned int) prom_get_mmu_ihandle(); |
213 | args[5] = vaddr; |
214 | args[6] = tte_data; |
215 | args[7] = index; |
216 | args[8] = (unsigned long) -1; |
217 | |
218 | p1275_cmd_direct(args); |
219 | |
220 | return (long) args[8]; |
221 | } |
222 | |
223 | long prom_itlb_load(unsigned long index, |
224 | unsigned long tte_data, |
225 | unsigned long vaddr) |
226 | { |
227 | return tlb_load(type: "SUNW,itlb-load" , index, tte_data, vaddr); |
228 | } |
229 | |
230 | long prom_dtlb_load(unsigned long index, |
231 | unsigned long tte_data, |
232 | unsigned long vaddr) |
233 | { |
234 | return tlb_load(type: "SUNW,dtlb-load" , index, tte_data, vaddr); |
235 | } |
236 | |
237 | int prom_map(int mode, unsigned long size, |
238 | unsigned long vaddr, unsigned long paddr) |
239 | { |
240 | unsigned long args[11]; |
241 | int ret; |
242 | |
243 | args[0] = (unsigned long) prom_callmethod_name; |
244 | args[1] = 7; |
245 | args[2] = 1; |
246 | args[3] = (unsigned long) prom_map_name; |
247 | args[4] = (unsigned int) prom_get_mmu_ihandle(); |
248 | args[5] = (unsigned int) mode; |
249 | args[6] = size; |
250 | args[7] = vaddr; |
251 | args[8] = 0; |
252 | args[9] = paddr; |
253 | args[10] = (unsigned long) -1; |
254 | |
255 | p1275_cmd_direct(args); |
256 | |
257 | ret = (int) args[10]; |
258 | if (ret == 0) |
259 | ret = -1; |
260 | return ret; |
261 | } |
262 | |
263 | void prom_unmap(unsigned long size, unsigned long vaddr) |
264 | { |
265 | unsigned long args[7]; |
266 | |
267 | args[0] = (unsigned long) prom_callmethod_name; |
268 | args[1] = 4; |
269 | args[2] = 0; |
270 | args[3] = (unsigned long) prom_unmap_name; |
271 | args[4] = (unsigned int) prom_get_mmu_ihandle(); |
272 | args[5] = size; |
273 | args[6] = vaddr; |
274 | |
275 | p1275_cmd_direct(args); |
276 | } |
277 | |
278 | /* Set aside physical memory which is not touched or modified |
279 | * across soft resets. |
280 | */ |
281 | int prom_retain(const char *name, unsigned long size, |
282 | unsigned long align, unsigned long *paddr) |
283 | { |
284 | unsigned long args[11]; |
285 | |
286 | args[0] = (unsigned long) prom_callmethod_name; |
287 | args[1] = 5; |
288 | args[2] = 3; |
289 | args[3] = (unsigned long) "SUNW,retain" ; |
290 | args[4] = (unsigned int) prom_get_memory_ihandle(); |
291 | args[5] = align; |
292 | args[6] = size; |
293 | args[7] = (unsigned long) name; |
294 | args[8] = (unsigned long) -1; |
295 | args[9] = (unsigned long) -1; |
296 | args[10] = (unsigned long) -1; |
297 | |
298 | p1275_cmd_direct(args); |
299 | |
300 | if (args[8]) |
301 | return (int) args[8]; |
302 | |
303 | /* Next we get "phys_high" then "phys_low". On 64-bit |
304 | * the phys_high cell is don't care since the phys_low |
305 | * cell has the full value. |
306 | */ |
307 | *paddr = args[10]; |
308 | |
309 | return 0; |
310 | } |
311 | |
312 | /* Get "Unumber" string for the SIMM at the given |
313 | * memory address. Usually this will be of the form |
314 | * "Uxxxx" where xxxx is a decimal number which is |
315 | * etched into the motherboard next to the SIMM slot |
316 | * in question. |
317 | */ |
318 | int prom_getunumber(int syndrome_code, |
319 | unsigned long phys_addr, |
320 | char *buf, int buflen) |
321 | { |
322 | unsigned long args[12]; |
323 | |
324 | args[0] = (unsigned long) prom_callmethod_name; |
325 | args[1] = 7; |
326 | args[2] = 2; |
327 | args[3] = (unsigned long) "SUNW,get-unumber" ; |
328 | args[4] = (unsigned int) prom_get_memory_ihandle(); |
329 | args[5] = buflen; |
330 | args[6] = (unsigned long) buf; |
331 | args[7] = 0; |
332 | args[8] = phys_addr; |
333 | args[9] = (unsigned int) syndrome_code; |
334 | args[10] = (unsigned long) -1; |
335 | args[11] = (unsigned long) -1; |
336 | |
337 | p1275_cmd_direct(args); |
338 | |
339 | return (int) args[10]; |
340 | } |
341 | |
342 | /* Power management extensions. */ |
343 | void prom_sleepself(void) |
344 | { |
345 | unsigned long args[3]; |
346 | |
347 | args[0] = (unsigned long) "SUNW,sleep-self" ; |
348 | args[1] = 0; |
349 | args[2] = 0; |
350 | p1275_cmd_direct(args); |
351 | } |
352 | |
353 | int prom_sleepsystem(void) |
354 | { |
355 | unsigned long args[4]; |
356 | |
357 | args[0] = (unsigned long) "SUNW,sleep-system" ; |
358 | args[1] = 0; |
359 | args[2] = 1; |
360 | args[3] = (unsigned long) -1; |
361 | p1275_cmd_direct(args); |
362 | |
363 | return (int) args[3]; |
364 | } |
365 | |
366 | int prom_wakeupsystem(void) |
367 | { |
368 | unsigned long args[4]; |
369 | |
370 | args[0] = (unsigned long) "SUNW,wakeup-system" ; |
371 | args[1] = 0; |
372 | args[2] = 1; |
373 | args[3] = (unsigned long) -1; |
374 | p1275_cmd_direct(args); |
375 | |
376 | return (int) args[3]; |
377 | } |
378 | |
379 | #ifdef CONFIG_SMP |
380 | void prom_startcpu(int cpunode, unsigned long pc, unsigned long arg) |
381 | { |
382 | unsigned long args[6]; |
383 | |
384 | args[0] = (unsigned long) "SUNW,start-cpu" ; |
385 | args[1] = 3; |
386 | args[2] = 0; |
387 | args[3] = (unsigned int) cpunode; |
388 | args[4] = pc; |
389 | args[5] = arg; |
390 | p1275_cmd_direct(args); |
391 | } |
392 | |
393 | void prom_startcpu_cpuid(int cpuid, unsigned long pc, unsigned long arg) |
394 | { |
395 | unsigned long args[6]; |
396 | |
397 | args[0] = (unsigned long) "SUNW,start-cpu-by-cpuid" ; |
398 | args[1] = 3; |
399 | args[2] = 0; |
400 | args[3] = (unsigned int) cpuid; |
401 | args[4] = pc; |
402 | args[5] = arg; |
403 | p1275_cmd_direct(args); |
404 | } |
405 | |
406 | void prom_stopcpu_cpuid(int cpuid) |
407 | { |
408 | unsigned long args[4]; |
409 | |
410 | args[0] = (unsigned long) "SUNW,stop-cpu-by-cpuid" ; |
411 | args[1] = 1; |
412 | args[2] = 0; |
413 | args[3] = (unsigned int) cpuid; |
414 | p1275_cmd_direct(args); |
415 | } |
416 | |
417 | void prom_stopself(void) |
418 | { |
419 | unsigned long args[3]; |
420 | |
421 | args[0] = (unsigned long) "SUNW,stop-self" ; |
422 | args[1] = 0; |
423 | args[2] = 0; |
424 | p1275_cmd_direct(args); |
425 | } |
426 | |
427 | void prom_idleself(void) |
428 | { |
429 | unsigned long args[3]; |
430 | |
431 | args[0] = (unsigned long) "SUNW,idle-self" ; |
432 | args[1] = 0; |
433 | args[2] = 0; |
434 | p1275_cmd_direct(args); |
435 | } |
436 | |
437 | void prom_resumecpu(int cpunode) |
438 | { |
439 | unsigned long args[4]; |
440 | |
441 | args[0] = (unsigned long) "SUNW,resume-cpu" ; |
442 | args[1] = 1; |
443 | args[2] = 0; |
444 | args[3] = (unsigned int) cpunode; |
445 | p1275_cmd_direct(args); |
446 | } |
447 | #endif |
448 | |