Home | History | Annotate | Line # | Download | only in rpcbind
security.c revision 1.5
      1 /*	$NetBSD: security.c,v 1.5 2000/06/08 09:01:05 fvdl Exp $	*/
      2 
      3 #include <sys/types.h>
      4 #include <sys/time.h>
      5 #include <sys/socket.h>
      6 #include <netinet/in.h>
      7 #include <arpa/inet.h>
      8 #include <rpc/rpc.h>
      9 #include <rpc/rpcb_prot.h>
     10 #include <rpc/pmap_prot.h>
     11 #include <err.h>
     12 #include <stdlib.h>
     13 #include <string.h>
     14 #include <unistd.h>
     15 #include <util.h>
     16 #include <syslog.h>
     17 #include <netdb.h>
     18 
     19 /*
     20  * XXX for special case checks in check_callit.
     21  */
     22 #include <rpcsvc/mount.h>
     23 #include <rpcsvc/rquota.h>
     24 #include <rpcsvc/nfs_prot.h>
     25 #include <rpcsvc/yp.h>
     26 #include <rpcsvc/ypclnt.h>
     27 #include <rpcsvc/yppasswd.h>
     28 
     29 #include "rpcbind.h"
     30 
     31 #ifdef LIBWRAP
     32 # include <tcpd.h>
     33 #ifndef LIBWRAP_ALLOW_FACILITY
     34 # define LIBWRAP_ALLOW_FACILITY LOG_AUTH
     35 #endif
     36 #ifndef LIBWRAP_ALLOW_SEVERITY
     37 # define LIBWRAP_ALLOW_SEVERITY LOG_INFO
     38 #endif
     39 #ifndef LIBWRAP_DENY_FACILITY
     40 # define LIBWRAP_DENY_FACILITY LOG_AUTH
     41 #endif
     42 #ifndef LIBWRAP_DENY_SEVERITY
     43 # define LIBWRAP_DENY_SEVERITY LOG_WARNING
     44 #endif
     45 int allow_severity = LIBWRAP_ALLOW_FACILITY|LIBWRAP_ALLOW_SEVERITY;
     46 int deny_severity = LIBWRAP_DENY_FACILITY|LIBWRAP_DENY_SEVERITY;
     47 #endif
     48 
     49 #ifndef PORTMAP_LOG_FACILITY
     50 # define PORTMAP_LOG_FACILITY LOG_AUTH
     51 #endif
     52 #ifndef PORTMAP_LOG_SEVERITY
     53 # define PORTMAP_LOG_SEVERITY LOG_INFO
     54 #endif
     55 int log_severity = PORTMAP_LOG_FACILITY|PORTMAP_LOG_SEVERITY;
     56 
     57 extern int verboselog;
     58 
     59 int
     60 check_access(SVCXPRT *xprt, rpcproc_t proc, void *args, int rpcbvers)
     61 {
     62 	struct netbuf *caller = svc_getrpccaller(xprt);
     63 	struct sockaddr *addr = (struct sockaddr *)caller->buf;
     64 #ifdef LIBWRAP
     65 	struct request_info req;
     66 #endif
     67 	rpcprog_t prog = 0;
     68 	rpcb *rpcbp;
     69 	struct pmap *pmap;
     70 
     71 	/*
     72 	 * The older PMAP_* equivalents have the same numbers, so
     73 	 * they are accounted for here as well.
     74 	 */
     75 	switch (proc) {
     76 	case RPCBPROC_GETADDR:
     77 	case RPCBPROC_SET:
     78 	case RPCBPROC_UNSET:
     79 		if (rpcbvers > PMAPVERS) {
     80 			rpcbp = (rpcb *)args;
     81 			prog = rpcbp->r_prog;
     82 		} else {
     83 			pmap = (struct pmap *)args;
     84 			prog = pmap->pm_prog;
     85 		}
     86 		if (proc == RPCBPROC_GETADDR)
     87 			break;
     88 		if (!insecure && !is_loopback(caller)) {
     89 			if (verboselog)
     90 				logit(log_severity, addr, proc, prog,
     91 				    " declined (non-loopback sender)");
     92 			return 0;
     93 		}
     94 		break;
     95 	case RPCBPROC_CALLIT:
     96 	case RPCBPROC_INDIRECT:
     97 	case RPCBPROC_DUMP:
     98 	case RPCBPROC_GETTIME:
     99 	case RPCBPROC_UADDR2TADDR:
    100 	case RPCBPROC_TADDR2UADDR:
    101 	case RPCBPROC_GETVERSADDR:
    102 	case RPCBPROC_GETADDRLIST:
    103 	case RPCBPROC_GETSTAT:
    104 	default:
    105 	}
    106 
    107 #ifdef LIBWRAP
    108 	if (addr->sa_family == AF_LOCAL)
    109 		return 1;
    110 	request_init(&req, RQ_DAEMON, "rpcbind", RQ_CLIENT_SIN, addr, 0);
    111 	sock_methods(&req);
    112 	if(!hosts_access(&req)) {
    113 		logit(deny_severity, addr, proc, prog, ": request from unauthorized host");
    114 		return 0;
    115 	}
    116 #endif
    117 	if (verboselog)
    118 		logit(log_severity, addr, proc, prog, "");
    119     	return 1;
    120 }
    121 
    122 int
    123 is_loopback(struct netbuf *nbuf)
    124 {
    125 	struct sockaddr *addr = (struct sockaddr *)nbuf->buf;
    126 	struct sockaddr_in *sin;
    127 #ifdef INET6
    128 	struct sockaddr_in6 *sin6;
    129 #endif
    130 
    131 	switch (addr->sa_family) {
    132 	case AF_INET:
    133 		if (!oldstyle_local)
    134 			return 0;
    135 		sin = (struct sockaddr_in *)addr;
    136         	return ((sin->sin_addr.s_addr == htonl(INADDR_LOOPBACK)) &&
    137 		    (ntohs(sin->sin_port) < IPPORT_RESERVED));
    138 #ifdef INET6
    139 	case AF_INET6:
    140 		if (!oldstyle_local)
    141 			return 0;
    142 		sin6 = (struct sockaddr_in6 *)addr;
    143 		return (IN6_IS_ADDR_LOOPBACK(&sin6->sin6_addr) &&
    144 		    (ntohs(sin6->sin6_port) < IPV6PORT_RESERVED));
    145 #endif
    146 	case AF_LOCAL:
    147 		return 1;
    148 	default:
    149 	}
    150 
    151 	return 0;
    152 }
    153 
    154 
    155 /* logit - report events of interest via the syslog daemon */
    156 void
    157 logit(int severity, struct sockaddr *addr, rpcproc_t procnum, rpcprog_t prognum,
    158       const char *text)
    159 {
    160 	const char *procname;
    161 	char	procbuf[32];
    162 	char   *progname;
    163 	char	progbuf[32];
    164 	char fromname[NI_MAXHOST];
    165 	struct rpcent *rpc;
    166 	static const char *procmap[] = {
    167 	/* RPCBPROC_NULL */		"null",
    168 	/* RPCBPROC_SET */		"set",
    169 	/* RPCBPROC_UNSET */		"unset",
    170 	/* RPCBPROC_GETADDR */		"getport/addr",
    171 	/* RPCBPROC_DUMP */		"dump",
    172 	/* RPCBPROC_CALLIT */		"callit",
    173 	/* RPCBPROC_GETTIME */		"gettime",
    174 	/* RPCBPROC_UADDR2TADDR */	"uaddr2taddr",
    175 	/* RPCBPROC_TADDR2UADDR */	"taddr2uaddr",
    176 	/* RPCBPROC_GETVERSADDR */	"getversaddr",
    177 	/* RPCBPROC_INDIRECT */		"indirect",
    178 	/* RPCBPROC_GETADDRLIST */	"getaddrlist",
    179 	/* RPCBPROC_GETSTAT */		"getstat"
    180 	};
    181 
    182 	/*
    183 	 * Fork off a process or the portmap daemon might hang while
    184 	 * getrpcbynumber() or syslog() does its thing.
    185 	 */
    186 
    187 	if (fork() == 0) {
    188 		setproctitle("logit");
    189 
    190 		/* Try to map program number to name. */
    191 
    192 		if (prognum == 0) {
    193 			progname = "";
    194 		} else if ((rpc = getrpcbynumber((int) prognum))) {
    195 			progname = rpc->r_name;
    196 		} else {
    197 			snprintf(progname = progbuf, sizeof(progbuf), "%u",
    198 			    (unsigned)prognum);
    199 		}
    200 
    201 		/* Try to map procedure number to name. */
    202 
    203 		if (procnum > (sizeof procmap / sizeof (char *))) {
    204 			snprintf(procbuf, sizeof procbuf, "%u",
    205 			    (unsigned)procnum);
    206 			procname = procbuf;
    207 		} else
    208 			procname = procmap[procnum];
    209 
    210 		/* Write syslog record. */
    211 
    212 		if (addr->sa_family == AF_LOCAL)
    213 			strcpy(fromname, "local");
    214 		else
    215 			getnameinfo(addr, addr->sa_len, fromname,
    216 			    sizeof fromname, NULL, 0, NI_NUMERICHOST);
    217 
    218 		syslog(severity, "connect from %s to %s(%s)%s",
    219 			fromname, procname, progname, text);
    220 		_exit(0);
    221 	}
    222 }
    223 
    224 int
    225 check_callit(SVCXPRT *xprt, struct r_rmtcall_args *args, int versnum)
    226 {
    227 	struct sockaddr *sa = (struct sockaddr *)svc_getrpccaller(xprt)->buf;
    228 
    229 	/*
    230 	 * Always allow calling NULLPROC
    231 	 */
    232 	if (args->rmt_proc == 0)
    233 		return 1;
    234 
    235 	/*
    236 	 * XXX - this special casing sucks.
    237 	 */
    238 	switch (args->rmt_prog) {
    239 	case RPCBPROG:
    240 		/*
    241 		 * Allow indirect calls to ourselves in insecure mode.
    242 		 * The is_loopback checks aren't useful then anyway.
    243 		 */
    244 		if (!insecure)
    245 			goto deny;
    246 		break;
    247 	case MOUNTPROG:
    248 		if (args->rmt_proc != MOUNTPROC_MNT &&
    249 		    args->rmt_proc != MOUNTPROC_UMNT)
    250 			break;
    251 		goto deny;
    252 	case YPBINDPROG:
    253 		if (args->rmt_proc != YPBINDPROC_SETDOM)
    254 			break;
    255 		/* FALLTHROUGH */
    256 	case YPPASSWDPROG:
    257 	case NFS_PROGRAM:
    258 	case RQUOTAPROG:
    259 		goto deny;
    260 	case YPPROG:
    261 		switch (args->rmt_proc) {
    262 		case YPPROC_ALL:
    263 		case YPPROC_MATCH:
    264 		case YPPROC_FIRST:
    265 		case YPPROC_NEXT:
    266 			goto deny;
    267 		default:
    268 		}
    269 	default:
    270 	}
    271 
    272 	return 1;
    273 deny:
    274 	logit(deny_severity, sa, args->rmt_proc, args->rmt_prog,
    275 	    ": indirect call not allowed");
    276 
    277 	return 0;
    278 }
    279