2004-09-27 09:21:00 +04:00
| Boot file for NetSurf. ( $Revision: 1.10 $ )
|
| This file sets up various system variables which NetSurf may use.
| Additionally, it places the NetSurf application sprites into the Wimp
| sprite pool.
|
| This file may be executed in two ways:
| 1. When NetSurf is first seen by the OS.
| 2. When NetSurf is run by the user (called from the !Run file).
| In the first instance, NetSurf-specific variables are set and non
| NetSurf-specific variables which are unset are initialised.
| In the second instance, all variables are set, irrespective of their
| previous state. This is achieved by use of the NetSurf$ForceVars
| variable, which is set by the !Run file prior to calling this file.
| Set up NetSurf$Dir
2003-07-30 17:06:22 +04:00
Set NetSurf$Dir <Obey$Dir>
2004-09-27 09:21:00 +04:00
| Filetype -> Type name mappings
|
| These get set whether they were previously set or not
2004-08-04 02:42:58 +04:00
Set File$Type_695 GIF
2004-09-27 09:21:00 +04:00
Set File$Type_B28 URL
2004-08-04 02:42:58 +04:00
Set File$Type_B60 PNG
Set File$Type_C85 JPEG
Set File$Type_F78 JNG
2003-07-30 17:06:22 +04:00
Set File$Type_F79 CSS
2004-08-04 02:42:58 +04:00
Set File$Type_F83 MNG
2004-09-27 09:21:00 +04:00
Set File$Type_F91 URI
2004-08-04 02:42:58 +04:00
Set File$Type_FAF HTML
2003-07-30 17:06:22 +04:00
2004-04-12 22:28:51 +04:00
| Application system variables
2004-09-27 09:21:00 +04:00
|
| See http://www.iyonix.com/32bit/help.shtml for more details.
2004-04-12 22:55:35 +04:00
Set NetSurf$Help <NetSurf$Dir>.Docs.docs_en
2004-04-12 22:28:51 +04:00
Set NetSurf$Version "Development Build"
2004-04-12 22:55:35 +04:00
Set NetSurf$Web "http://netsurf.sourceforge.net/"
2004-04-12 22:28:51 +04:00
Set NetSurf$Title "NetSurf"
Set NetSurf$Publisher "The NetSurf Developers"
Set NetSurf$Description "Web browser"
| NetSurf Sprites
2004-09-27 09:21:00 +04:00
|
| The sprite file used is based on the OS version:
| RO < Select 3 uses !Sprites<nn>
| RO >= Select 3 uses ASprites<nn>
| RO >= 5 uses 5Sprites<nn>
2004-09-18 01:20:13 +04:00
If "<Boot$OSVersion>" < "436" Then IconSprites <Obey$Dir>.!Sprites Else If "<Boot$OSVersion>" < "500" Then IconSprites <Obey$Dir>.ASprites Else IconSprites <Obey$Dir>.5Sprites
2004-04-06 02:21:37 +04:00
2003-07-30 17:06:22 +04:00
| Acorn URI protocol
2004-09-27 09:21:00 +04:00
|
| Format: Alias$Open_URI_<scheme> <command to run>
|
| These are basically a last resort. The URI module will initially broadcast
| Message_URI_MProcess. If this isn't claimed, then it'll check if an
| appropriate Alias$Open_URI_<scheme> variable is set. If such a variable
| exists, then it will attempt to launch the task named by the variable.
| If the launch is successful, the Message_URI_MProcess is rebroadcast.
| The -nowin is required to ensure only one window is opened (this only has
| an effect if the user has configured auto window opening at startup).
If (("<Alias$Open_URI_http>" = "") OR ("<NetSurf$ForceVars>" = "1")) Then Set Alias$Open_URI_http <NetSurf$Dir>.!Run -nowin
If (("<Alias$Open_URI_https>" = "") OR ("<NetSurf$ForceVars>" = "1")) Then Set Alias$Open_URI_https <NetSurf$Dir>.!Run -nowin
If (("<Alias$Open_URI_file>" = "") OR ("<NetSurf$ForceVars>" = "1")) Then Set Alias$Open_URI_file <NetSurf$Dir>.!Run -nowin
| ANT URL protocol
|
| Format: Alias$URLOpen_<scheme> <command to run>
|
| These handle the "load" stage of the protocol. The appropriate variable's
| existence is checked then, if it is present, the URL to be opened is
| appended to the string "URLOpen_<scheme> " and this is then fed to
| Wimp_StartTask.
If (("<Alias$URLOpen_http>" = "") OR ("<NetSurf$ForceVars>" = "1")) Then Set Alias$URLOpen_http /<NetSurf$Dir>.!Run -url %%*0
If (("<Alias$URLOpen_https>" = "") OR ("<NetSurf$ForceVars>" = "1")) Then Set Alias$URLOpen_https /<NetSurf$Dir>.!Run -url %%*0
If (("<Alias$URLOpen_file>" = "") OR ("<NetSurf$ForceVars>" = "1")) Then Set Alias$URLOpen_file /<NetSurf$Dir>.!Run -url %%*0
| Claim HTML and URL files
|
| Format: Alias$@RunType_<hex> <command to run>
|
| Again, a fallback. The filer initially tries a DataOpen message. If that
| bounces, it looks at these variables.
If (("<Alias$@RunType_FAF>" = "") OR ("<NetSurf$ForceVars>" = "1")) Then Set Alias$@RunType_FAF /<NetSurf$Dir>.!Run -html %%*0
If (("<Alias$@RunType_B28>" = "") OR ("<NetSurf$ForceVars>" = "1")) Then Set Alias$@RunType_B28 /<NetSurf$Dir>.!Run -urlf %%*0
| We don't claim the URI filetype as the spec tells us not to:
| "Applications must not set an Alias$@RunType variable for the URI filetype"
| Obviously this means that Browse/Phoenix and the Oreganos are incorrect.