home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / GFX / viewer / X!-SV569.LHA / SuperViewEL / SuperViewLibrary / Install_SVLib < prev    next >
Encoding:
Text File  |  1996-11-21  |  11.8 KB  |  415 lines
  1. ; $VER: Install_SVLib V15.2 (16.9.96)
  2. ; © 1993-96 by Andreas R. Kleinert.
  3. ; This is the Installer Script for superview.library V15+
  4.  
  5. (set @app-name "SuperView-Library")
  6.  
  7. ; ask for CPU and try handling 68060
  8. (set MC68x (database "cpu"))
  9. (if (> (exists "libs:68060.library") 0)
  10.     (
  11.      (set MC68x 68040)
  12.     )
  13. )
  14.  
  15. (welcome "SuperView-Library Installation Utility")
  16.  
  17. (if (= @language "deutsch")
  18.   (
  19.     (set MSG_Yes "Ja")
  20.     (set MSG_No  "Nein")
  21.     (set MSG_BasicConfig "Was ist Ihre Grundkonfiguration ?")
  22.     (set Gfx0  "Keine Angabe (nichts ändern)")
  23.     (set Gfx1  "Amiga ECS, keine Grafikkarte")
  24.     (set Gfx2  "Amiga AGA, keine Grafikkarte")
  25.     (set Gfx3  "CD-32 AGA, keine Grafikkarte")
  26.     (set Gfx4  "Karte mit CyberGraphX-Emulation")
  27.     (set Gfx5  "Karte mit EGS-Emulation")
  28.     (set Gfx6  "Picasso II")
  29.     (set Gfx7  "Retina Z2/Z3")
  30.     (set Gfx8  "Merlin")
  31.     (set Gfx9  "OpalVision")
  32.     (set Gfx10 "Amiga ECS/AGA, andere Grafikkarte")
  33.     (set MSG_CopyEnvConfig "Kopiere notwendige Konfiguration nach ENV:")
  34.     (set MSG_LibPath "Library-Pfad")
  35.     (set MSG_InstallingLibs "Kopiere Libraries...")
  36.     (set MSG_LZWUsage (cat "\nIst LZW-Nutzung in Ihrem Land rechtlich lizenzfrei ?\n\n"
  37.                            "Hinweis:\n"
  38.                            "Falls nicht, werden die LZW-basieren Routinen\n"
  39.                            "nun desaktiviert. Falls Sie dennoch <Ja> wählen,\n"
  40.                            "stimmen Sie hiermit zu, alle möglichen fälligen\n"
  41.                            "Lizenzzahlungen, für kommerzielle oder sonstige\n"
  42.                            "Nutzung, selbst zu zahlen. Falls Sie hiermit nicht\n"
  43.                            "übereinstimmen, wählen Sie Installationsabbruch.\n"
  44.                       )
  45.     )
  46.     (set MSG_LZWYes "Ja (z.B. Deutschland)")
  47.     (set MSG_LZWNo "Nein (z.B. USA)")
  48.     (set MSG_Ghostscript (cat "\nHaben Sie bereits Ghostscript installiert ?\n\n"
  49.                               "(Falls <Ja>, müssen Sie hier nun den\n"
  50.                               " Programmpfad und -namen angeben.)\n"
  51.                          )
  52.     )
  53.     (set MSG_GSPath "Pfad und Name des Ghostscript-Programmes")
  54.     (set MSG_CatPath "Katalogpfad")
  55.     (set MSG_InstallingCats "Kopiere Katalogdateien...")
  56.     (set MSG_VMEM "Ändere jetzt S:User-Startup für VMem-Unterstützung...")
  57.     (set MSG_VMemPath "Pfad für virtuellen Speicher")
  58.     (set MSG_CopyPrefs "SVPrefs nach SYS:Prefs kopieren ?")
  59.     (set MSG_PackerSupport "Packer-Unterstützung jetzt gleich installieren ?")
  60.     (set MSG_SQOperators "SQ-Operators jetzt gleich installieren ?")
  61.     (set MSG_Ready "SuperView-Library wurde installiert.\nFalls dies ein Update war, sollten Sie ggf.\nIhren Rechner nun neu starten.")
  62.   )
  63. )
  64.  
  65. (if (= @language "english")
  66.   (
  67.     (set MSG_Yes "Yes")
  68.     (set MSG_No  "No")
  69.     (set MSG_BasicConfig "What's your basic configuration ?")
  70.     (set Gfx0  "Not specified (do not change)")
  71.     (set Gfx1  "Amiga ECS, no GfxCard")
  72.     (set Gfx2  "Amiga AGA, no GfxCard")
  73.     (set Gfx3  "CD-32 AGA, no GfxCard")
  74.     (set Gfx4  "Card with CyberGraphX-Emulation")
  75.     (set Gfx5  "Card with EGS-Emulation")
  76.     (set Gfx6  "Picasso II")
  77.     (set Gfx7  "Retina Z2/Z3")
  78.     (set Gfx8  "Merlin")
  79.     (set Gfx9  "OpalVision")
  80.     (set Gfx10 "Amiga ECS/AGA, other GfxCard")
  81.     (set MSG_CopyEnvConfig "Copying appropriate configuration to ENV:")
  82.     (set MSG_LibPath "Library Path")
  83.     (set MSG_InstallingLibs "Copying Libraries...")
  84.     (set MSG_LZWUsage (cat "\nIs LZW usage license-free by your countries' law ?\n\n"
  85.                            "Note:\n"
  86.                            "If not, LZW dependent routines will be\n"
  87.                            "deactivated now. If you select Yes\n"
  88.                            "nevertheless, you hereby agree to pay\n"
  89.                            "any possible license fees for commercial\n"
  90.                            "or other usage by yourself. If you do not\n"
  91.                            "agree with that, select >Abort Install<\n"
  92.                       )
  93.     )
  94.     (set MSG_LZWYes "Yes (e.g. Germany)")
  95.     (set MSG_LZWNo "No (e.g. USA)")
  96.     (set MSG_Ghostscript (cat "\nDo you already have Ghostscript installed ?\n\n"
  97.                               "(When answering with <Yes>, you have to supply\n"
  98.                               " the program's path and name here.)\n"
  99.                          )
  100.     )
  101.     (set MSG_GSPath "Path and name of Ghostscript executable")
  102.     (set MSG_CatPath "Catalog Path")
  103.     (set MSG_InstallingCats "Copying catalog files...")
  104.     (set MSG_VMEM "Now modifying your S:User-Startup for VMem-Support...")
  105.     (set MSG_VMemPath "Virtual Memory Path")
  106.     (set MSG_CopyPrefs "Copy SVPrefs to SYS:Prefs ?")
  107.     (set MSG_PackerSupport "Install PackerSupport right now ?")
  108.     (set MSG_SQOperators "Install SQ-Operators right now ?")
  109.     (set MSG_Ready "SuperView-Library has been installed now.\nIf this was an Update, you should\nreboot your computer now.")
  110.   )
  111. )
  112.  
  113. ; **************************************************************************
  114. ; Create/Update basic configuration
  115.  
  116. (makedir "ENV:SuperView-Library")
  117. (makedir "ENVARC:SuperView-Library")
  118.  
  119. (set selectsvdriver (askchoice
  120.                       (prompt MSG_BasicConfig)
  121.                       (help @askchoice-help)
  122.                       (choices Gfx0 Gfx1 Gfx2 Gfx3 Gfx4 Gfx5 Gfx6 Gfx8)
  123.                       (default 1)
  124.                     )
  125. )
  126.  
  127. (if (= selectsvdriver 1)  (set env_source "docs/SampleConfigs/env_ECS")           )
  128. (if (= selectsvdriver 2)  (set env_source "docs/SampleConfigs/env_AGA")           )
  129. (if (= selectsvdriver 3)  (set env_source "docs/SampleConfigs/env_AGA_CD32")      )
  130. (if (= selectsvdriver 4)  (set env_source "docs/SampleConfigs/env_CyberGraphics") )
  131. (if (= selectsvdriver 5)  (set env_source "docs/SampleConfigs/env_EGS7")          )
  132. (if (= selectsvdriver 6)  (set env_source "docs/SampleConfigs/env_PicassoII")     )
  133. (if (= selectsvdriver 7)  (set env_source "docs/SampleConfigs/env_Retina")        )
  134. (if (= selectsvdriver 8)  (set env_source "docs/SampleConfigs/env_Merlin")        )
  135. (if (= selectsvdriver 9)  (set env_source "docs/SampleConfigs/env_OpalVision")    )
  136. (if (= selectsvdriver 10) (set env_source "docs/SampleConfigs/env_GfxCards")      )
  137.  
  138. (if (> selectsvdriver 0)
  139.   (
  140.     (copyfiles
  141.       (prompt MSG_CopyEnvConfig)
  142.       (help @copyfiles-help)
  143.       (source env_source)
  144.       (dest "ENV:")
  145.       (all)
  146.     )
  147.     (copyfiles
  148.       (prompt MSG_CopyEnvConfig)
  149.       (help @copyfiles-help)
  150.       (source env_source)
  151.       (dest "ENVARC:")
  152.       (all)
  153.     )
  154.   )
  155. )
  156.  
  157. (copyfiles
  158.   (prompt MSG_CopyEnvConfig)
  159.   (help @copyfiles-help)
  160.   (source "env")
  161.   (dest "ENVARC:")
  162.   (all)
  163. )
  164.  
  165. ; **************************************************************************
  166. ; Install main libraries
  167.  
  168. (copylib
  169.   (prompt MSG_InstallingLibs)
  170.   (help @copylib-help)
  171.   (source "libs/superview.library")
  172.   (set svlibdir
  173.               (askdir
  174.                      (prompt MSG_LibPath)
  175.                      (help @askdir-help)
  176.                      (newpath)
  177.                      (default "LIBS:")
  178.               )
  179.   )
  180.   (dest svlibdir)
  181. )
  182.  
  183. (set @default-dest svlibdir)
  184.  
  185. (copylib
  186.   (prompt MSG_InstallingLibs)
  187.   (help @copylib-help)
  188.   (source "libs/superviewsupport.library")
  189.   (dest svlibdir)
  190. )
  191.  
  192. ; **************************************************************************
  193. ; Ask for LZW
  194.  
  195. (set lzwquest (askchoice
  196.                 (prompt MSG_LZWUsage)
  197.                 (help @askchoice-help)
  198.                 (choices MSG_LZWYes MSG_LZWNo)
  199.                 (default 0)
  200.               )
  201. )
  202.  
  203. (if (= lzwquest 0)
  204.   (
  205.    (textfile
  206.        (dest "ENV:SuperView-Library/LEGAL.controlpad")
  207.        (append "LZW=ENABLED\n")
  208.    )
  209.    (copyfiles
  210.        (source "ENV:SuperView-Library/LEGAL.controlpad")
  211.        (dest "ENVARC:SuperView-Library")
  212.    )
  213.   )
  214. )
  215.  
  216. (if (= lzwquest 1)
  217.   (
  218.    (textfile
  219.        (dest "ENV:SuperView-Library/LEGAL.controlpad")
  220.        (append "LZW=DISABLED\n")
  221.    )
  222.    (copyfiles
  223.        (source "ENV:SuperView-Library/LEGAL.controlpad")
  224.        (dest "ENVARC:SuperView-Library")
  225.    )
  226.   )
  227. )
  228.  
  229. ; **************************************************************************
  230. ; Ask for Ghostscript
  231.  
  232. (set gsquest (askchoice
  233.                 (prompt MSG_Ghostscript)
  234.                 (help @askchoice-help)
  235.                 (choices MSG_Yes MSG_No)
  236.                 (default 0)
  237.               )
  238. )
  239.  
  240. (if (= gsquest 0)
  241.   (
  242.     (set gspath (askfile
  243.                   (prompt MSG_GSPath)
  244.                   (help @askfile-help)
  245.                   (default "gs000")
  246.                 )
  247.     )
  248.     (set gspathopt (cat "GS_PATH=" gspath "\n"))
  249.     (textfile
  250.       (dest "ENV:SuperView-Library/Ghostscript.controlpad")
  251.       (append gspathopt)
  252.     )
  253.     (copyfiles
  254.       (source "ENV:SuperView-Library/Ghostscript.controlpad")
  255.       (dest "ENVARC:SuperView-Library")
  256.     )
  257.   )
  258. )
  259.  
  260.  
  261. ; **************************************************************************
  262. ; Install catalogs
  263.  
  264. (makedir "SYS:locale")
  265. (makedir "SYS:locale/catalogs")
  266.  
  267. (copyfiles
  268.   (prompt MSG_InstallingCats)
  269.   (help @copyfiles-help)
  270.   (source "locale/catalogs")
  271.   (set svcatdir
  272.               (askdir
  273.                      (prompt MSG_CatPath)
  274.                      (help @askdir-help)
  275.                      (newpath)
  276.                      (default "SYS:locale/Catalogs")
  277.               )
  278.   )
  279.   (dest svcatdir)
  280.   (all)
  281. )
  282.  
  283. ; **************************************************************************
  284. ; Install library modules
  285.  
  286. (set svobjectdir   (tackon svlibdir "svobjects"))
  287. (set svdriverdir   (tackon svlibdir "svdrivers"))
  288. (set svoperatordir (tackon svlibdir "svoperators"))
  289.  
  290. (makedir svobjectdir)
  291. (makedir svdriverdir)
  292. (makedir svoperatordir)
  293.  
  294. (copyfiles
  295.   (prompt MSG_InstallingLibs)
  296.   (help @copyfiles-help)
  297.   (source "libs/svobjects")
  298.   (dest (tackon svlibdir "svobjects"))
  299.   (pattern "#?")
  300.   (confirm)
  301.   (files)
  302. )
  303.  
  304. (copyfiles
  305.   (prompt MSG_InstallingLibs)
  306.   (help @copyfiles-help)
  307.   (source "libs/svdrivers")
  308.   (dest (tackon svlibdir "svdrivers"))
  309.   (pattern "#?")
  310.   (confirm)
  311.   (files)
  312. )
  313.  
  314. (copyfiles
  315.   (prompt MSG_InstallingLibs)
  316.   (help @copyfiles-help)
  317.   (source "libs/svoperators")
  318.   (dest (tackon svlibdir "svoperators"))
  319.   (pattern "#?")
  320.   (confirm)
  321.   (files)
  322. )
  323.  
  324. (if (>= MC68x 68020)
  325.   (
  326.     (copyfiles
  327.       (prompt MSG_InstallingLibs)
  328.       (help @copyfiles-help)
  329.       (source "libs/68030")
  330.       (dest svlibdir)
  331.       (confirm)
  332.       (all)
  333.     )
  334.   )
  335. )
  336.  
  337. ; **************************************************************************
  338. ; Modify User-Startup
  339.  
  340. (startup "SuperView-Library"
  341.   (prompt MSG_VMEM)
  342.   (help @startup-help)
  343.   (set vmemdir
  344.               (askdir
  345.                      (prompt MSG_VMemPath)
  346.                      (help @askdir-help)
  347.                      (newpath)
  348.                      (default "T:")
  349.               )
  350.   )
  351.  
  352.   (command "Assign VMEM: "vmemdir"\n")
  353. )
  354.  
  355. ; **************************************************************************
  356. ; Install SVPrefs
  357.  
  358. (copyfiles
  359.   (prompt MSG_CopyPrefs)
  360.   (help @copyfiles-help)
  361.   (source "Prefs")
  362.   (dest "SYS:Prefs")
  363.   (all)
  364.   (confirm)
  365. )
  366.  
  367. ; **************************************************************************
  368. ; Ask for Packersupport
  369.  
  370. (set ask_ps (askbool (prompt MSG_PackerSupport) (help @askbool-help) ) )
  371.  
  372. (if (= ask_ps TRUE)
  373.   (
  374.     (copyfiles
  375.       (prompt MSG_InstallingLibs)
  376.       (help @copyfiles-help)
  377.       (source "PackerSupport/libs/svobjects")
  378.       (dest (tackon svlibdir "svobjects"))
  379.       (pattern "#?")
  380.       (files)
  381.     )
  382.   )
  383. )
  384.  
  385. ; **************************************************************************
  386. ; Ask for SQOperators
  387.  
  388. (set ask_sq (askbool (prompt MSG_SQOperators) (help @askbool-help) ) )
  389.  
  390. (if (= ask_sq TRUE)
  391.   (
  392.     (copyfiles
  393.       (prompt MSG_CopyEnvConfig)
  394.       (help @copyfiles-help)
  395.       (source "SQ-Operators/envarc")
  396.       (dest "ENVARC:")
  397.       (all)
  398.     )
  399.     (copyfiles
  400.       (prompt MSG_InstallingLibs)
  401.       (help @copyfiles-help)
  402.       (source "SQ-Operators/libs/svoperators")
  403.       (dest (tackon svlibdir "svoperators"))
  404.       (pattern "#?")
  405.       (confirm)
  406.       (files)
  407.     )
  408.   )
  409. )
  410.  
  411. ; **************************************************************************
  412. ; EOF ;-)
  413.  
  414. (exit MSG_Ready)
  415.