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
21static 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
30int     hosts_ctl(daemon, name, addr, user)
31char   *daemon;
32char   *name;
33char   *addr;
34char   *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