home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 13 / AACD13.ISO / AACD / System / EASys / InstallPack_47 / Install_EASys! next >
Text File  |  2000-08-02  |  8KB  |  328 lines
  1. ; 000520 T.Neidhardt, ft112@fen.baynet.de, EasySystem
  2. ; AmigaShell script
  3. ; Script for starting up the iGuide and
  4. ; preparing the installation procedure.
  5. ; To be executed by double-clicking it's Project Icon.
  6. ; Commands and filenames must be used case sensitive
  7. ; because PFS3 or SFS seem to make problems in other cases.
  8.  
  9. ;-------------------------------- variables
  10. failat 30
  11. stack 40000
  12.  
  13. set app EASys!
  14. set remove 0
  15.  
  16. assign >NIL: iGuide_root: EXISTS
  17. if warn
  18.  echo "*ec*n*n 1) Please once start installation directly from CDROM."
  19.  echo " 2) Then, do not continue when you are asked for OS3.5 CD / your code."
  20.  echo " 3) Start reinstall with this InstallPack Icon again."
  21.  wait 20
  22.  endcli
  23. endif
  24.  
  25. set instdir "iGuide_root:"
  26. copy EASys!_inst/#? iGuide_root: CLONE ALL QUIET
  27.  
  28. cd EASys!_CD:EASys!_4.7
  29.  
  30. ;-------------------------------- preparations
  31.  
  32. c:relabel RAM: RAM-Disk
  33. assign "RAM Disk:" RAM: ADD
  34. unalias lha
  35. unalias list
  36.  
  37. version >NIL: workbench.library 44
  38. IF warn
  39.  setenv osver 3.x
  40. ELSE
  41.  setenv osver 3.5
  42. ENDIF
  43.  
  44. ; Arq may cause heavy problems while installing on OS3.5:
  45. c/CLIExchange "Arq 1.83" KILL
  46. c/CLIExchange "Arq" KILL
  47. c/CLIExchange "MCP" DISABLE
  48. c/CLIExchange "MCP020" DISABLE
  49.  
  50. LAB begin
  51. cd >ENV:$app_StarterDir
  52.  
  53. ;-------------------------------- remove a misinstalled system
  54. if $remove eq 1
  55.  execute remove_$app.script
  56. endif
  57.  
  58. ;-------------------------------- check for already unpacked iGuide
  59.  
  60. if exists "iGuide_root:$app_iGuide/c/RemoteEd.rexx"
  61.   skip STARTER
  62. endif
  63.  
  64. if not exists $app.lha
  65.  skip error
  66. endif
  67.  
  68. if not exists $app_iGuide.lha
  69.  skip error
  70. endif
  71.  
  72. if not exists Lha
  73.  skip error
  74. endif
  75.  
  76. ;--------------------------------
  77. echo "*ec*n*n*e[1m Preparing Installation ...*e[0m*n ___________________________________________*n"
  78.  
  79. if not exists $instdir
  80.  makedir "$instdir"
  81. endif
  82.  
  83. assign >NIL: T: exists
  84. if warn
  85.  makedir RAM:T
  86.  assign T: RAM:T
  87. endif
  88. wait 3
  89.  
  90. ;--------------------------------
  91. LAB INSTALLER
  92. if exists "$instdir/$app_iGuide/c/RemoteEd.rexx"
  93.  skip STARTER
  94. endif
  95. echo "*ec*n*n*e[1m Extracting*e[0m Installer archive ...*n"
  96. wait 3
  97. LhA x -am $app_iGuide.lha "$instdir/"
  98. wait 2
  99.  
  100. ;--------------------------------
  101. LAB STARTER
  102. echo "*ec*n*n*e[1m Starting Installer...*e[0m*n"
  103. wait 3
  104.  
  105. cd "$instdir"
  106. if not exists $app_iGuide/c/RemoteEd.rexx
  107.  echo "*ec*n*e[1m $app-Guide Start Process:*e[0m*n Error occured unpacking $app_iGuide.lha"
  108.  skip END
  109. endif
  110.  
  111. assign iGuide_Root: ""
  112.  
  113. cd "$app_iGuide"
  114. assign iGuide: ""
  115. assign install_C: c
  116.  
  117. ;-------------------------------- PrepareOS
  118.  
  119. ; 000307 T.Neidhardt, ft112@fen.baynet.de, EasySystem
  120. ; AmigaShell script
  121. ; Script for general system preparation and supplying
  122. ; original OS commands for reliable iGuide scripting.
  123.  
  124. resident C:copy PURE
  125.  
  126. path SYS:c add
  127. path SYS:Utilities add
  128. path SYS:System add
  129. path SYS:Tools add
  130. path SYS:Tools/Commodities add
  131. path S: add
  132.  
  133. ;-------------------------------- Check OS Version
  134. if ${OS_check_done} eq 1 
  135.  skip DoRest
  136. endif
  137. if exists iGuide:c/MultiView
  138.  skip DoRest
  139. endif
  140.  
  141. if not $osver eq 3.5
  142.  skip oldOS
  143. ELSE
  144.  echo "*n*n ... please insert original OS3.5 CDROM !"
  145.  ask  " ... then press [ENTER]"
  146. ENDIF
  147.  
  148. ;-------------------------------- OS3.5
  149. IF EXISTS AmigaOS3.5:OS-Version3.1/Workbench3.1/C/Assign
  150.  copy AmigaOS3.5:OS-Version3.1/Workbench3.1/C/Assign Install_C: CLONE QUIET
  151.  copy AmigaOS3.5:OS-Version3.1/Workbench3.1/C/copy Install_C: CLONE QUIET
  152.  copy AmigaOS3.5:OS-Version3.1/Workbench3.1/C/Date Install_C: CLONE QUIET
  153.  copy AmigaOS3.5:OS-Version3.1/Workbench3.1/C/Delete Install_C: CLONE QUIET
  154.  copy AmigaOS3.5:OS-Version3.1/Workbench3.1/C/Execute Install_C: CLONE QUIET
  155.  copy AmigaOS3.5:OS-Version3.1/Workbench3.1/C/makedir Install_C: CLONE QUIET
  156.  copy AmigaOS3.5:OS-Version3.1/Workbench3.1/C/Rename Install_C: CLONE QUIET
  157.  copy AmigaOS3.5:OS-Version3.1/Workbench3.1/C/Search Install_C: CLONE QUIET
  158.  copy AmigaOS3.5:OS-Version3.1/Workbench3.1/C/Sort Install_C: CLONE QUIET
  159.  copy AmigaOS3.5:OS-Version3.1/Workbench3.1/C/Wait Install_C: CLONE QUIET
  160.  
  161.  copy AmigaOS3.5:OS-Version3.5/Workbench/c/List Install_C: CLONE QUIET
  162.  copy AmigaOS3.5:OS-Version3.5/Workbench/c/Status Install_C: CLONE QUIET
  163.  copy AmigaOS3.5:OS-Version3.5/Workbench/c/Type Install_C: CLONE QUIET
  164.  copy AmigaOS3.5:OS-Version3.5/Workbench/c/Version Install_C: CLONE QUIET
  165.  
  166.  copy AmigaOS3.5:OS-Version3.5/Workbench/Utilities/MultiView Install_C: CLONE QUIET
  167.  copy AmigaOS3.5:OS-Version3.1/Workbench3.1/Libs/rexx#? libs: CLONE QUIET
  168.  
  169.  Install_C:assign Install_C: AmigaOS3.5:OS-Version3.5/Workbench/c ADD
  170.  Install_C:assign Install_C: AmigaOS3.5:OS-Version3.5/Workbench/System ADD
  171.  Install_C:assign Install_C: AmigaOS3.5:OS-Version3.5/Workbench/Tools ADD
  172.  Install_C:assign Install_C: AmigaOS3.5:OS-Version3.5/Workbench/Utilities ADD
  173.  
  174.  skip DoRest
  175. ENDIF
  176.  
  177. ;-------------------------------- OS3.0 or OS3.1
  178. LAB oldOS
  179. copy C:assign Install_C: CLONE QUIET
  180. copy C:copy Install_C: CLONE QUIET
  181. copy C:Date Install_C: CLONE QUIET
  182. copy C:Delete Install_C: CLONE QUIET
  183. copy C:Execute Install_C: CLONE QUIET
  184. copy C:List Install_C: CLONE QUIET
  185. copy C:makedir Install_C: CLONE QUIET
  186. copy C:Rename Install_C: CLONE QUIET
  187. copy C:Search Install_C: CLONE QUIET
  188. copy C:Sort Install_C: CLONE QUIET
  189. copy C:Status Install_C: CLONE QUIET
  190. copy C:Type Install_C: CLONE QUIET
  191. copy C:Version Install_C: CLONE QUIET
  192. copy C:Wait Install_C: CLONE QUIET
  193.  
  194. IF EXISTS c:MultiView
  195.  copy c:MultiView Install_C: CLONE QUIET
  196. ENDIF
  197.  
  198. IF EXISTS SYS:System/MultiView
  199.  copy SYS:System/MultiView Install_C: CLONE QUIET
  200. ENDIF
  201.  
  202. IF EXISTS SYS:Tools/MultiView
  203.  copy SYS:Tools/MultiView Install_C: CLONE QUIET
  204. ENDIF
  205.  
  206. IF EXISTS SYS:Utilities/MultiView
  207.  copy SYS:Utilities/MultiView Install_C: CLONE QUIET
  208. ENDIF
  209.  
  210. ;--------------------------------
  211. LAB DoRest
  212.  
  213. setenv OS_check_done 1
  214.  
  215. resident Install_C:assign PURE
  216. resident Install_C:CLIexchange PURE
  217. resident Install_C:date PURE
  218. resident Install_C:delete PURE
  219. resident Install_C:execute PURE
  220. resident Install_C:list PURE
  221. resident Install_C:makedir PURE
  222. resident Install_C:move PURE
  223. resident Install_C:rename PURE
  224. resident Install_C:search PURE
  225. resident Install_C:sort PURE
  226. resident Install_C:version PURE
  227. resident Install_C:wait PURE
  228.  
  229. assign Install_C: c: ADD
  230. assign Install_C: SYS:System ADD
  231. assign Install_C: SYS:Tools ADD
  232. assign Install_C: SYS:Utilities ADD
  233.  
  234. path reset
  235. path Install_C:
  236. path c: ADD
  237. path SYS:System ADD
  238. path SYS:Utilities ADD
  239. path SYS:Tools ADD
  240. ;-------------------------------- end PrepareOS
  241. ;-------------------------------- StartRexx
  242.  
  243. ; 000307 T.Neidhardt, ft112@fen.baynet.de, EasySystem
  244. ; AmigaShell script
  245. ; Start Rexxmaster and make available RexxReqtools
  246. ; deliver rexxmast and rxlib if not existent on the host system's
  247. ; appropriate pathes. SYS:Rexxc/ IS A STANDARD!
  248.  
  249. ;--------------------------------
  250. setenv Msg Rexx_log
  251.  
  252. ;--------------------------------
  253. if ${Flags/REXX_INSTALLED} eq 1
  254.  skip EndRexx
  255. endif
  256.  
  257. ;--------------------------------
  258. if not exists sys:system
  259.  makedir sys:System
  260.  setenv RexxInstalledNow 1   ;for signalling if $Msg must be popped up
  261. endif
  262.  
  263. if not exists sys:system/rexxmast
  264.  copy Inst_rexx/system/rexxmast#? SYS:System CLONE QUIET
  265.  delete SYS:WBstartup/rexxmast#? force quiet
  266.  setenv RexxInstalledNow 1
  267. endif
  268.  
  269. avail >NIL: flush
  270. copy Inst_rexx/libs SYS:libs CLONE ALL QUIET
  271.  
  272. ;this should be standard on up-to-date systems, but who
  273. ;knows if any user has deleted those libraries? Keep sure...
  274. ;so everything will work properly.
  275.  
  276. if not exists sys:rexxc
  277.  makedir sys:RexxC
  278.  setenv RexxInstalledNow 1
  279. endif
  280.  
  281. if not exists sys:rexxc/rxlib
  282.  copy Inst_rexx/rexxc/rxlib SYS:RexxC CLONE QUIET
  283.  setenv RexxInstalledNow 1
  284. endif
  285.  
  286. if not exists sys:rexxc/rx
  287.  copy Inst_rexx/rexxc/rx SYS:RexxC CLONE QUIET
  288.  setenv RexxInstalledNow 1
  289. endif
  290.  
  291. resident SYS:rexxc/rx PURE
  292.  
  293. ;--------------------------------
  294. LAB Create
  295.  
  296.  run >NIL: sys:system/rexxmast
  297.  wait 1
  298.  
  299.  SYS:RexxC/rxlib rexxsupport.library 80 -30
  300.  SYS:RexxC/rxlib rexxreqtools.library 50 -30
  301.  SYS:RexxC/rxlib rexxarplib.library 30 -30
  302.  
  303.  if not exists ENV:Flags
  304.     makedir ENV:Flags
  305.  endif
  306.  
  307.  setenv Flags/REXX_INSTALLED 1
  308.  
  309. LAB EndRexx
  310. ;-------------------------------- end StartRexx
  311. ;-------------------------------- GetCode
  312.  
  313. echo "*n"
  314. Install_C:GetCode
  315.  
  316. ;-------------------------------- END
  317. lab END
  318. wait 5
  319. cd SYS:
  320. endcli
  321.  
  322. ;--------------------------------
  323. lab ERROR
  324. echo "*ec*n*e[1m Error installing $app:*e[0m*n*n The following files must be in this directory:*n*n $app.lha*n Install_Guide*n $app_iGuide.lha*n Lha*n*n*n Your version is*e[1m not up to date*e[0m or it is*e[1m incomplete*e[0m.*n*n Closing this window 1
  325. wait 15
  326. cd SYS:
  327.  
  328.