2 Copyright (C) 2000-2017 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Contributed by Volkmar Sieh <vs@caldera.de> and Andreas Jaeger <aj@suse.de>.
6 The GNU C Library is free software; you can redistribute it and/or
7 modify it under the terms of the GNU Lesser General Public
8 License as published by the Free Software Foundation; either
9 version 2.1 of the License, or (at your option) any later version.
11 The GNU C Library is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public
17 License along with the GNU C Library; if not, see
18 <http://www.gnu.org/licenses/>. */
28 #define TEST_FUNCTION do_test ()
29 extern int do_test (void);
35 int (*sym
) (void); /* We load ref1 from glreflib1.c. */
40 handle
= dlopen ("glreflib1.so", RTLD_NOW
);
42 error (EXIT_FAILURE
, 0, "cannot load: glreflib1.so");
44 sym
= dlsym (handle
, "ref1");
46 error (EXIT_FAILURE
, 0, "dlsym failed");
48 memset (&info
, 0, sizeof (info
));
49 ret
= dladdr (sym
, &info
);
52 error (EXIT_FAILURE
, 0, "dladdr failed");
54 printf ("ret = %d\n", ret
);
55 printf ("info.dli_fname = %p (\"%s\")\n", info
.dli_fname
, info
.dli_fname
);
56 printf ("info.dli_fbase = %p\n", info
.dli_fbase
);
57 printf ("info.dli_sname = %p (\"%s\")\n", info
.dli_sname
, info
.dli_sname
);
58 printf ("info.dli_saddr = %p\n", info
.dli_saddr
);
60 if (info
.dli_fname
== NULL
)
61 error (EXIT_FAILURE
, 0, "dli_fname is NULL");
62 if (info
.dli_fbase
== NULL
)
63 error (EXIT_FAILURE
, 0, "dli_fbase is NULL");
64 if (info
.dli_sname
== NULL
)
65 error (EXIT_FAILURE
, 0, "dli_sname is NULL");
66 if (info
.dli_saddr
== NULL
)
67 error (EXIT_FAILURE
, 0, "dli_saddr is NULL");
75 #include "../test-skeleton.c"