Viewing file:  ip4_unix.c (5.13 KB) -rw-r--r--
Select action/file-type:
 (+) |  (+) |  (+) | Code (+) | Session (+) |  (+) | SDB (+) |  (+) |  (+) |  (+) |  (+) |  (+) |
/* ========================================================================
* Copyright 1988-2006 University of Washington
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
*
* ========================================================================
*/
/*
* Program: UNIX IPv4 routines
*
* Author: Mark Crispin
* Networks and Distributed Computing
* Computing & Communications
* University of Washington
* Administration Building, AG-44
* Seattle, WA 98195
* Internet: MRC@CAC.Washington.EDU
*
* Date: 18 December 2003
* Last Edited: 30 August 2006
*/
#define SADRLEN sizeof (struct sockaddr)
#define SADR4(sadr) ((struct sockaddr_in *) sadr)
#define SADR4LEN sizeof (struct sockaddr_in)
#define SADR4ADR(sadr) SADR4 (sadr)->sin_addr
#define ADR4LEN sizeof (struct in_addr)
#define SADR4PORT(sadr) SADR4 (sadr)->sin_port
/* IP abstraction layer */
char *ip_sockaddrtostring (struct sockaddr *sadr);
long ip_sockaddrtoport (struct sockaddr *sadr);
void *ip_stringtoaddr (char *text,size_t *len,int *family);
struct sockaddr *ip_newsockaddr (size_t *len);
struct sockaddr *ip_sockaddr (int family,void *adr,size_t adrlen,
unsigned short port,size_t *len);
char *ip_sockaddrtoname (struct sockaddr *sadr);
void *ip_nametoaddr (char *name,size_t *len,int *family,char **canonical,
void **next);
/* Return IP address string from socket address
* Accepts: socket address
* Returns: IP address as name string
*/
char *ip_sockaddrtostring (struct sockaddr *sadr)
{
return (sadr->sa_family == PF_INET) ?
inet_ntoa (SADR4ADR (sadr)) : "NON-IPv4";
}
/* Return port from socket address
* Accepts: socket address
* Returns: port number or -1 if can't determine it
*/
long ip_sockaddrtoport (struct sockaddr *sadr)
{
return (sadr->sa_family == PF_INET) ? ntohs (SADR4PORT (sadr)) : -1;
}
/* Return IP address from string
* Accepts: name string
* pointer to returned length
* pointer to returned address family
* Returns: address if valid, length and family updated, or NIL
*/
void *ip_stringtoaddr (char *text,size_t *len,int *family)
{
unsigned long adr;
struct in_addr *ret;
/* get address */
if ((adr = inet_addr (text)) == -1) ret = NIL;
else { /* make in_addr */
ret = (struct in_addr *) fs_get (*len = ADR4LEN);
*family = AF_INET; /* IPv4 */
ret->s_addr = adr; /* set address */
}
return (void *) ret;
}
/* Create a maximum-size socket address
* Accepts: pointer to return maximum socket address length
* Returns: new, empty socket address of maximum size
*/
struct sockaddr *ip_newsockaddr (size_t *len)
{
return (struct sockaddr *) memset (fs_get (SADRLEN),0,*len = SADRLEN);
}
/* Stuff a socket address
* Accepts: address family
* IPv4 address
* length of address (always 4 in IPv4)
* port number
* pointer to return socket address length
* Returns: socket address or NIL if error
*/
struct sockaddr *ip_sockaddr (int family,void *adr,size_t adrlen,
unsigned short port,size_t *len)
{
struct sockaddr *sadr = ip_newsockaddr (len);
switch (family) { /* build socket address based upon family */
case AF_INET: /* IPv4 */
sadr->sa_family = PF_INET;
/* copy host address */
memcpy (&SADR4ADR (sadr),adr,adrlen);
/* copy port number in network format */
SADR4PORT (sadr) = htons (port);
*len = SADR4LEN;
break;
default: /* non-IP?? */
sadr->sa_family = PF_UNSPEC;
break;
}
return sadr;
}
/* Return name from socket address
* Accepts: socket address
* Returns: canonical name for that address or NIL if none
*/
char *ip_sockaddrtoname (struct sockaddr *sadr)
{
struct hostent *he;
return ((sadr->sa_family == PF_INET) &&
(he = gethostbyaddr ((char *) &SADR4ADR (sadr),ADR4LEN,AF_INET))) ?
(char *) he->h_name : NIL;
}
/* Return address from name
* Accepts: name or NIL to return next address
* pointer to previous/returned length
* pointer to previous/returned address family
* pointer to previous/returned canonical name
* pointer to previous/return state for next-address calls
* Returns: address with length/family/canonical updated if needed, or NIL
*/
void *ip_nametoaddr (char *name,size_t *len,int *family,char **canonical,
void **next)
{
char **adl,tmp[MAILTMPLEN];
struct hostent *he;
if (name) { /* first lookup? */
/* yes, do case-independent lookup */
if ((strlen (name) < MAILTMPLEN) &&
(he = gethostbyname (lcase (strcpy (tmp,name))))) {
adl = he->h_addr_list;
if (len) *len = he->h_length;
if (family) *family = he->h_addrtype;
if (canonical) *canonical = (char *) he->h_name;
if (next) *next = (void *) adl;
}
else { /* error */
adl = NIL;
if (len) *len = 0;
if (family) *family = 0;
if (canonical) *canonical = NIL;
if (next) *next = NIL;
}
}
/* return next in series */
else if (next && (adl = (char **) *next)) *next = ++adl;
else adl = NIL; /* failure */
return adl ? (void *) *adl : NIL;
}
|