xref: /freebsd/sys/powerpc/include/stdarg.h (revision 09e8dea79366f1e5b3a73e8a271b26e4b6bf2e6a)
1 /*-
2  * Copyright (c) 2002 David E. O'Brien.  All rights reserved.
3  * Copyright (c) 2000 Tsubai Masanari.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. The name of the author may not be used to endorse or promote products
14  *    derived from this software without specific prior written permission.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
25  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26  *
27  *	$NetBSD: stdarg.h,v 1.5 2000/02/27 17:50:21 tsubai Exp $
28  * $FreeBSD$
29  */
30 
31 #ifndef _POWERPC_STDARG_H_
32 #define	_POWERPC_STDARG_H_
33 
34 #include <machine/ansi.h>
35 
36 typedef _BSD_VA_LIST_	va_list;
37 
38 #if defined(__GNUC__) && (__GNUC__ == 2 && __GNUC_MINOR__ > 95 || __GNUC__ >= 3)
39 
40 #define	va_start(ap, last) \
41 	__builtin_stdarg_start((ap), (last))
42 
43 #define	va_arg(ap, type) \
44 	__builtin_va_arg((ap), type)
45 
46 #define	va_end(ap) \
47 	__builtin_va_end(ap)
48 
49 #else	/* ! __GNUC__ post GCC 2.95 */
50 
51 #ifdef __lint__
52 
53 #define	va_start(ap, last)	((ap) = *(va_list *)0)
54 #define	va_arg(ap, type)	(*(type *)(void *)&(ap))
55 
56 #else
57 
58 #if defined(__GNUC__) && (__GNUC__ > 2 || __GNUC__ == 2 && __GNUC_MINOR__ >= 95)
59 #define	va_start(ap, last)						\
60 	(__builtin_next_arg(last),					\
61 	 __builtin_memcpy((void *)&(ap), __builtin_saveregs (),		\
62 	 sizeof(__gnuc_va_list)))
63 #else
64 #define	va_start(ap, last)						\
65 	(__builtin_next_arg(last),					\
66 	 (ap).__stack = __va_stack_args,				\
67 	 (ap).__base = __va_reg_args,					\
68 	 (ap).__gpr = __va_first_gpr,					\
69 	 (ap).__fpr = __va_first_fpr)
70 #endif
71 
72 #define	__va_first_gpr	(__builtin_args_info(0))
73 #define	__va_first_fpr	(__builtin_args_info(1) - 32 - 1)
74 #define	__va_stack_args							\
75 	((char *)__builtin_saveregs() +					\
76 	 (__va_first_gpr >= 8 ? __va_first_gpr - 8 : 0) * sizeof(int))
77 #define	__va_reg_args							\
78 	((char *)__builtin_frame_address(0) + __builtin_args_info(4))
79 
80 #define	__INTEGER_TYPE_CLASS	1
81 #define	__REAL_TYPE_CLASS	8
82 #define	__RECORD_TYPE_CLASS	12
83 
84 #define	__va_longlong(type)						\
85 	(__builtin_classify_type(*(type *)0) == __INTEGER_TYPE_CLASS &&	\
86 	 sizeof(type) == 8)
87 
88 #define	__va_double(type)						\
89 	(__builtin_classify_type(*(type *)0) == __REAL_TYPE_CLASS)
90 
91 #define	__va_struct(type)						\
92 	(__builtin_classify_type(*(type *)0) >= __RECORD_TYPE_CLASS)
93 
94 #define	__va_size(type)							\
95 	((sizeof(type) + sizeof(int) - 1) / sizeof(int) * sizeof(int))
96 
97 #define	__va_savedgpr(ap, type)						\
98 	((ap).__base + (ap).__gpr * sizeof(int) - sizeof(type))
99 
100 #define	__va_savedfpr(ap, type)						\
101 	((ap).__base + 8 * sizeof(int) + (ap).__fpr * sizeof(double) -	\
102 	 sizeof(type))
103 
104 #define	__va_stack(ap, type)						\
105 	((ap).__stack += __va_size(type) +				\
106 			(__va_longlong(type) ? (int)(ap).__stack & 4 : 0), \
107 	 (ap).__stack - sizeof(type))
108 
109 #define	__va_gpr(ap, type)						\
110 	((ap).__gpr += __va_size(type) / sizeof(int) +			\
111 		      (__va_longlong(type) ? (ap).__gpr & 1 : 0),	\
112 	 (ap).__gpr <= 8 ? __va_savedgpr(ap, type) : __va_stack(ap, type))
113 
114 #define	__va_fpr(ap, type)						\
115 	((ap).__fpr++,							\
116 	 (ap).__fpr <= 8 ? __va_savedfpr(ap, type) : __va_stack(ap, type))
117 
118 #define	va_arg(ap, type)						\
119 	(*(type *)(__va_struct(type) ? (*(void **)__va_gpr(ap, void *)) : \
120 		   __va_double(type) ? __va_fpr(ap, type) :		\
121 		   __va_gpr(ap, type)))
122 
123 #endif /* __lint__ */
124 
125 #define	va_end(ap)
126 
127 #if !defined(_ANSI_SOURCE) &&						\
128     (!defined(_POSIX_C_SOURCE) && !defined(_XOPEN_SOURCE) ||		\
129      defined(_ISOC99_SOURCE) || (__STDC_VERSION__ - 0) >= 199901L)
130 #define	va_copy(dest, src)						\
131 	((dest) = (src))
132 #endif
133 
134 #endif /* __GNUC__ post GCC 2.95 */
135 
136 #endif /* _POWERPC_STDARG_H_ */
137