PoE :: Component :: Server :: DNS.

ノンブロッキング、同時DNSサーバーPoEコンポーネント
今すぐダウンロード

PoE :: Component :: Server :: DNS. ランキングとまとめ

広告

  • Rating:
  • ライセンス:
  • Perl Artistic License
  • 価格:
  • FREE
  • 出版社名:
  • Chris Williams
  • 出版社のWebサイト:
  • http://search.cpan.org/bingos/

PoE :: Component :: Server :: DNS. タグ


PoE :: Component :: Server :: DNS. 説明

非ブロッキング、同時DNSサーバPoEコンポーネント POE :: Component :: Server :: DNSは、DNS Server.ITを実装するPoEコンポーネントです.PoE :: Component :: Client :: DNSを使用して、「forward_only」およびnet :: dns :: Resolverとして設定されている場合の解決を処理します。 :PoE :: Component :: GenericによってRecurse。 Net :: DNS :: RRを使用する。 PoE QW(Component :: Server :: DNS)を使用してください。 My $ DNS_SERVER = POE :: Component :: Server :: DNS-> Spawn(Alias => 'DNS_Server'); POE :: Session-> Create(package_states => 、]、)。 $ poe_kernel-> run(); 0を終了します。サブ_start {My($カーネル、$ヒープ)= @_ ; #ログインイベントを「ログ」$ kernel-> post( 'dns_server'、 'log_event'、 'log')に進むようにするコンポーネントを指示します。 #foobar.comサファックスドメイン$カーネル - > POST( 'DNS_SERVER'、ADD_HANDLER、{event => 'handler'、LABEL => 'foobar'、match => 'foobar.com $'、}) ; undef;サブハンドラ{My($ QNAME、$ QCLASS、$ QTYPE、$ CALLBACK)= @_ ;; My($ rcode、@ans、@Auth、@add); IF($ QTYPE EQ "A"){My($ TTL、$ RDATA)=(3600、「10.1.2.3」); @ans、Net :: DNS :: RR-> New( "$ QName $ TTL $ QClass $ Qtype $ RDATA"); $ RCODE = "NOERROR"; {$ rcode = "nxdomain"} $ Callback - >($ RCODE、@ans、@Auth、@add、{aa => 1}); undef; {My($ IP_PORT、$ NET_DNS_PACKET)= @_ ;}。 $ net_dns_packet-> print(); undef; } 要件: ・Perl


PoE :: Component :: Server :: DNS. 関連ソフトウェア