traps_64.c 25 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931
  1. /*
  2. * arch/sh/kernel/traps_64.c
  3. *
  4. * Copyright (C) 2000, 2001 Paolo Alberelli
  5. * Copyright (C) 2003, 2004 Paul Mundt
  6. * Copyright (C) 2003, 2004 Richard Curnow
  7. *
  8. * This file is subject to the terms and conditions of the GNU General Public
  9. * License. See the file "COPYING" in the main directory of this archive
  10. * for more details.
  11. */
  12. #include <linux/sched.h>
  13. #include <linux/kernel.h>
  14. #include <linux/string.h>
  15. #include <linux/errno.h>
  16. #include <linux/ptrace.h>
  17. #include <linux/timer.h>
  18. #include <linux/mm.h>
  19. #include <linux/smp.h>
  20. #include <linux/init.h>
  21. #include <linux/delay.h>
  22. #include <linux/spinlock.h>
  23. #include <linux/kallsyms.h>
  24. #include <linux/interrupt.h>
  25. #include <linux/sysctl.h>
  26. #include <linux/module.h>
  27. #include <linux/perf_event.h>
  28. #include <asm/uaccess.h>
  29. #include <asm/io.h>
  30. #include <linux/atomic.h>
  31. #include <asm/processor.h>
  32. #include <asm/pgtable.h>
  33. #include <asm/fpu.h>
  34. #undef DEBUG_EXCEPTION
  35. #ifdef DEBUG_EXCEPTION
  36. /* implemented in ../lib/dbg.c */
  37. extern void show_excp_regs(char *fname, int trapnr, int signr,
  38. struct pt_regs *regs);
  39. #else
  40. #define show_excp_regs(a, b, c, d)
  41. #endif
  42. static void do_unhandled_exception(int trapnr, int signr, char *str, char *fn_name,
  43. unsigned long error_code, struct pt_regs *regs, struct task_struct *tsk);
  44. #define DO_ERROR(trapnr, signr, str, name, tsk) \
  45. asmlinkage void do_##name(unsigned long error_code, struct pt_regs *regs) \
  46. { \
  47. do_unhandled_exception(trapnr, signr, str, __stringify(name), error_code, regs, current); \
  48. }
  49. static DEFINE_SPINLOCK(die_lock);
  50. void die(const char * str, struct pt_regs * regs, long err)
  51. {
  52. console_verbose();
  53. spin_lock_irq(&die_lock);
  54. printk("%s: %lx\n", str, (err & 0xffffff));
  55. show_regs(regs);
  56. spin_unlock_irq(&die_lock);
  57. do_exit(SIGSEGV);
  58. }
  59. static inline void die_if_kernel(const char * str, struct pt_regs * regs, long err)
  60. {
  61. if (!user_mode(regs))
  62. die(str, regs, err);
  63. }
  64. static void die_if_no_fixup(const char * str, struct pt_regs * regs, long err)
  65. {
  66. if (!user_mode(regs)) {
  67. const struct exception_table_entry *fixup;
  68. fixup = search_exception_tables(regs->pc);
  69. if (fixup) {
  70. regs->pc = fixup->fixup;
  71. return;
  72. }
  73. die(str, regs, err);
  74. }
  75. }
  76. DO_ERROR(13, SIGILL, "illegal slot instruction", illegal_slot_inst, current)
  77. DO_ERROR(87, SIGSEGV, "address error (exec)", address_error_exec, current)
  78. /* Implement misaligned load/store handling for kernel (and optionally for user
  79. mode too). Limitation : only SHmedia mode code is handled - there is no
  80. handling at all for misaligned accesses occurring in SHcompact code yet. */
  81. static int misaligned_fixup(struct pt_regs *regs);
  82. asmlinkage void do_address_error_load(unsigned long error_code, struct pt_regs *regs)
  83. {
  84. if (misaligned_fixup(regs) < 0) {
  85. do_unhandled_exception(7, SIGSEGV, "address error(load)",
  86. "do_address_error_load",
  87. error_code, regs, current);
  88. }
  89. return;
  90. }
  91. asmlinkage void do_address_error_store(unsigned long error_code, struct pt_regs *regs)
  92. {
  93. if (misaligned_fixup(regs) < 0) {
  94. do_unhandled_exception(8, SIGSEGV, "address error(store)",
  95. "do_address_error_store",
  96. error_code, regs, current);
  97. }
  98. return;
  99. }
  100. #if defined(CONFIG_SH64_ID2815_WORKAROUND)
  101. #define OPCODE_INVALID 0
  102. #define OPCODE_USER_VALID 1
  103. #define OPCODE_PRIV_VALID 2
  104. /* getcon/putcon - requires checking which control register is referenced. */
  105. #define OPCODE_CTRL_REG 3
  106. /* Table of valid opcodes for SHmedia mode.
  107. Form a 10-bit value by concatenating the major/minor opcodes i.e.
  108. opcode[31:26,20:16]. The 6 MSBs of this value index into the following
  109. array. The 4 LSBs select the bit-pair in the entry (bits 1:0 correspond to
  110. LSBs==4'b0000 etc). */
  111. static unsigned long shmedia_opcode_table[64] = {
  112. 0x55554044,0x54445055,0x15141514,0x14541414,0x00000000,0x10001000,0x01110055,0x04050015,
  113. 0x00000444,0xc0000000,0x44545515,0x40405555,0x55550015,0x10005555,0x55555505,0x04050000,
  114. 0x00000555,0x00000404,0x00040445,0x15151414,0x00000000,0x00000000,0x00000000,0x00000000,
  115. 0x00000055,0x40404444,0x00000404,0xc0009495,0x00000000,0x00000000,0x00000000,0x00000000,
  116. 0x55555555,0x55555555,0x55555555,0x55555555,0x55555555,0x55555555,0x55555555,0x55555555,
  117. 0x55555555,0x55555555,0x55555555,0x55555555,0x55555555,0x55555555,0x55555555,0x55555555,
  118. 0x80005050,0x04005055,0x55555555,0x55555555,0x55555555,0x55555555,0x55555555,0x55555555,
  119. 0x81055554,0x00000404,0x55555555,0x55555555,0x00000000,0x00000000,0x00000000,0x00000000
  120. };
  121. void do_reserved_inst(unsigned long error_code, struct pt_regs *regs)
  122. {
  123. /* Workaround SH5-101 cut2 silicon defect #2815 :
  124. in some situations, inter-mode branches from SHcompact -> SHmedia
  125. which should take ITLBMISS or EXECPROT exceptions at the target
  126. falsely take RESINST at the target instead. */
  127. unsigned long opcode = 0x6ff4fff0; /* guaranteed reserved opcode */
  128. unsigned long pc, aligned_pc;
  129. int get_user_error;
  130. int trapnr = 12;
  131. int signr = SIGILL;
  132. char *exception_name = "reserved_instruction";
  133. pc = regs->pc;
  134. if ((pc & 3) == 1) {
  135. /* SHmedia : check for defect. This requires executable vmas
  136. to be readable too. */
  137. aligned_pc = pc & ~3;
  138. if (!access_ok(VERIFY_READ, aligned_pc, sizeof(unsigned long))) {
  139. get_user_error = -EFAULT;
  140. } else {
  141. get_user_error = __get_user(opcode, (unsigned long *)aligned_pc);
  142. }
  143. if (get_user_error >= 0) {
  144. unsigned long index, shift;
  145. unsigned long major, minor, combined;
  146. unsigned long reserved_field;
  147. reserved_field = opcode & 0xf; /* These bits are currently reserved as zero in all valid opcodes */
  148. major = (opcode >> 26) & 0x3f;
  149. minor = (opcode >> 16) & 0xf;
  150. combined = (major << 4) | minor;
  151. index = major;
  152. shift = minor << 1;
  153. if (reserved_field == 0) {
  154. int opcode_state = (shmedia_opcode_table[index] >> shift) & 0x3;
  155. switch (opcode_state) {
  156. case OPCODE_INVALID:
  157. /* Trap. */
  158. break;
  159. case OPCODE_USER_VALID:
  160. /* Restart the instruction : the branch to the instruction will now be from an RTE
  161. not from SHcompact so the silicon defect won't be triggered. */
  162. return;
  163. case OPCODE_PRIV_VALID:
  164. if (!user_mode(regs)) {
  165. /* Should only ever get here if a module has
  166. SHcompact code inside it. If so, the same fix up is needed. */
  167. return; /* same reason */
  168. }
  169. /* Otherwise, user mode trying to execute a privileged instruction -
  170. fall through to trap. */
  171. break;
  172. case OPCODE_CTRL_REG:
  173. /* If in privileged mode, return as above. */
  174. if (!user_mode(regs)) return;
  175. /* In user mode ... */
  176. if (combined == 0x9f) { /* GETCON */
  177. unsigned long regno = (opcode >> 20) & 0x3f;
  178. if (regno >= 62) {
  179. return;
  180. }
  181. /* Otherwise, reserved or privileged control register, => trap */
  182. } else if (combined == 0x1bf) { /* PUTCON */
  183. unsigned long regno = (opcode >> 4) & 0x3f;
  184. if (regno >= 62) {
  185. return;
  186. }
  187. /* Otherwise, reserved or privileged control register, => trap */
  188. } else {
  189. /* Trap */
  190. }
  191. break;
  192. default:
  193. /* Fall through to trap. */
  194. break;
  195. }
  196. }
  197. /* fall through to normal resinst processing */
  198. } else {
  199. /* Error trying to read opcode. This typically means a
  200. real fault, not a RESINST any more. So change the
  201. codes. */
  202. trapnr = 87;
  203. exception_name = "address error (exec)";
  204. signr = SIGSEGV;
  205. }
  206. }
  207. do_unhandled_exception(trapnr, signr, exception_name, "do_reserved_inst", error_code, regs, current);
  208. }
  209. #else /* CONFIG_SH64_ID2815_WORKAROUND */
  210. /* If the workaround isn't needed, this is just a straightforward reserved
  211. instruction */
  212. DO_ERROR(12, SIGILL, "reserved instruction", reserved_inst, current)
  213. #endif /* CONFIG_SH64_ID2815_WORKAROUND */
  214. /* Called with interrupts disabled */
  215. asmlinkage void do_exception_error(unsigned long ex, struct pt_regs *regs)
  216. {
  217. show_excp_regs(__func__, -1, -1, regs);
  218. die_if_kernel("exception", regs, ex);
  219. }
  220. int do_unknown_trapa(unsigned long scId, struct pt_regs *regs)
  221. {
  222. /* Syscall debug */
  223. printk("System call ID error: [0x1#args:8 #syscall:16 0x%lx]\n", scId);
  224. die_if_kernel("unknown trapa", regs, scId);
  225. return -ENOSYS;
  226. }
  227. static void do_unhandled_exception(int trapnr, int signr, char *str, char *fn_name,
  228. unsigned long error_code, struct pt_regs *regs, struct task_struct *tsk)
  229. {
  230. show_excp_regs(fn_name, trapnr, signr, regs);
  231. if (user_mode(regs))
  232. force_sig(signr, tsk);
  233. die_if_no_fixup(str, regs, error_code);
  234. }
  235. static int read_opcode(unsigned long long pc, unsigned long *result_opcode, int from_user_mode)
  236. {
  237. int get_user_error;
  238. unsigned long aligned_pc;
  239. unsigned long opcode;
  240. if ((pc & 3) == 1) {
  241. /* SHmedia */
  242. aligned_pc = pc & ~3;
  243. if (from_user_mode) {
  244. if (!access_ok(VERIFY_READ, aligned_pc, sizeof(unsigned long))) {
  245. get_user_error = -EFAULT;
  246. } else {
  247. get_user_error = __get_user(opcode, (unsigned long *)aligned_pc);
  248. *result_opcode = opcode;
  249. }
  250. return get_user_error;
  251. } else {
  252. /* If the fault was in the kernel, we can either read
  253. * this directly, or if not, we fault.
  254. */
  255. *result_opcode = *(unsigned long *) aligned_pc;
  256. return 0;
  257. }
  258. } else if ((pc & 1) == 0) {
  259. /* SHcompact */
  260. /* TODO : provide handling for this. We don't really support
  261. user-mode SHcompact yet, and for a kernel fault, this would
  262. have to come from a module built for SHcompact. */
  263. return -EFAULT;
  264. } else {
  265. /* misaligned */
  266. return -EFAULT;
  267. }
  268. }
  269. static int address_is_sign_extended(__u64 a)
  270. {
  271. __u64 b;
  272. #if (NEFF == 32)
  273. b = (__u64)(__s64)(__s32)(a & 0xffffffffUL);
  274. return (b == a) ? 1 : 0;
  275. #else
  276. #error "Sign extend check only works for NEFF==32"
  277. #endif
  278. }
  279. static int generate_and_check_address(struct pt_regs *regs,
  280. __u32 opcode,
  281. int displacement_not_indexed,
  282. int width_shift,
  283. __u64 *address)
  284. {
  285. /* return -1 for fault, 0 for OK */
  286. __u64 base_address, addr;
  287. int basereg;
  288. basereg = (opcode >> 20) & 0x3f;
  289. base_address = regs->regs[basereg];
  290. if (displacement_not_indexed) {
  291. __s64 displacement;
  292. displacement = (opcode >> 10) & 0x3ff;
  293. displacement = ((displacement << 54) >> 54); /* sign extend */
  294. addr = (__u64)((__s64)base_address + (displacement << width_shift));
  295. } else {
  296. __u64 offset;
  297. int offsetreg;
  298. offsetreg = (opcode >> 10) & 0x3f;
  299. offset = regs->regs[offsetreg];
  300. addr = base_address + offset;
  301. }
  302. /* Check sign extended */
  303. if (!address_is_sign_extended(addr)) {
  304. return -1;
  305. }
  306. /* Check accessible. For misaligned access in the kernel, assume the
  307. address is always accessible (and if not, just fault when the
  308. load/store gets done.) */
  309. if (user_mode(regs)) {
  310. if (addr >= TASK_SIZE) {
  311. return -1;
  312. }
  313. /* Do access_ok check later - it depends on whether it's a load or a store. */
  314. }
  315. *address = addr;
  316. return 0;
  317. }
  318. static int user_mode_unaligned_fixup_count = 10;
  319. static int user_mode_unaligned_fixup_enable = 1;
  320. static int kernel_mode_unaligned_fixup_count = 32;
  321. static void misaligned_kernel_word_load(__u64 address, int do_sign_extend, __u64 *result)
  322. {
  323. unsigned short x;
  324. unsigned char *p, *q;
  325. p = (unsigned char *) (int) address;
  326. q = (unsigned char *) &x;
  327. q[0] = p[0];
  328. q[1] = p[1];
  329. if (do_sign_extend) {
  330. *result = (__u64)(__s64) *(short *) &x;
  331. } else {
  332. *result = (__u64) x;
  333. }
  334. }
  335. static void misaligned_kernel_word_store(__u64 address, __u64 value)
  336. {
  337. unsigned short x;
  338. unsigned char *p, *q;
  339. p = (unsigned char *) (int) address;
  340. q = (unsigned char *) &x;
  341. x = (__u16) value;
  342. p[0] = q[0];
  343. p[1] = q[1];
  344. }
  345. static int misaligned_load(struct pt_regs *regs,
  346. __u32 opcode,
  347. int displacement_not_indexed,
  348. int width_shift,
  349. int do_sign_extend)
  350. {
  351. /* Return -1 for a fault, 0 for OK */
  352. int error;
  353. int destreg;
  354. __u64 address;
  355. error = generate_and_check_address(regs, opcode,
  356. displacement_not_indexed, width_shift, &address);
  357. if (error < 0) {
  358. return error;
  359. }
  360. perf_sw_event(PERF_COUNT_SW_ALIGNMENT_FAULTS, 1, regs, address);
  361. destreg = (opcode >> 4) & 0x3f;
  362. if (user_mode(regs)) {
  363. __u64 buffer;
  364. if (!access_ok(VERIFY_READ, (unsigned long) address, 1UL<<width_shift)) {
  365. return -1;
  366. }
  367. if (__copy_user(&buffer, (const void *)(int)address, (1 << width_shift)) > 0) {
  368. return -1; /* fault */
  369. }
  370. switch (width_shift) {
  371. case 1:
  372. if (do_sign_extend) {
  373. regs->regs[destreg] = (__u64)(__s64) *(__s16 *) &buffer;
  374. } else {
  375. regs->regs[destreg] = (__u64) *(__u16 *) &buffer;
  376. }
  377. break;
  378. case 2:
  379. regs->regs[destreg] = (__u64)(__s64) *(__s32 *) &buffer;
  380. break;
  381. case 3:
  382. regs->regs[destreg] = buffer;
  383. break;
  384. default:
  385. printk("Unexpected width_shift %d in misaligned_load, PC=%08lx\n",
  386. width_shift, (unsigned long) regs->pc);
  387. break;
  388. }
  389. } else {
  390. /* kernel mode - we can take short cuts since if we fault, it's a genuine bug */
  391. __u64 lo, hi;
  392. switch (width_shift) {
  393. case 1:
  394. misaligned_kernel_word_load(address, do_sign_extend, &regs->regs[destreg]);
  395. break;
  396. case 2:
  397. asm ("ldlo.l %1, 0, %0" : "=r" (lo) : "r" (address));
  398. asm ("ldhi.l %1, 3, %0" : "=r" (hi) : "r" (address));
  399. regs->regs[destreg] = lo | hi;
  400. break;
  401. case 3:
  402. asm ("ldlo.q %1, 0, %0" : "=r" (lo) : "r" (address));
  403. asm ("ldhi.q %1, 7, %0" : "=r" (hi) : "r" (address));
  404. regs->regs[destreg] = lo | hi;
  405. break;
  406. default:
  407. printk("Unexpected width_shift %d in misaligned_load, PC=%08lx\n",
  408. width_shift, (unsigned long) regs->pc);
  409. break;
  410. }
  411. }
  412. return 0;
  413. }
  414. static int misaligned_store(struct pt_regs *regs,
  415. __u32 opcode,
  416. int displacement_not_indexed,
  417. int width_shift)
  418. {
  419. /* Return -1 for a fault, 0 for OK */
  420. int error;
  421. int srcreg;
  422. __u64 address;
  423. error = generate_and_check_address(regs, opcode,
  424. displacement_not_indexed, width_shift, &address);
  425. if (error < 0) {
  426. return error;
  427. }
  428. perf_sw_event(PERF_COUNT_SW_ALIGNMENT_FAULTS, 1, regs, address);
  429. srcreg = (opcode >> 4) & 0x3f;
  430. if (user_mode(regs)) {
  431. __u64 buffer;
  432. if (!access_ok(VERIFY_WRITE, (unsigned long) address, 1UL<<width_shift)) {
  433. return -1;
  434. }
  435. switch (width_shift) {
  436. case 1:
  437. *(__u16 *) &buffer = (__u16) regs->regs[srcreg];
  438. break;
  439. case 2:
  440. *(__u32 *) &buffer = (__u32) regs->regs[srcreg];
  441. break;
  442. case 3:
  443. buffer = regs->regs[srcreg];
  444. break;
  445. default:
  446. printk("Unexpected width_shift %d in misaligned_store, PC=%08lx\n",
  447. width_shift, (unsigned long) regs->pc);
  448. break;
  449. }
  450. if (__copy_user((void *)(int)address, &buffer, (1 << width_shift)) > 0) {
  451. return -1; /* fault */
  452. }
  453. } else {
  454. /* kernel mode - we can take short cuts since if we fault, it's a genuine bug */
  455. __u64 val = regs->regs[srcreg];
  456. switch (width_shift) {
  457. case 1:
  458. misaligned_kernel_word_store(address, val);
  459. break;
  460. case 2:
  461. asm ("stlo.l %1, 0, %0" : : "r" (val), "r" (address));
  462. asm ("sthi.l %1, 3, %0" : : "r" (val), "r" (address));
  463. break;
  464. case 3:
  465. asm ("stlo.q %1, 0, %0" : : "r" (val), "r" (address));
  466. asm ("sthi.q %1, 7, %0" : : "r" (val), "r" (address));
  467. break;
  468. default:
  469. printk("Unexpected width_shift %d in misaligned_store, PC=%08lx\n",
  470. width_shift, (unsigned long) regs->pc);
  471. break;
  472. }
  473. }
  474. return 0;
  475. }
  476. /* Never need to fix up misaligned FPU accesses within the kernel since that's a real
  477. error. */
  478. static int misaligned_fpu_load(struct pt_regs *regs,
  479. __u32 opcode,
  480. int displacement_not_indexed,
  481. int width_shift,
  482. int do_paired_load)
  483. {
  484. /* Return -1 for a fault, 0 for OK */
  485. int error;
  486. int destreg;
  487. __u64 address;
  488. error = generate_and_check_address(regs, opcode,
  489. displacement_not_indexed, width_shift, &address);
  490. if (error < 0) {
  491. return error;
  492. }
  493. perf_sw_event(PERF_COUNT_SW_EMULATION_FAULTS, 1, regs, address);
  494. destreg = (opcode >> 4) & 0x3f;
  495. if (user_mode(regs)) {
  496. __u64 buffer;
  497. __u32 buflo, bufhi;
  498. if (!access_ok(VERIFY_READ, (unsigned long) address, 1UL<<width_shift)) {
  499. return -1;
  500. }
  501. if (__copy_user(&buffer, (const void *)(int)address, (1 << width_shift)) > 0) {
  502. return -1; /* fault */
  503. }
  504. /* 'current' may be the current owner of the FPU state, so
  505. context switch the registers into memory so they can be
  506. indexed by register number. */
  507. if (last_task_used_math == current) {
  508. enable_fpu();
  509. save_fpu(current);
  510. disable_fpu();
  511. last_task_used_math = NULL;
  512. regs->sr |= SR_FD;
  513. }
  514. buflo = *(__u32*) &buffer;
  515. bufhi = *(1 + (__u32*) &buffer);
  516. switch (width_shift) {
  517. case 2:
  518. current->thread.xstate->hardfpu.fp_regs[destreg] = buflo;
  519. break;
  520. case 3:
  521. if (do_paired_load) {
  522. current->thread.xstate->hardfpu.fp_regs[destreg] = buflo;
  523. current->thread.xstate->hardfpu.fp_regs[destreg+1] = bufhi;
  524. } else {
  525. #if defined(CONFIG_CPU_LITTLE_ENDIAN)
  526. current->thread.xstate->hardfpu.fp_regs[destreg] = bufhi;
  527. current->thread.xstate->hardfpu.fp_regs[destreg+1] = buflo;
  528. #else
  529. current->thread.xstate->hardfpu.fp_regs[destreg] = buflo;
  530. current->thread.xstate->hardfpu.fp_regs[destreg+1] = bufhi;
  531. #endif
  532. }
  533. break;
  534. default:
  535. printk("Unexpected width_shift %d in misaligned_fpu_load, PC=%08lx\n",
  536. width_shift, (unsigned long) regs->pc);
  537. break;
  538. }
  539. return 0;
  540. } else {
  541. die ("Misaligned FPU load inside kernel", regs, 0);
  542. return -1;
  543. }
  544. }
  545. static int misaligned_fpu_store(struct pt_regs *regs,
  546. __u32 opcode,
  547. int displacement_not_indexed,
  548. int width_shift,
  549. int do_paired_load)
  550. {
  551. /* Return -1 for a fault, 0 for OK */
  552. int error;
  553. int srcreg;
  554. __u64 address;
  555. error = generate_and_check_address(regs, opcode,
  556. displacement_not_indexed, width_shift, &address);
  557. if (error < 0) {
  558. return error;
  559. }
  560. perf_sw_event(PERF_COUNT_SW_EMULATION_FAULTS, 1, regs, address);
  561. srcreg = (opcode >> 4) & 0x3f;
  562. if (user_mode(regs)) {
  563. __u64 buffer;
  564. /* Initialise these to NaNs. */
  565. __u32 buflo=0xffffffffUL, bufhi=0xffffffffUL;
  566. if (!access_ok(VERIFY_WRITE, (unsigned long) address, 1UL<<width_shift)) {
  567. return -1;
  568. }
  569. /* 'current' may be the current owner of the FPU state, so
  570. context switch the registers into memory so they can be
  571. indexed by register number. */
  572. if (last_task_used_math == current) {
  573. enable_fpu();
  574. save_fpu(current);
  575. disable_fpu();
  576. last_task_used_math = NULL;
  577. regs->sr |= SR_FD;
  578. }
  579. switch (width_shift) {
  580. case 2:
  581. buflo = current->thread.xstate->hardfpu.fp_regs[srcreg];
  582. break;
  583. case 3:
  584. if (do_paired_load) {
  585. buflo = current->thread.xstate->hardfpu.fp_regs[srcreg];
  586. bufhi = current->thread.xstate->hardfpu.fp_regs[srcreg+1];
  587. } else {
  588. #if defined(CONFIG_CPU_LITTLE_ENDIAN)
  589. bufhi = current->thread.xstate->hardfpu.fp_regs[srcreg];
  590. buflo = current->thread.xstate->hardfpu.fp_regs[srcreg+1];
  591. #else
  592. buflo = current->thread.xstate->hardfpu.fp_regs[srcreg];
  593. bufhi = current->thread.xstate->hardfpu.fp_regs[srcreg+1];
  594. #endif
  595. }
  596. break;
  597. default:
  598. printk("Unexpected width_shift %d in misaligned_fpu_store, PC=%08lx\n",
  599. width_shift, (unsigned long) regs->pc);
  600. break;
  601. }
  602. *(__u32*) &buffer = buflo;
  603. *(1 + (__u32*) &buffer) = bufhi;
  604. if (__copy_user((void *)(int)address, &buffer, (1 << width_shift)) > 0) {
  605. return -1; /* fault */
  606. }
  607. return 0;
  608. } else {
  609. die ("Misaligned FPU load inside kernel", regs, 0);
  610. return -1;
  611. }
  612. }
  613. static int misaligned_fixup(struct pt_regs *regs)
  614. {
  615. unsigned long opcode;
  616. int error;
  617. int major, minor;
  618. if (!user_mode_unaligned_fixup_enable)
  619. return -1;
  620. error = read_opcode(regs->pc, &opcode, user_mode(regs));
  621. if (error < 0) {
  622. return error;
  623. }
  624. major = (opcode >> 26) & 0x3f;
  625. minor = (opcode >> 16) & 0xf;
  626. if (user_mode(regs) && (user_mode_unaligned_fixup_count > 0)) {
  627. --user_mode_unaligned_fixup_count;
  628. /* Only do 'count' worth of these reports, to remove a potential DoS against syslog */
  629. printk("Fixing up unaligned userspace access in \"%s\" pid=%d pc=0x%08x ins=0x%08lx\n",
  630. current->comm, task_pid_nr(current), (__u32)regs->pc, opcode);
  631. } else if (!user_mode(regs) && (kernel_mode_unaligned_fixup_count > 0)) {
  632. --kernel_mode_unaligned_fixup_count;
  633. if (in_interrupt()) {
  634. printk("Fixing up unaligned kernelspace access in interrupt pc=0x%08x ins=0x%08lx\n",
  635. (__u32)regs->pc, opcode);
  636. } else {
  637. printk("Fixing up unaligned kernelspace access in \"%s\" pid=%d pc=0x%08x ins=0x%08lx\n",
  638. current->comm, task_pid_nr(current), (__u32)regs->pc, opcode);
  639. }
  640. }
  641. switch (major) {
  642. case (0x84>>2): /* LD.W */
  643. error = misaligned_load(regs, opcode, 1, 1, 1);
  644. break;
  645. case (0xb0>>2): /* LD.UW */
  646. error = misaligned_load(regs, opcode, 1, 1, 0);
  647. break;
  648. case (0x88>>2): /* LD.L */
  649. error = misaligned_load(regs, opcode, 1, 2, 1);
  650. break;
  651. case (0x8c>>2): /* LD.Q */
  652. error = misaligned_load(regs, opcode, 1, 3, 0);
  653. break;
  654. case (0xa4>>2): /* ST.W */
  655. error = misaligned_store(regs, opcode, 1, 1);
  656. break;
  657. case (0xa8>>2): /* ST.L */
  658. error = misaligned_store(regs, opcode, 1, 2);
  659. break;
  660. case (0xac>>2): /* ST.Q */
  661. error = misaligned_store(regs, opcode, 1, 3);
  662. break;
  663. case (0x40>>2): /* indexed loads */
  664. switch (minor) {
  665. case 0x1: /* LDX.W */
  666. error = misaligned_load(regs, opcode, 0, 1, 1);
  667. break;
  668. case 0x5: /* LDX.UW */
  669. error = misaligned_load(regs, opcode, 0, 1, 0);
  670. break;
  671. case 0x2: /* LDX.L */
  672. error = misaligned_load(regs, opcode, 0, 2, 1);
  673. break;
  674. case 0x3: /* LDX.Q */
  675. error = misaligned_load(regs, opcode, 0, 3, 0);
  676. break;
  677. default:
  678. error = -1;
  679. break;
  680. }
  681. break;
  682. case (0x60>>2): /* indexed stores */
  683. switch (minor) {
  684. case 0x1: /* STX.W */
  685. error = misaligned_store(regs, opcode, 0, 1);
  686. break;
  687. case 0x2: /* STX.L */
  688. error = misaligned_store(regs, opcode, 0, 2);
  689. break;
  690. case 0x3: /* STX.Q */
  691. error = misaligned_store(regs, opcode, 0, 3);
  692. break;
  693. default:
  694. error = -1;
  695. break;
  696. }
  697. break;
  698. case (0x94>>2): /* FLD.S */
  699. error = misaligned_fpu_load(regs, opcode, 1, 2, 0);
  700. break;
  701. case (0x98>>2): /* FLD.P */
  702. error = misaligned_fpu_load(regs, opcode, 1, 3, 1);
  703. break;
  704. case (0x9c>>2): /* FLD.D */
  705. error = misaligned_fpu_load(regs, opcode, 1, 3, 0);
  706. break;
  707. case (0x1c>>2): /* floating indexed loads */
  708. switch (minor) {
  709. case 0x8: /* FLDX.S */
  710. error = misaligned_fpu_load(regs, opcode, 0, 2, 0);
  711. break;
  712. case 0xd: /* FLDX.P */
  713. error = misaligned_fpu_load(regs, opcode, 0, 3, 1);
  714. break;
  715. case 0x9: /* FLDX.D */
  716. error = misaligned_fpu_load(regs, opcode, 0, 3, 0);
  717. break;
  718. default:
  719. error = -1;
  720. break;
  721. }
  722. break;
  723. case (0xb4>>2): /* FLD.S */
  724. error = misaligned_fpu_store(regs, opcode, 1, 2, 0);
  725. break;
  726. case (0xb8>>2): /* FLD.P */
  727. error = misaligned_fpu_store(regs, opcode, 1, 3, 1);
  728. break;
  729. case (0xbc>>2): /* FLD.D */
  730. error = misaligned_fpu_store(regs, opcode, 1, 3, 0);
  731. break;
  732. case (0x3c>>2): /* floating indexed stores */
  733. switch (minor) {
  734. case 0x8: /* FSTX.S */
  735. error = misaligned_fpu_store(regs, opcode, 0, 2, 0);
  736. break;
  737. case 0xd: /* FSTX.P */
  738. error = misaligned_fpu_store(regs, opcode, 0, 3, 1);
  739. break;
  740. case 0x9: /* FSTX.D */
  741. error = misaligned_fpu_store(regs, opcode, 0, 3, 0);
  742. break;
  743. default:
  744. error = -1;
  745. break;
  746. }
  747. break;
  748. default:
  749. /* Fault */
  750. error = -1;
  751. break;
  752. }
  753. if (error < 0) {
  754. return error;
  755. } else {
  756. regs->pc += 4; /* Skip the instruction that's just been emulated */
  757. return 0;
  758. }
  759. }
  760. static ctl_table unaligned_table[] = {
  761. {
  762. .procname = "kernel_reports",
  763. .data = &kernel_mode_unaligned_fixup_count,
  764. .maxlen = sizeof(int),
  765. .mode = 0644,
  766. .proc_handler = proc_dointvec
  767. },
  768. {
  769. .procname = "user_reports",
  770. .data = &user_mode_unaligned_fixup_count,
  771. .maxlen = sizeof(int),
  772. .mode = 0644,
  773. .proc_handler = proc_dointvec
  774. },
  775. {
  776. .procname = "user_enable",
  777. .data = &user_mode_unaligned_fixup_enable,
  778. .maxlen = sizeof(int),
  779. .mode = 0644,
  780. .proc_handler = proc_dointvec},
  781. {}
  782. };
  783. static ctl_table unaligned_root[] = {
  784. {
  785. .procname = "unaligned_fixup",
  786. .mode = 0555,
  787. .child = unaligned_table
  788. },
  789. {}
  790. };
  791. static ctl_table sh64_root[] = {
  792. {
  793. .procname = "sh64",
  794. .mode = 0555,
  795. .child = unaligned_root
  796. },
  797. {}
  798. };
  799. static struct ctl_table_header *sysctl_header;
  800. static int __init init_sysctl(void)
  801. {
  802. sysctl_header = register_sysctl_table(sh64_root);
  803. return 0;
  804. }
  805. __initcall(init_sysctl);
  806. asmlinkage void do_debug_interrupt(unsigned long code, struct pt_regs *regs)
  807. {
  808. u64 peek_real_address_q(u64 addr);
  809. u64 poke_real_address_q(u64 addr, u64 val);
  810. unsigned long long DM_EXP_CAUSE_PHY = 0x0c100010;
  811. unsigned long long exp_cause;
  812. /* It's not worth ioremapping the debug module registers for the amount
  813. of access we make to them - just go direct to their physical
  814. addresses. */
  815. exp_cause = peek_real_address_q(DM_EXP_CAUSE_PHY);
  816. if (exp_cause & ~4) {
  817. printk("DM.EXP_CAUSE had unexpected bits set (=%08lx)\n",
  818. (unsigned long)(exp_cause & 0xffffffff));
  819. }
  820. show_state();
  821. /* Clear all DEBUGINT causes */
  822. poke_real_address_q(DM_EXP_CAUSE_PHY, 0x0);
  823. }
  824. void __cpuinit per_cpu_trap_init(void)
  825. {
  826. /* Nothing to do for now, VBR initialization later. */
  827. }