home *** CD-ROM | disk | FTP | other *** search
/ Beijing Paradise BBS Backup / PARADISE.ISO / software / BBSDOORW / CDOR0811.ZIP / RBBS.ZIP / CALLCOM.BAT < prev    next >
Encoding:
DOS Batch File  |  1992-01-23  |  2.0 KB  |  75 lines
  1. ECHO OFF
  2. REM %1 = prefix/file converting, %2 = node, %3 = extension converting
  3. REM %4 = work path   %5 %6 - extract command   %7 = actual file path
  4. REM %8 = trailing backslash for arj and lzh files
  5.  
  6. proecho %node% ~Testing upload, please wait...~
  7. md %4%2
  8. copy %7%1.%3 %4%2
  9. copy %7%1.%3 c:\rbbs\holdfile
  10. DEL %7%1.%3
  11.  
  12. proecho %node% ~Making %1.ZIP...~
  13. pkzip -a -ex %7%1 %4%2\*.*
  14. pkunzip -t %7\%1.zip
  15. IF ERRORLEVEL 1 GOTO badupload
  16. seterror 0
  17.  
  18. :VIRUS
  19. proecho %node% ~Testing upload for viruses...~
  20. scan /noexpire /nomem /A %4%2
  21. IF ERRORLEVEL 1 goto VirusCk
  22. seterror 0
  23. goto Good
  24.  
  25. :VIRUSCK
  26. copy %7%1.ZIP c:\rbbs\badfiles
  27. del %7%1.zip
  28. proecho %node% ~  The file you uploaded may contain a Virus!~~
  29. seterror 1
  30. echo %1 CONTAINS A VIRUS! >> c:\rbbs\node1\VIRUS.LOG
  31. goto exit
  32.  
  33. :GOOD
  34. proecho %node% ~No Viruses have been found!~
  35. proecho %node% ~Checking the date(s) of File(s) in %1.ZIP...~
  36. copy %7%1.ZIP %4%2
  37. zipds %4%2\*.zip
  38. testage %4%2 1989 c:\rbbs\oldfiles
  39. if exist c:\rbbs\oldfiles\%1.zip goto baddates
  40. if not exist c:\rbbs\oldfiles\%1.zip goto thanks
  41.  
  42. :baddates
  43. proecho %node% ~At least one of the programs you uploaded is~
  44. proecho %node%  more than 3 years old.  I will move any old~
  45. proecho %node%  programs offline for evaluation to determine~
  46. proecho %node%  if they are worth their 'bytes'.
  47. proecho %node% ~PLEASE DO NOT UPLOAD FILES OLDER THAN 1989!!!~~
  48. proecho %node% ~Your Upload:Download ratio remains unchanged.~~
  49. proecho %node% ~If this upload is placed on line, you will be credited.~~
  50. copy %7%1.zip c:\rbbs\oldfiles
  51. del %7%1.ZIP
  52. echo %1 OLDIE! >> c:\rbbs\node1\OLDIE.LOG
  53. goto exit
  54.  
  55. :badupload
  56. proecho %node% Looks like one or more of your uploads failed~
  57. proecho %node% Archive Integrity tests...~
  58. proecho %node% I will move all file(s) you just uploaded~
  59. proecho %node% offline for manual evaluation.~
  60. copy %7%1.zip c:\rbbs\badfiles
  61. del %7%1.zip
  62. ECHO %1 BAD UPLOAD >> c:\rbbs\node1\badfiles.log
  63. goto exit
  64.  
  65. :thanks
  66. proecho %node% ~No Errors Found.  Tests Complete!~~
  67.  
  68. :EXIT
  69. kdy %4%2
  70. SETERROR 0
  71. c:
  72. cd\rbbs
  73. :END
  74. 
  75.