home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 29 Fixes_o / 29-Fixes_o.zip / dg130h1.dsk / SERVICE.CMD < prev    next >
OS/2 REXX Batch file  |  1996-07-26  |  6KB  |  133 lines
  1. @ECHO OFF
  2. SETLOCAL
  3. SET VERSIONOFCSD=1.30h
  4. SET DGNAVERSION=
  5. SET SRCDRIVE=%1
  6. ECHO Checking system configuration, one moment please...
  7. IF NOT "%1%"=="" GOTO SRCSPECIFIED
  8. SET SRCDRIVE=A:
  9. :SRCSPECIFIED
  10. SET DGNAPATH=%2
  11. IF NOT "%2%"=="" GOTO PATHSPECIFIED
  12. ECHO Please be sure each system CD drive contains a CD.
  13. IF EXIST Z:\DGNA SET DGNAPATH=Z:\DGNA
  14. IF EXIST Y:\DGNA SET DGNAPATH=Y:\DGNA
  15. IF EXIST X:\DGNA SET DGNAPATH=X:\DGNA
  16. IF EXIST W:\DGNA SET DGNAPATH=W:\DGNA
  17. IF EXIST V:\DGNA SET DGNAPATH=V:\DGNA
  18. IF EXIST U:\DGNA SET DGNAPATH=U:\DGNA
  19. IF EXIST T:\DGNA SET DGNAPATH=T:\DGNA
  20. IF EXIST S:\DGNA SET DGNAPATH=S:\DGNA
  21. IF EXIST R:\DGNA SET DGNAPATH=R:\DGNA
  22. IF EXIST Q:\DGNA SET DGNAPATH=Q:\DGNA
  23. IF EXIST P:\DGNA SET DGNAPATH=P:\DGNA
  24. IF EXIST O:\DGNA SET DGNAPATH=O:\DGNA
  25. IF EXIST N:\DGNA SET DGNAPATH=N:\DGNA
  26. IF EXIST M:\DGNA SET DGNAPATH=M:\DGNA
  27. IF EXIST L:\DGNA SET DGNAPATH=L:\DGNA
  28. IF EXIST K:\DGNA SET DGNAPATH=K:\DGNA
  29. IF EXIST J:\DGNA SET DGNAPATH=J:\DGNA
  30. IF EXIST I:\DGNA SET DGNAPATH=I:\DGNA
  31. IF EXIST H:\DGNA SET DGNAPATH=H:\DGNA
  32. IF EXIST G:\DGNA SET DGNAPATH=G:\DGNA
  33. IF EXIST F:\DGNA SET DGNAPATH=F:\DGNA
  34. IF EXIST E:\DGNA SET DGNAPATH=E:\DGNA
  35. IF EXIST D:\DGNA SET DGNAPATH=D:\DGNA
  36. IF EXIST C:\DGNA SET DGNAPATH=C:\DGNA
  37. :PATHSPECIFIED
  38. CLS
  39. ECHO ┌────────────────────────────────────────────────────────────────────────┐
  40. ECHO │    DatagLANce Network Analyzer for Ethernet and Token-Ring Networks    │
  41. ECHO │                Corrective Services Diskette Version %VERSIONOFCSD%              │
  42. ECHO │     Copyright (C) IBM Corporation 1996. All Rights Reserved.           │
  43. ECHO │                                                                        │
  44. ECHO │ Note: You must have Version 1 Release 21 of DatagLANce already         │
  45. ECHO │       installed in order to use these corrective services.  These      │
  46. ECHO │       corrective services may not apply correctly to earlier versions  │
  47. ECHO │       of DatagLANce.                                                   │
  48. ECHO └────────────────────────────────────────────────────────────────────────┘
  49. ECHO Corrective Services will be applied to DatagLANce code in %DGNAPATH%
  50. ECHO Source files will be read from %SRCDRIVE%
  51. ECHO If this is not correct, press Ctrl-C now and enter:
  52. ECHO   SERVICE source-drive destination-path
  53. ECHO   Example:  SERVICE A: D:\DGNA
  54. ECHO ╔════════════════════════════════════════════════════════════════════════╗
  55. ECHO ║ Please terminate any DatagLANce applications that are running before   ║
  56. ECHO ║ proceeding.  The corrective services will not be applied correctly     ║
  57. ECHO ║ if any DatagLANce applications are executing in the background.        ║
  58. ECHO ╚════════════════════════════════════════════════════════════════════════╝
  59. PAUSE
  60. %SRCDRIVE%
  61. CD \
  62. REM Check current version installed
  63. IF EXIST %DGNAPATH%\DGNAVER.CMD CALL %DGNAPATH%\DGNAVER.CMD
  64. IF "%DGNAVERSION%"=="" GOTO BEFORE121
  65. IF "%DGNAVERSION%"=="%VERSIONOFCSD%" GOTO ALREADYINSTALLED
  66. IF "%DGNAVERSION%"=="1.21" GOTO STARTCSD
  67. IF "%DGNAVERSION%"=="1.30" GOTO STARTCSD
  68. IF "%DGNAVERSION%"=="1.30a" GOTO STARTCSD
  69. IF "%DGNAVERSION%"=="1.30b" GOTO STARTCSD
  70. IF "%DGNAVERSION%"=="1.30c" GOTO STARTCSD
  71. IF "%DGNAVERSION%"=="1.30d" GOTO STARTCSD
  72. IF "%DGNAVERSION%"=="1.30e" GOTO STARTCSD
  73. IF "%DGNAVERSION%"=="1.30f" GOTO STARTCSD
  74. IF "%DGNAVERSION%"=="1.30g" GOTO STARTCSD
  75. GOTO LATERINSTALLED
  76. :BEFORE121
  77. REM Check to see if Version 1.21 installed
  78. IF EXIST %DGNAPATH%\ENMON.EXE GOTO CHECKVER121E
  79. IF EXIST %DGNAPATH%\TRMON.EXE GOTO CHECKVER121
  80. IF EXIST %DGNAPATH%\DGPA.EXE GOTO CHECKVER121
  81. IF EXIST %DGNAPATH%\DGETUSER.INF GOTO STARTCSD
  82. GOTO DGNANOTINSTALLED
  83. :CHECKVER121E
  84. IF NOT EXIST %DGNAPATH%\SONIC GOTO ERRORWRONGVER
  85. GOTO STARTCSD
  86. :CHECKVER121
  87. IF NOT EXIST %DGNAPATH%\TUTOR GOTO ERRORWRONGVER
  88. :STARTCSD
  89. COPY S2.CMD %DGNAPATH% >NUL
  90. %DGNAPATH%\S2.CMD
  91. :ERRORWRONGVER
  92. ECHO ╔═ ERROR ════════════════════════════════════════════════════════════════╗
  93. ECHO ║ The DatagLANce Network Analyzer for Ethernet and Token-Ring Networks   ║
  94. ECHO ║ software currently installed on your system is a back-level version    ║
  95. ECHO ║ of software (Version 1 Release 1 or Release 2).                        ║
  96. ECHO ║                                                                        ║
  97. ECHO ║ You are entitled to a free upgrade to Version 1 Release 21.  You can   ║
  98. ECHO ║ obtain this upgrade by calling (919) 254-1364.                         ║
  99. ECHO ║                                                                        ║
  100. ECHO ║ Please obtain this upgrade and install the software.  Then             ║
  101. ECHO ║ use these diskettes to apply the corrective services.                  ║
  102. ECHO ╚════════════════════════════════════════════════════════════════════════╝
  103. GOTO DONE
  104. :DGNANOTINSTALLED
  105. ECHO ╔═ ERROR ════════════════════════════════════════════════════════════════╗
  106. ECHO ║ The DatagLANce Network Analyzer for Ethernet and Token-Ring Networks   ║
  107. ECHO ║ software is not currently installed on your system.                    ║
  108. ECHO ║                                                                        ║
  109. ECHO ║ Please use the installation diskettes to install the software then     ║
  110. ECHO ║ use these diskettes to apply the corrective services.                  ║
  111. ECHO ╚════════════════════════════════════════════════════════════════════════╝
  112. GOTO DONE
  113. :ALREADYINSTALLED
  114. ECHO ╔═ ERROR ════════════════════════════════════════════════════════════════╗
  115. ECHO ║ The DatagLANce Network Analyzer for Ethernet and Token-Ring Networks   ║
  116. ECHO ║ software Version %VERSIONOFCSD% is already installed on your system.            ║
  117. ECHO ╚════════════════════════════════════════════════════════════════════════╝
  118. ECHO If you would like to re-install corrective services for Version %VERSIONOFCSD%
  119. ECHO or you have just re-installed an older version of code, type
  120. ECHO the following commands at the prompt:
  121. ECHO   DEL %DGNAPATH%\DGNAVER.CMD
  122. ECHO   SERVICE
  123. GOTO DONE
  124. :LATERINSTALLED
  125. ECHO ╔═ ERROR ════════════════════════════════════════════════════════════════╗
  126. ECHO ║ A later version of the DatagLANce Network Analyzer for Ethernet and    ║
  127. ECHO ║ Token-Ring Networks software is installed on your system.  These       ║
  128. ECHO ║ Version %VERSIONOFCSD% corrective services cannot be installed.                 ║
  129. ECHO ╚════════════════════════════════════════════════════════════════════════╝
  130. GOTO DONE
  131. :DONE
  132. ENDLOCAL
  133.