1/*	$NetBSD: getservbyport_r.c,v 1.9 2012/03/13 21:13:41 christos 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
35static char sccsid[] = "@(#)getservbyport.c	8.1 (Berkeley) 6/4/93";
36#else
37__RCSID("$NetBSD: getservbyport_r.c,v 1.9 2012/03/13 21:13:41 christos Exp $");
38#endif
39#endif /* LIBC_SCCS and not lint */
40
41#include <netdb.h>
42#include <string.h>
43#include <stdlib.h>
44
45#include "servent.h"
46
47#ifdef __weak_alias
48__weak_alias(getservbyport_r,_getservbyport_r)
49#endif
50
51static struct servent *
52_servent_getbyport(struct servent_data *sd, struct servent *sp, int port,
53    const char *proto)
54{
55
56	if ((sd->flags & (_SV_CDB | _SV_PLAINFILE)) == 0)
57		return NULL;
58
59#if 0
60	if (sd->flags & _SV_CDB) {
61		uint8_t buf[255 + 4];
62		size_t protolen;
63		const uint8_t *data;
64		const void *data_ptr;
65		size_t datalen;
66
67		port = ntohs(port);
68
69		if (proto != NULL) {
70			protolen = strlen(proto);
71			if (protolen == 0 || protolen > 255)
72				return NULL;
73		} else
74			protolen = 0;
75		if (port < 0 || port > 65536)
76			return NULL;
77
78		buf[0] = 0;
79		buf[1] = (uint8_t)protolen;
80		be16enc(buf + 2, port);
81		memcpy(buf + 4, proto, protolen);
82
83		if (cdbr_find(sd->cdb, buf, 4 + protolen,
84		    &data_ptr, &datalen))
85			return NULL;
86
87		if (datalen < protolen + 4)
88			return NULL;
89
90		data = data_ptr;
91		if (be16dec(data) != port)
92			return NULL;
93		if (protolen) {
94			if (data[2] != protolen)
95				return NULL;
96			if (memcmp(data + 3, proto, protolen + 1))
97				return NULL;
98		}
99		return _servent_parsedb(sd, sp, data, datalen);
100	} else
101#endif
102	{
103		while (_servent_getline(sd) != -1) {
104			if (_servent_parseline(sd, sp) == NULL)
105				continue;
106			if (sp->s_port != port)
107				continue;
108			if (proto == NULL || strcmp(sp->s_proto, proto) == 0)
109				return sp;
110		}
111		return NULL;
112	}
113}
114
115struct servent *
116getservbyport_r(int port, const char *proto, struct servent *sp,
117    struct servent_data *sd)
118{
119	setservent_r(sd->flags & _SV_STAYOPEN, sd);
120	sp = _servent_getbyport(sd, sp, port, proto);
121	if (!(sd->flags & _SV_STAYOPEN))
122		_servent_close(sd);
123	return sp;
124}
125