home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 441.lha / IP_Device / Install_IP_Device / .script < prev    next >
Encoding:
Text File  |  1990-11-13  |  4.0 KB  |  143 lines
  1. failat 30
  2. ; IP: device and ppipc.library installation script 90:7:28
  3. ; (intended to work -- mostly -- under 1.2 on)
  4. cd _I_IP_:  ; assigned in tooltype
  5. makedir >NIL: RAM:C_IP
  6. copy >NIL: Local_C to RAM:C_IP
  7. path add RAM:C_IP
  8. if exists LIBS:ppipc.library
  9.     echo "ppipc.library found in LIBS: ...OK"
  10.     skip handler
  11. endif
  12. echo "  All ppIPC functions need 'ppipc.library' to be available in LIBS:"
  13. echo "-- It will take up under 3K of disk space"
  14. jask "-rInstall ppipc.library in LIBS: ?"
  15. if warn
  16.     echo "OK..."
  17.     copy ppipc.library to LIBS: clone
  18.     echo "ppipc.library copied"
  19. else
  20.     echo "OK -- another time maybe..."
  21.     skip exit
  22. endif
  23.  
  24. lab handler
  25. echo ""
  26. if exists L:IP-Handler
  27.     echo "IP-Handler (for 'IP:' device) found in L: ...OK"
  28.     skip xipcquit
  29. endif
  30. echo "  To mount the 'IP:' device at boot-up, IP-Handler must be in L:"
  31. echo "It occupies about 4.5K of disk space"
  32. echo "  If you would prefer (and are running AmigaDOS 1.3 or later),"
  33. echo "you can mount the device temporarily now without installing"
  34. echo "the handler (answer NO to the first requester)."
  35. echo "It will remain available until you next reboot your Amiga"
  36. jask "-rInstall IP-Handler in L: ?"
  37. if warn
  38.     echo "OK..."
  39.     copy IP-Handler to L: clone
  40.     echo "Handler copied"
  41. else
  42.     skip trial
  43. endif
  44.  
  45. lab xipcquit
  46. if exists C:IPCQuit
  47.     skip mountlist
  48. endif
  49. echo ""
  50. echo "a utility you will sometimes want available is 'IPCQuit';"
  51. echo "if you wish, I will transfer it to your C: directory now"
  52. jask "-rCopy IPCQuit to C: ?"
  53. if warn
  54.     echo "OK..."
  55.     copy IPCQuit to C: clone
  56.     echo "IPCQuit copied"
  57. endif
  58.  
  59. lab mountlist
  60. echo ""
  61. mat >NIL: search IP: nocase devs:mountlist
  62. if warn
  63.     echo "  For future mounting of the 'IP:' device,"
  64.     echo "MountList will need an entry for IP:"
  65.     echo "I can add a suitable entry now if you permit."
  66.     echo "If you prefer, and know how, you may do the job yourself."
  67.     echo "Or (under 1.3) you can mount it temporarily for testing."
  68.     echo "If the file is edited automatically, the original will"
  69.     echo "be kept as DEVS:MountList.BAK."
  70.     echo "If somehow an error should occur, the original file"
  71.     echo "will NOT be changed."
  72.     jask "-r.. shall I Edit MountList?"
  73.     if warn
  74.         echo "Proceeding to add IP: to MountList"
  75.         if exists DEVS:MountList.BAK
  76.             jask "-rMountlist.BAK exists -- shall I go on?" "-nNo Way!!" -pOK -q
  77.             if not warn
  78.                 echo "OK -- I'll stop here"
  79.                 skip exit
  80.             else
  81.                 delete DEVS:MountList.BAK
  82.             endif
  83.         endif
  84.         Merge >RAM:_New_MountList DEVS:MountList -1 IP_MountList
  85.         if fail
  86.             skip nogood
  87.         endif
  88.         copy RAM:_New_Mountlist to DEVS:
  89.         if fail
  90.             skip nogood
  91.         endif
  92.         delete RAM:_New_MountList
  93.         cd DEVS:
  94.         rename MountList as MountList.BAK
  95.         rename _New_MountList as MountList
  96.         echo "New MountList installed"
  97.         cd _I_IP_:
  98.         skip startup
  99.     lab nogood
  100.         echo "MountList editing FAILED!"
  101.         skip exit
  102.     else
  103.         echo ""
  104.         echo "MountList not being changed..."
  105.         echo "To make the changes yourself, use the template"
  106.         echo "IP_MountList in the 'Install 'IP:' Modules' directory"
  107.         skip trial
  108.     endif
  109. else
  110.     echo "Mountlist appears correct for IP: device"
  111.     skip startup
  112. endif
  113.  
  114. lab trial
  115.     jask "-rMount for a temporary trial instead?" -q
  116.     if warn
  117.         echo "OK...mounting device directly"
  118.         Mount IP: from IP_MountList_direct
  119.         if fail
  120.             echo "Sorry -- didn't work... probably not using 1.3?"
  121.         endif
  122.         skip exit
  123.     else
  124.         echo "OK -- give it a try sometime..."
  125.         skip exit
  126.     endif
  127.  
  128. lab startup
  129. echo ""
  130. execute fixup_Startup ;a separate file, being so complex...
  131. assign >NIL: exists IP: ; this will (should!) simply fail under 1.2
  132. if warn
  133.     jask "-rMount IP: now?"
  134.     if warn
  135.         mount IP:
  136.         echo "IP: device should be available for use"
  137.     endif
  138. else
  139.     echo "IP: device is mounted ready for use."
  140. endif
  141. lab exit
  142. delete >NIL: all RAM:C_IP
  143.