Changeset 53657 in vbox for trunk/src/VBox/ExtPacks/VBoxDTrace/onnv/lib/libctf

Timestamp:

Jan 2, 2015 12:28:56 PM (10 years ago)

Author:

vboxsync

Message:

VBoxDTrace: CTF compiles and links. (r33)

Location:

trunk/src/VBox/ExtPacks/VBoxDTrace/onnv/lib/libctf/common

Files:

• ctf_lib.c (modified) (4 diffs)
• ctf_subr.c (modified) (6 diffs)
• libctf.h (modified) (1 diff)

trunk/src/VBox/ExtPacks/VBoxDTrace/onnv/lib/libctf/common/ctf_lib.c

@@ -25 +25 @@
  */
 
+#ifndef VBOX
 #pragma ident   "%Z%%M% %I%     %E% SMI"
 
@@ -36 +37 @@
 #include <dlfcn.h>
 #include <gelf.h>
-
+#else
+# include <libctf.h>
+# include <ctf_impl.h>
+# include <iprt/param.h>
+# include <sys/stat.h>
+# include <stdio.h>
+# include <fcntl.h>
+# ifdef _MSC_VER
+#  include <io.h>
+# else
+#  include <unistd.h>
+# endif
+# define stat64  stat
+# define fstat64 fstat
+# define open64  open
+# define off64_t int64_t
+#endif
+
+#ifndef VBOX /* staticly linked in */
 #ifdef _LP64
 static const char *_libctf_zlib = "/usr/lib/64/libz.so";
@@ -48 +67 @@
         void *z_dlp;
 } zlib;
+#endif /* !VBOX */
 
 static size_t _PAGESIZE;
 static size_t _PAGEMASK;
 
+#ifndef VBOX
 #pragma init(_libctf_init)
 void
 _libctf_init(void)
-{
+#else
+void libctf_init(void)
+#endif
+{
+#ifndef VBOX
         const char *p = getenv("LIBCTF_DECOMPRESSOR");
 
         if (p != NULL)
                 _libctf_zlib = p; /* use alternate decompression library */
+#endif
 
         _libctf_debug = getenv("LIBCTF_DEBUG") != NULL;
 
+#ifndef VBOX
         _PAGESIZE = getpagesize();
+#else
+        _PAGESIZE = PAGE_SIZE;
+#endif
         _PAGEMASK = ~(_PAGESIZE - 1);
 }
+
+#ifdef VBOX
+/*
+ * Fake MMAP for read only access.
+ */
+# define munmap(a_pvMem, a_cbMem) \
+        RTMemPageFree(a_pvMem, a_cbMem)
+
+# define mmap64(a_pvAddr, a_cb, a_fProt, a_fFlags, a_fd, a_offFile) \
+        VBoxCtfMap64Fake(a_pvAddr, a_cb, a_fProt, a_fFlags, a_fd, a_offFile)
+
+# undef PROT_READ
+# define PROT_READ              0xfeed
+# undef MAP_PRIVATE
+# define MAP_PRIVATE    0xbeef
+
+static void *VBoxCtfMap64Fake(void *pvAddr, size_t cb, int fProt, int fFlags, int fd, int64_t offFile)
+{
+        off_t const offSaved = lseek(fd, 0, SEEK_CUR);
+        void *pvRet;
+        int err;
+
+        Assert(pvAddr == NULL); NOREF(pvAddr);
+        Assert(fProt == PROT_READ);
+        Assert(fFlags == MAP_PRIVATE);
+        if ((off_t)offFile != offFile) {
+                errno = EIO;
+                return MAP_FAILED;
+        }
+
+        if (lseek(offFile, offFile, SEEK_SET) >= 0) {
+
+                pvRet = RTMemPageAllocZ(cb);
+                if (!pvRet) {
+#ifdef _MSC_VER
+                        ssize_t cbRead = read(fd, pvRet, (unsigned int)cb);
+#else
+                        ssize_t cbRead = read(fd, pvRet, cb);
+#endif
+                        if (cbRead < 0) {
+                                RTMemPageFree(pvRet, cb);
+                                pvRet = MAP_FAILED;
+                        }
+                } else {
+                        errno = ENOMEM;
+                        pvRet = MAP_FAILED;
+                }
+
+                /* restore original position */
+                err = errno;
+                lseek(offSaved, 0, SEEK_SET);
+                errno = err;
+        }
+
+        return pvRet;
+}
+
+/*
+ * pread64
+ */
+#define pread64(a_fd, a_pvBuf, a_cbToRead, a_offFile) \
+        VBoxCtfPRead64(a_fd, a_pvBuf, a_cbToRead, a_offFile)
+
+static ssize_t VBoxCtfPRead64(int fd, void *pvBuf, size_t cbToRead, int64_t offFile)
+{
+        if ((off_t)offFile != offFile) {
+                errno = EIO;
+                return -1;
+        }
+
+        if (lseek(fd, offFile, SEEK_SET) < 0)
+                return -1;
+#ifndef _MSC_VER
+        return read(fd, pvBuf, cbToRead);
+#else
+        return read(fd, pvBuf, (unsigned int)cbToRead);
+#endif
+}
+
+
+
+#endif /* VBOX */
+
+#ifndef VBOX
 
 /*
@@ -113 +227 @@
         return (zlib.z_error(err));
 }
+
+#endif /* VBOX */
 
 /*

trunk/src/VBox/ExtPacks/VBoxDTrace/onnv/lib/libctf/common/ctf_subr.c

@@ -25 +25 @@
  */
 
+#ifndef VBOX
 #pragma ident   "%Z%%M% %I%     %E% SMI"
+#endif
 
 #include <ctf_impl.h>
 #include <libctf.h>
+#ifndef VBOX
 #include <sys/mman.h>
 #include <stdarg.h>
+#else
+# include <iprt/asm.h>
+# include <iprt/log.h>
+#endif
 
 void *
 ctf_data_alloc(size_t size)
 {
+#ifndef VBOX
         return (mmap(NULL, size, PROT_READ | PROT_WRITE,
             MAP_PRIVATE | MAP_ANON, -1, 0));
+#else
+    void *pv = RTMemPageAlloc(size);
+    return pv == NULL ? MAP_FAILED : pv;
+#endif
 }
 
@@ -42 +54 @@
 ctf_data_free(void *buf, size_t size)
 {
+#ifndef VBOX
         (void) munmap(buf, size);
+#else
+    RTMemPageFree(buf, size);
+#endif
 }
 
@@ -48 +64 @@
 ctf_data_protect(void *buf, size_t size)
 {
+#ifndef VBOX
         (void) mprotect(buf, size, PROT_READ);
+#else
+    int rc = RTMemProtect(buf, size, RTMEM_PROT_READ);
+    AssertRC(rc);
+#endif
 }
 
@@ -54 +75 @@
 ctf_alloc(size_t size)
 {
+#ifndef VBOX
         return (malloc(size));
+#else
+    return RTMemAlloc(size);
+#endif
 }
 
@@ -61 +86 @@
 ctf_free(void *buf, size_t size)
 {
+#ifndef VBOX
         free(buf);
+#else
+    RTMemFree(buf);
+#endif
 }
 
@@ -78 +107 @@
 
                 va_start(alist, format);
+#ifndef VBOX
                 (void) fputs("libctf DEBUG: ", stderr);
                 (void) vfprintf(stderr, format, alist);
+#else
+        RTLogPrintf("libctf DEBUG: %N", format, alist);
+#endif
                 va_end(alist);
         }

trunk/src/VBox/ExtPacks/VBoxDTrace/onnv/lib/libctf/common/libctf.h

@@ -56 +56 @@
 extern int _libctf_debug;
 
+#ifdef VBOX
+extern void libctf_init(void);
+#endif
+
 #ifdef  __cplusplus
 }