1 //===-- mulvti3_test.c - Test __mulvti3 -----------------------------------===//
2 //
3 // The LLVM Compiler Infrastructure
4 //
5 // This file is dual licensed under the MIT and the University of Illinois Open
6 // Source Licenses. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 //
10 // This file tests __mulvti3 for the compiler_rt library.
11 //
12 //===----------------------------------------------------------------------===//
13
14 #include "int_lib.h"
15 #include <stdio.h>
16
17 #ifdef CRT_HAS_128BIT
18
19 // Returns: a * b
20
21 // Effects: aborts if a * b overflows
22
23 COMPILER_RT_ABI ti_int __mulvti3(ti_int a, ti_int b);
24
test__mulvti3(ti_int a,ti_int b,ti_int expected)25 int test__mulvti3(ti_int a, ti_int b, ti_int expected)
26 {
27 ti_int x = __mulvti3(a, b);
28 if (x != expected)
29 {
30 twords at;
31 at.all = a;
32 twords bt;
33 bt.all = b;
34 twords xt;
35 xt.all = x;
36 twords expectedt;
37 expectedt.all = expected;
38 printf("error in __mulvti3: 0x%.16llX%.16llX * 0x%.16llX%.16llX = "
39 "0x%.16llX%.16llX, expected 0x%.16llX%.16llX\n",
40 at.s.high, at.s.low, bt.s.high, bt.s.low, xt.s.high, xt.s.low,
41 expectedt.s.high, expectedt.s.low);
42 }
43 return x != expected;
44 }
45
46 #endif
47
main()48 int main()
49 {
50 #ifdef CRT_HAS_128BIT
51 if (test__mulvti3(0, 0, 0))
52 return 1;
53 if (test__mulvti3(0, 1, 0))
54 return 1;
55 if (test__mulvti3(1, 0, 0))
56 return 1;
57 if (test__mulvti3(0, 10, 0))
58 return 1;
59 if (test__mulvti3(10, 0, 0))
60 return 1;
61 if (test__mulvti3(0, 81985529216486895LL, 0))
62 return 1;
63 if (test__mulvti3(81985529216486895LL, 0, 0))
64 return 1;
65
66 if (test__mulvti3(0, -1, 0))
67 return 1;
68 if (test__mulvti3(-1, 0, 0))
69 return 1;
70 if (test__mulvti3(0, -10, 0))
71 return 1;
72 if (test__mulvti3(-10, 0, 0))
73 return 1;
74 if (test__mulvti3(0, -81985529216486895LL, 0))
75 return 1;
76 if (test__mulvti3(-81985529216486895LL, 0, 0))
77 return 1;
78
79 if (test__mulvti3(1, 1, 1))
80 return 1;
81 if (test__mulvti3(1, 10, 10))
82 return 1;
83 if (test__mulvti3(10, 1, 10))
84 return 1;
85 if (test__mulvti3(1, 81985529216486895LL, 81985529216486895LL))
86 return 1;
87 if (test__mulvti3(81985529216486895LL, 1, 81985529216486895LL))
88 return 1;
89
90 if (test__mulvti3(1, -1, -1))
91 return 1;
92 if (test__mulvti3(1, -10, -10))
93 return 1;
94 if (test__mulvti3(-10, 1, -10))
95 return 1;
96 if (test__mulvti3(1, -81985529216486895LL, -81985529216486895LL))
97 return 1;
98 if (test__mulvti3(-81985529216486895LL, 1, -81985529216486895LL))
99 return 1;
100
101 if (test__mulvti3(3037000499LL, 3037000499LL, 9223372030926249001LL))
102 return 1;
103 if (test__mulvti3(-3037000499LL, 3037000499LL, -9223372030926249001LL))
104 return 1;
105 if (test__mulvti3(3037000499LL, -3037000499LL, -9223372030926249001LL))
106 return 1;
107 if (test__mulvti3(-3037000499LL, -3037000499LL, 9223372030926249001LL))
108 return 1;
109
110 if (test__mulvti3(4398046511103LL, 2097152LL, 9223372036852678656LL))
111 return 1;
112 if (test__mulvti3(-4398046511103LL, 2097152LL, -9223372036852678656LL))
113 return 1;
114 if (test__mulvti3(4398046511103LL, -2097152LL, -9223372036852678656LL))
115 return 1;
116 if (test__mulvti3(-4398046511103LL, -2097152LL, 9223372036852678656LL))
117 return 1;
118
119 if (test__mulvti3(2097152LL, 4398046511103LL, 9223372036852678656LL))
120 return 1;
121 if (test__mulvti3(-2097152LL, 4398046511103LL, -9223372036852678656LL))
122 return 1;
123 if (test__mulvti3(2097152LL, -4398046511103LL, -9223372036852678656LL))
124 return 1;
125 if (test__mulvti3(-2097152LL, -4398046511103LL, 9223372036852678656LL))
126 return 1;
127
128 if (test__mulvti3(make_ti(0x00000000000000B5LL, 0x04F333F9DE5BE000LL),
129 make_ti(0x0000000000000000LL, 0x00B504F333F9DE5BLL),
130 make_ti(0x7FFFFFFFFFFFF328LL, 0xDF915DA296E8A000LL)))
131 return 1;
132
133 // if (test__mulvti3(make_ti(0x7FFFFFFFFFFFFFFFLL, 0xFFFFFFFFFFFFFFFFLL),
134 // -2,
135 // make_ti(0x8000000000000000LL, 0x0000000000000001LL))) // abort
136 // return 1;
137 // if (test__mulvti3(-2,
138 // make_ti(0x7FFFFFFFFFFFFFFFLL, 0xFFFFFFFFFFFFFFFFLL),
139 // make_ti(0x8000000000000000LL, 0x0000000000000001LL))) // abort
140 // return 1;
141 if (test__mulvti3(make_ti(0x7FFFFFFFFFFFFFFFLL, 0xFFFFFFFFFFFFFFFFLL),
142 -1,
143 make_ti(0x8000000000000000LL, 0x0000000000000001LL)))
144 return 1;
145 if (test__mulvti3(-1,
146 make_ti(0x7FFFFFFFFFFFFFFFLL, 0xFFFFFFFFFFFFFFFFLL),
147 make_ti(0x8000000000000000LL, 0x0000000000000001LL)))
148 return 1;
149 if (test__mulvti3(make_ti(0x7FFFFFFFFFFFFFFFLL, 0xFFFFFFFFFFFFFFFFLL),
150 0,
151 0))
152 return 1;
153 if (test__mulvti3(0,
154 make_ti(0x7FFFFFFFFFFFFFFFLL, 0xFFFFFFFFFFFFFFFFLL),
155 0))
156 return 1;
157 if (test__mulvti3(make_ti(0x7FFFFFFFFFFFFFFFLL, 0xFFFFFFFFFFFFFFFFLL),
158 1,
159 make_ti(0x7FFFFFFFFFFFFFFFLL, 0xFFFFFFFFFFFFFFFFLL)))
160 return 1;
161 if (test__mulvti3(1,
162 make_ti(0x7FFFFFFFFFFFFFFFLL, 0xFFFFFFFFFFFFFFFFLL),
163 make_ti(0x7FFFFFFFFFFFFFFFLL, 0xFFFFFFFFFFFFFFFFLL)))
164 return 1;
165 // if (test__mulvti3(make_ti(0x7FFFFFFFFFFFFFFFLL, 0xFFFFFFFFFFFFFFFFLL),
166 // 2,
167 // make_ti(0x8000000000000000LL, 0x0000000000000001LL))) // abort
168 // return 1;
169 // if (test__mulvti3(2,
170 // make_ti(0x7FFFFFFFFFFFFFFFLL, 0xFFFFFFFFFFFFFFFFLL),
171 // make_ti(0x8000000000000000LL, 0x0000000000000001LL))) // abort
172 // return 1;
173
174 // if (test__mulvti3(make_ti(0x8000000000000000LL, 0x0000000000000000LL),
175 // -2,
176 // make_ti(0x8000000000000000LL, 0x0000000000000000LL))) // abort
177 // return 1;
178 // if (test__mulvti3(-2,
179 // make_ti(0x8000000000000000LL, 0x0000000000000000LL),
180 // make_ti(0x8000000000000000LL, 0x0000000000000000LL))) // abort
181 // return 1;
182 // if (test__mulvti3(make_ti(0x8000000000000000LL, 0x0000000000000000LL),
183 // -1,
184 // make_ti(0x8000000000000000LL, 0x0000000000000000LL))) // abort
185 // return 1;
186 // if (test__mulvti3(-1,
187 // make_ti(0x8000000000000000LL, 0x0000000000000000LL),
188 // make_ti(0x8000000000000000LL, 0x0000000000000000LL))) // abort
189 // return 1;
190 if (test__mulvti3(make_ti(0x8000000000000000LL, 0x0000000000000000LL),
191 0,
192 0))
193 return 1;
194 if (test__mulvti3(0,
195 make_ti(0x8000000000000000LL, 0x0000000000000000LL),
196 0))
197 return 1;
198 if (test__mulvti3(make_ti(0x8000000000000000LL, 0x0000000000000000LL),
199 1,
200 make_ti(0x8000000000000000LL, 0x0000000000000000LL)))
201 return 1;
202 if (test__mulvti3(1,
203 make_ti(0x8000000000000000LL, 0x0000000000000000LL),
204 make_ti(0x8000000000000000LL, 0x0000000000000000LL)))
205 return 1;
206 // if (test__mulvti3(make_ti(0x8000000000000000LL, 0x0000000000000000LL),
207 // 2,
208 // make_ti(0x8000000000000000LL, 0x0000000000000000LL))) // abort
209 // return 1;
210 // if (test__mulvti3(2,
211 // make_ti(0x8000000000000000LL, 0x0000000000000000LL),
212 // make_ti(0x8000000000000000LL, 0x0000000000000000LL))) // abort
213 // return 1;
214
215 // if (test__mulvti3(make_ti(0x8000000000000000LL, 0x0000000000000001LL),
216 // -2,
217 // make_ti(0x8000000000000000LL, 0x0000000000000001LL))) // abort
218 // return 1;
219 // if (test__mulvti3(-2,
220 // make_ti(0x8000000000000000LL, 0x0000000000000001LL),
221 // make_ti(0x8000000000000000LL, 0x0000000000000001LL))) // abort
222 // return 1;
223 if (test__mulvti3(make_ti(0x8000000000000000LL, 0x0000000000000001LL),
224 -1,
225 make_ti(0x7FFFFFFFFFFFFFFFLL, 0xFFFFFFFFFFFFFFFFLL)))
226 return 1;
227 if (test__mulvti3(-1,
228 make_ti(0x8000000000000000LL, 0x0000000000000001LL),
229 make_ti(0x7FFFFFFFFFFFFFFFLL, 0xFFFFFFFFFFFFFFFFLL)))
230 return 1;
231 if (test__mulvti3(make_ti(0x8000000000000000LL, 0x0000000000000001LL),
232 0,
233 0))
234 return 1;
235 if (test__mulvti3(0,
236 make_ti(0x8000000000000000LL, 0x0000000000000001LL),
237 0))
238 return 1;
239 if (test__mulvti3(make_ti(0x8000000000000000LL, 0x0000000000000001LL),
240 1,
241 make_ti(0x8000000000000000LL, 0x0000000000000001LL)))
242 return 1;
243 if (test__mulvti3(1,
244 make_ti(0x8000000000000000LL, 0x0000000000000001LL),
245 make_ti(0x8000000000000000LL, 0x0000000000000001LL)))
246 return 1;
247 // if (test__mulvti3(make_ti(0x8000000000000000LL, 0x0000000000000001LL),
248 // 2,
249 // make_ti(0x8000000000000000LL, 0x0000000000000000LL))) // abort
250 // return 1;
251 // if (test__mulvti3(2,
252 // make_ti(0x8000000000000000LL, 0x0000000000000001LL),
253 // make_ti(0x8000000000000000LL, 0x0000000000000000LL))) // abort
254 // return 1;
255
256 #else
257 printf("skipped\n");
258 #endif
259 return 0;
260 }
261