lib/libc/net/gethostbynis.c

   1 /*-
   2  * Copyright (c) 1994, Garrett Wollman
   3  *
   4  * Redistribution and use in source and binary forms, with or without
   5  * modification, are permitted provided that the following conditions
   6  * are met:
   7  * 1. Redistributions of source code must retain the above copyright
   8  *    notice, this list of conditions and the following disclaimer.
   9  * 2. Redistributions in binary form must reproduce the above copyright
  10  *    notice, this list of conditions and the following disclaimer in the
  11  *    documentation and/or other materials provided with the distribution.
  12  *
  13  * THIS SOFTWARE IS PROVIDED BY THE CONTRIBUTORS ``AS IS'' AND
  14  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  15  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  16  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  17  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  18  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  19  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  20  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  21  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  22  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  23  * SUCH DAMAGE.
  24  */
  25
  26 #if defined(LIBC_SCCS) && !defined(lint)
  27 static char sccsid[] = "@(#)$FreeBSD: src/lib/libc/net/gethostbynis.c,v 1.10.2.1 2000/10/01 16:39:47 nectar Exp $";
  28 static char rcsid[] = "$FreeBSD: src/lib/libc/net/gethostbynis.c,v 1.10.2.1 2000/10/01 16:39:47 nectar Exp $";
  29 #endif /* LIBC_SCCS and not lint */
  30
  31 #include <sys/param.h>
  32 #include <sys/socket.h>
  33 #include <netinet/in.h>
  34 #include <arpa/inet.h>
  35 #include <arpa/nameser.h>
  36 #include <netdb.h>
  37 #include <stdio.h>
  38 #include <stdlib.h>
  39 #include <ctype.h>
  40 #include <errno.h>
  41 #include <string.h>
  42 #ifdef YP
  43 #include <rpc/rpc.h>
  44 #include <rpcsvc/yp_prot.h>
  45 #include <rpcsvc/ypclnt.h>
  46 #endif
  47
  48 #define MAXALIASES      35
  49 #define MAXADDRS        35
  50
  51 extern int h_errno;
  52
  53 #ifdef YP
  54 static char *host_aliases[MAXALIASES];
  55 static char hostaddr[MAXADDRS];
  56 static char *host_addrs[2];
  57 #endif /* YP */
  58
  59 static struct hostent *
  60 _gethostbynis(name, map, af)
  61         const char *name;
  62         char *map;
  63         int af;
  64 {
  65 #ifdef YP
  66         register char *cp, **q;
  67         char *result;
  68         int resultlen,size;
  69         static struct hostent h;
  70         static char *domain = (char *)NULL;
  71         static char ypbuf[YPMAXRECORD + 2];
  72
  73         switch(af) {
  74         case AF_INET:
  75                 size = NS_INADDRSZ;
  76                 break;
  77         default:
  78         case AF_INET6:
  79                 size = NS_IN6ADDRSZ;
  80                 errno = EAFNOSUPPORT;
  81                 h_errno = NETDB_INTERNAL;
  82                 return NULL;
  83         }
  84
  85         if (domain == (char *)NULL)
  86                 if (yp_get_default_domain (&domain)) {
  87                         h_errno = NETDB_INTERNAL;
  88                         return ((struct hostent *)NULL);
  89                 }
  90
  91         if (yp_match(domain, map, name, strlen(name), &result, &resultlen)) {
  92                 h_errno = HOST_NOT_FOUND;
  93                 return ((struct hostent *)NULL);
  94         }
  95
  96         /* avoid potential memory leak */
  97         bcopy((char *)result, (char *)&ypbuf, resultlen);
  98         ypbuf[resultlen] = '\0';
  99         free(result);
 100         result = (char *)&ypbuf;
 101
 102         if ((cp = index(result, '\n')))
 103                 *cp = '\0';
 104
 105         cp = strpbrk(result, " \t");
 106         *cp++ = '\0';
 107         h.h_addr_list = host_addrs;
 108         h.h_addr = hostaddr;
 109         *((u_long *)h.h_addr) = inet_addr(result);
 110         h.h_length = size;
 111         h.h_addrtype = AF_INET;
 112         while (*cp == ' ' || *cp == '\t')
 113                 cp++;
 114         h.h_name = cp;
 115         q = h.h_aliases = host_aliases;
 116         cp = strpbrk(cp, " \t");
 117         if (cp != NULL)
 118                 *cp++ = '\0';
 119         while (cp && *cp) {
 120                 if (*cp == ' ' || *cp == '\t') {
 121                         cp++;
 122                         continue;
 123                 }
 124                 if (q < &host_aliases[MAXALIASES - 1])
 125                         *q++ = cp;
 126                 cp = strpbrk(cp, " \t");
 127                 if (cp != NULL)
 128                         *cp++ = '\0';
 129         }
 130         *q = NULL;
 131         return (&h);
 132 #else
 133         return (NULL);
 134 #endif /* YP */
 135 }
 136
 137 struct hostent *
 138 _gethostbynisname(name, af)
 139         const char *name;
 140         int af;
 141 {
 142         return _gethostbynis(name, "hosts.byname", af);
 143 }
 144
 145 struct hostent *
 146 _gethostbynisaddr(addr, len, af)
 147         const char *addr;
 148         int len;
 149         int af;
 150 {
 151         return _gethostbynis(inet_ntoa(*(struct in_addr *)addr),"hosts.byaddr", af);
 152 }