1 /* $NetBSD: getservbyname_r.c,v 1.7 2010/04/25 00:54:46 joerg Exp $ */ 2 3 /* 4 * Copyright (c) 1983, 1993 5 * The Regents of the University of California. All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. Neither the name of the University nor the names of its contributors 16 * may be used to endorse or promote products derived from this software 17 * without specific prior written permission. 18 * 19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 29 * SUCH DAMAGE. 30 */ 31 32 #include <sys/cdefs.h> 33 #if defined(LIBC_SCCS) && !defined(lint) 34 #if 0 35 static char sccsid[] = "@(#)getservbyname.c 8.1 (Berkeley) 6/4/93"; 36 #else 37 __RCSID("$NetBSD: getservbyname_r.c,v 1.7 2010/04/25 00:54:46 joerg Exp $"); 38 #endif 39 #endif /* LIBC_SCCS and not lint */ 40 41 #include "namespace.h" 42 #include <assert.h> 43 #include <cdbr.h> 44 #include <netdb.h> 45 #include <stdlib.h> 46 #include <string.h> 47 48 #include "servent.h" 49 50 #ifdef __weak_alias 51 __weak_alias(getservbyname_r,_getservbyname_r) 52 #endif 53 54 static struct servent * 55 _servent_getbyname(struct servent_data *sd, struct servent *sp, 56 const char *name, const char *proto) 57 { 58 59 if ((sd->flags & (_SV_CDB | _SV_PLAINFILE)) == 0) 60 return NULL; 61 62 if (sd->flags & _SV_CDB) { 63 uint8_t buf[255 * 2 + 2]; 64 size_t namelen, protolen; 65 const uint8_t *data, *data_end; 66 const void *data_ptr; 67 size_t datalen; 68 69 namelen = strlen(name); 70 if (namelen == 0 || namelen > 255) 71 return NULL; 72 if (proto != NULL && *proto == '\0') 73 return NULL; 74 if (proto != NULL) 75 protolen = strlen(proto); 76 else 77 protolen = 0; 78 79 buf[0] = namelen; 80 buf[1] = protolen; 81 memcpy(buf + 2, name, namelen); 82 memcpy(buf + 2 + namelen, proto, protolen); 83 84 if (cdbr_find(sd->cdb, buf, 2 + namelen + protolen, 85 &data_ptr, &datalen)) 86 return NULL; 87 88 if (datalen < namelen + protolen + 6) 89 return NULL; 90 91 data = data_ptr; 92 data_end = data + datalen; 93 if (protolen) { 94 if (data[2] != protolen) 95 return NULL; 96 if (memcmp(data + 3, proto, protolen + 1)) 97 return NULL; 98 } 99 data += 3 + data[2] + 1; 100 if (data > data_end) 101 return NULL; 102 while (data != data_end) { 103 if (*data == '\0') 104 return NULL; 105 if (data + data[0] + 2 > data_end) 106 return NULL; 107 if (data[0] == namelen && 108 memcmp(data + 1, name, namelen + 1) == 0) 109 return _servent_parsedb(sd, sp, data_ptr, 110 datalen); 111 data += data[0] + 2; 112 } 113 return NULL; 114 } else { 115 while (_servent_getline(sd) != -1) { 116 char **cp; 117 if (_servent_parseline(sd, sp) == NULL) 118 continue; 119 120 if (strcmp(name, sp->s_name) == 0) 121 goto gotname; 122 123 for (cp = sp->s_aliases; *cp; cp++) 124 if (strcmp(name, *cp) == 0) 125 goto gotname; 126 continue; 127 gotname: 128 if (proto == NULL || strcmp(sp->s_proto, proto) == 0) 129 return sp; 130 } 131 return NULL; 132 } 133 } 134 135 struct servent * 136 getservbyname_r(const char *name, const char *proto, struct servent *sp, 137 struct servent_data *sd) 138 { 139 _DIAGASSERT(name != NULL); 140 /* proto may be NULL */ 141 142 setservent_r(sd->flags & _SV_STAYOPEN, sd); 143 sp = _servent_getbyname(sd, sp, name, proto); 144 if (!(sd->flags & _SV_STAYOPEN)) 145 _servent_close(sd); 146 return sp; 147 } 148