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 39 typedef __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