Home | History | Annotate | Line # | Download | only in rsh
getport.c revision 1.1.2.2
      1  1.1.2.2  jmc /*	$NetBSD: getport.c,v 1.1.2.2 2004/11/12 05:51:56 jmc Exp $	*/
      2  1.1.2.2  jmc 
      3  1.1.2.2  jmc /*-
      4  1.1.2.2  jmc  * Copyright (c) 2004 The NetBSD Foundation, Inc.
      5  1.1.2.2  jmc  * All rights reserved.
      6  1.1.2.2  jmc  *
      7  1.1.2.2  jmc  * This code is derived from software contributed to The NetBSD Foundation
      8  1.1.2.2  jmc  * by Christos Zoulas.
      9  1.1.2.2  jmc  *
     10  1.1.2.2  jmc  * Redistribution and use in source and binary forms, with or without
     11  1.1.2.2  jmc  * modification, are permitted provided that the following conditions
     12  1.1.2.2  jmc  * are met:
     13  1.1.2.2  jmc  * 1. Redistributions of source code must retain the above copyright
     14  1.1.2.2  jmc  *    notice, this list of conditions and the following disclaimer.
     15  1.1.2.2  jmc  * 2. Redistributions in binary form must reproduce the above copyright
     16  1.1.2.2  jmc  *    notice, this list of conditions and the following disclaimer in the
     17  1.1.2.2  jmc  *    documentation and/or other materials provided with the distribution.
     18  1.1.2.2  jmc  * 3. All advertising materials mentioning features or use of this software
     19  1.1.2.2  jmc  *    must display the following acknowledgement:
     20  1.1.2.2  jmc  *        This product includes software developed by the NetBSD
     21  1.1.2.2  jmc  *        Foundation, Inc. and its contributors.
     22  1.1.2.2  jmc  * 4. Neither the name of The NetBSD Foundation nor the names of its
     23  1.1.2.2  jmc  *    contributors may be used to endorse or promote products derived
     24  1.1.2.2  jmc  *    from this software without specific prior written permission.
     25  1.1.2.2  jmc  *
     26  1.1.2.2  jmc  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     27  1.1.2.2  jmc  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     28  1.1.2.2  jmc  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     29  1.1.2.2  jmc  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     30  1.1.2.2  jmc  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     31  1.1.2.2  jmc  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     32  1.1.2.2  jmc  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     33  1.1.2.2  jmc  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     34  1.1.2.2  jmc  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     35  1.1.2.2  jmc  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     36  1.1.2.2  jmc  * POSSIBILITY OF SUCH DAMAGE.
     37  1.1.2.2  jmc  */
     38  1.1.2.2  jmc 
     39  1.1.2.2  jmc #include <sys/cdefs.h>
     40  1.1.2.2  jmc __RCSID("$NetBSD: getport.c,v 1.1.2.2 2004/11/12 05:51:56 jmc Exp $");
     41  1.1.2.2  jmc 
     42  1.1.2.2  jmc #include <stdlib.h>
     43  1.1.2.2  jmc #include <err.h>
     44  1.1.2.2  jmc #include <netdb.h>
     45  1.1.2.2  jmc #include <limits.h>
     46  1.1.2.2  jmc #include <errno.h>
     47  1.1.2.2  jmc #include <netinet/in.h>
     48  1.1.2.2  jmc 
     49  1.1.2.2  jmc #include "getport.h"
     50  1.1.2.2  jmc 
     51  1.1.2.2  jmc struct servent *
     52  1.1.2.2  jmc getport(const char *service, const char *protocol)
     53  1.1.2.2  jmc {
     54  1.1.2.2  jmc 	long port;
     55  1.1.2.2  jmc 	char *ep;
     56  1.1.2.2  jmc 	struct servent *sp = getservbyname(service, protocol);
     57  1.1.2.2  jmc 	if (sp != NULL)
     58  1.1.2.2  jmc 		return sp;
     59  1.1.2.2  jmc 
     60  1.1.2.2  jmc 	if ((sp = calloc(1, sizeof(*sp))) == NULL)
     61  1.1.2.2  jmc 		err(1, "malloc");
     62  1.1.2.2  jmc 	sp->s_name = (char *)service;
     63  1.1.2.2  jmc 	sp->s_proto = (char *)protocol;
     64  1.1.2.2  jmc 	port = strtol(service, &ep, 0);
     65  1.1.2.2  jmc 	if ((service[0] != '\0' && *ep != '\0') ||
     66  1.1.2.2  jmc 	    (errno == ERANGE &&
     67  1.1.2.2  jmc 	    (port == LONG_MAX || port == LONG_MIN)) ||
     68  1.1.2.2  jmc 	    (port <= 0 || port >= IPPORT_ANONMAX))
     69  1.1.2.2  jmc 		errx(1,"port must be between 1 and %d",
     70  1.1.2.2  jmc 		    IPPORT_ANONMAX);
     71  1.1.2.2  jmc 	sp->s_port = htons((uint16_t)port);
     72  1.1.2.2  jmc 	return sp;
     73  1.1.2.2  jmc }
     74