1 /* $NetBSD: getprotoent_r.c,v 1.1.1.2 2012/09/09 16:07:58 christos 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