summaryrefslogtreecommitdiffstats
path: root/arch/h8300/lib/modsi3.S
blob: bdc8a002921df129a5ff9a584b87a96035cb483d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
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
70
71
72
73
/* SPDX-License-Identifier: GPL-2.0 */
#include "libgcc.h"

; numerator in A0/A1
; denominator in A2/A3
	.global	__modsi3
__modsi3:
	PUSHP	S2P
	bsr	modnorm
	bsr	__divsi3
	mov.l	er3,er0
	bra	exitdiv

	.global	__umodsi3
__umodsi3:
	bsr	__udivsi3
	mov.l	er3,er0
	rts

	.global	__divsi3
__divsi3:
	PUSHP	S2P
	jsr	divnorm
	bsr	__udivsi3

	; examine what the sign should be
exitdiv:
	btst	#3,S2L
	beq	reti

	; should be -ve
	neg.l	A0P

reti:
	POPP	S2P
	rts

divnorm:
	mov.l	A0P,A0P		; is the numerator -ve
	stc	ccr,S2L		; keep the sign in bit 3 of S2L
	bge	postive

	neg.l	A0P		; negate arg

postive:
	mov.l	A1P,A1P		; is the denominator -ve
	bge	postive2

	neg.l	A1P		; negate arg
	xor.b	#0x08,S2L	; toggle the result sign

postive2:
	rts

;; Basically the same, except that the sign of the divisor determines
;; the sign.
modnorm:
	mov.l	A0P,A0P		; is the numerator -ve
	stc	ccr,S2L		; keep the sign in bit 3 of S2L
	bge	mpostive

	neg.l	A0P		; negate arg

mpostive:
	mov.l	A1P,A1P		; is the denominator -ve
	bge	mpostive2

	neg.l	A1P		; negate arg

mpostive2:
	rts

	.end