/* $NetBSD: modes.c,v 1.18 2015/05/01 17:01:08 christos Exp $ */

/*-
 * Copyright (c) 1991, 1993, 1994
 *	The Regents of the University of California.  All rights reserved.
 *
 * 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.
 */

#include <sys/cdefs.h>
#ifndef lint
#if 0
static char sccsid[] = "@(#)modes.c	8.3 (Berkeley) 4/2/94";
#else
__RCSID("$NetBSD: modes.c,v 1.18 2015/05/01 17:01:08 christos Exp $");
#endif
#endif /* not lint */

#include <sys/types.h>

#include <stddef.h>
#include <string.h>
#include <stdbool.h>

#include "stty.h"
#include "extern.h"

struct modes {
	const char *name;
	tcflag_t flag;
};

struct specialmodes {
	const char *name;
	tcflag_t set;
	tcflag_t unset;
};

/*
 * The code in optlist() depends on minus options following regular
 * options, i.e. "foo" must immediately precede "-foo".
 */
const struct modes cmodes[] = {
	{ "cstopb",	CSTOPB },
	{ "cread",	CREAD },
	{ "parenb",	PARENB },
	{ "parodd",	PARODD },
	{ "hupcl",	HUPCL },
	{ "hup",	HUPCL },
	{ "clocal",	CLOCAL },
	{ "crtscts",	CRTSCTS },
	{ "mdmbuf",	MDMBUF },
	{ "cdtrcts",	CDTRCTS },
	{ .name = NULL },
};

const struct specialmodes cspecialmodes[] = {
	{ "cs5",	CS5, CSIZE },
	{ "cs6",	CS6, CSIZE },
	{ "cs7",	CS7, CSIZE },
	{ "cs8",	CS8, CSIZE },
	{ "parity",	PARENB | CS7, PARODD | CSIZE },
	{ "-parity",	CS8, PARODD | PARENB | CSIZE },
	{ "evenp",	PARENB | CS7, PARODD | CSIZE },
	{ "-evenp",	CS8, PARODD | PARENB | CSIZE },
	{ "oddp",	PARENB | CS7 | PARODD, CSIZE },
	{ "-oddp",	CS8, PARODD | PARENB | CSIZE },
	{ "pass8",	CS8, PARODD | PARENB | CSIZE },
	{ "-pass8",	PARENB | CS7, PARODD | CSIZE },
	{ .name = NULL },
};

const struct modes imodes[] = {
	{ "ignbrk",	IGNBRK },
	{ "brkint",	BRKINT },
	{ "ignpar",	IGNPAR },
	{ "parmrk",	PARMRK },
	{ "inpck",	INPCK },
	{ "istrip",	ISTRIP },
	{ "inlcr",	INLCR },
	{ "igncr",	IGNCR },
	{ "icrnl",	ICRNL },
	{ "ixon",	IXON },
	{ "flow",	IXON },
	{ "ixoff",	IXOFF },
	{ "tandem",	IXOFF },
	{ "ixany",	IXANY },
	{ "imaxbel",	IMAXBEL },
	{ .name = NULL },
};

const struct specialmodes ispecialmodes[] = {
	{ "decctlq",	0, IXANY },
	{ "-decctlq",	IXANY, 0 },
	{ .name = NULL },
};

const struct modes lmodes[] = {
	{ "echo",	ECHO },
	{ "echoe",	ECHOE },
	{ "crterase",	ECHOE },
	{ "crtbs",	ECHOE },	/* crtbs not supported, close enough */
	{ "echok",	ECHOK },
	{ "echoke",	ECHOKE },
	{ "crtkill",	ECHOKE },
	{ "altwerase",	ALTWERASE },
	{ "iexten",	IEXTEN },
	{ "echonl",	ECHONL },
	{ "echoctl",	ECHOCTL },
	{ "ctlecho",	ECHOCTL },
	{ "echoprt",	ECHOPRT },
	{ "prterase",	ECHOPRT },
	{ "isig",	ISIG },
	{ "icanon",	ICANON },
	{ "noflsh",	NOFLSH },
	{ "tostop",	TOSTOP },
	{ "flusho",	FLUSHO },
	{ "pendin",	PENDIN },
	{ "nokerninfo",	NOKERNINFO },
	{ .name = NULL },
};

const struct specialmodes lspecialmodes[] = {
	{ "crt",	ECHOE|ECHOKE|ECHOCTL, ECHOK|ECHOPRT },
	{ "-crt",	ECHOK, ECHOE|ECHOKE|ECHOCTL },
	{ "newcrt",	ECHOE|ECHOKE|ECHOCTL, ECHOK|ECHOPRT },
	{ "-newcrt",	ECHOK, ECHOE|ECHOKE|ECHOCTL },
	{ "kerninfo",	0, NOKERNINFO },
	{ "-kerninfo",	NOKERNINFO, 0 },
	{ .name = NULL },
};

const struct modes omodes[] = {
	{ "opost",	OPOST },
	{ "onlcr",	ONLCR },
	{ "ocrnl",	OCRNL },
	{ "oxtabs",	OXTABS },
	{ "onocr",	ONOCR },
	{ "onlret",	ONLRET },
	{ .name = NULL },
};

const struct specialmodes ospecialmodes[] = {
	{ "litout",	0, OPOST },
	{ "-litout",	OPOST, 0 },
	{ "tabs",	0, OXTABS },		/* "preserve" tabs */
	{ "-tabs",	OXTABS, 0 },
	{ .name = NULL },
};

#define	CHK(s)	(!strcmp(name, s))

static int
modeset(const char *name, const struct modes *mp,
    const struct specialmodes *smp, tcflag_t *f)
{
	bool neg;

	for (; smp->name; ++smp)
		if (CHK(smp->name)) {
			*f &= ~smp->unset;
			*f |= smp->set;
			return 1;
		}

	if ((neg = (*name == '-')))
		name++;

	for (; mp->name; ++mp)
		if (CHK(mp->name)) {
			if (neg)
				*f &= ~mp->flag;
			else
				*f |= mp->flag;
			return 1;
		}

	return 0;
}

int
msearch(char ***argvp, struct info *ip)
{
	const char *name = **argvp;

	if (modeset(name, cmodes, cspecialmodes, &ip->t.c_cflag))
		goto out;
		
	if (modeset(name, imodes, ispecialmodes, &ip->t.c_iflag))
		goto out;

	if (modeset(name, lmodes, lspecialmodes, &ip->t.c_lflag))
		goto out;

	if (modeset(name, omodes, ospecialmodes, &ip->t.c_oflag))
		goto out;

	return 0;
out:
	ip->set = 1;
	return 1;
}