/*
 * 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 1995 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

/*	Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T	*/
/*	  All Rights Reserved  	*/

#pragma ident	"%Z%%M%	%I%	%E% SMI"


#include <stdio.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;

#define ioctl_desc	1
#define output		stderr

main(argc, argv)
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);
	}
	exit(0);	/*NOTREACHED*/
}

prmodes(moremodes)			/* print modes, no options, argc is 1 */
int moremodes;
{
	register 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 ");
		}
		
		switch(m & RCVCLK)
		{
			case RCIBRG: (void)fprintf(output,"rcibrg ");
				     break;
			case RCTSET: (void)fprintf(output,"rctset ");
				     break;
			case RCRSET: (void)fprintf(output,"rcrset ");
		}
		
		switch(m & TSETCLK)
		{
			case TSETCOFF: (void)fprintf(output,"tsetcoff ");
				     break;
			case TSETCRBRG: (void)fprintf(output,"tsetcrc ");
				     break;
			case TSETCTBRG: (void)fprintf(output,"tsetcxc ");
		}
		
		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();
}

pramodes(tabform)			/* print all modes, -a option */
int tabform;
{
	register 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 ");
		}
		
		switch(m & RCVCLK)
		{
			case RCIBRG: (void)fprintf(output,"rcibrg ");
				     break;
			case RCTSET: (void)fprintf(output,"rctset ");
				     break;
			case RCRSET: (void)fprintf(output,"rcrset ");
		}
		
		switch(m & TSETCLK)
		{
			case TSETCOFF: (void)fprintf(output,"tsetcoff ");
				     break;
			case TSETCRBRG: (void)fprintf(output,"tsetcrc ");
				     break;
			case TSETCTBRG: (void)fprintf(output,"tsetcxc ");
		}
		
		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 (tabform)
		prachars();
}

prachars()
{
	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");
	}
}

pcol(ch1, ch2)
	int ch1, 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++;
	}
}


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

	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);
}

delay(m, s)
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
};

prspeed(c, s)
char *c;
int s;
{

	(void) fprintf(output,"%s%d baud; ", c, speed[s]);
}

					/* print current settings for use with  */
prencode()				/* another stty cmd, used for -g option */
{
	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]);
}