stdarg.h revision 131687
1251881Speter/*- 2251881Speter * Copyright (c) 2002 David E. O'Brien. All rights reserved. 3251881Speter * Copyright (c) 2000 Tsubai Masanari. All rights reserved. 4251881Speter * 5251881Speter * Redistribution and use in source and binary forms, with or without 6251881Speter * modification, are permitted provided that the following conditions 7251881Speter * are met: 8251881Speter * 1. Redistributions of source code must retain the above copyright 9251881Speter * notice, this list of conditions and the following disclaimer. 10251881Speter * 2. Redistributions in binary form must reproduce the above copyright 11251881Speter * notice, this list of conditions and the following disclaimer in the 12251881Speter * documentation and/or other materials provided with the distribution. 13251881Speter * 3. The name of the author may not be used to endorse or promote products 14251881Speter * derived from this software without specific prior written permission. 15251881Speter * 16251881Speter * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 17251881Speter * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 18251881Speter * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 19251881Speter * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 20251881Speter * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 21251881Speter * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 22251881Speter * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 23251881Speter * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 24251881Speter * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE 25251881Speter * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 26251881Speter * 27251881Speter * $NetBSD: stdarg.h,v 1.5 2000/02/27 17:50:21 tsubai Exp $ 28251881Speter * $FreeBSD: head/sys/powerpc/include/stdarg.h 131687 2004-07-06 07:47:09Z obrien $ 29251881Speter */ 30251881Speter 31251881Speter#ifndef _MACHINE_STDARG_H_ 32251881Speter#define _MACHINE_STDARG_H_ 33251881Speter 34251881Speter#include <sys/cdefs.h> 35251881Speter#include <sys/_types.h> 36251881Speter 37251881Speter#ifndef _VA_LIST_DECLARED 38251881Speter#define _VA_LIST_DECLARED 39251881Spetertypedef __va_list va_list; 40251881Speter#endif 41251881Speter 42251881Speter#if defined(__GNUC__) && (__GNUC__ == 2 && __GNUC_MINOR__ > 95 || __GNUC__ >= 3) 43251881Speter 44251881Speter#define va_start(ap, last) \ 45251881Speter __builtin_stdarg_start((ap), (last)) 46251881Speter 47251881Speter#define va_arg(ap, type) \ 48251881Speter __builtin_va_arg((ap), type) 49251881Speter 50251881Speter#if __ISO_C_VISIBLE >= 1999 51251881Speter#define va_copy(dest, src) \ 52251881Speter __builtin_va_copy((dest), (src)) 53251881Speter 54251881Speter#define __va_copy(dest, src) \ 55251881Speter va_copy((dest), (src)) 56251881Speter#endif 57251881Speter 58251881Speter#define va_end(ap) \ 59251881Speter __builtin_va_end(ap) 60251881Speter 61251881Speter#else /* ! __GNUC__ post GCC 2.95 */ 62251881Speter 63251881Speter#ifdef __lint__ 64251881Speter 65251881Speter#define va_start(ap, last) ((ap) = *(va_list *)0) 66251881Speter#define va_arg(ap, type) (*(type *)(void *)&(ap)) 67251881Speter 68251881Speter#else 69251881Speter 70251881Speter#if defined(__GNUC__) && (__GNUC__ > 2 || __GNUC__ == 2 && __GNUC_MINOR__ >= 95) 71251881Speter#define va_start(ap, last) \ 72251881Speter (__builtin_next_arg(last), \ 73251881Speter __builtin_memcpy((void *)&(ap), __builtin_saveregs (), \ 74251881Speter sizeof(__gnuc_va_list))) 75251881Speter#else 76251881Speter#define va_start(ap, last) \ 77251881Speter (__builtin_next_arg(last), \ 78251881Speter (ap).__stack = __va_stack_args, \ 79251881Speter (ap).__base = __va_reg_args, \ 80251881Speter (ap).__gpr = __va_first_gpr, \ 81251881Speter (ap).__fpr = __va_first_fpr) 82251881Speter#endif 83251881Speter 84251881Speter#define __va_first_gpr (__builtin_args_info(0)) 85251881Speter#define __va_first_fpr (__builtin_args_info(1) - 32 - 1) 86251881Speter#define __va_stack_args \ 87251881Speter ((char *)__builtin_saveregs() + \ 88251881Speter (__va_first_gpr >= 8 ? __va_first_gpr - 8 : 0) * sizeof(int)) 89251881Speter#define __va_reg_args \ 90251881Speter ((char *)__builtin_frame_address(0) + __builtin_args_info(4)) 91251881Speter 92251881Speter#define __INTEGER_TYPE_CLASS 1 93251881Speter#define __REAL_TYPE_CLASS 8 94251881Speter#define __RECORD_TYPE_CLASS 12 95251881Speter 96251881Speter#define __va_longlong(type) \ 97251881Speter (__builtin_classify_type(*(type *)0) == __INTEGER_TYPE_CLASS && \ 98251881Speter sizeof(type) == 8) 99251881Speter 100251881Speter#define __va_double(type) \ 101251881Speter (__builtin_classify_type(*(type *)0) == __REAL_TYPE_CLASS) 102251881Speter 103251881Speter#define __va_struct(type) \ 104251881Speter (__builtin_classify_type(*(type *)0) >= __RECORD_TYPE_CLASS) 105251881Speter 106251881Speter#define __va_size(type) \ 107251881Speter ((sizeof(type) + sizeof(int) - 1) / sizeof(int) * sizeof(int)) 108251881Speter 109251881Speter#define __va_savedgpr(ap, type) \ 110251881Speter ((ap).__base + (ap).__gpr * sizeof(int) - sizeof(type)) 111251881Speter 112251881Speter#define __va_savedfpr(ap, type) \ 113251881Speter ((ap).__base + 8 * sizeof(int) + (ap).__fpr * sizeof(double) - \ 114251881Speter sizeof(type)) 115251881Speter 116251881Speter#define __va_stack(ap, type) \ 117251881Speter ((ap).__stack += __va_size(type) + \ 118251881Speter (__va_longlong(type) ? (int)(ap).__stack & 4 : 0), \ 119251881Speter (ap).__stack - sizeof(type)) 120251881Speter 121251881Speter#define __va_gpr(ap, type) \ 122251881Speter ((ap).__gpr += __va_size(type) / sizeof(int) + \ 123251881Speter (__va_longlong(type) ? (ap).__gpr & 1 : 0), \ 124251881Speter (ap).__gpr <= 8 ? __va_savedgpr(ap, type) : __va_stack(ap, type)) 125251881Speter 126251881Speter#define __va_fpr(ap, type) \ 127251881Speter ((ap).__fpr++, \ 128251881Speter (ap).__fpr <= 8 ? __va_savedfpr(ap, type) : __va_stack(ap, type)) 129251881Speter 130251881Speter#define va_arg(ap, type) \ 131251881Speter (*(type *)(__va_struct(type) ? (*(void **)__va_gpr(ap, void *)) : \ 132251881Speter __va_double(type) ? __va_fpr(ap, type) : \ 133251881Speter __va_gpr(ap, type))) 134251881Speter 135251881Speter#endif /* __lint__ */ 136251881Speter 137251881Speter#define va_end(ap) 138251881Speter 139251881Speter#if __ISO_C_VISIBLE >= 1999 140251881Speter#if !defined(_ANSI_SOURCE) && \ 141251881Speter (!defined(_POSIX_C_SOURCE) && !defined(_XOPEN_SOURCE) || \ 142251881Speter defined(_ISOC99_SOURCE) || (__STDC_VERSION__ - 0) >= 199901L) 143251881Speter#define va_copy(dest, src) \ 144251881Speter ((dest) = (src)) 145251881Speter#endif 146251881Speter#endif 147251881Speter 148251881Speter#endif /* __GNUC__ post GCC 2.95 */ 149251881Speter 150251881Speter#endif /* _MACHINE_STDARG_H_ */ 151251881Speter