rbdc 0.9.0 → 1.0.0

data/dyncall/dyncallback/dyncall_thunk_ppc32_sysv.c

@@ -6,7 +6,7 @@
  Description: Thunks on PowerPC 32-bit System V ABI
  License:
 
-   Copyright (c) 2015 Daniel Adler <dadler@uni-goettingen.de>
+   Copyright (c) 2015-2018 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
@@ -25,21 +25,21 @@
 
 #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)        ); }   
+static unsigned short hi16(x) { return ( (unsigned short) (((unsigned int)x)>>16UL) ); }
+static 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
+   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->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 */

data/dyncall/dyncallback/dyncall_thunk_ppc64.c

@@ -47,7 +47,7 @@ void dcbInitThunk(DCThunk* p, void (*entry)())
 
   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->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) */
@@ -76,7 +76,7 @@ void dcbInitThunk(DCThunk* p, void (*entry)())
   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->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 */

data/dyncall/dyncallback/dyncall_thunk_sparc32.c

@@ -6,7 +6,7 @@
  Description: Thunk - Implementation for sparc32
  License:
 
-   Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>,
+   Copyright (c) 2007-2018 Daniel Adler <dadler@uni-goettingen.de>,
                            Tassilo Philipp <tphilipp@potion-studios.com>
 
    Permission to use, copy, modify, and distribute this software for any
@@ -28,6 +28,23 @@
 
 void dcbInitThunk(DCThunk* p, void (*entry)())
 {
-  /* not yet implemented */
+  /* example
+                      ; put thunk pointer in g1
+   0:   03 00 00 00   sethi  %hi(0), %g1
+   4:   82 10 60 00   or     %g1, 0, %g1
+                      ; use g2 for entry pointer and "call" it, b/c branch instructions can't handle 32bit addresses
+   8:   05 00 00 00   sethi  %hi(0), %g2
+  12:   84 10 a0 00   or     %g2, 0, %g2
+                      ; jump - write link to %g0, effectively discarding it; also nop for delay slot
+  16:   81 c0 80 00   jmpl   %g2, %g0
+  20:   01 00 00 00   nop
+  */
+
+  p->code[0] = 0x03000000 | ((unsigned int)p >> 10);       /* sethi %hi(p), %g1      -- hi 22 bits */
+  p->code[1] = 0x82106000 | ((unsigned int)p & 0x3ff);     /* or %g1, <p&0x3ff>, %g1 -- lo 10 bits */
+  p->code[2] = 0x05000000 | ((unsigned int)entry >> 10);   /* sethi %hi(entry), %g2                */
+  p->code[3] = 0x8410a000 | ((unsigned int)entry & 0x3ff); /* or %g2, <entry&0x3ff>, %g2           */
+  p->code[4] = 0x81c08000;                                 /* jmpl %g2, %g0  -- discards link addr */
+  p->code[5] = 0x01000000;                                 /* nop                                  */
 }
 

data/dyncall/dyncallback/dyncall_thunk_sparc32.h

@@ -3,10 +3,10 @@
  Package: dyncall
  Library: dyncallback
  File: dyncallback/dyncall_thunk_sparc32.h
- Description: Thunk - Header for sparc32 - not yet implemented
+ Description: Thunk - Header for sparc32
  License:
 
-   Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>,
+   Copyright (c) 2007-2018 Daniel Adler <dadler@uni-goettingen.de>,
                            Tassilo Philipp <tphilipp@potion-studios.com>
 
    Permission to use, copy, modify, and distribute this software for any
@@ -29,9 +29,10 @@
 
 struct DCThunk_
 {
-  int x[4]; /* dummy */
+  unsigned int code[6];
 };
 
-#define DCTHUNK_SIZE_SPARC32 32
+#define DCTHUNK_SIZE_SPARC32 24
 
 #endif /* DYNCALL_THUNK_SPARC32_H */
+

data/dyncall/dyncallback/dyncall_thunk_sparc64.c

@@ -6,7 +6,7 @@
  Description: Thunk - Implementation for sparc64
  License:
 
-   Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>,
+   Copyright (c) 2007-2018 Daniel Adler <dadler@uni-goettingen.de>,
                            Tassilo Philipp <tphilipp@potion-studios.com>
 
    Permission to use, copy, modify, and distribute this software for any
@@ -28,6 +28,46 @@
 
 void dcbInitThunk(DCThunk* p, void (*entry)())
 {
-  /* not yet implemented */
+  /* example
+                      ; put thunk pointer in g1
+   0:   03 00 00 00   sethi  %hi(0), %g1
+   4:   82 10 60 00   or     %g1, 0, %g1
+   8:   83 28 70 20   sllx   %g1, 0x20, %g1
+  12:   21 00 00 00   sethi  %hi(0), %l0
+  16:   a0 14 20 00   or     %l0, 0, %l0
+  20:   82 04 00 01   add    %l0, %g1, %g1
+                      ; use g2 for entry pointer and "call" it, b/c branch instructions can't handle 64bit addresses
+  24:   05 00 00 00   sethi  %hi(0), %g2
+  28:   84 10 a0 00   or     %g2, 0, %g2
+  32:   85 28 b0 20   sllx   %g2, 0x20, %g2
+  36:   21 00 00 00   sethi  %hi(0), %l0
+  40:   a0 14 20 00   or     %l0, 0, %l0
+  44:   84 04 00 02   add    %l0, %g2, %g2
+                      ; jump - write link to %g0, effectively discarding it; also nop for delay slot
+  48:   81 c0 80 00   jmpl   %g2, %g0
+  52:   01 00 00 00   nop
+  */
+
+  union {
+    unsigned int x[2];
+    void* p;
+  } t, e;
+  t.p = p;
+  e.p = entry;
+
+  p->code[ 0] = 0x03000000 | (t.x[0] >> 10);      /* sethi %hi(p), %g1      -- hi 22 bits */
+  p->code[ 1] = 0x82106000 | (t.x[0] & 0x3ff);    /* or %g1, <p&0x3ff>, %g1 -- lo 10 bits */
+  p->code[ 2] = 0x83287020;                       /* sllx %g1, 0x20, %g1                  */
+  p->code[ 3] = 0x21000000 | (t.x[1] >> 10);      /* sethi %hi(p), %l0                    */
+  p->code[ 4] = 0xa0142000 | (t.x[1] & 0x3ff);    /* or %l0, <p&0x3ff>, %l0               */
+  p->code[ 5] = 0x82040001;                       /* add %l0, %g1, %g1                    */
+  p->code[ 6] = 0x05000000 | (e.x[0] >> 10);      /* sethi %hi(entry), %g2                */
+  p->code[ 7] = 0x8410a000 | (e.x[0] & 0x3ff);    /* or %g2, <entry&0x3ff>, %g2           */
+  p->code[ 8] = 0x8528b020;                       /* sllx %g2, 0x20, %g2                  */
+  p->code[ 9] = 0x21000000 | (e.x[1] >> 10);      /* sethi %hi(entry), %l0                */
+  p->code[10] = 0xa0142000 | (e.x[1] & 0x3ff);    /* or %l0, <entry&0x3ff>, %l0           */
+  p->code[11] = 0x84040002;                       /* add %l0, %g2, %g2                    */
+  p->code[12] = 0x81c08000;                       /* jmpl %g2, %g0  -- discards link addr */
+  p->code[13] = 0x01000000;                       /* nop                                  */
 }
 

data/dyncall/dyncallback/dyncall_thunk_sparc64.h

@@ -3,10 +3,10 @@
  Package: dyncall
  Library: dyncallback
  File: dyncallback/dyncall_thunk_sparc64.h
- Description: Thunk - Header for sparc64 - not yet implemented
+ Description: Thunk - Header for sparc64
  License:
 
-   Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>,
+   Copyright (c) 2007-2018 Daniel Adler <dadler@uni-goettingen.de>,
                            Tassilo Philipp <tphilipp@potion-studios.com>
 
    Permission to use, copy, modify, and distribute this software for any
@@ -29,9 +29,9 @@
 
 struct DCThunk_
 {
-  int x[4]; /* dummy */
+  unsigned int code[14];
 };
 
-#define DCTHUNK_SIZE_SPARC64 32
+#define DCTHUNK_SIZE_SPARC64 56
 
-#endif /* DYNCALL_THUNK_SPARC32_H */
+#endif /* DYNCALL_THUNK_SPARC64_H */

data/dyncall/dyncallback/dyncall_thunk_x64.c

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

data/dyncall/dyncallback/dyncall_thunk_x64.h

@@ -6,7 +6,7 @@
  Description: Thunk - Header for x64
  License:
 
-   Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>,
+   Copyright (c) 2007-2018 Daniel Adler <dadler@uni-goettingen.de>,
                            Tassilo Philipp <tphilipp@potion-studios.com>
 
    Permission to use, copy, modify, and distribute this software for any
@@ -33,7 +33,7 @@ struct DCThunk_
   void (*entry)();
 };
 
-#define DCTHUNK_X64_SIZE	24
+#define DCTHUNK_X64_SIZE 24
 
 
 #endif /* DYNCALL_THUNK_X64_H */

data/dyncall/dyncallback/dyncall_thunk_x86.c

@@ -6,7 +6,7 @@
  Description: Thunk - Implementation for x86
  License:
 
-   Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>,
+   Copyright (c) 2007-2018 Daniel Adler <dadler@uni-goettingen.de>,
                            Tassilo Philipp <tphilipp@potion-studios.com>
 
    Permission to use, copy, modify, and distribute this software for any

data/dyncall/dyncallback/dyncall_thunk_x86.h

@@ -6,7 +6,7 @@
  Description: Thunk - Header for x86
  License:
 
-   Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>,
+   Copyright (c) 2007-2018 Daniel Adler <dadler@uni-goettingen.de>,
                            Tassilo Philipp <tphilipp@potion-studios.com>
 
    Permission to use, copy, modify, and distribute this software for any
@@ -35,6 +35,6 @@ struct DCThunk_
   void        (*addr_entry)();
 };
 
-#define DCTHUNK_X86_SIZE	16
+#define DCTHUNK_X86_SIZE 16
 
 #endif /* DYNCALL_THUNK_X86_H */

data/dyncall/dyncallback/dyncallback.3

@@ -15,7 +15,6 @@
 .\"
 .Dd $Mdocdate$
 .Dt dyncallback 3
-.Os
 .Sh NAME
 .Nm dyncallback
 .Nd callback interface of dyncall
@@ -40,14 +39,15 @@ dynamically over the arguments once called back.
 .Fn dcbNewCallback
 creates a new callback object, where
 .Ar signature
-is a signature string describing the function to be called back (see manual for
-format). This is needed for
+is a signature string describing the function to be called back (see manual or
+dyncall_signature.h for format). This is needed for
 .Nm
 dyncallback to correctly prepare the arguments passed in by the function that
 calls the callback handler. Note that the handler doesn't return the value
-specified in the signature, directly, but simply 'i' or 'f' depending on whether
-it is a integral or floating point type. The return value itself is stored
-where the handler's 3rd parameter points to (see example).
+specified in the signature, directly, but a signature character, specifying the
+return value's type.
+The return value itself is stored where the handler's
+3rd parameter points to (see below).
 .Ar funcptr
 is a pointer to the
 .Nm
@@ -107,13 +107,12 @@ char cbHandler(DCCallback* cb,
   // .. do something ..
 
   result->s = 1244;
-  return 'i';
+  return 's';
 }
 .Ed
 .Pp
 Note that the return value of the handler is a signature character, not the
-actual return value, itself, and note that the actual return value is of type
-short.
+actual return value, itself.
 Now, let's call it through a DCCallback object:
 .Bd -literal -offset indent
   DCCallback* cb;
@@ -124,11 +123,17 @@ Now, let's call it through a DCCallback object:
     (123, 23.f, 3, 1.82, 9909ll);
   dcbFreeCallback(cb);
 .Ed
+.Sh CONFORMING TO
+The dyncallback library needs at least a c99 compiler with additional support
+for anonymous structs/unions (which were introduced officially in c11). Given
+that those are generally supported by pretty much all major c99 conforming
+compilers (as default extension), it should build fine with a c99 toolchain.
+Strictly speaking, dyncall conforms to c11, though.
+.Ed
 .Sh SEE ALSO
 .Xr dyncall 3 ,
 .Xr dynload 3
-and the dyncall manual (available in PDF format) for a way more detailed documentation of this
-library.
+and the dyncall manual (available in HTML and PDF format) for more information.
 .Sh AUTHORS
 .An "Daniel Adler" Aq dadler@uni-goettingen.de
 .An "Tassilo Philipp" Aq tphilipp@potion-studios.com

data/dyncall/dynload/dynload.3

@@ -1,4 +1,4 @@
-.\" Copyright (c) 2007-2014 Daniel Adler <dadler AT uni-goettingen DOT de>, 
+.\" Copyright (c) 2007-2017 Daniel Adler <dadler AT uni-goettingen DOT de>, 
 .\"                         Tassilo Philipp <tphilipp AT potion-studios DOT com>
 .\" 
 .\" Permission to use, copy, modify, and distribute this software for any
@@ -15,8 +15,6 @@
 .\"
 .Dd $Mdocdate$
 .Dt dynload 3
-.Os
-
 .Sh NAME
 .Nm dynload
 .Nd encapsulates dynamic loading mechanisms and
@@ -28,7 +26,19 @@ gives access to functions in foreign dynamic libraries and code modules.
 .Ft void
 .Fn dlFreeLibrary "DLLib * pLib"
 .Ft void *
-.Fn dlFindSymbol "DLLib pLibode" "const char * pSymbolName"
+.Fn dlFindSymbol "DLLib * pLib" "const char * pSymbolName"
+.Ft int
+.Fn dlGetLibraryPath "DLLib * pLib" "char * sOut" "int bufSize"
+.Ft DLSyms*
+.Fn dlSymsInit "const char * libPath"
+.Ft void
+.Fn dlSymsCleanup "DLSyms * pSyms"
+.Ft int
+.Fn dlSymsCount "DLSyms * pSyms"
+.Ft const char*
+.Fn dlSymsName "DLSyms * pSyms" "int index"
+.Ft const char*
+.Fn dlSymsNameFromValue "DLSyms * pSyms" "void * value"
 .Sh DESCRIPTION
 The
 .Nm
@@ -42,7 +52,9 @@ and returns a handle to it for use in
 .Fn dlFreeLibrary 
 and
 .Fn dlFindSymbol
-calls.
+calls. Passing a null pointer for the
+.Ar libpath
+argument is valid, and returns a handle to the main executable of the calling code. Also, searching libraries in library paths (e.g. by just passing the library's leaf name) should work, however, they are OS specific. Returns a null pointer on error.
 .Pp
 .Fn dlFreeLibrary 
 frees the loaded library with handle
@@ -53,12 +65,55 @@ returns a pointer to a symbol with name
 .Ar pSymbolName
 in the library with handle
 .Ar pLib ,
-or returns a null pointer if the symbol cannot be found.
+or returns a null pointer if the symbol cannot be found. The name is specified as it would appear in C source code (mangled if C++, etc.).
+.Pp
+.Fn dlGetLibraryPath
+can be used to get a copy of the path to the library loaded with handle
+.Ar pLib .
+The parameter
+.Ar sOut
+is a pointer to a buffer of size
+.Ar bufSize
+(in bytes), to hold the output string. The return value is the size of the buffer (in bytes) needed to hold the null-terminated string, or 0 if it can't be looked up. If
+.Ar bufSize
+>= return value > 1, a null-terminted string with the path to the library should be in
+.Ar sOut .
+If it returns 0, the library name wasn't able to be found. Please note that this might happen in some rare cases, so make sure to always check.
+.Pp
+The dlSyms* functions can be used to iterate over symbols. Since they can be used on libraries that are not linked, they are made
+for symbol name lookups, not to get symbols' addresses. For that refer to
+.Fn dlFindSymbol .
+.Fn dlSymsInit
+will return a handle (or null pointer on error) to the shared object specified by
+.Ar libPath ,
+to be used with the other dlSyms* functions. Note that contrary to loading and linking libraries, no (OS-specific) rules for searching libraries in library paths, etc. apply. The handle must be freed with
+.Fn dlSymsCleanup .
+.Fn dlSymsCount
+returns the number of symbols in the shared object,
+.Fn dlSymsName
+and
+.Fn dlSymsNameFromValue
+are used to lookup symbol names using an index or symbol's address, respectively, returning a null pointer on error. The names are returned as they would appear in C source code (mangled if C++, etc.). The address passed to
+.Fn dlSymsNameFromValue
+must point to a loaded symbol.
+.Sh BUGS
+.Fn dlGetLibraryPath
+is not thread-safe on Darwin (macOS, iOS, ...) and OpenBSD.
+.Fn dlSymsInit
+is not thread-safe on Darwin.
+.Fn dlGetLibraryPath
+will not work on the following platforms when the library in question doesn't have the (default)
+.Fn _init
+and
+.Fn _fini
+symbols exported (rare, but possible): Haiku (all versions), OpenBSD < 3.7, NetBSD < 5.1, FreeBSD < 4.8
+.Sh CONFORMING TO
+The dynload library conforms to c99.
+.Ed
 .Sh SEE ALSO
 .Xr dyncall 3 ,
 .Xr dyncallback 3
-and the dyncall manual (available in PDF format) for a way more detailed documentation of this
-library.
+and the dyncall manual (available in HTML and PDF format) for more information.
 .Sh AUTHORS
 .An "Daniel Adler" Aq dadler@uni-goettingen.de
 .An "Tassilo Philipp" Aq tphilipp@potion-studios.com

data/dyncall/dynload/dynload.c

@@ -6,7 +6,7 @@
  Description: Auto-include delegate to windows/posix-based dynamic linker.
  License:
 
-   Copyright (c) 2007-2015 Daniel Adler <dadler@uni-goettingen.de>, 
+   Copyright (c) 2007-2018 Daniel Adler <dadler@uni-goettingen.de>,
                            Tassilo Philipp <tphilipp@potion-studios.com>
 
    Permission to use, copy, modify, and distribute this software for any
@@ -24,16 +24,10 @@
 */
 
 
-
 #include "../autovar/autovar_OSFAMILY.h"
 #if defined(OSFAMILY_Windows)
 #  include "dynload_windows.c"
 #elif defined(OSFAMILY_Unix)
-#  include "../autovar/autovar_OS.h"
-#  if defined(OS_Darwin)
-#    include "dynload_darwin.c"
-#  else
-#    include "dynload_unix.c"
-#  endif
+#  include "dynload_unix.c"
 #endif