1 /* $NetBSD: security.c,v 1.5 2000/06/08 09:01:05 fvdl Exp $ */
6 #include <sys/socket.h>
7 #include <netinet/in.h>
10 #include <rpc/rpcb_prot.h>
11 #include <rpc/pmap_prot.h>
19 * XXX for special case checks in check_callit.
21 #include <rpcsvc/mount.h>
22 #include <rpcsvc/rquota.h>
23 #include <rpcsvc/nfs_prot.h>
24 #include <rpcsvc/yp.h>
25 #include <rpcsvc/ypclnt.h>
26 #include <rpcsvc/yppasswd.h>
32 #ifndef LIBWRAP_ALLOW_FACILITY
33 # define LIBWRAP_ALLOW_FACILITY LOG_AUTH
35 #ifndef LIBWRAP_ALLOW_SEVERITY
36 # define LIBWRAP_ALLOW_SEVERITY LOG_INFO
38 #ifndef LIBWRAP_DENY_FACILITY
39 # define LIBWRAP_DENY_FACILITY LOG_AUTH
41 #ifndef LIBWRAP_DENY_SEVERITY
42 # define LIBWRAP_DENY_SEVERITY LOG_WARNING
44 int allow_severity = LIBWRAP_ALLOW_FACILITY|LIBWRAP_ALLOW_SEVERITY;
45 int deny_severity = LIBWRAP_DENY_FACILITY|LIBWRAP_DENY_SEVERITY;
48 #ifndef PORTMAP_LOG_FACILITY
49 # define PORTMAP_LOG_FACILITY LOG_AUTH
51 #ifndef PORTMAP_LOG_SEVERITY
52 # define PORTMAP_LOG_SEVERITY LOG_INFO
54 int log_severity = PORTMAP_LOG_FACILITY|PORTMAP_LOG_SEVERITY;
56 extern int verboselog;
59 check_access(SVCXPRT *xprt, rpcproc_t proc, void *args, unsigned int rpcbvers)
61 struct netbuf *caller = svc_getrpccaller(xprt);
62 struct sockaddr *addr = (struct sockaddr *)caller->buf;
64 struct request_info req;
71 * The older PMAP_* equivalents have the same numbers, so
72 * they are accounted for here as well.
75 case RPCBPROC_GETADDR:
78 if (rpcbvers > PMAPVERS) {
82 pmap = (struct pmap *)args;
85 if (proc == RPCBPROC_GETADDR)
87 if (!insecure && !is_loopback(caller)) {
89 logit(log_severity, addr, proc, prog,
90 " declined (non-loopback sender)");
95 case RPCBPROC_INDIRECT:
97 case RPCBPROC_GETTIME:
98 case RPCBPROC_UADDR2TADDR:
99 case RPCBPROC_TADDR2UADDR:
100 case RPCBPROC_GETVERSADDR:
101 case RPCBPROC_GETADDRLIST:
102 case RPCBPROC_GETSTAT:
108 if (libwrap && addr->sa_family != AF_LOCAL) {
109 request_init(&req, RQ_DAEMON, "rpcbind", RQ_CLIENT_SIN, addr,
112 if(!hosts_access(&req)) {
113 logit(deny_severity, addr, proc, prog,
114 ": request from unauthorized host");
120 logit(log_severity, addr, proc, prog, "");
125 is_loopback(struct netbuf *nbuf)
127 struct sockaddr *addr = (struct sockaddr *)nbuf->buf;
128 struct sockaddr_in *sin;
130 struct sockaddr_in6 *sin6;
133 switch (addr->sa_family) {
137 sin = (struct sockaddr_in *)addr;
138 return ((sin->sin_addr.s_addr == htonl(INADDR_LOOPBACK)) &&
139 (ntohs(sin->sin_port) < IPPORT_RESERVED));
144 sin6 = (struct sockaddr_in6 *)addr;
145 return (IN6_IS_ADDR_LOOPBACK(&sin6->sin6_addr) &&
146 (ntohs(sin6->sin6_port) < IPV6PORT_RESERVED));
158 /* logit - report events of interest via the syslog daemon */
160 logit(int severity, struct sockaddr *addr, rpcproc_t procnum, rpcprog_t prognum,
163 const char *procname;
167 char fromname[NI_MAXHOST];
169 static const char *procmap[] = {
170 /* RPCBPROC_NULL */ "null",
171 /* RPCBPROC_SET */ "set",
172 /* RPCBPROC_UNSET */ "unset",
173 /* RPCBPROC_GETADDR */ "getport/addr",
174 /* RPCBPROC_DUMP */ "dump",
175 /* RPCBPROC_CALLIT */ "callit",
176 /* RPCBPROC_GETTIME */ "gettime",
177 /* RPCBPROC_UADDR2TADDR */ "uaddr2taddr",
178 /* RPCBPROC_TADDR2UADDR */ "taddr2uaddr",
179 /* RPCBPROC_GETVERSADDR */ "getversaddr",
180 /* RPCBPROC_INDIRECT */ "indirect",
181 /* RPCBPROC_GETADDRLIST */ "getaddrlist",
182 /* RPCBPROC_GETSTAT */ "getstat"
186 * Fork off a process or the portmap daemon might hang while
187 * getrpcbynumber() or syslog() does its thing.
191 setproctitle("logit");
193 /* Try to map program number to name. */
197 } else if ((rpc = getrpcbynumber((int) prognum))) {
198 progname = rpc->r_name;
200 snprintf(progname = progbuf, sizeof(progbuf), "%u",
204 /* Try to map procedure number to name. */
206 if (procnum >= (sizeof procmap / sizeof (char *))) {
207 snprintf(procbuf, sizeof procbuf, "%u",
211 procname = procmap[procnum];
213 /* Write syslog record. */
215 if (addr->sa_family == AF_LOCAL)
216 strcpy(fromname, "local");
218 getnameinfo(addr, addr->sa_len, fromname,
219 sizeof fromname, NULL, 0, NI_NUMERICHOST);
221 syslog(severity, "connect from %s to %s(%s)%s",
222 fromname, procname, progname, text);
228 check_callit(SVCXPRT *xprt, struct r_rmtcall_args *args, int versnum __unused)
230 struct sockaddr *sa = (struct sockaddr *)svc_getrpccaller(xprt)->buf;
233 * Always allow calling NULLPROC
235 if (args->rmt_proc == 0)
239 * XXX - this special casing sucks.
241 switch (args->rmt_prog) {
244 * Allow indirect calls to ourselves in insecure mode.
245 * The is_loopback checks aren't useful then anyway.
251 if (args->rmt_proc != MOUNTPROC_MNT &&
252 args->rmt_proc != MOUNTPROC_UMNT)
256 if (args->rmt_proc != YPBINDPROC_SETDOM)
264 switch (args->rmt_proc) {
280 logit(deny_severity, sa, args->rmt_proc, args->rmt_prog,
281 ": indirect call not allowed");
283 logit(0, sa, args->rmt_proc, args->rmt_prog,
284 ": indirect call not allowed");