mirror of
git://git.savannah.gnu.org/libtool.git
synced 2024-12-15 06:49:57 +08:00
792b680701
Also sync gnulib & bootstrap git submodules. * gnulib, gl-mod/bootstrap: Move to latest git versions. * bootstrap: Regenerate. * all files: Bump years by 'make update-copyright'.
149 lines
3.7 KiB
Plaintext
149 lines
3.7 KiB
Plaintext
# resident.at -- test resident modules -*- Autotest -*-
|
|
|
|
# Copyright (C) 2010-2017 Free Software Foundation, Inc.
|
|
#
|
|
# 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.
|
|
####
|
|
|
|
# Ensure resident modules are not unloaded at program exit:
|
|
# they need to be able to invoke atexit handlers.
|
|
|
|
AT_SETUP([resident modules])
|
|
AT_KEYWORDS([libltdl])
|
|
|
|
AT_DATA([main.c],
|
|
[[#include <ltdl.h>
|
|
#include <stdio.h>
|
|
|
|
int
|
|
main (int argc, char* argv[])
|
|
{
|
|
int err = 0;
|
|
lt_dlhandle plugin_handle;
|
|
lt_dladvise advise;
|
|
|
|
LTDL_SET_PRELOADED_SYMBOLS();
|
|
|
|
if (argc < 2)
|
|
{
|
|
fprintf (stderr, "usage: %s plugin\n", argv[0]);
|
|
return 1;
|
|
}
|
|
|
|
lt_dlinit ();
|
|
if (lt_dladvise_init (&advise) != 0
|
|
|| lt_dladvise_ext (&advise) != 0
|
|
|| lt_dladvise_resident (&advise) != 0)
|
|
{
|
|
printf ("advise failure: %s\n", lt_dlerror ());
|
|
err = 1;
|
|
}
|
|
else
|
|
{
|
|
plugin_handle = lt_dlopenadvise (argv[1], advise);
|
|
if (NULL != plugin_handle)
|
|
{
|
|
int (*pf) (void);
|
|
printf ("plugin opened successfully!\n");
|
|
pf = (int (*) (void)) lt_dlsym (plugin_handle, "setup_plugin");
|
|
if (pf)
|
|
pf ();
|
|
else
|
|
{
|
|
printf ("dlsym failure: %s\n", lt_dlerror ());
|
|
err = 1;
|
|
}
|
|
if (!lt_dlisresident (plugin_handle))
|
|
{
|
|
printf ("module wrongly not marked resident\n");
|
|
err = 1;
|
|
}
|
|
if (lt_dlclose (plugin_handle) != 0)
|
|
{
|
|
printf ("close failure (expected): %s\n", lt_dlerror ());
|
|
}
|
|
else
|
|
{
|
|
printf ("wrongly closed resident module\n");
|
|
err = 1;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
printf ("plugin failed to open: %s\n", lt_dlerror ());
|
|
err = 1;
|
|
}
|
|
if (lt_dladvise_destroy (&advise) != 0)
|
|
{
|
|
printf ("advise destroy failure: %s\n", lt_dlerror ());
|
|
err = 1;
|
|
}
|
|
}
|
|
lt_dlexit ();
|
|
return err;
|
|
}
|
|
]])
|
|
|
|
AT_DATA([plugin.c],
|
|
[[#include <stdlib.h>
|
|
#include <stdio.h>
|
|
|
|
void
|
|
bye (void)
|
|
{
|
|
puts ("called from atexit handler");
|
|
}
|
|
|
|
#ifdef __cplusplus
|
|
extern "C"
|
|
#endif
|
|
int
|
|
setup_plugin (void)
|
|
{
|
|
atexit (bye);
|
|
}
|
|
]])
|
|
|
|
: ${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"
|
|
LDFLAGS="$LDFLAGS -no-undefined"
|
|
inst=`pwd`/inst
|
|
libdir=$inst/lib
|
|
|
|
AT_CHECK([$CC $CPPFLAGS $CFLAGS -c main.c], [], [ignore], [ignore])
|
|
AT_CHECK([$LIBTOOL --mode=compile $CC $CPPFLAGS $CFLAGS -c plugin.c],
|
|
[], [ignore], [ignore])
|
|
AT_CHECK([$LIBTOOL --mode=link $CC $CFLAGS $LDFLAGS -o plugin.la -rpath $libdir ]dnl
|
|
[-module -avoid-version plugin.lo], [], [ignore], [ignore])
|
|
AT_CHECK([$LIBTOOL --mode=link $CC $CFLAGS $LDFLAGS -o main$EXEEXT main.$OBJEXT ]dnl
|
|
[-dlopen plugin.la $LIBLTDL],
|
|
[], [ignore], [ignore])
|
|
LT_AT_EXEC_CHECK([./main], [], [stdout], [ignore], [./plugin.la])
|
|
AT_CHECK([$GREP 'called from atexit handler' stdout], [], [ignore])
|
|
|
|
AT_CLEANUP
|