PoE :: Component :: Klant :: Traceroute POE :: COMPONENT :: KLANT :: TRACEROUTE is een niet-blokkerende Traceroute-client.
Download nu

PoE :: Component :: Klant :: Traceroute Rangschikking & Samenvatting

PoE :: Component :: Klant :: Traceroute Tags

Perl-module non-blocking non-blocking traceroute traceroute client Traceroute

PoE :: Component :: Klant :: Traceroute Beschrijving

PoE :: Component :: Client :: Traceroute is een niet-blokkerende Traceroute-client. POE :: COMPONENT :: KLANT :: TRACEROUTE is een niet-blokkerende Traceroute-client.Synopsis Gebruik POE QW (Component :: Client :: Traceroute); PoE :: Component :: Klant :: Traceroute-> Spawn (alias => 'Tracer', # Standaardinstellingen voor Tracer Firsthop => 1, # Defaults to 1 maxtttl => 16, # Defaults to 32 hop timeout => 0, # Standaardinstellingen om nooit querytimeout => 3, # Defaults tot 3 seconden query's => 3, # Standaardwaarden tot 3 query's per hop Baseport => 33434, # Standaardwaarden tot 33434 Packetlen => 128, # Standaardinstellingen tot 68 SourceADDRESS => '0.0.0.0 ', # Defaults to' 0.0.0.0 'PERHOPPOSTBACK => 0, # Standaardinstellingen NO PERHOPPOSTBACK-apparaat =>' Eth0 ', # Defaults to UNDEF anneMMP => 0, # Defaults to 0 Debug => 0, # Defaults tot 0 Debugsocket => 0, # standaardinstellingen tot 0); SUB SOME_EVENT_HANDER {$ KERNEL-> POST ("TRACER", # POST VERZOEK AAN 'TRACER' COMPONENT "TRACEROUTE", # VRAAG HET AAN TRACEROUTE NAAR EEN ADRES "TRACE_REPONSE", # POST ANTWOORDEN OP 'TRACE_REPONSE' $ BESTEMMINGEN, # Dit is De host to Traceroute naar , # gegevens om terug te sturen met een postweergave]); } # Dit is de sub die wordt opgeroepen met de antwoorden van de # Traceroute-component. Sub Trace_Response {My ($ aanvraag, $ reactie) = @_ ; mijn ($ bestemming, $ opties, $ callback) = @ $ verzoek; mijn ($ hop, $ gegevens, $ fout) = @ $ reactie; if ($ hop) {print "Traceroute resultaten voor $ DEGINNU"; Foreach My $ HOP (@ $ Gegevens) {mijn $ hopnummer = $ hop -> {hop}; mijn $ routerip = $ hop -> {routerip}; mijn @rtts = @ {$ hop -> {resultaten}}; Print "$ hopnumbert $ routeript"; foreach (@rtts) {if ($ _ eq "*") {print "*"; } else {printf "% 0,3fms", $ _ * 1000; }} Afdrukken "n"; }} Warn "fout opgetreden bij het traceren naar $ bestemming: $ erkende" if ($ fout); } of sub Nother_Event_Handler {$ Kernel-> Post ("Tracer", # postverzoek naar 'Tracer' component "Traceroute", # Vraag het om Traceroute naar een adres "Trace_Response", # post antwoorden op 'Trace_Response' $ bestemming, # Dit is de host to Traceroute naar ); } Sub Trace_row {My ($ aanvraag, $ reactie) = @_ ; mijn ($ bestemming, $ opties, $ callback) = @ $ verzoek; mijn ($ stroom, $ gegevens, $ fout) = @ $ reactie; # $ Gegevens bevatten alleen reacties voor de huidige TTL # De structuur is hetzelfde als voor Trace_Response boven} PoE :: Component :: Client :: Traceroute is een niet-blokkerende Traceroute-client. Het laat er verschillende andere sessies tracerouse doorheen in parallel, en het laat ze blijven doen andere dingen terwijl ze wachten op antwoorden. Vereisten: · Perl

PoE :: Component :: Klant :: Traceroute Gerelateerde software