NetBSD-5.0.2/sys/arch/powerpc/include/stdarg.h

/*	$NetBSD: stdarg.h,v 1.16 2008/06/21 00:56:39 gmcgarry Exp $	*/

/*-
 * Copyright (c) 2000 Tsubai Masanari.  All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. The name of the author may not be used to endorse or promote products
 *    derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */

#ifndef _POWERPC_STDARG_H_
#define _POWERPC_STDARG_H_

#include <machine/ansi.h>
#include <sys/featuretest.h>

#if 0
typedef struct {
	char __gpr;	/* GPR offset */
	char __fpr;	/* FPR offset */
	char __pad[2];
	char *__stack;	/* args passed on stack */
	char *__base;	/* args passed by registers (r3-r10, f1-f8) */
} va_list;
#endif

typedef _BSD_VA_LIST_	va_list;

#ifdef __lint__

#define va_start(ap, last)	((ap) = *(va_list *)0)
#define va_arg(ap, type)	(*(type *)(void *)&(ap))
#define va_end(ap)
#define __va_copy(dest, src)	((dest) = (src))

#elif __GNUC_PREREQ__(3, 0)

#define va_start(ap, last)	__builtin_stdarg_start((ap), last)
#define va_arg(ap, type)	__builtin_va_arg((ap), type)
#define va_end(ap)		__builtin_va_end((ap))
#define __va_copy(dest, src)	__builtin_va_copy((dest), (src))

#elif defined(__PCC__)

#define va_start(ap, last)	__builtin_stdarg_start((ap), last)
#define va_arg(ap, type)	__builtin_va_arg((ap), type)
#define va_end(ap)		__builtin_va_end((ap))
#define __va_copy(dest, src)	__builtin_va_copy((dest), (src))

#else

#if __GNUC_PREREQ__(2, 95)
#define va_start(ap, last)						\
	(__builtin_next_arg(last),					\
	 (ap) = *(va_list *)__builtin_saveregs())
#else
#define va_start(ap, last)						\
	(__builtin_next_arg(last),					\
	 (ap).__stack = __va_stack_args,				\
	 (ap).__base = __va_reg_args,					\
	 (ap).__gpr = __va_first_gpr,					\
	 (ap).__fpr = __va_first_fpr)

#define __va_first_gpr	(__builtin_args_info(0))
#define __va_first_fpr	(__builtin_args_info(1) - 32 - 1)
#define __va_stack_args							\
	((char *)__builtin_saveregs() +					\
	 (__va_first_gpr >= 8 ? __va_first_gpr - 8 : 0) * sizeof(int))
#define __va_reg_args							\
	((char *)__builtin_frame_address(0) + __builtin_args_info(4))
#endif /* 2.95 */

/* From gcc/typeclass.h */
#define __INTEGER_TYPE_CLASS	1
#define __REAL_TYPE_CLASS	8
#define __RECORD_TYPE_CLASS	12

#if __GNUC_PREREQ__(2, 95)
#define __va_longlong(type)						\
	(sizeof(type) == 8 &&						\
	 (__builtin_classify_type(*(type *)0) == __REAL_TYPE_CLASS ||	\
	  __builtin_classify_type(*(type *)0) == __INTEGER_TYPE_CLASS))
#else
/* XXX gcc bug compatibility */
#define __va_longlong(type)						\
	(__builtin_classify_type(*(type *)0) == __INTEGER_TYPE_CLASS &&	\
	 sizeof(type) == 8)
#endif

#ifdef _SOFT_FLOAT
#define __va_double(type)	0
#else
#define __va_double(type)						\
	(__builtin_classify_type(*(type *)0) == __REAL_TYPE_CLASS)
#endif

#define __va_struct(type)						\
	(__builtin_classify_type(*(type *)0) >= __RECORD_TYPE_CLASS)

#define __va_size(type)							\
	((sizeof(type) + sizeof(int) - 1) / sizeof(int) * sizeof(int))

#define __va_savedgpr(ap, type)						\
	((ap).__base + (ap).__gpr * sizeof(int) - sizeof(type))

#define __va_savedfpr(ap, type)						\
	((ap).__base + 8 * sizeof(int) + (ap).__fpr * sizeof(double) -	\
	 sizeof(type))

#define __va_stack(ap, type)						\
	((ap).__stack += __va_size(type) +				\
			(__va_longlong(type) ? (int)(ap).__stack & 4 : 0), \
	 (ap).__stack - sizeof(type))

#define __va_gpr(ap, type)						\
	((ap).__gpr += __va_size(type) / sizeof(int) +			\
		      (__va_longlong(type) ? (ap).__gpr & 1 : 0),	\
	 (ap).__gpr <= 8 ? __va_savedgpr(ap, type) : __va_stack(ap, type))

#define __va_fpr(ap, type)						\
	((ap).__fpr++,							\
	 (ap).__fpr <= 8 ? __va_savedfpr(ap, type) : __va_stack(ap, type))

#define va_arg(ap, type)						\
	(*(type *)(__va_struct(type) ? (*(void **)__va_gpr(ap, void *)) : \
		   __va_double(type) ? __va_fpr(ap, type) :		\
		   __va_gpr(ap, type)))

#define va_end(ap)
#define __va_copy(dest, src)	((dest) = (src))

#endif /* __lint__ */

#if !defined(_ANSI_SOURCE) &&						\
    (defined(_ISOC99_SOURCE) || (__STDC_VERSION__ - 0) >= 199901L ||	\
     defined(_NETBSD_SOURCE))
#define va_copy(dest, src)	__va_copy(dest, src)
#endif

#endif /* _POWERPC_STDARG_H_ */