home *** CD-ROM | disk | FTP | other *** search
/ PC User 2001 August / APC_Aug2001_CD2.iso / features / web_dev / files / mwjpp516.exe / %MAINDIR% / Tools / Misc / countJavaLines.script < prev    next >
Encoding:
Text File  |  2001-06-19  |  1.0 KB  |  49 lines
  1. !!script
  2. // Copyright ⌐ 1997-1998 - Modelworks Software
  3.  
  4. /**
  5. @Tool: countJavaLines~counts Java source lines in a directory and subdirectories. 
  6. @EndTool: 
  7. @Summary: countJavaLines~counts Java source lines in a directory
  8. */
  9.  
  10. var output = getOutput();
  11.  
  12. function DoCommand()
  13. {
  14.     output.clear();
  15.     output.writeLine("Line Count:");
  16.     var lineCount = 0;
  17.     var fileCount = 0;
  18.     var directory = chooseDirectory("Choose directory");
  19.     
  20.     if (directory)
  21.     {
  22.         var files = getDirectoryFiles(directory, "*.java", true);
  23.         if (files)
  24.         {
  25.             var position = files.getHeadPosition();
  26.             while (position.valid)
  27.             {
  28.                 var file = files.getNext(position);
  29.                 if (file)
  30.                 {
  31.                     fileCount += 1;
  32.                     var editor = file.open(false);
  33.                     var fileLineCount = editor.getLineCount();
  34.                     lineCount += fileLineCount;
  35.                     
  36.                     output.writeLine(file.path + ": " + fileLineCount);
  37.                     
  38.                     editor.close();
  39.                 }
  40.             }
  41.         }
  42.         
  43.         output.writeLine("Total line count: " + lineCount);
  44.         output.writeLine("Total file count: " + fileCount);
  45.     }
  46. }
  47. !!/script
  48.  
  49.