entry.S 31 KB

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