1 /* SPDX-License-Identifier: GPL-2.0-or-later W !! 1 /* libgcc1 routines for 68000 w/o floating-point hardware.
2 #include <linux/linkage.h> !! 2 Copyright (C) 1994, 1996, 1997, 1998 Free Software Foundation, Inc.
3 #include <asm/asmmacro.h> !! 3
4 #include <asm/core.h> !! 4 This file is part of GNU CC.
5 !! 5
6 ENTRY(__divsi3) !! 6 GNU CC is free software; you can redistribute it and/or modify it
7 !! 7 under the terms of the GNU General Public License as published by the
8 abi_entry_default !! 8 Free Software Foundation; either version 2, or (at your option) any
9 #if XCHAL_HAVE_DIV32 !! 9 later version.
10 quos a2, a2, a3 !! 10
>> 11 In addition to the permissions in the GNU General Public License, the
>> 12 Free Software Foundation gives you unlimited permission to link the
>> 13 compiled version of this file with other programs, and to distribute
>> 14 those programs without any restriction coming from the use of this
>> 15 file. (The General Public License restrictions do apply in other
>> 16 respects; for example, they cover modification of the file, and
>> 17 distribution when not linked into another program.)
>> 18
>> 19 This file is distributed in the hope that it will be useful, but
>> 20 WITHOUT ANY WARRANTY; without even the implied warranty of
>> 21 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
>> 22 General Public License for more details. */
>> 23
>> 24 /* As a special exception, if you link this library with files
>> 25 compiled with GCC to produce an executable, this does not cause
>> 26 the resulting executable to be covered by the GNU General Public License.
>> 27 This exception does not however invalidate any other reasons why
>> 28 the executable file might be covered by the GNU General Public License. */
>> 29
>> 30 /* Use this one for any 680x0; assumes no floating point hardware.
>> 31 The trailing " '" appearing on some lines is for ANSI preprocessors. Yuk.
>> 32 Some of this code comes from MINIX, via the folks at ericsson.
>> 33 D. V. Henkel-Wallace (gumby@cygnus.com) Fete Bastille, 1992
>> 34 */
>> 35
>> 36 /* These are predefined by new versions of GNU cpp. */
>> 37
>> 38 #ifndef __USER_LABEL_PREFIX__
>> 39 #define __USER_LABEL_PREFIX__ _
>> 40 #endif
>> 41
>> 42 #ifndef __REGISTER_PREFIX__
>> 43 #define __REGISTER_PREFIX__
>> 44 #endif
>> 45
>> 46 #ifndef __IMMEDIATE_PREFIX__
>> 47 #define __IMMEDIATE_PREFIX__ #
>> 48 #endif
>> 49
>> 50 /* ANSI concatenation macros. */
>> 51
>> 52 #define CONCAT1(a, b) CONCAT2(a, b)
>> 53 #define CONCAT2(a, b) a ## b
>> 54
>> 55 /* Use the right prefix for global labels. */
>> 56
>> 57 #define SYM(x) CONCAT1 (__USER_LABEL_PREFIX__, x)
>> 58
>> 59 /* Use the right prefix for registers. */
>> 60
>> 61 #define REG(x) CONCAT1 (__REGISTER_PREFIX__, x)
>> 62
>> 63 /* Use the right prefix for immediate values. */
>> 64
>> 65 #define IMM(x) CONCAT1 (__IMMEDIATE_PREFIX__, x)
>> 66
>> 67 #define d0 REG (d0)
>> 68 #define d1 REG (d1)
>> 69 #define d2 REG (d2)
>> 70 #define d3 REG (d3)
>> 71 #define d4 REG (d4)
>> 72 #define d5 REG (d5)
>> 73 #define d6 REG (d6)
>> 74 #define d7 REG (d7)
>> 75 #define a0 REG (a0)
>> 76 #define a1 REG (a1)
>> 77 #define a2 REG (a2)
>> 78 #define a3 REG (a3)
>> 79 #define a4 REG (a4)
>> 80 #define a5 REG (a5)
>> 81 #define a6 REG (a6)
>> 82 #define fp REG (fp)
>> 83 #define sp REG (sp)
>> 84
>> 85 .text
>> 86 .proc
>> 87 .globl SYM (__divsi3)
>> 88 SYM (__divsi3):
>> 89 movel d2, sp@-
>> 90
>> 91 moveq IMM (1), d2 /* sign of result stored in d2 (=1 or =-1) */
>> 92 movel sp@(12), d1 /* d1 = divisor */
>> 93 jpl L1
>> 94 negl d1
>> 95 #if !(defined(__mcf5200__) || defined(__mcoldfire__))
>> 96 negb d2 /* change sign because divisor <0 */
>> 97 #else
>> 98 negl d2 /* change sign because divisor <0 */
>> 99 #endif
>> 100 L1: movel sp@(8), d0 /* d0 = dividend */
>> 101 jpl L2
>> 102 negl d0
>> 103 #if !(defined(__mcf5200__) || defined(__mcoldfire__))
>> 104 negb d2
11 #else 105 #else
12 xor a7, a2, a3 /* sign = divi !! 106 negl d2
13 do_abs a6, a2, a4 /* udividend = !! 107 #endif
14 do_abs a3, a3, a4 /* udivisor = !! 108
15 bltui a3, 2, .Lle_one /* check if ud !! 109 L2: movel d1, sp@-
16 do_nsau a5, a6, a2, a8 /* udividend_s !! 110 movel d0, sp@-
17 do_nsau a4, a3, a2, a8 /* udivisor_sh !! 111 jbsr SYM (__udivsi3) /* divide abs(dividend) by abs(divisor) */
18 bgeu a5, a4, .Lspecial !! 112 addql IMM (8), sp
19 !! 113
20 sub a4, a4, a5 /* count = udi !! 114 tstb d2
21 ssl a4 !! 115 jpl L3
22 sll a3, a3 /* udivisor << !! 116 negl d0
23 movi a2, 0 /* quotient = !! 117
24 !! 118 L3: movel sp@+, d2
25 /* test-subtract-and-shift loop; one q !! 119 rts
26 #if XCHAL_HAVE_LOOPS <<
27 loopnez a4, .Lloopend <<
28 #endif /* XCHAL_HAVE_LOOPS */ <<
29 .Lloop: <<
30 bltu a6, a3, .Lzerobit <<
31 sub a6, a6, a3 <<
32 addi a2, a2, 1 <<
33 .Lzerobit: <<
34 slli a2, a2, 1 <<
35 srli a3, a3, 1 <<
36 #if !XCHAL_HAVE_LOOPS <<
37 addi a4, a4, -1 <<
38 bnez a4, .Lloop <<
39 #endif /* !XCHAL_HAVE_LOOPS */ <<
40 .Lloopend: <<
41 <<
42 bltu a6, a3, .Lreturn <<
43 addi a2, a2, 1 /* increment i <<
44 .Lreturn: <<
45 neg a5, a2 <<
46 movltz a2, a5, a7 /* return (sig <<
47 abi_ret_default <<
48 <<
49 .Lle_one: <<
50 beqz a3, .Lerror <<
51 neg a2, a6 /* if udivisor <<
52 movgez a2, a6, a7 /* (sign < 0) <<
53 abi_ret_default <<
54 <<
55 .Lspecial: <<
56 bltu a6, a3, .Lreturn0 /* if divide <<
57 movi a2, 1 <<
58 movi a4, -1 <<
59 movltz a2, a4, a7 /* else return <<
60 abi_ret_default <<
61 <<
62 .Lerror: <<
63 /* Divide by zero: Use an illegal inst <<
64 The subsequent "DIV0" string can be <<
65 handler to identify the real cause <<
66 ill <<
67 .ascii "DIV0" <<
68 <<
69 .Lreturn0: <<
70 movi a2, 0 <<
71 #endif /* XCHAL_HAVE_DIV32 */ <<
72 abi_ret_default <<
73 120
74 ENDPROC(__divsi3) <<
75 EXPORT_SYMBOL(__divsi3) <<
Linux® is a registered trademark of Linus Torvalds in the United States and other countries.
TOMOYO® is a registered trademark of NTT DATA CORPORATION.