udivsi3.S revision 1.7.2.2 1 1.7.2.2 tron /* $NetBSD: udivsi3.S,v 1.7.2.2 2006/05/24 15:50:42 tron Exp $ */
2 1.7.2.2 tron
3 1.7.2.2 tron /*-
4 1.7.2.2 tron * Copyright (c) 1990 The Regents of the University of California.
5 1.7.2.2 tron * All rights reserved.
6 1.7.2.2 tron *
7 1.7.2.2 tron * This code is derived from software contributed to Berkeley by
8 1.7.2.2 tron * William Jolitz.
9 1.7.2.2 tron *
10 1.7.2.2 tron * Redistribution and use in source and binary forms, with or without
11 1.7.2.2 tron * modification, are permitted provided that the following conditions
12 1.7.2.2 tron * are met:
13 1.7.2.2 tron * 1. Redistributions of source code must retain the above copyright
14 1.7.2.2 tron * notice, this list of conditions and the following disclaimer.
15 1.7.2.2 tron * 2. Redistributions in binary form must reproduce the above copyright
16 1.7.2.2 tron * notice, this list of conditions and the following disclaimer in the
17 1.7.2.2 tron * documentation and/or other materials provided with the distribution.
18 1.7.2.2 tron * 3. Neither the name of the University nor the names of its contributors
19 1.7.2.2 tron * may be used to endorse or promote products derived from this software
20 1.7.2.2 tron * without specific prior written permission.
21 1.7.2.2 tron *
22 1.7.2.2 tron * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23 1.7.2.2 tron * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 1.7.2.2 tron * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 1.7.2.2 tron * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26 1.7.2.2 tron * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 1.7.2.2 tron * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 1.7.2.2 tron * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 1.7.2.2 tron * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 1.7.2.2 tron * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 1.7.2.2 tron * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 1.7.2.2 tron * SUCH DAMAGE.
33 1.7.2.2 tron *
34 1.7.2.2 tron * from: @(#)udivsi3.s 5.1 (Berkeley) 5/15/90
35 1.7.2.2 tron */
36 1.7.2.2 tron
37 1.7.2.2 tron #include <machine/asm.h>
38 1.7.2.2 tron #if defined(LIBC_SCCS)
39 1.7.2.2 tron RCSID("$NetBSD: udivsi3.S,v 1.7.2.2 2006/05/24 15:50:42 tron Exp $")
40 1.7.2.2 tron #endif
41 1.7.2.2 tron
42 1.7.2.2 tron /*
43 1.7.2.2 tron * IMPOTANT: This function is special.
44 1.7.2.2 tron *
45 1.7.2.2 tron * This function is an auxiliary function that is referenced by the
46 1.7.2.2 tron * code generated by gcc for integer division. But gcc does NOT treat
47 1.7.2.2 tron * a call to this function as an ordinary function call w.r.t. the set
48 1.7.2.2 tron * of register this call clobbers. See the definition of "udivsi3_i1"
49 1.7.2.2 tron * in gcc/config/sh/sh.md.
50 1.7.2.2 tron *
51 1.7.2.2 tron * Any call to this function MUST NOT clobber any registers besides r4
52 1.7.2.2 tron * and r0, where the result is returned. At the time of the call the
53 1.7.2.2 tron * r4 contains the first argument, so we are only left with r0, and we
54 1.7.2.2 tron * cannot do anything meaningful using only one register. The
55 1.7.2.2 tron * consequences are:
56 1.7.2.2 tron *
57 1.7.2.2 tron * . this function cannot have _PROF_PROLOGUE
58 1.7.2.2 tron * . this function cannot be called via PLT
59 1.7.2.2 tron */
60 1.7.2.2 tron
61 1.7.2.2 tron
62 1.7.2.2 tron /* r0 <= r4 / r5 */
63 1.7.2.2 tron NENTRY(__udivsi3)
64 1.7.2.2 tron tst r5, r5
65 1.7.2.2 tron bt div_by_zero
66 1.7.2.2 tron
67 1.7.2.2 tron mov #0, r0
68 1.7.2.2 tron div0u
69 1.7.2.2 tron #define DIVSTEP rotcl r4; div1 r5, r0
70 1.7.2.2 tron /* repeat 32 times */
71 1.7.2.2 tron DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP;
72 1.7.2.2 tron DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP;
73 1.7.2.2 tron DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP;
74 1.7.2.2 tron DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP; DIVSTEP;
75 1.7.2.2 tron #undef DIVSTEP
76 1.7.2.2 tron rotcl r4
77 1.7.2.2 tron
78 1.7.2.2 tron rts
79 1.7.2.2 tron mov r4, r0
80 1.7.2.2 tron
81 1.7.2.2 tron div_by_zero:
82 1.7.2.2 tron #ifdef _KERNEL
83 1.7.2.2 tron rts
84 1.7.2.2 tron mov #0, r0
85 1.7.2.2 tron #else
86 1.7.2.2 tron mov.l r14, @-r15
87 1.7.2.2 tron sts.l pr, @-r15
88 1.7.2.2 tron mov r15, r14
89 1.7.2.2 tron
90 1.7.2.2 tron mov.l L_raise, r1
91 1.7.2.2 tron #ifdef PIC
92 1.7.2.2 tron 1: bsrf r1
93 1.7.2.2 tron #else
94 1.7.2.2 tron jsr @r1
95 1.7.2.2 tron #endif
96 1.7.2.2 tron mov #8, r4 /* delay slot. 8 <- SIGFPE. */
97 1.7.2.2 tron mov #0, r0
98 1.7.2.2 tron
99 1.7.2.2 tron lds.l @r15+, pr
100 1.7.2.2 tron rts
101 1.7.2.2 tron mov.l @r15+, r14
102 1.7.2.2 tron
103 1.7.2.2 tron .align 2
104 1.7.2.2 tron L_raise:
105 1.7.2.2 tron #ifdef PIC
106 1.7.2.2 tron .long _C_LABEL(raise)-(1b+4)
107 1.7.2.2 tron #else
108 1.7.2.2 tron .long _C_LABEL(raise)
109 1.7.2.2 tron #endif
110 1.7.2.2 tron #endif
111