Set SSHProxy$Dir <Obey$Dir>

Set SysLog$Found 1
RMEnsure SysLog 0.17 Set SysLog$Found 2
RMEnsure SysLog 0.00 Set SysLog$Found 0
If "<SysLog$Found>"="2" Then Error SSHProxy requires SysLog 0.17 or later (from http://www.acornsearch.com/archives/freenet.barnet.ac.uk/pub/Acorn/freenet/j.ribbens/syslog-0.17.spk )
| If we've found it, stop looking
If "<SysLog$Dir>"="" Then Error SSHProxy cannot find SysLog - ensure it has been seen by the Filer, and if you do not have it, obtain a copy from http://www.acornsearch.com/archives/freenet.barnet.ac.uk/pub/Acorn/freenet/j.ribbens/syslog-0.17.spk

If "<SysLog$Found>"<>"1" Then Run <SysLog$Dir>.!Run

RMEnsure Resolver 0.00 <SSHProxy$Dir>.X RMLoad System:Modules.Network.Resolver
RMEnsure Resolver 0.00 <SSHProxy$Dir>.X RMLoad System:Modules.Network.DNSResolve
RMEnsure Resolver 0.00 RMEnsure DNSResolver 0.00 Error SSHProxy requires Resolver module (Acorn/ANT from new boot sequence) or DNSResolver (Stewart Brodie, from http://www.acornsearch.com/catalog/freenet.barnet.ac.uk/pub/Acorn/freenet/s.brodie/ )

RMEnsure CryptRandom 0.00 RMLoad <SSHProxy$Dir>.CryptRand

RMEnsure SSHSockWatch 0.00 RMLoad <SSHProxy$Dir>.SSHSockW

If "<Choices$Write>"<>"" Then Set SSHProxy$Choices <Choices$Write> Else Set SSHProxy$Choices <SSHProxy$Dir>.Choices

|Sledgehammer approach - we can do much better than this
<SSHProxy$Dir>.X Cdir <SSHProxy$Choices>.Crypto
<SSHProxy$Dir>.X Cdir <SSHProxy$Choices>.Crypto.SSH
<SSHProxy$Dir>.X Cdir <SSHProxy$Choices>.Crypto.CryptRand

| Increase the 125 here to enable debug logging - be prepared for a _lot_ of output
Syslog SSHProxy 125
Wimpslot -min 320k -max 320k
| Parameter to SSHProxy 0.09 and later is port to listen for connections on
Run <SSHProxy$Dir>.sshproxy %*0
