win2utils/Configure report modify file list [RT #43994]

diff --git a/win32utils/Configure b/win32utils/Configure
index f2cde4ded8784ccef5837a345bb9b0d1839b7b87..d34e2fd63d6d9d284c3d700e7acd516fde504201 100644 (file)
--- a/win32utils/Configure
+++ b/win32utils/Configure
@@ -696,6 +696,7 @@ my $use_vcredist = "yes";
 my $vcredist_path = " --infer-- ";
 my $cross_compile = "no";
 my $tuning = "default";
+my $want_checkfiles = "no";
 
 # no arguments -> usage
 
@@ -737,6 +738,8 @@ foreach (@ARGV) {
         $want_x64 = "yes";
     } elsif (/^clean$/i) {
         $want_clean = "yes";
+    } elsif (/^checkfiles$/i) {
+        $want_checkfiles = "yes";
     } else {
         $want_unknown = "yes";
         $unknown_value = $_;
@@ -749,6 +752,22 @@ if ($legacy_only && ($want_x64 ne "yes")) {
     $want_win32 = "yes";
 }
 
+if ($want_checkfiles eq "yes") {
+       foreach (@filelist) {
+               next if -r $_ . ".in";
+               s/\\/\//g;
+               next if -r $_ . ".in";
+               print "missing $_.in from filelist\n";
+       }
+       foreach (@projectlist) {
+               next if -r $_ . ".in";
+               s/\\/\//g;
+               next if -r $_ . ".in";
+               print "missing $_.in from projectlist\n";
+       }
+       exit(0);
+}
+
 # configure the platform
 
 if (($want_win32 eq "yes") && ($want_x64 eq "yes")) {