mirror of
https://github.com/curl/curl.git
synced 2026-04-21 19:52:12 +03:00
6897aeb105
Using a mixture of techniques to avoid symbols collisions: - reduce scope. - add `t*_` / `T*_` prefix. - move shared functions to `testutil.c`. (`suburl()`, `rlim2str()`) - clone re-used lib*.c sources. (lib587, lib645) - include shared symbols just once in re-used `lib*.c` sources. (using `LIB*_C` guards.) - drop re-used `lib*.c` sources where they were identical or unused. - make macros global. - #undef macros before use. What remain is the entry functions `test`, and `unit_setup`, `unit_stop` in unit tests. Also: - fix formatting and other minor things along the way. - add `const` where possible. - sync some symbol names between tests. - drop `mk-bundle-hints.sh` that's no longer necessary. Closes #17468
87 lines
2.3 KiB
Perl
Executable file
87 lines
2.3 KiB
Perl
Executable file
#!/usr/bin/env perl
|
|
#***************************************************************************
|
|
# _ _ ____ _
|
|
# Project ___| | | | _ \| |
|
|
# / __| | | | |_) | |
|
|
# | (__| |_| | _ <| |___
|
|
# \___|\___/|_| \_\_____|
|
|
#
|
|
# Copyright (C) Viktor Szakats
|
|
#
|
|
# This software is licensed as described in the file COPYING, which
|
|
# you should have received as part of this distribution. The terms
|
|
# are also available at https://curl.se/docs/copyright.html.
|
|
#
|
|
# You may opt to use, copy, modify, merge, publish, distribute and/or sell
|
|
# copies of the Software, and permit persons to whom the Software is
|
|
# furnished to do so, under the terms of the COPYING file.
|
|
#
|
|
# This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
|
|
# KIND, either express or implied.
|
|
#
|
|
# SPDX-License-Identifier: curl
|
|
#
|
|
###########################################################################
|
|
|
|
# Bundle up individual tests into a single binary. The resulting binary can run
|
|
# individual tests by passing their name (without '.c') as the first argument.
|
|
|
|
use strict;
|
|
use warnings;
|
|
|
|
if(!@ARGV) {
|
|
die "Usage: $0 [<inputs>] [--exclude <exclude-c-sources>]\n";
|
|
}
|
|
|
|
# Specific sources to exclude or add as an extra source file
|
|
my @src;
|
|
my %exclude;
|
|
my $in_exclude = 0;
|
|
foreach my $src (@ARGV) {
|
|
if($in_exclude) {
|
|
$exclude{$src} = 1;
|
|
}
|
|
elsif($src eq "--exclude") {
|
|
$in_exclude = 1;
|
|
}
|
|
else {
|
|
push @src, $src;
|
|
}
|
|
}
|
|
|
|
print <<HEADER
|
|
/* !checksrc! disable COPYRIGHT all */
|
|
|
|
#include "first.h"
|
|
|
|
HEADER
|
|
;
|
|
|
|
my $tlist = "";
|
|
|
|
foreach my $src (@src) {
|
|
if($src =~ /\.c$/) {
|
|
if(!exists $exclude{$src}) {
|
|
# Misc .c source to include
|
|
print "#include \"$src\"\n\n";
|
|
}
|
|
}
|
|
elsif($src !~ /\.h$/) {
|
|
# Make 'main' unique across server sources
|
|
print "#undef main\n";
|
|
print "#define main main_$src\n";
|
|
print "int main_$src(int argc, char **argv);\n";
|
|
print "#include \"$src.c\"\n";
|
|
print "#undef main\n";
|
|
print "\n";
|
|
$tlist .= " {\"$src\", main_$src},\n";
|
|
}
|
|
}
|
|
|
|
print <<FOOTER
|
|
static const struct onemain s_mains[] = {
|
|
$tlist};
|
|
|
|
#include "first.c"
|
|
FOOTER
|
|
;
|