rbdc 0.8.0

data/dyncall/dyncall/dyncall_struct.h

@@ -0,0 +1,69 @@
+/*
+
+ Package: dyncall
+ Library: dyncall
+ File: dyncall/dyncall_struct.h
+ Description: C interface to compute struct size
+ License:
+
+   Copyright (c) 2010-2011 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
+   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.
+
+*/
+
+
+/*
+
+  dyncall struct metadata structures
+
+  REVISION
+  2007/12/11 initial
+  
+*/
+
+#ifndef DYNCALL_STRUCT_H
+#define DYNCALL_STRUCT_H
+
+#include "dyncall.h"
+
+#ifdef __cplusplus
+extern "C" {
+#endif 
+
+typedef struct DCfield_ {
+	DCsize offset, size, alignment, arrayLength;
+	DCint type;
+	DCstruct* pSubStruct;
+} DCfield;
+
+struct DCstruct_ {
+	DCfield *pFields;
+	DCsize size, alignment, fieldCount;
+	
+	/* struct building uses a state machine. */
+	DCint nextField;       /* == -1 if struct is closed */
+	DCstruct *pCurrentStruct, *pLastStruct; /* == this, unless we're in a sub struct */
+};
+
+
+/* Helper. */
+void dcArgStructUnroll(DCCallVM* vm, DCstruct* s, DCpointer  value);
+
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* DYNCALL_H */
+

data/dyncall/dyncall/dyncall_types.h

@@ -0,0 +1,74 @@
+/*
+
+ Package: dyncall
+ Library: dyncall
+ File: dyncall/dyncall_types.h
+ Description: Typedefs
+ License:
+
+   Copyright (c) 2007-2011 Daniel Adler <dadler@uni-goettingen.de>, 
+                           Tassilo Philipp <tphilipp@potion-studios.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.
+
+*/
+
+
+/*
+
+  dyncall argument- and return-types
+
+  REVISION
+  2007/12/11 initial
+  
+*/
+
+#ifndef DYNCALL_TYPES_H
+#define DYNCALL_TYPES_H
+
+#include <stddef.h>
+
+#include "dyncall_config.h"
+
+#ifdef __cplusplus
+extern "C" {
+#endif 
+
+typedef void            DCvoid;
+typedef DC_BOOL         DCbool;
+typedef char            DCchar;
+typedef unsigned char   DCuchar;
+typedef short           DCshort;
+typedef unsigned short  DCushort;
+typedef int             DCint;
+typedef unsigned int    DCuint;
+typedef long            DClong;
+typedef unsigned long   DCulong;
+typedef DC_LONG_LONG    DClonglong;
+typedef unsigned DC_LONG_LONG DCulonglong;
+typedef float           DCfloat;
+typedef double          DCdouble;
+typedef DC_POINTER      DCpointer;
+typedef const char*     DCstring;
+
+typedef size_t          DCsize;
+
+#define DC_TRUE   1
+#define DC_FALSE  0
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* DYNCALL_TYPES_H */
+

data/dyncall/dyncall/dyncall_utils.h

@@ -0,0 +1,38 @@
+/*
+
+ Package: dyncall
+ Library: dyncall
+ File: dyncall/dyncall_utils.h
+ Description: Type and calling-convention signature character defines
+ License:
+
+   Copyright (c) 2007-2011 Daniel Adler <dadler@uni-goettingen.de>, 
+                           Tassilo Philipp <tphilipp@potion-studios.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_UTILS_H
+#define DYNCALL_UTILS_H
+
+/* C portable macros. */
+
+#ifndef DC_MAX
+#define DC_MAX(a,b) ((a)>=(b))?(a):(b)
+#endif
+
+#endif /* DYNCALL_UTILS_H */
+

data/dyncall/dyncall/dyncall_value.h

@@ -0,0 +1,73 @@
+/*
+
+ Package: dyncall
+ Library: dyncall
+ File: dyncall/dyncall_value.h
+ Description: Value variant type
+ License:
+
+   Copyright (c) 2007-2011 Daniel Adler <dadler@uni-goettingen.de>, 
+                           Tassilo Philipp <tphilipp@potion-studios.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.
+
+*/
+
+
+/*
+
+  dyncall value variant
+
+  a value variant union-type that carries all supported dyncall types.
+
+  REVISION
+  2007/12/11 initial
+
+*/
+
+#ifndef DYNCALL_VALUE_H
+#define DYNCALL_VALUE_H
+
+#include "dyncall_types.h"
+
+#ifdef __cplusplus
+extern "C" {
+#endif 
+
+typedef union DCValue_ DCValue;
+
+union DCValue_
+{
+  DCbool        B;
+  DCchar        c;
+  DCuchar       C;
+  DCshort       s;
+  DCushort      S;
+  DCint         i;
+  DCuint        I;
+  DClong        j;
+  DCulong       J;
+  DClonglong    l;
+  DCulonglong   L;
+  DCfloat       f;
+  DCdouble      d;
+  DCpointer     p;
+  DCstring      Z;
+};
+
+#ifdef __cplusplus
+}
+#endif
+
+#endif /* DYNCALL_VALUE_H */
+

data/dyncall/dyncall/dyncall_vector.c

@@ -0,0 +1,52 @@
+/*
+
+ Package: dyncall
+ Library: dyncall
+ File: dyncall/dyncall_vector.c
+ Description: Simple dynamic vector container type implementation
+ License:
+
+   Copyright (c) 2007-2011 Daniel Adler <dadler@uni-goettingen.de>, 
+                           Tassilo Philipp <tphilipp@potion-studios.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.
+
+*/
+
+
+#include "dyncall_vector.h"
+#include <string.h>
+
+
+void dcVecAppend(DCVecHead* pHead, const void* pData, size_t size)
+{
+  size_t newSize = pHead->mSize + size;
+  if(newSize <= pHead->mTotal) 
+  {
+  	void* dst = (DCchar*)dcVecData(pHead) + pHead->mSize;
+  	switch (size) {
+  	  case 1: *(DCchar    *)dst = *(const DCchar    *)pData; break;
+  	  case 2: *(DCshort   *)dst = *(const DCshort   *)pData; break;
+  	  case 4: *(DCint     *)dst = *(const DCint     *)pData; break;
+  	  case 8: *(DCint     *)( ( (char*)dst )+4) = *(const DCint     *)( ( (char*)pData )+4); 
+  	          *(DCint     *)dst = *(const DCint     *)pData; break;
+ 	  /* On sparc 32-bit, this one crashes if ptrs are not aligned.
+          case 8: *(DClonglong*)dst = *(const DClonglong*)pData; break;
+  	  */
+          default: memcpy(dst, pData, size); /* for all the rest. */
+  	}
+    pHead->mSize = newSize;
+  }
+  /*else @@@ warning? error?*/
+}
+

data/dyncall/dyncall/dyncall_vector.h

@@ -0,0 +1,56 @@
+/*
+
+ Package: dyncall
+ Library: dyncall
+ File: dyncall/dyncall_vector.h
+ Description: Simple dynamic vector container type header
+ License:
+
+   Copyright (c) 2007-2011 Daniel Adler <dadler@uni-goettingen.de>, 
+                           Tassilo Philipp <tphilipp@potion-studios.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 DC_VECTOR_H
+#define DC_VECTOR_H
+
+#include "dyncall_types.h"
+
+typedef struct
+{
+  DCsize mTotal;
+  DCsize mSize;
+} DCVecHead;
+
+#define DC_SIZEOF_DCVector(size) (sizeof(DCVecHead)+size)
+
+#define dcVecInit(p,size)   (p)->mTotal=size;(p)->mSize=0
+#define dcVecReset(p)       (p)->mSize=0
+#define dcVecResize(p,size) (p)->mSize=(size)
+#define dcVecSkip(p,size)   (p)->mSize+=(size)
+#define dcVecData(p)        ( (unsigned char*) (((DCVecHead*)(p))+1) )
+#define dcVecAt(p,index)    ( dcVecData(p)+index )
+#define dcVecSize(p)        ( (p)->mSize )
+
+/*
+#include <string.h>
+ #define dcVecAppend(p,s,n) memcpy( dcVecData(p)+p->mSize, s, n );p->mSize+=n
+*/
+
+void dcVecAppend(DCVecHead* pHead, const void* source, size_t length);
+
+#endif /* DC_VECTOR_H */
+

data/dyncall/dyncall/gen-masm.sh

@@ -0,0 +1,7 @@
+#!/bin/sh
+
+# Uses portasm to generates MASM sources for intel platforms.
+printf "; auto-generated by `basename $0`\r\n" > dyncall_call_x86_generic_masm.asm
+printf "; auto-generated by `basename $0`\r\n" > dyncall_call_x64_generic_masm.asm
+gcc -E -P -DGEN_MASM dyncall_call_x86.S     | awk '{printf "%s\r\n", $0}' >> dyncall_call_x86_generic_masm.asm
+gcc -E -P -DGEN_MASM dyncall_call_x64-att.S | awk '{printf "%s\r\n", $0}' >> dyncall_call_x64_generic_masm.asm

data/dyncall/dyncall/mkfile

@@ -0,0 +1,29 @@
+#//////////////////////////////////////////////////////////////////////////////
+#
+# Copyright (c) 2010 Daniel Adler <dadler@uni-goettingen.de>, 
+#                    Tassilo Philipp <tphilipp@potion-studios.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.
+#
+#//////////////////////////////////////////////////////////////////////////////
+
+
+TOP		= ..
+<$TOP/buildsys/mk/prolog.mk
+
+
+LIBRARY		= dyncall
+UNITS = $UNITS dyncall_vector dyncall_api dyncall_callf dyncall_call dyncall_callvm dyncall_callvm_base dyncall_struct
+
+
+<$TOP/buildsys/mk/epilog.mk

data/dyncall/dyncallback/CMakeLists.txt

@@ -0,0 +1,55 @@
+# Package: dyncall
+# File: dyncallback/CMakeLists.txt
+# Description: DynCallback library cmake files
+# License:
+#
+# Copyright (c) 2010 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
+# 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.
+#
+
+include_directories(${PROJECT_SOURCE_DIR}/dyncall)
+
+if(MSVC)
+  if(CMAKE_SIZEOF_VOID_P MATCHES 4)
+    set(ASM_SRC dyncall_callback_x86_masm.asm)	
+  else()
+    set(ASM_SRC dyncall_callback_x64_masm.asm)
+  endif()
+else()
+  set(ASM_SRC dyncall_callback_arch.S)
+  set_source_files_properties(${ASM_SRC} PROPERTIES LANGUAGE "C")
+endif()
+
+add_library(dyncallback_s STATIC ${ASM_SRC}
+  dyncall_thunk.c
+  dyncall_alloc_wx.c
+  dyncall_args.c
+  dyncall_callback.c
+)
+
+install(TARGETS dyncallback_s ARCHIVE DESTINATION lib )
+
+install(FILES
+  dyncall_thunk.h
+  dyncall_thunk_x86.h
+  dyncall_thunk_ppc32.h
+  dyncall_thunk_x64.h
+  dyncall_thunk_arm32_arm.h
+  dyncall_thunk_arm32_thumb.h
+  dyncall_alloc_wx.h
+  dyncall_args.h
+  dyncall_callback.h
+  DESTINATION include
+)
+