1*6463fd8fSangelo@sysam.it /*
2*6463fd8fSangelo@sysam.it * muldi3.c extracted from gcc-2.7.2.3/libgcc2.c and
3*6463fd8fSangelo@sysam.it * gcc-2.7.2.3/longlong.h
4*6463fd8fSangelo@sysam.it *
5*6463fd8fSangelo@sysam.it * Copyright (C) 1989, 1992, 1993, 1994, 1995 Free Software Foundation, Inc.
6*6463fd8fSangelo@sysam.it *
7*6463fd8fSangelo@sysam.it * SPDX-License-Identifier: GPL-2.0+
8*6463fd8fSangelo@sysam.it */
9*6463fd8fSangelo@sysam.it
10*6463fd8fSangelo@sysam.it #define SI_TYPE_SIZE 32
11*6463fd8fSangelo@sysam.it #define __BITS4 (SI_TYPE_SIZE / 4)
12*6463fd8fSangelo@sysam.it #define __ll_B (1L << (SI_TYPE_SIZE / 2))
13*6463fd8fSangelo@sysam.it #define __ll_lowpart(t) ((USItype) (t) % __ll_B)
14*6463fd8fSangelo@sysam.it #define __ll_highpart(t) ((USItype) (t) / __ll_B)
15*6463fd8fSangelo@sysam.it
16*6463fd8fSangelo@sysam.it #define umul_ppmm(w1, w0, u, v) \
17*6463fd8fSangelo@sysam.it do { \
18*6463fd8fSangelo@sysam.it USItype __x0, __x1, __x2, __x3; \
19*6463fd8fSangelo@sysam.it USItype __ul, __vl, __uh, __vh; \
20*6463fd8fSangelo@sysam.it \
21*6463fd8fSangelo@sysam.it __ul = __ll_lowpart (u); \
22*6463fd8fSangelo@sysam.it __uh = __ll_highpart (u); \
23*6463fd8fSangelo@sysam.it __vl = __ll_lowpart (v); \
24*6463fd8fSangelo@sysam.it __vh = __ll_highpart (v); \
25*6463fd8fSangelo@sysam.it \
26*6463fd8fSangelo@sysam.it __x0 = (USItype) __ul * __vl; \
27*6463fd8fSangelo@sysam.it __x1 = (USItype) __ul * __vh; \
28*6463fd8fSangelo@sysam.it __x2 = (USItype) __uh * __vl; \
29*6463fd8fSangelo@sysam.it __x3 = (USItype) __uh * __vh; \
30*6463fd8fSangelo@sysam.it \
31*6463fd8fSangelo@sysam.it __x1 += __ll_highpart (__x0);/* this can't give carry */ \
32*6463fd8fSangelo@sysam.it __x1 += __x2; /* but this indeed can */ \
33*6463fd8fSangelo@sysam.it if (__x1 < __x2) /* did we get it? */ \
34*6463fd8fSangelo@sysam.it __x3 += __ll_B; /* yes, add it in the proper pos. */ \
35*6463fd8fSangelo@sysam.it \
36*6463fd8fSangelo@sysam.it (w1) = __x3 + __ll_highpart (__x1); \
37*6463fd8fSangelo@sysam.it (w0) = __ll_lowpart (__x1) * __ll_B + __ll_lowpart (__x0); \
38*6463fd8fSangelo@sysam.it } while (0)
39*6463fd8fSangelo@sysam.it
40*6463fd8fSangelo@sysam.it #define __umulsidi3(u, v) \
41*6463fd8fSangelo@sysam.it ({DIunion __w; \
42*6463fd8fSangelo@sysam.it umul_ppmm (__w.s.high, __w.s.low, u, v); \
43*6463fd8fSangelo@sysam.it __w.ll; })
44*6463fd8fSangelo@sysam.it
45*6463fd8fSangelo@sysam.it typedef int SItype __attribute__ ((mode (SI)));
46*6463fd8fSangelo@sysam.it typedef unsigned int USItype __attribute__ ((mode (SI)));
47*6463fd8fSangelo@sysam.it typedef int DItype __attribute__ ((mode (DI)));
48*6463fd8fSangelo@sysam.it typedef int word_type __attribute__ ((mode (__word__)));
49*6463fd8fSangelo@sysam.it
50*6463fd8fSangelo@sysam.it struct DIstruct {SItype high, low;};
51*6463fd8fSangelo@sysam.it
52*6463fd8fSangelo@sysam.it typedef union
53*6463fd8fSangelo@sysam.it {
54*6463fd8fSangelo@sysam.it struct DIstruct s;
55*6463fd8fSangelo@sysam.it DItype ll;
56*6463fd8fSangelo@sysam.it } DIunion;
57*6463fd8fSangelo@sysam.it
__muldi3(DItype u,DItype v)58*6463fd8fSangelo@sysam.it DItype __muldi3 (DItype u, DItype v)
59*6463fd8fSangelo@sysam.it {
60*6463fd8fSangelo@sysam.it DIunion w;
61*6463fd8fSangelo@sysam.it DIunion uu, vv;
62*6463fd8fSangelo@sysam.it
63*6463fd8fSangelo@sysam.it uu.ll = u,
64*6463fd8fSangelo@sysam.it vv.ll = v;
65*6463fd8fSangelo@sysam.it
66*6463fd8fSangelo@sysam.it w.ll = __umulsidi3 (uu.s.low, vv.s.low);
67*6463fd8fSangelo@sysam.it w.s.high += ((USItype) uu.s.low * (USItype) vv.s.high
68*6463fd8fSangelo@sysam.it + (USItype) uu.s.high * (USItype) vv.s.low);
69*6463fd8fSangelo@sysam.it
70*6463fd8fSangelo@sysam.it return w.ll;
71*6463fd8fSangelo@sysam.it }
72