Mail :: SpamCannibal :: ScriptSupport.

Mail :: SpamCannibal :: ScriptSupport´Â ½ºÅ©¸³Æ® µµ¿ì¹Ì ¸ðÀ½ÀÔ´Ï´Ù.
Áö±Ý ´Ù¿î·Îµå

Mail :: SpamCannibal :: ScriptSupport. ¼øÀ§ ¹× ¿ä¾à

±¤°í

  • Rating:
  • ƯÇã:
  • Perl Artistic License
  • °¡°Ý:
  • FREE
  • °Ô½ÃÀÚ À̸§:
  • Michael Robinton
  • °Ô½ÃÀÚ À¥»çÀÌÆ®:
  • http://search.cpan.org/~miker/Net-DNS-Codes-0.09/Codes.pm

Mail :: SpamCannibal :: ScriptSupport. ű×


Mail :: SpamCannibal :: ScriptSupport. ¼³¸í

Mail :: SpamCannibal :: ScriptSupport´Â ½ºÅ©¸³Æ® µµ¿ì¹Ì ¸ðÀ½ÀÔ´Ï´Ù. ¸ÞÀÏ :: SpamCannibal :: ScriptSupport´Â :: SpamCannibal :: ScriptSupport QW (DO SerialEntry TarpitEntry DNSBL_Entry ID Áú¹® revIP Äõ¸® dns_udpsend dns_udpresp dns_ans dns_ns dns_ptr rlook_send rlook_rcv zone_def valid127 validIP zap_one zap_pair job_died dbjob_chk dbjob_kill dbjob_recover unpack_contrib ½ºÅ©¸³Æ® helpers.SYNOPSIS »ç¿ë ¸ÞÀÏÀÇ ¸ðÀ½ÀÔ´Ï´Ù lookupip list2netaddr matchnetaddr blcheck üũ Ŭ·° ´ýÇÁ Blpreen mailcheck abuse_host is_generic block4zonedump; ÇÔ¼ö $ rv = do ($ file); $ packedipaddr = serialEntry () $ packedipaddr = tarpitentry (); $ packedipaddr = dnsbl_entry (); $ LINGEN = ID ($ ¾¾¾Ñ); $ querybuf = Áú¹® ($ name, $ type); $ rev = Revip ($ IP); $ ´äº¯ = Äõ¸® ($ ¹öÆÛ, $ ½Ã°£ ÃÊ°ú); $ socket = dns_udpsend ($ ¹öÆÛ, $ ½Ã°£ ÃÊ°ú); $ ´äº¯ = DNS_UDPRESP ($ SOCKET, $ ½Ã°£ ÃÊ°ú); ($ APTR, $ TPTR, $ AUTH_ZONE) = DNS_ANS ($ ¹öÆÛ); $ nsptr = dns_ns ($ ¹öÆÛ); $ hostname = dns_ptr ($ ¹öÆÛ); @hosts = DNS_PTR ($ ¹öÆÛ); $ SOCKET = RLOOK_SEND ($ IP, $ ½Ã°£ ÃÊ°ú); $ hostname = rlook_rcv ($ ¼ÒÄÏ, $ ½Ã°£ ÃÊ°ú); ($ EXPIRE, $ ERROR, $ DNRESP, $ ½Ã°£ ÃÊ°ú) = ZONE_DEF ($ ZONE, % DNSBL); $ dotquad = valid127 ($ dotquad); $ dotquad = validip ($ dotquad); $ rv = job_died (% jobstatus, $ directory); $ rv = dbjob_chk (fault_config); dbjob_kill (fault_config, $ graceperiod); dbjob_recover (fault_config); ($ respip, $ err, $ blrsp, $ exp, $ zon) = UNPACK_CONTRIB ($ ·¹ÄÚµå); ($ text) = lookupip (% config, $ dotquadip, $ sockpath, $ is_network); $ rv = list2netaddr (@ inlist, @ naobject); $ rv = matchnetAddr ($ IP, @ naObject); $ rv = blcheck (% dnsbl, ¿À·ù); $ hashref = CheckClct ($ dnsbl); $ rv = ´ýÇÁ ($ dnsbl, $ allipshptr); $ rv = blpreen (% dnsbl, ¿À·ù); @ err = mailcheck ($ fh, % mailfilter, % dnsbl, fault, @ naignor) $ rv = zap_one ($ µµ±¸, $ netaddr, $ db, $ verbose, $ comment); ZAP_PAIR ($ TOOL, $ NETADDR, $ PRI, $ SEC, $ µð¹ö±×, $ Verbose, $ comment); $ rv = is_generic ($ conf -> {generic}, @ hostnames); BLOCK4ZONEDUMP ($ ȯ°æ); methods $ object = »õ ¸ÞÀÏ :: spamcannibal :: scriptsupport; $ rv = $ object-> dns2rblz ($ line); $ firstline = $ °³Ã¼ -> rbldns_combined ($ type); $ textline = $ object-> rbldns_compress ($ textline); $ lankline = $ object-> rbldnst_done (); $ lankline = $ object-> rbldns_done (); $ last_combined = rbldns_address (); ¿ä±¸ »çÇ× : ¡¤ Perl. ¡¤ NetAddr :: IP :: Lite. ¡¤ Net :: DNS :: ÄÚµå ¡¤ Net :: DNS :: ÅøŶ ¡¤ NET :: DNS :: TOOLKIT :: RR. ¡¤ ¸ÞÀÏ :: Spamcannibal :: GoodPrivacy. ¡¤ Mail :: SpamCannibal :: BDBClient.


Mail :: SpamCannibal :: ScriptSupport. °ü·Ã ¼ÒÇÁÆ®¿þ¾î