;ELINKHDL.TXT    6.4.1998
;IPR-Datei fuer IPRoute mit Terminal-Adapter der Reihe ELINK von EEH-Datalink
;unter Verwendung des HDLC-Protokolls.
;
;Diese Datei entsprechend der eigenen Bedingungen anpassen und als
;ELINK.IPR speichern.
;Anschliessend diese Datei in einer Batchdatei mit einer Wiederholungs-
;schleife mit IPR ELINK.IPR bzw. IPR286 ELINK.IPR aufrufen.
;(Batchdatei mit Wiederholungsschleife ist notwendig, da dieses Script
;den Router selbsttaetig herunterfaehrt.)
;COPYRIGHT  Arno Pasternak, 58099 Hagen,  6.4.1998
;(Kopieren nur mit Quellenangabe)
;
;
;ELINK.IPR 
;
;IPR-Script zur Anbindung eines  LAN's an einen Provider mit HDLC
;(dynamische IP-Adresse ueber PPP und Terminaladapter ELINK)
;Anruf des Servers erst, wenn ein Paket den Router erreicht.
;Sollte nach 30 Sekunden kein Aufruf erfolgen, beendet das Programm wie
;nach einem Logout aus dem Postnetz.
;
;Logout-Zeit aus dem Postnetz: 1 Minute
;Nach dem Logout endet das Programm und muss erneut z.b. von einer Batch-
;routine aufgerufen werden.
;
;Terminal-Adapter Elink (310) mit 64000 bps an COM-Port2 mit Interrupt 5
;6.2.1998
;abgewandelt 6.4.1998 
;
;
   set log file CON
   log "Moin, moin"
;
;
;Einrichtung der Ethernet-Karte  im IP-Netz 192.168.1.0
;Das Ethernet-Teilnetz ist  192.168.1.0
;
   packet ethernet_netz  0x60 192.168.1.253/24
;
;
   log "Einrichtung des Modem-Ports fuer den TA Elink"
   log "und Zuweisung der Default-Route"
   log " "
   log " "
   async modem 0x2f8 5 115200 do_modem
   log "Der Terminal-Adapter Elink ist am Laufen"
   log " "

;Hiermit wird alles in den TA geroutet
   route * modem perm
;
;Broadcast der RIP-Route ans Ethernet
   rip ethernet_netz
;
;
;Ein Command-Interpreter wird auf der Console gestartet
   command
   exit
;
;Unterbereich der Konfiguration mit TA-Einstellungen etc.
;
do_modem:
   set trace off
   nat * * DNSADRESSE HIER EINSETZEN (BEIM PROVIDER ERFRAGEN)
;
;Modem-Kontroll-Einstellungen
;
   log "Der TA Elink wird jetzt in Gang gesetzt"
   set interface rts flow
hangup:
   set interface dtr off
   delay .5
   set interface dtr on
   on packet dialout
   on timeout ende
   wait 30
;
dialout:
   send "AT&F\r"
   wait 5 "OK\r"
   log "Der TA Elink ist OK"
   send "AT\\Q3\r"
   wait 5 "OK\r"
   log "RTS/CTS-Handshake gesendet."
   send "AT\\E123456\r"
   wait 5 "OK\r"
   log "Endgeraetenummer 123456 festgelegt."
; hier muss die eigene Endgeraetenummer festgesetzt werden!!!!!
   send "AT&B54\r"
   wait 5 "OK\r"
   log "AT&B54 (Protokoll HDLC) ist gesendet worden"
   send "ATD987645321\r"
   wait 40 "CONNECT "
; hier muss die Telefonnummer des Providers eingesetzt werden!!!!
   read 5 "\r" speed
   log " "
   log "Anschluss mit $speed"
   log " "
   set ppp login ACCOUNT PASSWORT
; hier Account und Passwort entsprechend Provider-Angaben einsetzen!!!
   on timeout ende
   ppp 60 * dynamic-nat
ende:
   shutdown