1 /* libgcc routines for MSP430
2 Copyright (C) 2005-2022 Free Software Foundation, Inc.
3 Contributed by Red Hat.
4
5 This file is part of GCC.
6
7 GCC is free software; you can redistribute it and/or modify it
8 under the terms of the GNU General Public License as published
9 by the Free Software Foundation; either version 3, or (at your
10 option) any later version.
11
12 GCC is distributed in the hope that it will be useful, but WITHOUT
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
14 or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public
15 License for more details.
16
17 Under Section 7 of GPL version 3, you are granted additional
18 permissions described in the GCC Runtime Library Exception, version
19 3.1, as published by the Free Software Foundation.
20
21 You should have received a copy of the GNU General Public License and
22 a copy of the GCC Runtime Library Exception along with this program;
23 see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
24 <http://www.gnu.org/licenses/>. */
25
26 typedef unsigned int uint32_type __attribute__ ((mode (SI)));
27 typedef unsigned int uint16_type __attribute__ ((mode (HI)));
28 typedef unsigned int uint08_type __attribute__ ((mode (QI)));
29
30 #define C3B(a,b,c) a##b##c
31 #define C3(a,b,c) C3B(a,b,c)
32
33 #if defined (MUL_NONE) || defined (MUL_16)
34 /* __muldi3 must be excluded from libgcc.a to prevent multiple-definition
35 errors for the hwmult configurations that have their own definition.
36 However, for MUL_NONE and MUL_16, the software version is still required, so
37 the necessary preprocessed output from libgcc2.c to compile that
38 software version of __muldi3 is below. */
39 typedef unsigned int USItype __attribute__ ((mode (SI)));
40 typedef int DItype __attribute__ ((mode (DI)));
41 typedef int SItype __attribute__ ((mode (SI)));
42 struct DWstruct {SItype low, high;};
43
44 typedef union
45 {
46 struct DWstruct s;
47 DItype ll;
48 } DWunion;
49
50 DItype __muldi3 (DItype u, DItype v);
51
52 DItype
__muldi3(DItype u,DItype v)53 __muldi3 (DItype u, DItype v)
54 {
55 const DWunion uu = {.ll = u};
56 const DWunion vv = {.ll = v};
57 /* The next block of code is expanded from the following line:
58 DWunion w = {.ll = __umulsidi3 (uu.s.low, vv.s.low)}; */
59 DWunion w;
60 USItype __x0, __x1, __x2, __x3;
61 USItype __ul, __vl, __uh, __vh;
62 __ul = ((USItype) (uu.s.low) & (((USItype) 1 << ((4 * 8) / 2)) - 1));
63 __uh = ((USItype) (uu.s.low) >> ((4 * 8) / 2));
64 __vl = ((USItype) (vv.s.low) & (((USItype) 1 << ((4 * 8) / 2)) - 1));
65 __vh = ((USItype) (vv.s.low) >> ((4 * 8) / 2));
66 __x0 = (USItype) __ul * __vl;
67 __x1 = (USItype) __ul * __vh;
68 __x2 = (USItype) __uh * __vl;
69 __x3 = (USItype) __uh * __vh;
70 __x1 += ((USItype) (__x0) >> ((4 * 8) / 2));
71 __x1 += __x2;
72 if (__x1 < __x2)
73 __x3 += ((USItype) 1 << ((4 * 8) / 2));
74 (w.s.high) = __x3 + ((USItype) (__x1) >> ((4 * 8) / 2));
75 (w.s.low) = ((USItype) (__x1) & (((USItype) 1 << ((4 * 8) / 2)) - 1))
76 * ((USItype) 1 << ((4 * 8) / 2))
77 + ((USItype) (__x0) & (((USItype) 1 << ((4 * 8) / 2)) - 1));
78
79 w.s.high += ((USItype) uu.s.low * (USItype) vv.s.high
80 + (USItype) uu.s.high * (USItype) vv.s.low);
81 return w.ll;
82 }
83 #endif
84
85 #if defined MUL_NONE
86
87 /* The software multiply library needs __mspabi_mpyll. */
88
89 #undef UINT_TYPE
90 #undef BITS_MINUS_1
91 #undef NAME_MODE
92
93 #define UINT_TYPE uint32_type
94 #define BITS_MINUS_1 31
95 #define NAME_MODE si
96
97 #include "msp430-mul.h"
98
99 #elif defined MUL_16
100
101 /* The 16-bit multiply library needs a software version of SI->DI widening
102 multiplication. */
103
104 signed long long
__mspabi_mpysll(signed long a,signed long b)105 __mspabi_mpysll (signed long a, signed long b)
106 {
107 return (signed long long) a * (signed long long) b;
108 }
109
110 unsigned long long
__mspabi_mpyull(unsigned long a,unsigned long b)111 __mspabi_mpyull (unsigned long a, unsigned long b)
112 {
113 return (unsigned long long) a * (unsigned long long) b;
114 }
115
116 #else
117
118 #undef UINT_TYPE
119 #undef BITS_MINUS_1
120 #undef NAME_MODE
121
122 #define UINT_TYPE uint08_type
123 #define BITS_MINUS_1 7
124 #define NAME_MODE qi
125
126 #include "msp430-mul.h"
127
128 #endif /* MUL_NONE */
129