GSP
Quick Navigator

Search Site

Unix VPS
A - Starter
B - Basic
C - Preferred
D - Commercial
MPS - Dedicated
Previous VPSs
* Sign Up! *

Support
Contact Us
Online Help
Handbooks
Domain Status
Man Pages

FAQ
Virtual Servers
Pricing
Billing
Technical

Network
Facilities
Connectivity
Topology Map

Miscellaneous
Server Agreement
Year 2038
Credits
 

USA Flag

 

 

Man Pages


Manual Reference Pages  -  NET::DNS::TOOLKIT::UTILITIES (3)

.ds Aq ’

NAME

Net::DNS::ToolKit::Utilities - a collection of helper utilities

CONTENTS

SYNOPSIS



  use Net::DNS::ToolKit::Utilities qw(
        id
        question 
        revIP  
        query 
        dns_udpsend
        dns_udpresp
        dns_ans
        dns_ns
        dns_ptr
        rlook_send
        rlook_rcv
  );

  $unique = id($seed);
  $querybuf = question($name,$type);
  $rev = revIP($ip);
  $response = query(\$buffer,$timeout);
  $socket = dns_udpsend(\$buffer,$timeout);
  $response = dns_udpresp($socket,$timeout);
  ($aptr,$tptr,$auth_zone) = dns_ans(\$buffer);
  $nsptr = dns_ns(\$buffer);
  $hostname = dns_ptr(\$buffer);
  @hosts = dns_ptr(\$buffer);
  $socket = rlook_send($IP,$timeout);
  $hostname = rlook_rcv($socket,$timeout);



DESCRIPTION

<B>Net::DNS::ToolKit::UtilitiesB> provides a collection of DNS utilities built from the ToolKit building blocks
o $unique = id($seed);

Return a unique, non-zero, 16 bit ID for this session. Seeded with time, this number is autoincremented each time it is retrieved and will be unique each call from a single session. The number wraps around at 65535.



  input:        [optional] seed
  returns:      the last 16 bit number +1



Optionally, the user may supply a seed for the first call. Subsquent calls will return the previous number + 1 (mod 65536). The seed is set when the module is instantiated if no seed is supplied.

o $querybuf = question($name,$type);

Create a C_IN DNS query of $type about $name.



  input:        host or domain name,
                query type
  returns:      query buffer



Supports types T_A, T_TXT, T_ANY, T_MX, T_NS, T_PTR

o $rev = revIP($ip);

Reverse an IP address. i.e



  78.56.34.12 = revIP(12.34.56.78);

  input:        a dot quad IP address
  returns:      reversed dot quad address



NOTE: this is an operation on ASCII characters, not packed network addresses.

o $response = query(\$buffer,$timeout);

Sends a DNS query contained in $buffer. Return a DNS response buffer or undef on error. If the error is catastophic (like a timeout), $@ will be set.



  input:        pointer to query buffer,
                optional timeout (secs, def 30)
  returns:      DNS answer or undef



o $socket = dns_udpsend(\$buffer,$timeout);

Sends a DNS query contained in $buffer. Returns a UDP socket or undef; If the error is catastophic (like a timeout), $@ will be set.



  input:        pointer to query buffer,
                optional timeout (secs, def 30)
  returns:      socket or undef



o $buffer = dns_udpresp($socket,$timeout);

Returns a DNS answer from $socket and closes socket. Returns undef on failure. If the error is catastophic (like a timeout), $@ will be set.



  input:        socket,
                optional timeout (secs, def 30)
  returns:      response buffer

  closes:       socket



o ($aptr,$tptr,$auth_zone)=dns_ans(\$buffer);

Parse a DNS answer and return pointer to an array of <B>AB> response records and <B>TXTB> records blessed into the callers namespace.



  input:        DNS answer
  returns:      pointers to two arrays,
                auth_zone name or 



Returns an empty array unless there is at least ONE <B>AB> record found.

The first array contains packed IPv4 addresses of the form returned by inet_aton (text). The second array contains text strings.

auth_zone will contain the zone name if an SOA record is found, otherwise it will contain ’’.

o $nsptr = dns_ns(\$buffer);

Parse a DNS NS request answer and return pointer to a hash of name servers and TTL’s.



  $ptr->{hostname}--->{addr} = netaddr
                   |
                   *->{ttl}  = seconds



If no records are found, undef is returned



  input:        pointer to response buffer
  returns:      pointer to hash or undef



o $host = dns_ptr(\$buffer);

Parse a DNS PTR request answer and return the hostname

If no records are found, undef or an empty array is returned



  input:        pointer to response buffer
  returns:      host name or array of hosts



o $socket = rlook_send($IP,$timeout);

Send a query for reverse lookup of $IP and return the receive socket handle.



  input:        dotquad IP address,
                optional timeout (sec, def 30)
  return:       socket or undef



o $hostname = rlook_rcv($socket,$timeout);

Receive DNS response, parse for hostname, close socket;



  input:        receive socket,
                optional timeout (sec, def 30)
  return:       hostname text or undef



DEPENDENCIES



        IO::Socket
        Net::DNS::Codes
        Net::DNS::ToolKit
        Net::DNS::ToolKit::RR



EXPORT



        none by default



EXPORT_OK



        id  
        question
        revIP
        query
        dns_udpsend
        dns_udpresp
        dns_ans
        dns_ns
        dns_ptr
        rlook_send
        rlook_rcv



COPYRIGHT

COPYRIGHT



    Copyright 2003 - 2011, Michael Robinton <michael@bizsystems.com>



Michael Robinton <michael@bizsystems.com>

All rights reserved.

This program is free software; you can redistribute it and/or modify it under the terms of either:



  a) the GNU General Public License as published by the Free
  Software Foundation; either version 2, or (at your option) any
  later version, or

  b) the "Artistic License" which comes with this distribution.



This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See either the GNU General Public License or the Artistic License for more details.

You should have received a copy of the Artistic License with this distribution, in the file named Artistic. If not, I’ll be glad to provide one.

You should also have received a copy of the GNU General Public License along with this program in the file named Copying. If not, write to the



        Free Software Foundation, Inc.                       
        59 Temple Place, Suite 330
        Boston, MA  02111-1307, USA



or visit their web page on the internet at:



        http://www.gnu.org/copyleft/gpl.html.



AUTHOR

Michael Robinton <michael@bizsystems.com>

SEE ALSO

Net::DNS::Codes, Net::DNS::ToolKit, Net::DNS::ToolKit::RR,
Search for    or go to Top of page |  Section 3 |  Main Index


perl v5.20.3 NET::DNS::TOOLKIT::UTILITIES (3) 2011-11-05

Powered by GSP Visit the GSP FreeBSD Man Page Interface.
Output converted with manServer 1.07.