[p5sagit/p5-mst-13.2.git] / vms / sockadapt.h

/*  sockadapt.h
 *
 *  Authors: Charles Bailey  bailey@genetics.upenn.edu
 *           David Denholm  denholm@conmat.phys.soton.ac.uk
 *  Last Revised: 05-Oct-1994
 *
 *  This file should include any other header files and procide any
 *  declarations, typedefs, and prototypes needed by perl for TCP/IP
 *  operations.
 *
 *  This version is set up for perl5 with socketshr 0.9A TCP/IP support.
 */

#include <socketshr.h>

/* we may not have socket.h etc, so lets just do these here  - div */
/* built up from a variety of sources */
/* no harm doing this for all .c files - needed only by pp_sys.c */

struct hostent {
	char *h_name;
	char *h_aliases;
	int h_addrtype;
	int h_length;
	char **h_addr_list;
};
#define h_addr h_addr_list[0]

struct sockaddr_in {
	short sin_family;
	unsigned short sin_port;
	unsigned long sin_addr;
	char sin_zero[8];
};

struct netent {
	char *n_name;
	char **n_aliases;
	int n_addrtype;
	long n_net;
};

struct  servent {
        char    *s_name;        /* official service name */
        char    **s_aliases;    /* alias list */
        int     s_port;         /* port # */
        char    *s_proto;       /* protocol to use */
};

struct  protoent {
        char    *p_name;        /* official protocol name */
        char    **p_aliases;    /* alias list */
        int     p_proto;        /* protocol # */
};
Commit	Line	Data
a0d0e21e	1	/* sockadapt.h
	2	*
	3	* Authors: Charles Bailey bailey@genetics.upenn.edu
	4	* David Denholm denholm@conmat.phys.soton.ac.uk
	5	* Last Revised: 05-Oct-1994
	6	*
	7	* This file should include any other header files and procide any
	8	* declarations, typedefs, and prototypes needed by perl for TCP/IP
	9	* operations.
	10	*
	11	* This version is set up for perl5 with socketshr 0.9A TCP/IP support.
	12	*/
	13
	14	#include <socketshr.h>
	15
	16	/* we may not have socket.h etc, so lets just do these here - div */
	17	/* built up from a variety of sources */
	18	/* no harm doing this for all .c files - needed only by pp_sys.c */
	19
	20	struct hostent {
	21	char *h_name;
	22	char *h_aliases;
	23	int h_addrtype;
	24	int h_length;
	25	char **h_addr_list;
	26	};
	27	#define h_addr h_addr_list[0]
	28
	29	struct sockaddr_in {
	30	short sin_family;
	31	unsigned short sin_port;
	32	unsigned long sin_addr;
	33	char sin_zero[8];
	34	};
	35
	36	struct netent {
	37	char *n_name;
	38	char **n_aliases;
	39	int n_addrtype;
	40	long n_net;
	41	};
	42
	43	struct servent {
	44	char s_name; / official service name */
	45	char *s_aliases; / alias list */
	46	int s_port; /* port # */
	47	char s_proto; / protocol to use */
	48	};
	49
	50	struct protoent {
	51	char p_name; / official protocol name */
	52	char *p_aliases; / alias list */
	53	int p_proto; /* protocol # */
	54	};