Ghostscript

;--------------------------------------------

• ## ITEM "Ghostscript"
• ## DATE "11.10.2011"
• ## DESCRIPTION "Downloads, installs and configures Ghostscript."
• ## APPTYPE "DRIVER"
• ## APPAUTHOR ""
• ## APPWEBPAGE "http://www.whoosh777.com/"
• ## GRUNCHAUTHOR "Guido Mersmann <geit&gmx&de>"
• ## URLARCHIVE "http://www.geit.de/stupid/ghostscriptinstaller.lha"
• ## URLREADME "http://www.geit.de/stupid/ghostscriptinstaller.readme"
• ## ARCHIVESIZE 25000000
• ## INSTALLCHECK "{INSTALLDIR}{NAME}"
• ## VERSIONCHECK "{CHECKNAME}"
• ## INSTALL

{STANDARDBACKUP}
{STANDARDEXTRACT}

; download files

GDownload "http://www.whoosh777.com/gs870core.lha"     NAME "{TEMPDIR}Arc1.lha"
GDownload "http://www.whoosh777.com/gsfonts.lha"       NAME "{TEMPDIR}Arc2.lha"
GDownload "http://www.whoosh777.com/gs870noixemul.lha" NAME "{TEMPDIR}Arc3.lha"

; create destination directory

If NOT EXISTS "{INSTALLDIR}{NAME}"
MakeDir ALL "{INSTALLDIR}{NAME}"
EndIf

; extract data into destination directory

GGauge "EXTRACTING" "gs870core.lha" 1 3
LhA x "{TEMPDIR}Arc1.lha"  "{INSTALLDIR}{NAME}/"
GGauge "EXTRACTING" "gsfonts.lha" 2 3
LhA x "{TEMPDIR}Arc2.lha"  "{INSTALLDIR}{NAME}/"
GGauge "EXTRACTING" "gs870noixemul.lha" 3 3
LhA x "{TEMPDIR}Arc3.lha"  "{INSTALLDIR}{NAME}/"
GGauge "INSTALLING" "{NAME}"

; add assigns

GStartup APPNAME "{NAME}" LINES "c:assign <>NIL: gs: *"{INSTALLDIR}{NAME}*"" "c:assign <>NIL: gs870: gs:" "c:assign <>NIL: gsfonts: gs:fonts" "c:assign <>NIL: Ghostscript: gs:" "c:assign <>NIL: gscache: t:"

; add drawer icon if needed

If NOT EXISTS "{INSTALLDIR}{NAME}.info"
If EXISTS "{TEMPDIR}{NAME}.info"
Copy "{TEMPDIR}{NAME}.info"        "{INSTALLDIR}{NAME}.info"
Else
GTooltype "{INSTALLDIR}{NAME}" TYPE WBDRAWER
EndIf
EndIf

; patch printer prefs

List "SYS:MorphOS/TP/configs/(_Last_|_Save_|_Default_|#?.tpc)" lformat "*"{TEMPDIR}GhostScript_Installer/instdata/ConfigPrinter*" NAME *"%p%n*" CMDLINE *"GS:bin/gs -sDEVICE=tp24 -q*" TEMP *"RAM:*"" to "{TEMPDIR}PatchSettings.script"
Execute	"{TEMPDIR}PatchSettings.script"

; delete obsolete files

FailAt 30
Delete FORCE "{INSTALLDIR}{NAME}/startup"
Delete FORCE "{INSTALLDIR}{NAME}/startup.info"
Delete FORCE "{INSTALLDIR}{NAME}/install"
Delete FORCE "{INSTALLDIR}{NAME}/install.info"
Delete FORCE "{INSTALLDIR}{NAME}/." ALL
FailAt 10
Echo "VERSION: {VERSION}.{REVISION}" TO "{CHECKNAME}"

• ## INSTALL END
• ## UNINSTALL

{STANDARDBACKUP}
Delete FORCE "{INSTALLDIR}{NAME}" ALL
Delete FORCE "{INSTALLDIR}{NAME}.info"
Delete FORCE "{CHECKNAME}"
GStartup APPNAME "{NAME}"

• ## UNINSTALL END
• ## ITEM END