home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.wwiv.com
/
ftp.wwiv.com.zip
/
ftp.wwiv.com
/
pub
/
BBS
/
ZLAB_19C.ZIP
/
GIFT4B10.ZIP
/
PROUT1.BAT
< prev
next >
Wrap
DOS Batch File
|
1992-01-22
|
2KB
|
54 lines
@echo off
rem -- process a single upload file - for ProDOOR 3.4
rem -- %1-logfile, %2-testfile, %3-comport, %4-conferece
rem -- determing file type and branch to proper test case
rem -- using 4DOS commands
if %@ext[%2] == gif goto gif
if %@ext[%2] == zip goto zip
if %@ext[%2] == exe goto zip
if %@ext[%2] == lzh goto zip
if %@ext[%2] == arj goto zip
goto end
rem -- Check GIF, delete if invalid or incomplete GIF file and
rem -- add resolution to description
:gif
giftest %2 /P:%3/E/L/B:3/D/M:321x201x16/F:%PCBDRIVE%%PCDDIR%\$door.nam
goto end
rem -- test ZIP files
rem -- ZipLab Plus tests ZIP, ARJ, and LZH files
:zip
ptest %2 %PCBDRIVE%%PCBDIR%\ptest.cfg
rem -- ProDIZ supports ZIP, ARJ and LZH files
proecho %3 ~Searching for FILE_ID.DIZ...~
prodiz %2 %PCBDRIVE%%PCBDIR%\$door.nam /D/AV/U
rem -- ZDCS duplicate checking system for CRC's.
proecho %3 ~Checking CRC for duplication...~
zdcsfc %2 UPLOAD
if exist pcbfail.txt sendcom %3 /F PCBFAIL.TXT
if exist pcbfail.txt move %2 h:\hold
if not exist %2 goto end
rem -- Check for AV in the file
proecho %3 ~~ChkAv 2.2 - Courtesy of The Bard's Lair (718)381-3651~
proecho %3 ~Checking for -AV~
chkav %2
if errorlevel == 2 av
goto end
rem -- Found AV
rem -- Use txt2msg to send a message to SysOp letting him/her know
:av
proecho %3 ~~Found -AV in file, sending mail to SysOp to revue file... ~
echo User has uploaded the file: %2 > mail
echo which contains an -AV in it, please revue file. >> mail
txt2msg f:\bbs\main\msgs -tSYSOP -fPROUTEST -sAV_File mail
del mail
goto end
:end