entry64.S 30 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072
  1. /*
  2. * arch/s390/kernel/entry64.S
  3. * S390 low-level entry points.
  4. *
  5. * Copyright (C) IBM Corp. 1999,2006
  6. * Author(s): Martin Schwidefsky (schwidefsky@de.ibm.com),
  7. * Hartmut Penner (hp@de.ibm.com),
  8. * Denis Joseph Barrow (djbarrow@de.ibm.com,barrow_dj@yahoo.com),
  9. * Heiko Carstens <heiko.carstens@de.ibm.com>
  10. */
  11. #include <linux/sys.h>
  12. #include <linux/linkage.h>
  13. #include <linux/init.h>
  14. #include <asm/cache.h>
  15. #include <asm/lowcore.h>
  16. #include <asm/errno.h>
  17. #include <asm/ptrace.h>
  18. #include <asm/thread_info.h>
  19. #include <asm/asm-offsets.h>
  20. #include <asm/unistd.h>
  21. #include <asm/page.h>
  22. /*
  23. * Stack layout for the system_call stack entry.
  24. * The first few entries are identical to the user_regs_struct.
  25. */
  26. SP_PTREGS = STACK_FRAME_OVERHEAD
  27. SP_ARGS = STACK_FRAME_OVERHEAD + __PT_ARGS
  28. SP_PSW = STACK_FRAME_OVERHEAD + __PT_PSW
  29. SP_R0 = STACK_FRAME_OVERHEAD + __PT_GPRS
  30. SP_R1 = STACK_FRAME_OVERHEAD + __PT_GPRS + 8
  31. SP_R2 = STACK_FRAME_OVERHEAD + __PT_GPRS + 16
  32. SP_R3 = STACK_FRAME_OVERHEAD + __PT_GPRS + 24
  33. SP_R4 = STACK_FRAME_OVERHEAD + __PT_GPRS + 32
  34. SP_R5 = STACK_FRAME_OVERHEAD + __PT_GPRS + 40
  35. SP_R6 = STACK_FRAME_OVERHEAD + __PT_GPRS + 48
  36. SP_R7 = STACK_FRAME_OVERHEAD + __PT_GPRS + 56
  37. SP_R8 = STACK_FRAME_OVERHEAD + __PT_GPRS + 64
  38. SP_R9 = STACK_FRAME_OVERHEAD + __PT_GPRS + 72
  39. SP_R10 = STACK_FRAME_OVERHEAD + __PT_GPRS + 80
  40. SP_R11 = STACK_FRAME_OVERHEAD + __PT_GPRS + 88
  41. SP_R12 = STACK_FRAME_OVERHEAD + __PT_GPRS + 96
  42. SP_R13 = STACK_FRAME_OVERHEAD + __PT_GPRS + 104
  43. SP_R14 = STACK_FRAME_OVERHEAD + __PT_GPRS + 112
  44. SP_R15 = STACK_FRAME_OVERHEAD + __PT_GPRS + 120
  45. SP_ORIG_R2 = STACK_FRAME_OVERHEAD + __PT_ORIG_GPR2
  46. SP_ILC = STACK_FRAME_OVERHEAD + __PT_ILC
  47. SP_SVCNR = STACK_FRAME_OVERHEAD + __PT_SVCNR
  48. SP_SIZE = STACK_FRAME_OVERHEAD + __PT_SIZE
  49. STACK_SHIFT = PAGE_SHIFT + THREAD_ORDER
  50. STACK_SIZE = 1 << STACK_SHIFT
  51. _TIF_WORK_SVC = (_TIF_SIGPENDING | _TIF_NOTIFY_RESUME | _TIF_NEED_RESCHED | \
  52. _TIF_MCCK_PENDING | _TIF_RESTART_SVC | _TIF_SINGLE_STEP )
  53. _TIF_WORK_INT = (_TIF_SIGPENDING | _TIF_NOTIFY_RESUME | _TIF_NEED_RESCHED | \
  54. _TIF_MCCK_PENDING)
  55. _TIF_SYSCALL = (_TIF_SYSCALL_TRACE>>8 | _TIF_SYSCALL_AUDIT>>8 | _TIF_SECCOMP>>8)
  56. #define BASED(name) name-system_call(%r13)
  57. #ifdef CONFIG_TRACE_IRQFLAGS
  58. .macro TRACE_IRQS_ON
  59. basr %r2,%r0
  60. brasl %r14,trace_hardirqs_on_caller
  61. .endm
  62. .macro TRACE_IRQS_OFF
  63. basr %r2,%r0
  64. brasl %r14,trace_hardirqs_off_caller
  65. .endm
  66. .macro TRACE_IRQS_CHECK
  67. basr %r2,%r0
  68. tm SP_PSW(%r15),0x03 # irqs enabled?
  69. jz 0f
  70. brasl %r14,trace_hardirqs_on_caller
  71. j 1f
  72. 0: brasl %r14,trace_hardirqs_off_caller
  73. 1:
  74. .endm
  75. #else
  76. #define TRACE_IRQS_ON
  77. #define TRACE_IRQS_OFF
  78. #define TRACE_IRQS_CHECK
  79. #endif
  80. #ifdef CONFIG_LOCKDEP
  81. .macro LOCKDEP_SYS_EXIT
  82. tm SP_PSW+1(%r15),0x01 # returning to user ?
  83. jz 0f
  84. brasl %r14,lockdep_sys_exit
  85. 0:
  86. .endm
  87. #else
  88. #define LOCKDEP_SYS_EXIT
  89. #endif
  90. .macro UPDATE_VTIME lc_from,lc_to,lc_sum
  91. lg %r10,\lc_from
  92. slg %r10,\lc_to
  93. alg %r10,\lc_sum
  94. stg %r10,\lc_sum
  95. .endm
  96. /*
  97. * Register usage in interrupt handlers:
  98. * R9 - pointer to current task structure
  99. * R13 - pointer to literal pool
  100. * R14 - return register for function calls
  101. * R15 - kernel stack pointer
  102. */
  103. .macro SAVE_ALL_BASE savearea
  104. stmg %r12,%r15,\savearea
  105. larl %r13,system_call
  106. .endm
  107. .macro SAVE_ALL_SVC psworg,savearea
  108. la %r12,\psworg
  109. lg %r15,__LC_KERNEL_STACK # problem state -> load ksp
  110. .endm
  111. .macro SAVE_ALL_SYNC psworg,savearea
  112. la %r12,\psworg
  113. tm \psworg+1,0x01 # test problem state bit
  114. jz 2f # skip stack setup save
  115. lg %r15,__LC_KERNEL_STACK # problem state -> load ksp
  116. #ifdef CONFIG_CHECK_STACK
  117. j 3f
  118. 2: tml %r15,STACK_SIZE - CONFIG_STACK_GUARD
  119. jz stack_overflow
  120. 3:
  121. #endif
  122. 2:
  123. .endm
  124. .macro SAVE_ALL_ASYNC psworg,savearea
  125. la %r12,\psworg
  126. tm \psworg+1,0x01 # test problem state bit
  127. jnz 1f # from user -> load kernel stack
  128. clc \psworg+8(8),BASED(.Lcritical_end)
  129. jhe 0f
  130. clc \psworg+8(8),BASED(.Lcritical_start)
  131. jl 0f
  132. brasl %r14,cleanup_critical
  133. tm 1(%r12),0x01 # retest problem state after cleanup
  134. jnz 1f
  135. 0: lg %r14,__LC_ASYNC_STACK # are we already on the async. stack ?
  136. slgr %r14,%r15
  137. srag %r14,%r14,STACK_SHIFT
  138. jz 2f
  139. 1: lg %r15,__LC_ASYNC_STACK # load async stack
  140. #ifdef CONFIG_CHECK_STACK
  141. j 3f
  142. 2: tml %r15,STACK_SIZE - CONFIG_STACK_GUARD
  143. jz stack_overflow
  144. 3:
  145. #endif
  146. 2:
  147. .endm
  148. .macro CREATE_STACK_FRAME psworg,savearea
  149. aghi %r15,-SP_SIZE # make room for registers & psw
  150. mvc SP_PSW(16,%r15),0(%r12) # move user PSW to stack
  151. stg %r2,SP_ORIG_R2(%r15) # store original content of gpr 2
  152. icm %r12,3,__LC_SVC_ILC
  153. stmg %r0,%r11,SP_R0(%r15) # store gprs %r0-%r11 to kernel stack
  154. st %r12,SP_SVCNR(%r15)
  155. mvc SP_R12(32,%r15),\savearea # move %r12-%r15 to stack
  156. la %r12,0
  157. stg %r12,__SF_BACKCHAIN(%r15)
  158. .endm
  159. .macro RESTORE_ALL psworg,sync
  160. mvc \psworg(16),SP_PSW(%r15) # move user PSW to lowcore
  161. .if !\sync
  162. ni \psworg+1,0xfd # clear wait state bit
  163. .endif
  164. lg %r14,__LC_VDSO_PER_CPU
  165. lmg %r0,%r13,SP_R0(%r15) # load gprs 0-13 of user
  166. stpt __LC_EXIT_TIMER
  167. mvc __VDSO_ECTG_BASE(16,%r14),__LC_EXIT_TIMER
  168. lmg %r14,%r15,SP_R14(%r15) # load grps 14-15 of user
  169. lpswe \psworg # back to caller
  170. .endm
  171. /*
  172. * Scheduler resume function, called by switch_to
  173. * gpr2 = (task_struct *) prev
  174. * gpr3 = (task_struct *) next
  175. * Returns:
  176. * gpr2 = prev
  177. */
  178. .globl __switch_to
  179. __switch_to:
  180. tm __THREAD_per+4(%r3),0xe8 # is the new process using per ?
  181. jz __switch_to_noper # if not we're fine
  182. stctg %c9,%c11,__SF_EMPTY(%r15)# We are using per stuff
  183. clc __THREAD_per(24,%r3),__SF_EMPTY(%r15)
  184. je __switch_to_noper # we got away without bashing TLB's
  185. lctlg %c9,%c11,__THREAD_per(%r3) # Nope we didn't
  186. __switch_to_noper:
  187. lg %r4,__THREAD_info(%r2) # get thread_info of prev
  188. tm __TI_flags+7(%r4),_TIF_MCCK_PENDING # machine check pending?
  189. jz __switch_to_no_mcck
  190. ni __TI_flags+7(%r4),255-_TIF_MCCK_PENDING # clear flag in prev
  191. lg %r4,__THREAD_info(%r3) # get thread_info of next
  192. oi __TI_flags+7(%r4),_TIF_MCCK_PENDING # set it in next
  193. __switch_to_no_mcck:
  194. stmg %r6,%r15,__SF_GPRS(%r15)# store __switch_to registers of prev task
  195. stg %r15,__THREAD_ksp(%r2) # store kernel stack to prev->tss.ksp
  196. lg %r15,__THREAD_ksp(%r3) # load kernel stack from next->tss.ksp
  197. lmg %r6,%r15,__SF_GPRS(%r15)# load __switch_to registers of next task
  198. stg %r3,__LC_CURRENT # __LC_CURRENT = current task struct
  199. lctl %c4,%c4,__TASK_pid(%r3) # load pid to control reg. 4
  200. lg %r3,__THREAD_info(%r3) # load thread_info from task struct
  201. stg %r3,__LC_THREAD_INFO
  202. aghi %r3,STACK_SIZE
  203. stg %r3,__LC_KERNEL_STACK # __LC_KERNEL_STACK = new kernel stack
  204. br %r14
  205. __critical_start:
  206. /*
  207. * SVC interrupt handler routine. System calls are synchronous events and
  208. * are executed with interrupts enabled.
  209. */
  210. .globl system_call
  211. system_call:
  212. stpt __LC_SYNC_ENTER_TIMER
  213. sysc_saveall:
  214. SAVE_ALL_BASE __LC_SAVE_AREA
  215. SAVE_ALL_SVC __LC_SVC_OLD_PSW,__LC_SAVE_AREA
  216. CREATE_STACK_FRAME __LC_SVC_OLD_PSW,__LC_SAVE_AREA
  217. llgh %r7,__LC_SVC_INT_CODE # get svc number from lowcore
  218. sysc_vtime:
  219. UPDATE_VTIME __LC_EXIT_TIMER,__LC_SYNC_ENTER_TIMER,__LC_USER_TIMER
  220. sysc_stime:
  221. UPDATE_VTIME __LC_LAST_UPDATE_TIMER,__LC_EXIT_TIMER,__LC_SYSTEM_TIMER
  222. sysc_update:
  223. mvc __LC_LAST_UPDATE_TIMER(8),__LC_SYNC_ENTER_TIMER
  224. sysc_do_svc:
  225. lg %r9,__LC_THREAD_INFO # load pointer to thread_info struct
  226. ltgr %r7,%r7 # test for svc 0
  227. jnz sysc_nr_ok
  228. # svc 0: system call number in %r1
  229. cl %r1,BASED(.Lnr_syscalls)
  230. jnl sysc_nr_ok
  231. lgfr %r7,%r1 # clear high word in r1
  232. sysc_nr_ok:
  233. mvc SP_ARGS(8,%r15),SP_R7(%r15)
  234. sysc_do_restart:
  235. sth %r7,SP_SVCNR(%r15)
  236. sllg %r7,%r7,2 # svc number * 4
  237. larl %r10,sys_call_table
  238. #ifdef CONFIG_COMPAT
  239. tm __TI_flags+5(%r9),(_TIF_31BIT>>16) # running in 31 bit mode ?
  240. jno sysc_noemu
  241. larl %r10,sys_call_table_emu # use 31 bit emulation system calls
  242. sysc_noemu:
  243. #endif
  244. tm __TI_flags+6(%r9),_TIF_SYSCALL
  245. lgf %r8,0(%r7,%r10) # load address of system call routine
  246. jnz sysc_tracesys
  247. basr %r14,%r8 # call sys_xxxx
  248. stg %r2,SP_R2(%r15) # store return value (change R2 on stack)
  249. sysc_return:
  250. tm __TI_flags+7(%r9),_TIF_WORK_SVC
  251. jnz sysc_work # there is work to do (signals etc.)
  252. sysc_restore:
  253. #ifdef CONFIG_TRACE_IRQFLAGS
  254. larl %r1,sysc_restore_trace_psw
  255. lpswe 0(%r1)
  256. sysc_restore_trace:
  257. TRACE_IRQS_CHECK
  258. LOCKDEP_SYS_EXIT
  259. #endif
  260. sysc_leave:
  261. RESTORE_ALL __LC_RETURN_PSW,1
  262. sysc_done:
  263. #ifdef CONFIG_TRACE_IRQFLAGS
  264. .align 8
  265. .globl sysc_restore_trace_psw
  266. sysc_restore_trace_psw:
  267. .quad 0, sysc_restore_trace
  268. #endif
  269. #
  270. # recheck if there is more work to do
  271. #
  272. sysc_work_loop:
  273. tm __TI_flags+7(%r9),_TIF_WORK_SVC
  274. jz sysc_restore # there is no work to do
  275. #
  276. # One of the work bits is on. Find out which one.
  277. #
  278. sysc_work:
  279. tm SP_PSW+1(%r15),0x01 # returning to user ?
  280. jno sysc_restore
  281. tm __TI_flags+7(%r9),_TIF_MCCK_PENDING
  282. jo sysc_mcck_pending
  283. tm __TI_flags+7(%r9),_TIF_NEED_RESCHED
  284. jo sysc_reschedule
  285. tm __TI_flags+7(%r9),_TIF_SIGPENDING
  286. jnz sysc_sigpending
  287. tm __TI_flags+7(%r9),_TIF_NOTIFY_RESUME
  288. jnz sysc_notify_resume
  289. tm __TI_flags+7(%r9),_TIF_RESTART_SVC
  290. jo sysc_restart
  291. tm __TI_flags+7(%r9),_TIF_SINGLE_STEP
  292. jo sysc_singlestep
  293. j sysc_restore
  294. sysc_work_done:
  295. #
  296. # _TIF_NEED_RESCHED is set, call schedule
  297. #
  298. sysc_reschedule:
  299. larl %r14,sysc_work_loop
  300. jg schedule # return point is sysc_return
  301. #
  302. # _TIF_MCCK_PENDING is set, call handler
  303. #
  304. sysc_mcck_pending:
  305. larl %r14,sysc_work_loop
  306. jg s390_handle_mcck # TIF bit will be cleared by handler
  307. #
  308. # _TIF_SIGPENDING is set, call do_signal
  309. #
  310. sysc_sigpending:
  311. ni __TI_flags+7(%r9),255-_TIF_SINGLE_STEP # clear TIF_SINGLE_STEP
  312. la %r2,SP_PTREGS(%r15) # load pt_regs
  313. brasl %r14,do_signal # call do_signal
  314. tm __TI_flags+7(%r9),_TIF_RESTART_SVC
  315. jo sysc_restart
  316. tm __TI_flags+7(%r9),_TIF_SINGLE_STEP
  317. jo sysc_singlestep
  318. j sysc_work_loop
  319. #
  320. # _TIF_NOTIFY_RESUME is set, call do_notify_resume
  321. #
  322. sysc_notify_resume:
  323. la %r2,SP_PTREGS(%r15) # load pt_regs
  324. larl %r14,sysc_work_loop
  325. jg do_notify_resume # call do_notify_resume
  326. #
  327. # _TIF_RESTART_SVC is set, set up registers and restart svc
  328. #
  329. sysc_restart:
  330. ni __TI_flags+7(%r9),255-_TIF_RESTART_SVC # clear TIF_RESTART_SVC
  331. lg %r7,SP_R2(%r15) # load new svc number
  332. mvc SP_R2(8,%r15),SP_ORIG_R2(%r15) # restore first argument
  333. lmg %r2,%r6,SP_R2(%r15) # load svc arguments
  334. j sysc_do_restart # restart svc
  335. #
  336. # _TIF_SINGLE_STEP is set, call do_single_step
  337. #
  338. sysc_singlestep:
  339. ni __TI_flags+7(%r9),255-_TIF_SINGLE_STEP # clear TIF_SINGLE_STEP
  340. xc SP_SVCNR(2,%r15),SP_SVCNR(%r15) # clear svc number
  341. la %r2,SP_PTREGS(%r15) # address of register-save area
  342. larl %r14,sysc_return # load adr. of system return
  343. jg do_single_step # branch to do_sigtrap
  344. #
  345. # call tracehook_report_syscall_entry/tracehook_report_syscall_exit before
  346. # and after the system call
  347. #
  348. sysc_tracesys:
  349. la %r2,SP_PTREGS(%r15) # load pt_regs
  350. la %r3,0
  351. srl %r7,2
  352. stg %r7,SP_R2(%r15)
  353. brasl %r14,do_syscall_trace_enter
  354. lghi %r0,NR_syscalls
  355. clgr %r0,%r2
  356. jnh sysc_tracenogo
  357. sllg %r7,%r2,2 # svc number *4
  358. lgf %r8,0(%r7,%r10)
  359. sysc_tracego:
  360. lmg %r3,%r6,SP_R3(%r15)
  361. lg %r2,SP_ORIG_R2(%r15)
  362. basr %r14,%r8 # call sys_xxx
  363. stg %r2,SP_R2(%r15) # store return value
  364. sysc_tracenogo:
  365. tm __TI_flags+6(%r9),_TIF_SYSCALL
  366. jz sysc_return
  367. la %r2,SP_PTREGS(%r15) # load pt_regs
  368. larl %r14,sysc_return # return point is sysc_return
  369. jg do_syscall_trace_exit
  370. #
  371. # a new process exits the kernel with ret_from_fork
  372. #
  373. .globl ret_from_fork
  374. ret_from_fork:
  375. lg %r13,__LC_SVC_NEW_PSW+8
  376. lg %r9,__LC_THREAD_INFO # load pointer to thread_info struct
  377. tm SP_PSW+1(%r15),0x01 # forking a kernel thread ?
  378. jo 0f
  379. stg %r15,SP_R15(%r15) # store stack pointer for new kthread
  380. 0: brasl %r14,schedule_tail
  381. TRACE_IRQS_ON
  382. stosm 24(%r15),0x03 # reenable interrupts
  383. j sysc_tracenogo
  384. #
  385. # kernel_execve function needs to deal with pt_regs that is not
  386. # at the usual place
  387. #
  388. .globl kernel_execve
  389. kernel_execve:
  390. stmg %r12,%r15,96(%r15)
  391. lgr %r14,%r15
  392. aghi %r15,-SP_SIZE
  393. stg %r14,__SF_BACKCHAIN(%r15)
  394. la %r12,SP_PTREGS(%r15)
  395. xc 0(__PT_SIZE,%r12),0(%r12)
  396. lgr %r5,%r12
  397. brasl %r14,do_execve
  398. ltgfr %r2,%r2
  399. je 0f
  400. aghi %r15,SP_SIZE
  401. lmg %r12,%r15,96(%r15)
  402. br %r14
  403. # execve succeeded.
  404. 0: stnsm __SF_EMPTY(%r15),0xfc # disable interrupts
  405. lg %r15,__LC_KERNEL_STACK # load ksp
  406. aghi %r15,-SP_SIZE # make room for registers & psw
  407. lg %r13,__LC_SVC_NEW_PSW+8
  408. lg %r9,__LC_THREAD_INFO
  409. mvc SP_PTREGS(__PT_SIZE,%r15),0(%r12) # copy pt_regs
  410. xc __SF_BACKCHAIN(8,%r15),__SF_BACKCHAIN(%r15)
  411. stosm __SF_EMPTY(%r15),0x03 # reenable interrupts
  412. brasl %r14,execve_tail
  413. j sysc_return
  414. /*
  415. * Program check handler routine
  416. */
  417. .globl pgm_check_handler
  418. pgm_check_handler:
  419. /*
  420. * First we need to check for a special case:
  421. * Single stepping an instruction that disables the PER event mask will
  422. * cause a PER event AFTER the mask has been set. Example: SVC or LPSW.
  423. * For a single stepped SVC the program check handler gets control after
  424. * the SVC new PSW has been loaded. But we want to execute the SVC first and
  425. * then handle the PER event. Therefore we update the SVC old PSW to point
  426. * to the pgm_check_handler and branch to the SVC handler after we checked
  427. * if we have to load the kernel stack register.
  428. * For every other possible cause for PER event without the PER mask set
  429. * we just ignore the PER event (FIXME: is there anything we have to do
  430. * for LPSW?).
  431. */
  432. stpt __LC_SYNC_ENTER_TIMER
  433. SAVE_ALL_BASE __LC_SAVE_AREA
  434. tm __LC_PGM_INT_CODE+1,0x80 # check whether we got a per exception
  435. jnz pgm_per # got per exception -> special case
  436. SAVE_ALL_SYNC __LC_PGM_OLD_PSW,__LC_SAVE_AREA
  437. CREATE_STACK_FRAME __LC_PGM_OLD_PSW,__LC_SAVE_AREA
  438. tm SP_PSW+1(%r15),0x01 # interrupting from user ?
  439. jz pgm_no_vtime
  440. UPDATE_VTIME __LC_EXIT_TIMER,__LC_SYNC_ENTER_TIMER,__LC_USER_TIMER
  441. UPDATE_VTIME __LC_LAST_UPDATE_TIMER,__LC_EXIT_TIMER,__LC_SYSTEM_TIMER
  442. mvc __LC_LAST_UPDATE_TIMER(8),__LC_SYNC_ENTER_TIMER
  443. pgm_no_vtime:
  444. lg %r9,__LC_THREAD_INFO # load pointer to thread_info struct
  445. mvc SP_ARGS(8,%r15),__LC_LAST_BREAK
  446. TRACE_IRQS_OFF
  447. lgf %r3,__LC_PGM_ILC # load program interruption code
  448. lghi %r8,0x7f
  449. ngr %r8,%r3
  450. pgm_do_call:
  451. sll %r8,3
  452. larl %r1,pgm_check_table
  453. lg %r1,0(%r8,%r1) # load address of handler routine
  454. la %r2,SP_PTREGS(%r15) # address of register-save area
  455. larl %r14,sysc_return
  456. br %r1 # branch to interrupt-handler
  457. #
  458. # handle per exception
  459. #
  460. pgm_per:
  461. tm __LC_PGM_OLD_PSW,0x40 # test if per event recording is on
  462. jnz pgm_per_std # ok, normal per event from user space
  463. # ok its one of the special cases, now we need to find out which one
  464. clc __LC_PGM_OLD_PSW(16),__LC_SVC_NEW_PSW
  465. je pgm_svcper
  466. # no interesting special case, ignore PER event
  467. lmg %r12,%r15,__LC_SAVE_AREA
  468. lpswe __LC_PGM_OLD_PSW
  469. #
  470. # Normal per exception
  471. #
  472. pgm_per_std:
  473. SAVE_ALL_SYNC __LC_PGM_OLD_PSW,__LC_SAVE_AREA
  474. CREATE_STACK_FRAME __LC_PGM_OLD_PSW,__LC_SAVE_AREA
  475. tm SP_PSW+1(%r15),0x01 # interrupting from user ?
  476. jz pgm_no_vtime2
  477. UPDATE_VTIME __LC_EXIT_TIMER,__LC_SYNC_ENTER_TIMER,__LC_USER_TIMER
  478. UPDATE_VTIME __LC_LAST_UPDATE_TIMER,__LC_EXIT_TIMER,__LC_SYSTEM_TIMER
  479. mvc __LC_LAST_UPDATE_TIMER(8),__LC_SYNC_ENTER_TIMER
  480. pgm_no_vtime2:
  481. lg %r9,__LC_THREAD_INFO # load pointer to thread_info struct
  482. TRACE_IRQS_OFF
  483. lg %r1,__TI_task(%r9)
  484. tm SP_PSW+1(%r15),0x01 # kernel per event ?
  485. jz kernel_per
  486. mvc __THREAD_per+__PER_atmid(2,%r1),__LC_PER_ATMID
  487. mvc __THREAD_per+__PER_address(8,%r1),__LC_PER_ADDRESS
  488. mvc __THREAD_per+__PER_access_id(1,%r1),__LC_PER_ACCESS_ID
  489. oi __TI_flags+7(%r9),_TIF_SINGLE_STEP # set TIF_SINGLE_STEP
  490. lgf %r3,__LC_PGM_ILC # load program interruption code
  491. lghi %r8,0x7f
  492. ngr %r8,%r3 # clear per-event-bit and ilc
  493. je sysc_return
  494. j pgm_do_call
  495. #
  496. # it was a single stepped SVC that is causing all the trouble
  497. #
  498. pgm_svcper:
  499. SAVE_ALL_SYNC __LC_SVC_OLD_PSW,__LC_SAVE_AREA
  500. CREATE_STACK_FRAME __LC_SVC_OLD_PSW,__LC_SAVE_AREA
  501. UPDATE_VTIME __LC_EXIT_TIMER,__LC_SYNC_ENTER_TIMER,__LC_USER_TIMER
  502. UPDATE_VTIME __LC_LAST_UPDATE_TIMER,__LC_EXIT_TIMER,__LC_SYSTEM_TIMER
  503. mvc __LC_LAST_UPDATE_TIMER(8),__LC_SYNC_ENTER_TIMER
  504. llgh %r7,__LC_SVC_INT_CODE # get svc number from lowcore
  505. lg %r9,__LC_THREAD_INFO # load pointer to thread_info struct
  506. lg %r1,__TI_task(%r9)
  507. mvc __THREAD_per+__PER_atmid(2,%r1),__LC_PER_ATMID
  508. mvc __THREAD_per+__PER_address(8,%r1),__LC_PER_ADDRESS
  509. mvc __THREAD_per+__PER_access_id(1,%r1),__LC_PER_ACCESS_ID
  510. oi __TI_flags+7(%r9),_TIF_SINGLE_STEP # set TIF_SINGLE_STEP
  511. TRACE_IRQS_ON
  512. stosm __SF_EMPTY(%r15),0x03 # reenable interrupts
  513. j sysc_do_svc
  514. #
  515. # per was called from kernel, must be kprobes
  516. #
  517. kernel_per:
  518. xc SP_SVCNR(2,%r15),SP_SVCNR(%r15) # clear svc number
  519. la %r2,SP_PTREGS(%r15) # address of register-save area
  520. larl %r14,sysc_restore # load adr. of system ret, no work
  521. jg do_single_step # branch to do_single_step
  522. /*
  523. * IO interrupt handler routine
  524. */
  525. .globl io_int_handler
  526. io_int_handler:
  527. stck __LC_INT_CLOCK
  528. stpt __LC_ASYNC_ENTER_TIMER
  529. SAVE_ALL_BASE __LC_SAVE_AREA+32
  530. SAVE_ALL_ASYNC __LC_IO_OLD_PSW,__LC_SAVE_AREA+32
  531. CREATE_STACK_FRAME __LC_IO_OLD_PSW,__LC_SAVE_AREA+32
  532. tm SP_PSW+1(%r15),0x01 # interrupting from user ?
  533. jz io_no_vtime
  534. UPDATE_VTIME __LC_EXIT_TIMER,__LC_ASYNC_ENTER_TIMER,__LC_USER_TIMER
  535. UPDATE_VTIME __LC_LAST_UPDATE_TIMER,__LC_EXIT_TIMER,__LC_SYSTEM_TIMER
  536. mvc __LC_LAST_UPDATE_TIMER(8),__LC_ASYNC_ENTER_TIMER
  537. io_no_vtime:
  538. lg %r9,__LC_THREAD_INFO # load pointer to thread_info struct
  539. TRACE_IRQS_OFF
  540. la %r2,SP_PTREGS(%r15) # address of register-save area
  541. brasl %r14,do_IRQ # call standard irq handler
  542. io_return:
  543. tm __TI_flags+7(%r9),_TIF_WORK_INT
  544. jnz io_work # there is work to do (signals etc.)
  545. io_restore:
  546. #ifdef CONFIG_TRACE_IRQFLAGS
  547. larl %r1,io_restore_trace_psw
  548. lpswe 0(%r1)
  549. io_restore_trace:
  550. TRACE_IRQS_CHECK
  551. LOCKDEP_SYS_EXIT
  552. #endif
  553. io_leave:
  554. RESTORE_ALL __LC_RETURN_PSW,0
  555. io_done:
  556. #ifdef CONFIG_TRACE_IRQFLAGS
  557. .align 8
  558. .globl io_restore_trace_psw
  559. io_restore_trace_psw:
  560. .quad 0, io_restore_trace
  561. #endif
  562. #
  563. # There is work todo, we need to check if we return to userspace, then
  564. # check, if we are in SIE, if yes leave it
  565. #
  566. io_work:
  567. tm SP_PSW+1(%r15),0x01 # returning to user ?
  568. #ifndef CONFIG_PREEMPT
  569. #if defined(CONFIG_KVM) || defined(CONFIG_KVM_MODULE)
  570. jnz io_work_user # yes -> no need to check for SIE
  571. la %r1, BASED(sie_opcode) # we return to kernel here
  572. lg %r2, SP_PSW+8(%r15)
  573. clc 0(2,%r1), 0(%r2) # is current instruction = SIE?
  574. jne io_restore # no-> return to kernel
  575. lg %r1, SP_PSW+8(%r15) # yes-> add 4 bytes to leave SIE
  576. aghi %r1, 4
  577. stg %r1, SP_PSW+8(%r15)
  578. j io_restore # return to kernel
  579. #else
  580. jno io_restore # no-> skip resched & signal
  581. #endif
  582. #else
  583. jnz io_work_user # yes -> do resched & signal
  584. #if defined(CONFIG_KVM) || defined(CONFIG_KVM_MODULE)
  585. la %r1, BASED(sie_opcode)
  586. lg %r2, SP_PSW+8(%r15)
  587. clc 0(2,%r1), 0(%r2) # is current instruction = SIE?
  588. jne 0f # no -> leave PSW alone
  589. lg %r1, SP_PSW+8(%r15) # yes-> add 4 bytes to leave SIE
  590. aghi %r1, 4
  591. stg %r1, SP_PSW+8(%r15)
  592. 0:
  593. #endif
  594. # check for preemptive scheduling
  595. icm %r0,15,__TI_precount(%r9)
  596. jnz io_restore # preemption is disabled
  597. # switch to kernel stack
  598. lg %r1,SP_R15(%r15)
  599. aghi %r1,-SP_SIZE
  600. mvc SP_PTREGS(__PT_SIZE,%r1),SP_PTREGS(%r15)
  601. xc __SF_BACKCHAIN(8,%r1),__SF_BACKCHAIN(%r1) # clear back chain
  602. lgr %r15,%r1
  603. io_resume_loop:
  604. tm __TI_flags+7(%r9),_TIF_NEED_RESCHED
  605. jno io_restore
  606. larl %r14,io_resume_loop
  607. jg preempt_schedule_irq
  608. #endif
  609. io_work_user:
  610. lg %r1,__LC_KERNEL_STACK
  611. aghi %r1,-SP_SIZE
  612. mvc SP_PTREGS(__PT_SIZE,%r1),SP_PTREGS(%r15)
  613. xc __SF_BACKCHAIN(8,%r1),__SF_BACKCHAIN(%r1) # clear back chain
  614. lgr %r15,%r1
  615. #
  616. # One of the work bits is on. Find out which one.
  617. # Checked are: _TIF_SIGPENDING, _TIF_RESTORE_SIGPENDING, _TIF_NEED_RESCHED
  618. # and _TIF_MCCK_PENDING
  619. #
  620. io_work_loop:
  621. tm __TI_flags+7(%r9),_TIF_MCCK_PENDING
  622. jo io_mcck_pending
  623. tm __TI_flags+7(%r9),_TIF_NEED_RESCHED
  624. jo io_reschedule
  625. tm __TI_flags+7(%r9),_TIF_SIGPENDING
  626. jnz io_sigpending
  627. tm __TI_flags+7(%r9),_TIF_NOTIFY_RESUME
  628. jnz io_notify_resume
  629. j io_restore
  630. io_work_done:
  631. #if defined(CONFIG_KVM) || defined(CONFIG_KVM_MODULE)
  632. sie_opcode:
  633. .long 0xb2140000
  634. #endif
  635. #
  636. # _TIF_MCCK_PENDING is set, call handler
  637. #
  638. io_mcck_pending:
  639. brasl %r14,s390_handle_mcck # TIF bit will be cleared by handler
  640. j io_work_loop
  641. #
  642. # _TIF_NEED_RESCHED is set, call schedule
  643. #
  644. io_reschedule:
  645. TRACE_IRQS_ON
  646. stosm __SF_EMPTY(%r15),0x03 # reenable interrupts
  647. brasl %r14,schedule # call scheduler
  648. stnsm __SF_EMPTY(%r15),0xfc # disable I/O and ext. interrupts
  649. TRACE_IRQS_OFF
  650. tm __TI_flags+7(%r9),_TIF_WORK_INT
  651. jz io_restore # there is no work to do
  652. j io_work_loop
  653. #
  654. # _TIF_SIGPENDING or is set, call do_signal
  655. #
  656. io_sigpending:
  657. TRACE_IRQS_ON
  658. stosm __SF_EMPTY(%r15),0x03 # reenable interrupts
  659. la %r2,SP_PTREGS(%r15) # load pt_regs
  660. brasl %r14,do_signal # call do_signal
  661. stnsm __SF_EMPTY(%r15),0xfc # disable I/O and ext. interrupts
  662. TRACE_IRQS_OFF
  663. j io_work_loop
  664. #
  665. # _TIF_NOTIFY_RESUME or is set, call do_notify_resume
  666. #
  667. io_notify_resume:
  668. TRACE_IRQS_ON
  669. stosm __SF_EMPTY(%r15),0x03 # reenable interrupts
  670. la %r2,SP_PTREGS(%r15) # load pt_regs
  671. brasl %r14,do_notify_resume # call do_notify_resume
  672. stnsm __SF_EMPTY(%r15),0xfc # disable I/O and ext. interrupts
  673. TRACE_IRQS_OFF
  674. j io_work_loop
  675. /*
  676. * External interrupt handler routine
  677. */
  678. .globl ext_int_handler
  679. ext_int_handler:
  680. stck __LC_INT_CLOCK
  681. stpt __LC_ASYNC_ENTER_TIMER
  682. SAVE_ALL_BASE __LC_SAVE_AREA+32
  683. SAVE_ALL_ASYNC __LC_EXT_OLD_PSW,__LC_SAVE_AREA+32
  684. CREATE_STACK_FRAME __LC_EXT_OLD_PSW,__LC_SAVE_AREA+32
  685. tm SP_PSW+1(%r15),0x01 # interrupting from user ?
  686. jz ext_no_vtime
  687. UPDATE_VTIME __LC_EXIT_TIMER,__LC_ASYNC_ENTER_TIMER,__LC_USER_TIMER
  688. UPDATE_VTIME __LC_LAST_UPDATE_TIMER,__LC_EXIT_TIMER,__LC_SYSTEM_TIMER
  689. mvc __LC_LAST_UPDATE_TIMER(8),__LC_ASYNC_ENTER_TIMER
  690. ext_no_vtime:
  691. lg %r9,__LC_THREAD_INFO # load pointer to thread_info struct
  692. TRACE_IRQS_OFF
  693. la %r2,SP_PTREGS(%r15) # address of register-save area
  694. llgh %r3,__LC_EXT_INT_CODE # get interruption code
  695. brasl %r14,do_extint
  696. j io_return
  697. __critical_end:
  698. /*
  699. * Machine check handler routines
  700. */
  701. .globl mcck_int_handler
  702. mcck_int_handler:
  703. stck __LC_INT_CLOCK
  704. la %r1,4095 # revalidate r1
  705. spt __LC_CPU_TIMER_SAVE_AREA-4095(%r1) # revalidate cpu timer
  706. lmg %r0,%r15,__LC_GPREGS_SAVE_AREA-4095(%r1)# revalidate gprs
  707. SAVE_ALL_BASE __LC_SAVE_AREA+64
  708. la %r12,__LC_MCK_OLD_PSW
  709. tm __LC_MCCK_CODE,0x80 # system damage?
  710. jo mcck_int_main # yes -> rest of mcck code invalid
  711. la %r14,4095
  712. mvc __LC_SAVE_AREA+104(8),__LC_ASYNC_ENTER_TIMER
  713. mvc __LC_ASYNC_ENTER_TIMER(8),__LC_CPU_TIMER_SAVE_AREA-4095(%r14)
  714. tm __LC_MCCK_CODE+5,0x02 # stored cpu timer value valid?
  715. jo 1f
  716. la %r14,__LC_SYNC_ENTER_TIMER
  717. clc 0(8,%r14),__LC_ASYNC_ENTER_TIMER
  718. jl 0f
  719. la %r14,__LC_ASYNC_ENTER_TIMER
  720. 0: clc 0(8,%r14),__LC_EXIT_TIMER
  721. jl 0f
  722. la %r14,__LC_EXIT_TIMER
  723. 0: clc 0(8,%r14),__LC_LAST_UPDATE_TIMER
  724. jl 0f
  725. la %r14,__LC_LAST_UPDATE_TIMER
  726. 0: spt 0(%r14)
  727. mvc __LC_ASYNC_ENTER_TIMER(8),0(%r14)
  728. 1: tm __LC_MCCK_CODE+2,0x09 # mwp + ia of old psw valid?
  729. jno mcck_int_main # no -> skip cleanup critical
  730. tm __LC_MCK_OLD_PSW+1,0x01 # test problem state bit
  731. jnz mcck_int_main # from user -> load kernel stack
  732. clc __LC_MCK_OLD_PSW+8(8),BASED(.Lcritical_end)
  733. jhe mcck_int_main
  734. clc __LC_MCK_OLD_PSW+8(8),BASED(.Lcritical_start)
  735. jl mcck_int_main
  736. brasl %r14,cleanup_critical
  737. mcck_int_main:
  738. lg %r14,__LC_PANIC_STACK # are we already on the panic stack?
  739. slgr %r14,%r15
  740. srag %r14,%r14,PAGE_SHIFT
  741. jz 0f
  742. lg %r15,__LC_PANIC_STACK # load panic stack
  743. 0: CREATE_STACK_FRAME __LC_MCK_OLD_PSW,__LC_SAVE_AREA+64
  744. tm __LC_MCCK_CODE+2,0x08 # mwp of old psw valid?
  745. jno mcck_no_vtime # no -> no timer update
  746. tm SP_PSW+1(%r15),0x01 # interrupting from user ?
  747. jz mcck_no_vtime
  748. UPDATE_VTIME __LC_EXIT_TIMER,__LC_ASYNC_ENTER_TIMER,__LC_USER_TIMER
  749. UPDATE_VTIME __LC_LAST_UPDATE_TIMER,__LC_EXIT_TIMER,__LC_SYSTEM_TIMER
  750. mvc __LC_LAST_UPDATE_TIMER(8),__LC_ASYNC_ENTER_TIMER
  751. mcck_no_vtime:
  752. lg %r9,__LC_THREAD_INFO # load pointer to thread_info struct
  753. la %r2,SP_PTREGS(%r15) # load pt_regs
  754. brasl %r14,s390_do_machine_check
  755. tm SP_PSW+1(%r15),0x01 # returning to user ?
  756. jno mcck_return
  757. lg %r1,__LC_KERNEL_STACK # switch to kernel stack
  758. aghi %r1,-SP_SIZE
  759. mvc SP_PTREGS(__PT_SIZE,%r1),SP_PTREGS(%r15)
  760. xc __SF_BACKCHAIN(8,%r1),__SF_BACKCHAIN(%r1) # clear back chain
  761. lgr %r15,%r1
  762. stosm __SF_EMPTY(%r15),0x04 # turn dat on
  763. tm __TI_flags+7(%r9),_TIF_MCCK_PENDING
  764. jno mcck_return
  765. TRACE_IRQS_OFF
  766. brasl %r14,s390_handle_mcck
  767. TRACE_IRQS_ON
  768. mcck_return:
  769. mvc __LC_RETURN_MCCK_PSW(16),SP_PSW(%r15) # move return PSW
  770. ni __LC_RETURN_MCCK_PSW+1,0xfd # clear wait state bit
  771. lmg %r0,%r15,SP_R0(%r15) # load gprs 0-15
  772. mvc __LC_ASYNC_ENTER_TIMER(8),__LC_SAVE_AREA+104
  773. tm __LC_RETURN_MCCK_PSW+1,0x01 # returning to user ?
  774. jno 0f
  775. stpt __LC_EXIT_TIMER
  776. 0: lpswe __LC_RETURN_MCCK_PSW # back to caller
  777. /*
  778. * Restart interruption handler, kick starter for additional CPUs
  779. */
  780. #ifdef CONFIG_SMP
  781. __CPUINIT
  782. .globl restart_int_handler
  783. restart_int_handler:
  784. basr %r1,0
  785. restart_base:
  786. spt restart_vtime-restart_base(%r1)
  787. stck __LC_LAST_UPDATE_CLOCK
  788. mvc __LC_LAST_UPDATE_TIMER(8),restart_vtime-restart_base(%r1)
  789. mvc __LC_EXIT_TIMER(8),restart_vtime-restart_base(%r1)
  790. lg %r15,__LC_SAVE_AREA+120 # load ksp
  791. lghi %r10,__LC_CREGS_SAVE_AREA
  792. lctlg %c0,%c15,0(%r10) # get new ctl regs
  793. lghi %r10,__LC_AREGS_SAVE_AREA
  794. lam %a0,%a15,0(%r10)
  795. lmg %r6,%r15,__SF_GPRS(%r15) # load registers from clone
  796. lg %r1,__LC_THREAD_INFO
  797. mvc __LC_USER_TIMER(8),__TI_user_timer(%r1)
  798. mvc __LC_SYSTEM_TIMER(8),__TI_system_timer(%r1)
  799. xc __LC_STEAL_TIMER(8),__LC_STEAL_TIMER
  800. stosm __SF_EMPTY(%r15),0x04 # now we can turn dat on
  801. jg start_secondary
  802. .align 8
  803. restart_vtime:
  804. .long 0x7fffffff,0xffffffff
  805. .previous
  806. #else
  807. /*
  808. * If we do not run with SMP enabled, let the new CPU crash ...
  809. */
  810. .globl restart_int_handler
  811. restart_int_handler:
  812. basr %r1,0
  813. restart_base:
  814. lpswe restart_crash-restart_base(%r1)
  815. .align 8
  816. restart_crash:
  817. .long 0x000a0000,0x00000000,0x00000000,0x00000000
  818. restart_go:
  819. #endif
  820. #ifdef CONFIG_CHECK_STACK
  821. /*
  822. * The synchronous or the asynchronous stack overflowed. We are dead.
  823. * No need to properly save the registers, we are going to panic anyway.
  824. * Setup a pt_regs so that show_trace can provide a good call trace.
  825. */
  826. stack_overflow:
  827. lg %r15,__LC_PANIC_STACK # change to panic stack
  828. aghi %r15,-SP_SIZE
  829. mvc SP_PSW(16,%r15),0(%r12) # move user PSW to stack
  830. stmg %r0,%r11,SP_R0(%r15) # store gprs %r0-%r11 to kernel stack
  831. la %r1,__LC_SAVE_AREA
  832. chi %r12,__LC_SVC_OLD_PSW
  833. je 0f
  834. chi %r12,__LC_PGM_OLD_PSW
  835. je 0f
  836. la %r1,__LC_SAVE_AREA+32
  837. 0: mvc SP_R12(32,%r15),0(%r1) # move %r12-%r15 to stack
  838. mvc SP_ARGS(8,%r15),__LC_LAST_BREAK
  839. xc __SF_BACKCHAIN(8,%r15),__SF_BACKCHAIN(%r15) # clear back chain
  840. la %r2,SP_PTREGS(%r15) # load pt_regs
  841. jg kernel_stack_overflow
  842. #endif
  843. cleanup_table_system_call:
  844. .quad system_call, sysc_do_svc
  845. cleanup_table_sysc_return:
  846. .quad sysc_return, sysc_leave
  847. cleanup_table_sysc_leave:
  848. .quad sysc_leave, sysc_done
  849. cleanup_table_sysc_work_loop:
  850. .quad sysc_work_loop, sysc_work_done
  851. cleanup_table_io_return:
  852. .quad io_return, io_leave
  853. cleanup_table_io_leave:
  854. .quad io_leave, io_done
  855. cleanup_table_io_work_loop:
  856. .quad io_work_loop, io_work_done
  857. cleanup_critical:
  858. clc 8(8,%r12),BASED(cleanup_table_system_call)
  859. jl 0f
  860. clc 8(8,%r12),BASED(cleanup_table_system_call+8)
  861. jl cleanup_system_call
  862. 0:
  863. clc 8(8,%r12),BASED(cleanup_table_sysc_return)
  864. jl 0f
  865. clc 8(8,%r12),BASED(cleanup_table_sysc_return+8)
  866. jl cleanup_sysc_return
  867. 0:
  868. clc 8(8,%r12),BASED(cleanup_table_sysc_leave)
  869. jl 0f
  870. clc 8(8,%r12),BASED(cleanup_table_sysc_leave+8)
  871. jl cleanup_sysc_leave
  872. 0:
  873. clc 8(8,%r12),BASED(cleanup_table_sysc_work_loop)
  874. jl 0f
  875. clc 8(8,%r12),BASED(cleanup_table_sysc_work_loop+8)
  876. jl cleanup_sysc_return
  877. 0:
  878. clc 8(8,%r12),BASED(cleanup_table_io_return)
  879. jl 0f
  880. clc 8(8,%r12),BASED(cleanup_table_io_return+8)
  881. jl cleanup_io_return
  882. 0:
  883. clc 8(8,%r12),BASED(cleanup_table_io_leave)
  884. jl 0f
  885. clc 8(8,%r12),BASED(cleanup_table_io_leave+8)
  886. jl cleanup_io_leave
  887. 0:
  888. clc 8(8,%r12),BASED(cleanup_table_io_work_loop)
  889. jl 0f
  890. clc 8(8,%r12),BASED(cleanup_table_io_work_loop+8)
  891. jl cleanup_io_return
  892. 0:
  893. br %r14
  894. cleanup_system_call:
  895. mvc __LC_RETURN_PSW(16),0(%r12)
  896. cghi %r12,__LC_MCK_OLD_PSW
  897. je 0f
  898. la %r12,__LC_SAVE_AREA+32
  899. j 1f
  900. 0: la %r12,__LC_SAVE_AREA+64
  901. 1:
  902. clc __LC_RETURN_PSW+8(8),BASED(cleanup_system_call_insn+8)
  903. jh 0f
  904. mvc __LC_SYNC_ENTER_TIMER(8),__LC_ASYNC_ENTER_TIMER
  905. 0: clc __LC_RETURN_PSW+8(8),BASED(cleanup_system_call_insn+16)
  906. jhe cleanup_vtime
  907. clc __LC_RETURN_PSW+8(8),BASED(cleanup_system_call_insn)
  908. jh 0f
  909. mvc __LC_SAVE_AREA(32),0(%r12)
  910. 0: stg %r13,8(%r12)
  911. stg %r12,__LC_SAVE_AREA+96 # argh
  912. SAVE_ALL_SYNC __LC_SVC_OLD_PSW,__LC_SAVE_AREA
  913. CREATE_STACK_FRAME __LC_SVC_OLD_PSW,__LC_SAVE_AREA
  914. lg %r12,__LC_SAVE_AREA+96 # argh
  915. stg %r15,24(%r12)
  916. llgh %r7,__LC_SVC_INT_CODE
  917. cleanup_vtime:
  918. clc __LC_RETURN_PSW+8(8),BASED(cleanup_system_call_insn+24)
  919. jhe cleanup_stime
  920. UPDATE_VTIME __LC_EXIT_TIMER,__LC_SYNC_ENTER_TIMER,__LC_USER_TIMER
  921. cleanup_stime:
  922. clc __LC_RETURN_PSW+8(8),BASED(cleanup_system_call_insn+32)
  923. jh cleanup_update
  924. UPDATE_VTIME __LC_LAST_UPDATE_TIMER,__LC_EXIT_TIMER,__LC_SYSTEM_TIMER
  925. cleanup_update:
  926. mvc __LC_LAST_UPDATE_TIMER(8),__LC_SYNC_ENTER_TIMER
  927. mvc __LC_RETURN_PSW+8(8),BASED(cleanup_table_system_call+8)
  928. la %r12,__LC_RETURN_PSW
  929. br %r14
  930. cleanup_system_call_insn:
  931. .quad sysc_saveall
  932. .quad system_call
  933. .quad sysc_vtime
  934. .quad sysc_stime
  935. .quad sysc_update
  936. cleanup_sysc_return:
  937. mvc __LC_RETURN_PSW(8),0(%r12)
  938. mvc __LC_RETURN_PSW+8(8),BASED(cleanup_table_sysc_return)
  939. la %r12,__LC_RETURN_PSW
  940. br %r14
  941. cleanup_sysc_leave:
  942. clc 8(8,%r12),BASED(cleanup_sysc_leave_insn)
  943. je 3f
  944. clc 8(8,%r12),BASED(cleanup_sysc_leave_insn+8)
  945. jhe 0f
  946. mvc __LC_EXIT_TIMER(8),__LC_ASYNC_ENTER_TIMER
  947. 0: mvc __LC_RETURN_PSW(16),SP_PSW(%r15)
  948. cghi %r12,__LC_MCK_OLD_PSW
  949. jne 1f
  950. mvc __LC_SAVE_AREA+64(32),SP_R12(%r15)
  951. j 2f
  952. 1: mvc __LC_SAVE_AREA+32(32),SP_R12(%r15)
  953. 2: lmg %r0,%r11,SP_R0(%r15)
  954. lg %r15,SP_R15(%r15)
  955. 3: la %r12,__LC_RETURN_PSW
  956. br %r14
  957. cleanup_sysc_leave_insn:
  958. .quad sysc_done - 4
  959. .quad sysc_done - 16
  960. cleanup_io_return:
  961. mvc __LC_RETURN_PSW(8),0(%r12)
  962. mvc __LC_RETURN_PSW+8(8),BASED(cleanup_table_io_work_loop)
  963. la %r12,__LC_RETURN_PSW
  964. br %r14
  965. cleanup_io_leave:
  966. clc 8(8,%r12),BASED(cleanup_io_leave_insn)
  967. je 3f
  968. clc 8(8,%r12),BASED(cleanup_io_leave_insn+8)
  969. jhe 0f
  970. mvc __LC_EXIT_TIMER(8),__LC_ASYNC_ENTER_TIMER
  971. 0: mvc __LC_RETURN_PSW(16),SP_PSW(%r15)
  972. cghi %r12,__LC_MCK_OLD_PSW
  973. jne 1f
  974. mvc __LC_SAVE_AREA+64(32),SP_R12(%r15)
  975. j 2f
  976. 1: mvc __LC_SAVE_AREA+32(32),SP_R12(%r15)
  977. 2: lmg %r0,%r11,SP_R0(%r15)
  978. lg %r15,SP_R15(%r15)
  979. 3: la %r12,__LC_RETURN_PSW
  980. br %r14
  981. cleanup_io_leave_insn:
  982. .quad io_done - 4
  983. .quad io_done - 16
  984. /*
  985. * Integer constants
  986. */
  987. .align 4
  988. .Lconst:
  989. .Lnr_syscalls: .long NR_syscalls
  990. .L0x0130: .short 0x130
  991. .L0x0140: .short 0x140
  992. .L0x0150: .short 0x150
  993. .L0x0160: .short 0x160
  994. .L0x0170: .short 0x170
  995. .Lcritical_start:
  996. .quad __critical_start
  997. .Lcritical_end:
  998. .quad __critical_end
  999. .section .rodata, "a"
  1000. #define SYSCALL(esa,esame,emu) .long esame
  1001. sys_call_table:
  1002. #include "syscalls.S"
  1003. #undef SYSCALL
  1004. #ifdef CONFIG_COMPAT
  1005. #define SYSCALL(esa,esame,emu) .long emu
  1006. sys_call_table_emu:
  1007. #include "syscalls.S"
  1008. #undef SYSCALL
  1009. #endif