xref: /titanic_50/usr/src/lib/libwrap/hosts_ctl.c (revision 142c9f13e148d687426ed2d4e8bd93717eeaebbc)
1 /*
2  * Copyright 2001 Sun Microsystems, Inc.  All rights reserved.
3  * Use is subject to license terms.
4  */
5 #pragma ident	"%Z%%M%	%I%	%E% SMI"
6 
7  /*
8   * hosts_ctl() combines common applications of the host access control
9   * library routines. It bundles its arguments then calls the hosts_access()
10   * access control checker. The host name and user name arguments should be
11   * empty strings, STRING_UNKNOWN or real data. If a match is found, the
12   * optional shell command is executed.
13   *
14   * Restriction: this interface does not pass enough information to support
15   * selective remote username lookups or selective hostname double checks.
16   *
17   * Author: Wietse Venema, Eindhoven University of Technology, The Netherlands.
18   */
19 
20 #ifndef lint
21 static char sccsid[] = "@(#) hosts_ctl.c 1.4 94/12/28 17:42:27";
22 #endif
23 
24 #include <stdio.h>
25 
26 #include "tcpd.h"
27 
28 /* hosts_ctl - limited interface to the hosts_access() routine */
29 
30 int     hosts_ctl(daemon, name, addr, user)
31 char   *daemon;
32 char   *name;
33 char   *addr;
34 char   *user;
35 {
36     struct request_info request;
37 
38     return (hosts_access(request_init(&request,
39 				      RQ_DAEMON, daemon,
40 				      RQ_CLIENT_NAME, name,
41 				      RQ_CLIENT_ADDR, addr,
42 				      RQ_USER, user,
43 				      0)));
44 }
45