Changeset 3670 for trunk/tools/DailyBuild
- Timestamp:
- Jun 8, 2000, 12:47:21 AM (25 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/tools/DailyBuild/odin32ftp2.cmd
r3451 r3670 1 /* $Id: odin32ftp2.cmd,v 1. 1 2000-04-27 11:32:25bird Exp $1 /* $Id: odin32ftp2.cmd,v 1.2 2000-06-07 22:47:21 bird Exp $ 2 2 * 3 3 * Uploads the relase and debug builds to the FTP sites. … … 16 16 17 17 do i = 1 to 5 /* (Retries 5 times) */ 18 sFile = 'odin32bin-'|| DATE(S); 19 sDelete = 'odin32bin-'|| DateSub7(DATE('S')); 20 sFileDbg = sFile || '-debug.zip'; 21 sDeleteDbg = sDelete || '-debug.zip'; 22 sFileRel = sFile || '-release.zip'; 23 sDeleteRel = sDelete || '-release.zip'; 24 sChangeLog = 'ChangeLog'; 18 sFile = 'odin32bin-'|| DATE(S); 19 sDelete = 'odin32bin-'|| DateSub7(DATE('S')); 20 sFileDbg = sFile || '-debug.zip'; 21 sFileDbgWPI = sFile || '-debug.wpi'; 22 sDeleteDbg = sDelete || '-debug.zip'; 23 sDeleteDbgWPI = sDelete || '-debug.wpi'; 24 sFileRel = sFile || '-release.zip'; 25 sFileRelWPI = sFile || '-release.wpi'; 26 sDeleteRel = sDelete || '-release.zip'; 27 sDeleteRelWPI = sDelete || '-release.wpi'; 28 sChangeLog = 'ChangeLog'; 25 29 26 30 /* … … 32 36 * Put file to SourceForge. 33 37 */ 34 rc = putSF(sFileDbg, 'SF-debug'); 35 rc = putSF(sFileRel, 'SF-release'); 36 rc = putSF(sChangeLog,'SF-ChangeLog'); 38 rc = putSF(sFileDbg, 'SF-debug'); 39 rc = putSF(sFileDbgWPI, 'SF-debug-wpi'); 40 rc = putSF(sFileRel, 'SF-release'); 41 rc = putSF(sFileRelWPI, 'SF-release-wpi'); 42 rc = putSF(sChangeLog, 'SF-ChangeLog'); 37 43 38 44 /* … … 41 47 if (sLoc = '' | sLoc = 'os2') then 42 48 do 43 rc = deletefunction('/daily/'sDeleteDbg, '/daily/'sDeleteRel, 'os2-delete', 'ftp.os2.org', 'user', 'xxxxxxxx'); 44 rc = forwardSF(sFileDbg, 'os2-debug', '/daily', 'ftp.os2.org', 'user', 'xxxxxxxx'); 45 rc = forwardSF(sFileRel, 'os2-release', '/daily', 'ftp.os2.org', 'user', 'xxxxxxxx'); 46 rc = forwardSF(sChangeLog, 'os2-ChangeLog', '/daily', 'ftp.os2.org', 'user', 'xxxxxxxx'); 49 rc = deletefunction( '/daily/'sDeleteDbg, '/daily/'sDeleteRel, 'os2-delete', 'ftp.os2.org', 'user', 'xxxxxxxx'); 50 rc = deletefunction('/daily/'sDeleteDbgWPI, '/daily/'sDeleteRelWPI, 'os2-delete-wpi', 'ftp.os2.org', 'user', 'xxxxxxxx'); 51 rc = forwardSF(sFileDbg, 'os2-debug', '/daily', 'ftp.os2.org', 'user', 'xxxxxxxx'); 52 rc = forwardSF(sFileRel, 'os2-release', '/daily', 'ftp.os2.org', 'user', 'xxxxxxxx'); 53 rc = forwardSF(sFileDbgWPI, 'os2-debug-wpi', '/daily', 'ftp.os2.org', 'user', 'xxxxxxxx'); 54 rc = forwardSF(sFileRelWPI, 'os2-release-wpi', '/daily', 'ftp.os2.org', 'user', 'xxxxxxxx'); 55 rc = forwardSF(sChangeLog, 'os2-ChangeLog', '/daily', 'ftp.os2.org', 'user', 'xxxxxxxx'); 47 56 48 57 end … … 50 59 if (sLoc = '' | sLoc = 'netlabs') then 51 60 do 52 /* ( sDeleteFile1, sDeleteFile2, sLockFile, sSite, sUser, sPasswd); */ 53 rc = deletefunction('/odinftp/daily/'sDeleteDbg, '/odinftp/daily/'sDeleteRel, 'netlabs-delete', 'ftp.netlabs.org', 'odin', 'xxxxxxxx'); 61 /* ( sDeleteFile1, sDeleteFile2, sLockFile, sSite, sUser, sPasswd); */ 62 rc = deletefunction( '/odinftp/daily/'sDeleteDbg, '/odinftp/daily/'sDeleteRel, 'netlabs-delete', 'ftp.netlabs.org', 'odin', 'xxxxxxxx'); 63 rc = deletefunction('/odinftp/daily/'sDeleteDbgWPI, '/odinftp/daily/'sDeleteRelWPI, 'netlabs-delete-wpi', 'ftp.netlabs.org', 'odin', 'xxxxxxxx'); 54 64 /* (sFile, sFileRemote, sLockFile, sSite, sUser, sPasswd); */ 55 65 rc = putfunction(sFileDbg, '/odinftp/daily', 'netlabs-debug', 'ftp.netlabs.org', 'user', 'xxxxxxxx'); 56 66 rc = putfunction(sFileRel, '/odinftp/daily', 'netlabs-release', 'ftp.netlabs.org', 'user', 'xxxxxxxx'); 67 rc = putfunction(sFileDbgWPI, '/odinftp/daily', 'netlabs-debug', 'ftp.netlabs.org', 'user', 'xxxxxxxx'); 68 rc = putfunction(sFileRelWPI, '/odinftp/daily', 'netlabs-release', 'ftp.netlabs.org', 'user', 'xxxxxxxx'); 57 69 rc = putfunction('ChangeLog', '/odinftp/daily', 'netlabs-ChangeLog', 'ftp.netlabs.org', 'user', 'xxxxxxxx'); 58 70 end
Note:
See TracChangeset
for help on using the changeset viewer.