rbdc 0.8.7 → 0.9.0

data/dyncall/dyncallback/dyncall_thunk_arm32_thumb.c

@@ -6,7 +6,7 @@
  Description: Thunk - Implementation for ARM32 (THUMB mode)
  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_thunk_arm32_arm.c" /* Since we can mix ARM and THUMB    */
                                      /* assembly, reuse the ARM mode code */
 

data/dyncall/dyncallback/dyncall_thunk_arm32_thumb.h

@@ -6,7 +6,7 @@
  Description: Thunk - Header for ARM32 (THUMB mode)
  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
@@ -23,6 +23,7 @@
 
 */
 
+
 #ifndef DYNCALL_THUNK_ARM32_THUMB_H
 #define DYNCALL_THUNK_ARM32_THUMB_H
 

data/dyncall/dyncallback/dyncall_thunk_arm64.c

@@ -0,0 +1,64 @@
+/*
+
+ Package: dyncall
+ Library: dyncallback
+ File: dyncallback/dyncall_thunk_arm64.c
+ Description: Thunk - Implementation for ARM64 / ARMv8 / AAPCS64
+ License:
+
+   Copyright (c) 2015 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_thunk.h"
+
+/*
+
+Thunk Register: x9
+
+Thunk:
+	adr x9,  Thunk
+	ldr x10, .target
+	br  x10
+	nop
+.target:
+	.xword 0
+
+-- Encoded in:
+
+0000000000000000 <Thunk>:
+   0:	10000009 	adr	x9, 0 <Thunk>
+   4:	5800006a 	ldr	x10, 10 <.target>
+   8:	d61f0140 	br	x10
+   c:	d503201f 	nop
+
+0000000000000010 <.target>:
+  10:	76543210 	.word	0x76543210
+  14:	fedcba98 	.word	0xfedcba98
+*/
+
+void dcbInitThunk(DCThunk* p, void (*entry)())
+{
+  p->code[0] = 0x10000009; //   adr x9, 0
+  p->code[1] = 0x5800006a; //	ldr x9, entry
+  p->code[2] = 0xd61f0140; //   br  x9
+  p->code[3] = 0xd503201f; //   nop
+  p->entry   = entry;      // entry: 
+                           //   .xword 0
+}
+

data/dyncall/dyncallback/dyncall_thunk_arm64.h

@@ -0,0 +1,42 @@
+/*
+
+ Package: dyncall
+ Library: dyncallback
+ File: dyncallback/dyncall_thunk_arm64.h
+ Description: Thunk - Header for ARM64 / ARMv8 / AAPCS64
+ License:
+
+   Copyright (c) 2015 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_THUNK_ARM64_H
+#define DYNCALL_THUNK_ARM64_H
+
+struct DCThunk_
+{
+                                // off  size
+                                //-----|----------
+  unsigned int code[4];		//   0    16
+  void (*entry)();		//  16     8
+  void* reserved;         	//  24     8
+
+                                //  32 total size
+  
+};
+
+#endif /* DYNCALL_THUNK_ARM64_H */
+

data/dyncall/dyncallback/dyncall_thunk_mips.c

@@ -6,8 +6,8 @@
  Description: Thunk - Implementation for MIPS
  License:
 
-   Copyright (c) 2013 Daniel Adler <dadler@uni-goettingen.de>,
-                      Tassilo Philipp <tphilipp@potion-studios.com>
+   Copyright (c) 2013-2015 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
@@ -30,23 +30,55 @@ unsigned short lo16(x) { return ( (unsigned short)  ((unsigned int)x)        );
 
 void dcbInitThunk(DCThunk* p, void (*entry)())
 {
-  /*
+/*
+
+Thunk Register: $t4 ($12)
+According to o32abi: $t9 
+
+'The Linux/MIPS convention is that all PIC calls use t9 to hold the address of the called function.'
+[See MIPS Run, p.413]
+
     mips thunk code:
-      lui $t4,      hi(p)
-      lui $t5,      hi(entry)
-      ori $t5, $t5, lo(entry)
-      jr  $t5
-      ori $t4, $t4, lo(p) - branch delay slot
+      lui $t4,      %hi(p)
+      lui $t9,      %hi(entry)
+      ori $t9, $t9, %lo(entry)
+      jr  $t9
+      ori $t4, $t4, %lo(p)    
+
+thunk.o:     file format elf32-tradbigmips
+
+
+Disassembly of section .text:
+
+00000000 <thunk>:
+   0:	3c0c0000 	lui	t4,0x0
+   4:	3c190000 	lui	t9,0x0
+   8:	37390000 	ori	t9,t9,0x0
+   c:	03200008 	jr	t9
+  10:	00200825 	move	at,at
+  14:	358c0000 	ori	t4,t4,0x0
+  18:	00200825 	move	at,at
+  1c:	00200825 	move	at,at
+
   */
 
-  p->data[0] = hi16(p);     /* lui $t4, hi(p) */
-  p->data[1] = 0x3c0c;
-  p->data[2] = hi16(entry); /* lui $t5, hi(entry) */
-  p->data[3] = 0x3c0d;
-  p->data[4] = lo16(entry); /* ori $t5, $t5, lo(entry) */
-  p->data[5] = 0x35ad;
-  p->jump    = 0x01a00008;  /* jr $t5 */
-  p->bddt[0] = lo16(p);     /* ori $t4, $t4, lo(p) - branch delay slot */
-  p->bddt[1] = 0x358c;
+#if defined(DC__Endian_BIG)
+
+  p->data[0] = 0x3c0c; p->data[1] = hi16(p);     /* lui $t4, hi(p) */
+  p->data[2] = 0x3c19; p->data[3] = hi16(entry); /* lui $t9, hi(entry) */
+  p->data[4] = 0x3739; p->data[5] = lo16(entry); /* ori $t9, $t9, lo(entry) */
+  p->jump    = 0x03200008;                       /* jr $t9 */
+  p->bddt[0] = 0x358c; p->bddt[1] = lo16(p);     /* ori $t4, $t4, lo(p) - branch delay slot */
+
+#else /* defined(DC__Endian_LITTLE) */
+  
+  p->data[1] = 0x3c0c; p->data[0] = hi16(p);     /* lui $t4, hi(p) */
+  p->data[3] = 0x3c19; p->data[2] = hi16(entry); /* lui $t9, hi(entry) */
+  p->data[5] = 0x3739; p->data[4] = lo16(entry); /* ori $t9, $t9, lo(entry) */
+  p->jump    = 0x03200008;                       /* jr $t9 */
+  p->bddt[1] = 0x358c; p->bddt[0] = lo16(p);     /* ori $t4, $t4, lo(p) - branch delay slot */
+  
+#endif
+
 }
 

data/dyncall/dyncallback/dyncall_thunk_mips.h

@@ -6,8 +6,8 @@
  Description: Thunk - Header for MIPS
  License:
 
-   Copyright (c) 2013 Daniel Adler <dadler@uni-goettingen.de>,
-                      Tassilo Philipp <tphilipp@potion-studios.com>
+   Copyright (c) 2013-2015 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
@@ -23,6 +23,7 @@
 
 */
 
+
 #ifndef DYNCALL_THUNK_MIPS_H
 #define DYNCALL_THUNK_MIPS_H
 

data/dyncall/dyncallback/dyncall_thunk_ppc32.c

@@ -3,10 +3,10 @@
  Package: dyncall
  Library: dyncallback
  File: dyncallback/dyncall_thunk_ppc32.c
- Description: Thunk - Implementation for ppc32
+ Description: Thunk - Implementation for ppc32 darwin/apple
  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
@@ -23,6 +23,7 @@
 
 */
 
+
 #include "dyncall_thunk.h"
 
 unsigned short hi16(x) { return ( (unsigned short) (((unsigned int)x)>>16UL) ); }

data/dyncall/dyncallback/dyncall_thunk_ppc32.h

@@ -3,10 +3,10 @@
  Package: dyncall
  Library: dyncallback
  File: dyncallback/dyncall_thunk_ppc32.h
- Description: Thunk - Header for ppc32
+ Description: Thunk - Header for ppc32 (darwin/sysv)
  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
@@ -28,11 +28,11 @@
 
 struct DCThunk_
 {
-  unsigned short code_load_hi, addr_self_hi;  /* offset:  0 */
-  unsigned short code_load_lo, addr_self_lo;  /* offset:  4 */
-  unsigned int   code_jump[3];                /* offset:  8 */
-  void          (*addr_entry)();              /* offset: 20 */
-};
+  unsigned short code_load_hi, addr_self_hi;  /* offset:  0  size: 4  */
+  unsigned short code_load_lo, addr_self_lo;  /* offset:  4  size: 4  */
+  unsigned int   code_jump[3];                /* offset:  8  size: 12 */
+  void          (*addr_entry)();              /* offset: 20  size:  4 */
+};                                            /*       total size: 24 */
 
 #define DCTHUNK_SIZE_PPC32 24
 

data/dyncall/dyncallback/dyncall_thunk_ppc32_sysv.c

@@ -0,0 +1,50 @@
+/*
+
+ Package: dyncall
+ Library: dyncallback
+ File: dyncallback/dyncall_thunk_ppc32_sysv.c
+ Description: Thunks on PowerPC 32-bit System V ABI
+ License:
+
+   Copyright (c) 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
+   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_thunk.h"
+
+unsigned short hi16(x) { return ( (unsigned short) (((unsigned int)x)>>16UL) ); }
+unsigned short lo16(x) { return ( (unsigned short)  ((unsigned int)x)        ); }   
+
+void dcbInitThunk(DCThunk* p, void (*entry)())
+{
+/*
+   0:	3d 60 00 00 	lis     r11,0
+   4:	61 6b 00 01 	ori     r11,r11,1
+   8:	81 82 00 14 	lwz     r12,20(r2)
+   c:	7d 89 03 a6 	mtctr   r12
+  10:	4e 80 04 20 	bctr
+*/
+  p->code_load_hi = 0x3d60U;     /* lis  r11, HI16(p) */
+  p->addr_self_hi = hi16(p);
+  p->code_load_lo = 0x616bU; 	 /* ori  r11, r11, LO16(p) */
+  p->addr_self_lo = lo16(p);
+  p->code_jump[0] = 0x818b0014U; /* lwz   r12, 20(r11) */
+  p->code_jump[1] = 0x7d8903a6U; /* mtclr r12 */
+  p->code_jump[2] = 0x4e800420U; /* bctr */
+  p->addr_entry   = entry;
+
+}
+

data/dyncall/dyncallback/dyncall_thunk_ppc64.c

@@ -0,0 +1,87 @@
+/*
+
+ Package: dyncall
+ Library: dyncallback
+ File: dyncallback/dyncall_thunk_ppc64.c
+ Description: Thunk - Implementation for ppc64
+ 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.
+
+*/
+
+#include "dyncall_thunk.h"
+
+#define HIST16(x) (unsigned short)((((unsigned long)(x))>>48UL) & 0xffff)
+#define HIER16(x) (unsigned short)((((unsigned long)(x))>>32UL) & 0xffff)
+#define HI16(x)   (unsigned short)((((unsigned long)(x))>>16UL) & 0xffff)
+#define LO16(x)   (unsigned short)( ((unsigned long)(x))        & 0xffff)
+
+void dcbInitThunk(DCThunk* p, void (*entry)())
+{
+#if DC__ABI_PPC64_ELF_V != 2
+  /*
+    ppc64 thunk code:                (v1)
+      oris   r11, r2, HI16(p)
+      ori    r11,r11, LO16(p)
+      ld     r12,48(r11)
+      ld     r2,56(r11)
+      mtctr r12
+      bctr
+  */
+
+  p->thunk_entry  = (void *)&(p->code_load_hi);
+  p->toc_thunk    = ((long)(p->thunk_entry) & 0xffffffff00000000UL);
+
+  p->code_load_hi = 0x644bU;     /* oris  r11, r2, HI16(p) */
+  p->addr_self_hi = HI16(p);
+  p->code_load_lo = 0x616bU; 	 /* ori   r11,r11, LO16(p) */
+  p->addr_self_lo = LO16(p);
+  p->code_jump[0] = 0xe98b0030U; /* ld    r12,48(r11) */
+  p->code_jump[1] = 0xe84b0038U; /* ld    r2,56(r11) */
+  p->code_jump[2] = 0x7d8903a6U; /* mtclr r12 */
+  p->code_jump[3] = 0x4e800420U; /* bctr */
+  p->addr_entry   = (void *)*((long *)entry);
+  p->toc_entry    = *((long *)(entry + 8));
+
+#else
+  /*
+    ppc64 thunk code:                (v2)
+      lis    r11, HIST16(p)
+      ori    r11,r11, HIER16(p)
+      rldicr r11,r11,32,31
+      oris   r11,r11, HI16(p)
+      ori    r11,r11, LO16(p)
+      ld     r12,40(r11)
+      mtctr r12
+      bctr
+  */
+
+  p->code_load_hist = 0x3d60U;     /* lis    r11,HIST16(p) */
+  p->addr_self_hist = HIST16(p);
+  p->code_load_hier = 0x616bU;     /* ori    r11,r11, HIER16(p) */
+  p->addr_self_hier = HIER16(p);
+  p->code_rot       = 0x796b07c6U; /* rldicr r11,r11,32,31 */
+  p->code_load_hi   = 0x656bU;     /* oris   r11,r11, HI16(p) */
+  p->addr_self_hi   = HI16(p);
+  p->code_load_lo   = 0x616bU; 	   /* ori    r11,r11, LO16(p) */
+  p->addr_self_lo   = LO16(p);
+  p->code_jump[0]   = 0xe98b0028U; /* ld     r12,40(r11) */
+  p->code_jump[1]   = 0x7d8903a6U; /* mtclr  r12 */
+  p->code_jump[2]   = 0x4e800420U; /* bctr */
+  p->addr_entry     = (void *)(entry);
+#endif
+}
+

data/dyncall/dyncallback/dyncall_thunk_ppc64.h

@@ -0,0 +1,55 @@
+/*
+
+ Package: dyncall
+ Library: dyncallback
+ File: dyncallback/dyncall_thunk_ppc64.h
+ Description: Thunk - Header for ppc64
+ 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_THUNK_PPC64_H
+#define DYNCALL_THUNK_PPC64_H
+
+#if DC__ABI_PPC64_ELF_V != 2
+struct DCThunk_              /* v1 */
+{
+  void          (*thunk_entry)();                 /* offset:  0 */
+  long           toc_thunk;                       /* offset:  8 */
+  unsigned short code_load_hi, addr_self_hi;      /* offset: 16 */
+  unsigned short code_load_lo, addr_self_lo;      /* offset: 20 */
+  unsigned int   code_jump[6];                    /* offset: 24 */
+  void          (*addr_entry)();                  /* offset: 48 */
+  long           toc_entry;                       /* offset: 56 */
+};
+#define DCTHUNK_SIZE_PPC64 64
+#else
+struct DCThunk_              /* v2 */
+{
+  unsigned short addr_self_hist, code_load_hist;  /* offset:  0 */
+  unsigned short addr_self_hier, code_load_hier;  /* offset:  4 */
+  unsigned int   code_rot;                        /* offset:  8 */
+  unsigned short addr_self_hi, code_load_hi;      /* offset: 12 */
+  unsigned short addr_self_lo, code_load_lo;      /* offset: 16 */
+  unsigned int   code_jump[5];                    /* offset: 20 */
+  void          (*addr_entry)();                  /* offset: 40 */
+};
+#define DCTHUNK_SIZE_PPC64 48
+#endif
+
+#endif /* DYNCALL_THUNK_PPC64_H */
+