pyuno/source/module/pyuno_dlopenwrapper.c

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*************************************************************************
   3  *
   4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5  *
   6  * Copyright 2000, 2010 Oracle and/or its affiliates.
   7  *
   8  * OpenOffice.org - a multi-platform office productivity suite
   9  *
  10  * This file is part of OpenOffice.org.
  11  *
  12  * OpenOffice.org is free software: you can redistribute it and/or modify
  13  * it under the terms of the GNU Lesser General Public License version 3
  14  * only, as published by the Free Software Foundation.
  15  *
  16  * OpenOffice.org is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU Lesser General Public License version 3 for more details
  20  * (a copy is included in the LICENSE file that accompanied this code).
  21  *
  22  * You should have received a copy of the GNU Lesser General Public License
  23  * version 3 along with OpenOffice.org.  If not, see
  24  * <http://www.openoffice.org/license.html>
  25  * for a copy of the LGPLv3 License.
  26  *
  27  ************************************************************************/
  28
  29 /* make Python.h go first as a hack to work around _POSIX_C_SOURCE redefinition
  30    warnings: */
  31 #include "Python.h"
  32
  33 #include "sal/config.h"
  34
  35 #include <stdlib.h>
  36 #include <string.h>
  37
  38 #if defined LINUX && !defined __USE_GNU
  39 #define __USE_GNU
  40 #endif
  41 #include <dlfcn.h>
  42
  43 #include "rtl/string.h"
  44
  45 /* A wrapper around libpyuno.so, making sure the latter is loaded RTLD_GLOBAL
  46    so that C++ exception handling works with old GCC versions (that determine
  47    RTTI identity by comparing string addresses rather than string content).
  48 */
  49
  50 static void * load(void * address, char const * symbol) {
  51     Dl_info dl_info;
  52     char * slash;
  53     size_t len;
  54     char * libname;
  55     void * h;
  56     void * func;
  57     if (dladdr(address, &dl_info) == 0) {
  58         abort();
  59     }
  60     slash = strrchr(dl_info.dli_fname, '/');
  61     if (slash == NULL) {
  62         abort();
  63     }
  64     len = slash - dl_info.dli_fname + 1;
  65     libname = malloc(
  66         len + RTL_CONSTASCII_LENGTH(SAL_DLLPREFIX "pyuno" SAL_DLLEXTENSION)
  67         + 1);
  68     if (libname == 0) {
  69         abort();
  70     }
  71     strncpy(libname, dl_info.dli_fname, len);
  72     strcpy(libname + len, SAL_DLLPREFIX "pyuno" SAL_DLLEXTENSION);
  73     h = dlopen(libname, RTLD_NOW | RTLD_GLOBAL);
  74     free(libname);
  75     if (h == NULL) {
  76         abort();
  77     }
  78     func = dlsym(h, symbol);
  79     if (func == NULL) {
  80         abort();
  81     }
  82     return func;
  83 }
  84
  85 #if PY_MAJOR_VERSION >= 3
  86
  87 PyObject * PyInit_pyuno(void) {
  88     return
  89         ((PyObject * (*)(void)) load((void *) &PyInit_pyuno, "PyInit_pyuno"))();
  90 }
  91
  92 #else
  93
  94 void initpyuno(void) {
  95     ((void (*)(void)) load((void *) &initpyuno, "initpyuno"))();
  96 }
  97
  98 #endif
  99
 100 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */