sys/powerpc/include/stdarg.h

   1 /*-
   2  * SPDX-License-Identifier: BSD-3-Clause
   3  *
   4  * Copyright (c) 2002 David E. O'Brien.  All rights reserved.
   5  * Copyright (c) 2000 Tsubai Masanari.  All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer.
  12  * 2. Redistributions in binary form must reproduce the above copyright
  13  *    notice, this list of conditions and the following disclaimer in the
  14  *    documentation and/or other materials provided with the distribution.
  15  * 3. The name of the author may not be used to endorse or promote products
  16  *    derived from this software without specific prior written permission.
  17  *
  18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  19  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  20  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  21  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  22  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  23  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  24  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  25  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  26  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
  27  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  28  *
  29  *      $NetBSD: stdarg.h,v 1.5 2000/02/27 17:50:21 tsubai Exp $
  30  * $FreeBSD$
  31  */
  32
  33 #ifndef _MACHINE_STDARG_H_
  34 #define _MACHINE_STDARG_H_
  35
  36 #include <sys/cdefs.h>
  37 #include <sys/_types.h>
  38
  39 #ifndef _VA_LIST_DECLARED
  40 #define _VA_LIST_DECLARED
  41 typedef __va_list       va_list;
  42 #endif
  43
  44 #if defined(__GNUCLIKE_BUILTIN_STDARG)
  45
  46 #define va_start(ap, last) \
  47         __builtin_va_start((ap), (last))
  48
  49 #define va_arg(ap, type) \
  50         __builtin_va_arg((ap), type)
  51
  52 #if __ISO_C_VISIBLE >= 1999
  53 #define va_copy(dest, src) \
  54         __builtin_va_copy((dest), (src))
  55
  56 #define __va_copy(dest, src) \
  57         va_copy((dest), (src))
  58 #endif
  59
  60 #define va_end(ap) \
  61         __builtin_va_end(ap)
  62
  63 #else   /* !__GNUCLIKE_BUILTIN_STDARG */
  64
  65 #ifdef __lint__
  66
  67 #define va_start(ap, last)      ((ap) = *(va_list *)0)
  68 #define va_arg(ap, type)        (*(type *)(void *)&(ap))
  69
  70 #else
  71
  72 #if defined(__GNUC_VA_LIST_COMPATIBILITY)
  73 #define va_start(ap, last)                                              \
  74         (__builtin_next_arg(last),                                      \
  75          __builtin_memcpy((void *)&(ap), __builtin_saveregs (),         \
  76          sizeof(__gnuc_va_list)))
  77 #else
  78 #define va_start(ap, last)                                              \
  79         (__builtin_next_arg(last),                                      \
  80          (ap).__stack = __va_stack_args,                                \
  81          (ap).__base = __va_reg_args,                                   \
  82          (ap).__gpr = __va_first_gpr,                                   \
  83          (ap).__fpr = __va_first_fpr)
  84 #endif
  85
  86 #define __va_first_gpr  (__builtin_args_info(0))
  87 #define __va_first_fpr  (__builtin_args_info(1) - 32 - 1)
  88 #define __va_stack_args                                                 \
  89         ((char *)__builtin_saveregs() +                                 \
  90          (__va_first_gpr >= 8 ? __va_first_gpr - 8 : 0) * sizeof(int))
  91 #define __va_reg_args                                                   \
  92         ((char *)__builtin_frame_address(0) + __builtin_args_info(4))
  93
  94 #define __INTEGER_TYPE_CLASS    1
  95 #define __REAL_TYPE_CLASS       8
  96 #define __RECORD_TYPE_CLASS     12
  97
  98 #define __va_longlong(type)                                             \
  99         (__builtin_classify_type(*(type *)0) == __INTEGER_TYPE_CLASS && \
 100          sizeof(type) == 8)
 101
 102 #define __va_double(type)                                               \
 103         (__builtin_classify_type(*(type *)0) == __REAL_TYPE_CLASS)
 104
 105 #define __va_struct(type)                                               \
 106         (__builtin_classify_type(*(type *)0) >= __RECORD_TYPE_CLASS)
 107
 108 #define __va_size(type)                                                 \
 109         ((sizeof(type) + sizeof(int) - 1) / sizeof(int) * sizeof(int))
 110
 111 #define __va_savedgpr(ap, type)                                         \
 112         ((ap).__base + (ap).__gpr * sizeof(int) - sizeof(type))
 113
 114 #define __va_savedfpr(ap, type)                                         \
 115         ((ap).__base + 8 * sizeof(int) + (ap).__fpr * sizeof(double) -  \
 116          sizeof(type))
 117
 118 #define __va_stack(ap, type)                                            \
 119         ((ap).__stack += __va_size(type) +                              \
 120                         (__va_longlong(type) ? (int)(ap).__stack & 4 : 0), \
 121          (ap).__stack - sizeof(type))
 122
 123 #define __va_gpr(ap, type)                                              \
 124         ((ap).__gpr += __va_size(type) / sizeof(int) +                  \
 125                       (__va_longlong(type) ? (ap).__gpr & 1 : 0),       \
 126          (ap).__gpr <= 8 ? __va_savedgpr(ap, type) : __va_stack(ap, type))
 127
 128 #define __va_fpr(ap, type)                                              \
 129         ((ap).__fpr++,                                                  \
 130          (ap).__fpr <= 8 ? __va_savedfpr(ap, type) : __va_stack(ap, type))
 131
 132 #define va_arg(ap, type)                                                \
 133         (*(type *)(__va_struct(type) ? (*(void **)__va_gpr(ap, void *)) : \
 134                    __va_double(type) ? __va_fpr(ap, type) :             \
 135                    __va_gpr(ap, type)))
 136
 137 #endif /* __lint__ */
 138
 139 #define va_end(ap)
 140
 141 #if __ISO_C_VISIBLE >= 1999
 142 #if !defined(_ANSI_SOURCE) &&                                           \
 143     (!defined(_POSIX_C_SOURCE) && !defined(_XOPEN_SOURCE) ||            \
 144      defined(_ISOC99_SOURCE) || (__STDC_VERSION__ - 0) >= 199901L)
 145 #define va_copy(dest, src)                                              \
 146         ((dest) = (src))
 147 #endif
 148 #endif
 149
 150 #endif /* __GNUCLIKE_BUILTIN_STDARG */
 151
 152 #endif /* _MACHINE_STDARG_H_ */