[unix-history] / usr / src / usr.bin / window / ttgeneric.c

#ifndef lint
static char sccsid[] = "@(#)ttgeneric.c	3.25 %G%";
#endif

/*
 * Copyright (c) 1983 Regents of the University of California,
 * All rights reserved.  Redistribution permitted subject to
 * the terms of the Berkeley Software License Agreement.
 */

#include "ww.h"
#include "tt.h"

char PC, *BC, *UP;
short ospeed;
char *tgoto();

	/* normal frame */
short gen_frame[16] = {
	' ', '|', '-', '+',
	'|', '|', '+', '+',
	'-', '+', '-', '+',
	'+', '+', '+', '+'
};

	/* ANSI graphics frame */
#define G (WWM_GRP << WWC_MSHIFT)
short ansi_frame[16] = {
	' ',	'x'|G,	'Q'|G,	'm'|G,
	'x'|G,	'x'|G,	'l'|G,	't'|G,
	'q'|G,	'j'|G,	'q'|G,	'v'|G,
	'k'|G,	'u'|G,	'w'|G,	'n'|G
};
#define ANSI_AS "\033(0"	/* ) */

char *gen_CM;
char *gen_IM;
char *gen_IC;
char *gen_IP;
char *gen_EI;
char *gen_DC;
char *gen_AL;
char *gen_DL;
char *gen_CE;
char *gen_CD;
char *gen_CL;
char *gen_VS;
char *gen_VE;
char *gen_TI;
char *gen_TE;
char *gen_SO;
char *gen_SE;
char *gen_US;
char *gen_UE;
char *gen_UP;
char *gen_PC;
char *gen_BC;
char *gen_ND;
char *gen_HO;
char *gen_NL;
char *gen_AS;
char *gen_AE;
char gen_MI;
char gen_MS;
char gen_AM;
char gen_OS;
char gen_BS;
char gen_DB;
int gen_CO;
int gen_LI;
int gen_UG;
int gen_SG;

#define ps(s) ttputs(s)

gen_setinsert(new)
char new;
{
	if (new) {
		if (gen_IM)
			ps(gen_IM);
	} else
		if (gen_EI)
			ps(gen_EI);
	tt.tt_insert = new;
}

gen_setmodes(new)
register new;
{
	register diff;

	diff = new ^ tt.tt_modes;
	if (diff & WWM_REV) {
		if (new & WWM_REV) {
			if (gen_SO)
				ps(gen_SO);
		} else
			if (gen_SE)
				ps(gen_SE);
	}
	if (diff & WWM_UL) {
		if (new & WWM_UL) {
			if (gen_US)
				ps(gen_US);
		} else
			if (gen_UE)
				ps(gen_UE);
	}
	if (diff & WWM_GRP) {
		if (new & WWM_GRP) {
			if (gen_AS)
				ps(gen_AS);
		} else
			if (gen_AE)
				ps(gen_AE);
	}
	tt.tt_modes = new;
}

gen_insline()
{
	if (tt.tt_modes)			/* for concept 100 */
		gen_setmodes(0);
	if (gen_AL)
		tttputs(gen_AL, gen_LI - tt.tt_row);
}

gen_delline()
{
	if (tt.tt_modes)			/* for concept 100 */
		gen_setmodes(0);
	if (gen_DL)
		tttputs(gen_DL, gen_LI - tt.tt_row);
}

gen_putc(c)
register char c;
{
	if (tt.tt_ninsert != tt.tt_insert)
		gen_setinsert(tt.tt_ninsert);
	if (tt.tt_nmodes != tt.tt_modes)
		gen_setmodes(tt.tt_nmodes);
	if (tt.tt_insert) {
		if (gen_IC)
			tttputs(gen_IC, gen_CO - tt.tt_col);
		ttputc(c);
		if (gen_IP)
			tttputs(gen_IP, gen_CO - tt.tt_col);
	} else
		ttputc(c);
	if (++tt.tt_col == gen_CO)
		if (gen_AM)
			tt.tt_col = 0, tt.tt_row++;
		else
			tt.tt_col--;
}

gen_write(p, n)
register char *p;
register n;
{
	if (tt.tt_ninsert != tt.tt_insert)
		gen_setinsert(tt.tt_ninsert);
	if (tt.tt_nmodes != tt.tt_modes)
		gen_setmodes(tt.tt_nmodes);
	if (tt.tt_insert) {
		while (--n >= 0) {
			if (gen_IC)
				tttputs(gen_IC, gen_CO - tt.tt_col);
			ttputc(*p++);
			if (gen_IP)
				tttputs(gen_IP, gen_CO - tt.tt_col);
			tt.tt_col++;
		}
	} else {
		tt.tt_col += n;
		while (--n >= 0)
			ttputc(*p++);
	}
	if (tt.tt_col == gen_CO)
		if (gen_AM)
			tt.tt_col = 0, tt.tt_row++;
		else
			tt.tt_col--;
}

gen_move(row, col)
register char row, col;
{
	if (tt.tt_row == row && tt.tt_col == col)
		return;
	if (!gen_MI && tt.tt_insert)
		gen_setinsert(0);
	if (!gen_MS && tt.tt_modes)
		gen_setmodes(0);
	if (tt.tt_row == row) {
		if (tt.tt_col == col)
			return;
		if (tt.tt_col == col - 1) {
			if (gen_ND) {
				ps(gen_ND);
				goto out;
			}
		} else if (tt.tt_col == col + 1) {
			if (gen_BC) {
				ps(gen_BC);
				goto out;
			}
		}
	}
	if (tt.tt_col == col) {
		if (tt.tt_row == row + 1) {
			if (gen_UP) {
				ps(gen_UP);
				goto out;
			}
		} else if (tt.tt_row == row + 1) {
			if (gen_NL) {
				ps(gen_NL);
				goto out;
			}
		}
	}
	if (gen_HO && col == 0 && row == 0) {
		ps(gen_HO);
		goto out;
	}
	ps(tgoto(gen_CM, col, row));
out:
	tt.tt_col = col;
	tt.tt_row = row;
}

gen_init()
{
	if (gen_VS)
		ps(gen_VS);
	if (gen_TI)
		ps(gen_TI);
	if (gen_CL)
		ps(gen_CL);
	tt.tt_col = tt.tt_row = 0;
	tt.tt_ninsert = tt.tt_insert = 0;
	tt.tt_nmodes = tt.tt_modes = 0;
}

gen_end()
{
	gen_setmodes(0);
	gen_setinsert(0);
	if (gen_TE)
		ps(gen_TE);
	if (gen_VE)
		ps(gen_VE);
}

gen_clreol()
{
	if (tt.tt_modes)			/* for concept 100 */
		gen_setmodes(0);
	if (gen_CE)
		tttputs(gen_CE, gen_CO - tt.tt_col);
}

gen_clreos()
{
	if (tt.tt_modes)			/* for concept 100 */
		gen_setmodes(0);
	if (gen_CD)
		tttputs(gen_CD, gen_LI - tt.tt_row);
}

gen_clear()
{
	if (tt.tt_modes)			/* for concept 100 */
		gen_setmodes(0);
	if (gen_CL)
		ps(gen_CL);
}

gen_delchar()
{
	if (gen_DC)
		tttputs(gen_DC, gen_CO - tt.tt_col);
}

tt_generic()
{
	gen_CM = ttxgetstr("cm");		/* may not work */
	gen_IM = ttxgetstr("im");
	gen_IC = tttgetstr("ic");
	gen_IP = tttgetstr("ip");
	gen_EI = ttxgetstr("ei");
	gen_DC = tttgetstr("dc");
	gen_AL = tttgetstr("al");
	gen_DL = tttgetstr("dl");
	gen_CE = tttgetstr("ce");
	gen_CD = tttgetstr("cd");
	gen_CL = ttxgetstr("cl");
	gen_VS = ttxgetstr("vs");
	gen_VE = ttxgetstr("ve");
	gen_TI = ttxgetstr("ti");
	gen_TE = ttxgetstr("te");
	gen_SO = ttxgetstr("so");
	gen_SE = ttxgetstr("se");
	gen_US = ttxgetstr("us");
	gen_UE = ttxgetstr("ue");
	gen_UP = ttxgetstr("up");
	gen_PC = tttgetstr("pc");
	gen_BC = ttxgetstr("bc");
	gen_ND = ttxgetstr("nd");
	gen_HO = ttxgetstr("ho");
	gen_NL = ttxgetstr("nl");
	gen_AS = ttxgetstr("as");
	gen_AE = ttxgetstr("ae");
	gen_MI = tgetflag("mi");
	gen_MS = tgetflag("ms");
	gen_AM = tgetflag("am");
	gen_OS = tgetflag("os");
	gen_BS = tgetflag("bs");
	gen_DB = tgetflag("db");
	gen_CO = tgetnum("co");
	gen_LI = tgetnum("li");
	gen_UG = tgetnum("ug");
	gen_SG = tgetnum("sg");

	if (gen_CL == 0 || gen_CM == 0 || gen_OS)
		return -1;

	if (gen_NL == 0)
		gen_NL = "\n";
	if (gen_BC == 0 && gen_BS)
		gen_BC = "\b";

	PC = gen_PC ? *gen_PC : 0;
	BC = gen_BC;
	UP = gen_UP;
	ospeed = wwoldtty.ww_sgttyb.sg_ospeed;

	if (gen_DC)
		tt.tt_delchar = gen_delchar;
	if (gen_AL)
		tt.tt_insline = gen_insline;
	if (gen_DL)
		tt.tt_delline = gen_delline;
	if (gen_CE)
		tt.tt_clreol = gen_clreol;
	if (gen_CD)
		tt.tt_clreos = gen_clreos;
	if (gen_CL)
		tt.tt_clear = gen_clear;
	if (gen_SG > 0)
		gen_SO = 0;
	if (gen_UG > 0)
		gen_US = 0;
	if (gen_SO)
		tt.tt_availmodes |= WWM_REV;
	if (gen_US)
		tt.tt_availmodes |= WWM_UL;
	if (gen_AS)
		tt.tt_availmodes |= WWM_GRP;
	tt.tt_hasinsert = gen_IM != 0;
	tt.tt_wrap = gen_AM;
	tt.tt_retain = gen_DB;
	tt.tt_ncol = gen_CO;
	tt.tt_nrow = gen_LI;
	tt.tt_init = gen_init;
	tt.tt_end = gen_end;
	tt.tt_write = gen_write;
	tt.tt_putc = gen_putc;
	tt.tt_move = gen_move;
	if (gen_AS && strcmp(gen_AS, ANSI_AS) == 0)
		tt.tt_frame = ansi_frame;
	else
		tt.tt_frame = gen_frame;
	return 0;
}
Commit	Line	Data
73f690a1	1	#ifndef lint
a6a7cd35	2	static char sccsid[] = "@(#)ttgeneric.c 3.25 %G%";
73f690a1 EW	3	#endif
73f690a1 EW	4
60de5df9 EW	5	/*
	6	* Copyright (c) 1983 Regents of the University of California,
	7	* All rights reserved. Redistribution permitted subject to
	8	* the terms of the Berkeley Software License Agreement.
	9	*/
	10
73f690a1	11	#include "ww.h"
fff1d01b	12	#include "tt.h"
73f690a1	13
769cbf09 EW	14	char PC, BC, UP;
769cbf09 EW	15	short ospeed;
94c16993 EW	16	char *tgoto();
94c16993 EW	17
a6a7cd35	18	/* normal frame */
a830e8bb	19	short gen_frame[16] = {
73f690a1 EW	20	' ', '\|', '-', '+',
73f690a1 EW	21	'\|', '\|', '+', '+',
fff1d01b	22	'-', '+', '-', '+',
73f690a1 EW	23	'+', '+', '+', '+'
	24	};
	25
a6a7cd35 EW	26	/* ANSI graphics frame */
	27	#define G (WWM_GRP << WWC_MSHIFT)
	28	short ansi_frame[16] = {
	29	' ', 'x'\|G, 'Q'\|G, 'm'\|G,
	30	'x'\|G, 'x'\|G, 'l'\|G, 't'\|G,
	31	'q'\|G, 'j'\|G, 'q'\|G, 'v'\|G,
	32	'k'\|G, 'u'\|G, 'w'\|G, 'n'\|G
	33	};
	34	#define ANSI_AS "\033(0" /* ) */
	35
745d1a08 EW	36	char *gen_CM;
	37	char *gen_IM;
	38	char *gen_IC;
	39	char *gen_IP;
	40	char *gen_EI;
	41	char *gen_DC;
	42	char *gen_AL;
	43	char *gen_DL;
	44	char *gen_CE;
	45	char *gen_CD;
	46	char *gen_CL;
	47	char *gen_VS;
	48	char *gen_VE;
7d9e29c8 EW	49	char *gen_TI;
7d9e29c8 EW	50	char *gen_TE;
745d1a08 EW	51	char *gen_SO;
	52	char *gen_SE;
	53	char *gen_US;
	54	char *gen_UE;
	55	char *gen_UP;
	56	char *gen_PC;
	57	char *gen_BC;
	58	char *gen_ND;
	59	char *gen_HO;
	60	char *gen_NL;
a64e9887 EW	61	char *gen_AS;
a64e9887 EW	62	char *gen_AE;
745d1a08 EW	63	char gen_MI;
	64	char gen_MS;
	65	char gen_AM;
	66	char gen_OS;
	67	char gen_BS;
377a2410	68	char gen_DB;
745d1a08 EW	69	int gen_CO;
745d1a08 EW	70	int gen_LI;
3babdf29 EW	71	int gen_UG;
3babdf29 EW	72	int gen_SG;
745d1a08	73
b1189050	74	#define ps(s) ttputs(s)
745d1a08	75
73f690a1 EW	76	gen_setinsert(new)
	77	char new;
	78	{
745d1a08 EW	79	if (new) {
	80	if (gen_IM)
	81	ps(gen_IM);
	82	} else
	83	if (gen_EI)
	84	ps(gen_EI);
3130283e	85	tt.tt_insert = new;
73f690a1 EW	86	}
	87
	88	gen_setmodes(new)
745d1a08	89	register new;
73f690a1	90	{
745d1a08 EW	91	register diff;
745d1a08 EW	92
3130283e	93	diff = new ^ tt.tt_modes;
745d1a08 EW	94	if (diff & WWM_REV) {
	95	if (new & WWM_REV) {
	96	if (gen_SO)
	97	ps(gen_SO);
	98	} else
	99	if (gen_SE)
	100	ps(gen_SE);
	101	}
	102	if (diff & WWM_UL) {
	103	if (new & WWM_UL) {
	104	if (gen_US)
	105	ps(gen_US);
	106	} else
	107	if (gen_UE)
	108	ps(gen_UE);
	109	}
a830e8bb EW	110	if (diff & WWM_GRP) {
a830e8bb EW	111	if (new & WWM_GRP) {
a64e9887 EW	112	if (gen_AS)
a64e9887 EW	113	ps(gen_AS);
a830e8bb	114	} else
a64e9887 EW	115	if (gen_AE)
a64e9887 EW	116	ps(gen_AE);
a830e8bb	117	}
3130283e	118	tt.tt_modes = new;
73f690a1 EW	119	}
	120
	121	gen_insline()
	122	{
3130283e EW	123	if (tt.tt_modes) /* for concept 100 */
3130283e EW	124	gen_setmodes(0);
745d1a08	125	if (gen_AL)
b1189050	126	tttputs(gen_AL, gen_LI - tt.tt_row);
73f690a1 EW	127	}
	128
	129	gen_delline()
	130	{
3130283e EW	131	if (tt.tt_modes) /* for concept 100 */
3130283e EW	132	gen_setmodes(0);
745d1a08	133	if (gen_DL)
b1189050	134	tttputs(gen_DL, gen_LI - tt.tt_row);
73f690a1 EW	135	}
	136
	137	gen_putc(c)
	138	register char c;
	139	{
3130283e EW	140	if (tt.tt_ninsert != tt.tt_insert)
	141	gen_setinsert(tt.tt_ninsert);
	142	if (tt.tt_nmodes != tt.tt_modes)
	143	gen_setmodes(tt.tt_nmodes);
	144	if (tt.tt_insert) {
745d1a08	145	if (gen_IC)
b1189050 EW	146	tttputs(gen_IC, gen_CO - tt.tt_col);
b1189050 EW	147	ttputc(c);
745d1a08	148	if (gen_IP)
b1189050	149	tttputs(gen_IP, gen_CO - tt.tt_col);
745d1a08	150	} else
b1189050	151	ttputc(c);
3130283e	152	if (++tt.tt_col == gen_CO)
5e785082	153	if (gen_AM)
3130283e	154	tt.tt_col = 0, tt.tt_row++;
5e785082	155	else
3130283e	156	tt.tt_col--;
73f690a1 EW	157	}
73f690a1 EW	158
3130283e EW	159	gen_write(p, n)
3130283e EW	160	register char *p;
73f690a1 EW	161	register n;
73f690a1 EW	162	{
3130283e EW	163	if (tt.tt_ninsert != tt.tt_insert)
	164	gen_setinsert(tt.tt_ninsert);
	165	if (tt.tt_nmodes != tt.tt_modes)
	166	gen_setmodes(tt.tt_nmodes);
	167	if (tt.tt_insert) {
73f690a1	168	while (--n >= 0) {
745d1a08	169	if (gen_IC)
b1189050 EW	170	tttputs(gen_IC, gen_CO - tt.tt_col);
b1189050 EW	171	ttputc(*p++);
745d1a08	172	if (gen_IP)
b1189050	173	tttputs(gen_IP, gen_CO - tt.tt_col);
3130283e	174	tt.tt_col++;
73f690a1 EW	175	}
73f690a1 EW	176	} else {
3130283e	177	tt.tt_col += n;
a830e8bb	178	while (--n >= 0)
b1189050	179	ttputc(*p++);
73f690a1	180	}
3130283e	181	if (tt.tt_col == gen_CO)
5e785082	182	if (gen_AM)
3130283e	183	tt.tt_col = 0, tt.tt_row++;
5e785082	184	else
3130283e	185	tt.tt_col--;
73f690a1 EW	186	}
	187
	188	gen_move(row, col)
	189	register char row, col;
	190	{
3130283e	191	if (tt.tt_row == row && tt.tt_col == col)
745d1a08	192	return;
3130283e EW	193	if (!gen_MI && tt.tt_insert)
	194	gen_setinsert(0);
	195	if (!gen_MS && tt.tt_modes)
	196	gen_setmodes(0);
	197	if (tt.tt_row == row) {
	198	if (tt.tt_col == col)
73f690a1	199	return;
3130283e	200	if (tt.tt_col == col - 1) {
745d1a08 EW	201	if (gen_ND) {
	202	ps(gen_ND);
	203	goto out;
	204	}
3130283e	205	} else if (tt.tt_col == col + 1) {
745d1a08 EW	206	if (gen_BC) {
	207	ps(gen_BC);
	208	goto out;
	209	}
73f690a1 EW	210	}
73f690a1 EW	211	}
3130283e EW	212	if (tt.tt_col == col) {
3130283e EW	213	if (tt.tt_row == row + 1) {
745d1a08 EW	214	if (gen_UP) {
	215	ps(gen_UP);
	216	goto out;
	217	}
3130283e	218	} else if (tt.tt_row == row + 1) {
745d1a08 EW	219	if (gen_NL) {
	220	ps(gen_NL);
	221	goto out;
	222	}
73f690a1 EW	223	}
73f690a1 EW	224	}
745d1a08 EW	225	if (gen_HO && col == 0 && row == 0) {
745d1a08 EW	226	ps(gen_HO);
73f690a1 EW	227	goto out;
73f690a1 EW	228	}
c3f80cb5	229	ps(tgoto(gen_CM, col, row));
73f690a1	230	out:
3130283e EW	231	tt.tt_col = col;
3130283e EW	232	tt.tt_row = row;
73f690a1 EW	233	}
	234
	235	gen_init()
73f690a1	236	{
745d1a08 EW	237	if (gen_VS)
745d1a08 EW	238	ps(gen_VS);
7d9e29c8 EW	239	if (gen_TI)
7d9e29c8 EW	240	ps(gen_TI);
fff1d01b EW	241	if (gen_CL)
fff1d01b EW	242	ps(gen_CL);
3130283e EW	243	tt.tt_col = tt.tt_row = 0;
	244	tt.tt_ninsert = tt.tt_insert = 0;
	245	tt.tt_nmodes = tt.tt_modes = 0;
73f690a1 EW	246	}
73f690a1 EW	247
fff1d01b	248	gen_end()
73f690a1	249	{
3130283e EW	250	gen_setmodes(0);
3130283e EW	251	gen_setinsert(0);
7d9e29c8 EW	252	if (gen_TE)
7d9e29c8 EW	253	ps(gen_TE);
745d1a08 EW	254	if (gen_VE)
745d1a08 EW	255	ps(gen_VE);
73f690a1 EW	256	}
	257
	258	gen_clreol()
	259	{
3130283e EW	260	if (tt.tt_modes) /* for concept 100 */
3130283e EW	261	gen_setmodes(0);
745d1a08	262	if (gen_CE)
b1189050	263	tttputs(gen_CE, gen_CO - tt.tt_col);
73f690a1 EW	264	}
	265
	266	gen_clreos()
	267	{
3130283e EW	268	if (tt.tt_modes) /* for concept 100 */
3130283e EW	269	gen_setmodes(0);
745d1a08	270	if (gen_CD)
b1189050	271	tttputs(gen_CD, gen_LI - tt.tt_row);
73f690a1 EW	272	}
	273
	274	gen_clear()
	275	{
3130283e EW	276	if (tt.tt_modes) /* for concept 100 */
3130283e EW	277	gen_setmodes(0);
745d1a08 EW	278	if (gen_CL)
745d1a08 EW	279	ps(gen_CL);
73f690a1 EW	280	}
	281
	282	gen_delchar()
	283	{
745d1a08	284	if (gen_DC)
b1189050	285	tttputs(gen_DC, gen_CO - tt.tt_col);
73f690a1 EW	286	}
	287
	288	tt_generic()
	289	{
b1189050 EW	290	gen_CM = ttxgetstr("cm"); /* may not work */
	291	gen_IM = ttxgetstr("im");
	292	gen_IC = tttgetstr("ic");
	293	gen_IP = tttgetstr("ip");
	294	gen_EI = ttxgetstr("ei");
	295	gen_DC = tttgetstr("dc");
	296	gen_AL = tttgetstr("al");
	297	gen_DL = tttgetstr("dl");
	298	gen_CE = tttgetstr("ce");
	299	gen_CD = tttgetstr("cd");
	300	gen_CL = ttxgetstr("cl");
	301	gen_VS = ttxgetstr("vs");
	302	gen_VE = ttxgetstr("ve");
	303	gen_TI = ttxgetstr("ti");
	304	gen_TE = ttxgetstr("te");
	305	gen_SO = ttxgetstr("so");
	306	gen_SE = ttxgetstr("se");
	307	gen_US = ttxgetstr("us");
	308	gen_UE = ttxgetstr("ue");
	309	gen_UP = ttxgetstr("up");
	310	gen_PC = tttgetstr("pc");
	311	gen_BC = ttxgetstr("bc");
	312	gen_ND = ttxgetstr("nd");
	313	gen_HO = ttxgetstr("ho");
	314	gen_NL = ttxgetstr("nl");
	315	gen_AS = ttxgetstr("as");
	316	gen_AE = ttxgetstr("ae");
745d1a08 EW	317	gen_MI = tgetflag("mi");
	318	gen_MS = tgetflag("ms");
	319	gen_AM = tgetflag("am");
	320	gen_OS = tgetflag("os");
	321	gen_BS = tgetflag("bs");
377a2410	322	gen_DB = tgetflag("db");
745d1a08 EW	323	gen_CO = tgetnum("co");
745d1a08 EW	324	gen_LI = tgetnum("li");
3babdf29 EW	325	gen_UG = tgetnum("ug");
3babdf29 EW	326	gen_SG = tgetnum("sg");
745d1a08 EW	327
	328	if (gen_CL == 0 \|\| gen_CM == 0 \|\| gen_OS)
	329	return -1;
	330
	331	if (gen_NL == 0)
	332	gen_NL = "\n";
	333	if (gen_BC == 0 && gen_BS)
a418a09b	334	gen_BC = "\b";
745d1a08	335
769cbf09 EW	336	PC = gen_PC ? *gen_PC : 0;
	337	BC = gen_BC;
	338	UP = gen_UP;
	339	ospeed = wwoldtty.ww_sgttyb.sg_ospeed;
745d1a08	340
745d1a08 EW	341	if (gen_DC)
	342	tt.tt_delchar = gen_delchar;
	343	if (gen_AL)
	344	tt.tt_insline = gen_insline;
	345	if (gen_DL)
	346	tt.tt_delline = gen_delline;
	347	if (gen_CE)
	348	tt.tt_clreol = gen_clreol;
	349	if (gen_CD)
	350	tt.tt_clreos = gen_clreos;
	351	if (gen_CL)
	352	tt.tt_clear = gen_clear;
3babdf29 EW	353	if (gen_SG > 0)
	354	gen_SO = 0;
	355	if (gen_UG > 0)
	356	gen_US = 0;
5e785082 EW	357	if (gen_SO)
	358	tt.tt_availmodes \|= WWM_REV;
	359	if (gen_US)
	360	tt.tt_availmodes \|= WWM_UL;
a64e9887 EW	361	if (gen_AS)
a64e9887 EW	362	tt.tt_availmodes \|= WWM_GRP;
3130283e	363	tt.tt_hasinsert = gen_IM != 0;
5e785082	364	tt.tt_wrap = gen_AM;
377a2410	365	tt.tt_retain = gen_DB;
745d1a08	366	tt.tt_ncol = gen_CO;
745d1a08	367	tt.tt_nrow = gen_LI;
73f690a1	368	tt.tt_init = gen_init;
fff1d01b	369	tt.tt_end = gen_end;
73f690a1 EW	370	tt.tt_write = gen_write;
73f690a1 EW	371	tt.tt_putc = gen_putc;
745d1a08	372	tt.tt_move = gen_move;
a6a7cd35 EW	373	if (gen_AS && strcmp(gen_AS, ANSI_AS) == 0)
	374	tt.tt_frame = ansi_frame;
	375	else
	376	tt.tt_frame = gen_frame;
73f690a1 EW	377	return 0;
73f690a1 EW	378	}