rbdc 0.8.7 → 0.9.0

data/dyncall/dyncall/dyncall_callvm_ppc64.h

@@ -0,0 +1,60 @@
+/*
+
+ Package: dyncall
+ Library: dyncall
+ File: dyncall/dyncall_callvm_ppc64.h
+ Description: 
+ License:
+
+   Copyright (c) 2014-2015 Masanori Mitsugi <mitsugi@linux.vnet.ibm.com>
+
+   Permission to use, copy, modify, and distribute this software for any
+   purpose with or without fee is hereby granted, provided that the above
+   copyright notice and this permission notice appear in all copies.
+
+   THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+   WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+   MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+   ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+   WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+   ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
+   OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+
+*/
+
+
+#ifndef DYNCALL_CALLVM_PPC64_H
+#define DYNCALL_CALLVM_PPC64_H
+
+/*
+
+  dyncall callvm for 64bit ppc architectures
+
+  SUPPORTED CALLING CONVENTIONS
+  standard and ... (ellipsis) calls
+
+  REVISION
+  2014/08/07 initial
+
+*/
+
+
+#include "dyncall_call_ppc64.h"
+#include "dyncall_callvm.h"
+#include "dyncall_vector.h"
+
+typedef struct DCCallVM_ppc64_ DCCallVM_ppc64;
+
+struct DCCallVM_ppc64_
+{
+  DCCallVM  mInterface;
+  int       mIntRegs;
+  int       mFloatRegs;
+  struct DCRegData_ppc64_ mRegData;
+  DCVecHead mVecHead;
+};
+
+DCCallVM* dcNewCallVM_ppc64(DCsize size);
+
+#endif /* DYNCALL_CALLVM_PPC64_H */
+

data/dyncall/dyncall/dyncall_callvm_sparc.c

@@ -6,7 +6,7 @@
  Description: Call VM for sparc processor architecture.
  License:
 
-   Copyright (c) 2011 Daniel Adler <dadler@uni-goettingen.de>
+   Copyright (c) 2011-2015 Daniel Adler <dadler@uni-goettingen.de>
 
    Permission to use, copy, modify, and distribute this software for any
    purpose with or without fee is hereby granted, provided that the above
@@ -23,6 +23,7 @@
 */
 
 
+
 #include "dyncall_callvm_sparc.h"
 #include "dyncall_call_sparc.h"
 #include "dyncall_utils.h"

data/dyncall/dyncall/dyncall_callvm_sparc.h

@@ -6,7 +6,7 @@
  Description: Call VM for sparc processor architecture.
  License:
 
-   Copyright (c) 2011 Daniel Adler <dadler@uni-goettingen.de>
+   Copyright (c) 2011-2015 Daniel Adler <dadler@uni-goettingen.de>
 
    Permission to use, copy, modify, and distribute this software for any
    purpose with or without fee is hereby granted, provided that the above
@@ -23,6 +23,7 @@
 */
 
 
+
 #ifndef DYNCALL_CALLVM_SPARC_H
 #define DYNCALL_CALLVM_SPARC_H
 

data/dyncall/dyncall/dyncall_callvm_sparc64.c

@@ -6,7 +6,7 @@
  Description: Call VM for sparc64 64-bit processor architecture.
  License:
 
-   Copyright (c) 2011 Daniel Adler <dadler@uni-goettingen.de>
+   Copyright (c) 2011-2015 Daniel Adler <dadler@uni-goettingen.de>
 
    Permission to use, copy, modify, and distribute this software for any
    purpose with or without fee is hereby granted, provided that the above
@@ -23,9 +23,9 @@
 */
 
 
+
 #include "dyncall_callvm_sparc64.h"
 #include "dyncall_call_sparc64.h"
-#include "dyncall_utils.h"
 #include "dyncall_alloc.h"
 
 #define IREGS 6

data/dyncall/dyncall/dyncall_callvm_sparc64.h

@@ -6,7 +6,7 @@
  Description: Call VM for sparc64 processor architecture.
  License:
 
-   Copyright (c) 2011 Daniel Adler <dadler@uni-goettingen.de>
+   Copyright (c) 2011-2015 Daniel Adler <dadler@uni-goettingen.de>
 
    Permission to use, copy, modify, and distribute this software for any
    purpose with or without fee is hereby granted, provided that the above
@@ -23,6 +23,7 @@
 */
 
 
+
 #ifndef DYNCALL_CALLVM_SPARC_H
 #define DYNCALL_CALLVM_SPARC_H
 

data/dyncall/dyncall/dyncall_callvm_sparc_v9.c

@@ -2,11 +2,11 @@
 
  Package: dyncall
  Library: dyncall
- File: dyncall/dyncall_callvm_v9.c
+ File: dyncall/dyncall_callvm_sparc_v9.c
  Description: Call VM for sparc-v9 ABI.
  License:
 
-   Copyright (c) 2011 Daniel Adler <dadler@uni-goettingen.de>
+   Copyright (c) 2011-2015 Daniel Adler <dadler@uni-goettingen.de>
 
    Permission to use, copy, modify, and distribute this software for any
    purpose with or without fee is hereby granted, provided that the above
@@ -23,9 +23,9 @@
 */
 
 
+
 #include "dyncall_callvm_sparc_v9.h"
 #include "dyncall_call_sparc_v9.h"
-#include "dyncall_utils.h"
 #include "dyncall_alloc.h"
 
 /* Reset argument buffer. */

data/dyncall/dyncall/dyncall_callvm_sparc_v9.h

@@ -6,7 +6,7 @@
  Description: Call VM for sparc-v9 ABI.
  License:
 
-   Copyright (c) 2011 Daniel Adler <dadler@uni-goettingen.de>
+   Copyright (c) 2011-2015 Daniel Adler <dadler@uni-goettingen.de>
 
    Permission to use, copy, modify, and distribute this software for any
    purpose with or without fee is hereby granted, provided that the above
@@ -23,6 +23,7 @@
 */
 
 
+
 #ifndef DYNCALL_CALLVM_SPARC_V9_H
 #define DYNCALL_CALLVM_SPARC_V9_H
 

data/dyncall/dyncall/dyncall_callvm_x64.c

@@ -6,7 +6,7 @@
  Description: 
  License:
 
-   Copyright (c) 2007-2011 Daniel Adler <dadler@uni-goettingen.de>, 
+   Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>, 
                            Tassilo Philipp <tphilipp@potion-studios.com>
 
    Permission to use, copy, modify, and distribute this software for any
@@ -25,6 +25,7 @@
 
 
 
+
 /* MS Windows x64 calling convention, AMD64 SystemV ABI. */
 
 

data/dyncall/dyncall/dyncall_callvm_x64.h

@@ -6,7 +6,7 @@
  Description: 
  License:
 
-   Copyright (c) 2007-2011 Daniel Adler <dadler@uni-goettingen.de>, 
+   Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>, 
                            Tassilo Philipp <tphilipp@potion-studios.com>
 
    Permission to use, copy, modify, and distribute this software for any
@@ -24,6 +24,7 @@
 */
 
 
+
 /*
 
   dyncall callvm for x64 architecture

data/dyncall/dyncall/dyncall_callvm_x86.c

@@ -6,7 +6,7 @@
  Description: Call VM for x86 architecture implementation
  License:
 
-   Copyright (c) 2007-2011 Daniel Adler <dadler@uni-goettingen.de>, 
+   Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>, 
                            Tassilo Philipp <tphilipp@potion-studios.com>
 
    Permission to use, copy, modify, and distribute this software for any
@@ -24,6 +24,7 @@
 */
 
 
+
 #include "dyncall_callvm_x86.h"
 #include "dyncall_alloc.h"
 

data/dyncall/dyncall/dyncall_callvm_x86.h

@@ -6,7 +6,7 @@
  Description: Call virtual machine for x86 architecture header
  License:
 
-   Copyright (c) 2007-2011 Daniel Adler <dadler@uni-goettingen.de>, 
+   Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>, 
                            Tassilo Philipp <tphilipp@potion-studios.com>
 
    Permission to use, copy, modify, and distribute this software for any
@@ -24,6 +24,7 @@
 */
 
 
+
 #ifndef DYNCALL_CALLVM_X86_H
 #define DYNCALL_CALLVM_X86_H
 

data/dyncall/dyncall/dyncall_config.h

@@ -6,7 +6,7 @@
  Description: Macro configuration file for non-standard C types
  License:
 
-   Copyright (c) 2007-2011 Daniel Adler <dadler@uni-goettingen.de>, 
+   Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>, 
                            Tassilo Philipp <tphilipp@potion-studios.com>
 
    Permission to use, copy, modify, and distribute this software for any
@@ -24,6 +24,7 @@
 */
 
 
+
 /*
 
   dyncall type configuration

data/dyncall/dyncall/dyncall_macros.h

@@ -6,7 +6,7 @@
  Description: Platform detection macros
  License:
 
-   Copyright (c) 2007-2011 Daniel Adler <dadler@uni-goettingen.de>, 
+   Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>, 
                            Tassilo Philipp <tphilipp@potion-studios.com>
 
    Permission to use, copy, modify, and distribute this software for any
@@ -24,6 +24,7 @@
 */
 
 
+
 /*
 
   dyncall macros
@@ -168,22 +169,26 @@
 /* Architecture. */
 
 /* Check architecture. */
-#if defined(_M_IX86) || defined(__i386__) || defined(__i486__) || defined(__i586__) || defined(__i686__) || defined(__386__) || defined(__i386)
-# define DC__Arch_Intel_x86
-#elif defined(_M_X64_) || defined(_M_AMD64) || defined(__amd64__) || defined(__amd64) || defined(__x86_64__) || defined(__x86_64) 
+#if defined(_M_X64_) || defined(_M_AMD64) || defined(__amd64__) || defined(__amd64) || defined(__x86_64__) || defined(__x86_64) 
 # define DC__Arch_AMD64
+#elif defined(_M_IX86) || defined(__i386__) || defined(__i486__) || defined(__i586__) || defined(__i686__) || defined(__386__) || defined(__i386)
+# define DC__Arch_Intel_x86
 #elif defined(_M_IA64) || defined(__ia64__)
 # define DC__Arch_Itanium
 #elif defined(_M_PPC) || defined(__powerpc__) || defined(__powerpc) || defined(__POWERPC__) || defined(__ppc__) || defined(__power__)
-# define DC__Arch_PowerPC
-#elif defined(__ppc64__) || defined(_ARCH_PPC64) || defined(__power64__)
-# define DC__Arch_PPC64
+# if defined(__ppc64__) || defined(_ARCH_PPC64) || defined(__power64__) || defined(__powerpc64__)
+#   define DC__Arch_PPC64
+# else
+#   define DC__Arch_PPC32
+# endif
 #elif defined(__mips64__) || defined(__mips64)
 # define DC__Arch_MIPS64
 #elif defined(_M_MRX000) || defined(__mips__) || defined(__mips) || defined(_mips)
 # define DC__Arch_MIPS
-#elif defined(__arm__) 
+#elif defined(__arm__)
 # define DC__Arch_ARM
+#elif defined(__aarch64__)
+# define DC__Arch_ARM64
 #elif defined(__sh__)
 # define DC__Arch_SuperH
 #elif defined(__sparcv9) || defined(__sparc64__) || ( defined(__sparc) && defined(__arch64__) ) 
@@ -209,7 +214,7 @@
 
 
 
-/* Misc machine-dependent quirks. */
+/* Misc machine-dependent modes, ABIs, etc.. */
 
 #if defined(__arm__) && !defined(__thumb__)
 # define DC__Arch_ARM_ARM
@@ -241,6 +246,38 @@
 # endif
 #endif /* MIPS */
 
+#if defined(DC__Arch_PPC64)
+# if defined(_CALL_ELF)
+#  define DC__ABI_PPC64_ELF_V _CALL_ELF
+# else
+#  define DC__ABI_PPC64_ELF_V 0 /* 0 means not explicitly set, otherwise this is 1 (big endian) and 2 (little endian) */
+# endif
+#endif /* MIPS */
+
+
+/* Endian detection. */
+#if defined(DC__Arch_Intel_x86) || defined(DC__Arch_AMD64) /* always little */
+# define DC__Endian_LITTLE
+#elif defined(DC__Arch_Sparc)                              /*always big until v9*/
+# define DC__Endian_BIG
+#else                                                      /* all others are bi-endian */
+/* @@@check flags used on following bi-endianness archs:
+DC__Arch_ARM
+DC__Arch_ARM64
+DC__Arch_Itanium
+DC__Arch_MIPS
+DC__Arch_MIPS64
+DC__Arch_PPC32
+DC__Arch_PPC64
+DC__Arch_Sparcv9
+DC__Arch_SuperH
+*/
+# if (defined(DC__Arch_PPC64) && (DC__ABI_PPC64_ELF_V == 1)) || defined(_BIG_ENDIAN) || defined(MIPSEB)
+#  define DC__Endian_BIG
+# elif (defined(DC__Arch_PPC64) && (DC__ABI_PPC64_ELF_V == 2)) || defined(_LITTLE_ENDIAN) || defined(MIPSEL)
+#  define DC__Endian_LITTLE
+# endif /* no else, leave unset if not sure */
+#endif
 
 
 /* Internal macro/tag. */

data/dyncall/dyncall/dyncall_signature.h

@@ -6,7 +6,7 @@
  Description: Type and calling-convention signature character defines
  License:
 
-   Copyright (c) 2007-2011 Daniel Adler <dadler@uni-goettingen.de>, 
+   Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>, 
                            Tassilo Philipp <tphilipp@potion-studios.com>
 
    Permission to use, copy, modify, and distribute this software for any
@@ -24,6 +24,7 @@
 */
 
 
+
 /*
 
   dyncall signature characters

data/dyncall/dyncall/dyncall_struct.c

@@ -6,7 +6,7 @@
  Description: C interface to compute struct size
  License:
 
-   Copyright (c) 2010-2011 Olivier Chafik <olivier.chafik@centraliens.net>
+   Copyright (c) 2010-2015 Olivier Chafik <olivier.chafik@centraliens.net>
 
    Permission to use, copy, modify, and distribute this software for any
    purpose with or without fee is hereby granted, provided that the above
@@ -23,6 +23,7 @@
 */
 
 
+
 #include "dyncall.h"
 #include "dyncall_signature.h"
 #include "dyncall_struct.h"

data/dyncall/dyncall/dyncall_struct.h

@@ -6,7 +6,7 @@
  Description: C interface to compute struct size
  License:
 
-   Copyright (c) 2010-2011 Olivier Chafik <olivier.chafik@centraliens.net>
+   Copyright (c) 2010-2015 Olivier Chafik <olivier.chafik@centraliens.net>
 
    Permission to use, copy, modify, and distribute this software for any
    purpose with or without fee is hereby granted, provided that the above
@@ -23,6 +23,7 @@
 */
 
 
+
 /*
 
   dyncall struct metadata structures

data/dyncall/dyncall/dyncall_types.h

@@ -6,7 +6,7 @@
  Description: Typedefs
  License:
 
-   Copyright (c) 2007-2011 Daniel Adler <dadler@uni-goettingen.de>, 
+   Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>, 
                            Tassilo Philipp <tphilipp@potion-studios.com>
 
    Permission to use, copy, modify, and distribute this software for any
@@ -24,6 +24,7 @@
 */
 
 
+
 /*
 
   dyncall argument- and return-types

data/dyncall/dyncall/dyncall_utils.h

@@ -6,7 +6,7 @@
  Description: Type and calling-convention signature character defines
  License:
 
-   Copyright (c) 2007-2011 Daniel Adler <dadler@uni-goettingen.de>, 
+   Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>, 
                            Tassilo Philipp <tphilipp@potion-studios.com>
 
    Permission to use, copy, modify, and distribute this software for any
@@ -25,6 +25,7 @@
 
 
 
+
 #ifndef DYNCALL_UTILS_H
 #define DYNCALL_UTILS_H
 

data/dyncall/dyncall/dyncall_value.h

@@ -6,7 +6,7 @@
  Description: Value variant type
  License:
 
-   Copyright (c) 2007-2011 Daniel Adler <dadler@uni-goettingen.de>, 
+   Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>, 
                            Tassilo Philipp <tphilipp@potion-studios.com>
 
    Permission to use, copy, modify, and distribute this software for any
@@ -48,6 +48,23 @@ typedef union DCValue_ DCValue;
 
 union DCValue_
 {
+#if defined (DC__Arch_PPC32) && defined(DC__Endian_BIG)
+  DCbool        B;
+  struct { DCchar  c_pad[3]; DCchar  c; };
+  struct { DCuchar C_pad[3]; DCuchar C; };
+  struct { DCshort s_pad;    DCshort s; };
+  struct { DCshort S_pad;    DCshort S; };
+  DCint         i;
+  DCuint        I;
+#elif defined (DC__Arch_PPC64) && defined(DC__Endian_BIG)
+  struct { DCbool  B_pad;    DCbool  B; };
+  struct { DCchar  c_pad[7]; DCchar  c; };
+  struct { DCuchar C_pad[7]; DCuchar C; };
+  struct { DCshort s_pad[3]; DCshort s; };
+  struct { DCshort S_pad[3]; DCshort S; };
+  struct { DCint   i_pad;    DCint   i; };
+  struct { DCint   I_pad;    DCuint  I; };
+#else
   DCbool        B;
   DCchar        c;
   DCuchar       C;
@@ -55,6 +72,7 @@ union DCValue_
   DCushort      S;
   DCint         i;
   DCuint        I;
+#endif
   DClong        j;
   DCulong       J;
   DClonglong    l;