2005-04-04 22:41:09 +04:00
| Run file for NetSurf. ( $Revision: 1.36 $ )
2004-09-27 09:21:00 +04:00
|
| This file ensures that the system resources required by NetSurf are
| present. Additionally, it forces setting of system variables related
| to NetSurf.
| Set system variables and application sprites
Set NetSurf$ForceVars 1
2003-08-25 02:39:55 +04:00
<Obey$Dir>.!Boot
2004-09-27 09:21:00 +04:00
UnSet NetSurf$ForceVars
2002-10-15 15:09:56 +04:00
2004-09-27 09:21:00 +04:00
| We need RISC OS 3
2003-08-25 02:39:55 +04:00
RMEnsure UtilityModule 3.00 Error NetSurf needs RISC OS 3 or later
2002-10-15 15:09:56 +04:00
2003-08-25 02:39:55 +04:00
| Ensure Nested WIMP is installed
2005-04-04 13:41:25 +04:00
| http://acorn.riscos.com/ (in the universal boot archive)
2004-09-27 09:21:00 +04:00
RMEnsure WindowManager 3.80 Error NetSurf requires the Nested Window Manager. This can be obtained by downloading the Universal Boot sequence from http://acorn.riscos.com/
| Ensure the System resource exists - can't do much if it doesn't
If "<System$Path>" = "" Then Set System$Path_Message System resources not found.
2002-10-15 15:09:56 +04:00
2005-01-05 23:09:49 +03:00
| Define this alias for clarity
| Syntax: NetSurfRMLoad <Path to module>
Set Alias$NetSurfRMLoad IfThere %%*0 Then RMLoad %%*0
2003-08-25 02:39:55 +04:00
| Ensure CallASWI is installed
| http://www.iyonix.com/32bit/
2005-01-05 23:09:49 +03:00
RMEnsure UtilityModule 3.70 RMEnsure CallASWI 0.02 NetSurfRMLoad System:Modules.CallASWI
2003-11-01 23:16:00 +03:00
RMEnsure UtilityModule 3.70 RMEnsure CallASWI 0.02 Error NetSurf requires the CallASWI module. This can be downloaded from http://www.iyonix.com/32bit/system.shtml
2003-08-25 02:39:55 +04:00
2003-09-11 02:27:15 +04:00
| Ensure DrawFile module is installed
| http://acorn.riscos.com/riscos/releases/drawfile.arc
| Should be installed in !System.310.Modules
2005-01-05 23:09:49 +03:00
RMEnsure DrawFile 1.30 NetSurfRMLoad System:Modules.DrawFile
2003-11-01 23:16:00 +03:00
RMEnsure DrawFile 1.30 Error NetSurf requires the DrawFile module. An old verson of this can be downloaded from http://acorn.riscos.com/riscos/releases/drawfile.arc
2003-09-11 02:27:15 +04:00
2003-08-25 02:39:55 +04:00
| Ensure SharedUnixLibrary is installed
2005-04-04 22:41:09 +04:00
| http://gccsdk.riscos.info/#SUL
2005-01-05 23:09:49 +03:00
RMEnsure SharedUnixLibrary 1.02 NetSurfRMLoad System:Modules.SharedULib
2005-04-04 22:41:09 +04:00
RMEnsure SharedUnixLibrary 1.02 Error NetSurf requires SharedUnixLibrary 1.02 or later. This can be downloaded from http://gccsdk.riscos.info/
2003-08-25 02:39:55 +04:00
| Load AcornURI if it isn't already
| http://sudden.recoil.org/
2003-11-08 02:51:13 +03:00
Unset NetSurf$Start_URI_Handler
RMEnsure AcornURI 0.12 Set NetSurf$Start_URI_Handler 1
2005-01-05 23:09:49 +03:00
RMEnsure AcornURI 0.12 NetSurfRMLoad System:Modules.Network.URI
2003-11-01 23:16:00 +03:00
RMEnsure AcornURI 0.12 Error NetSurf requires AcornURI 0.12 or later. A version of this can be found at http://sudden.recoil.org/others/
2003-11-08 02:51:13 +03:00
RMEnsure AcornURI 0.12 Unset NetSurf$Start_URI_Handler
2003-08-25 02:39:55 +04:00
| Check for mime map module
If "<InetDBase$Path>" = "" Then Error Inet databases can not be found
If "<Inet$MimeMappings>" = "" Then Set Inet$MimeMappings InetDBase:MimeMap
2005-01-05 23:09:49 +03:00
RMEnsure MimeMap 0.10 NetSurfRMLoad System:Modules.Network.MimeMap
2003-08-25 02:39:55 +04:00
RMEnsure MimeMap 0.10 Error NetSurf requires MimeMap 0.10 or later
2003-07-30 17:06:22 +04:00
2004-03-10 13:41:27 +03:00
| Ensure Tinct is loaded
2005-04-04 13:41:25 +04:00
| http://www.tinct.net/
2005-01-05 23:09:49 +03:00
RMEnsure Tinct 0.09 NetSurfRMLoad System:Modules.Tinct
2005-04-04 13:41:25 +04:00
RMEnsure Tinct 0.09 Error NetSurf requires Tinct 0.09 or later. This can be downloaded from http://www.tinct.net/
2004-03-10 13:41:27 +03:00
2004-09-27 09:21:00 +04:00
| Ensure Iconv
2005-01-27 01:43:14 +03:00
| http://moose.mine.nu:6888/iconv_latest.zip
|
| If Iconv is present, then ensure that the !Unicode resource has been
| seen before loading Iconv. If it isn't present, don't bother checking
| as we don't care.
2004-09-27 09:21:00 +04:00
| Not an error if not present - there'll be no charset conversion.
2005-01-27 01:43:14 +03:00
Set NetSurf$LoadIconv 0
RMEnsure Iconv 0.02 IfThere System:Modules.Iconv Then Set NetSurf$LoadIconv 1
If "<NetSurf$LoadIconv>" = "1" AND "<Unicode$Path>" = "" Then Error NetSurf requires the !Unicode resource. This can be found, along with the Iconv module, at http://moose.mine.nu:6888/iconv_latest.zip
If "<NetSurf$LoadIconv>" = "1" Then NetSurfRMLoad System:Modules.Iconv
Unset NetSurf$LoadIconv
2005-01-05 23:09:49 +03:00
| No longer need this alias
Unset Alias$NetSurfRMLoad
2004-09-27 09:21:00 +04:00
2005-04-04 22:41:09 +04:00
WimpSlot -min 2240k -max 2240k
2004-11-30 00:47:00 +03:00
Run <NetSurf$Dir>.!RunImage %*0 2><NetSurf$Dir>.stderr