home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 13 / AACD13.ISO / AACD / System / EASys / EASys!_update_47x_to_481 / StartSys / Modas2Standard < prev    next >
Text File  |  2000-04-12  |  7KB  |  203 lines
  1. ;convert ModAS c_Prepare to user-startup
  2. ;derive Startup-sequence from a_Init throughout e_WB
  3. failat 30
  4. cd SYS:
  5.  
  6. ; re-enable original Amiga-Startup
  7. ; disable ModAS completely
  8.  
  9. assign >NIL: EASys!_bin: exists
  10. if not warn
  11.  copy EASys!_bin:swipe T: CLONE QUIET
  12.  copy EASys!_bin:CLIexchange T: CLONE QUIET
  13.  copy EASys!_rexx:remoteed.rexx T: CLONE QUIET
  14. endif
  15.  
  16. if $LANGUAGE eq "deutsch"
  17.  echo "*ec*n*n*e[1m Startup-Sequence und user-startup rekonstruieren:*e[0m"
  18.  echo "*n*n Fortsetzen?" NOLINE
  19. else
  20.  echo "*ec*n*n*e[1m Reconstruction of standard startup from ModAS*e[0m"
  21.  echo "*n*n Continue?" NOLINE
  22. endif
  23.  
  24. ask " [y/n] n "
  25. if not warn
  26.  skip functional
  27. endif
  28.  
  29. if $LANGUAGE eq "deutsch"
  30.  echo " Wirklich? ModAS ist nützlicher als Du denkst ;)" NOLINE
  31. else
  32.  echo " Really? ModAS is great ;)" NOLINE
  33. endif
  34.  
  35. ask " [y/n] n "
  36. if not warn
  37.  skip functional
  38. endif
  39.  
  40. LAB menu
  41. if $LANGUAGE eq "deutsch"
  42.  echo "*ec*n*n*e[1m Startup-Sequence und user-startup rekonstruieren:*e[0m"
  43.  echo " [1] Aus den Backup Dateien der startup-sequence und der user-startup,"
  44.  echo "     die vor der ModAS Installation automatisch erzeugt wurden?"
  45.  echo " [2] Aus der derzeitigen ModAS Boot Sequenz. Wird benötigt, wenn"
  46.  echo "     seit der ModAS Installation grundlegende Änderungen am Systemstart"
  47.  echo "     durchgeführt wurden (z.B. durch Programminstallationen)."
  48.  echo " [e] Exit "
  49.  echo "*n Eingabe: " NOLINE
  50. else
  51.  echo "*ec*n*e[1m Reconstruct startup-sequence and user-startup:*e[0m"
  52.  echo " [1] From startup-sequence and user-startup backup files,"
  53.  echo "     which have been created before ModAS was installed?"
  54.  echo " [2] From current ModAS boot sequence (needed when significant"
  55.  echo "     changes have been done to the startup since ModAS"
  56.  echo "     installation)"
  57.  echo " [e] Exit"
  58.  echo "*n Choice: " NOLINE
  59. endif
  60.  
  61. set >NIL: input ?
  62.  
  63. if "$input" eq "e"
  64.  skip functional
  65. endif
  66.  
  67. if "$input" eq "1"
  68.  execute SYS:StartSys/StartupStandard
  69.  quit
  70. endif
  71.  
  72. if not "$input" eq "2"
  73.  skip menu back
  74. endif
  75.  
  76. T:cliexchange MultiNotify KILL
  77.  
  78. ;remove things coupled directly to modas first
  79. delete sys:startsys/b_gui/#?_LOGIN QUIET
  80. delete sys:startsys/b_gui/#?sayhello QUIET
  81. delete sys:startsys/b_gui/#?User_env QUIET
  82. delete sys:startsys/b_gui/#?BootScreenStart QUIET
  83. delete sys:startsys/d_system/#?User_Icons QUIET
  84. delete sys:startsys/d_system/#?User_WBstartup QUIET
  85. delete sys:startsys/e_wb/#?ModAS_deamon QUIET
  86. delete sys:startsys/e_wb/#?sayready QUIET
  87. delete sys:startsys/e_wb/#?CleanUp QUIET
  88. delete sys:startsys/b_gui/#?BootScreenClose QUIET
  89.  
  90. ;convert startup-sequence
  91. if exists T:SSeq_core
  92.  delete T:SSeq_core T:SSeq_Begin T:SSeq_End QUIET
  93. endif
  94.  
  95. copy s:startup-sequence t: CLONE QUIET
  96. rx T:remoteed.rexx movetext T:startup-sequence "sTaRt" "~~;BEGIN ModAS" T:SSeq_Begin
  97. rx T:remoteed.rexx movetext T:startup-sequence "~~;END ModAS" "§§##" T:SSeq_End
  98.  
  99. echo >T:tmpscript_a "failat 30"
  100. list sys:startsys/a_Init/~(_#?) >>T:tmpscript_a FILES LFORMAT "type >>T:SSeq_core *"%s%s*"*n"
  101. sort T:tmpscript_a to T:sseq_a
  102.  
  103. echo >T:tmpscript_a "failat 30"
  104. list sys:startsys/b_GUI/~(_#?) >>T:tmpscript_a FILES LFORMAT "type >>T:SSeq_core *"%s%s*"*n"
  105. sort T:tmpscript_a to T:sseq_b
  106.  
  107. echo >T:sseq_c "echo >>T:SSeq_core *"**nif exists s:user-startup**n execute s:user-startup**nendif**n*""
  108.  
  109. echo >T:tmpscript_a "failat 30"
  110. list sys:startsys/d_System/~(_#?) >>T:tmpscript_a FILES LFORMAT "type >>T:SSeq_core *"%s%s*"*n"
  111. sort T:tmpscript_a to T:sseq_d
  112.  
  113. echo >T:tmpscript_a "failat 30"
  114. list sys:startsys/e_WB/~(_#?) >>T:tmpscript_a FILES LFORMAT "type >>T:SSeq_core *"%s%s*"*n"
  115. sort T:tmpscript_a to T:sseq_e
  116.  
  117. join T:sseq_a T:sseq_b T:sseq_c T:sseq_d T:sseq_e AS T:conv_sseq.script
  118. execute T:conv_sseq.script
  119.  
  120. join T:sseq_Begin T:sseq_core T:sseq_End AS T:NewSSeq
  121. echo >>T:NewSSeq "*nEndCLI >NIL:"
  122. rx T:remoteed.rexx movetext T:NewSSeq "ModAS" "1LiNe" T:Trash
  123.  
  124. delete T:sseq_#? T:tmpscript_a T:conv_sseq.script T:Trash FORCE QUIET
  125.  
  126. ;convert User-Startup
  127. if exists T:NewUserStartup
  128.  delete T:NewUserStartup QUIET
  129. endif
  130.  
  131. echo >T:tmpscript_a "failat 30"
  132. list sys:startsys/c_prepare/~(_#?) >T:tmpscript_a FILES LFORMAT "execute T:tmpscript_b *"%s%s*" *"%n*""
  133. sort T:tmpscript_a to T:conv_users.script
  134.  
  135. echo >T:tmpscript_b ".key file,name*nfailat 30"
  136. echo >>T:tmpscript_b "echo >>T:NewUserStartup *";BEGIN <name>*"*ntype >>T:NewUserStartup *"<file>*"*necho >>T:NewUserStartup *";END <name>**n*"*n"
  137.  
  138. execute T:conv_users.script
  139. delete T:conv_users.script T:tmpscript_a T:tmpscript_b QUIET
  140.  
  141. ;Replace Startup Files now
  142. if not exists s:user-startup.modas
  143.  copy s:user-startup s:user-startup.modas CLONE QUIET
  144. endif
  145. copy T:NewUserStartup S:User-Startup CLONE QUIET
  146.  
  147. if not exists s:startup-sequence.modas
  148.  copy s:startup-sequence s:startup-sequence.modas CLONE QUIET
  149. endif
  150. copy T:NewSSeq S:Startup-sequence CLONE QUIET
  151.  
  152. ;Cleanup
  153. delete T:tmpscript_a T:tmpscript_b T:NewUserStartup T:NewSSeq QUIET
  154.  
  155. assign profile: REMOVE
  156. path SYS:StartSys REMOVE
  157. path SYS:StartSys/bin REMOVE
  158.  
  159. ;restart MultiNotify for Standard startup
  160. copy SYS:StartSys/StartupStandard.MultiNotify ENVARC:MultiNotify.prefs CLONE QUIET
  161. copy SYS:StartSys/StartupStandard.MultiNotify ENV:MultiNotify.prefs CLONE QUIET
  162. run >NIL: EASys!_bin:MultiNotify
  163.  
  164. T:swipe >NIL: SYS:StartSys FORCE ALL QUIET
  165. T:swipe >NIL: SYS:ShutDown FORCE ALL QUIET
  166. delete SYS:StartSys.info SYS:ShutDown.info FORCE QUIET
  167.  
  168. delete SYS:StartSys/ModAS_activated FORCE QUIET
  169. delete envarc:LoggedLast env:LoggedLast FORCE QUIET
  170. delete envarc:LoggedPrevious env:LoggedPrevious FORCE QUIET
  171.  
  172. if $LANGUAGE eq "deutsch"
  173.  echo "*n*n*e[1m Standard Startup rekonstruiert.*e[0m"
  174.  echo "*n Da das neue StandardStartup vom installierten ModAS Startup"
  175.  echo " erzeugt wurde, wird es länger als die ursprüngliche startup-sequence"
  176.  echo " sein. Als Referenz zum ursprünglichen Startup wurde vor ModAS Installation"
  177.  echo " automatisch folgende Kopie erzeugt:  S:Startup-sequence.before_ModAS"
  178.  echo " sowie:  S:User-Startup.before_ModAS. Zu eventuellen Klärungen stehen"
  179.  echo " diese beiden Dateien zur Verfügung."
  180.  
  181.  echo "*n Um wieder einen ModAS Startup zu erhalten, starte bitte"
  182.  echo " wieder den ModAS Installer oder den Installer mit welchem"
  183.  echo " ModAS installiert wurde.*n"
  184. else
  185.  echo "*n*n*e[1m Standard Startup reconstructed.*e[0m"
  186.  echo "*n Since the new standard startup has been derived from the installed"
  187.  echo " ModAS System, it may be longer than your original startup-sequence."
  188.  echo " Consult S:Startup-sequence.before_ModAS - being a backup of your"
  189.  echo " original startup file which was the base for creating ModAS."
  190.  
  191.  echo "*n To obtain ModAS Startup again, please restart the ModAS Installer"
  192.  echo " or the Installer which included ModAS Installation again.*n"
  193. endif
  194.  
  195. skip End
  196.  
  197. Lab functional
  198. echo "*n*n*e[1m ModAS remains functional*e[0m*n"
  199.  
  200. Lab End
  201. delete >NIL: T:swipe T:cliexchnage T:remoteed.rexx FORCE QUIET
  202.  
  203.