|
| !FreeSMTP
|
| Copyright (C) Stewart Brodie, 1996, 1997, 1998
|
Set SMTPServer$Dir <Obey$Dir>
Setmacro SMTPServer$Path <SMTPServer$Dir>.,<Newsbase$Config>.in_smtpd.,Inetdbase:
Set SMTPServer$Aliases <SMTPServer$Dir>.aliases
Set SMTPServer$MailDir <SMTPServer$Dir>.MailDir
Set SMTPServer$Slotsize$out_smtpd	64
Set SMTPServer$Slotsize$in_smtpd	64
Set SMTPServer$HomePage "http://www.eh.org/~stewart/"
Set Alias$SMTPServerTaskWindow %TaskWindow
|
If "<SysLog$Dir>"="" then Error !SysLog application not seen by filer
RMEnsure SysLog 0.17 Run <SysLog$Dir>.!Run
RMEnsure SysLog 0.17 Error FreeSMTP needs SysLog 0.17 or later
|
| Create all the required directories
|
cdir <SMTPServer$MailDir>
cdir <SMTPServer$MailDir>.spool
cdir <SMTPServer$MailDir>.spool.fail
cdir <SMTPServer$MailDir>.spool.mail
cdir <SMTPServer$MailDir>.spool.mqueue
cdir <SMTPServer$MailDir>.spool.mqueue.text
cdir <SMTPServer$MailDir>.spool.mqueue.work
cdir <SMTPServer$MailDir>.spool.mqueue.lock
cdir <SMTPServer$MailDir>.spool.mail.lock
cdir <SMTPServer$MailDir>.spool.mail.text
cdir <SMTPServer$MailDir>.spool.fail.lock
cdir <SMTPServer$MailDir>.spool.fail.text
cdir <SMTPServer$MailDir>.data
cdir <SMTPServer$MailDir>.data.held
|
| Detect usage of Freenet and disable the loopback interface search
|
Set SMTPServer$NoSearch yes
RmEnsure FreeNet 0 Unset SMTPServer$NoSearch
IconSprites <SMTPServer$Dir>.!Sprites
wimpslot -min 128k -max 128k
Run <SMTPServer$Dir>.!RunImage %*0