gdb/testsuite/gdb.base/corefile-buildid-shlib.c

   1 /* Copyright (C) 2007-2021 Free Software Foundation, Inc.
   2
   3    This program is free software; you can redistribute it and/or modify
   4    it under the terms of the GNU General Public License as published by
   5    the Free Software Foundation; either version 3 of the License, or
   6    (at your option) any later version.
   7
   8    This program is distributed in the hope that it will be useful,
   9    but WITHOUT ANY WARRANTY; without even the implied warranty of
  10    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  11    GNU General Public License for more details.
  12
  13    You should have received a copy of the GNU General Public License
  14    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  15
  16 /* This shared library will dlopen another shared object.
  17    This is based on gdb.base/solib-disc.c.  */
  18
  19 #include <stdio.h>
  20 #include <stdlib.h>
  21
  22 #ifdef __WIN32__
  23 #include <windows.h>
  24 #define dlopen(name, mode) LoadLibrary (name)
  25 #define dlsym(handle, func) GetProcAddress (handle, func)
  26 #define dlclose(handle) FreeLibrary (handle)
  27 #define dlerror() "an error occurred"
  28 #else
  29 #include <dlfcn.h>
  30 #endif
  31
  32 const char *the_shlib = SHLIB_NAME;
  33
  34 int
  35 shlib_function (void)
  36 {
  37   void *handle;
  38   int (*func) (void);
  39   int result;
  40
  41   handle = dlopen (the_shlib, RTLD_LAZY);
  42   if (!handle)
  43     {
  44       fprintf (stderr, "%s\n", dlerror ());
  45       exit (1);
  46     }
  47
  48   func = (int (*)(void)) dlsym (handle, "crashfunc");
  49   if (func == NULL)
  50     {
  51       fprintf (stderr, "%s\n", dlerror ());
  52       exit (1);
  53     }
  54
  55   result = func ();
  56   dlclose (handle);
  57   return result;
  58 }