usr.sbin/rpcbind/check_bound.c

   1 /*      $NetBSD: check_bound.c,v 1.2 2000/06/22 08:09:26 fvdl Exp $     */
   2 /*      $FreeBSD$ */
   3
   4 /*-
   5  * Copyright (c) 2009, Sun Microsystems, Inc.
   6  * All rights reserved.
   7  *
   8  * Redistribution and use in source and binary forms, with or without
   9  * modification, are permitted provided that the following conditions are met:
  10  * - Redistributions of source code must retain the above copyright notice,
  11  *   this list of conditions and the following disclaimer.
  12  * - Redistributions in binary form must reproduce the above copyright notice,
  13  *   this list of conditions and the following disclaimer in the documentation
  14  *   and/or other materials provided with the distribution.
  15  * - Neither the name of Sun Microsystems, Inc. nor the names of its
  16  *   contributors may be used to endorse or promote products derived
  17  *   from this software without specific prior written permission.
  18  *
  19  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
  20  * AND 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 COPYRIGHT HOLDER OR CONTRIBUTORS BE
  23  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  29  * POSSIBILITY OF SUCH DAMAGE.
  30  */
  31 /*
  32  * Copyright (c) 1986 - 1991 by Sun Microsystems, Inc.
  33  */
  34
  35 /* #ident       "@(#)check_bound.c      1.15    93/07/05 SMI" */
  36
  37 #if 0
  38 #ifndef lint
  39 static  char sccsid[] = "@(#)check_bound.c 1.11 89/04/21 Copyr 1989 Sun Micro";
  40 #endif
  41 #endif
  42
  43 /*
  44  * check_bound.c
  45  * Checks to see whether the program is still bound to the
  46  * claimed address and returns the universal merged address
  47  *
  48  */
  49
  50 #include <sys/types.h>
  51 #include <sys/socket.h>
  52 #include <rpc/rpc.h>
  53 #include <stdio.h>
  54 #include <netconfig.h>
  55 #include <syslog.h>
  56 #include <string.h>
  57 #include <unistd.h>
  58 #include <stdlib.h>
  59
  60 #include "rpcbind.h"
  61
  62 struct fdlist {
  63         int fd;
  64         struct netconfig *nconf;
  65         struct fdlist *next;
  66         int check_binding;
  67 };
  68
  69 static struct fdlist *fdhead;   /* Link list of the check fd's */
  70 static struct fdlist *fdtail;
  71 static char *nullstring = "";
  72
  73 static bool_t check_bound(struct fdlist *, char *uaddr);
  74
  75 /*
  76  * Returns 1 if the given address is bound for the given addr & transport
  77  * For all error cases, we assume that the address is bound
  78  * Returns 0 for success.
  79  */
  80 static bool_t
  81 check_bound(struct fdlist *fdl, char *uaddr)
  82 {
  83         int fd;
  84         struct netbuf *na;
  85         int ans;
  86
  87         if (fdl->check_binding == FALSE)
  88                 return (TRUE);
  89
  90         na = uaddr2taddr(fdl->nconf, uaddr);
  91         if (!na)
  92                 return (TRUE); /* punt, should never happen */
  93
  94         fd = __rpc_nconf2fd(fdl->nconf);
  95         if (fd < 0) {
  96                 free(na->buf);
  97                 free(na);
  98                 return (TRUE);
  99         }
 100
 101         ans = bind(fd, (struct sockaddr *)na->buf, na->len);
 102
 103         close(fd);
 104         free(na->buf);
 105         free(na);
 106
 107         return (ans == 0 ? FALSE : TRUE);
 108 }
 109
 110 int
 111 add_bndlist(struct netconfig *nconf, struct netbuf *baddr __unused)
 112 {
 113         struct fdlist *fdl;
 114         struct netconfig *newnconf;
 115
 116         newnconf = getnetconfigent(nconf->nc_netid);
 117         if (newnconf == NULL)
 118                 return (-1);
 119         fdl = malloc(sizeof (struct fdlist));
 120         if (fdl == NULL) {
 121                 freenetconfigent(newnconf);
 122                 syslog(LOG_ERR, "no memory!");
 123                 return (-1);
 124         }
 125         fdl->nconf = newnconf;
 126         fdl->next = NULL;
 127         if (fdhead == NULL) {
 128                 fdhead = fdl;
 129                 fdtail = fdl;
 130         } else {
 131                 fdtail->next = fdl;
 132                 fdtail = fdl;
 133         }
 134         /* XXX no bound checking for now */
 135         fdl->check_binding = FALSE;
 136
 137         return 0;
 138 }
 139
 140 bool_t
 141 is_bound(char *netid, char *uaddr)
 142 {
 143         struct fdlist *fdl;
 144
 145         for (fdl = fdhead; fdl; fdl = fdl->next)
 146                 if (strcmp(fdl->nconf->nc_netid, netid) == 0)
 147                         break;
 148         if (fdl == NULL)
 149                 return (TRUE);
 150         return (check_bound(fdl, uaddr));
 151 }
 152
 153 /*
 154  * Returns NULL if there was some system error.
 155  * Returns "" if the address was not bound, i.e the server crashed.
 156  * Returns the merged address otherwise.
 157  */
 158 char *
 159 mergeaddr(SVCXPRT *xprt, char *netid, char *uaddr, char *saddr)
 160 {
 161         struct fdlist *fdl;
 162         char *c_uaddr, *s_uaddr, *m_uaddr, *allocated_uaddr = NULL;
 163
 164         for (fdl = fdhead; fdl; fdl = fdl->next)
 165                 if (strcmp(fdl->nconf->nc_netid, netid) == 0)
 166                         break;
 167         if (fdl == NULL)
 168                 return (NULL);
 169         if (check_bound(fdl, uaddr) == FALSE)
 170                 /* that server died */
 171                 return (nullstring);
 172         /*
 173          * If saddr is not NULL, the remote client may have included the
 174          * address by which it contacted us.  Use that for the "client" uaddr,
 175          * otherwise use the info from the SVCXPRT.
 176          */
 177         if (saddr != NULL) {
 178                 c_uaddr = saddr;
 179         } else {
 180                 c_uaddr = taddr2uaddr(fdl->nconf, svc_getrpccaller(xprt));
 181                 if (c_uaddr == NULL) {
 182                         syslog(LOG_ERR, "taddr2uaddr failed for %s",
 183                                 fdl->nconf->nc_netid);
 184                         return (NULL);
 185                 }
 186                 allocated_uaddr = c_uaddr;
 187         }
 188
 189 #ifdef ND_DEBUG
 190         if (debugging) {
 191                 if (saddr == NULL) {
 192                         fprintf(stderr, "mergeaddr: client uaddr = %s\n",
 193                             c_uaddr);
 194                 } else {
 195                         fprintf(stderr, "mergeaddr: contact uaddr = %s\n",
 196                             c_uaddr);
 197                 }
 198         }
 199 #endif
 200         s_uaddr = uaddr;
 201         /*
 202          * This is all we should need for IP 4 and 6
 203          */
 204         m_uaddr = addrmerge(svc_getrpccaller(xprt), s_uaddr, c_uaddr, netid);
 205 #ifdef ND_DEBUG
 206         if (debugging)
 207                 fprintf(stderr, "mergeaddr: uaddr = %s, merged uaddr = %s\n",
 208                                 uaddr, m_uaddr);
 209 #endif
 210         if (allocated_uaddr != NULL)
 211                 free(allocated_uaddr);
 212         return (m_uaddr);
 213 }
 214
 215 /*
 216  * Returns a netconf structure from its internal list.  This
 217  * structure should not be freed.
 218  */
 219 struct netconfig *
 220 rpcbind_get_conf(char *netid)
 221 {
 222         struct fdlist *fdl;
 223
 224         for (fdl = fdhead; fdl; fdl = fdl->next)
 225                 if (strcmp(fdl->nconf->nc_netid, netid) == 0)
 226                         break;
 227         if (fdl == NULL)
 228                 return (NULL);
 229         return (fdl->nconf);
 230 }