entry-common.S 13.8 KB
Newer Older
Linus Torvalds's avatar
Linus Torvalds committed
1
2
3
4
/*
 *  linux/arch/arm/kernel/entry-common.S
 *
 *  Copyright (C) 2000 Russell King
5
 *  Copyright (C) 2005 Stelian Pop.
Linus Torvalds's avatar
Linus Torvalds committed
6
7
8
9
10
11
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License version 2 as
 * published by the Free Software Foundation.
 */

12
#include <asm/assembler.h>
Linus Torvalds's avatar
Linus Torvalds committed
13
#include <asm/unistd.h>
14
#include <asm/ftrace.h>
15
#include <asm/unwind.h>
16
#include <asm/memory.h>
17
18
19
20
21
#ifdef CONFIG_AEABI
#include <asm/unistd-oabi.h>
#endif

	.equ	NR_syscalls, __NR_syscalls
Linus Torvalds's avatar
Linus Torvalds committed
22

23
24
25
26
27
28
29
#ifdef CONFIG_NEED_RET_TO_USER
#include <mach/entry-macro.S>
#else
	.macro  arch_ret_to_user, tmp1, tmp2
	.endm
#endif

Linus Torvalds's avatar
Linus Torvalds committed
30
31
#include "entry-header.S"

32
saved_psr	.req	r8
Russell King's avatar
Russell King committed
33
34
35
36
#if defined(CONFIG_TRACE_IRQFLAGS) || defined(CONFIG_CONTEXT_TRACKING)
saved_pc	.req	r9
#define TRACE(x...) x
#else
37
saved_pc	.req	lr
Russell King's avatar
Russell King committed
38
39
#define TRACE(x...)
#endif
Linus Torvalds's avatar
Linus Torvalds committed
40

41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
#ifdef CONFIG_IPIPE

.macro  ipipe_oabi_save_sysnr, tmp
#ifdef CONFIG_OABI_COMPAT
	ldr	\tmp, [sp, #S_R7 + S_OFF]
	stmdb	sp!, {\tmp}
	ldr	\tmp, =sys_oabi_call_table
	cmp	\tmp, tbl
	moveq	\tmp, scno
	addeq	\tmp, #__NR_SYSCALL_BASE
	streq	\tmp, [sp, #S_R7 + S_OFF + 4]	@ head domain expects sycall number in r7
#elif !defined(CONFIG_AEABI)
	ldr	\tmp, [sp, #S_R7 + S_OFF]
	stmdb	sp!, {\tmp}
	mov	\tmp, scno
	add	\tmp, #__NR_SYSCALL_BASE
	str	\tmp, [sp, #S_R7 + S_OFF + 4]
#endif
.endm

.macro  ipipe_oabi_restore_sysnr, tmp
#if defined(CONFIG_OABI_COMPAT) || !defined(CONFIG_AEABI)
	ldmia	sp!, {\tmp}
	str	\tmp, [sp, #S_R7 + S_OFF]
#endif
.endm

#endif /* CONFIG_IPIPE */

70
	.section .entry.text,"ax",%progbits
Linus Torvalds's avatar
Linus Torvalds committed
71
	.align	5
72
73
#if !(IS_ENABLED(CONFIG_TRACE_IRQFLAGS) || IS_ENABLED(CONFIG_CONTEXT_TRACKING) || \
	IS_ENABLED(CONFIG_DEBUG_RSEQ))
Linus Torvalds's avatar
Linus Torvalds committed
74
/*
Russell King's avatar
Russell King committed
75
76
 * This is the fast syscall return path.  We do as little as possible here,
 * such as avoiding writing r0 to the stack.  We only use this path if we
77
78
 * have tracing, context tracking and rseq debug disabled - the overheads
 * from those features make this path too inefficient.
Linus Torvalds's avatar
Linus Torvalds committed
79
80
 */
ret_fast_syscall:
81
__ret_fast_syscall:
82
83
 UNWIND(.fnstart	)
 UNWIND(.cantunwind	)
Russell King's avatar
Russell King committed
84
	disable_irq_notrace			@ disable interrupts
85
86
87
	ldr	r2, [tsk, #TI_ADDR_LIMIT]
	cmp	r2, #TASK_SIZE
	blne	addr_limit_check_failed
88
	ldr	r1, [tsk, #TI_FLAGS]		@ re-check for syscall tracing
89
	tst	r1, #_TIF_SYSCALL_WORK | _TIF_WORK_MASK
Linus Torvalds's avatar
Linus Torvalds committed
90
	bne	fast_work_pending
91

92
93
94
	/* perform architecture specific actions before user return */
	arch_ret_to_user r1, lr

95
	restore_user_regs fast = 1, offset = S_OFF
96
97


98
 UNWIND(.fnend		)
Russell King's avatar
Russell King committed
99
ENDPROC(ret_fast_syscall)
Linus Torvalds's avatar
Linus Torvalds committed
100

Russell King's avatar
Russell King committed
101
	/* Ok, we need to do extra processing, enter the slow path. */
Linus Torvalds's avatar
Linus Torvalds committed
102
103
fast_work_pending:
	str	r0, [sp, #S_R0+S_OFF]!		@ returned r0
Russell King's avatar
Russell King committed
104
105
106
	/* fall through to work_pending */
#else
/*
107
108
109
110
 * The "replacement" ret_fast_syscall for when tracing, context tracking,
 * or rseq debug is enabled.  As we will need to call out to some C functions,
 * we save r0 first to avoid needing to save registers around each C function
 * call.
Russell King's avatar
Russell King committed
111
112
 */
ret_fast_syscall:
113
__ret_fast_syscall:
Russell King's avatar
Russell King committed
114
115
116
 UNWIND(.fnstart	)
 UNWIND(.cantunwind	)
	str	r0, [sp, #S_R0 + S_OFF]!	@ save returned r0
117
118
119
120
121
#if IS_ENABLED(CONFIG_DEBUG_RSEQ)
	/* do_rseq_syscall needs interrupts enabled. */
	mov	r0, sp				@ 'regs'
	bl	do_rseq_syscall
#endif
Russell King's avatar
Russell King committed
122
	disable_irq_notrace			@ disable interrupts
123
124
125
	ldr	r2, [tsk, #TI_ADDR_LIMIT]
	cmp	r2, #TASK_SIZE
	blne	addr_limit_check_failed
Russell King's avatar
Russell King committed
126
	ldr	r1, [tsk, #TI_FLAGS]		@ re-check for syscall tracing
127
	tst	r1, #_TIF_SYSCALL_WORK | _TIF_WORK_MASK
Russell King's avatar
Russell King committed
128
129
130
131
132
133
134
135
136
137
	beq	no_work_pending
 UNWIND(.fnend		)
ENDPROC(ret_fast_syscall)

	/* Slower path - fall through to work_pending */
#endif

	tst	r1, #_TIF_SYSCALL_WORK
	bne	__sys_trace_return_nosave
slow_work_pending:
Linus Torvalds's avatar
Linus Torvalds committed
138
139
	mov	r0, sp				@ 'regs'
	mov	r2, why				@ 'syscall'
140
	bl	do_work_pending
141
	cmp	r0, #0
142
	beq	no_work_pending
143
	movlt	scno, #(__NR_restart_syscall - __NR_SYSCALL_BASE)
144
145
	ldmia	sp, {r0 - r6}			@ have to reload r0 - r6
	b	local_restart			@ ... and off we go
146
ENDPROC(ret_fast_syscall)
147

Linus Torvalds's avatar
Linus Torvalds committed
148
149
/*
 * "slow" syscall return path.  "why" tells us if this was a real syscall.
Russell King's avatar
Russell King committed
150
151
152
 * IRQs may be enabled here, so always disable them.  Note that we use the
 * "notrace" version to avoid calling into the tracing code unnecessarily.
 * do_work_pending() will update this state if necessary.
Linus Torvalds's avatar
Linus Torvalds committed
153
154
155
 */
ENTRY(ret_to_user)
ret_slow_syscall:
156
157
158
159
160
161
#if IS_ENABLED(CONFIG_DEBUG_RSEQ)
	/* do_rseq_syscall needs interrupts enabled. */
	enable_irq_notrace			@ enable interrupts
	mov	r0, sp				@ 'regs'
	bl	do_rseq_syscall
#endif
Russell King's avatar
Russell King committed
162
	disable_irq_notrace			@ disable interrupts
163
ENTRY(ret_to_user_from_irq)
164
165
166
	ldr	r2, [tsk, #TI_ADDR_LIMIT]
	cmp	r2, #TASK_SIZE
	blne	addr_limit_check_failed
Linus Torvalds's avatar
Linus Torvalds committed
167
168
	ldr	r1, [tsk, #TI_FLAGS]
	tst	r1, #_TIF_WORK_MASK
Russell King's avatar
Russell King committed
169
	bne	slow_work_pending
Linus Torvalds's avatar
Linus Torvalds committed
170
no_work_pending:
Russell King's avatar
Russell King committed
171
	asm_trace_hardirqs_on save = 0
172
	slow_restore_user_regs
173
ENDPROC(ret_to_user_from_irq)
174
ENDPROC(ret_to_user)
Linus Torvalds's avatar
Linus Torvalds committed
175
176
177
178
179

/*
 * This is how we return from a fork.
 */
ENTRY(ret_from_fork)
180
	enable_irq_cond
Linus Torvalds's avatar
Linus Torvalds committed
181
	bl	schedule_tail
182
183
	cmp	r5, #0
	movne	r0, r4
184
	badrne	lr, 1f
185
	retne	r5
186
1:	get_thread_info tsk
Linus Torvalds's avatar
Linus Torvalds committed
187
	b	ret_slow_syscall
188
ENDPROC(ret_from_fork)
Linus Torvalds's avatar
Linus Torvalds committed
189

190
#ifdef CONFIG_IPIPE
191
192
__ipipe_ret_to_user:
	disable_irq				@ disable interrupts
193
194
195
196
197
ENTRY(__ipipe_ret_to_user_irqs_disabled)
	slow_restore_user_regs
ENDPROC(__ipipe_ret_to_user_irqs_disabled)
#endif

Linus Torvalds's avatar
Linus Torvalds committed
198
199
200
201
202
203
204
/*=============================================================================
 * SWI handler
 *-----------------------------------------------------------------------------
 */

	.align	5
ENTRY(vector_swi)
205
206
207
#ifdef CONFIG_CPU_V7M
	v7m_exception_entry
#else
208
	sub	sp, sp, #PT_REGS_SIZE
209
	stmia	sp, {r0 - r12}			@ Calling r0 - r12
210
211
212
213
 ARM(	add	r8, sp, #S_PC		)
 ARM(	stmdb	r8, {sp, lr}^		)	@ Calling sp, lr
 THUMB(	mov	r8, sp			)
 THUMB(	store_user_sp_lr r8, r10, S_SP	)	@ calling sp, lr
214
	mrs	saved_psr, spsr			@ called from non-FIQ mode, so ok.
Russell King's avatar
Russell King committed
215
 TRACE(	mov	saved_pc, lr		)
216
217
	str	saved_pc, [sp, #S_PC]		@ Save calling PC
	str	saved_psr, [sp, #S_PSR]		@ Save CPSR
218
	str	r0, [sp, #S_OLD_R0]		@ Save OLD_R0
219
#endif
Linus Torvalds's avatar
Linus Torvalds committed
220
	zero_fp
221
222
223
224
225
226
227
228
229
230
#ifdef CONFIG_IPIPE_TRACE_IRQSOFF
	mov	r4, lr
	mov	r0, #1		/* IPIPE_TRACE_BEGIN */
	mov	r3, #0x90000000
	sub	r2, lr, #4	/* calling PC */
	mov	r1, pc
	bl	ipipe_trace_asm
	mov	lr, r4
	ldm	sp, {r0 - r4}
#endif /* CONFIG_IPIPE_TRACE_IRQSOFF */
231
	alignment_trap r10, ip, __cr_alignment
232
233
234
	asm_trace_hardirqs_on save=0
	enable_irq_notrace
	ct_user_exit save=0
235

236
237
238
	/*
	 * Get the system call number.
	 */
239

240
#if defined(CONFIG_OABI_COMPAT)
241

242
243
244
245
246
	/*
	 * If we have CONFIG_OABI_COMPAT then we need to look at the swi
	 * value to determine if it is an EABI or an old ABI call.
	 */
#ifdef CONFIG_ARM_THUMB
247
	tst	saved_psr, #PSR_T_BIT
248
	movne	r10, #0				@ no thumb OABI emulation
249
 USER(	ldreq	r10, [saved_pc, #-4]	)	@ get SWI instruction
250
#else
251
 USER(	ldr	r10, [saved_pc, #-4]	)	@ get SWI instruction
252
#endif
253
 ARM_BE8(rev	r10, r10)			@ little endian instruction
254
255
256
257
258
259

#elif defined(CONFIG_AEABI)

	/*
	 * Pure EABI user space always put syscall number into scno (r7).
	 */
260
#elif defined(CONFIG_ARM_THUMB)
261
	/* Legacy ABI only, possibly thumb mode. */
262
	tst	saved_psr, #PSR_T_BIT		@ this is SPSR from save_user_regs
263
	addne	scno, r7, #__NR_SYSCALL_BASE	@ put OS number in
264
 USER(	ldreq	scno, [saved_pc, #-4]	)
265

266
#else
267
	/* Legacy ABI only. */
268
 USER(	ldr	scno, [saved_pc, #-4]	)	@ get SWI instruction
269
#endif
Linus Torvalds's avatar
Linus Torvalds committed
270

271
272
	/* saved_psr and saved_pc are now dead */

273
274
	uaccess_disable tbl

275
276
277
278
279
280
281
282
283
284
285
286
287
	adr	tbl, sys_call_table		@ load syscall table pointer

#if defined(CONFIG_OABI_COMPAT)
	/*
	 * If the swi argument is zero, this is an EABI call and we do nothing.
	 *
	 * If this is an old ABI call, get the syscall number into scno and
	 * get the old ABI syscall table address.
	 */
	bics	r10, r10, #0xff000000
	eorne	scno, r10, #__NR_OABI_SYSCALL_BASE
	ldrne	tbl, =sys_oabi_call_table
#elif !defined(CONFIG_AEABI)
Linus Torvalds's avatar
Linus Torvalds committed
288
	bic	scno, scno, #0xff000000		@ mask off SWI op-code
289
	eor	scno, scno, #__NR_SYSCALL_BASE	@ check OS number
290
#endif
291
	get_thread_info tsk
292
293
294
295
296
	/*
	 * Reload the registers that may have been corrupted on entry to
	 * the syscall assembly (by tracing or context tracking.)
	 */
 TRACE(	ldmia	sp, {r0 - r3}		)
297

298
local_restart:
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
#ifdef CONFIG_IPIPE
	ldr	r10, [tsk, #TI_IPIPE]
	ldr	r0, =(__ARM_NR_ipipe - __NR_SYSCALL_BASE)
	cmp	scno, r0
	bne	slow_path
	tst	r10, #_TIP_HEAD
	beq	slow_path
	mov	r0, sp
	ipipe_oabi_save_sysnr r10		@ caution: affects sp
	bl	ipipe_fastcall_hook		@ __IPIPE_SYSCALL_E is assumed
	ipipe_oabi_restore_sysnr r10
	cmp	r0, #0
	blt	no_fastcall
	get_thread_info tsk
	ldr	r10, [tsk, #TI_IPIPE]
	tst	r10, #_TIP_HEAD
	bne	fastcall_exit_check		@ check for MAYDAY
	bl	__ipipe_root_sync
	b	ret_slow_syscall
fastcall_exit_check:
	tst	r10, #_TIP_MAYDAY
	beq	__ipipe_ret_to_user
	mov	r0, sp
	bl	__ipipe_call_mayday
	b	__ipipe_ret_to_user
no_fastcall:
	get_thread_info tsk
	ldr	r0, =(__ARM_NR_ipipe - __NR_SYSCALL_BASE)
	ldr	r10, [tsk, #TI_IPIPE]
slow_path:
	tst	r10, #_TIP_NOTIFY
	bne	pipeline_syscall
	cmp	scno, r0
	bne	root_syscall
pipeline_syscall:
	mov	r0, sp
	ipipe_oabi_save_sysnr r10		@ caution: affects sp
	bl	__ipipe_notify_syscall
	ipipe_oabi_restore_sysnr r10
	get_thread_info tsk
	ldr	r10, [tsk, #TI_IPIPE]
	tst	r10, #_TIP_HEAD
	bne	__ipipe_ret_to_user
	cmp	r0, #0
	bgt	ret_slow_syscall
root_syscall:
	ldmia	sp, { r0 - r3 }
#endif /* CONFIG_IPIPE */

Nicolas Pitre's avatar
Nicolas Pitre committed
348
	ldr	r10, [tsk, #TI_FLAGS]		@ check for syscall tracing
349
	stmdb	sp!, {r4, r5}			@ push fifth and sixth args
Nicolas Pitre's avatar
Nicolas Pitre committed
350

351
	tst	r10, #_TIF_SYSCALL_WORK		@ are we tracing syscalls?
Linus Torvalds's avatar
Linus Torvalds committed
352
353
	bne	__sys_trace

354
	invoke_syscall tbl, scno, r10, __ret_fast_syscall
Linus Torvalds's avatar
Linus Torvalds committed
355
356

	add	r1, sp, #S_OFF
357
2:	cmp	scno, #(__ARM_NR_BASE - __NR_SYSCALL_BASE)
358
	eor	r0, scno, #__NR_SYSCALL_BASE	@ put OS number back
359
	bcs	arm_syscall
360
	mov	why, #0				@ no longer a real syscall
Linus Torvalds's avatar
Linus Torvalds committed
361
	b	sys_ni_syscall			@ not private func
362
363
364
365
366
367
368
369
370
371
372

#if defined(CONFIG_OABI_COMPAT) || !defined(CONFIG_AEABI)
	/*
	 * We failed to handle a fault trying to access the page
	 * containing the swi instruction, but we're not really in a
	 * position to return -EFAULT. Instead, return back to the
	 * instruction and re-enter the user fault handling path trying
	 * to page it in. This will likely result in sending SEGV to the
	 * current task.
	 */
9001:
373
	sub	lr, saved_pc, #4
374
	str	lr, [sp, #S_PC]
375
	get_thread_info tsk
376
377
	b	ret_fast_syscall
#endif
378
ENDPROC(vector_swi)
Linus Torvalds's avatar
Linus Torvalds committed
379
380
381
382
383
384

	/*
	 * This is the really slow path.  We're going to be doing
	 * context switches, and waiting for our parent to respond.
	 */
__sys_trace:
385
386
387
	mov	r1, scno
	add	r0, sp, #S_OFF
	bl	syscall_trace_enter
388
389
	mov	scno, r0
	invoke_syscall tbl, scno, r10, __sys_trace_return, reload=1
390
391
392
393
	cmp	scno, #-1			@ skip the syscall?
	bne	2b
	add	sp, sp, #S_OFF			@ restore stack
	b	ret_slow_syscall
Linus Torvalds's avatar
Linus Torvalds committed
394
395
396

__sys_trace_return:
	str	r0, [sp, #S_R0 + S_OFF]!	@ save returned r0
397
398
	mov	r0, sp
	bl	syscall_trace_exit
Linus Torvalds's avatar
Linus Torvalds committed
399
400
	b	ret_slow_syscall

Russell King's avatar
Russell King committed
401
__sys_trace_return_nosave:
402
	enable_irq_notrace
Russell King's avatar
Russell King committed
403
404
405
406
	mov	r0, sp
	bl	syscall_trace_exit
	b	ret_slow_syscall

Linus Torvalds's avatar
Linus Torvalds committed
407
408
409
410
411
	.align	5
#ifdef CONFIG_ALIGNMENT_TRAP
	.type	__cr_alignment, #object
__cr_alignment:
	.word	cr_alignment
412
413
414
#endif
	.ltorg

415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
	.macro	syscall_table_start, sym
	.equ	__sys_nr, 0
	.type	\sym, #object
ENTRY(\sym)
	.endm

	.macro	syscall, nr, func
	.ifgt	__sys_nr - \nr
	.error	"Duplicated/unorded system call entry"
	.endif
	.rept	\nr - __sys_nr
	.long	sys_ni_syscall
	.endr
	.long	\func
	.equ	__sys_nr, \nr + 1
	.endm

	.macro	syscall_table_end, sym
	.ifgt	__sys_nr - __NR_syscalls
	.error	"System call table too big"
	.endif
	.rept	__NR_syscalls - __sys_nr
	.long	sys_ni_syscall
	.endr
	.size	\sym, . - \sym
	.endm

#define NATIVE(nr, func) syscall nr, func

444
445
446
447
/*
 * This is the syscall table declaration for native ABI syscalls.
 * With EABI a couple syscalls are obsolete and defined as sys_ni_syscall.
 */
448
449
	syscall_table_start sys_call_table
#define COMPAT(nr, native, compat) syscall nr, native
450
#ifdef CONFIG_AEABI
451
#include <calls-eabi.S>
452
#else
453
#include <calls-oabi.S>
Linus Torvalds's avatar
Linus Torvalds committed
454
#endif
455
456
#undef COMPAT
	syscall_table_end sys_call_table
Linus Torvalds's avatar
Linus Torvalds committed
457
458
459
460
461

/*============================================================================
 * Special system call wrappers
 */
@ r0 = syscall number
462
@ r8 = syscall table
Linus Torvalds's avatar
Linus Torvalds committed
463
sys_syscall:
464
		bic	scno, r0, #__NR_OABI_SYSCALL_BASE
Linus Torvalds's avatar
Linus Torvalds committed
465
466
		cmp	scno, #__NR_syscall - __NR_SYSCALL_BASE
		cmpne	scno, #NR_syscalls	@ check range
467
468
469
470
#ifdef CONFIG_CPU_SPECTRE
		movhs	scno, #0
		csdb
#endif
Linus Torvalds's avatar
Linus Torvalds committed
471
472
473
474
475
476
477
		stmloia	sp, {r5, r6}		@ shuffle args
		movlo	r0, r1
		movlo	r1, r2
		movlo	r2, r3
		movlo	r3, r4
		ldrlo	pc, [tbl, scno, lsl #2]
		b	sys_ni_syscall
478
ENDPROC(sys_syscall)
Linus Torvalds's avatar
Linus Torvalds committed
479
480
481

sys_sigreturn_wrapper:
		add	r0, sp, #S_OFF
Al Viro's avatar
Al Viro committed
482
		mov	why, #0		@ prevent syscall restart handling
Linus Torvalds's avatar
Linus Torvalds committed
483
		b	sys_sigreturn
484
ENDPROC(sys_sigreturn_wrapper)
Linus Torvalds's avatar
Linus Torvalds committed
485
486
487

sys_rt_sigreturn_wrapper:
		add	r0, sp, #S_OFF
Al Viro's avatar
Al Viro committed
488
		mov	why, #0		@ prevent syscall restart handling
Linus Torvalds's avatar
Linus Torvalds committed
489
		b	sys_rt_sigreturn
490
ENDPROC(sys_rt_sigreturn_wrapper)
Linus Torvalds's avatar
Linus Torvalds committed
491

492
493
494
495
sys_statfs64_wrapper:
		teq	r1, #88
		moveq	r1, #84
		b	sys_statfs64
496
ENDPROC(sys_statfs64_wrapper)
497
498
499
500
501

sys_fstatfs64_wrapper:
		teq	r1, #88
		moveq	r1, #84
		b	sys_fstatfs64
502
ENDPROC(sys_fstatfs64_wrapper)
503

Linus Torvalds's avatar
Linus Torvalds committed
504
505
506
507
508
509
/*
 * Note: off_4k (r5) is always units of 4K.  If we can't do the requested
 * offset, we return EINVAL.
 */
sys_mmap2:
		str	r5, [sp, #4]
Al Viro's avatar
Al Viro committed
510
		b	sys_mmap_pgoff
511
ENDPROC(sys_mmap2)
512
513

#ifdef CONFIG_OABI_COMPAT
514

515
516
517
518
519
520
521
/*
 * These are syscalls with argument register differences
 */

sys_oabi_pread64:
		stmia	sp, {r3, r4}
		b	sys_pread64
522
ENDPROC(sys_oabi_pread64)
523
524
525
526

sys_oabi_pwrite64:
		stmia	sp, {r3, r4}
		b	sys_pwrite64
527
ENDPROC(sys_oabi_pwrite64)
528
529
530
531
532

sys_oabi_truncate64:
		mov	r3, r2
		mov	r2, r1
		b	sys_truncate64
533
ENDPROC(sys_oabi_truncate64)
534
535
536
537
538

sys_oabi_ftruncate64:
		mov	r3, r2
		mov	r2, r1
		b	sys_ftruncate64
539
ENDPROC(sys_oabi_ftruncate64)
540
541
542
543
544
545

sys_oabi_readahead:
		str	r3, [sp]
		mov	r3, r2
		mov	r2, r1
		b	sys_readahead
546
ENDPROC(sys_oabi_readahead)
547

548
549
550
551
/*
 * Let's declare a second syscall table for old ABI binaries
 * using the compatibility syscall entries.
 */
552
553
554
555
	syscall_table_start sys_oabi_call_table
#define COMPAT(nr, native, compat) syscall nr, compat
#include <calls-oabi.S>
	syscall_table_end sys_oabi_call_table
556

557
558
#endif

559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
#if defined(CONFIG_FRAME_POINTER) && (CONFIG_IPIPE_TRACE)

	.text
	.align 0
	.type arm_return_addr %function
	.global arm_return_addr

arm_return_addr:
	mov	ip, r0
	mov	r0, fp
3:
	cmp	r0, #0
	beq	1f		@ frame list hit end, bail
	cmp	ip, #0
	beq	2f		@ reached desired frame
	ldr	r0, [r0, #-12]  @ else continue, get next fp
	sub	ip, ip, #1
	b	3b
2:
	ldr	r0, [r0, #-4]   @ get target return address
1:
	mov	pc, lr

#endif