Home | History | Annotate | Line # | Download | only in irs
getprotoent_r.c revision 1.1.1.1.14.1
      1 /*	$NetBSD: getprotoent_r.c,v 1.1.1.1.14.1 2012/10/30 18:55:27 yamt Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 2004 by Internet Systems Consortium, Inc. ("ISC")
      5  * Copyright (c) 1998-1999 by Internet Software Consortium.
      6  *
      7  * Permission to use, copy, modify, and distribute this software for any
      8  * purpose with or without fee is hereby granted, provided that the above
      9  * copyright notice and this permission notice appear in all copies.
     10  *
     11  * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES
     12  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
     13  * MERCHANTABILITY AND FITNESS.  IN NO EVENT SHALL ISC BE LIABLE FOR
     14  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
     15  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
     16  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT
     17  * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
     18  */
     19 
     20 #if defined(LIBC_SCCS) && !defined(lint)
     21 static const char rcsid[] = "Id: getprotoent_r.c,v 1.6 2006/08/01 01:14:16 marka Exp ";
     22 #endif /* LIBC_SCCS and not lint */
     23 
     24 #include <port_before.h>
     25 #if !defined(_REENTRANT) || !defined(DO_PTHREADS)
     26 	static int getprotoent_r_not_required = 0;
     27 #else
     28 #include <errno.h>
     29 #include <string.h>
     30 #include <stdio.h>
     31 #include <sys/types.h>
     32 #include <netinet/in.h>
     33 #include <netdb.h>
     34 #include <port_after.h>
     35 
     36 #ifdef PROTO_R_RETURN
     37 
     38 static PROTO_R_RETURN
     39 copy_protoent(struct protoent *, struct protoent *, PROTO_R_COPY_ARGS);
     40 
     41 PROTO_R_RETURN
     42 getprotobyname_r(const char *name, struct protoent *pptr, PROTO_R_ARGS) {
     43 	struct protoent *pe = getprotobyname(name);
     44 #ifdef PROTO_R_SETANSWER
     45 	int n = 0;
     46 
     47 	if (pe == NULL || (n = copy_protoent(pe, pptr, PROTO_R_COPY)) != 0)
     48 		*answerp = NULL;
     49 	else
     50 		*answerp = pptr;
     51 
     52 	return (n);
     53 #else
     54 	if (pe == NULL)
     55 		return (PROTO_R_BAD);
     56 
     57 	return (copy_protoent(pe, pptr, PROTO_R_COPY));
     58 #endif
     59 }
     60 
     61 PROTO_R_RETURN
     62 getprotobynumber_r(int proto, struct protoent *pptr, PROTO_R_ARGS) {
     63 	struct protoent *pe = getprotobynumber(proto);
     64 #ifdef PROTO_R_SETANSWER
     65 	int n = 0;
     66 
     67 	if (pe == NULL || (n = copy_protoent(pe, pptr, PROTO_R_COPY)) != 0)
     68 		*answerp = NULL;
     69 	else
     70 		*answerp = pptr;
     71 
     72 	return (n);
     73 #else
     74 	if (pe == NULL)
     75 		return (PROTO_R_BAD);
     76 
     77 	return (copy_protoent(pe, pptr, PROTO_R_COPY));
     78 #endif
     79 }
     80 
     81 /*%
     82  *	These assume a single context is in operation per thread.
     83  *	If this is not the case we will need to call irs directly
     84  *	rather than through the base functions.
     85  */
     86 
     87 PROTO_R_RETURN
     88 getprotoent_r(struct protoent *pptr, PROTO_R_ARGS) {
     89 	struct protoent *pe = getprotoent();
     90 #ifdef PROTO_R_SETANSWER
     91 	int n = 0;
     92 
     93 	if (pe == NULL || (n = copy_protoent(pe, pptr, PROTO_R_COPY)) != 0)
     94 		*answerp = NULL;
     95 	else
     96 		*answerp = pptr;
     97 
     98 	return (n);
     99 #else
    100 	if (pe == NULL)
    101 		return (PROTO_R_BAD);
    102 
    103 	return (copy_protoent(pe, pptr, PROTO_R_COPY));
    104 #endif
    105 }
    106 
    107 PROTO_R_SET_RETURN
    108 #ifdef PROTO_R_ENT_ARGS
    109 setprotoent_r(int stay_open, PROTO_R_ENT_ARGS)
    110 #else
    111 setprotoent_r(int stay_open)
    112 #endif
    113 {
    114 #ifdef PROTO_R_ENT_UNUSED
    115         PROTO_R_ENT_UNUSED;
    116 #endif
    117 	setprotoent(stay_open);
    118 #ifdef PROTO_R_SET_RESULT
    119 	return (PROTO_R_SET_RESULT);
    120 #endif
    121 }
    122 
    123 PROTO_R_END_RETURN
    124 #ifdef PROTO_R_ENT_ARGS
    125 endprotoent_r(PROTO_R_ENT_ARGS)
    126 #else
    127 endprotoent_r()
    128 #endif
    129 {
    130 #ifdef PROTO_R_ENT_UNUSED
    131         PROTO_R_ENT_UNUSED;
    132 #endif
    133 	endprotoent();
    134 	PROTO_R_END_RESULT(PROTO_R_OK);
    135 }
    136 
    137 /* Private */
    138 
    139 #ifndef PROTOENT_DATA
    140 static PROTO_R_RETURN
    141 copy_protoent(struct protoent *pe, struct protoent *pptr, PROTO_R_COPY_ARGS) {
    142 	char *cp;
    143 	int i, n;
    144 	int numptr, len;
    145 
    146 	/* Find out the amount of space required to store the answer. */
    147 	numptr = 1; /*%< NULL ptr */
    148 	len = (char *)ALIGN(buf) - buf;
    149 	for (i = 0; pe->p_aliases[i]; i++, numptr++) {
    150 		len += strlen(pe->p_aliases[i]) + 1;
    151 	}
    152 	len += strlen(pe->p_name) + 1;
    153 	len += numptr * sizeof(char*);
    154 
    155 	if (len > (int)buflen) {
    156 		errno = ERANGE;
    157 		return (PROTO_R_BAD);
    158 	}
    159 
    160 	/* copy protocol value*/
    161 	pptr->p_proto = pe->p_proto;
    162 
    163 	cp = (char *)ALIGN(buf) + numptr * sizeof(char *);
    164 
    165 	/* copy official name */
    166 	n = strlen(pe->p_name) + 1;
    167 	strcpy(cp, pe->p_name);
    168 	pptr->p_name = cp;
    169 	cp += n;
    170 
    171 	/* copy aliases */
    172 	pptr->p_aliases = (char **)ALIGN(buf);
    173 	for (i = 0 ; pe->p_aliases[i]; i++) {
    174 		n = strlen(pe->p_aliases[i]) + 1;
    175 		strcpy(cp, pe->p_aliases[i]);
    176 		pptr->p_aliases[i] = cp;
    177 		cp += n;
    178 	}
    179 	pptr->p_aliases[i] = NULL;
    180 
    181 	return (PROTO_R_OK);
    182 }
    183 #else /* !PROTOENT_DATA */
    184 static int
    185 copy_protoent(struct protoent *pe, struct protoent *pptr, PROTO_R_COPY_ARGS) {
    186 	char *cp, *eob;
    187 	int i, n;
    188 
    189 	/* copy protocol value */
    190 	pptr->p_proto = pe->p_proto;
    191 
    192 	/* copy official name */
    193 	cp = pdptr->line;
    194 	eob = pdptr->line + sizeof(pdptr->line);
    195 	if ((n = strlen(pe->p_name) + 1) < (eob - cp)) {
    196 		strcpy(cp, pe->p_name);
    197 		pptr->p_name = cp;
    198 		cp += n;
    199 	} else {
    200 		return (-1);
    201 	}
    202 
    203 	/* copy aliases */
    204 	i = 0;
    205 	pptr->p_aliases = pdptr->proto_aliases;
    206 	while (pe->p_aliases[i] && i < (_MAXALIASES-1)) {
    207 		if ((n = strlen(pe->p_aliases[i]) + 1) < (eob - cp)) {
    208 			strcpy(cp, pe->p_aliases[i]);
    209 			pptr->p_aliases[i] = cp;
    210 			cp += n;
    211 		} else {
    212 			break;
    213 		}
    214 		i++;
    215 	}
    216 	pptr->p_aliases[i] = NULL;
    217 
    218 	return (PROTO_R_OK);
    219 }
    220 #endif /* PROTOENT_DATA */
    221 #else /* PROTO_R_RETURN */
    222 	static int getprotoent_r_unknown_system = 0;
    223 #endif /* PROTO_R_RETURN */
    224 #endif /* !defined(_REENTRANT) || !defined(DO_PTHREADS) */
    225 /*! \file */
    226