home *** CD-ROM | disk | FTP | other *** search
/ Current Shareware 1994 January / SHAR194.ISO / virus / virchk2a.zip / VIRCHECK.BTM < prev    next >
Text File  |  1993-07-27  |  4KB  |  137 lines
  1. @rem -- VIRCHECK.BTM v2.0a
  2. @rem -- Validates archive, performs virus check and comments 
  3. @rem -- ZIP and ARJ files automatically!
  4. @rem -- Jointly developed by Gary Weinfurther (1:120/301)
  5. @rem -- and Gary Gilmore (1:2410/400)
  6. @rem -- This version for 4DOS users ONLY!  You also need ZC.BTM!
  7.  
  8. SETLOCAL
  9.  
  10. rem ───────────────────────────────────────
  11. rem  Make sure the VIRUS directory exists
  12. rem ───────────────────────────────────────
  13. IF NOT ISDIR \VIRUS    md \VIRUS
  14. IF NOT ISDIR \VIRUS\UL MD \VIRUS\UL
  15. CD \VIRUS\UL
  16.  
  17. rem ───────────────────────────────────────────────────────────
  18. rem  Move the contents of the upload to the unzipping directory
  19. rem ───────────────────────────────────────────────────────────
  20. ECHO.>COM1
  21. ECHO Now processing %2%3... >COM1
  22.  
  23. IFF "%3" == ".ZIP" THEN
  24.     ECHO UnZipping... >COM1
  25.     pkunzip -o %1%2%3
  26.     IF ERRORLEVEL 1 GOTO Corrupt
  27. ELSEIFF "%3" == ".ARJ" THEN
  28.     ECHO Extracting... >COM1
  29.     arj e -n -y %1%2%3
  30.     IF ERRORLEVEL 1 GOTO Corrupt
  31. ELSEIFF "%3" == ".LZH" THEN
  32.     ECHO Melting... >COM1
  33.     lha e /m %1%2%3
  34.     IF ERRORLEVEL 1 GOTO Corrupt
  35. ELSEIFF "%3" == ".ZOO" THEN
  36.     ECHO Oozing... >COM1
  37.     zoo e %1%2%3
  38.     IF ERRORLEVEL 1 GOTO Corrupt
  39. ELSEIFF "%3" == ".ARC" THEN
  40.     rem ARC FILES NOT ALLOWED
  41.     del %1%2%3
  42.     copy %4NO_ARCS.BBS %4FILE_BAD.BBS
  43.     GOTO End
  44. ELSEIFF "%3" == ".BAT" THEN
  45.     rem BAT FILES NOT ALLOWED
  46.     del %1%2%3
  47.     copy %4NO_BATS.BBS %4FILE_BAD.BBS
  48.     GOTO End
  49. ELSEIFF "%3" == ".PAK" THEN
  50.     rem PAK FILES NOT ALLOWED
  51.     del %1%2%3
  52.     copy %4NO_PAKS.BBS %4FILE_BAD.BBS
  53.     GOTO End
  54. ELSEIFF "%3" == ".CPT" THEN
  55.     copy %4FILE_MA.BBS %4FILE_OK.BBS
  56.     GOTO End
  57. ELSEIFF "%3" == ".SEA" THEN
  58.     copy %4FILE_MA.BBS %4FILE_OK.BBS
  59.     GOTO End
  60. ELSEIFF "%3" == ".SIT" THEN
  61.     copy %4FILE_MA.BBS %4FILE_OK.BBS
  62.     GOTO End
  63.  
  64. ELSE
  65.     XCOPY %1%2%3
  66. ENDIFF
  67.  
  68. rem ───────────────────────────────────────
  69. rem  Scan the contents for a virus
  70. rem ───────────────────────────────────────
  71. ECHO Scanning...>COM1
  72. copy %4FILE_IB.BBS %4FILE_OK.BBS
  73. SCAN \VIRUS\UL /A /NOMEM /NOPAUSE /HISTORY C:\VIRUS\VSCAN.LOG
  74. IFF ERRORLEVEL 2 THEN
  75.     rem ────────────────────────────────────
  76.     rem  Virus scan abnormally aborted
  77.     rem ────────────────────────────────────
  78.     move %1%2%3 \virus
  79.     copy %4FCORRUPT.BBS %4FILE_BAD.BBS
  80.     ECHO ERROR while scanning %2%3. The Sysop has been informed.>COM1
  81.     ECHO                     ╔══════════════╗>> \virus\virus.log
  82.     ECHO                     ║   Virus Log  ║>> \virus\virus.log
  83.     ECHO                     ╚══════════════╝>> \virus\virus.log
  84.     ECHO ────────────────────────────────────────────────────────>> \virus\virus.log
  85.     ECHO  ERROR while scanning %2%3>>\virus\virus.log
  86.     ECHO. >> \virus\virus.log
  87.     ECHO  SCAN.EXE reports the following: >> \virus\virus.log
  88.     ECHO ────────────────────────────────────────────────────────>> \virus\virus.log
  89.     ECHO. >> \virus\virus.log
  90.     type c:\virus\vscan.log >> c:\virus\virus.log
  91.     del c:\virus\vscan.log
  92.     makemsg -X\max\virusmsg.cfg
  93.     del c:\virus\virus.log
  94.  
  95. ELSEIFF ERRORLEVEL 1 THEN
  96.     rem ────────────────────────────────────
  97.     rem  A virus was found
  98.     rem ────────────────────────────────────
  99.     move %1%2%3 \virus
  100.     copy %4FVIRUS.BBS %4FILE_BAD.BBS
  101.     ECHO                     ╔══════════════╗>> \virus\virus.log
  102.     ECHO                     ║   Virus Log  ║>> \virus\virus.log
  103.     ECHO                     ╚══════════════╝>> \virus\virus.log
  104.     ECHO ────────────────────────────────────────────────────────>> \virus\virus.log
  105.     ECHO  *** VIRUS FOUND in %2%3 *** >> \virus\virus.log
  106.     ECHO. >> \virus\virus.log
  107.     ECHO  SCAN.EXE reports the following: >> \virus\virus.log
  108.     ECHO ────────────────────────────────────────────────────────>> \virus\virus.log
  109.     ECHO. >> \virus\virus.log
  110.     type c:\virus\vscan.log >> c:\virus\virus.log
  111.     del c:\virus\vscan.log
  112.     makemsg -X\max\virusmsg.cfg
  113.     del c:\virus\virus.log
  114.  
  115. ELSE
  116.     rem ────────────────────────────────────
  117.     rem  SUCCESS!  Insert archive comment.
  118.     rem ────────────────────────────────────
  119.     IF "%3" == ".ZIP" .OR. "%3" == ".ARJ" call zc %1%2%3
  120. ENDIFF
  121. GOTO End
  122.  
  123. rem ───────────────────────────────────────
  124. rem  Archive is corrupted
  125. rem ───────────────────────────────────────
  126. :Corrupt
  127.     del %1%2%3
  128.     copy %4FCORRUPT.BBS %4FILE_BAD.BBS
  129.     GOTO End
  130.  
  131. rem ────────────────────────────────────
  132. rem  All done - Clean up
  133. rem ────────────────────────────────────
  134. :End
  135.     del /Y /Q \virus\ul
  136.     del c:\virus\vscan.log
  137.