/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (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 2009 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 <stdlib.h>
#include <ctype.h>
#include <sys/types.h>
#include <termio.h>
#include <sys/stermio.h>
#include <sys/termiox.h>
#include "stty.h"

extern char *getenv();
extern void exit();
extern void perror();

static char *STTY = "stty: ";
static char *USAGE = "usage: stty [-agh] [modes]\n";
static int	pitt = 0;
static struct termios cb;
static struct termio ocb; /* for non-streams devices */
static struct stio stio;
static struct termiox termiox;
static struct winsize winsize, owinsize;
static int term;

void prmodes(int);
void pramodes(int);
void prachars(void);
void pcol(int, int);
void pit(unsigned char, char *, char *);
void delay(int, char *s);
void prspeed(char *, int);
void prencode(void);

#define	ioctl_desc	1
#define	output		stderr

int
main(int argc, char *argv[])
{

	int i;
	char	*s_arg, *sttyparse();	/* s_arg: ptr to mode to be set */
	extern const struct	speeds	speeds[];

	if (argc == 2) {
		/*
		 * "stty size", "stty speed" and "stty -g" are intended for
		 * use within backquotes; thus, they do the "fetch" "ioctl"
		 * from "/dev/tty" and always print their result on the
		 * standard output.
		 * Since their standard output is likely to be a pipe, they
		 * should not try to read the modes from the standard output.
		 */
		if (strcmp(argv[1], "size") == 0) {
			if ((i = open("/dev/tty", 0)) < 0) {
				perror("stty: Cannot open /dev/tty");
				exit(2);
			}
			if (ioctl(i, TIOCGWINSZ, &winsize) < 0) {
				perror("stty: TIOCGWINSZ");
				exit(2);
			}
			(void) printf("%d %d\n",
			    winsize.ws_row, winsize.ws_col);
			exit(0);
		} else if (strcmp(argv[1], "speed") == 0) {
			if ((i = open("/dev/tty", 0)) < 0) {
				perror("stty: Cannot open /dev/tty");
				exit(2);
			}
			if ((term = get_ttymode(i,
			    &ocb, &cb, &stio, &termiox, &winsize)) < 0) {
				perror(STTY);
				exit(2);
			}
			if (term & TERMIOS) {
				for (i = 0; speeds[i].string; i++)
					if (cfgetospeed(&cb) ==
					    speeds[i].speed) {
						(void) printf("%s\n",
						    speeds[i].string);
						exit(0);
					}
			} else {
				for (i = 0; speeds[i].string; i++)
					if ((cb.c_cflag&CBAUD) ==
					    speeds[i].speed) {
						(void) printf("%s\n",
						    speeds[i].string);
						exit(0);
					}
			}
			(void) printf("unknown\n");
			exit(1);
		} else if (strcmp(argv[1], "-g") == 0) {
			if ((i = open("/dev/tty", 0)) < 0) {
				perror("stty: Cannot open /dev/tty");
				exit(2);
			}
			if ((term = get_ttymode(i,
			    &ocb, &cb, &stio, &termiox, &winsize)) < 0) {
				perror(STTY);
				exit(2);
			}
			prencode();
			exit(0);
		}
	}

	if ((term = get_ttymode(ioctl_desc,
	    &ocb, &cb, &stio, &termiox, &winsize)) < 0) {
		perror(STTY);
		exit(2);
	}
	owinsize = winsize;
	if (argc == 1) {
		prmodes(0);
		exit(0);
	}
	if ((argc == 2) && strcmp(argv[1], "all") == 0) {
		prmodes(1);
		exit(0);
	}
	if ((argc == 2) && strcmp(argv[1], "everything") == 0) {
		pramodes(1);
		exit(0);
	}
	if ((argc == 2) && (argv[1][0] == '-') && (argv[1][2] == '\0'))
		switch (argv[1][1]) {
		case 'a':
			pramodes(0);
			exit(0);
		case 'h':
			pramodes(1);
			exit(0);
		default:
			(void) fprintf(stderr, "%s", USAGE);
			exit(2);
		}
	if (s_arg = sttyparse(argc, argv,
	    term, &ocb, &cb, &termiox, &winsize)) {
		(void) fprintf(stderr, "unknown mode: %s\n", s_arg);
		exit(2);
	}

	if (set_ttymode(ioctl_desc,
	    term, &ocb, &cb, &stio, &termiox, &winsize, &owinsize) == -1) {
		perror(STTY);
		exit(2);
	}
	return (0);	/*NOTREACHED*/
}

void
prmodes(int moremodes)
/* print modes, no options, argc is 1 */
{
	int m;

	if (!(term & ASYNC)) {
		m = stio.imode;
		if (m & IUCLC)
			(void) fprintf(output, "iuclc ");
		else
			(void) fprintf(output, "-iuclc ");
		m = stio.omode;
		if (m & OLCUC)
			(void) fprintf(output, "olcuc ");
		else
			(void) fprintf(output, "-olcuc ");
		if (m & TAB3)
			(void) fprintf(output, "tab3 ");
		m = stio.lmode;
		if (m & XCASE)
			(void) fprintf(output, "xcase ");
		else
			(void) fprintf(output, "-xcase ");
		if (m & STFLUSH)
			(void) fprintf(output, "stflush ");
		else
			(void) fprintf(output, "-stflush ");
		if (m & STWRAP)
			(void) fprintf(output, "stwrap ");
		else
			(void) fprintf(output, "-stwrap ");
		if (m & STAPPL)
			(void) fprintf(output, "stappl ");
		else
			(void) fprintf(output, "-stappl ");
		(void) fprintf(output, "\n");
	}
	if (term & ASYNC) {
		m = cb.c_cflag;
		if ((term & TERMIOS) && cfgetispeed(&cb) != 0 &&
		    cfgetispeed(&cb) != cfgetospeed(&cb)) {
			prspeed("ispeed ", cfgetispeed(&cb));
			prspeed("ospeed ", cfgetospeed(&cb));
		} else
			prspeed("speed ", cfgetospeed(&cb));
		if (m & PARENB) {
			if ((m & PAREXT) && (term & TERMIOS)) {
				if (m & PARODD)
					(void) fprintf(output, "markp ");
				else
					(void) fprintf(output, "spacep ");
			} else {
				if (m & PARODD)
					(void) fprintf(output, "oddp ");
				else
					(void) fprintf(output, "evenp ");
			}
		} else
			(void) fprintf(output, "-parity ");
		if (((m & PARENB) && !(m & CS7)) ||
		    (!(m & PARENB) && !(m & CS8)))
			(void) fprintf(output, "cs%c ", '5' + (m & CSIZE)/CS6);
		if (m & CSTOPB)
			(void) fprintf(output, "cstopb ");
		if (m & HUPCL)
			(void) fprintf(output, "hupcl ");
		if (!(m & CREAD))
			(void) fprintf(output, "-cread ");
		if (m & CLOCAL)
			(void) fprintf(output, "clocal ");
		if (m & LOBLK)
			(void) fprintf(output, "loblk ");
		(void) fprintf(output, "\n");
		if (ocb.c_line != 0)
			(void) fprintf(output, "line = %d; ", ocb.c_line);
		if (term & WINDOW) {
			(void) fprintf(output, "rows = %d; columns = %d;",
			    winsize.ws_row, winsize.ws_col);
			(void) fprintf(output, " ypixels = %d; xpixels = %d;\n",
			    winsize.ws_ypixel, winsize.ws_xpixel);
		}
		if ((cb.c_lflag & ICANON) == 0)
			(void) fprintf(output, "min = %d; time = %d;\n",
			    cb.c_cc[VMIN], cb.c_cc[VTIME]);
		if (!moremodes) {
			if (cb.c_cc[VINTR] != CINTR)
				pit(cb.c_cc[VINTR], "intr", "; ");
			if (cb.c_cc[VQUIT] != CQUIT)
				pit(cb.c_cc[VQUIT], "quit", "; ");
			if (cb.c_cc[VERASE] != CERASE)
				pit(cb.c_cc[VERASE], "erase", "; ");
			if (cb.c_cc[VKILL] != CKILL)
				pit(cb.c_cc[VKILL], "kill", "; ");
			if (cb.c_cc[VEOF] != CEOF)
				pit(cb.c_cc[VEOF], "eof", "; ");
			if (cb.c_cc[VEOL] != CNUL)
				pit(cb.c_cc[VEOL], "eol", "; ");
			if (cb.c_cc[VEOL2] != CNUL)
				pit(cb.c_cc[VEOL2], "eol2", "; ");
			if (cb.c_cc[VSWTCH] != CSWTCH)
				pit(cb.c_cc[VSWTCH], "swtch", "; ");
			if (term & TERMIOS) {
				if (cb.c_cc[VSTART] != CSTART)
					pit(cb.c_cc[VSTART], "start", "; ");
				if (cb.c_cc[VSTOP] != CSTOP)
					pit(cb.c_cc[VSTOP], "stop", "; ");
				if (cb.c_cc[VSUSP] != CSUSP)
					pit(cb.c_cc[VSUSP], "susp", "; ");
				if (cb.c_cc[VDSUSP] != CDSUSP)
					pit(cb.c_cc[VDSUSP], "dsusp", "; ");
				if (cb.c_cc[VREPRINT] != CRPRNT)
					pit(cb.c_cc[VREPRINT], "rprnt", "; ");
				if (cb.c_cc[VDISCARD] != CFLUSH)
					pit(cb.c_cc[VDISCARD], "flush", "; ");
				if (cb.c_cc[VWERASE] != CWERASE)
					pit(cb.c_cc[VWERASE], "werase", "; ");
				if (cb.c_cc[VLNEXT] != CLNEXT)
					pit(cb.c_cc[VLNEXT], "lnext", "; ");
			}
		}
		if (pitt)
			(void) fprintf(output, "\n");
		m = cb.c_iflag;
		if (m & IGNBRK)
			(void) fprintf(output, "ignbrk ");
		else if (!(m & BRKINT))
			(void) fprintf(output, "-brkint ");
		if (!(m & INPCK))
			(void) fprintf(output, "-inpck ");
		else if (!(m & IGNPAR))
			(void) fprintf(output, "-ignpar ");
		if (m & PARMRK)
			(void) fprintf(output, "parmrk ");
		if (!(m & ISTRIP))
			(void) fprintf(output, "-istrip ");
		if (m & INLCR)
			(void) fprintf(output, "inlcr ");
		if (m & IGNCR)
			(void) fprintf(output, "igncr ");
		if (!(m & ICRNL))
			(void) fprintf(output, "-icrnl ");
		if (m & IUCLC)
			(void) fprintf(output, "iuclc ");
		if (!(m & IXON))
			(void) fprintf(output, "-ixon ");
		else if (m & IXANY)
			(void) fprintf(output, "ixany ");
		if (m & IXOFF)
			(void) fprintf(output, "ixoff ");
		if ((term & TERMIOS) && (m & IMAXBEL))
			(void) fprintf(output, "imaxbel ");
		m = cb.c_oflag;
		if (!(m & OPOST))
			(void) fprintf(output, "-opost ");
		else {
			if (m & OLCUC)
				(void) fprintf(output, "olcuc ");
			if (!(m & ONLCR))
				(void) fprintf(output, "-onlcr ");
			if (m & OCRNL)
				(void) fprintf(output, "ocrnl ");
			if (m & ONOCR)
				(void) fprintf(output, "onocr ");
			if (m & ONLRET)
				(void) fprintf(output, "onlret ");
			if (m & OFILL)
				if (m & OFDEL)
					(void) fprintf(output, "del-fill ");
				else
					(void) fprintf(output, "nul-fill ");
			delay((m & CRDLY)/CR1, "cr");
			delay((m & NLDLY)/NL1, "nl");
			if ((m & TABDLY) == XTABS)
				(void) fprintf(output, "-tabs ");
			else
				delay((m & TABDLY)/TAB1, "tab");
			delay((m & BSDLY)/BS1, "bs");
			delay((m & VTDLY)/VT1, "vt");
			delay((m & FFDLY)/FF1, "ff");
		}
		(void) fprintf(output, "\n");
		m = cb.c_lflag;
		if (!(m & ISIG))
			(void) fprintf(output, "-isig ");
		if (!(m & ICANON))
			(void) fprintf(output, "-icanon ");
		if (m & XCASE)
			(void) fprintf(output, "xcase ");
		if (!(m & ECHO))
			(void) fprintf(output, "-echo ");
		if (m & ECHOE) {
			if (m & ECHOKE)
				(void) fprintf(output, "crt ");
			else
				(void) fprintf(output, "echoe -echoke ");
		} else {
			if (!(m & ECHOPRT))
				(void) fprintf(output, "-echoprt ");
		}
		if (!(m & ECHOK))
			(void) fprintf(output, "-echok ");
		if (m & ECHONL)
			(void) fprintf(output, "echonl ");
		if (m & NOFLSH)
			(void) fprintf(output, "noflsh ");
		if (m & TOSTOP)
			(void) fprintf(output, "tostop ");
		if (!(m & ECHOCTL))
			(void) fprintf(output, "-echoctl ");
		if (m & DEFECHO)
			(void) fprintf(output, "defecho ");
		if (m & FLUSHO)
			(void) fprintf(output, "flusho ");
		if (m & PENDIN)
			(void) fprintf(output, "pendin ");
		if (m & IEXTEN)
			(void) fprintf(output, "iexten ");
		(void) fprintf(output, "\n");
	}
	if (term & FLOW) {
		m = termiox.x_hflag;
		if (m & RTSXOFF)
			(void) fprintf(output, "rtsxoff ");
		if (m & CTSXON)
			(void) fprintf(output, "ctsxon ");
		if (m & DTRXOFF)
			(void) fprintf(output, "dterxoff ");
		if (m & CDXON)
			(void) fprintf(output, "rlsdxon ");
		if (m & ISXOFF)
			(void) fprintf(output, "isxoff ");
		m = termiox.x_cflag;
		switch (m & XMTCLK) {
		case XCIBRG:
			(void) fprintf(output, "xcibrg ");
			break;
		case XCTSET:
			(void) fprintf(output, "xctset ");
			break;
		case XCRSET:
			(void) fprintf(output, "xcrset ");
			break;
		}

		switch (m & RCVCLK) {
		case RCIBRG:
			(void) fprintf(output, "rcibrg ");
			break;
		case RCTSET:
			(void) fprintf(output, "rctset ");
			break;
		case RCRSET:
			(void) fprintf(output, "rcrset ");
			break;
		}

		switch (m & TSETCLK) {
		case TSETCOFF:
			(void) fprintf(output, "tsetcoff ");
			break;
		case TSETCRBRG:
			(void) fprintf(output, "tsetcrc ");
			break;
		case TSETCTBRG:
			(void) fprintf(output, "tsetcxc ");
			break;
		}

		switch (m & RSETCLK) {
		case RSETCOFF:
			(void) fprintf(output, "rsetcoff ");
			break;
		case RSETCRBRG:
			(void) fprintf(output, "rsetcrc ");
			break;
		case RSETCTBRG:
			(void) fprintf(output, "rsetcxc ");
		}
		(void) fprintf(output, "\n");
	}
	if (moremodes)
		prachars();
}

void
pramodes(int tabform)
/* print all modes, -a option */
{
	int m;

	m = cb.c_cflag;
	if (term & ASYNC) {
		if ((term & TERMIOS) && cfgetispeed(&cb) != 0 &&
		    cfgetispeed(&cb) != cfgetospeed(&cb)) {
			prspeed("ispeed ", cfgetispeed(&cb));
			prspeed("ospeed ", cfgetospeed(&cb));
		} else
			prspeed("speed ", cfgetospeed(&cb));
		if (!(term & TERMIOS))
			(void) fprintf(output, "line = %d; ", ocb.c_line);
		(void) fprintf(output, "\n");
		if (term & WINDOW) {
			(void) fprintf(output, "rows = %d columns = %d; ",
			    winsize.ws_row, winsize.ws_col);
			(void) fprintf(output, "ypixels = %d xpixels = %d\n",
			    winsize.ws_ypixel, winsize.ws_xpixel);
		}
		if ((cb.c_lflag & ICANON) == 0)
			(void) fprintf(output, "min = %d; time = %d;\n",
			    cb.c_cc[VMIN], cb.c_cc[VTIME]);
		if (!tabform) {
			pit(cb.c_cc[VINTR], "intr", "; ");
			pit(cb.c_cc[VQUIT], "quit", "; ");
			pit(cb.c_cc[VERASE], "erase", "; ");
			pit(cb.c_cc[VKILL], "kill", ";\n");
			pit(cb.c_cc[VEOF], "eof", "; ");
			pit(cb.c_cc[VEOL], "eol", "; ");
			pit(cb.c_cc[VEOL2], "eol2", "; ");
			pit(cb.c_cc[VSWTCH], "swtch", ";\n");
			if (term & TERMIOS) {
				pit(cb.c_cc[VSTART], "start", "; ");
				pit(cb.c_cc[VSTOP], "stop", "; ");
				pit(cb.c_cc[VSUSP], "susp", "; ");
				pit(cb.c_cc[VDSUSP], "dsusp", ";\n");
				pit(cb.c_cc[VREPRINT], "rprnt", "; ");
				pit(cb.c_cc[VDISCARD], "flush", "; ");
				pit(cb.c_cc[VWERASE], "werase", "; ");
				pit(cb.c_cc[VLNEXT], "lnext", ";\n");
			}
		}
	} else
		pit((unsigned)stio.tab, "ctab", "\n");
	m = cb.c_cflag;
	(void) fprintf(output, "-parenb " + ((m & PARENB) != 0));
	(void) fprintf(output, "-parodd " + ((m & PARODD) != 0));
	(void) fprintf(output, "cs%c ", '5'+ (m & CSIZE)/CS6);
	(void) fprintf(output, "-cstopb " + ((m & CSTOPB) != 0));
	(void) fprintf(output, "-hupcl " + ((m & HUPCL) != 0));
	(void) fprintf(output, "-cread " + ((m & CREAD) != 0));
	(void) fprintf(output, "-clocal " + ((m & CLOCAL) != 0));

	(void) fprintf(output, "-loblk " + ((m & LOBLK) != 0));
	if (term & TERMIOS)
		(void) fprintf(output, "-parext " + ((m & PAREXT) != 0));

	(void) fprintf(output, "\n");
	m = cb.c_iflag;
	(void) fprintf(output, "-ignbrk " + ((m & IGNBRK) != 0));
	(void) fprintf(output, "-brkint " + ((m & BRKINT) != 0));
	(void) fprintf(output, "-ignpar " + ((m & IGNPAR) != 0));
	(void) fprintf(output, "-parmrk " + ((m & PARMRK) != 0));
	(void) fprintf(output, "-inpck " + ((m & INPCK) != 0));
	(void) fprintf(output, "-istrip " + ((m & ISTRIP) != 0));
	(void) fprintf(output, "-inlcr " + ((m & INLCR) != 0));
	(void) fprintf(output, "-igncr " + ((m & IGNCR) != 0));
	(void) fprintf(output, "-icrnl " + ((m & ICRNL) != 0));
	(void) fprintf(output, "-iuclc " + ((m & IUCLC) != 0));
	(void) fprintf(output, "\n");
	(void) fprintf(output, "-ixon " + ((m & IXON) != 0));
	(void) fprintf(output, "-ixany " + ((m & IXANY) != 0));
	(void) fprintf(output, "-ixoff " + ((m & IXOFF) != 0));
	if (term & TERMIOS)
		(void) fprintf(output, "-imaxbel " + ((m & IMAXBEL) != 0));
	(void) fprintf(output, "\n");
	m = cb.c_lflag;
	(void) fprintf(output, "-isig " + ((m & ISIG) != 0));
	(void) fprintf(output, "-icanon " + ((m & ICANON) != 0));
	(void) fprintf(output, "-xcase " + ((m & XCASE) != 0));
	(void) fprintf(output, "-echo " + ((m & ECHO) != 0));
	(void) fprintf(output, "-echoe " + ((m & ECHOE) != 0));
	(void) fprintf(output, "-echok " + ((m & ECHOK) != 0));
	(void) fprintf(output, "-echonl " + ((m & ECHONL) != 0));
	(void) fprintf(output, "-noflsh " + ((m & NOFLSH) != 0));
	if (term & TERMIOS) {
		(void) fprintf(output, "\n");
		(void) fprintf(output, "-tostop " + ((m & TOSTOP) != 0));
		(void) fprintf(output, "-echoctl " + ((m & ECHOCTL) != 0));
		(void) fprintf(output, "-echoprt " + ((m & ECHOPRT) != 0));
		(void) fprintf(output, "-echoke " + ((m & ECHOKE) != 0));
		(void) fprintf(output, "-defecho " + ((m & DEFECHO) != 0));
		(void) fprintf(output, "-flusho " + ((m & FLUSHO) != 0));
		(void) fprintf(output, "-pendin " + ((m & PENDIN) != 0));
		(void) fprintf(output, "-iexten " + ((m & IEXTEN) != 0));
	}
	if (!(term & ASYNC)) {
		(void) fprintf(output, "-stflush " + ((m & STFLUSH) != 0));
		(void) fprintf(output, "-stwrap " + ((m & STWRAP) != 0));
		(void) fprintf(output, "-stappl " + ((m & STAPPL) != 0));
	}
	(void) fprintf(output, "\n");
	m = cb.c_oflag;
	(void) fprintf(output, "-opost " + ((m & OPOST) != 0));
	(void) fprintf(output, "-olcuc " + ((m & OLCUC) != 0));
	(void) fprintf(output, "-onlcr " + ((m & ONLCR) != 0));
	(void) fprintf(output, "-ocrnl " + ((m & OCRNL) != 0));
	(void) fprintf(output, "-onocr " + ((m & ONOCR) != 0));
	(void) fprintf(output, "-onlret " + ((m & ONLRET) != 0));
	(void) fprintf(output, "-ofill " + ((m & OFILL) != 0));
	(void) fprintf(output, "-ofdel " + ((m & OFDEL) != 0));
	delay((m & CRDLY)/CR1, "cr");
	delay((m & NLDLY)/NL1, "nl");
	if ((m & TABDLY) == XTABS)
		(void) fprintf(output, "-tabs ");
	else
		delay((m & TABDLY)/TAB1, "tab");
	delay((m & BSDLY)/BS1, "bs");
	delay((m & VTDLY)/VT1, "vt");
	delay((m & FFDLY)/FF1, "ff");
	(void) fprintf(output, "\n");
	if (term & FLOW) {
		m = termiox.x_hflag;
		(void) fprintf(output, "-rtsxoff " + ((m & RTSXOFF) != 0));
		(void) fprintf(output, "-ctsxon " + ((m & CTSXON) != 0));
		(void) fprintf(output, "-dterxoff " + ((m & DTRXOFF) != 0));
		(void) fprintf(output, "-rlsdxon " + ((m & CDXON) != 0));
		(void) fprintf(output, "-isxoff " + ((m & ISXOFF) != 0));
		m = termiox.x_cflag;
		switch (m & XMTCLK) {
		case XCIBRG:
			(void) fprintf(output, "xcibrg ");
			break;
		case XCTSET:
			(void) fprintf(output, "xctset ");
			break;
		case XCRSET:
			(void) fprintf(output, "xcrset ");
			break;
		}

		switch (m & RCVCLK) {
		case RCIBRG:
			(void) fprintf(output, "rcibrg ");
			break;
		case RCTSET:
			(void) fprintf(output, "rctset ");
			break;
		case RCRSET:
			(void) fprintf(output, "rcrset ");
			break;
		}

		switch (m & TSETCLK) {
		case TSETCOFF:
			(void) fprintf(output, "tsetcoff ");
			break;
		case TSETCRBRG:
			(void) fprintf(output, "tsetcrc ");
			break;
		case TSETCTBRG:
			(void) fprintf(output, "tsetcxc ");
			break;
		}

		switch (m & RSETCLK) {
		case RSETCOFF:
			(void) fprintf(output, "rsetcoff ");
			break;
		case RSETCRBRG:
			(void) fprintf(output, "rsetcrc ");
			break;
		case RSETCTBRG:
			(void) fprintf(output, "rsetcxc ");
			break;
		}
		(void) fprintf(output, "\n");
	}
	if (tabform)
		prachars();
}

void
prachars(void)
{
	if ((cb.c_lflag & ICANON) == 0)
		(void) fprintf(output, "min %d, time %d\n", cb.c_cc[VMIN],
		    cb.c_cc[VTIME]);
	(void) fprintf(output, "\
erase  kill   werase rprnt  flush  lnext  susp   intr   quit   stop   eof\
\n");
	pcol(cb.c_cc[VERASE], 0);
	pcol(cb.c_cc[VKILL], 0);
	pcol(cb.c_cc[VWERASE], 0);
	pcol(cb.c_cc[VREPRINT], 0);
	pcol(cb.c_cc[VDISCARD], 0);
	pcol(cb.c_cc[VLNEXT], 0);
	pcol(cb.c_cc[VSUSP], cb.c_cc[VDSUSP]);
	pcol(cb.c_cc[VINTR], 0);
	pcol(cb.c_cc[VQUIT], 0);
	pcol(cb.c_cc[VSTOP], cb.c_cc[VSTART]);
	if (cb.c_lflag&ICANON)
		pcol(cb.c_cc[VEOF], cb.c_cc[VEOL]);
	(void) fprintf(output, "\n");
	if (cb.c_cc[VEOL2] != 0 || cb.c_cc[VSWTCH] != 0) {
		(void) fprintf(output, "\
eol2  swtch\
\n");
		pcol(cb.c_cc[VEOL2], 0);
		pcol(cb.c_cc[VSWTCH], 0);
		(void) fprintf(output, "\n");
	}
}

void
pcol(int ch1, int ch2)
{
	int nout = 0;

	ch1 &= 0377;
	ch2 &= 0377;
	if (ch1 == ch2)
		ch2 = 0;
	for (; ch1 != 0 || ch2 != 0; ch1 = ch2, ch2 = 0) {
		if (ch1 == 0)
			continue;
		if (ch1 & 0200 && !isprint(ch1)) {
			(void) fprintf(output, "M-");
			nout += 2;
			ch1 &= ~ 0200;
		}
		if (ch1 == 0177) {
			(void) fprintf(output, "^");
			nout++;
			ch1 = '?';
		} else if (ch1 < ' ') {
			(void) fprintf(output, "^");
			nout++;
			ch1 += '@';
		}
		(void) fprintf(output, "%c", ch1);
		nout++;
		if (ch2 != 0) {
			(void) fprintf(output, "/");
			nout++;
		}
	}
	while (nout < 7) {
		(void) fprintf(output, " ");
		nout++;
	}
}

void
pit(unsigned char what, char *itsname, char *sep)
/* print function for prmodes() and pramodes() */
{

	pitt++;
	(void) fprintf(output, "%s", itsname);
	if ((term & TERMIOS) && what == _POSIX_VDISABLE ||
	    !(term & TERMIOS) && what == 0200) {
		(void) fprintf(output, " = <undef>%s", sep);
		return;
	}
	(void) fprintf(output, " = ");
	if (what & 0200 && !isprint(what)) {
		(void) fprintf(output, "-");
		what &= ~ 0200;
	}
	if (what == 0177) {
		(void) fprintf(output, "^?%s", sep);
		return;
	} else if (what < ' ') {
		(void) fprintf(output, "^");
		what += '`';
	}
	(void) fprintf(output, "%c%s", what, sep);
}

void
delay(int m, char *s)
{
	if (m)
		(void) fprintf(output, "%s%d ", s, m);
}

long speed[] = {
	0, 50, 75, 110, 134, 150, 200, 300,
	600, 1200, 1800, 2400, 4800, 9600, 19200, 38400,
	57600, 76800, 115200, 153600, 230400, 307200, 460800, 921600,
	1000000, 1152000, 1500000, 2000000, 2500000, 3000000, 3500000,
	4000000
};

void
prspeed(char *c, int s)
{
	(void) fprintf(output, "%s%d baud; ", c, speed[s]);
}

/*
 * print current settings for use with
 * another stty cmd, used for -g option
 */
void
prencode(void)
{
	int i, last;

	/* Since the -g option is mostly used for redirecting to a file */
	/* We must print to stdout here, not stderr */

	(void) printf("%x:%x:%x:%x:", cb.c_iflag, cb.c_oflag,
	    cb.c_cflag, cb.c_lflag);

	if (term & TERMIOS)
	/* last control slot is unused */
		last = NCCS - 2;
	else
		last = NCC - 1;
	for (i = 0; i < last; i++)
		(void) printf("%x:", cb.c_cc[i]);
	(void) printf("%x\n", cb.c_cc[last]);
}