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