Home | History | Annotate | Line # | Download | only in net
getservent_r.c revision 1.2 
      1 /*	$NetBSD: getservent_r.c,v 1.2 2004/02/23 16:06:52 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
     35 static char sccsid[] = "@(#)getservent.c	8.1 (Berkeley) 6/4/93";
     36 #else
     37 __RCSID("$NetBSD: getservent_r.c,v 1.2 2004/02/23 16:06:52 christos Exp $");
     38 #endif
     39 #endif /* LIBC_SCCS and not lint */
     40 
     41 #include "namespace.h"
     42 #include <netdb.h>
     43 #include <errno.h>
     44 #include <stdio.h>
     45 #include <string.h>
     46 #include <stdlib.h>
     47 
     48 #ifdef __weak_alias
     49 __weak_alias(endservent_r,_endservent_r)
     50 __weak_alias(getservent_r,_getservent_r)
     51 __weak_alias(setservent_r,_setservent_r)
     52 #endif
     53 
     54 void
     55 setservent_r(int f, struct servent_data *sd)
     56 {
     57 	if (sd->fp == NULL)
     58 		sd->fp = fopen(_PATH_SERVICES, "r");
     59 	else
     60 		rewind(sd->fp);
     61 	sd->stayopen |= f;
     62 }
     63 
     64 void
     65 endservent_r(struct servent_data *sd)
     66 {
     67 	if (sd->fp) {
     68 		(void)fclose(sd->fp);
     69 		sd->fp = NULL;
     70 	}
     71 	if (sd->aliases) {
     72 		free(sd->aliases);
     73 		sd->aliases = NULL;
     74 		sd->maxaliases = 0;
     75 	}
     76 	if (sd->line) {
     77 		free(sd->line);
     78 		sd->line = NULL;
     79 	}
     80 	sd->stayopen = 0;
     81 }
     82 
     83 struct servent *
     84 getservent_r(struct servent *sp, struct servent_data *sd)
     85 {
     86 	char *p, *cp, **q;
     87 	size_t i = 0;
     88 	int oerrno;
     89 
     90 	if (sd->fp == NULL && (sd->fp = fopen(_PATH_SERVICES, "r")) == NULL)
     91 		return NULL;
     92 
     93 	for (;;) {
     94 		if (sd->line)
     95 			free(sd->line);
     96 		sd->line = fparseln(sd->fp, NULL, NULL, NULL,
     97 		    FPARSELN_UNESCALL);
     98 		if (sd->line == NULL)
     99 			return NULL;
    100 		sp->s_name = p = sd->line;
    101 		p = strpbrk(p, " \t");
    102 		if (p == NULL)
    103 			continue;
    104 		*p++ = '\0';
    105 		while (*p == ' ' || *p == '\t')
    106 			p++;
    107 		cp = strpbrk(p, ",/");
    108 		if (cp == NULL)
    109 			continue;
    110 		*cp++ = '\0';
    111 		sp->s_port = htons((u_short)atoi(p));
    112 		sp->s_proto = cp;
    113 		if (sd->aliases == NULL) {
    114 			sd->aliases = malloc(sd->maxaliases = 10);
    115 			if (sd->aliases == NULL) {
    116 				oerrno = errno;
    117 				endservent_r(sd);
    118 				errno = oerrno;
    119 				return NULL;
    120 			}
    121 		}
    122 		q = sp->s_aliases = sd->aliases;
    123 		cp = strpbrk(cp, " \t");
    124 		if (cp != NULL)
    125 			*cp++ = '\0';
    126 		while (cp && *cp) {
    127 			if (*cp == ' ' || *cp == '\t') {
    128 				cp++;
    129 				continue;
    130 			}
    131 			if (i == sd->maxaliases - 2) {
    132 				sd->maxaliases *= 2;
    133 				q = realloc(q, sd->maxaliases);
    134 				if (q == NULL) {
    135 					oerrno = errno;
    136 					endservent_r(sd);
    137 					errno = oerrno;
    138 					return NULL;
    139 				}
    140 				sp->s_aliases = sd->aliases = q;
    141 			}
    142 			q[i++] = cp;
    143 			cp = strpbrk(cp, " \t");
    144 			if (cp != NULL)
    145 				*cp++ = '\0';
    146 		}
    147 		q[i] = NULL;
    148 		return sp;
    149 	}
    150 }
    151