Socket, sockaddr_in, sockaddr_un, inet_aton, inet_ntoa - load the C socket.h defines and structure manipulators
use Socket;
$proto = getprotobyname('udp'); socket(Socket_Handle, PF_INET, SOCK_DGRAM, $proto); $iaddr = gethostbyname('hishost.com'); $port = getservbyname('time', 'udp'); $sin = sockaddr_in($port, $iaddr); send(Socket_Handle, 0, 0, $sin);
$proto = getprotobyname('tcp'); socket(Socket_Handle, PF_INET, SOCK_STREAM, $proto); $port = getservbyname('smtp', 'tcp'); $sin = sockaddr_in($port,inet_aton("127.1")); $sin = sockaddr_in(7,inet_aton("localhost")); $sin = sockaddr_in(7,INADDR_LOOPBACK); connect(Socket_Handle,$sin);
($port, $iaddr) = sockaddr_in(getpeername(Socket_Handle)); $peer_host = gethostbyaddr($iaddr, AF_INET); $peer_addr = inet_ntoa($iaddr);
$proto = getprotobyname('tcp'); socket(Socket_Handle, PF_UNIX, SOCK_STREAM, $proto); unlink('/tmp/usock'); $sun = sockaddr_un('/tmp/usock'); connect(Socket_Handle,$sun);
This module is just a translation of the C socket.h file. Unlike the old mechanism of requiring a translated socket.ph file, this uses the h2xs program (see the Perl source distribution) and your native C compiler. This means that it has a far more likely chance of getting the numbers right. This includes all of the commonly used pound-defines like AF_INET, SOCK_STREAM, etc.
Also, some common socket ``newline'' constants are provided: the constants CR
, LF
, and CRLF
, as well as $CR
, $LF
, and
$CRLF
, which map to \015
, \012
, and \015\012
. If you do not want to use the literal characters in your programs, then
use the constants provided here. They are not exported by default, but can
be imported individually, and with the :crlf
export tag:
use Socket qw(:DEFAULT :crlf);
In addition, some structure manipulation functions are available:
inet_aton())
and
translates it into a string of the form 'd.d.d.d' where the 'd's are
numbers less than 256 (the normal readable four dotted number notation for
internet addresses).
Returns the 4-byte wildcard ip address which specifies any of the hosts ip addresses.
(A particular machine can have more than one ip address, each address corresponding to a particular network interface. This wildcard address allows you to bind to all of them simultaneously.) Normally equivalent to
inet_aton('0.0.0.0').
Returns the 4-byte 'this-lan' ip broadcast address. This can be useful for some protocols to solicit information from all servers on the same
LAN cable. Normally equivalent to
inet_aton('255.255.255.255').
Returns the 4-byte loopback address. Normally equivalent to
inet_aton('localhost').
Returns the 4-byte 'invalid' ip address. Normally equivalent to
inet_aton('255.255.255.255').
pack_sockaddr_in()
and
unpack_sockaddr_in()
explicitly.
inet_aton()).
Returns the sockaddr_in structure with those arguments packed in with
AF_INET filled in. For internet domain sockets, this structure is normally what you need for the arguments in
bind(),
connect(),
and
send(),
and is also returned by
getpeername(),
getsockname()
and
recv().
pack_sockaddr_in())
and returns an array of two elements: the port and the 4-byte ip-address. Will croak if the structure does not have
AF_INET in the right place.
pack_sockaddr_un()
and
unpack_sockaddr_un()
explicitly. These are only supported if your system has <
sys/un.h>.
bind(),
connect(),
and
send(),
and is also returned by
getpeername(),
getsockname()
and
recv().
pack_sockaddr_un())
and returns the pathname. Will croak if the structure does not have
AF_UNIX in the right place.
If rather than formatting bugs, you encounter substantive content errors in these documents, such as mistakes in the explanations or code, please use the perlbug utility included with the Perl distribution.