sys/powerpc/include/stdarg.h

   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_ */