/* $NetBSD: domain_list.c,v 1.2 2017/02/14 01:16:45 christos Exp $ */
/*++
/* NAME
/* domain_list 3
/* SUMMARY
/* match a host or domain name against a pattern list
/* SYNOPSIS
/* #include <domain_list.h>
/*
/* DOMAIN_LIST *domain_list_init(pname, flags, pattern_list)
/* const char *pname;
/* int flags;
/* const char *pattern_list;
/*
/* int domain_list_match(list, name)
/* DOMAIN_LIST *list;
/* const char *name;
/*
/* void domain_list_free(list)
/* DOMAIN_LIST *list;
/* DESCRIPTION
/* This is a convenience wrapper around the match_list module.
/*
/* This module implements tests for list membership of a host or
/* domain name.
/*
/* Patterns are separated by whitespace and/or commas. A pattern
/* is either a string, a file name (in which case the contents
/* of the file are substituted for the file name) or a type:name
/* lookup table specification.
/*
/* A host name matches a domain list when its name appears in the
/* list of domain patterns, or when any of its parent domains appears
/* in the list of domain patterns. The matching process is case
/* insensitive. In order to reverse the result, precede a
/* pattern with an exclamation point (!).
/*
/* domain_list_init() performs initializations. The pname
/* argument specifies error reporting context. The flags argument
/* is the bit-wise OR of zero or more of the following:
/* .IP MATCH_FLAG_PARENT
/* The hostname pattern foo.com matches itself and any name below
/* the domain foo.com. If this flag is cleared, foo.com matches itself
/* only, and .foo.com matches any name below the domain foo.com.
/* .IP MATCH_FLAG_RETURN
/* Request that domain_list_match() logs a warning and returns
/* zero, with list->error set to a non-zero dictionary error
/* code, instead of raising a fatal error.
/* .PP
/* Specify MATCH_FLAG_NONE to request none of the above.
/* The last argument is a list of domain patterns, or the name of
/* a file containing domain patterns.
/*
/* domain_list_match() matches the specified host or domain name
/* against the specified pattern list.
/*
/* domain_list_free() releases storage allocated by domain_list_init().
/* DIAGNOSTICS
/* Fatal error: unable to open or read a domain_list file; invalid
/* domain_list pattern.
/* SEE ALSO
/* match_list(3) generic list matching
/* match_ops(3) match hosts by name or by address
/* LICENSE
/* .ad
/* .fi
/* The Secure Mailer license must be distributed with this software.
/* AUTHOR(S)
/* Wietse Venema
/* IBM T.J. Watson Research
/* P.O. Box 704
/* Yorktown Heights, NY 10598, USA
/*--*/
/* System library. */
#include <sys_defs.h>
/* Utility library. */
#include <match_list.h>
/* Global library. */
#include "domain_list.h"
#ifdef TEST
#include <stdlib.h>
#include <unistd.h>
#include <msg.h>
#include <vstream.h>
#include <msg_vstream.h>
#include <dict.h>
#include <stringops.h> /* util_utf8_enable */
static void usage(char *progname)
{
msg_fatal("usage: %s [-v] patterns hostname", progname);
}
int main(int argc, char **argv)
{
DOMAIN_LIST *list;
char *host;
int ch;
msg_vstream_init(argv[0], VSTREAM_ERR);
while ((ch = GETOPT(argc, argv, "v")) > 0) {
switch (ch) {
case 'v':
msg_verbose++;
break;
default:
usage(argv[0]);
}
}
if (argc != optind + 2)
usage(argv[0]);
dict_allow_surrogate = 1;
util_utf8_enable = 1;
list = domain_list_init("command line", MATCH_FLAG_PARENT
| MATCH_FLAG_RETURN, argv[optind]);
host = argv[optind + 1];
vstream_printf("%s: %s\n", host, domain_list_match(list, host) ?
"YES" : list->error == 0 ? "NO" : "ERROR");
vstream_fflush(VSTREAM_OUT);
domain_list_free(list);
return (0);
}
#endif