X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;f=check-module;h=b671163c6ee3aeadc5b40ed0da5dbdb99d149cd8;hb=6a43884b2d4737bd78949becf8de806f102ff6d8;hp=026e41e10ece36d869cea13ccbdde92e1a65e917;hpb=34a29de87db9b8627fcfb3b2493634e2c81d8e99;p=gnulib.git diff --git a/check-module b/check-module index 026e41e10..b671163c6 100755 --- a/check-module +++ b/check-module @@ -1,4 +1,24 @@ #!/usr/bin/perl -w +# Check a gnulib module. + +# Copyright (C) 2005, 2006 Free Software Foundation, Inc. + +# This file 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. +# +# This program 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 this program; if not, write to the Free Software +# Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA +# 02110-1301, USA. + + # Read a module description file and derive the set of files # included directly by any .c or .h file listed in the `Files:' section. # Take the union of all such sets for any dependent modules. @@ -21,7 +41,12 @@ use strict; use Getopt::Long; #use Coda; -(my $VERSION = '$Revision: 1.4 $ ') =~ tr/[0-9].//cd; +my $COPYRIGHT_NOTICE = "Copyright (C) 2006 Free Software Foundation, Inc.\n". +"This is free software. You may redistribute copies of it under the terms of\n". +"the GNU General Public License .\n". +"There is NO WARRANTY, to the extent permitted by law.\n"; + +(my $VERSION = '$Revision: 1.7 $ ') =~ tr/[0-9].//cd; (my $ME = $0) =~ s|.*/||; use constant ST_INIT => 1; @@ -131,7 +156,8 @@ sub find_included_lib_files ($) my ($file) = @_; # Special cases... - my %special_non_dup = ( 'fnmatch_loop.c' => 1, 'regex.c' => 1 ); + my %special_non_dup = ( 'fnmatch_loop.c' => 1, + 'regex.c' => 1, 'at-func.c' => 1 ); my %inc; open FH, '<', $file @@ -178,6 +204,19 @@ my %exempt_header = # The use of obstack.h in the hash module is conditional, off by default. 'lib/hash.c:obstack.h' => 1, + # C files in the gc module have conditional includes. + 'lib/gc-gnulib.c:des.h' => 1, + 'lib/gc-gnulib.c:arcfour.h' => 1, + 'lib/gc-gnulib.c:arctwo.h' => 1, + 'lib/gc-gnulib.c:md2.h' => 1, + 'lib/gc-gnulib.c:md4.h' => 1, + 'lib/gc-gnulib.c:md5.h' => 1, + 'lib/gc-gnulib.c:rijndael.h' => 1, + 'lib/gc-gnulib.c:sha1.h' => 1, + 'lib/gc-gnulib.c:rijndael-api-fst.h' => 1, + 'lib/gc-gnulib.c:hmac.h' => 1, + 'lib/gc-libgcrypt.c:md2.h' => 1, + # The fts-lgpl module doesn't actually use fts-cycle.c and unistd-safer.h. 'lib/fts.c:fts-cycle.c' => 1, 'lib/fts.c:unistd-safer.h' => 1, @@ -237,7 +276,7 @@ sub check_module ($) GetOptions ( help => sub { usage 0 }, - version => sub { print "$ME version $VERSION\n"; exit }, + version => sub { print "$ME version $VERSION\n$COPYRIGHT_NOTICE"; exit }, ) or usage 1; @ARGV < 1