gdb/gdb-dlfcn.c - gdb

Functions defined

Macros defined

Source code

  1. /* Platform independent shared object routines for GDB.

  3.    Copyright (C) 2011-2015 Free Software Foundation, Inc.

  5.    This file is part of GDB.

  7.    This program is free software; you can redistribute it and/or modify
  8.    it under the terms of the GNU General Public License as published by
  9.    the Free Software Foundation; either version 3 of the License, or
  10.    (at your option) any later version.

  12.    This program is distributed in the hope that it will be useful,
  13.    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15.    GNU General Public License for more details.

  17.    You should have received a copy of the GNU General Public License
  18.    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */

  20. #include "defs.h"
  21. #include "gdb-dlfcn.h"

  23. #ifdef HAVE_DLFCN_H
  24. #include <dlfcn.h>
  25. #elif __MINGW32__
  26. #include <windows.h>
  27. #else
  28. /* Unsupported configuration. */
  29. ‌#define NO_SHARED_LIB
  30. #endif

  32. #ifdef NO_SHARED_LIB

  34. void *
  35. ‌gdb_dlopen (const char *filename)
  36. {
  37.   gdb_assert_not_reached ("gdb_dlopen should not be called on this platform.");
  38. }

  40. void *
  41. ‌gdb_dlsym (void *handle, const char *symbol)
  42. {
  43.   gdb_assert_not_reached ("gdb_dlsym should not be called on this platform.");
  44. }

  46. struct cleanup *
  47. ‌make_cleanup_dlclose (void *handle)
  48. {
  49.   gdb_assert_not_reached ("make_cleanup_dlclose should not be called on this "
  50.                           "platform.");
  51. }

  53. int
  54. ‌gdb_dlclose (void *handle)
  55. {
  56.   gdb_assert_not_reached ("gdb_dlclose should not be called on this platform.");
  57. }

  59. int
  60. ‌is_dl_available (void)
  61. {
  62.   return 0;
  63. }

  65. #else /* NO_SHARED_LIB */

  67. void *
  68. ‌gdb_dlopen (const char *filename)
  69. {
  70.   void *result;
  71. #ifdef HAVE_DLFCN_H
  72.   result = dlopen (filename, RTLD_NOW);
  73. #elif __MINGW32__
  74.   result = (void *) LoadLibrary (filename);
  75. #endif
  76.   if (result != NULL)
  77.     return result;

  79. #ifdef HAVE_DLFCN_H
  80.   error (_("Could not load %s: %s"), filename, dlerror());
  81. #else
  82.   {
  83.     LPVOID buffer;
  84.     DWORD dw;

  86.     dw = GetLastError();

  88.     FormatMessage (FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM |
  89.                    FORMAT_MESSAGE_IGNORE_INSERTS,
  90.                    NULL, dw, MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT),
  91.                    (LPTSTR) &buffer,
  92.                    0, NULL);

  94.     error (_("Could not load %s: %s"), filename, (char *) buffer);
  95.   }
  96. #endif
  97. }

  99. void *
  100. ‌gdb_dlsym (void *handle, const char *symbol)
  101. {
  102. #ifdef HAVE_DLFCN_H
  103.   return dlsym (handle, symbol);
  104. #elif __MINGW32__
  105.   return (void *) GetProcAddress (handle, symbol);
  106. #endif
  107. }

  109. int
  110. ‌gdb_dlclose (void *handle)
  111. {
  112. #ifdef HAVE_DLFCN_H
  113.   return dlclose (handle);
  114. #elif __MINGW32__
  115.   return !((int) FreeLibrary (handle));
  116. #endif
  117. }

  119. static void
  120. ‌do_dlclose_cleanup (void *handle)
  121. {
  122.   gdb_dlclose (handle);
  123. }

  125. struct cleanup *
  126. ‌make_cleanup_dlclose (void *handle)
  127. {
  128.   return make_cleanup (do_dlclose_cleanup, handle);
  129. }

  131. int
  132. ‌is_dl_available (void)
  133. {
  134.   return 1;
  135. }

  137. #endif /* NO_SHARED_LIB */