Commit | Line | Data |
---|---|---|
64d329ee | 1 | /* linux/arch/sparc/kernel/process.c |
1da177e4 | 2 | * |
4fe3ebec | 3 | * Copyright (C) 1995, 2008 David S. Miller (davem@davemloft.net) |
1da177e4 LT |
4 | * Copyright (C) 1996 Eddie C. Dost (ecd@skynet.be) |
5 | */ | |
6 | ||
7 | /* | |
8 | * This file handles the architecture-dependent parts of process handling.. | |
9 | */ | |
10 | ||
11 | #include <stdarg.h> | |
12 | ||
13 | #include <linux/errno.h> | |
14 | #include <linux/module.h> | |
15 | #include <linux/sched.h> | |
16 | #include <linux/kernel.h> | |
1da177e4 LT |
17 | #include <linux/mm.h> |
18 | #include <linux/stddef.h> | |
19 | #include <linux/ptrace.h> | |
1da177e4 | 20 | #include <linux/user.h> |
1da177e4 | 21 | #include <linux/smp.h> |
1da177e4 LT |
22 | #include <linux/reboot.h> |
23 | #include <linux/delay.h> | |
24 | #include <linux/pm.h> | |
25 | #include <linux/init.h> | |
5a0e3ad6 | 26 | #include <linux/slab.h> |
1da177e4 LT |
27 | |
28 | #include <asm/auxio.h> | |
29 | #include <asm/oplib.h> | |
30 | #include <asm/uaccess.h> | |
1da177e4 LT |
31 | #include <asm/page.h> |
32 | #include <asm/pgalloc.h> | |
33 | #include <asm/pgtable.h> | |
34 | #include <asm/delay.h> | |
35 | #include <asm/processor.h> | |
36 | #include <asm/psr.h> | |
37 | #include <asm/elf.h> | |
c73fcc84 | 38 | #include <asm/prom.h> |
1da177e4 | 39 | #include <asm/unistd.h> |
d550bbd4 | 40 | #include <asm/setup.h> |
1da177e4 LT |
41 | |
42 | /* | |
43 | * Power management idle function | |
44 | * Set in pm platform drivers (apc.c and pmc.c) | |
45 | */ | |
46 | void (*pm_idle)(void); | |
6943f3da | 47 | EXPORT_SYMBOL(pm_idle); |
1da177e4 LT |
48 | |
49 | /* | |
50 | * Power-off handler instantiation for pm.h compliance | |
51 | * This is done via auxio, but could be used as a fallback | |
52 | * handler when auxio is not present-- unused for now... | |
53 | */ | |
304cd3ef | 54 | void (*pm_power_off)(void) = machine_power_off; |
89eb1693 | 55 | EXPORT_SYMBOL(pm_power_off); |
1da177e4 LT |
56 | |
57 | /* | |
58 | * sysctl - toggle power-off restriction for serial console | |
59 | * systems in machine_power_off() | |
60 | */ | |
61 | int scons_pwroff = 1; | |
62 | ||
63 | extern void fpsave(unsigned long *, unsigned long *, void *, unsigned long *); | |
64 | ||
65 | struct task_struct *last_task_used_math = NULL; | |
66 | struct thread_info *current_set[NR_CPUS]; | |
67 | ||
1da177e4 LT |
68 | /* |
69 | * the idle loop on a Sparc... ;) | |
70 | */ | |
71 | void cpu_idle(void) | |
72 | { | |
3732106a | 73 | set_thread_flag(TIF_POLLING_NRFLAG); |
1da177e4 | 74 | |
1da177e4 | 75 | /* endless idle loop with no priority at all */ |
3732106a SR |
76 | for (;;) { |
77 | while (!need_resched()) { | |
78 | if (pm_idle) | |
2645e721 | 79 | (*pm_idle)(); |
3732106a | 80 | else |
2645e721 DH |
81 | cpu_relax(); |
82 | } | |
bd2f5536 | 83 | schedule_preempt_disabled(); |
1da177e4 LT |
84 | } |
85 | } | |
86 | ||
1da177e4 LT |
87 | /* XXX cli/sti -> local_irq_xxx here, check this works once SMP is fixed. */ |
88 | void machine_halt(void) | |
89 | { | |
90 | local_irq_enable(); | |
91 | mdelay(8); | |
92 | local_irq_disable(); | |
1da177e4 LT |
93 | prom_halt(); |
94 | panic("Halt failed!"); | |
95 | } | |
96 | ||
1da177e4 LT |
97 | void machine_restart(char * cmd) |
98 | { | |
99 | char *p; | |
100 | ||
101 | local_irq_enable(); | |
102 | mdelay(8); | |
103 | local_irq_disable(); | |
104 | ||
105 | p = strchr (reboot_command, '\n'); | |
106 | if (p) *p = 0; | |
1da177e4 LT |
107 | if (cmd) |
108 | prom_reboot(cmd); | |
109 | if (*reboot_command) | |
110 | prom_reboot(reboot_command); | |
111 | prom_feval ("reset"); | |
112 | panic("Reboot failed!"); | |
113 | } | |
114 | ||
1da177e4 LT |
115 | void machine_power_off(void) |
116 | { | |
c73fcc84 DM |
117 | if (auxio_power_register && |
118 | (strcmp(of_console_device->type, "serial") || scons_pwroff)) | |
1da177e4 | 119 | *auxio_power_register |= AUXIO_POWER_OFF; |
1da177e4 LT |
120 | machine_halt(); |
121 | } | |
122 | ||
1da177e4 LT |
123 | void show_regs(struct pt_regs *r) |
124 | { | |
4d7b92ad | 125 | struct reg_window32 *rw = (struct reg_window32 *) r->u_regs[14]; |
1da177e4 LT |
126 | |
127 | printk("PSR: %08lx PC: %08lx NPC: %08lx Y: %08lx %s\n", | |
128 | r->psr, r->pc, r->npc, r->y, print_tainted()); | |
4fe3ebec | 129 | printk("PC: <%pS>\n", (void *) r->pc); |
1da177e4 LT |
130 | printk("%%G: %08lx %08lx %08lx %08lx %08lx %08lx %08lx %08lx\n", |
131 | r->u_regs[0], r->u_regs[1], r->u_regs[2], r->u_regs[3], | |
132 | r->u_regs[4], r->u_regs[5], r->u_regs[6], r->u_regs[7]); | |
133 | printk("%%O: %08lx %08lx %08lx %08lx %08lx %08lx %08lx %08lx\n", | |
134 | r->u_regs[8], r->u_regs[9], r->u_regs[10], r->u_regs[11], | |
135 | r->u_regs[12], r->u_regs[13], r->u_regs[14], r->u_regs[15]); | |
4fe3ebec | 136 | printk("RPC: <%pS>\n", (void *) r->u_regs[15]); |
1da177e4 LT |
137 | |
138 | printk("%%L: %08lx %08lx %08lx %08lx %08lx %08lx %08lx %08lx\n", | |
139 | rw->locals[0], rw->locals[1], rw->locals[2], rw->locals[3], | |
140 | rw->locals[4], rw->locals[5], rw->locals[6], rw->locals[7]); | |
141 | printk("%%I: %08lx %08lx %08lx %08lx %08lx %08lx %08lx %08lx\n", | |
142 | rw->ins[0], rw->ins[1], rw->ins[2], rw->ins[3], | |
143 | rw->ins[4], rw->ins[5], rw->ins[6], rw->ins[7]); | |
144 | } | |
145 | ||
146 | /* | |
147 | * The show_stack is an external API which we do not use ourselves. | |
148 | * The oops is printed in die_if_kernel. | |
149 | */ | |
150 | void show_stack(struct task_struct *tsk, unsigned long *_ksp) | |
151 | { | |
152 | unsigned long pc, fp; | |
153 | unsigned long task_base; | |
4d7b92ad | 154 | struct reg_window32 *rw; |
1da177e4 LT |
155 | int count = 0; |
156 | ||
157 | if (tsk != NULL) | |
36483c6b | 158 | task_base = (unsigned long) task_stack_page(tsk); |
1da177e4 LT |
159 | else |
160 | task_base = (unsigned long) current_thread_info(); | |
161 | ||
162 | fp = (unsigned long) _ksp; | |
163 | do { | |
164 | /* Bogus frame pointer? */ | |
165 | if (fp < (task_base + sizeof(struct thread_info)) || | |
166 | fp >= (task_base + (PAGE_SIZE << 1))) | |
167 | break; | |
4d7b92ad | 168 | rw = (struct reg_window32 *) fp; |
1da177e4 LT |
169 | pc = rw->ins[7]; |
170 | printk("[%08lx : ", pc); | |
4fe3ebec | 171 | printk("%pS ] ", (void *) pc); |
1da177e4 LT |
172 | fp = rw->ins[6]; |
173 | } while (++count < 16); | |
174 | printk("\n"); | |
175 | } | |
176 | ||
24dc6ead TC |
177 | void dump_stack(void) |
178 | { | |
179 | unsigned long *ksp; | |
180 | ||
181 | __asm__ __volatile__("mov %%fp, %0" | |
182 | : "=r" (ksp)); | |
183 | show_stack(current, ksp); | |
184 | } | |
185 | ||
186 | EXPORT_SYMBOL(dump_stack); | |
187 | ||
1da177e4 LT |
188 | /* |
189 | * Note: sparc64 has a pretty intricated thread_saved_pc, check it out. | |
190 | */ | |
191 | unsigned long thread_saved_pc(struct task_struct *tsk) | |
192 | { | |
d562ef6a | 193 | return task_thread_info(tsk)->kpc; |
1da177e4 LT |
194 | } |
195 | ||
196 | /* | |
197 | * Free current thread data structures etc.. | |
198 | */ | |
199 | void exit_thread(void) | |
200 | { | |
201 | #ifndef CONFIG_SMP | |
202 | if(last_task_used_math == current) { | |
203 | #else | |
54f565ea | 204 | if (test_thread_flag(TIF_USEDFPU)) { |
1da177e4 LT |
205 | #endif |
206 | /* Keep process from leaving FPU in a bogon state. */ | |
207 | put_psr(get_psr() | PSR_EF); | |
208 | fpsave(¤t->thread.float_regs[0], ¤t->thread.fsr, | |
209 | ¤t->thread.fpqueue[0], ¤t->thread.fpqdepth); | |
210 | #ifndef CONFIG_SMP | |
211 | last_task_used_math = NULL; | |
212 | #else | |
54f565ea | 213 | clear_thread_flag(TIF_USEDFPU); |
1da177e4 LT |
214 | #endif |
215 | } | |
216 | } | |
217 | ||
218 | void flush_thread(void) | |
219 | { | |
220 | current_thread_info()->w_saved = 0; | |
221 | ||
1da177e4 LT |
222 | #ifndef CONFIG_SMP |
223 | if(last_task_used_math == current) { | |
224 | #else | |
54f565ea | 225 | if (test_thread_flag(TIF_USEDFPU)) { |
1da177e4 LT |
226 | #endif |
227 | /* Clean the fpu. */ | |
228 | put_psr(get_psr() | PSR_EF); | |
229 | fpsave(¤t->thread.float_regs[0], ¤t->thread.fsr, | |
230 | ¤t->thread.fpqueue[0], ¤t->thread.fpqdepth); | |
231 | #ifndef CONFIG_SMP | |
232 | last_task_used_math = NULL; | |
233 | #else | |
54f565ea | 234 | clear_thread_flag(TIF_USEDFPU); |
1da177e4 LT |
235 | #endif |
236 | } | |
237 | ||
ddd53bf1 | 238 | /* This task is no longer a kernel thread. */ |
1da177e4 LT |
239 | if (current->thread.flags & SPARC_FLAG_KTHREAD) { |
240 | current->thread.flags &= ~SPARC_FLAG_KTHREAD; | |
241 | ||
242 | /* We must fixup kregs as well. */ | |
243 | /* XXX This was not fixed for ti for a while, worked. Unused? */ | |
244 | current->thread.kregs = (struct pt_regs *) | |
36483c6b | 245 | (task_stack_page(current) + (THREAD_SIZE - TRACEREG_SZ)); |
1da177e4 LT |
246 | } |
247 | } | |
248 | ||
64d329ee | 249 | static inline struct sparc_stackf __user * |
1da177e4 LT |
250 | clone_stackframe(struct sparc_stackf __user *dst, |
251 | struct sparc_stackf __user *src) | |
252 | { | |
253 | unsigned long size, fp; | |
254 | struct sparc_stackf *tmp; | |
255 | struct sparc_stackf __user *sp; | |
256 | ||
257 | if (get_user(tmp, &src->fp)) | |
258 | return NULL; | |
259 | ||
260 | fp = (unsigned long) tmp; | |
261 | size = (fp - ((unsigned long) src)); | |
262 | fp = (unsigned long) dst; | |
263 | sp = (struct sparc_stackf __user *)(fp - size); | |
264 | ||
265 | /* do_fork() grabs the parent semaphore, we must release it | |
266 | * temporarily so we can build the child clone stack frame | |
267 | * without deadlocking. | |
268 | */ | |
269 | if (__copy_user(sp, src, size)) | |
270 | sp = NULL; | |
271 | else if (put_user(fp, &sp->fp)) | |
272 | sp = NULL; | |
273 | ||
274 | return sp; | |
275 | } | |
276 | ||
277 | asmlinkage int sparc_do_fork(unsigned long clone_flags, | |
278 | unsigned long stack_start, | |
279 | struct pt_regs *regs, | |
280 | unsigned long stack_size) | |
281 | { | |
282 | unsigned long parent_tid_ptr, child_tid_ptr; | |
1e38c126 DM |
283 | unsigned long orig_i1 = regs->u_regs[UREG_I1]; |
284 | long ret; | |
1da177e4 LT |
285 | |
286 | parent_tid_ptr = regs->u_regs[UREG_I2]; | |
287 | child_tid_ptr = regs->u_regs[UREG_I4]; | |
288 | ||
1e38c126 DM |
289 | ret = do_fork(clone_flags, stack_start, |
290 | regs, stack_size, | |
291 | (int __user *) parent_tid_ptr, | |
292 | (int __user *) child_tid_ptr); | |
293 | ||
294 | /* If we get an error and potentially restart the system | |
295 | * call, we're screwed because copy_thread() clobbered | |
296 | * the parent's %o1. So detect that case and restore it | |
297 | * here. | |
298 | */ | |
299 | if ((unsigned long)ret >= -ERESTART_RESTARTBLOCK) | |
300 | regs->u_regs[UREG_I1] = orig_i1; | |
301 | ||
302 | return ret; | |
1da177e4 LT |
303 | } |
304 | ||
305 | /* Copy a Sparc thread. The fork() return value conventions | |
306 | * under SunOS are nothing short of bletcherous: | |
307 | * Parent --> %o0 == childs pid, %o1 == 0 | |
308 | * Child --> %o0 == parents pid, %o1 == 1 | |
309 | * | |
310 | * NOTE: We have a separate fork kpsr/kwim because | |
311 | * the parent could change these values between | |
312 | * sys_fork invocation and when we reach here | |
313 | * if the parent should sleep while trying to | |
314 | * allocate the task_struct and kernel stack in | |
315 | * do_fork(). | |
316 | * XXX See comment above sys_vfork in sparc64. todo. | |
317 | */ | |
318 | extern void ret_from_fork(void); | |
319 | ||
6f2c55b8 | 320 | int copy_thread(unsigned long clone_flags, unsigned long sp, |
1da177e4 LT |
321 | unsigned long unused, |
322 | struct task_struct *p, struct pt_regs *regs) | |
323 | { | |
36483c6b | 324 | struct thread_info *ti = task_thread_info(p); |
1da177e4 LT |
325 | struct pt_regs *childregs; |
326 | char *new_stack; | |
327 | ||
328 | #ifndef CONFIG_SMP | |
329 | if(last_task_used_math == current) { | |
330 | #else | |
54f565ea | 331 | if (test_thread_flag(TIF_USEDFPU)) { |
1da177e4 LT |
332 | #endif |
333 | put_psr(get_psr() | PSR_EF); | |
334 | fpsave(&p->thread.float_regs[0], &p->thread.fsr, | |
335 | &p->thread.fpqueue[0], &p->thread.fpqdepth); | |
336 | #ifdef CONFIG_SMP | |
54f565ea | 337 | clear_thread_flag(TIF_USEDFPU); |
1da177e4 LT |
338 | #endif |
339 | } | |
340 | ||
341 | /* | |
342 | * p->thread_info new_stack childregs | |
343 | * ! ! ! {if(PSR_PS) } | |
344 | * V V (stk.fr.) V (pt_regs) { (stk.fr.) } | |
345 | * +----- - - - - - ------+===========+============={+==========}+ | |
346 | */ | |
36483c6b | 347 | new_stack = task_stack_page(p) + THREAD_SIZE; |
1da177e4 LT |
348 | if (regs->psr & PSR_PS) |
349 | new_stack -= STACKFRAME_SZ; | |
350 | new_stack -= STACKFRAME_SZ + TRACEREG_SZ; | |
351 | memcpy(new_stack, (char *)regs - STACKFRAME_SZ, STACKFRAME_SZ + TRACEREG_SZ); | |
352 | childregs = (struct pt_regs *) (new_stack + STACKFRAME_SZ); | |
353 | ||
354 | /* | |
355 | * A new process must start with interrupts closed in 2.5, | |
356 | * because this is how Mingo's scheduler works (see schedule_tail | |
357 | * and finish_arch_switch). If we do not do it, a timer interrupt hits | |
358 | * before we unlock, attempts to re-take the rq->lock, and then we die. | |
359 | * Thus, kpsr|=PSR_PIL. | |
360 | */ | |
361 | ti->ksp = (unsigned long) new_stack; | |
362 | ti->kpc = (((unsigned long) ret_from_fork) - 0x8); | |
363 | ti->kpsr = current->thread.fork_kpsr | PSR_PIL; | |
364 | ti->kwim = current->thread.fork_kwim; | |
365 | ||
366 | if(regs->psr & PSR_PS) { | |
367 | extern struct pt_regs fake_swapper_regs; | |
368 | ||
369 | p->thread.kregs = &fake_swapper_regs; | |
370 | new_stack += STACKFRAME_SZ + TRACEREG_SZ; | |
371 | childregs->u_regs[UREG_FP] = (unsigned long) new_stack; | |
372 | p->thread.flags |= SPARC_FLAG_KTHREAD; | |
373 | p->thread.current_ds = KERNEL_DS; | |
374 | memcpy(new_stack, (void *)regs->u_regs[UREG_FP], STACKFRAME_SZ); | |
375 | childregs->u_regs[UREG_G6] = (unsigned long) ti; | |
376 | } else { | |
377 | p->thread.kregs = childregs; | |
378 | childregs->u_regs[UREG_FP] = sp; | |
379 | p->thread.flags &= ~SPARC_FLAG_KTHREAD; | |
380 | p->thread.current_ds = USER_DS; | |
381 | ||
382 | if (sp != regs->u_regs[UREG_FP]) { | |
383 | struct sparc_stackf __user *childstack; | |
384 | struct sparc_stackf __user *parentstack; | |
385 | ||
386 | /* | |
387 | * This is a clone() call with supplied user stack. | |
388 | * Set some valid stack frames to give to the child. | |
389 | */ | |
390 | childstack = (struct sparc_stackf __user *) | |
440ab7ac | 391 | (sp & ~0xfUL); |
1da177e4 LT |
392 | parentstack = (struct sparc_stackf __user *) |
393 | regs->u_regs[UREG_FP]; | |
394 | ||
395 | #if 0 | |
396 | printk("clone: parent stack:\n"); | |
397 | show_stackframe(parentstack); | |
398 | #endif | |
399 | ||
400 | childstack = clone_stackframe(childstack, parentstack); | |
401 | if (!childstack) | |
402 | return -EFAULT; | |
403 | ||
404 | #if 0 | |
405 | printk("clone: child stack:\n"); | |
406 | show_stackframe(childstack); | |
407 | #endif | |
408 | ||
409 | childregs->u_regs[UREG_FP] = (unsigned long)childstack; | |
410 | } | |
411 | } | |
412 | ||
413 | #ifdef CONFIG_SMP | |
414 | /* FPU must be disabled on SMP. */ | |
415 | childregs->psr &= ~PSR_EF; | |
416 | #endif | |
417 | ||
418 | /* Set the return value for the child. */ | |
419 | childregs->u_regs[UREG_I0] = current->pid; | |
420 | childregs->u_regs[UREG_I1] = 1; | |
421 | ||
422 | /* Set the return value for the parent. */ | |
423 | regs->u_regs[UREG_I1] = 0; | |
424 | ||
425 | if (clone_flags & CLONE_SETTLS) | |
426 | childregs->u_regs[UREG_G7] = regs->u_regs[UREG_I3]; | |
427 | ||
428 | return 0; | |
429 | } | |
430 | ||
1da177e4 LT |
431 | /* |
432 | * fill in the fpu structure for a core dump. | |
433 | */ | |
434 | int dump_fpu (struct pt_regs * regs, elf_fpregset_t * fpregs) | |
435 | { | |
436 | if (used_math()) { | |
437 | memset(fpregs, 0, sizeof(*fpregs)); | |
438 | fpregs->pr_q_entrysize = 8; | |
439 | return 1; | |
440 | } | |
441 | #ifdef CONFIG_SMP | |
54f565ea | 442 | if (test_thread_flag(TIF_USEDFPU)) { |
1da177e4 LT |
443 | put_psr(get_psr() | PSR_EF); |
444 | fpsave(¤t->thread.float_regs[0], ¤t->thread.fsr, | |
445 | ¤t->thread.fpqueue[0], ¤t->thread.fpqdepth); | |
446 | if (regs != NULL) { | |
447 | regs->psr &= ~(PSR_EF); | |
54f565ea | 448 | clear_thread_flag(TIF_USEDFPU); |
1da177e4 LT |
449 | } |
450 | } | |
451 | #else | |
452 | if (current == last_task_used_math) { | |
453 | put_psr(get_psr() | PSR_EF); | |
454 | fpsave(¤t->thread.float_regs[0], ¤t->thread.fsr, | |
455 | ¤t->thread.fpqueue[0], ¤t->thread.fpqdepth); | |
456 | if (regs != NULL) { | |
457 | regs->psr &= ~(PSR_EF); | |
458 | last_task_used_math = NULL; | |
459 | } | |
460 | } | |
461 | #endif | |
462 | memcpy(&fpregs->pr_fr.pr_regs[0], | |
463 | ¤t->thread.float_regs[0], | |
464 | (sizeof(unsigned long) * 32)); | |
465 | fpregs->pr_fsr = current->thread.fsr; | |
466 | fpregs->pr_qcnt = current->thread.fpqdepth; | |
467 | fpregs->pr_q_entrysize = 8; | |
468 | fpregs->pr_en = 1; | |
469 | if(fpregs->pr_qcnt != 0) { | |
470 | memcpy(&fpregs->pr_q[0], | |
471 | ¤t->thread.fpqueue[0], | |
472 | sizeof(struct fpq) * fpregs->pr_qcnt); | |
473 | } | |
474 | /* Zero out the rest. */ | |
475 | memset(&fpregs->pr_q[fpregs->pr_qcnt], 0, | |
476 | sizeof(struct fpq) * (32 - fpregs->pr_qcnt)); | |
477 | return 1; | |
478 | } | |
479 | ||
480 | /* | |
481 | * sparc_execve() executes a new program after the asm stub has set | |
482 | * things up for us. This should basically do what I want it to. | |
483 | */ | |
484 | asmlinkage int sparc_execve(struct pt_regs *regs) | |
485 | { | |
486 | int error, base = 0; | |
487 | char *filename; | |
488 | ||
489 | /* Check for indirect call. */ | |
490 | if(regs->u_regs[UREG_G1] == 0) | |
491 | base = 1; | |
492 | ||
493 | filename = getname((char __user *)regs->u_regs[base + UREG_I0]); | |
494 | error = PTR_ERR(filename); | |
495 | if(IS_ERR(filename)) | |
496 | goto out; | |
497 | error = do_execve(filename, | |
d7627467 DH |
498 | (const char __user *const __user *) |
499 | regs->u_regs[base + UREG_I1], | |
500 | (const char __user *const __user *) | |
501 | regs->u_regs[base + UREG_I2], | |
1da177e4 LT |
502 | regs); |
503 | putname(filename); | |
1da177e4 LT |
504 | out: |
505 | return error; | |
506 | } | |
507 | ||
508 | /* | |
509 | * This is the mechanism for creating a new kernel thread. | |
510 | * | |
511 | * NOTE! Only a kernel-only process(ie the swapper or direct descendants | |
512 | * who haven't done an "execve()") should use this: it will work within | |
513 | * a system call from a "real" process, but the process memory space will | |
d1a78c32 | 514 | * not be freed until both the parent and the child have exited. |
1da177e4 LT |
515 | */ |
516 | pid_t kernel_thread(int (*fn)(void *), void * arg, unsigned long flags) | |
517 | { | |
518 | long retval; | |
519 | ||
520 | __asm__ __volatile__("mov %4, %%g2\n\t" /* Set aside fn ptr... */ | |
521 | "mov %5, %%g3\n\t" /* and arg. */ | |
522 | "mov %1, %%g1\n\t" | |
523 | "mov %2, %%o0\n\t" /* Clone flags. */ | |
524 | "mov 0, %%o1\n\t" /* usp arg == 0 */ | |
525 | "t 0x10\n\t" /* Linux/Sparc clone(). */ | |
526 | "cmp %%o1, 0\n\t" | |
527 | "be 1f\n\t" /* The parent, just return. */ | |
528 | " nop\n\t" /* Delay slot. */ | |
529 | "jmpl %%g2, %%o7\n\t" /* Call the function. */ | |
530 | " mov %%g3, %%o0\n\t" /* Get back the arg in delay. */ | |
531 | "mov %3, %%g1\n\t" | |
532 | "t 0x10\n\t" /* Linux/Sparc exit(). */ | |
533 | /* Notreached by child. */ | |
534 | "1: mov %%o0, %0\n\t" : | |
535 | "=r" (retval) : | |
536 | "i" (__NR_clone), "r" (flags | CLONE_VM | CLONE_UNTRACED), | |
537 | "i" (__NR_exit), "r" (fn), "r" (arg) : | |
538 | "g1", "g2", "g3", "o0", "o1", "memory", "cc"); | |
539 | return retval; | |
540 | } | |
6943f3da | 541 | EXPORT_SYMBOL(kernel_thread); |
1da177e4 LT |
542 | |
543 | unsigned long get_wchan(struct task_struct *task) | |
544 | { | |
545 | unsigned long pc, fp, bias = 0; | |
546 | unsigned long task_base = (unsigned long) task; | |
547 | unsigned long ret = 0; | |
4d7b92ad | 548 | struct reg_window32 *rw; |
1da177e4 LT |
549 | int count = 0; |
550 | ||
551 | if (!task || task == current || | |
552 | task->state == TASK_RUNNING) | |
553 | goto out; | |
554 | ||
d562ef6a | 555 | fp = task_thread_info(task)->ksp + bias; |
1da177e4 LT |
556 | do { |
557 | /* Bogus frame pointer? */ | |
558 | if (fp < (task_base + sizeof(struct thread_info)) || | |
559 | fp >= (task_base + (2 * PAGE_SIZE))) | |
560 | break; | |
4d7b92ad | 561 | rw = (struct reg_window32 *) fp; |
1da177e4 LT |
562 | pc = rw->ins[7]; |
563 | if (!in_sched_functions(pc)) { | |
564 | ret = pc; | |
565 | goto out; | |
566 | } | |
567 | fp = rw->ins[6] + bias; | |
568 | } while (++count < 16); | |
569 | ||
570 | out: | |
571 | return ret; | |
572 | } | |
573 |