mirror of
https://github.com/curl/curl.git
synced 2026-04-11 12:01:42 +08:00
c9bb9cd165
In order to do unit tests for private functions, functions that are marked UNITTEST but without a global scope in the library, functions that do not have prototypes in their corresponding header file, unit tests previously brought their own private prototype *copy* into the unit test. This was error-prone when the internal function changes but the change might be missed in the unit test which then uses an outdated prototype copy for testing. This change removes the private prototypes from unit tests and instead introduces a C file parser that parses the specific C files and extracts the necessary unit test prototypes into a generated header file for unit tests to use. This geneated lib/unitprotos.h header is then included by unit tests that need private prototypes. Assisted-by: Viktor Szakats Closes #17750
91 lines
2.7 KiB
Perl
Executable File
91 lines
2.7 KiB
Perl
Executable File
#!/usr/bin/env perl
|
|
#***************************************************************************
|
|
# _ _ ____ _
|
|
# Project ___| | | | _ \| |
|
|
# / __| | | | |_) | |
|
|
# | (__| |_| | _ <| |___
|
|
# \___|\___/|_| \_\_____|
|
|
#
|
|
# Copyright (C) Daniel Stenberg, <daniel@haxx.se>, et al.
|
|
#
|
|
# 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
|
|
#
|
|
###########################################################################
|
|
|
|
sub scanfile {
|
|
my ($file) = @_;
|
|
open(F, "<$file") || die "$file failed";
|
|
while(<F>) {
|
|
if($_ =~ /^UNITTEST .*\);/) {
|
|
push @proto, $_;
|
|
$inc{$file} = 1;
|
|
}
|
|
}
|
|
close(F);
|
|
}
|
|
|
|
foreach my $f (@ARGV) {
|
|
scanfile($f);
|
|
}
|
|
|
|
print <<HEAD
|
|
#ifndef UNITTESTPROTOS_H
|
|
#define UNITTESTPROTOS_H
|
|
/***************************************************************************
|
|
* _ _ ____ _
|
|
* Project ___| | | | _ \\| |
|
|
* / __| | | | |_) | |
|
|
* | (__| |_| | _ <| |___
|
|
* \\___|\\___/|_| \\_\\_____|
|
|
*
|
|
* Copyright (C) Daniel Stenberg, <daniel@haxx.se>, et al.
|
|
*
|
|
* 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
|
|
*
|
|
* Generated-by: extract-unit-protos
|
|
*
|
|
***************************************************************************/
|
|
HEAD
|
|
;
|
|
|
|
for my $f (sort keys %inc) {
|
|
# convert to suitable header file
|
|
$f =~ s/\.c/.h/; # .h extension
|
|
|
|
if(-f $f) {
|
|
$f =~ s/.*\///; # cut the path off
|
|
print "#include \"$f\"\n";
|
|
}
|
|
}
|
|
|
|
for my $p (@proto) {
|
|
print $p;
|
|
}
|
|
|
|
print <<FOOT
|
|
#endif /* UNITTESTPROTOS_H */
|
|
FOOT
|
|
;
|