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