home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / dtx9303 / netz / os2net / nwinst.cmd < prev    next >
Encoding:
Text File  |  1993-05-27  |  4.4 KB  |  74 lines
  1. /*===========================================================================*/
  2. /*                                 NWINST.CMD                                */
  3. /*---------------------------------------------------------------------------*/
  4. /* Installationsroutine für den Netware Requester                            */
  5. /* REXX Prozedur, um die CONFIG.SYS für OS/2 2.0 zu modifizieren             */
  6. /* Fügt den PATH-, DPATH- und LIBPATH-Statements den Eintrag C:\NETWARE zu   */
  7. /*===========================================================================*/
  8.  
  9. address cmd
  10. '@echo off'
  11. env='OS2ENVIRONMENT'                              /* Zugang zur OS2 Umgebung */
  12. CltDrv=value('TargetDrive',,env)                    /* List Laufwerk für OS2 */
  13. NWDrv='C:'                                      /* Bestimmt Laufwerk für  NW */
  14. /*                                                                           */
  15. /* Das Ziellaufwerk von  OS2 wird aus der Antwortdatei gelesen               */
  16. /* Ziellaufwerk.                                                             */
  17. /*                                                                           */
  18. /* Der NWDrv Buchstabe ist das Laufwerk, auf dem NETWARE installiert wird.   */
  19. /* Es kann auch ein anderes Laufwerk sein, wenn gewünscht.                   */
  20.  
  21. do while lines(CltDrv||'\config.sys')                  /* Bis zum Datei-Ende */
  22.   it = linein(CltDrv||'\config.sys')                    /* Erste Zeile lesen */
  23.   it = translate(it)                                    /* UPCASE-Umwandlung */
  24.   if pos( 'SET PATH' , it ) <> 0 then  /* Wenn »SET PATH« in der Zeile steht */
  25.     do
  26.        it = it || NWDrv||'\NETWARE'             /* Zufügen: (NWDrv);\NETWARE */
  27.   end
  28.   if pos( 'SET DPATH' , it ) <> 0 then      /* Falls »SET DPATH« darin steht */
  29.     do
  30.        it = it || NWDrv||'\NETWARE'             /* Zufügen: (NWDrv);\NETWARE */
  31.   end
  32.   if pos( 'LIBPATH' , it ) <> 0 then        /* Falls »LIBPATH« gefunden wird */
  33.     do
  34.        it = it || NWDrv||'\NETWARE'             /* Zufügen: (NWDrv);\NETWARE */
  35.   end
  36.   call lineout CltDrv||'\config.new', it  /* Zeile in »config.new« schreiben */
  37. end
  38.  
  39. /* Dateien schließen:                                                        */
  40. call stream CltDrv||'\config.new','c','close'
  41. call stream CltDrv||'\config.sys','c','close'
  42. 'copy' CltDrv||'\config.new' CltDrv||'\config.sys'
  43. 'del 'CltDrv||'\config.new'
  44. /*                                                                           */
  45. /* Die nächsten Zeilen fügen die benötigten DEVICE-Statements in die         */
  46. /* CONFIG.SYS für das Novell-Netzwerk ein.                                   */
  47. /* Sie enthalten nur TOKEN RING-Treiber                                      */
  48. /*                                                                           */
  49. call lineout CltDrv||'\config.sys',' '
  50. call lineout CltDrv||'\config.sys','REM'
  51. call lineout CltDrv||'\config.sys','REM Beginning of Netware device statements'
  52. call lineout CltDrv||'\config.sys','REM'
  53. call lineout CltDrv||'\config.sys','DEVICE='NWDrv||'\NETWARE\LSL.SYS'
  54. call lineout CltDrv||'\config.sys','DEVICE='NWDrv||'\NETWARE\TOKEN.SYS'
  55. call lineout CltDrv||'\config.sys','DEVICE='NWDrv||'\NETWARE\ROUTE.SYS'
  56. call lineout CltDrv||'\config.sys','DEVICE='NWDrv||'\NETWARE\IPX.SYS'
  57. call lineout CltDrv||'\config.sys','DEVICE='NWDrv||'\NETWARE\NWREQ.SYS'
  58. call lineout CltDrv||'\config.sys','IFS='NWDrv||'\NETWARE\NWIFS.IFS'
  59. call lineout CltDrv||'\config.sys','RUN='NWDrv||'\NETWARE\NWDAEMON.EXE'
  60. call lineout CltDrv||'\config.sys','RUN='NWDrv||'\NETWARE\DDAEMON.EXE'
  61. call lineout CltDrv||'\config.sys','REM'
  62. call lineout CltDrv||'\config.sys','REM - NetWare Requester statements END --'
  63. call lineout CltDrv||'\config.sys'
  64. /*                                                                           */
  65. /* Dieser Teil erstellt das NWDrv NETWARE-Verzeichnis und                    */
  66. /* kopiert vom Server die Netware-Requester-Dateien hinein                   */
  67. /*                                                                           */
  68. 'md' NWDrv||'\NETWARE'
  69. 'copy N:\*.* 'NWDrv||'\NETWARE'
  70. /*                                                                           */
  71. /* Die nächste Zeile kopiert die OS/2-Installationsdatei zum Server          */
  72. 'copy 'CltDrv||'\OS2\INSTALL\INSTALL.LOG X:\'
  73. /*===========================================================================*/
  74. /*                           Ende von NWINST.CMD                             */