sdivsi3.S revision 1.4 1 1.4 agc /* $NetBSD: sdivsi3.S,v 1.4 2003/08/07 16:32:19 agc Exp $ */
2 1.1 itojun
3 1.1 itojun /*-
4 1.1 itojun * Copyright (c) 1990 The Regents of the University of California.
5 1.1 itojun * All rights reserved.
6 1.1 itojun *
7 1.1 itojun * This code is derived from software contributed to Berkeley by
8 1.1 itojun * William Jolitz.
9 1.1 itojun *
10 1.1 itojun * Redistribution and use in source and binary forms, with or without
11 1.1 itojun * modification, are permitted provided that the following conditions
12 1.1 itojun * are met:
13 1.1 itojun * 1. Redistributions of source code must retain the above copyright
14 1.1 itojun * notice, this list of conditions and the following disclaimer.
15 1.1 itojun * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 itojun * notice, this list of conditions and the following disclaimer in the
17 1.1 itojun * documentation and/or other materials provided with the distribution.
18 1.4 agc * 3. Neither the name of the University nor the names of its contributors
19 1.1 itojun * may be used to endorse or promote products derived from this software
20 1.1 itojun * without specific prior written permission.
21 1.1 itojun *
22 1.1 itojun * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23 1.1 itojun * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 1.1 itojun * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 1.1 itojun * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26 1.1 itojun * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 1.1 itojun * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 1.1 itojun * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 1.1 itojun * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 1.1 itojun * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 1.1 itojun * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 1.1 itojun * SUCH DAMAGE.
33 1.1 itojun *
34 1.1 itojun * from: @(#)udivsi3.s 5.1 (Berkeley) 5/15/90
35 1.1 itojun */
36 1.1 itojun
37 1.1 itojun #include <machine/asm.h>
38 1.1 itojun #if defined(LIBC_SCCS)
39 1.4 agc RCSID("$NetBSD: sdivsi3.S,v 1.4 2003/08/07 16:32:19 agc Exp $")
40 1.1 itojun #endif
41 1.1 itojun
42 1.1 itojun /* r0 <= r4 / r5 */
43 1.1 itojun ENTRY(__sdivsi3)
44 1.2 msaitoh mov r4, r0
45 1.2 msaitoh mov r5, r1
46 1.2 msaitoh
47 1.2 msaitoh tst r1, r1
48 1.1 itojun bt div_by_zero
49 1.1 itojun
50 1.1 itojun mov #0, r2
51 1.2 msaitoh div0s r2, r0
52 1.1 itojun subc r3, r3
53 1.2 msaitoh subc r2, r0
54 1.2 msaitoh div0s r1, r3
55 1.2 msaitoh #define DIVSTEP rotcl r0; div1 r1, r3
56 1.1 itojun /* repeat 32 times */
57 1.1 itojun DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP;
58 1.1 itojun DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP;
59 1.1 itojun DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP;
60 1.1 itojun DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP;
61 1.1 itojun #undef DIVSTEP
62 1.2 msaitoh rotcl r0
63 1.1 itojun
64 1.1 itojun rts
65 1.2 msaitoh addc r2, r0 /* delay slot */
66 1.1 itojun
67 1.1 itojun div_by_zero:
68 1.3 msaitoh #if defined(_KERNEL) || defined(_STANDALONE)
69 1.1 itojun rts
70 1.1 itojun mov #0, r0 /* delay slot */
71 1.1 itojun #else
72 1.1 itojun mov.l r14, @-r15
73 1.1 itojun sts.l pr, @-r15
74 1.1 itojun mov r15, r14
75 1.1 itojun
76 1.1 itojun mov.l L_raise, r1
77 1.1 itojun jsr @r1
78 1.1 itojun mov #8, r4 /* delay slot */
79 1.1 itojun mov #0, r0
80 1.1 itojun
81 1.1 itojun lds.l @r15+, pr
82 1.1 itojun rts
83 1.1 itojun mov.l @r15+, r14 /* delay slot */
84 1.1 itojun
85 1.1 itojun .align 2
86 1.1 itojun L_raise:
87 1.1 itojun .long _raise
88 1.1 itojun #endif
89