libtool/tests/lt_dladvise.at
Ralf Wildenhues 649567ed49 Avoid test failure due to broken dlpreloading of shared library.
* tests/lt_dladvise.at (lt_dlopenadvise library loading): Drop
some newlines in AT_CHECK commands, for better 'testsuite -x'
output.  Only create a static installable libpreload.la, to
avoid exposing the bug libtool currently has with preloading of
shared libraries.  Add a note to revisit this later.

Signed-off-by: Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
2008-08-16 17:28:30 +02:00

375 lines
8.9 KiB
Plaintext

# lt_dladvise.at -- test libltdl functionality -*- Autotest -*-
#
# Copyright (C) 2007, 2008 Free Software Foundation, Inc.
# Written by Gary V. Vaughan, 2007
#
# This file is part of GNU Libtool.
#
# GNU Libtool 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 2 of
# the License, or (at your option) any later version.
#
# GNU Libtool 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 GNU Libtool; see the file COPYING. If not, a copy
# can be downloaded from http://www.gnu.org/licenses/gpl.html,
# or obtained by writing to the Free Software Foundation, Inc.,
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
####
# Try to keep the new interfaces of HEAD separate from those of
# branch-1-5 to facilitate testing of older releases.
AT_SETUP([lt_dlopenadvise library loading])
AT_KEYWORDS([libltdl])
AT_DATA([main.c],
[[#include <ltdl.h>
#include <stdio.h>
typedef int funcp (int);
static int errors = 0;
static void
complain (const char *msg)
{
const char *errmsg = lt_dlerror ();
fprintf (stderr, "%s", msg);
if (errmsg)
fprintf (stderr, ": %s\n", errmsg);
else
fprintf (stderr, ".\n");
++errors;
}
static lt_dlhandle
moduleopen (const char *filename, lt_dladvise advise)
{
lt_dlhandle handle;
handle = lt_dlopenadvise (filename, advise);
if (!handle)
{
fprintf (stderr, "can't open the module %s!\n", filename);
complain ("error was");
}
return handle;
}
static int
moduletest (lt_dlhandle handle, const char *fname, const char *vname)
{
funcp *f = (funcp *) lt_dlsym (handle, fname);
int *v = (int *) lt_dlsym (handle, vname);
if (!f)
{
fprintf (stderr, "function `%s' not found\n", fname);
++errors;
return -1;
}
if (!v)
{
fprintf (stderr, "variable `%s' not found\n", vname);
++errors;
return -1;
}
return f (*v);
}
void
hint_ext (void)
{
lt_dlhandle handle;
lt_dladvise advise;
if (lt_dladvise_init (&advise) || lt_dladvise_ext (&advise))
complain ("error setting advise ext");
handle = moduleopen ("libdepend", advise);
if (handle)
printf ("depend: %d\n", moduletest (handle, "g", "j"));
lt_dladvise_destroy (&advise);
}
void
hint_resident (void)
{
const lt_dlinfo *info;
lt_dlhandle handle;
lt_dladvise advise;
if (lt_dladvise_init (&advise) || lt_dladvise_resident (&advise))
complain ("error setting advise resident");
handle = moduleopen ("libresident.la", advise);
if (handle)
{
info = lt_dlgetinfo (handle);
if (!info->is_resident)
complain ("error taking advise resident");
/* cannot close resident modules */
if (lt_dlclose (handle) == 0)
complain ("successfully unloaded resident module");
printf ("resident: %d\n", moduletest (handle, "func", "numb"));
}
lt_dladvise_destroy (&advise);
}
void
hint_local (void)
{
const lt_dlinfo *info;
lt_dlhandle handle;
lt_dladvise advise;
if (lt_dladvise_init (&advise) || lt_dladvise_local (&advise))
complain ("error setting advise local");
handle = moduleopen ("liblocal.la", advise);
if (handle)
{
info = lt_dlgetinfo (handle);
printf ("local: %d\n", moduletest (handle, "f", "i"));
/* If the symlocal hint was taken, don't unload this module
and test that our local symbolnames won't clash with modglobal. */
if (!info->is_symlocal && lt_dlclose (handle))
complain ("error unloading modlocal");
}
lt_dladvise_destroy (&advise);
}
void
hint_global (void)
{
const lt_dlinfo *info;
lt_dlhandle handle;
lt_dladvise advise;
if (lt_dladvise_init (&advise) || lt_dladvise_global (&advise))
complain ("error setting advise global");
handle = moduleopen ("libglobal.la", advise);
if (handle)
{
info = lt_dlgetinfo (handle);
printf ("global: %d\n", moduletest (handle, "f", "i"));
/* Don't attempt to load moddepend unless modglobal was successfully
loaded and the symglobal hint was taken, and the system allows to
to have undefined symbols. */
if (info && info->is_symglobal && HAVE_UNDEFINED_SYMBOLS)
{
hint_ext ();
}
else
{
/* Fake the output so the test won't fail when using a dlloader
unable to take symglobal hints. */
printf ("depend: 5\n");
}
}
lt_dladvise_destroy (&advise);
}
void
hint_preload (void)
{
lt_dlhandle handle;
lt_dladvise advise;
if (lt_dladvise_init (&advise) || lt_dladvise_preload (&advise))
complain ("error setting advise preload");
handle = moduleopen ("libpreload.la", advise);
if (handle)
{
printf("preload: %d\n", moduletest (handle, "h", "k"));
}
lt_dladvise_destroy (&advise);
}
int
main (void)
{
LTDL_SET_PRELOADED_SYMBOLS();
if (lt_dlinit() != 0)
{
fprintf (stderr, "error during initialization: %s\n", lt_dlerror());
return 1;
}
hint_resident ();
hint_local ();
hint_global ();
hint_preload ();
if (lt_dlexit () != 0)
complain ("error during exit");
return (errors != 0);
}
]])
AT_DATA([modresident.c],
[[#ifdef __cplusplus
extern "C" {
#endif
int func (int x) { return x / 3; }
int numb = 7;
#ifdef __cplusplus
}
#endif
]])
AT_DATA([modlocal.c],
[[#ifdef __cplusplus
extern "C" {
#endif
int f (int x) { return (x * x) / 10; }
int i = 6;
#ifdef __cplusplus
}
#endif
]])
AT_DATA([modglobal.c],
[[#ifdef __cplusplus
extern "C" {
#endif
int f (int x) { return x - 1; }
int i = 5;
#ifdef __cplusplus
}
#endif
]])
AT_DATA([moddepend.c],
[[#ifdef __cplusplus
extern "C" {
#endif
extern int f (int), i;
int g (int x) { return f (i) + x - 3; }
int j = 4;
#ifdef __cplusplus
}
#endif
]])
AT_DATA([modpreload.c],
[[#ifdef __cplusplus
extern "C" {
#endif
int h (int x) { return 2 * x; }
int k = 3;
#ifdef __cplusplus
}
#endif
]])
AT_DATA([expout],
[[resident: 2
local: 3
global: 4
depend: 5
preload: 6
]])
: ${LTDLINCL="-I$abs_top_srcdir/libltdl"}
: ${LIBLTDL="$abs_builddir/../libltdl/libltdlc.la"}
# Skip this test when called from:
# make distcheck DISTCHECK_CONFIGURE_FLAGS=--disable-ltdl-install
AT_CHECK([case $LIBLTDL in #(
*/_inst/lib/*) test -f $LIBLTDL || (exit 77) ;;
esac], [], [ignore])
CPPFLAGS="$LTDLINCL $CPPFLAGS"
dlopenable='resident local global'
dlpreloadable='preload'
# ------------------------------------------------------------------------- #
# The depend test makes no sense unless compiled without -no-undefined. By #
# not building the depend module in that case, when this test passes we can #
# be sure that hint_global() above, is being correctly informed those hosts #
# are reporting not able to accept the global hint to lt_dlopenadvise(). #
# ------------------------------------------------------------------------- #
case $host_os in
cygwin* | mingw*)
# These hosts do not support linking without -no-undefined
CPPFLAGS="$CPPFLAGS -DHAVE_UNDEFINED_SYMBOLS=0"
;;
*)
CPPFLAGS="$CPPFLAGS -DHAVE_UNDEFINED_SYMBOLS=1"
dlopenable="$dlopen depend"
$LIBTOOL --mode=compile $CC $CPPFLAGS $CFLAGS -c moddepend.c
AT_CHECK([$LIBTOOL --mode=link $CC -module $CFLAGS $LDFLAGS -o libdepend.la ]dnl
[moddepend.lo -rpath /foo -avoid-version], [], [ignore], [ignore])
;;
esac
# ------------------------------------------------------------------------- #
# Other modules can be tested correctly even when built with -no-undefined. #
# ------------------------------------------------------------------------- #
LDFLAGS="$LDFLAGS -no-undefined"
$CC $CPPFLAGS $CFLAGS -c main.c
for name in resident local global preload; do
# FIXME: adding -static to libpreload shouldn't be necessary.
# Fix this properly in ltmain, then remove this workaround.
if test $name = preload; then
st=-static
else
st=
fi
$LIBTOOL --mode=compile $CC $CPPFLAGS $CFLAGS -c mod$name.c
AT_CHECK([$LIBTOOL --mode=link $CC -module $CFLAGS $LDFLAGS -o lib$name.la ]dnl
[mod$name.lo $st -rpath /foo -avoid-version], [], [ignore], [ignore])
done
preloaded=
for module in $dlpreloadable; do
preloaded="${preloaded+$preloaded }-dlpreopen lib$module.la"
done
modules=
for module in $dlopenable; do
modules="${modules+$modules }-dlopen lib$module.la"
done
AT_CHECK([$LIBTOOL --mode=link $CC $CFLAGS $LDFLAGS -o main main.$OBJEXT $preloaded $modules $LIBLTDL],
[], [ignore], [ignore])
# Remove loadable libpreload module, so we know it is the preloaded module
# that is being executed by a successful test invocation:
AT_CHECK([$LIBTOOL --mode=clean rm -f libpreload.la], [], [ignore], [ignore])
LT_AT_NOINST_EXEC_CHECK([./main], [$modules], [], [expout], [])
AT_CLEANUP