getservbyname_r.c revision 1.3 1 1.3 kleink /* $NetBSD: getservbyname_r.c,v 1.3 2005/04/18 19:39:45 kleink Exp $ */
2 1.1 christos
3 1.1 christos /*
4 1.1 christos * Copyright (c) 1983, 1993
5 1.1 christos * The Regents of the University of California. All rights reserved.
6 1.1 christos *
7 1.1 christos * Redistribution and use in source and binary forms, with or without
8 1.1 christos * modification, are permitted provided that the following conditions
9 1.1 christos * are met:
10 1.1 christos * 1. Redistributions of source code must retain the above copyright
11 1.1 christos * notice, this list of conditions and the following disclaimer.
12 1.1 christos * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 christos * notice, this list of conditions and the following disclaimer in the
14 1.1 christos * documentation and/or other materials provided with the distribution.
15 1.1 christos * 3. Neither the name of the University nor the names of its contributors
16 1.1 christos * may be used to endorse or promote products derived from this software
17 1.1 christos * without specific prior written permission.
18 1.1 christos *
19 1.1 christos * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 1.1 christos * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 1.1 christos * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 1.1 christos * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 1.1 christos * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 1.1 christos * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 1.1 christos * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 1.1 christos * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 1.1 christos * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 1.1 christos * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 1.1 christos * SUCH DAMAGE.
30 1.1 christos */
31 1.1 christos
32 1.1 christos #include <sys/cdefs.h>
33 1.1 christos #if defined(LIBC_SCCS) && !defined(lint)
34 1.1 christos #if 0
35 1.1 christos static char sccsid[] = "@(#)getservbyname.c 8.1 (Berkeley) 6/4/93";
36 1.1 christos #else
37 1.3 kleink __RCSID("$NetBSD: getservbyname_r.c,v 1.3 2005/04/18 19:39:45 kleink Exp $");
38 1.1 christos #endif
39 1.1 christos #endif /* LIBC_SCCS and not lint */
40 1.1 christos
41 1.1 christos #include "namespace.h"
42 1.1 christos #include <assert.h>
43 1.1 christos #include <netdb.h>
44 1.1 christos #include <string.h>
45 1.1 christos
46 1.3 kleink #include "servent.h"
47 1.3 kleink
48 1.1 christos #ifdef __weak_alias
49 1.1 christos __weak_alias(getservbyname_r,_getservbyname_r)
50 1.1 christos #endif
51 1.1 christos
52 1.1 christos struct servent *
53 1.1 christos getservbyname_r(const char *name, const char *proto, struct servent *sp,
54 1.1 christos struct servent_data *sd)
55 1.1 christos {
56 1.1 christos struct servent *s;
57 1.1 christos char **cp;
58 1.1 christos
59 1.1 christos _DIAGASSERT(name != NULL);
60 1.1 christos /* proto may be NULL */
61 1.1 christos
62 1.1 christos setservent_r(sd->stayopen, sd);
63 1.1 christos while ((s = getservent_r(sp, sd)) != NULL) {
64 1.1 christos if (strcmp(name, s->s_name) == 0)
65 1.1 christos goto gotname;
66 1.1 christos for (cp = s->s_aliases; *cp; cp++)
67 1.1 christos if (strcmp(name, *cp) == 0)
68 1.1 christos goto gotname;
69 1.1 christos continue;
70 1.1 christos gotname:
71 1.1 christos if (proto == NULL || strcmp(s->s_proto, proto) == 0)
72 1.1 christos break;
73 1.1 christos }
74 1.1 christos if (!sd->stayopen)
75 1.2 enami if (sd->fp != NULL) {
76 1.2 enami (void)fclose(sd->fp);
77 1.2 enami sd->fp = NULL;
78 1.2 enami }
79 1.1 christos return s;
80 1.1 christos }
81