xref: /dragonfly/contrib/gcc-4.7/libgcc/libgcc2.h (revision 73610d44)
1 /* Header file for libgcc2.c.  */
2 /* Copyright (C) 2000, 2001, 2004, 2005, 2009, 2010
3    Free Software Foundation, Inc.
4 
5 This file is part of GCC.
6 
7 GCC is free software; you can redistribute it and/or modify it under
8 the terms of the GNU General Public License as published by the Free
9 Software Foundation; either version 3, or (at your option) any later
10 version.
11 
12 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
15 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 #ifndef GCC_LIBGCC2_H
27 #define GCC_LIBGCC2_H
28 
29 #ifndef HIDE_EXPORTS
30 #pragma GCC visibility push(default)
31 #endif
32 
33 extern int __gcc_bcmp (const unsigned char *, const unsigned char *, size_t);
34 extern void __clear_cache (char *, char *);
35 extern void __eprintf (const char *, const char *, unsigned int, const char *)
36   __attribute__ ((__noreturn__));
37 
38 #ifndef LIBGCC2_LONG_DOUBLE_TYPE_SIZE
39 #define LIBGCC2_LONG_DOUBLE_TYPE_SIZE LONG_DOUBLE_TYPE_SIZE
40 #endif
41 
42 #ifndef LIBGCC2_HAS_SF_MODE
43 #define LIBGCC2_HAS_SF_MODE (BITS_PER_UNIT == 8)
44 #endif
45 
46 #ifndef LIBGCC2_HAS_DF_MODE
47 #define LIBGCC2_HAS_DF_MODE \
48   (BITS_PER_UNIT == 8 \
49    && (__SIZEOF_DOUBLE__ * __CHAR_BIT__ == 64 \
50        || LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 64))
51 #endif
52 
53 #ifndef LIBGCC2_HAS_XF_MODE
54 #define LIBGCC2_HAS_XF_MODE \
55   (BITS_PER_UNIT == 8 && LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 80)
56 #endif
57 
58 #ifndef LIBGCC2_HAS_TF_MODE
59 #define LIBGCC2_HAS_TF_MODE \
60   (BITS_PER_UNIT == 8 && LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 128)
61 #endif
62 
63 #ifndef SF_SIZE
64 #if LIBGCC2_HAS_SF_MODE
65 #define SF_SIZE FLT_MANT_DIG
66 #else
67 #define SF_SIZE 0
68 #endif
69 #endif
70 
71 #ifndef DF_SIZE
72 #if LIBGCC2_HAS_DF_MODE
73 #if __SIZEOF_DOUBLE__ * __CHAR_BIT__ == 64
74 #define DF_SIZE DBL_MANT_DIG
75 #elif LIBGCC2_LONG_DOUBLE_TYPE_SIZE == 64
76 #define DF_SIZE LDBL_MANT_DIG
77 #else
78 #define DF_SIZE 0
79 #endif
80 #else
81 #define DF_SIZE 0
82 #endif
83 #endif
84 
85 #ifndef XF_SIZE
86 #if LIBGCC2_HAS_XF_MODE
87 #define XF_SIZE LDBL_MANT_DIG
88 #else
89 #define XF_SIZE 0
90 #endif
91 #endif
92 
93 #ifndef TF_SIZE
94 #if LIBGCC2_HAS_TF_MODE
95 #define TF_SIZE LDBL_MANT_DIG
96 #else
97 #define TF_SIZE 0
98 #endif
99 #endif
100 
101 /* FIXME: This #ifdef probably should be removed, ie. enable the test
102    for mips too.  */
103 /* Don't use IBM Extended Double TFmode for TI->SF calculations.
104    The conversion from long double to float suffers from double
105    rounding, because we convert via double.  In other cases, going
106    through the software fp routines is much slower than the fallback.  */
107 #ifdef __powerpc__
108 #define AVOID_FP_TYPE_CONVERSION(SIZE) (SIZE == 106)
109 #elif defined(WIDEST_HARDWARE_FP_SIZE)
110 #define AVOID_FP_TYPE_CONVERSION(SIZE) (SIZE > WIDEST_HARDWARE_FP_SIZE)
111 #else
112 #define AVOID_FP_TYPE_CONVERSION(SIZE) 0
113 #endif
114 
115 /* In the first part of this file, we are interfacing to calls generated
116    by the compiler itself.  These calls pass values into these routines
117    which have very specific modes (rather than very specific types), and
118    these compiler-generated calls also expect any return values to have
119    very specific modes (rather than very specific types).  Thus, we need
120    to avoid using regular C language type names in this part of the file
121    because the sizes for those types can be configured to be anything.
122    Instead we use the following special type names.  */
123 
124 typedef		 int QItype	__attribute__ ((mode (QI)));
125 typedef unsigned int UQItype	__attribute__ ((mode (QI)));
126 typedef		 int HItype	__attribute__ ((mode (HI)));
127 typedef unsigned int UHItype	__attribute__ ((mode (HI)));
128 #if MIN_UNITS_PER_WORD > 1
129 /* These typedefs are usually forbidden on dsp's with UNITS_PER_WORD 1.  */
130 typedef 	 int SItype	__attribute__ ((mode (SI)));
131 typedef unsigned int USItype	__attribute__ ((mode (SI)));
132 #if __SIZEOF_LONG_LONG__ > 4
133 /* These typedefs are usually forbidden on archs with UNITS_PER_WORD 2.  */
134 typedef		 int DItype	__attribute__ ((mode (DI)));
135 typedef unsigned int UDItype	__attribute__ ((mode (DI)));
136 #if MIN_UNITS_PER_WORD > 4
137 /* These typedefs are usually forbidden on archs with UNITS_PER_WORD 4.  */
138 typedef		 int TItype	__attribute__ ((mode (TI)));
139 typedef unsigned int UTItype	__attribute__ ((mode (TI)));
140 #endif
141 #endif
142 #endif
143 
144 #if LIBGCC2_HAS_SF_MODE
145 typedef 	float SFtype	__attribute__ ((mode (SF)));
146 typedef _Complex float SCtype	__attribute__ ((mode (SC)));
147 #endif
148 #if LIBGCC2_HAS_DF_MODE
149 typedef		float DFtype	__attribute__ ((mode (DF)));
150 typedef _Complex float DCtype	__attribute__ ((mode (DC)));
151 #endif
152 #if LIBGCC2_HAS_XF_MODE
153 typedef		float XFtype	__attribute__ ((mode (XF)));
154 typedef _Complex float XCtype	__attribute__ ((mode (XC)));
155 #endif
156 #if LIBGCC2_HAS_TF_MODE
157 typedef		float TFtype	__attribute__ ((mode (TF)));
158 typedef _Complex float TCtype	__attribute__ ((mode (TC)));
159 #endif
160 
161 typedef int cmp_return_type __attribute__((mode (__libgcc_cmp_return__)));
162 typedef int shift_count_type __attribute__((mode (__libgcc_shift_count__)));
163 
164 /* Make sure that we don't accidentally use any normal C language built-in
165    type names in the first part of this file.  Instead we want to use *only*
166    the type names defined above.  The following macro definitions insure
167    that if we *do* accidentally use some normal C language built-in type name,
168    we will get a syntax error.  */
169 
170 #define char bogus_type
171 #define short bogus_type
172 #define int bogus_type
173 #define long bogus_type
174 #define unsigned bogus_type
175 #define float bogus_type
176 #define double bogus_type
177 
178 /* Versions prior to 3.4.4 were not taking into account the word size for
179    the 5 trapping arithmetic functions absv, addv, subv, mulv and negv.  As
180    a consequence, the si and di variants were always and the only ones emitted.
181    To maintain backward compatibility, COMPAT_SIMODE_TRAPPING_ARITHMETIC is
182    defined on platforms where it makes sense to still have the si variants
183    emitted.  As a bonus, their implementation is now correct.  Note that the
184    same mechanism should have been implemented for the di variants, but it
185    turns out that no platform would define COMPAT_DIMODE_TRAPPING_ARITHMETIC
186    if it existed.  */
187 
188 #if LIBGCC2_UNITS_PER_WORD == 8
189 #define W_TYPE_SIZE (8 * BITS_PER_UNIT)
190 #define Wtype	DItype
191 #define UWtype	UDItype
192 #define HWtype	DItype
193 #define UHWtype	UDItype
194 #define DWtype	TItype
195 #define UDWtype	UTItype
196 #ifdef LIBGCC2_GNU_PREFIX
197 #define __NW(a,b)	__gnu_ ## a ## di ## b
198 #define __NDW(a,b)	__gnu_ ## a ## ti ## b
199 #else
200 #define __NW(a,b)	__ ## a ## di ## b
201 #define __NDW(a,b)	__ ## a ## ti ## b
202 #endif
203 #define COMPAT_SIMODE_TRAPPING_ARITHMETIC
204 #elif LIBGCC2_UNITS_PER_WORD == 4
205 #define W_TYPE_SIZE (4 * BITS_PER_UNIT)
206 #define Wtype	SItype
207 #define UWtype	USItype
208 #define HWtype	SItype
209 #define UHWtype	USItype
210 #define DWtype	DItype
211 #define UDWtype	UDItype
212 #ifdef LIBGCC2_GNU_PREFIX
213 #define __NW(a,b)	__gnu_ ## a ## si ## b
214 #define __NDW(a,b)	__gnu_ ## a ## di ## b
215 #else
216 #define __NW(a,b)	__ ## a ## si ## b
217 #define __NDW(a,b)	__ ## a ## di ## b
218 #endif
219 #elif LIBGCC2_UNITS_PER_WORD == 2
220 #define W_TYPE_SIZE (2 * BITS_PER_UNIT)
221 #define Wtype	HItype
222 #define UWtype	UHItype
223 #define HWtype	HItype
224 #define UHWtype	UHItype
225 #define DWtype	SItype
226 #define UDWtype	USItype
227 #ifdef LIBGCC2_GNU_PREFIX
228 #define __NW(a,b)	__gnu_ ## a ## hi ## b
229 #define __NDW(a,b)	__gnu_ ## a ## si ## b
230 #else
231 #define __NW(a,b)	__ ## a ## hi ## b
232 #define __NDW(a,b)	__ ## a ## si ## b
233 #endif
234 #else
235 #define W_TYPE_SIZE BITS_PER_UNIT
236 #define Wtype	QItype
237 #define UWtype  UQItype
238 #define HWtype	QItype
239 #define UHWtype	UQItype
240 #define DWtype	HItype
241 #define UDWtype	UHItype
242 #ifdef LIBGCC2_GNU_PREFIX
243 #define __NW(a,b)	__gnu_ ## a ## qi ## b
244 #define __NDW(a,b)	__gnu_ ## a ## hi ## b
245 #else
246 #define __NW(a,b)	__ ## a ## qi ## b
247 #define __NDW(a,b)	__ ## a ## hi ## b
248 #endif
249 #endif
250 
251 #ifdef LIBGCC2_GNU_PREFIX
252 #define __N(a)	__gnu_ ## a
253 #else
254 #define __N(a)	__ ## a
255 #endif
256 #define Wtype_MAX ((Wtype)(((UWtype)1 << (W_TYPE_SIZE - 1)) - 1))
257 #define Wtype_MIN (- Wtype_MAX - 1)
258 
259 #if W_TYPE_SIZE == 8
260 # define Wtype_MAXp1_F	0x1p8f
261 #elif W_TYPE_SIZE == 16
262 # define Wtype_MAXp1_F	0x1p16f
263 #elif W_TYPE_SIZE == 32
264 # define Wtype_MAXp1_F	0x1p32f
265 #elif W_TYPE_SIZE == 64
266 # define Wtype_MAXp1_F	0x1p64f
267 #else
268 # error "expand the table"
269 #endif
270 
271 #define __muldi3	__NDW(mul,3)
272 #define __divdi3	__NDW(div,3)
273 #define __udivdi3	__NDW(udiv,3)
274 #define __moddi3	__NDW(mod,3)
275 #define __umoddi3	__NDW(umod,3)
276 #define __negdi2	__NDW(neg,2)
277 #define __lshrdi3	__NDW(lshr,3)
278 #define __ashldi3	__NDW(ashl,3)
279 #define __ashrdi3	__NDW(ashr,3)
280 #define __cmpdi2	__NDW(cmp,2)
281 #define __ucmpdi2	__NDW(ucmp,2)
282 #define __udivmoddi4	__NDW(udivmod,4)
283 #define __fixunstfDI	__NDW(fixunstf,)
284 #define __fixtfdi	__NDW(fixtf,)
285 #define __fixunsxfDI	__NDW(fixunsxf,)
286 #define __fixxfdi	__NDW(fixxf,)
287 #define __fixunsdfDI	__NDW(fixunsdf,)
288 #define __fixdfdi	__NDW(fixdf,)
289 #define __fixunssfDI	__NDW(fixunssf,)
290 #define __fixsfdi	__NDW(fixsf,)
291 #define __floatdixf	__NDW(float,xf)
292 #define __floatditf	__NDW(float,tf)
293 #define __floatdidf	__NDW(float,df)
294 #define __floatdisf	__NDW(float,sf)
295 #define __floatundixf	__NDW(floatun,xf)
296 #define __floatunditf	__NDW(floatun,tf)
297 #define __floatundidf	__NDW(floatun,df)
298 #define __floatundisf	__NDW(floatun,sf)
299 #define __fixunsxfSI	__NW(fixunsxf,)
300 #define __fixunstfSI	__NW(fixunstf,)
301 #define __fixunsdfSI	__NW(fixunsdf,)
302 #define __fixunssfSI	__NW(fixunssf,)
303 
304 #define __absvSI2	__NW(absv,2)
305 #define __addvSI3	__NW(addv,3)
306 #define __subvSI3	__NW(subv,3)
307 #define __mulvSI3	__NW(mulv,3)
308 #define __negvSI2	__NW(negv,2)
309 #define __absvDI2	__NDW(absv,2)
310 #define __addvDI3	__NDW(addv,3)
311 #define __subvDI3	__NDW(subv,3)
312 #define __mulvDI3	__NDW(mulv,3)
313 #define __negvDI2	__NDW(negv,2)
314 
315 #define __ffsSI2	__NW(ffs,2)
316 #define __clzSI2	__NW(clz,2)
317 #define __ctzSI2	__NW(ctz,2)
318 #define __clrsbSI2	__NW(clrsb,2)
319 #define __popcountSI2	__NW(popcount,2)
320 #define __paritySI2	__NW(parity,2)
321 #define __ffsDI2	__NDW(ffs,2)
322 #define __clzDI2	__NDW(clz,2)
323 #define __ctzDI2	__NDW(ctz,2)
324 #define __clrsbDI2	__NDW(clrsb,2)
325 #define __popcountDI2	__NDW(popcount,2)
326 #define __parityDI2	__NDW(parity,2)
327 
328 #define __clz_tab		__N(clz_tab)
329 #define __bswapsi2		__N(bswapsi2)
330 #define __bswapdi2		__N(bswapdi2)
331 #define __udiv_w_sdiv		__N(udiv_w_sdiv)
332 #define __clear_cache		__N(clear_cache)
333 #define __enable_execute_stack	__N(enable_execute_stack)
334 
335 #ifndef __powisf2
336 #define __powisf2		__N(powisf2)
337 #endif
338 #ifndef __powidf2
339 #define __powidf2		__N(powidf2)
340 #endif
341 #ifndef __powitf2
342 #define __powitf2		__N(powitf2)
343 #endif
344 #ifndef __powixf2
345 #define __powixf2		__N(powixf2)
346 #endif
347 #ifndef __mulsc3
348 #define __mulsc3		__N(mulsc3)
349 #endif
350 #ifndef __muldc3
351 #define __muldc3		__N(muldc3)
352 #endif
353 #ifndef __mulxc3
354 #define __mulxc3		__N(mulxc3)
355 #endif
356 #ifndef __multc3
357 #define __multc3		__N(multc3)
358 #endif
359 #ifndef __divsc3
360 #define __divsc3		__N(divsc3)
361 #endif
362 #ifndef __divdc3
363 #define __divdc3		__N(divdc3)
364 #endif
365 #ifndef __divxc3
366 #define __divxc3		__N(divxc3)
367 #endif
368 #ifndef __divtc3
369 #define __divtc3		__N(divtc3)
370 #endif
371 
372 extern DWtype __muldi3 (DWtype, DWtype);
373 extern DWtype __divdi3 (DWtype, DWtype);
374 extern UDWtype __udivdi3 (UDWtype, UDWtype);
375 extern UDWtype __umoddi3 (UDWtype, UDWtype);
376 extern DWtype __moddi3 (DWtype, DWtype);
377 
378 /* __udivmoddi4 is static inline when building other libgcc2 portions.  */
379 #if (!defined (L_udivdi3) && !defined (L_divdi3) && \
380      !defined (L_umoddi3) && !defined (L_moddi3))
381 extern UDWtype __udivmoddi4 (UDWtype, UDWtype, UDWtype *);
382 #endif
383 
384 /* __negdi2 is static inline when building other libgcc2 portions.  */
385 #if !defined(L_divdi3) && !defined(L_moddi3)
386 extern DWtype __negdi2 (DWtype);
387 #endif
388 
389 extern DWtype __lshrdi3 (DWtype, shift_count_type);
390 extern DWtype __ashldi3 (DWtype, shift_count_type);
391 extern DWtype __ashrdi3 (DWtype, shift_count_type);
392 
393 /* __udiv_w_sdiv is static inline when building other libgcc2 portions.  */
394 #if (!defined(L_udivdi3) && !defined(L_divdi3) && \
395      !defined(L_umoddi3) && !defined(L_moddi3))
396 extern UWtype __udiv_w_sdiv (UWtype *, UWtype, UWtype, UWtype);
397 #endif
398 
399 extern cmp_return_type __cmpdi2 (DWtype, DWtype);
400 extern cmp_return_type __ucmpdi2 (DWtype, DWtype);
401 
402 #if MIN_UNITS_PER_WORD > 1
403 extern SItype __bswapsi2 (SItype);
404 #endif
405 #if __SIZEOF_LONG_LONG__ > 4
406 extern DItype __bswapdi2 (DItype);
407 #endif
408 
409 extern Wtype __absvSI2 (Wtype);
410 extern Wtype __addvSI3 (Wtype, Wtype);
411 extern Wtype __subvSI3 (Wtype, Wtype);
412 extern Wtype __mulvSI3 (Wtype, Wtype);
413 extern Wtype __negvSI2 (Wtype);
414 extern DWtype __absvDI2 (DWtype);
415 extern DWtype __addvDI3 (DWtype, DWtype);
416 extern DWtype __subvDI3 (DWtype, DWtype);
417 extern DWtype __mulvDI3 (DWtype, DWtype);
418 extern DWtype __negvDI2 (DWtype);
419 
420 #ifdef COMPAT_SIMODE_TRAPPING_ARITHMETIC
421 #define __absvsi2	__N(absvsi2)
422 #define __negvsi2	__N(negvsi2)
423 #define __addvsi3	__N(addvsi3)
424 #define __subvsi3	__N(subvsi3)
425 #define __mulvsi3	__N(mulvsi3)
426 
427 extern SItype __absvsi2 (SItype);
428 extern SItype __addvsi3 (SItype, SItype);
429 extern SItype __subvsi3 (SItype, SItype);
430 extern SItype __mulvsi3 (SItype, SItype);
431 extern SItype __negvsi2 (SItype);
432 #endif /* COMPAT_SIMODE_TRAPPING_ARITHMETIC */
433 
434 #undef int
435 #if LIBGCC2_HAS_SF_MODE
436 extern DWtype __fixsfdi (SFtype);
437 extern SFtype __floatdisf (DWtype);
438 extern SFtype __floatundisf (UDWtype);
439 extern UWtype __fixunssfSI (SFtype);
440 extern UDWtype __fixunssfDI (SFtype);
441 extern SFtype __powisf2 (SFtype, int);
442 extern SCtype __divsc3 (SFtype, SFtype, SFtype, SFtype);
443 extern SCtype __mulsc3 (SFtype, SFtype, SFtype, SFtype);
444 #endif
445 #if LIBGCC2_HAS_DF_MODE
446 extern DWtype __fixdfdi (DFtype);
447 extern DFtype __floatdidf (DWtype);
448 extern DFtype __floatundidf (UDWtype);
449 extern UWtype __fixunsdfSI (DFtype);
450 extern UDWtype __fixunsdfDI (DFtype);
451 extern DFtype __powidf2 (DFtype, int);
452 extern DCtype __divdc3 (DFtype, DFtype, DFtype, DFtype);
453 extern DCtype __muldc3 (DFtype, DFtype, DFtype, DFtype);
454 #endif
455 
456 #if LIBGCC2_HAS_XF_MODE
457 extern DWtype __fixxfdi (XFtype);
458 extern UDWtype __fixunsxfDI (XFtype);
459 extern XFtype __floatdixf (DWtype);
460 extern XFtype __floatundixf (UDWtype);
461 extern UWtype __fixunsxfSI (XFtype);
462 extern XFtype __powixf2 (XFtype, int);
463 extern XCtype __divxc3 (XFtype, XFtype, XFtype, XFtype);
464 extern XCtype __mulxc3 (XFtype, XFtype, XFtype, XFtype);
465 #endif
466 
467 #if LIBGCC2_HAS_TF_MODE
468 extern UDWtype __fixunstfDI (TFtype);
469 extern DWtype __fixtfdi (TFtype);
470 extern TFtype __floatditf (DWtype);
471 extern TFtype __floatunditf (UDWtype);
472 extern TFtype __powitf2 (TFtype, int);
473 extern TCtype __divtc3 (TFtype, TFtype, TFtype, TFtype);
474 extern TCtype __multc3 (TFtype, TFtype, TFtype, TFtype);
475 #endif
476 #define int bogus_type
477 
478 /* DWstructs are pairs of Wtype values in the order determined by
479    __BYTE_ORDER__.  */
480 
481 #if __BYTE_ORDER__ != __ORDER_LITTLE_ENDIAN__
482   struct DWstruct {Wtype high, low;};
483 #else
484   struct DWstruct {Wtype low, high;};
485 #endif
486 
487 /* We need this union to unpack/pack DImode values, since we don't have
488    any arithmetic yet.  Incoming DImode parameters are stored into the
489    `ll' field, and the unpacked result is read from the struct `s'.  */
490 
491 typedef union
492 {
493   struct DWstruct s;
494   DWtype ll;
495 } DWunion;
496 
497 /* Defined for L_popcount_tab.  Exported here because some targets may
498    want to use it for their own versions of the __popcount builtins.  */
499 extern const UQItype __popcount_tab[256];
500 
501 /* Defined for L_clz.  Exported here because some targets may want to use
502    it for their own versions of the __clz builtins.  It contains the bit
503    position of the first set bit for the numbers 0 - 255.  This avoids the
504    need for a separate table for the __ctz builtins.  */
505 extern const UQItype __clz_tab[256];
506 
507 #include "longlong.h"
508 
509 #undef int
510 extern int __clzDI2 (UDWtype);
511 extern int __clzSI2 (UWtype);
512 extern int __ctzSI2 (UWtype);
513 extern int __ctzDI2 (UDWtype);
514 extern int __clrsbSI2 (Wtype);
515 extern int __clrsbDI2 (DWtype);
516 extern int __ffsSI2 (UWtype);
517 extern int __ffsDI2 (DWtype);
518 extern int __popcountSI2 (UWtype);
519 extern int __popcountDI2 (UDWtype);
520 extern int __paritySI2 (UWtype);
521 extern int __parityDI2 (UDWtype);
522 #define int bogus_type
523 
524 extern void __enable_execute_stack (void *);
525 
526 #ifndef HIDE_EXPORTS
527 #pragma GCC visibility pop
528 #endif
529 
530 #endif /* ! GCC_LIBGCC2_H */
531