Planet
navi homePPSaboutscreenshotsdownloaddevelopmentforum

Changeset 3447 in orxonox.OLD for orxonox


Ignore:
Timestamp:
Mar 2, 2005, 12:46:59 PM (20 years ago)
Author:
bensch
Message:

orxonox/trunk: now possible to pass multiple files as argument, and it searches automatically for matching .h/.cc solution.

File:
1 moved

Legend:

Unmodified
Added
Removed
  • orxonox/trunk/doc/orxodox.checkFiles.pl

    r3445 r3447  
    33$inputFiles = @ARGV[0];
    44$tempDoxFile = "TMPorxodox";
    5 
    6 print "Generating temporary Documentation File\n";
    75
    86unless (open (DOXfile, ">$tempDoxFile"))
     
    1210
    1311$processFiles = "";
    14 
    15 $inputFiles =~ s/\.cc$//;
    16 $inputFiles =~ s/\.h$//;
    17 
    18 $inputFiles =~ s/$/\.h/;
    19 $processFiles = "$processFiles $inputFiles";
    20 $inputFiles =~ s/\.h$/\.cc/;
    21 $processFiles = "$processFiles $inputFiles";
    22 
    23 
    24 #if (-e $processFiles)
    25 #  {
    26 #    print "Using file $processFiles as input\n";
    27 #  }
    28 #else
    29 #  {
    30 #    die("File $processFiles does not exist\n");
    31 #  }
    32 
    33 
     12$numberOfFiles = 0;
     13foreach $inputFile (@ARGV)
     14  {
     15    $tmpNumber = $numberOfFiles;
     16
     17    $inputFile =~ s/\.cc$//;
     18    $inputFile =~ s/\.h$//;
     19
     20    print "checking file $inputFile: ";
     21
     22    $inputFile =~ s/$/\.h/;
     23    if (-e $inputFile)
     24      {
     25        $processFiles = "$processFiles $inputFile";
     26        $numberOfFiles++;
     27        print "...found .h";
     28      }
     29    $inputFile =~ s/\.h$/\.cc/;
     30    if (-e $inputFile)
     31      {
     32        $processFiles = "$processFiles $inputFile";
     33        $numberOfFiles++;
     34        print "...found .cc";
     35      }
     36    if ($tmpNumber == $numberOfFiles) {print "no matching files found";}
     37    print "\n";
     38  }
     39
     40if ($numberOfFiles == 0){
     41  die("no Files have been found\n");}
     42
     43print "Generating temporary Documentation File\n";
     44print "==================================================================\n";
    3445
    3546print DOXfile "# THIS IS A DEFAULT FILE FOR DOXYGEN DOCUMENTATION";
     
    255266print "Generating Documentation of $processFiles\n";
    256267exec("doxygen $tempDoxFile");
     268
     269
     270unlink $tmpDoxFile;
Note: See TracChangeset for help on using the changeset viewer.