| NET :: SERVER :: MAIL :: ESMTP :: XFORWARD NET :: Server :: Mail :: ESMTP :: XFORWARD is een PERL-module om ondersteuning toe te voegen aan de XFORWARD-opdracht in Net :: Server :: Mail :: ESMTP. |
Download nu |
NET :: SERVER :: MAIL :: ESMTP :: XFORWARD Rangschikking & Samenvatting
- Vergunning:
- Perl Artistic License
- Naam uitgever:
- Xavier Guimard
- Uitgever website:
- http://search.cpan.org/~guimard/Net-Server-Mail-0.15/lib/Net/Server/Mail/ESMTP/XFORWARD.pm
NET :: SERVER :: MAIL :: ESMTP :: XFORWARD Tags
NET :: SERVER :: MAIL :: ESMTP :: XFORWARD Beschrijving
NET :: SERVER :: MAIL :: ESMTP :: XFORWARD is een PERL-module om ondersteuning toe te voegen aan de XFORWARD-opdracht in Net :: Server :: Mail :: ESMTP. NET :: Server :: Mail :: ESMTP :: XFORWARD is een PERL-module om ondersteuning toe te voegen aan de XFORWARD-opdracht in Net :: Server :: Mail :: ESMTP.SYNOPSIS Gebruik Net :: Server :: Mail :: ESMTP; mijn @Local_domains = qw (example.com example.org); Mijn $ Server = Nieuwe IO :: Socket :: Inet Luister => 1, Localport => 25; mijn $ conn; Terwijl ($ Conn = $ Server-> Accepteert) {My $ ESMTP = NIEUW NET :: Server :: Mail :: ESMTP-socket => $ Conn; # Activeer enkele extensies $ ESMTP-> Register ('NET :: Server :: Mail :: ESMTP :: XFORWARD'); # Toevoegen van enkele handlers $ ESMTP-> SET_CALLBACK (RCPT => validate_recipient); $ ESMTP-> -proces (); $ Conn-> Sluiten ()} Sub validate_recipient {My ($ sessie, $ ontvanger) = @_; mijn $ domein; if ($ recipient = ~ /@(.*)>S*AG /) {$ domein = $ 1; } Indien (niet gedefinieerd $ domein) {return (0, 513, 'syntaxisfout.'); } Elsif (niet (Greap $ Domain EQ $ _, @Local_Domains) $ session-> Get_forwarded_addr! = "10.1.1.1") {Return (0, 554, "$ Ontvanger: Ontvangeradres geweigerd: Relay Access geweigerd"); } Return (1); } Bij gebruik van een NET :: Server :: Mail :: ESMTP-script in een MTA en niet voor internet, zijn waarden zoals client IP-adres niet toegankelijk voor het script en wanneer het script e-mail terugkeert naar een ander exemplaar van SMTPD-daemon, Het logt "localhost" als inkomend adres. Om dit probleem op te lossen, gebruiken sommige beheerders het XFORWARD-opdracht. Deze module geeft de mogelijkheid om XForward-informatie te lezen en op te slaan. Vereisten: · Perl
NET :: SERVER :: MAIL :: ESMTP :: XFORWARD Gerelateerde software