home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 29 Fixes_o / 29-Fixes_o.zip / wr07060a.zip / US7060B2.DSK / LCU / LCU.ZIP / GETREXX.CMD < prev    next >
OS/2 REXX Batch file  |  1995-04-28  |  2KB  |  54 lines
  1. @ECHO OFF
  2. REM GETREXX 2.02
  3. SETLOCAL
  4. IF %1.==. ECHO GETREXX source (target)
  5. IF %1.==. GOTO END
  6. REM
  7. REM CHECK SOURCE DIRECTORY
  8. REM
  9. IF EXIST %1\DISK_2\*.* GOTO GETTAR
  10. COPY %1\DISK_2\*.*
  11. GOTO END
  12.  
  13. :GETTAR
  14. SET PATH=%1;%PATH%
  15. REM
  16. REM GET TARGET DIRECTORY
  17. REM
  18. SET GR_TARGET=
  19. IF %2.==. SET GR_TARGET=.
  20. IF NOT %2.==. SET GR_TARGET=%2
  21. IF %GR_TARGET%.==.. GOTO CHKUNPACK
  22. SET GR_MKDIR=
  23. DIR %GR_TARGET%\*.*  >> NUL 2>>&1
  24. IF ERRORLEVEL 1 SET GR_MKDIR=YES
  25. IF %GR_MKDIR%.==YES. ECHO MD %GR_TARGET%
  26. IF %GR_MKDIR%.==YES. MD %GR_TARGET%
  27. IF ERRORLEVEL 1 GOTO END
  28.  
  29. :CHKUNPACK
  30. REM
  31. REM CHECK FOR UNPACK.EXE IN THE DISK_2 DIRECTORY
  32. REM
  33. IF EXIST %1\DISK_2\*.* GOTO UNPACK
  34. COPY %1\DISK_2\UNPACK.EXE
  35. GOTO END
  36. :UNPACK
  37. ECHO %1\DISK_2\UNPACK %1\DISK_*\REXX %GR_TARGET%
  38. FOR %%I IN (3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25) DO IF EXIST %1\DISK_%%I\REXX %1\DISK_2\UNPACK %1\DISK_%%I\REXX %GR_TARGET% >> NUL 2>>&1
  39. ECHO %1\DISK_2\UNPACK %1\DISK_*\BUNDLE %GR_TARGET% /N:OSO001.MSG
  40. FOR %%I IN (0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25) DO IF EXIST %1\DISK_%%I\BUNDLE %1\DISK_2\UNPACK %1\DISK_%%I\BUNDLE %GR_TARGET% /N:OSO001.MSG >> NUL 2>>&1
  41. ECHO %1\DISK_2\UNPACK %1\DISK_*\BUNDLE %GR_TARGET% /N:INSCFG32.DLL
  42. FOR %%I IN (1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25) DO IF EXIST %1\DISK_%%I\BUNDLE %1\DISK_2\UNPACK %1\DISK_%%I\BUNDLE %GR_TARGET% /N:INSCFG32.DLL >> NUL 2>>&1
  43. ECHO %1\DISK_2\UNPACK %1\DISK_*\BUNDLE %GR_TARGET% /N:SHPIINST.DLL
  44. FOR %%I IN (1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25) DO IF EXIST %1\DISK_%%I\BUNDLE %1\DISK_2\UNPACK %1\DISK_%%I\BUNDLE %GR_TARGET% /N:SHPIINST.DLL >> NUL 2>>&1
  45. ECHO COPY %1\DISK_*\UHPFS.DLL %GR_TARGET%
  46. FOR %%I IN (1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25) DO IF EXIST %1\DISK_%%I\UHPFS.DLL COPY %1\DISK_%%I\UHPFS.DLL %GR_TARGET% >> NUL 2>>&1
  47. REM
  48. REM ENSURE THAT THE FILES WERE UNPACKED
  49. REM
  50. IF NOT EXIST %GR_TARGET%\*REX*.* COPY %GR_TARGET%\*REX*.*
  51. IF NOT EXIST %GR_TARGET%\OSO001.MSG COPY %GR_TARGET%\OSO001.MSG
  52. :END
  53. ENDLOCAL
  54.