r15642: add an '--always-create' option to mkproto.pl

with this the proto headers will be always regenerated,
even if the content hasn't changed

you can use currently by
#>make MK_PROTO_ALWAYS_CREATE=yes'
or
#>export MK_PROTO_ALWAYS_CREATE=yes
#>make

metze
(This used to be commit 248d56af9d8841a0953686c7f2c2fac60bb41595)

diff --git a/source4/script/mkproto.pl b/source4/script/mkproto.pl
index c2dc547c120db0428d19090a30d8fda081b36cb5..682712b6798bbf77b983c9c6fd224a1c638c1e67 100755 (executable)
--- a/source4/script/mkproto.pl
+++ b/source4/script/mkproto.pl
@@ -25,6 +25,7 @@ my $public_data = \$_public;
 my $private_data = \$_private;
 my $builddir = undef;
 my $srcdir = undef;
+my $always_create = $ENV{MK_PROTO_ALWAYS_CREATE};
 
 sub public($)
 {
@@ -47,6 +48,9 @@ sub usage()
        print "  --define=DEF           Use DEF to check whether header was already included\n";
        print "  --public-define=DEF    Same as --define, but just for public header\n";
        print "  --private-define=DEF   Same as --define, but just for private header\n";
+       print "  --srcdir=path          Read files relative to this directory\n";
+       print "  --builddir=path        Write file relative to this directory\n";
+       print "  --always-create        Always create new proto headers, even if the content hasn't changed\n";
        print "  --help                 Print this help message\n\n";
        exit 0;
 }
@@ -61,9 +65,10 @@ GetOptions(
        },
        'public-define=s' => \$public_define,
        'private-define=s' => \$private_define,
-       'help' => \&usage,
+       'srcdir=s' => sub { my ($f,$v) = @_; $srcdir = $v; },
        'builddir=s' => sub { my ($f,$v) = @_; $builddir = $v; },
-       'srcdir=s' => sub { my ($f,$v) = @_; $srcdir = $v; }
+       'always-create' => \$always_create,
+       'help' => \&usage
 ) or exit(1);
 
 if (not defined($public_define) and defined($public_file)) {
@@ -239,7 +244,7 @@ if (not defined($private_file) and defined($public_file)) {
 my $old_public_data = file_load($public_file);
 my $old_private_data = file_load($private_file);
 
-if (not defined($old_public_data) or ($old_public_data ne $$public_data))
+if (defined($always_create) or not defined($old_public_data) or ($old_public_data ne $$public_data))
 {
        mkpath(dirname($public_file), 0, 0755);
        open(PUBLIC, ">$public_file") or die("Can't open `$public_file': $!"); 
@@ -247,7 +252,7 @@ if (not defined($old_public_data) or ($old_public_data ne $$public_data))
        close(PUBLIC);
 } 
 
-if (($public_file ne $private_file) and (
+if (($public_file ne $private_file) and (defined($always_create) or 
        not defined($old_private_data) or ($old_private_data ne $$private_data))) {
 
        mkpath(dirname($private_file), 0, 0755);