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 _MACHINE_STDARG_H_
32#define	_MACHINE_STDARG_H_
33
34#include <sys/cdefs.h>
35#include <sys/_types.h>
36
37#ifndef _VA_LIST_DECLARED
38#define	_VA_LIST_DECLARED
39typedef	__va_list	va_list;
40#endif
41
42#if defined(__GNUCLIKE_BUILTIN_STDARG)
43
44#define	va_start(ap, last) \
45	__builtin_va_start((ap), (last))
46
47#define	va_arg(ap, type) \
48	__builtin_va_arg((ap), type)
49
50#if __ISO_C_VISIBLE >= 1999
51#define	va_copy(dest, src) \
52	__builtin_va_copy((dest), (src))
53
54#define	__va_copy(dest, src) \
55	va_copy((dest), (src))
56#endif
57
58#define	va_end(ap) \
59	__builtin_va_end(ap)
60
61#else	/* !__GNUCLIKE_BUILTIN_STDARG */
62
63#ifdef __lint__
64
65#define	va_start(ap, last)	((ap) = *(va_list *)0)
66#define	va_arg(ap, type)	(*(type *)(void *)&(ap))
67
68#else
69
70#if defined(__GNUC_VA_LIST_COMPATIBILITY)
71#define	va_start(ap, last)						\
72	(__builtin_next_arg(last),					\
73	 __builtin_memcpy((void *)&(ap), __builtin_saveregs (),		\
74	 sizeof(__gnuc_va_list)))
75#else
76#define	va_start(ap, last)						\
77	(__builtin_next_arg(last),					\
78	 (ap).__stack = __va_stack_args,				\
79	 (ap).__base = __va_reg_args,					\
80	 (ap).__gpr = __va_first_gpr,					\
81	 (ap).__fpr = __va_first_fpr)
82#endif
83
84#define	__va_first_gpr	(__builtin_args_info(0))
85#define	__va_first_fpr	(__builtin_args_info(1) - 32 - 1)
86#define	__va_stack_args							\
87	((char *)__builtin_saveregs() +					\
88	 (__va_first_gpr >= 8 ? __va_first_gpr - 8 : 0) * sizeof(int))
89#define	__va_reg_args							\
90	((char *)__builtin_frame_address(0) + __builtin_args_info(4))
91
92#define	__INTEGER_TYPE_CLASS	1
93#define	__REAL_TYPE_CLASS	8
94#define	__RECORD_TYPE_CLASS	12
95
96#define	__va_longlong(type)						\
97	(__builtin_classify_type(*(type *)0) == __INTEGER_TYPE_CLASS &&	\
98	 sizeof(type) == 8)
99
100#define	__va_double(type)						\
101	(__builtin_classify_type(*(type *)0) == __REAL_TYPE_CLASS)
102
103#define	__va_struct(type)						\
104	(__builtin_classify_type(*(type *)0) >= __RECORD_TYPE_CLASS)
105
106#define	__va_size(type)							\
107	((sizeof(type) + sizeof(int) - 1) / sizeof(int) * sizeof(int))
108
109#define	__va_savedgpr(ap, type)						\
110	((ap).__base + (ap).__gpr * sizeof(int) - sizeof(type))
111
112#define	__va_savedfpr(ap, type)						\
113	((ap).__base + 8 * sizeof(int) + (ap).__fpr * sizeof(double) -	\
114	 sizeof(type))
115
116#define	__va_stack(ap, type)						\
117	((ap).__stack += __va_size(type) +				\
118			(__va_longlong(type) ? (int)(ap).__stack & 4 : 0), \
119	 (ap).__stack - sizeof(type))
120
121#define	__va_gpr(ap, type)						\
122	((ap).__gpr += __va_size(type) / sizeof(int) +			\
123		      (__va_longlong(type) ? (ap).__gpr & 1 : 0),	\
124	 (ap).__gpr <= 8 ? __va_savedgpr(ap, type) : __va_stack(ap, type))
125
126#define	__va_fpr(ap, type)						\
127	((ap).__fpr++,							\
128	 (ap).__fpr <= 8 ? __va_savedfpr(ap, type) : __va_stack(ap, type))
129
130#define	va_arg(ap, type)						\
131	(*(type *)(__va_struct(type) ? (*(void **)__va_gpr(ap, void *)) : \
132		   __va_double(type) ? __va_fpr(ap, type) :		\
133		   __va_gpr(ap, type)))
134
135#endif /* __lint__ */
136
137#define	va_end(ap)
138
139#if __ISO_C_VISIBLE >= 1999
140#if !defined(_ANSI_SOURCE) &&						\
141    (!defined(_POSIX_C_SOURCE) && !defined(_XOPEN_SOURCE) ||		\
142     defined(_ISOC99_SOURCE) || (__STDC_VERSION__ - 0) >= 199901L)
143#define	va_copy(dest, src)						\
144	((dest) = (src))
145#endif
146#endif
147
148#endif /* __GNUCLIKE_BUILTIN_STDARG */
149
150#endif /* _MACHINE_STDARG_H_ */
151