/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (the "License").  You may not use this file except in compliance
 * with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */
/*
 * Copyright 2004 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */
/*	Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T	*/
/*	  All Rights Reserved	*/

#include <stdio.h>
#include <unistd.h>
#include <stdlib.h>
#include <string.h>
#include <sys/types.h>
#include <ctype.h>
#include <sys/stat.h>
#include <stdarg.h>
#include "tmstruct.h"
#include "tmextern.h"
#include "ttymon.h"

/*
 *	ttyadm	- format ttymon specific information and
 *		  print it to stdout
 *
 *	Usage:	ttyadm [options] -d device -s service -l ttylabel
 *		ttyadm -V
 *
 *		valid options are:
 *		-c
 *		-h
 *		-b
 *		-I
 *		-S y|n
 *		-T term
 *		-r count
 *		-t timeout
 *		-p prompt
 *		-m modules
 *		-i msg
 */

static void usage(void);
static	int	check_label(char *);

int
main(int argc, char *argv[])
{
	int c;			/* option letter */
	int errflg = 0;		/* error indicator */

	struct pmtab *ptr;
	char *timeout = "";
	char *count = "";
	char prompt[BUFSIZ];
	char dmsg[BUFSIZ];
	char ttyflags[BUFSIZ], *tf;

	int  dflag = 0;		/* -d seen */
	int  sflag = 0;		/* -s seen */
	int  lflag = 0;		/* -l seen */
	int  mflag = 0;		/* -m seen */

	if (argc == 1)
		usage();
	if ((ptr = ALLOC_PMTAB) == NULL) {
		(void) fprintf(stderr, "calloc failed\n");
		exit(1);
	}
	ptr->p_modules = "";
	ptr->p_dmsg = "";
	ptr->p_termtype = "";
	ptr->p_softcar = "";
	ptr->p_prompt = "login\\: ";
	ttyflags[0] = '\0';
	tf = ttyflags;
	while ((c = getopt(argc, argv, "IT:S:Vd:s:chbr:t:l:m:p:i:")) != -1) {
		switch (c) {
		case 'V':
			if ((argc > 2) || (optind < argc))
				usage();
			(void) fprintf(stdout, "%d\n", PMTAB_VERS);
			exit(0);
			break;	/*NOTREACHED*/
		case 'd':
			ptr->p_device = optarg;
			dflag = 1;
			break;
		case 'c':
			tf = strcat(tf, "c");
			break;
		case 'h':
			tf = strcat(tf, "h");
			break;
		case 'b':
			tf = strcat(tf, "b");
			break;
		case 'I':
			tf = strcat(tf, "I");
			break;
		case 'r':
			tf = strcat(tf, "r");
			count = optarg;
			if (strcheck(optarg, NUM) != 0) {
				(void) fprintf(stderr,
		"Invalid argument for \"-r\" -- positive number expected.\n");
				usage();
			}
			break;
		case 'T':
			ptr->p_termtype = optarg;
			break;
		case 'S':
			switch (*optarg) {
			case 'Y':
			case 'y':
				ptr->p_softcar = "y";
				break;
			case 'N':
			case 'n':
				ptr->p_softcar = "n";
				break;
			default:
				usage();
			}
			break;
		case 's':
			ptr->p_server = optarg;
			sflag = 1;
			break;
		case 't':
			timeout = optarg;
			if (strcheck(optarg, NUM) != 0) {
				(void) fprintf(stderr,
		"Invalid argument for \"-t\" -- positive number expected.\n");
				usage();
			}
			break;
		case 'l':
			ptr->p_ttylabel = optarg;
			lflag = 1;
			break;
		case 'm':
			ptr->p_modules = optarg;
			mflag = 1;
			break;
		case 'p':
			ptr->p_prompt = prompt;
			copystr(ptr->p_prompt, optarg);
			break;
		case 'i':
			ptr->p_dmsg = dmsg;
			copystr(ptr->p_dmsg, optarg);
			break;
		case '?':
			usage();
			break;
		}
	}
	if (optind < argc)
		usage();

	if ((!dflag) || (!sflag) || (!lflag))
		usage();

	if (check_device(ptr->p_device) != 0)
		errflg++;
	if (check_cmd(ptr->p_server) != 0)
		errflg++;
	if (check_label(ptr->p_ttylabel) != 0)
		errflg++;
	if (mflag && (vml(ptr->p_modules) != 0))
		errflg++;
	if (errflg)
		exit(1);
	(void) fprintf(stdout, "%s:%s:%s:%s:%s:%s:%s:%s:%s:%s:%s:",
	    ptr->p_device, ttyflags, count, ptr->p_server,
	    timeout, ptr->p_ttylabel, ptr->p_modules,
	    ptr->p_prompt, ptr->p_dmsg, ptr->p_termtype,
	    ptr->p_softcar);
	return (0);
}

/*
 * usage - print out a usage message
 */

static void
usage(void)
{
	(void) fprintf(stderr,
	    "Usage:\tttyadm [ options ] -d device -s service -l ttylabel\n");
	(void) fprintf(stderr, "\tttyadm -V\n");
	(void) fprintf(stderr, "\n\tValid options are:\n");
	(void) fprintf(stderr, "\t-c\n");
	(void) fprintf(stderr, "\t-h\n");
	(void) fprintf(stderr, "\t-b\n");
	(void) fprintf(stderr, "\t-I\n");
	(void) fprintf(stderr, "\t-S y|n\n");
	(void) fprintf(stderr, "\t-T term\n");
	(void) fprintf(stderr, "\t-r count\n");
	(void) fprintf(stderr, "\t-t timeout\n");
	(void) fprintf(stderr, "\t-p prompt\n");
	(void) fprintf(stderr, "\t-m modules\n");
	(void) fprintf(stderr, "\t-i msg\n");
	exit(1);
}

/*
 *	check_label	- if ttylabel exists in /etc/ttydefs, return 0
 *			- otherwise, return -1
 */

static int
check_label(char *ttylabel)
{
	FILE *fp;

	if ((ttylabel == NULL) || (*ttylabel == '\0')) {
		(void) fprintf(stderr, "error -- ttylabel is missing");
		return (-1);
	}
	if ((fp = fopen(TTYDEFS, "r")) == NULL) {
		(void) fprintf(stderr, "error -- \"%s\" does not exist, "
		    "can't verify ttylabel <%s>\n", TTYDEFS, ttylabel);
		return (-1);
	}
	if (find_label(fp, ttylabel)) {
		(void) fclose(fp);
		return (0);
	}
	(void) fclose(fp);
	(void) fprintf(stderr, "error -- can't find ttylabel <%s> in \"%s\"\n",
	    ttylabel, TTYDEFS);
	return (-1);
}

/*
 *	log	- print a message to stderr
 */
void
log(const char *msg, ...)
{
	va_list ap;
	va_start(ap, msg);
	(void) vfprintf(stderr, msg, ap);
	va_end(ap);
	(void) fprintf(stderr, "\n");
}