\fidogate\aftertoss.cmd

Das ist eine Batchdatei, die nach dem Tossen aufgerufen wird:

1. Eingetroffene FTN-ARCmail wird in den Inbound von Fidogate kopiert und entpackt.

2. ftn2rfc.exe macht aus den FTN-PKTs RFC-Spoolfiles.

3. Die Spoolfiles im Fidogate-Outbound werden über rnews und sendmail auf dem NNTP- bzw. POP3-Server abgelegt.

Achtung: FD-Style-Outbound! Wer Binkley-Outbound verwendet, muß hier natürlich entsprechende Anpassungen beim Pfad vornehmen. Die ARCmail-Datei für meinen Gateway-Downlink heißt ad383f2c.* - das gilt aber nur in meiner Konfiguration. Bitte den passenden Dateinamen einsetzen.


/* AFTERTOSS.CMD */

call RxFuncAdd 'SysLoadFuncs', 'RexxUtil', 'SysLoadFuncs'

'@echo off'


/* Flag gateway.now prüfen und setzen. */

do while flag \= ""
  flag = stream("f:\fidogate\gateway.now", 'C', "query exists")
  say 'warte...'
  rc = SysSleep(3)
end

'echo 0 > f:\fidogate\gateway.now'


/* Liegt ARCmail ürs Gateway vor? Wenn ja, in den Fidogate-Inbound
 kopieren und auspacken. */

ret = stream("f:\mailer\outbound\ad383f2c.*", 'C', "query exists")
if ret \= "" then do
/* Auspacken ohne Pfade, ohne Nachfrage beim Überschreiben:  */
  'unzip -jo f:\mailer\outbound\ad383f2c.* -d f:\fidogate\spool\in'
  'del f:\mailer\outbound\ad383f2c.*'
end


/* FTN -> RFC umwandeln mit Fidogate:  */

'cd f:\fidogate'
'f:\fidogate\ftn2rfc -L f:\fidogate\lib -v'


/* News einsortieren: */

/* Für Fidogate 4.2.1: */
/* call SysFileTree "f:\fidogate\spool\in\news\*.msg", "News", "FO" */

/* Für Fidogate 4.2.9: */
call SysFileTree "f:\fidogate\spool\in\tmpnews\*.msg", "News", "FO"


/* 192.168.1.1 ist die IP-Adresse des lokalen NNTP-Servers! */
/* Muß auf die eigenen Gegebenheiten angepaßt werden! */
if News.0 > 0 then do
  do i=1 to News.0
    say News.i || " -> News"
/* Die neuen Artikel werden nur lokal verbreitet (rnews -D local), */
/* sonst würden die neuen Artikel gleich wieder übers Gateway */
/* zurück ins FTN laufen - als Dupes. */
    'f:\changi\rnews -F '||News.i||' -H 192.168.1.1 -do -D local'
  end
  /* Changis .overview-Dateien auffrischen: */
  'f:\changi\chanco -do -v -h 192.168.1.1 -u sysopname oversync slow'
end


/* E-Mail einsortieren: */

/* Für Fidogate 4.2.1: */
/* call SysFileTree "f:\fidogate\spool\in\mail\*.msg", "Mail", "FO" */

/* Für Fidgate 4.2.9: */
call SysFileTree "f:\fidogate\spool\in\tmpmail\*.msg", "Mail", "FO"

if Mail.0 > 0 then do
  do i=1 to Mail.0
    say Mail.i || " -> E-Mail"
    'sendmail -af '||Mail.i||' -t -d1.1'
    'del ' || Mail.i
  end
end

'del f:\fidogate\gateway.now'

'exit'