GNU Linux-libre 4.9.296-gnu1
[releases.git] / arch / sparc / lib / divdi3.S
1 /* Copyright (C) 1989, 1992, 1993, 1994, 1995 Free Software Foundation, Inc.
2
3 This file is part of GNU CC.
4
5 GNU CC is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 2, or (at your option)
8 any later version.
9
10 GNU CC is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13 GNU General Public License for more details.
14
15 You should have received a copy of the GNU General Public License
16 along with GNU CC; see the file COPYING.  If not, write to
17 the Free Software Foundation, 59 Temple Place - Suite 330,
18 Boston, MA 02111-1307, USA.  */
19
20 #include <asm/export.h>
21         .text
22         .align 4
23         .globl __divdi3
24 __divdi3:
25         save %sp,-104,%sp
26         cmp %i0,0
27         bge .LL40
28         mov 0,%l4
29         mov -1,%l4
30         sub %g0,%i1,%o0
31         mov %o0,%o5
32         subcc %g0,%o0,%g0
33         sub %g0,%i0,%o0
34         subx %o0,0,%o4
35         mov %o4,%i0
36         mov %o5,%i1
37 .LL40:
38         cmp %i2,0
39         bge .LL84
40         mov %i3,%o4
41         xnor %g0,%l4,%l4
42         sub %g0,%i3,%o0
43         mov %o0,%o3
44         subcc %g0,%o0,%g0
45         sub %g0,%i2,%o0
46         subx %o0,0,%o2
47         mov %o2,%i2
48         mov %o3,%i3
49         mov %i3,%o4
50 .LL84:
51         cmp %i2,0
52         bne .LL45
53         mov %i1,%i3
54         cmp %o4,%i0
55         bleu .LL46
56         mov %i3,%o1
57         mov     32,%g1
58         subcc   %i0,%o4,%g0
59 1:      bcs     5f
60          addxcc %o1,%o1,%o1     ! shift n1n0 and a q-bit in lsb
61         sub     %i0,%o4,%i0     ! this kills msb of n
62         addx    %i0,%i0,%i0     ! so this cannot give carry
63         subcc   %g1,1,%g1
64 2:      bne     1b
65          subcc  %i0,%o4,%g0
66         bcs     3f
67          addxcc %o1,%o1,%o1     ! shift n1n0 and a q-bit in lsb
68         b       3f
69          sub    %i0,%o4,%i0     ! this kills msb of n
70 4:      sub     %i0,%o4,%i0
71 5:      addxcc  %i0,%i0,%i0
72         bcc     2b
73          subcc  %g1,1,%g1
74 ! Got carry from n.  Subtract next step to cancel this carry.
75         bne     4b
76          addcc  %o1,%o1,%o1     ! shift n1n0 and a 0-bit in lsb
77         sub     %i0,%o4,%i0
78 3:      xnor    %o1,0,%o1
79         b .LL50
80         mov 0,%o2
81 .LL46:
82         cmp %o4,0
83         bne .LL85
84         mov %i0,%o2
85         mov 1,%o0
86         mov 0,%o1
87         wr %g0, 0, %y
88         udiv %o0, %o1, %o0
89         mov %o0,%o4
90         mov %i0,%o2
91 .LL85:
92         mov 0,%g3
93         mov     32,%g1
94         subcc   %g3,%o4,%g0
95 1:      bcs     5f
96          addxcc %o2,%o2,%o2     ! shift n1n0 and a q-bit in lsb
97         sub     %g3,%o4,%g3     ! this kills msb of n
98         addx    %g3,%g3,%g3     ! so this cannot give carry
99         subcc   %g1,1,%g1
100 2:      bne     1b
101          subcc  %g3,%o4,%g0
102         bcs     3f
103          addxcc %o2,%o2,%o2     ! shift n1n0 and a q-bit in lsb
104         b       3f
105          sub    %g3,%o4,%g3     ! this kills msb of n
106 4:      sub     %g3,%o4,%g3
107 5:      addxcc  %g3,%g3,%g3
108         bcc     2b
109          subcc  %g1,1,%g1
110 ! Got carry from n.  Subtract next step to cancel this carry.
111         bne     4b
112          addcc  %o2,%o2,%o2     ! shift n1n0 and a 0-bit in lsb
113         sub     %g3,%o4,%g3
114 3:      xnor    %o2,0,%o2
115         mov %g3,%i0
116         mov %i3,%o1
117         mov     32,%g1
118         subcc   %i0,%o4,%g0
119 1:      bcs     5f
120          addxcc %o1,%o1,%o1     ! shift n1n0 and a q-bit in lsb
121         sub     %i0,%o4,%i0     ! this kills msb of n
122         addx    %i0,%i0,%i0     ! so this cannot give carry
123         subcc   %g1,1,%g1
124 2:      bne     1b
125          subcc  %i0,%o4,%g0
126         bcs     3f
127          addxcc %o1,%o1,%o1     ! shift n1n0 and a q-bit in lsb
128         b       3f
129          sub    %i0,%o4,%i0     ! this kills msb of n
130 4:      sub     %i0,%o4,%i0
131 5:      addxcc  %i0,%i0,%i0
132         bcc     2b
133          subcc  %g1,1,%g1
134 ! Got carry from n.  Subtract next step to cancel this carry.
135         bne     4b
136          addcc  %o1,%o1,%o1     ! shift n1n0 and a 0-bit in lsb
137         sub     %i0,%o4,%i0
138 3:      xnor    %o1,0,%o1
139         b .LL86
140         mov %o1,%l1
141 .LL45:
142         cmp %i2,%i0
143         bleu .LL51
144         sethi %hi(65535),%o0
145         b .LL78
146         mov 0,%o1
147 .LL51:
148         or %o0,%lo(65535),%o0
149         cmp %i2,%o0
150         bgu .LL58
151         mov %i2,%o1
152         cmp %i2,256
153         addx %g0,-1,%o0
154         b .LL64
155         and %o0,8,%o2
156 .LL58:
157         sethi %hi(16777215),%o0
158         or %o0,%lo(16777215),%o0
159         cmp %i2,%o0
160         bgu .LL64
161         mov 24,%o2
162         mov 16,%o2
163 .LL64:
164         srl %o1,%o2,%o0
165         sethi %hi(__clz_tab),%o1
166         or %o1,%lo(__clz_tab),%o1
167         ldub [%o0+%o1],%o0
168         add %o0,%o2,%o0
169         mov 32,%o1
170         subcc %o1,%o0,%o3
171         bne,a .LL72
172         sub %o1,%o3,%o1
173         cmp %i0,%i2
174         bgu .LL74
175         cmp %i3,%o4
176         blu .LL78
177         mov 0,%o1
178 .LL74:
179         b .LL78
180         mov 1,%o1
181 .LL72:
182         sll %i2,%o3,%o2
183         srl %o4,%o1,%o0
184         or %o2,%o0,%i2
185         sll %o4,%o3,%o4
186         srl %i0,%o1,%o2
187         sll %i0,%o3,%o0
188         srl %i3,%o1,%o1
189         or %o0,%o1,%i0
190         sll %i3,%o3,%i3
191         mov %i0,%o1
192         mov     32,%g1
193         subcc   %o2,%i2,%g0
194 1:      bcs     5f
195          addxcc %o1,%o1,%o1     ! shift n1n0 and a q-bit in lsb
196         sub     %o2,%i2,%o2     ! this kills msb of n
197         addx    %o2,%o2,%o2     ! so this cannot give carry
198         subcc   %g1,1,%g1
199 2:      bne     1b
200          subcc  %o2,%i2,%g0
201         bcs     3f
202          addxcc %o1,%o1,%o1     ! shift n1n0 and a q-bit in lsb
203         b       3f
204          sub    %o2,%i2,%o2     ! this kills msb of n
205 4:      sub     %o2,%i2,%o2
206 5:      addxcc  %o2,%o2,%o2
207         bcc     2b
208          subcc  %g1,1,%g1
209 ! Got carry from n.  Subtract next step to cancel this carry.
210         bne     4b
211          addcc  %o1,%o1,%o1     ! shift n1n0 and a 0-bit in lsb
212         sub     %o2,%i2,%o2
213 3:      xnor    %o1,0,%o1
214         mov %o2,%i0
215         wr      %g0,%o1,%y      ! SPARC has 0-3 delay insn after a wr
216         sra     %o4,31,%g2      ! Do not move this insn
217         and     %o1,%g2,%g2     ! Do not move this insn
218         andcc   %g0,0,%g1       ! Do not move this insn
219         mulscc  %g1,%o4,%g1
220         mulscc  %g1,%o4,%g1
221         mulscc  %g1,%o4,%g1
222         mulscc  %g1,%o4,%g1
223         mulscc  %g1,%o4,%g1
224         mulscc  %g1,%o4,%g1
225         mulscc  %g1,%o4,%g1
226         mulscc  %g1,%o4,%g1
227         mulscc  %g1,%o4,%g1
228         mulscc  %g1,%o4,%g1
229         mulscc  %g1,%o4,%g1
230         mulscc  %g1,%o4,%g1
231         mulscc  %g1,%o4,%g1
232         mulscc  %g1,%o4,%g1
233         mulscc  %g1,%o4,%g1
234         mulscc  %g1,%o4,%g1
235         mulscc  %g1,%o4,%g1
236         mulscc  %g1,%o4,%g1
237         mulscc  %g1,%o4,%g1
238         mulscc  %g1,%o4,%g1
239         mulscc  %g1,%o4,%g1
240         mulscc  %g1,%o4,%g1
241         mulscc  %g1,%o4,%g1
242         mulscc  %g1,%o4,%g1
243         mulscc  %g1,%o4,%g1
244         mulscc  %g1,%o4,%g1
245         mulscc  %g1,%o4,%g1
246         mulscc  %g1,%o4,%g1
247         mulscc  %g1,%o4,%g1
248         mulscc  %g1,%o4,%g1
249         mulscc  %g1,%o4,%g1
250         mulscc  %g1,%o4,%g1
251         mulscc  %g1,0,%g1
252         add     %g1,%g2,%o0
253         rd      %y,%o2
254         cmp %o0,%i0
255         bgu,a .LL78
256         add %o1,-1,%o1
257         bne,a .LL50
258         mov 0,%o2
259         cmp %o2,%i3
260         bleu .LL50
261         mov 0,%o2
262         add %o1,-1,%o1
263 .LL78:
264         mov 0,%o2
265 .LL50:
266         mov %o1,%l1
267 .LL86:
268         mov %o2,%l0
269         mov %l0,%i0
270         mov %l1,%i1
271         cmp %l4,0
272         be .LL81
273         sub %g0,%i1,%o0
274         mov %o0,%l3
275         subcc %g0,%o0,%g0
276         sub %g0,%i0,%o0
277         subx %o0,0,%l2
278         mov %l2,%i0
279         mov %l3,%i1
280 .LL81:
281         ret
282         restore
283 EXPORT_SYMBOL(__divdi3)