signal.c 20 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691
  1. /*
  2. * linux/arch/parisc/kernel/signal.c: Architecture-specific signal
  3. * handling support.
  4. *
  5. * Copyright (C) 2000 David Huggins-Daines <dhd@debian.org>
  6. * Copyright (C) 2000 Linuxcare, Inc.
  7. *
  8. * Based on the ia64, i386, and alpha versions.
  9. *
  10. * Like the IA-64, we are a recent enough port (we are *starting*
  11. * with glibc2.2) that we do not need to support the old non-realtime
  12. * Linux signals. Therefore we don't. HP/UX signals will go in
  13. * arch/parisc/hpux/signal.c when we figure out how to do them.
  14. */
  15. #include <linux/sched.h>
  16. #include <linux/mm.h>
  17. #include <linux/smp.h>
  18. #include <linux/kernel.h>
  19. #include <linux/signal.h>
  20. #include <linux/errno.h>
  21. #include <linux/wait.h>
  22. #include <linux/ptrace.h>
  23. #include <linux/tracehook.h>
  24. #include <linux/unistd.h>
  25. #include <linux/stddef.h>
  26. #include <linux/compat.h>
  27. #include <linux/elf.h>
  28. #include <asm/ucontext.h>
  29. #include <asm/rt_sigframe.h>
  30. #include <asm/uaccess.h>
  31. #include <asm/pgalloc.h>
  32. #include <asm/cacheflush.h>
  33. #include <asm/asm-offsets.h>
  34. #ifdef CONFIG_COMPAT
  35. #include "signal32.h"
  36. #endif
  37. #define DEBUG_SIG 0
  38. #define DEBUG_SIG_LEVEL 2
  39. #if DEBUG_SIG
  40. #define DBG(LEVEL, ...) \
  41. ((DEBUG_SIG_LEVEL >= LEVEL) \
  42. ? printk(__VA_ARGS__) : (void) 0)
  43. #else
  44. #define DBG(LEVEL, ...)
  45. #endif
  46. #define _BLOCKABLE (~(sigmask(SIGKILL) | sigmask(SIGSTOP)))
  47. /* gcc will complain if a pointer is cast to an integer of different
  48. * size. If you really need to do this (and we do for an ELF32 user
  49. * application in an ELF64 kernel) then you have to do a cast to an
  50. * integer of the same size first. The A() macro accomplishes
  51. * this. */
  52. #define A(__x) ((unsigned long)(__x))
  53. /*
  54. * Atomically swap in the new signal mask, and wait for a signal.
  55. */
  56. #ifdef CONFIG_64BIT
  57. #include "sys32.h"
  58. #endif
  59. /*
  60. * Do a signal return - restore sigcontext.
  61. */
  62. /* Trampoline for calling rt_sigreturn() */
  63. #define INSN_LDI_R25_0 0x34190000 /* ldi 0,%r25 (in_syscall=0) */
  64. #define INSN_LDI_R25_1 0x34190002 /* ldi 1,%r25 (in_syscall=1) */
  65. #define INSN_LDI_R20 0x3414015a /* ldi __NR_rt_sigreturn,%r20 */
  66. #define INSN_BLE_SR2_R0 0xe4008200 /* be,l 0x100(%sr2,%r0),%sr0,%r31 */
  67. #define INSN_NOP 0x08000240 /* nop */
  68. /* For debugging */
  69. #define INSN_DIE_HORRIBLY 0x68000ccc /* stw %r0,0x666(%sr0,%r0) */
  70. static long
  71. restore_sigcontext(struct sigcontext __user *sc, struct pt_regs *regs)
  72. {
  73. long err = 0;
  74. err |= __copy_from_user(regs->gr, sc->sc_gr, sizeof(regs->gr));
  75. err |= __copy_from_user(regs->fr, sc->sc_fr, sizeof(regs->fr));
  76. err |= __copy_from_user(regs->iaoq, sc->sc_iaoq, sizeof(regs->iaoq));
  77. err |= __copy_from_user(regs->iasq, sc->sc_iasq, sizeof(regs->iasq));
  78. err |= __get_user(regs->sar, &sc->sc_sar);
  79. DBG(2,"restore_sigcontext: iaoq is 0x%#lx / 0x%#lx\n",
  80. regs->iaoq[0],regs->iaoq[1]);
  81. DBG(2,"restore_sigcontext: r28 is %ld\n", regs->gr[28]);
  82. return err;
  83. }
  84. void
  85. sys_rt_sigreturn(struct pt_regs *regs, int in_syscall)
  86. {
  87. struct rt_sigframe __user *frame;
  88. sigset_t set;
  89. unsigned long usp = (regs->gr[30] & ~(0x01UL));
  90. unsigned long sigframe_size = PARISC_RT_SIGFRAME_SIZE;
  91. #ifdef CONFIG_64BIT
  92. compat_sigset_t compat_set;
  93. struct compat_rt_sigframe __user * compat_frame;
  94. if (is_compat_task())
  95. sigframe_size = PARISC_RT_SIGFRAME_SIZE32;
  96. #endif
  97. /* Unwind the user stack to get the rt_sigframe structure. */
  98. frame = (struct rt_sigframe __user *)
  99. (usp - sigframe_size);
  100. DBG(2,"sys_rt_sigreturn: frame is %p\n", frame);
  101. #ifdef CONFIG_64BIT
  102. compat_frame = (struct compat_rt_sigframe __user *)frame;
  103. if (is_compat_task()) {
  104. DBG(2,"sys_rt_sigreturn: ELF32 process.\n");
  105. if (__copy_from_user(&compat_set, &compat_frame->uc.uc_sigmask, sizeof(compat_set)))
  106. goto give_sigsegv;
  107. sigset_32to64(&set,&compat_set);
  108. } else
  109. #endif
  110. {
  111. if (__copy_from_user(&set, &frame->uc.uc_sigmask, sizeof(set)))
  112. goto give_sigsegv;
  113. }
  114. sigdelsetmask(&set, ~_BLOCKABLE);
  115. spin_lock_irq(&current->sighand->siglock);
  116. current->blocked = set;
  117. recalc_sigpending();
  118. spin_unlock_irq(&current->sighand->siglock);
  119. /* Good thing we saved the old gr[30], eh? */
  120. #ifdef CONFIG_64BIT
  121. if (is_compat_task()) {
  122. DBG(1,"sys_rt_sigreturn: compat_frame->uc.uc_mcontext 0x%p\n",
  123. &compat_frame->uc.uc_mcontext);
  124. // FIXME: Load upper half from register file
  125. if (restore_sigcontext32(&compat_frame->uc.uc_mcontext,
  126. &compat_frame->regs, regs))
  127. goto give_sigsegv;
  128. DBG(1,"sys_rt_sigreturn: usp %#08lx stack 0x%p\n",
  129. usp, &compat_frame->uc.uc_stack);
  130. if (do_sigaltstack32(&compat_frame->uc.uc_stack, NULL, usp) == -EFAULT)
  131. goto give_sigsegv;
  132. } else
  133. #endif
  134. {
  135. DBG(1,"sys_rt_sigreturn: frame->uc.uc_mcontext 0x%p\n",
  136. &frame->uc.uc_mcontext);
  137. if (restore_sigcontext(&frame->uc.uc_mcontext, regs))
  138. goto give_sigsegv;
  139. DBG(1,"sys_rt_sigreturn: usp %#08lx stack 0x%p\n",
  140. usp, &frame->uc.uc_stack);
  141. if (do_sigaltstack(&frame->uc.uc_stack, NULL, usp) == -EFAULT)
  142. goto give_sigsegv;
  143. }
  144. /* If we are on the syscall path IAOQ will not be restored, and
  145. * if we are on the interrupt path we must not corrupt gr31.
  146. */
  147. if (in_syscall)
  148. regs->gr[31] = regs->iaoq[0];
  149. #if DEBUG_SIG
  150. DBG(1,"sys_rt_sigreturn: returning to %#lx, DUMPING REGS:\n", regs->iaoq[0]);
  151. show_regs(regs);
  152. #endif
  153. return;
  154. give_sigsegv:
  155. DBG(1,"sys_rt_sigreturn: Sending SIGSEGV\n");
  156. force_sig(SIGSEGV, current);
  157. return;
  158. }
  159. /*
  160. * Set up a signal frame.
  161. */
  162. static inline void __user *
  163. get_sigframe(struct k_sigaction *ka, unsigned long sp, size_t frame_size)
  164. {
  165. /*FIXME: ELF32 vs. ELF64 has different frame_size, but since we
  166. don't use the parameter it doesn't matter */
  167. DBG(1,"get_sigframe: ka = %#lx, sp = %#lx, frame_size = %#lx\n",
  168. (unsigned long)ka, sp, frame_size);
  169. if ((ka->sa.sa_flags & SA_ONSTACK) != 0 && ! sas_ss_flags(sp))
  170. sp = current->sas_ss_sp; /* Stacks grow up! */
  171. DBG(1,"get_sigframe: Returning sp = %#lx\n", (unsigned long)sp);
  172. return (void __user *) sp; /* Stacks grow up. Fun. */
  173. }
  174. static long
  175. setup_sigcontext(struct sigcontext __user *sc, struct pt_regs *regs, int in_syscall)
  176. {
  177. unsigned long flags = 0;
  178. long err = 0;
  179. if (on_sig_stack((unsigned long) sc))
  180. flags |= PARISC_SC_FLAG_ONSTACK;
  181. if (in_syscall) {
  182. flags |= PARISC_SC_FLAG_IN_SYSCALL;
  183. /* regs->iaoq is undefined in the syscall return path */
  184. err |= __put_user(regs->gr[31], &sc->sc_iaoq[0]);
  185. err |= __put_user(regs->gr[31]+4, &sc->sc_iaoq[1]);
  186. err |= __put_user(regs->sr[3], &sc->sc_iasq[0]);
  187. err |= __put_user(regs->sr[3], &sc->sc_iasq[1]);
  188. DBG(1,"setup_sigcontext: iaoq %#lx / %#lx (in syscall)\n",
  189. regs->gr[31], regs->gr[31]+4);
  190. } else {
  191. err |= __copy_to_user(sc->sc_iaoq, regs->iaoq, sizeof(regs->iaoq));
  192. err |= __copy_to_user(sc->sc_iasq, regs->iasq, sizeof(regs->iasq));
  193. DBG(1,"setup_sigcontext: iaoq %#lx / %#lx (not in syscall)\n",
  194. regs->iaoq[0], regs->iaoq[1]);
  195. }
  196. err |= __put_user(flags, &sc->sc_flags);
  197. err |= __copy_to_user(sc->sc_gr, regs->gr, sizeof(regs->gr));
  198. err |= __copy_to_user(sc->sc_fr, regs->fr, sizeof(regs->fr));
  199. err |= __put_user(regs->sar, &sc->sc_sar);
  200. DBG(1,"setup_sigcontext: r28 is %ld\n", regs->gr[28]);
  201. return err;
  202. }
  203. static long
  204. setup_rt_frame(int sig, struct k_sigaction *ka, siginfo_t *info,
  205. sigset_t *set, struct pt_regs *regs, int in_syscall)
  206. {
  207. struct rt_sigframe __user *frame;
  208. unsigned long rp, usp;
  209. unsigned long haddr, sigframe_size;
  210. int err = 0;
  211. #ifdef CONFIG_64BIT
  212. compat_int_t compat_val;
  213. struct compat_rt_sigframe __user * compat_frame;
  214. compat_sigset_t compat_set;
  215. #endif
  216. usp = (regs->gr[30] & ~(0x01UL));
  217. /*FIXME: frame_size parameter is unused, remove it. */
  218. frame = get_sigframe(ka, usp, sizeof(*frame));
  219. DBG(1,"SETUP_RT_FRAME: START\n");
  220. DBG(1,"setup_rt_frame: frame %p info %p\n", frame, info);
  221. #ifdef CONFIG_64BIT
  222. compat_frame = (struct compat_rt_sigframe __user *)frame;
  223. if (is_compat_task()) {
  224. DBG(1,"setup_rt_frame: frame->info = 0x%p\n", &compat_frame->info);
  225. err |= copy_siginfo_to_user32(&compat_frame->info, info);
  226. DBG(1,"SETUP_RT_FRAME: 1\n");
  227. compat_val = (compat_int_t)current->sas_ss_sp;
  228. err |= __put_user(compat_val, &compat_frame->uc.uc_stack.ss_sp);
  229. DBG(1,"SETUP_RT_FRAME: 2\n");
  230. compat_val = (compat_int_t)current->sas_ss_size;
  231. err |= __put_user(compat_val, &compat_frame->uc.uc_stack.ss_size);
  232. DBG(1,"SETUP_RT_FRAME: 3\n");
  233. compat_val = sas_ss_flags(regs->gr[30]);
  234. err |= __put_user(compat_val, &compat_frame->uc.uc_stack.ss_flags);
  235. DBG(1,"setup_rt_frame: frame->uc = 0x%p\n", &compat_frame->uc);
  236. DBG(1,"setup_rt_frame: frame->uc.uc_mcontext = 0x%p\n", &compat_frame->uc.uc_mcontext);
  237. err |= setup_sigcontext32(&compat_frame->uc.uc_mcontext,
  238. &compat_frame->regs, regs, in_syscall);
  239. sigset_64to32(&compat_set,set);
  240. err |= __copy_to_user(&compat_frame->uc.uc_sigmask, &compat_set, sizeof(compat_set));
  241. } else
  242. #endif
  243. {
  244. DBG(1,"setup_rt_frame: frame->info = 0x%p\n", &frame->info);
  245. err |= copy_siginfo_to_user(&frame->info, info);
  246. err |= __put_user(current->sas_ss_sp, &frame->uc.uc_stack.ss_sp);
  247. err |= __put_user(current->sas_ss_size, &frame->uc.uc_stack.ss_size);
  248. err |= __put_user(sas_ss_flags(regs->gr[30]),
  249. &frame->uc.uc_stack.ss_flags);
  250. DBG(1,"setup_rt_frame: frame->uc = 0x%p\n", &frame->uc);
  251. DBG(1,"setup_rt_frame: frame->uc.uc_mcontext = 0x%p\n", &frame->uc.uc_mcontext);
  252. err |= setup_sigcontext(&frame->uc.uc_mcontext, regs, in_syscall);
  253. /* FIXME: Should probably be converted as well for the compat case */
  254. err |= __copy_to_user(&frame->uc.uc_sigmask, set, sizeof(*set));
  255. }
  256. if (err)
  257. goto give_sigsegv;
  258. /* Set up to return from userspace. If provided, use a stub
  259. already in userspace. The first words of tramp are used to
  260. save the previous sigrestartblock trampoline that might be
  261. on the stack. We start the sigreturn trampoline at
  262. SIGRESTARTBLOCK_TRAMP+X. */
  263. err |= __put_user(in_syscall ? INSN_LDI_R25_1 : INSN_LDI_R25_0,
  264. &frame->tramp[SIGRESTARTBLOCK_TRAMP+0]);
  265. err |= __put_user(INSN_LDI_R20,
  266. &frame->tramp[SIGRESTARTBLOCK_TRAMP+1]);
  267. err |= __put_user(INSN_BLE_SR2_R0,
  268. &frame->tramp[SIGRESTARTBLOCK_TRAMP+2]);
  269. err |= __put_user(INSN_NOP, &frame->tramp[SIGRESTARTBLOCK_TRAMP+3]);
  270. #if DEBUG_SIG
  271. /* Assert that we're flushing in the correct space... */
  272. {
  273. int sid;
  274. asm ("mfsp %%sr3,%0" : "=r" (sid));
  275. DBG(1,"setup_rt_frame: Flushing 64 bytes at space %#x offset %p\n",
  276. sid, frame->tramp);
  277. }
  278. #endif
  279. flush_user_dcache_range((unsigned long) &frame->tramp[0],
  280. (unsigned long) &frame->tramp[TRAMP_SIZE]);
  281. flush_user_icache_range((unsigned long) &frame->tramp[0],
  282. (unsigned long) &frame->tramp[TRAMP_SIZE]);
  283. /* TRAMP Words 0-4, Length 5 = SIGRESTARTBLOCK_TRAMP
  284. * TRAMP Words 5-9, Length 4 = SIGRETURN_TRAMP
  285. * So the SIGRETURN_TRAMP is at the end of SIGRESTARTBLOCK_TRAMP
  286. */
  287. rp = (unsigned long) &frame->tramp[SIGRESTARTBLOCK_TRAMP];
  288. if (err)
  289. goto give_sigsegv;
  290. haddr = A(ka->sa.sa_handler);
  291. /* The sa_handler may be a pointer to a function descriptor */
  292. #ifdef CONFIG_64BIT
  293. if (is_compat_task()) {
  294. #endif
  295. if (haddr & PA_PLABEL_FDESC) {
  296. Elf32_Fdesc fdesc;
  297. Elf32_Fdesc __user *ufdesc = (Elf32_Fdesc __user *)A(haddr & ~3);
  298. err = __copy_from_user(&fdesc, ufdesc, sizeof(fdesc));
  299. if (err)
  300. goto give_sigsegv;
  301. haddr = fdesc.addr;
  302. regs->gr[19] = fdesc.gp;
  303. }
  304. #ifdef CONFIG_64BIT
  305. } else {
  306. Elf64_Fdesc fdesc;
  307. Elf64_Fdesc __user *ufdesc = (Elf64_Fdesc __user *)A(haddr & ~3);
  308. err = __copy_from_user(&fdesc, ufdesc, sizeof(fdesc));
  309. if (err)
  310. goto give_sigsegv;
  311. haddr = fdesc.addr;
  312. regs->gr[19] = fdesc.gp;
  313. DBG(1,"setup_rt_frame: 64 bit signal, exe=%#lx, r19=%#lx, in_syscall=%d\n",
  314. haddr, regs->gr[19], in_syscall);
  315. }
  316. #endif
  317. /* The syscall return path will create IAOQ values from r31.
  318. */
  319. sigframe_size = PARISC_RT_SIGFRAME_SIZE;
  320. #ifdef CONFIG_64BIT
  321. if (is_compat_task())
  322. sigframe_size = PARISC_RT_SIGFRAME_SIZE32;
  323. #endif
  324. if (in_syscall) {
  325. regs->gr[31] = haddr;
  326. #ifdef CONFIG_64BIT
  327. if (!test_thread_flag(TIF_32BIT))
  328. sigframe_size |= 1;
  329. #endif
  330. } else {
  331. unsigned long psw = USER_PSW;
  332. #ifdef CONFIG_64BIT
  333. if (!test_thread_flag(TIF_32BIT))
  334. psw |= PSW_W;
  335. #endif
  336. /* If we are singlestepping, arrange a trap to be delivered
  337. when we return to userspace. Note the semantics -- we
  338. should trap before the first insn in the handler is
  339. executed. Ref:
  340. http://sources.redhat.com/ml/gdb/2004-11/msg00245.html
  341. */
  342. if (pa_psw(current)->r) {
  343. pa_psw(current)->r = 0;
  344. psw |= PSW_R;
  345. mtctl(-1, 0);
  346. }
  347. regs->gr[0] = psw;
  348. regs->iaoq[0] = haddr | 3;
  349. regs->iaoq[1] = regs->iaoq[0] + 4;
  350. }
  351. regs->gr[2] = rp; /* userland return pointer */
  352. regs->gr[26] = sig; /* signal number */
  353. #ifdef CONFIG_64BIT
  354. if (is_compat_task()) {
  355. regs->gr[25] = A(&compat_frame->info); /* siginfo pointer */
  356. regs->gr[24] = A(&compat_frame->uc); /* ucontext pointer */
  357. } else
  358. #endif
  359. {
  360. regs->gr[25] = A(&frame->info); /* siginfo pointer */
  361. regs->gr[24] = A(&frame->uc); /* ucontext pointer */
  362. }
  363. DBG(1,"setup_rt_frame: making sigreturn frame: %#lx + %#lx = %#lx\n",
  364. regs->gr[30], sigframe_size,
  365. regs->gr[30] + sigframe_size);
  366. /* Raise the user stack pointer to make a proper call frame. */
  367. regs->gr[30] = (A(frame) + sigframe_size);
  368. DBG(1,"setup_rt_frame: sig deliver (%s,%d) frame=0x%p sp=%#lx iaoq=%#lx/%#lx rp=%#lx\n",
  369. current->comm, current->pid, frame, regs->gr[30],
  370. regs->iaoq[0], regs->iaoq[1], rp);
  371. return 1;
  372. give_sigsegv:
  373. DBG(1,"setup_rt_frame: sending SIGSEGV\n");
  374. force_sigsegv(sig, current);
  375. return 0;
  376. }
  377. /*
  378. * OK, we're invoking a handler.
  379. */
  380. static long
  381. handle_signal(unsigned long sig, siginfo_t *info, struct k_sigaction *ka,
  382. sigset_t *oldset, struct pt_regs *regs, int in_syscall)
  383. {
  384. DBG(1,"handle_signal: sig=%ld, ka=%p, info=%p, oldset=%p, regs=%p\n",
  385. sig, ka, info, oldset, regs);
  386. /* Set up the stack frame */
  387. if (!setup_rt_frame(sig, ka, info, oldset, regs, in_syscall))
  388. return 0;
  389. spin_lock_irq(&current->sighand->siglock);
  390. sigorsets(&current->blocked,&current->blocked,&ka->sa.sa_mask);
  391. if (!(ka->sa.sa_flags & SA_NODEFER))
  392. sigaddset(&current->blocked,sig);
  393. recalc_sigpending();
  394. spin_unlock_irq(&current->sighand->siglock);
  395. tracehook_signal_handler(sig, info, ka, regs,
  396. test_thread_flag(TIF_SINGLESTEP) ||
  397. test_thread_flag(TIF_BLOCKSTEP));
  398. return 1;
  399. }
  400. /*
  401. * Check how the syscall number gets loaded into %r20 within
  402. * the delay branch in userspace and adjust as needed.
  403. */
  404. static void check_syscallno_in_delay_branch(struct pt_regs *regs)
  405. {
  406. u32 opcode, source_reg;
  407. u32 __user *uaddr;
  408. int err;
  409. /* Usually we don't have to restore %r20 (the system call number)
  410. * because it gets loaded in the delay slot of the branch external
  411. * instruction via the ldi instruction.
  412. * In some cases a register-to-register copy instruction might have
  413. * been used instead, in which case we need to copy the syscall
  414. * number into the source register before returning to userspace.
  415. */
  416. /* A syscall is just a branch, so all we have to do is fiddle the
  417. * return pointer so that the ble instruction gets executed again.
  418. */
  419. regs->gr[31] -= 8; /* delayed branching */
  420. /* Get assembler opcode of code in delay branch */
  421. uaddr = (unsigned int *) ((regs->gr[31] & ~3) + 4);
  422. err = get_user(opcode, uaddr);
  423. if (err)
  424. return;
  425. /* Check if delay branch uses "ldi int,%r20" */
  426. if ((opcode & 0xffff0000) == 0x34140000)
  427. return; /* everything ok, just return */
  428. /* Check if delay branch uses "nop" */
  429. if (opcode == INSN_NOP)
  430. return;
  431. /* Check if delay branch uses "copy %rX,%r20" */
  432. if ((opcode & 0xffe0ffff) == 0x08000254) {
  433. source_reg = (opcode >> 16) & 31;
  434. regs->gr[source_reg] = regs->gr[20];
  435. return;
  436. }
  437. pr_warn("syscall restart: %s (pid %d): unexpected opcode 0x%08x\n",
  438. current->comm, task_pid_nr(current), opcode);
  439. }
  440. static inline void
  441. syscall_restart(struct pt_regs *regs, struct k_sigaction *ka)
  442. {
  443. /* Check the return code */
  444. switch (regs->gr[28]) {
  445. case -ERESTART_RESTARTBLOCK:
  446. current_thread_info()->restart_block.fn =
  447. do_no_restart_syscall;
  448. case -ERESTARTNOHAND:
  449. DBG(1,"ERESTARTNOHAND: returning -EINTR\n");
  450. regs->gr[28] = -EINTR;
  451. break;
  452. case -ERESTARTSYS:
  453. if (!(ka->sa.sa_flags & SA_RESTART)) {
  454. DBG(1,"ERESTARTSYS: putting -EINTR\n");
  455. regs->gr[28] = -EINTR;
  456. break;
  457. }
  458. /* fallthrough */
  459. case -ERESTARTNOINTR:
  460. check_syscallno_in_delay_branch(regs);
  461. /* Preserve original r28. */
  462. regs->gr[28] = regs->orig_r28;
  463. break;
  464. }
  465. }
  466. static inline void
  467. insert_restart_trampoline(struct pt_regs *regs)
  468. {
  469. switch(regs->gr[28]) {
  470. case -ERESTART_RESTARTBLOCK: {
  471. /* Restart the system call - no handlers present */
  472. unsigned int *usp = (unsigned int *)regs->gr[30];
  473. /* Setup a trampoline to restart the syscall
  474. * with __NR_restart_syscall
  475. *
  476. * 0: <return address (orig r31)>
  477. * 4: <2nd half for 64-bit>
  478. * 8: ldw 0(%sp), %r31
  479. * 12: be 0x100(%sr2, %r0)
  480. * 16: ldi __NR_restart_syscall, %r20
  481. */
  482. #ifdef CONFIG_64BIT
  483. put_user(regs->gr[31] >> 32, &usp[0]);
  484. put_user(regs->gr[31] & 0xffffffff, &usp[1]);
  485. put_user(0x0fc010df, &usp[2]);
  486. #else
  487. put_user(regs->gr[31], &usp[0]);
  488. put_user(0x0fc0109f, &usp[2]);
  489. #endif
  490. put_user(0xe0008200, &usp[3]);
  491. put_user(0x34140000, &usp[4]);
  492. /* Stack is 64-byte aligned, and we only need
  493. * to flush 1 cache line.
  494. * Flushing one cacheline is cheap.
  495. * "sync" on bigger (> 4 way) boxes is not.
  496. */
  497. flush_user_dcache_range(regs->gr[30], regs->gr[30] + 4);
  498. flush_user_icache_range(regs->gr[30], regs->gr[30] + 4);
  499. regs->gr[31] = regs->gr[30] + 8;
  500. /* Preserve original r28. */
  501. regs->gr[28] = regs->orig_r28;
  502. return;
  503. }
  504. case -ERESTARTNOHAND:
  505. case -ERESTARTSYS:
  506. case -ERESTARTNOINTR:
  507. check_syscallno_in_delay_branch(regs);
  508. return;
  509. default:
  510. break;
  511. }
  512. }
  513. /*
  514. * Note that 'init' is a special process: it doesn't get signals it doesn't
  515. * want to handle. Thus you cannot kill init even with a SIGKILL even by
  516. * mistake.
  517. *
  518. * We need to be able to restore the syscall arguments (r21-r26) to
  519. * restart syscalls. Thus, the syscall path should save them in the
  520. * pt_regs structure (it's okay to do so since they are caller-save
  521. * registers). As noted below, the syscall number gets restored for
  522. * us due to the magic of delayed branching.
  523. */
  524. asmlinkage void
  525. do_signal(struct pt_regs *regs, long in_syscall)
  526. {
  527. siginfo_t info;
  528. struct k_sigaction ka;
  529. int signr;
  530. sigset_t *oldset;
  531. DBG(1,"\ndo_signal: oldset=0x%p, regs=0x%p, sr7 %#lx, in_syscall=%d\n",
  532. oldset, regs, regs->sr[7], in_syscall);
  533. /* Everyone else checks to see if they are in kernel mode at
  534. this point and exits if that's the case. I'm not sure why
  535. we would be called in that case, but for some reason we
  536. are. */
  537. if (test_thread_flag(TIF_RESTORE_SIGMASK))
  538. oldset = &current->saved_sigmask;
  539. else
  540. oldset = &current->blocked;
  541. DBG(1,"do_signal: oldset %08lx / %08lx\n",
  542. oldset->sig[0], oldset->sig[1]);
  543. /* May need to force signal if handle_signal failed to deliver */
  544. while (1) {
  545. signr = get_signal_to_deliver(&info, &ka, regs, NULL);
  546. DBG(3,"do_signal: signr = %d, regs->gr[28] = %ld\n", signr, regs->gr[28]);
  547. if (signr <= 0)
  548. break;
  549. /* Restart a system call if necessary. */
  550. if (in_syscall)
  551. syscall_restart(regs, &ka);
  552. /* Whee! Actually deliver the signal. If the
  553. delivery failed, we need to continue to iterate in
  554. this loop so we can deliver the SIGSEGV... */
  555. if (handle_signal(signr, &info, &ka, oldset,
  556. regs, in_syscall)) {
  557. DBG(1,KERN_DEBUG "do_signal: Exit (success), regs->gr[28] = %ld\n",
  558. regs->gr[28]);
  559. if (test_thread_flag(TIF_RESTORE_SIGMASK))
  560. clear_thread_flag(TIF_RESTORE_SIGMASK);
  561. return;
  562. }
  563. }
  564. /* end of while(1) looping forever if we can't force a signal */
  565. /* Did we come from a system call? */
  566. if (in_syscall)
  567. insert_restart_trampoline(regs);
  568. DBG(1,"do_signal: Exit (not delivered), regs->gr[28] = %ld\n",
  569. regs->gr[28]);
  570. if (test_thread_flag(TIF_RESTORE_SIGMASK)) {
  571. clear_thread_flag(TIF_RESTORE_SIGMASK);
  572. sigprocmask(SIG_SETMASK, &current->saved_sigmask, NULL);
  573. }
  574. return;
  575. }
  576. void do_notify_resume(struct pt_regs *regs, long in_syscall)
  577. {
  578. if (test_thread_flag(TIF_SIGPENDING) ||
  579. test_thread_flag(TIF_RESTORE_SIGMASK))
  580. do_signal(regs, in_syscall);
  581. if (test_thread_flag(TIF_NOTIFY_RESUME)) {
  582. clear_thread_flag(TIF_NOTIFY_RESUME);
  583. tracehook_notify_resume(regs);
  584. if (current->replacement_session_keyring)
  585. key_replace_session_keyring();
  586. }
  587. }