tools/buildAllVcproj.pl

   1 my @vcprojs;
   2
   3 print "Getting list\n";
   4 open (FIND, "c:/cygwin/bin/find ../src -name \"settings.rsp\" |");
   5 while (<FIND>)
   6 {
   7         chomp;
   8         s/\/(\w*)\/build\/win32\/settings\.rsp/\/$1\/build\/win32\/$1\.vcproj/g;
   9         push @vcprojs, $_;
  10 }
  11 close (FIND);
  12
  13 print "Editing\n";
  14 open (P4, "| p4 -x - edit");
  15 print P4 join("\n", @vcprojs);
  16 close (P4);
  17
  18 my @errorList;
  19 foreach (@vcprojs)
  20 {
  21         print "Building $_\n";
  22
  23         if (system ("buildVcproj.pl $_"))
  24         {
  25                 push @errorList, $_;
  26         }
  27 }
  28
  29 print "Reverting\n";
  30 open (P4, "| p4 -x - revert -a");
  31 print P4 join("\n", @vcprojs);
  32 close (P4);
  33
  34 if (@errorList)
  35 {
  36         die "ERROR!: Failed to build to following projects:\n", (join "\n", @errorList), "\n";
  37 }