/*
 * Copyright (c) 1990 Jan-Simon Pendry
 * Copyright (c) 1990 Imperial College of Science, Technology & Medicine
 * Copyright (c) 1990, 1993
 *      The Regents of the University of California.  All rights reserved.
 *
 * This code is derived from software contributed to Berkeley by
 * Jan-Simon Pendry at Imperial College, London.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. Neither the name of the University nor the names of its contributors
 *    may be used to endorse or promote products derived from this software
 *    without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 *
 *      from: @(#)get_args.c    8.1 (Berkeley) 6/6/93
 *      $Id: get_args.c,v 1.16 2021/11/15 15:14:24 millert Exp $
 */

/*
 * Argument decode
 */

#include "am.h"
#include <syslog.h>
#include <sys/stat.h>
#include <unistd.h>

#if defined(DEBUG) && defined(PARANOID)
char **gargv;
#endif /* defined(DEBUG) && defined(PARANOID) */
int restart_existing_mounts;
int print_pid;
int normalize_hosts;
char *karch;                    /* Kernel architecture */
char *cluster;                  /* Cluster name */
char *domain;                   /* YP domain */
int afs_timeo = -1;
int afs_retrans = -1;
int am_timeo = AM_TTL;
int am_timeo_w = AM_TTL_W;

#ifdef DEBUG
/*
 * List of debug options.
 */
static struct opt_tab dbg_opt[] = {
        { "all", D_ALL },               /* All */
        { "amq", D_AMQ },               /* Register for AMQ program */
        { "daemon", D_DAEMON },         /* Enter daemon mode */
        { "full", D_FULL },             /* Program trace */
        { "mem", D_MEM },               /* Trace memory allocations */
        { "mtab", D_MTAB },             /* Use local mtab file */
        { "str", D_STR },               /* Debug string munging */
        { "test", D_TEST },             /* Full debug - but no daemon */
        { "trace", D_TRACE },           /* Protocol trace */
        { 0, 0 }
};

int debug_flags = D_AMQ                 /* Register AMQ */
                 |D_DAEMON              /* Enter daemon mode */
                 ;

/*
 * Switch on/off debug options
 */
int
debug_option(char *opt)
{
        return cmdoption(opt, dbg_opt, &debug_flags);
}
#endif /* DEBUG */

void
get_args(int c, char *v[])
{
        int opt_ch;
        int usage = 0;
        char *logfile = "syslog";
        char *sub_domain = 0;

        while ((opt_ch = getopt(c, v, "mnprva:c:d:h:k:l:t:w:x:y:C:D:")) != -1)
                switch (opt_ch) {
                case 'a':
                        if (*optarg != '/') {
                                fprintf(stderr, "%s: -a option must begin with a '/'\n",
                                    __progname);
                                exit(1);
                        }
                        auto_dir = optarg;
                        break;

                case 'c':
                        am_timeo = atoi(optarg);
                        if (am_timeo <= 0)
                                am_timeo = AM_TTL;
                        break;

                case 'd':
                        sub_domain = optarg;
                        break;

                case 'h':
#if defined(HAS_HOST) && defined(HOST_EXEC)
                        host_helper = optarg;
#else
                        plog(XLOG_USER, "-h: option ignored.  HOST_EXEC is not enabled.");
                        break;
#endif /* defined(HAS_HOST) && defined(HOST_EXEC) */

                case 'k':
                        karch = optarg;
                        break;

                case 'l':
                        logfile = optarg;
                        break;

                case 'm':
                        plog(XLOG_USER, "The -m option is no longer supported.");
                        plog(XLOG_USER, "... Use `ypcat -k am.master` on the command line instead");
                        break;

                case 'n':
                        normalize_hosts = 1;
                        break;

                case 'p':
                        print_pid = 1;
                        break;

                case 'r':
                        restart_existing_mounts = 1;
                        break;

                case 't':
                        /* timeo.retrans */
                        { char *dot = strchr(optarg, '.');
                          if (dot) *dot = '\0';
                          if (*optarg) {
                                afs_timeo = atoi(optarg);
                          }
                          if (dot) {
                                afs_retrans = atoi(dot+1);
                                *dot = '.';
                          }
                        }
                        break;

                case 'v':
                        fputs("Map support for: ", stderr);
                        mapc_showtypes(stderr);
                        fputs(".\nFS: ", stderr);
                        ops_showfstypes(stderr);
                        fputs(".\n", stderr);
                        fprintf(stderr, "Primary network is %s.\n", wire);
                        exit(0);
                        break;

                case 'w':
                        am_timeo_w = atoi(optarg);
                        if (am_timeo_w <= 0)
                                am_timeo_w = AM_TTL_W;
                        break;

                case 'x':
                        usage += switch_option(optarg);
                        break;

                case 'y':
                        domain = optarg;
                        break;

                case 'C':
                        cluster = optarg;
                        break;

                case 'D':
#ifdef DEBUG
                        usage += debug_option(optarg);
#else
                        fprintf(stderr, "%s: not compiled with DEBUG option -- sorry.\n",
                            __progname);
#endif /* DEBUG */
                        break;

                default:
                        usage = 1;
                        break;
                }

        if (xlog_level_init == ~0) {
                (void) switch_option("");
#ifdef DEBUG
                usage += switch_option("debug");
#endif /* DEBUG */
        } else {
#ifdef DEBUG
                usage += switch_option("debug");
#endif /* DEBUG */
        }

        if (usage)
                goto show_usage;

        while (optind <= c-2) {
                char *dir = v[optind++];
                char *map = v[optind++];
                char *opts = "";
                if (v[optind] && *v[optind] == '-')
                        opts = &v[optind++][1];

                root_newmap(dir, opts, map);
        }

        if (optind == c) {

                /*
                 * Append domain name to hostname.
                 * sub_domain overrides hostdomain
                 * if given.
                 */
                if (sub_domain)
                        hostdomain = sub_domain;
                if (*hostdomain == '.')
                        hostdomain++;
                strlcat(hostd,  ".", 2 * (HOST_NAME_MAX+1));
                strlcat(hostd, hostdomain, 2 * (HOST_NAME_MAX+1));

#ifdef DEBUG
                { if (debug_flags & D_MTAB) {
                        dlog("-D mtab option ignored");
                } }
#endif /* DEBUG */

                if (switch_to_logfile(logfile) != 0)
                        plog(XLOG_USER, "Cannot switch logfile");

                /*
                 * If the kernel architecture was not specified
                 * then use the machine architecture.
                 */
                if (karch == 0)
                        karch = arch;

                if (cluster == 0)
                        cluster = hostdomain;

                if (afs_timeo <= 0)
                        afs_timeo = AFS_TIMEO;
                if (afs_retrans <= 0)
                        afs_retrans = AFS_RETRANS;
                if (afs_retrans <= 0)
                        afs_retrans = 3;        /* XXX */
                return;
        }

show_usage:
        fprintf(stderr,
            "usage: %s [-nprv] [-a mount_point] [-C cluster] "
            "[-c duration] [-D option]\n"
            "\t[-d domain] [-k kernel-arch] [-l logfile] "
            "[-t interval.interval]\n"
            "\t[-w interval]", __progname);

#if defined(HAS_HOST) && defined(HOST_EXEC)
        fputs(" [-h host_helper]\n", stderr);
#endif /* defined(HAS_HOST) && defined(HOST_EXEC) */

        fputs(" [-y YP-domain]\n", stderr);

        show_opts('x', xlog_opt);
#ifdef DEBUG
        show_opts('D', dbg_opt);
#endif /* DEBUG */
        fprintf(stderr, "\t[directory mapname [-map-options]] ...\n");
        exit(1);
}