mirror of
https://github.com/mirror/make.git
synced 2025-01-09 20:00:28 +08:00
fb779d2f1e
Move the source code (other than glob) into the "src" subdirectory. Update all scripting and recommendations to support this change. * *.c, *.h, w32/*: Move to src/ * configure.ac, Makefile.am, maintMakefile: Locate new source files. * Basic.mk.template, mk/*: Update for new source file locations. * NEWS, README.DOS.template: Update for new locations. * build.template, build_w32.bat, builddos.bat: Ditto. * po/POTFILES.in: Ditto * tests/run_make_tests.pl, tests/scripts/features/load*: Ditto. * make.1: Move to doc. * mk/VMS.mk: Add support for building on VMS (hopefully). * makefile.vms, prepare_w32.bat: Remove. * SCOPTIONS: Update to define HAVE_CONFIG_H
125 lines
2.9 KiB
Perl
125 lines
2.9 KiB
Perl
# -*-perl-*-
|
|
$description = "Test the shared object load API.";
|
|
|
|
$details = "Verify the different aspects of the shared object API.";
|
|
|
|
# Don't do anything if this system doesn't support "load"
|
|
exists $FEATURES{load} or return -1;
|
|
|
|
# CONFIG_FLAGS are loaded from config-flags.pm and set by configure
|
|
if (! exists $CONFIG_FLAGS{CC}) {
|
|
$verbose and print "Skipping load test: no CC defined\n";
|
|
return -1;
|
|
}
|
|
|
|
# First build a shared object
|
|
# Provide both a default and non-default load symbol
|
|
|
|
unlink(qw(testapi.c testapi.so));
|
|
|
|
open(my $F, '> testapi.c') or die "open: testapi.c: $!\n";
|
|
print $F <<'EOF' ;
|
|
#include <string.h>
|
|
#include <stdio.h>
|
|
|
|
#include "gnumake.h"
|
|
|
|
int plugin_is_GPL_compatible;
|
|
|
|
static char *
|
|
test_eval (const char *buf)
|
|
{
|
|
gmk_eval (buf, 0);
|
|
return NULL;
|
|
}
|
|
|
|
static char *
|
|
test_expand (const char *val)
|
|
{
|
|
return gmk_expand (val);
|
|
}
|
|
|
|
static char *
|
|
test_noexpand (const char *val)
|
|
{
|
|
char *str = gmk_alloc (strlen (val) + 1);
|
|
strcpy (str, val);
|
|
return str;
|
|
}
|
|
|
|
static char *
|
|
func_test (const char *funcname, unsigned int argc, char **argv)
|
|
{
|
|
char *mem;
|
|
|
|
if (strcmp (funcname, "test-expand") == 0)
|
|
return test_expand (argv[0]);
|
|
|
|
if (strcmp (funcname, "test-eval") == 0)
|
|
return test_eval (argv[0]);
|
|
|
|
if (strcmp (funcname, "test-noexpand") == 0)
|
|
return test_noexpand (argv[0]);
|
|
|
|
mem = gmk_alloc (sizeof ("unknown"));
|
|
strcpy (mem, "unknown");
|
|
return mem;
|
|
}
|
|
|
|
int
|
|
testapi_gmk_setup ()
|
|
{
|
|
gmk_add_function ("test-expand", func_test, 1, 1, GMK_FUNC_DEFAULT);
|
|
gmk_add_function ("test-noexpand", func_test, 1, 1, GMK_FUNC_NOEXPAND);
|
|
gmk_add_function ("test-eval", func_test, 1, 1, GMK_FUNC_DEFAULT);
|
|
gmk_add_function ("ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789-_.", func_test, 0, 0, 0);
|
|
return 1;
|
|
}
|
|
EOF
|
|
close($F) or die "close: testapi.c: $!\n";
|
|
|
|
# Make sure we can compile
|
|
|
|
my $sobuild = "$CONFIG_FLAGS{CC} ".($srcdir? "-I$srcdir/src":'')." $CONFIG_FLAGS{CPPFLAGS} $CONFIG_FLAGS{CFLAGS} -shared -fPIC $CONFIG_FLAGS{LDFLAGS} -o testapi.so testapi.c";
|
|
|
|
my $clog = `$sobuild 2>&1`;
|
|
if ($? != 0) {
|
|
$verbose and print "Failed to build testapi.so:\n$sobuild\n$_";
|
|
return -1;
|
|
}
|
|
|
|
# TEST 1
|
|
# Check the gmk_expand() function
|
|
run_make_test(q!
|
|
EXPAND = expansion
|
|
all: ; @echo $(test-expand $$(EXPAND))
|
|
load testapi.so
|
|
!,
|
|
'', "expansion\n");
|
|
|
|
# TEST 2
|
|
# Check the eval operation. Prove that the argument is expanded only once
|
|
run_make_test(q!
|
|
load testapi.so
|
|
TEST = bye
|
|
ASSIGN = VAR = $(TEST) $(shell echo there)
|
|
$(test-eval $(value ASSIGN))
|
|
TEST = hi
|
|
all:;@echo '$(VAR)'
|
|
!,
|
|
'', "hi there\n");
|
|
|
|
# TEST 2
|
|
# Check the no-expand capability
|
|
run_make_test(q!
|
|
load testapi.so
|
|
TEST = hi
|
|
all:;@echo '$(test-noexpand $(TEST))'
|
|
!,
|
|
'', "\$(TEST)\n");
|
|
|
|
unlink(qw(testapi.c testapi.so)) unless $keep;
|
|
|
|
# This tells the test driver that the perl test script executed properly.
|
|
1;
|