/* Platform independent shared object routines for GDB. Copyright (C) 2011-2013 Free Software Foundation, Inc. This file is part of GDB. This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by the Free Software Foundation; either version 3 of the License, or (at your option) any later version. This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details. You should have received a copy of the GNU General Public License along with this program. If not, see . */ #include "defs.h" #include "gdb_assert.h" #include "gdb-dlfcn.h" #ifdef HAVE_DLFCN_H #include #elif __MINGW32__ #include #else /* Unsupported configuration. */ #define NO_SHARED_LIB #endif #ifdef NO_SHARED_LIB void * gdb_dlopen (const char *filename) { gdb_assert_not_reached ("gdb_dlopen should not be called on this platform."); } void * gdb_dlsym (void *handle, const char *symbol) { gdb_assert_not_reached ("gdb_dlsym should not be called on this platform."); } struct cleanup * make_cleanup_dlclose (void *handle) { gdb_assert_not_reached ("make_cleanup_dlclose should not be called on this " "platform."); } int gdb_dlclose (void *handle) { gdb_assert_not_reached ("gdb_dlclose should not be called on this platform."); } int is_dl_available (void) { return 0; } #else /* NO_SHARED_LIB */ void * gdb_dlopen (const char *filename) { void *result; #ifdef HAVE_DLFCN_H result = dlopen (filename, RTLD_NOW); #elif __MINGW32__ result = (void *) LoadLibrary (filename); #endif if (result != NULL) return result; #ifdef HAVE_DLFCN_H error (_("Could not load %s: %s"), filename, dlerror()); #else { LPVOID buffer; DWORD dw; dw = GetLastError(); FormatMessage (FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_IGNORE_INSERTS, NULL, dw, MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), (LPTSTR) &buffer, 0, NULL); error (_("Could not load %s: %s"), filename, (char *) buffer); } #endif } void * gdb_dlsym (void *handle, const char *symbol) { #ifdef HAVE_DLFCN_H return dlsym (handle, symbol); #elif __MINGW32__ return (void *) GetProcAddress (handle, symbol); #endif } int gdb_dlclose (void *handle) { #ifdef HAVE_DLFCN_H return dlclose (handle); #elif __MINGW32__ return !((int) FreeLibrary (handle)); #endif } static void do_dlclose_cleanup (void *handle) { gdb_dlclose (handle); } struct cleanup * make_cleanup_dlclose (void *handle) { return make_cleanup (do_dlclose_cleanup, handle); } int is_dl_available (void) { return 1; } #endif /* NO_SHARED_LIB */