diff options
Diffstat (limited to 'src')
| -rw-r--r-- | src/internal/powerpc/syscall.s | 18 | ||||
| -rw-r--r-- | src/ldso/powerpc/dlsym.s | 8 | ||||
| -rw-r--r-- | src/ldso/powerpc/start.s | 23 | ||||
| -rw-r--r-- | src/setjmp/powerpc/longjmp.s | 47 | ||||
| -rw-r--r-- | src/setjmp/powerpc/setjmp.s | 40 | ||||
| -rw-r--r-- | src/signal/powerpc/restore.s | 11 | ||||
| -rw-r--r-- | src/signal/powerpc/sigsetjmp.s | 34 | ||||
| -rw-r--r-- | src/thread/powerpc/__set_thread_area.s | 11 | ||||
| -rw-r--r-- | src/thread/powerpc/__unmapself.s | 9 | ||||
| -rw-r--r-- | src/thread/powerpc/clone.s | 83 | ||||
| -rw-r--r-- | src/thread/powerpc/syscall_cp.s | 51 | 
11 files changed, 335 insertions, 0 deletions
diff --git a/src/internal/powerpc/syscall.s b/src/internal/powerpc/syscall.s new file mode 100644 index 00000000..bca620db --- /dev/null +++ b/src/internal/powerpc/syscall.s @@ -0,0 +1,18 @@ +	.global __syscall +	.type   __syscall,@function +__syscall: +	mr      0, 3                  # Save the system call number +	mr      3, 4                  # Shift the arguments: arg1 +	mr      4, 5                  # arg2 +	mr      5, 6                  # arg3 +	mr      6, 7                  # arg4 +	mr      7, 8                  # arg5 +	mr      8, 9                  # arg6 +	sc +	bnslr+ # return if not summary overflow +	#else error: +	# return negated value. +	neg 3, 3 +	blr +	.end    __syscall +	.size   __syscall, .-__syscall diff --git a/src/ldso/powerpc/dlsym.s b/src/ldso/powerpc/dlsym.s new file mode 100644 index 00000000..20796176 --- /dev/null +++ b/src/ldso/powerpc/dlsym.s @@ -0,0 +1,8 @@ +        .text +        .global dlsym +        .type   dlsym,@function +dlsym: +        mflr    5                      # The return address is arg3. +        b       __dlsym +        .end    dlsym +        .size   dlsym, .-dlsym diff --git a/src/ldso/powerpc/start.s b/src/ldso/powerpc/start.s new file mode 100644 index 00000000..d2060e3d --- /dev/null +++ b/src/ldso/powerpc/start.s @@ -0,0 +1,23 @@ +# FIXME : does not work, the small data array needs to be relocated. +# see elfspec_ppc.pdf, page 76-84 +        .global _start +        .type   _start,@function +_start: +        mr      9, 1                  # Save the original stack pointer. +        clrrwi  1, 1, 4               # Align the stack to 16 bytes. +        lis     13, _SDA_BASE_@ha      # r13 points to the small data area. +        addi    13, 13, _SDA_BASE_@l +        li      0, 0                   # Zero the frame pointer. +        lwz     3, 0(9)               # and argc... +        addi    4, 9, 4               # and argv ... +        mtlr    0                      # Clear the link register. +        # Go to the musl dynamic linker entry point. +        bl      __dynlink +        cmpi    4, 0, 3, 1            # Check for a 1. +        bne     4, .                   # Stay here +        mtlr    3                      # Set the link address... +        li      3, 0 +        blr                             # and go. +        .end    _start +        .size   _start, .-_start + diff --git a/src/setjmp/powerpc/longjmp.s b/src/setjmp/powerpc/longjmp.s new file mode 100644 index 00000000..e3740901 --- /dev/null +++ b/src/setjmp/powerpc/longjmp.s @@ -0,0 +1,47 @@ +        .global _longjmp +        .global longjmp +        .type   _longjmp,@function +        .type   longjmp,@function +_longjmp: +longjmp: +# void longjmp(jmp_buf env, int val); +# put val into return register and restore the env saved in setjmp +# if val(r4) is 0, put 1 there. +	# 0) move old return address into r0 +	lwz 0, 0(3) +	# 1) put it into link reg +	mtlr 0 +	#2 ) restore stack ptr +	lwz 1, 4(3) +	#3) restore control reg +	lwz 0, 8(3) +	mtcr 0 +	#4) restore r14-r31 +	lwz 14, 12(3) +	lwz 15, 16(3) +	lwz 16, 20(3) +	lwz 17, 24(3) +	lwz 18, 28(3) +	lwz 19, 32(3) +	lwz 20, 36(3) +	lwz 21, 40(3) +	lwz 22, 44(3) +	lwz 23, 48(3) +	lwz 24, 52(3) +	lwz 25, 56(3) +	lwz 26, 60(3) +	lwz 27, 64(3) +	lwz 28, 68(3) +	lwz 29, 72(3) +	lwz 30, 76(3) +	lwz 31, 80(3) +	#5) put val into return reg r3 +	mr 3, 4 + +	#6) check if return value is 0, make it 1 in that case +	cmpwi cr7, 4, 0 +	bne cr7, 1f +	li 3, 1 +1: +	blr + diff --git a/src/setjmp/powerpc/setjmp.s b/src/setjmp/powerpc/setjmp.s new file mode 100644 index 00000000..27c975e4 --- /dev/null +++ b/src/setjmp/powerpc/setjmp.s @@ -0,0 +1,40 @@ +        .global __setjmp +        .global _setjmp +        .global setjmp +        .type   __setjmp,@function +        .type   _setjmp,@function +        .type   setjmp,@function +__setjmp: +_setjmp: +setjmp: +	# 0) store IP int 0, then into the jmpbuf pointed to by r3 (first arg) +	mflr 0 +	stw 0, 0(3) +	# 1) store reg1 (SP) +	stw 1, 4(3) +	# 2) store cr +	mfcr 0 +	stw 0, 8(3) +	# 3) store r14-31 +	stw 14, 12(3) +	stw 15, 16(3) +	stw 16, 20(3) +	stw 17, 24(3) +	stw 18, 28(3) +	stw 19, 32(3) +	stw 20, 36(3) +	stw 21, 40(3) +	stw 22, 44(3) +	stw 23, 48(3) +	stw 24, 52(3) +	stw 25, 56(3) +	stw 26, 60(3) +	stw 27, 64(3) +	stw 28, 68(3) +	stw 29, 72(3) +	stw 30, 76(3) +	stw 31, 80(3) +	# 4) set return value to 0 +	li 3, 0 +	# 5) return +	blr diff --git a/src/signal/powerpc/restore.s b/src/signal/powerpc/restore.s new file mode 100644 index 00000000..fd7bcba5 --- /dev/null +++ b/src/signal/powerpc/restore.s @@ -0,0 +1,11 @@ +        .global __restore +        .type __restore,%function +__restore: +        li      0, 119 #__NR_sigreturn +        sc + +        .global __restore_rt +        .type __restore_rt,%function +__restore_rt: +        li      0, 172 # __NR_rt_sigreturn +        sc diff --git a/src/signal/powerpc/sigsetjmp.s b/src/signal/powerpc/sigsetjmp.s new file mode 100644 index 00000000..0b79dcce --- /dev/null +++ b/src/signal/powerpc/sigsetjmp.s @@ -0,0 +1,34 @@ +        .global sigsetjmp +        .type sigsetjmp,%function +sigsetjmp: +	#int sigsetjmp(sigjmp_buf buf, int save) +	#		r3		r4 +	#0) store save into buf->__fl +	stw 4, 256(3) +	#1) compare save with 0 +	cmpwi cr7, 4, 0 +	#2) if its 0, goto setjmp code +	beq- cr7, 1f +	#3) else: we must call pthread_sigmask(SIG_SETMASK, 0, (sigset_t *)buf->__ss); +	# thus store r3 on the stack, to restore it later +	stw 3, -4(1) +	# store old link reg +	mflr 0 +	stw 0, -8(1) +	# increase stack frame by 16 +	subi 1, 1, 16 +	# put pointer to ss buf into r5 (3rd arg) +	addi 5, 3, 260 +	# put "2" i.e. SIG_SETMASK in r3 +	li 3, 2 +	li 4, 0 +	bl pthread_sigmask +	#restore sp +	addi 1, 1, 16 +	#restore r3 +	lwz 3, -4(1) +	#restore link reg +	lwz 0, -8(1) +	mtlr 0 +1: +	b setjmp diff --git a/src/thread/powerpc/__set_thread_area.s b/src/thread/powerpc/__set_thread_area.s new file mode 100644 index 00000000..c1a34c1f --- /dev/null +++ b/src/thread/powerpc/__set_thread_area.s @@ -0,0 +1,11 @@ +.text +.global __set_thread_area +.type   __set_thread_area, %function +__set_thread_area: +	# mov pointer in reg3 into r2 +	mr 2, 3 +	# put 0 into return reg +	li 3, 0 +	# return +	blr + diff --git a/src/thread/powerpc/__unmapself.s b/src/thread/powerpc/__unmapself.s new file mode 100644 index 00000000..bb3724e3 --- /dev/null +++ b/src/thread/powerpc/__unmapself.s @@ -0,0 +1,9 @@ +        .text +        .global __unmapself +        .type   __unmapself,%function +__unmapself: +        li      0, 91 # __NR_munmap +        sc +        li      0, 1 #__NR_exit +        sc +        blr diff --git a/src/thread/powerpc/clone.s b/src/thread/powerpc/clone.s new file mode 100644 index 00000000..cea69e99 --- /dev/null +++ b/src/thread/powerpc/clone.s @@ -0,0 +1,83 @@ +.text +.global __clone +.type __clone, %function +__clone: +# int clone(fn, stack, flags, arg, ptid, tls, ctid) +#            a  b       c     d     e    f    g +#            3  4       5     6     7    8    9 +# pseudo C code: +# tid = syscall(SYS_clone,c,b,e,f,g); +# if (!tid) syscall(SYS_exit, a(d)); +# return tid; + +# SYS_clone = 120 +# SYS_exit = 1 + +# in order that the child can find the start func and its arg, we need to store it into +# non-volative regs. to do so, we have to store those 2 regs into our stackframe, so +# we can restore them later. +stw 30, -4(1) +stw 31, -8(1) +subi 1, 1, 16  + +# save r3 (func) into r30, and r6(arg) into r31 +mr 30, 3 +mr 31, 6 + +#move c into first arg +mr 3, 5 +#mr 4, 4 +mr 5, 7 +mr 6, 8 +mr 7, 9 + +# move syscall number into r0     +li 0, 120 + +sc + +# check for syscall error +#this code should be more efficient, but it borks +#bns+ 1f # jump to label 1 if no summary overflow. +#else +#neg 3, 3 #negate the result (errno) +#b 2f # jump to epilogue + +# this error check code at least does not spoil the clone call. +#mfcr    0                      # Check for an error +#rlwinm  4, 0, 0, 3, 3        # by checking for bit 28. +#cmplwi  0, 4, 0               # It is an error if non-zero. +#beq     0, 1f                  # Jump if not an error. +#neg     3, 3                  # Negate the error number. +#b       2f # jump to epilogue +1: +# compare sc result with 0 +cmpwi cr7, 3, 0 + +# if not 0, jump to end +bne cr7, 2f + +#else: we're the child +#call funcptr +# move arg (d) into r3 +mr 3, 31 +#move r30 (funcptr) into CTR reg +mtctr 30 +# call CTR reg +bctrl +# mov SYS_exit into r0 (the exit param is already in r3) +li 0, 1 +sc + +2: + +# restore stack +addi 1, 1, 16 +lwz 30, -4(1) +lwz 31, -8(1) + +blr + + + + diff --git a/src/thread/powerpc/syscall_cp.s b/src/thread/powerpc/syscall_cp.s new file mode 100644 index 00000000..2c97ca04 --- /dev/null +++ b/src/thread/powerpc/syscall_cp.s @@ -0,0 +1,51 @@ +#r0: volatile. may be modified during linkage. +#r1: stack frame: 16 byte alignment. +#r2: tls/thread pointer on pp32 +#r3,r4: return values, first args +#r5-r10: args +#r11-r12: volatile. may be modified during linkage +#r13: "small data area" pointer +#r14 - r30: local vars +#r31: local or environment pointer + +#r1, r14-31: belong to the caller, must be saved and restored +#r0, r3-r12, ctr, xer: volatile, not preserved +#r0,r11,r12: may be altered by cross-module call,  +#"a func cannot depend on that these regs have the values placed by the caller" + +#the fields CR2,CR2,CR4 of the cond reg must be preserved +#LR (link reg) shall contain the funcs return address +	.text +	.global __syscall_cp_asm +	.type   __syscall_cp_asm,%function +__syscall_cp_asm: +	# at enter: r3 = pointer to self->cancel, r4: syscall no, r5: first arg, r6: 2nd, r7: 3rd, r8: 4th, r9: 5th, r10: 6th +	.global __cp_begin +__cp_begin: +	# r3 holds first argument, its a pointer to self->cancel.  +	# we must compare the dereferenced value with 0 and jump to __cancel if its not +	 +	lwz 0, 0(3) #deref pointer into r0 +	 +	cmpwi cr7, 0, 0 #compare r0 with 0, store result in cr7.  +	beq+ cr7, 1f #jump to label 1 if r0 was 0 +	 +	b __cancel #else call cancel  +	# (the return address is not needed, since __cancel never returns) +1: +	#ok, the cancel flag was not set +	# syscall: number goes to r0, the rest 3-8 +	mr      0, 4                  # put the system call number into r0 +	mr      3, 5                  # Shift the arguments: arg1 +	mr      4, 6                  # arg2 +	mr      5, 7                  # arg3 +	mr      6, 8                  # arg4 +	mr      7, 9                  # arg5 +	mr      8, 10                  # arg6 +	sc +	.global __cp_end +__cp_end: +	bnslr+ # return if no summary overflow.  +	#else negate result. +	neg 3, 3 +	blr  | 
