Home | History | Annotate | Line # | Download | only in dev
ite.c revision 1.52
      1  1.52     joerg /*	$NetBSD: ite.c,v 1.52 2007/10/18 18:54:59 joerg Exp $	*/
      2   1.1       oki 
      3   1.1       oki /*
      4   1.1       oki  * Copyright (c) 1990 The Regents of the University of California.
      5   1.1       oki  * All rights reserved.
      6   1.1       oki  *
      7   1.1       oki  * This code is derived from software contributed to Berkeley by
      8   1.1       oki  * the Systems Programming Group of the University of Utah Computer
      9   1.1       oki  * Science Department.
     10   1.1       oki  *
     11   1.1       oki  * Redistribution and use in source and binary forms, with or without
     12   1.1       oki  * modification, are permitted provided that the following conditions
     13   1.1       oki  * are met:
     14   1.1       oki  * 1. Redistributions of source code must retain the above copyright
     15   1.1       oki  *    notice, this list of conditions and the following disclaimer.
     16   1.1       oki  * 2. Redistributions in binary form must reproduce the above copyright
     17   1.1       oki  *    notice, this list of conditions and the following disclaimer in the
     18   1.1       oki  *    documentation and/or other materials provided with the distribution.
     19  1.35       agc  * 3. Neither the name of the University nor the names of its contributors
     20  1.35       agc  *    may be used to endorse or promote products derived from this software
     21  1.35       agc  *    without specific prior written permission.
     22  1.35       agc  *
     23  1.35       agc  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     24  1.35       agc  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     25  1.35       agc  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     26  1.35       agc  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     27  1.35       agc  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     28  1.35       agc  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     29  1.35       agc  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     30  1.35       agc  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     31  1.35       agc  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     32  1.35       agc  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     33  1.35       agc  * SUCH DAMAGE.
     34  1.35       agc  *
     35  1.35       agc  * from: Utah $Hdr: ite.c 1.1 90/07/09$
     36  1.35       agc  *
     37  1.35       agc  *	@(#)ite.c	7.6 (Berkeley) 5/16/91
     38  1.35       agc  */
     39  1.35       agc /*
     40  1.35       agc  * Copyright (c) 1988 University of Utah.
     41  1.35       agc  *
     42  1.35       agc  * This code is derived from software contributed to Berkeley by
     43  1.35       agc  * the Systems Programming Group of the University of Utah Computer
     44  1.35       agc  * Science Department.
     45  1.35       agc  *
     46  1.35       agc  * Redistribution and use in source and binary forms, with or without
     47  1.35       agc  * modification, are permitted provided that the following conditions
     48  1.35       agc  * are met:
     49  1.35       agc  * 1. Redistributions of source code must retain the above copyright
     50  1.35       agc  *    notice, this list of conditions and the following disclaimer.
     51  1.35       agc  * 2. Redistributions in binary form must reproduce the above copyright
     52  1.35       agc  *    notice, this list of conditions and the following disclaimer in the
     53  1.35       agc  *    documentation and/or other materials provided with the distribution.
     54   1.1       oki  * 3. All advertising materials mentioning features or use of this software
     55   1.1       oki  *    must display the following acknowledgement:
     56   1.1       oki  *	This product includes software developed by the University of
     57   1.1       oki  *	California, Berkeley and its contributors.
     58   1.1       oki  * 4. Neither the name of the University nor the names of its contributors
     59   1.1       oki  *    may be used to endorse or promote products derived from this software
     60   1.1       oki  *    without specific prior written permission.
     61   1.1       oki  *
     62   1.1       oki  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     63   1.1       oki  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     64   1.1       oki  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     65   1.1       oki  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     66   1.1       oki  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     67   1.1       oki  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     68   1.1       oki  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     69   1.1       oki  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     70   1.1       oki  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     71   1.1       oki  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     72   1.1       oki  * SUCH DAMAGE.
     73   1.1       oki  *
     74   1.1       oki  * from: Utah $Hdr: ite.c 1.1 90/07/09$
     75   1.1       oki  *
     76   1.1       oki  *	@(#)ite.c	7.6 (Berkeley) 5/16/91
     77   1.1       oki  */
     78   1.1       oki 
     79   1.1       oki /*
     80   1.1       oki  * ite - bitmaped terminal.
     81   1.1       oki  * Supports VT200, a few terminal features will be unavailable until
     82   1.1       oki  * the system actually probes the device (i.e. not after consinit())
     83   1.1       oki  */
     84  1.34     lukem 
     85  1.34     lukem #include <sys/cdefs.h>
     86  1.52     joerg __KERNEL_RCSID(0, "$NetBSD: ite.c,v 1.52 2007/10/18 18:54:59 joerg Exp $");
     87   1.1       oki 
     88   1.1       oki #include "ite.h"
     89   1.1       oki #if NITE > 0
     90   1.1       oki 
     91   1.1       oki #include "bell.h"
     92  1.14   minoura #include "kbd.h"
     93  1.17   minoura 
     94  1.17   minoura #include "opt_ite.h"
     95   1.1       oki 
     96   1.1       oki #include <sys/param.h>
     97   1.1       oki #include <sys/conf.h>
     98   1.1       oki #include <sys/proc.h>
     99   1.1       oki #include <sys/ioctl.h>
    100   1.1       oki #include <sys/tty.h>
    101   1.1       oki #include <sys/systm.h>
    102   1.1       oki #include <sys/device.h>
    103   1.1       oki #include <sys/malloc.h>
    104  1.45      elad #include <sys/kauth.h>
    105  1.14   minoura 
    106  1.16   minoura #include <machine/cpu.h>
    107   1.1       oki #include <machine/kbio.h>
    108  1.14   minoura #include <machine/bus.h>
    109  1.14   minoura #include <machine/grfioctl.h>
    110  1.13   minoura #include <machine/iteioctl.h>
    111   1.1       oki 
    112  1.14   minoura #include <arch/x68k/dev/grfvar.h>
    113  1.14   minoura #include <arch/x68k/dev/itevar.h>
    114  1.14   minoura #include <arch/x68k/dev/kbdmap.h>
    115  1.14   minoura #include <arch/x68k/dev/mfp.h>
    116  1.16   minoura #if NBELL > 0
    117  1.38       chs void opm_bell(void);
    118  1.16   minoura #endif
    119   1.1       oki 
    120   1.1       oki #define SUBR_CNPROBE(min)	itesw[min].ite_cnprobe(min)
    121   1.1       oki #define SUBR_INIT(ip)		ip->isw->ite_init(ip)
    122   1.1       oki #define SUBR_DEINIT(ip)		ip->isw->ite_deinit(ip)
    123   1.1       oki #define SUBR_PUTC(ip,c,dy,dx,m)	ip->isw->ite_putc(ip,c,dy,dx,m)
    124   1.1       oki #define SUBR_CURSOR(ip,flg)	ip->isw->ite_cursor(ip,flg)
    125   1.1       oki #define SUBR_CLEAR(ip,sy,sx,h,w)	ip->isw->ite_clear(ip,sy,sx,h,w)
    126   1.1       oki #define SUBR_SCROLL(ip,sy,sx,count,dir)	\
    127   1.1       oki     ip->isw->ite_scroll(ip,sy,sx,count,dir)
    128   1.1       oki 
    129   1.1       oki struct consdev;
    130   1.1       oki 
    131  1.43     perry inline static void itesendch(int);
    132  1.43     perry inline static void alignment_display(struct ite_softc *);
    133  1.43     perry inline static void snap_cury(struct ite_softc *);
    134  1.43     perry inline static void ite_dnchar(struct ite_softc *, int);
    135  1.38       chs static void ite_inchar(struct ite_softc *,	int);
    136  1.43     perry inline static void ite_clrtoeol(struct ite_softc *);
    137  1.43     perry inline static void ite_clrtobol(struct ite_softc *);
    138  1.43     perry inline static void ite_clrline(struct ite_softc *);
    139  1.43     perry inline static void ite_clrtoeos(struct ite_softc *);
    140  1.43     perry inline static void ite_clrtobos(struct ite_softc *);
    141  1.43     perry inline static void ite_clrscreen(struct ite_softc *);
    142  1.43     perry inline static void ite_dnline(struct ite_softc *, int);
    143  1.43     perry inline static void ite_inline(struct ite_softc *, int);
    144  1.43     perry inline static void ite_index(struct ite_softc *);
    145  1.43     perry inline static void ite_lf(struct ite_softc *);
    146  1.43     perry inline static void ite_crlf(struct ite_softc *);
    147  1.43     perry inline static void ite_cr(struct ite_softc *);
    148  1.43     perry inline static void ite_rlf(struct ite_softc *);
    149  1.38       chs static void iteprecheckwrap(struct ite_softc *);
    150  1.38       chs static void itecheckwrap(struct ite_softc *);
    151  1.38       chs static int ite_argnum(struct ite_softc *);
    152  1.38       chs static int ite_zargnum(struct ite_softc *);
    153  1.40        he static void ite_sendstr(struct ite_softc *, const char *);
    154  1.43     perry inline static int atoi(const char *);
    155  1.38       chs void ite_reset(struct ite_softc *);
    156  1.38       chs struct ite_softc *getitesp(dev_t);
    157  1.38       chs int iteon(dev_t, int);
    158  1.38       chs void iteoff(dev_t, int);
    159   1.1       oki 
    160   1.1       oki struct itesw itesw[] = {
    161  1.16   minoura 	{0,	tv_init,	tv_deinit,	0,
    162  1.16   minoura 	 0,	0,		0}
    163   1.1       oki };
    164   1.1       oki int	nitesw = sizeof(itesw) / sizeof(itesw[0]);
    165   1.1       oki 
    166   1.1       oki /*
    167   1.1       oki  * # of chars are output in a single itestart() call.
    168   1.1       oki  * If this is too big, user processes will be blocked out for
    169   1.1       oki  * long periods of time while we are emptying the queue in itestart().
    170   1.1       oki  * If it is too small, console output will be very ragged.
    171   1.1       oki  */
    172   1.1       oki #define ITEBURST 64
    173   1.1       oki 
    174   1.1       oki int	nite = NITE;
    175   1.1       oki struct	tty *ite_tty[NITE];
    176   1.1       oki struct	ite_softc *kbd_ite = NULL;
    177   1.1       oki struct  ite_softc con_itesoftc;
    178   1.1       oki 
    179   1.1       oki struct  tty *kbd_tty = NULL;
    180   1.1       oki 
    181   1.1       oki int	start_repeat_timeo = 20; /* /100: initial timeout till pressed key repeats */
    182   1.1       oki int	next_repeat_timeo  = 3;  /* /100: timeout when repeating for next char */
    183   1.1       oki 
    184   1.1       oki u_char	cons_tabs[MAX_TABS];
    185   1.1       oki 
    186  1.38       chs void	itestart(struct tty *);
    187   1.1       oki 
    188  1.38       chs void iteputchar(int, struct ite_softc *);
    189  1.38       chs void ite_putstr(const u_char *, int, dev_t);
    190   1.1       oki 
    191  1.38       chs void iteattach(struct device *, struct device *, void *);
    192  1.38       chs int itematch(struct device *, struct cfdata *, void *);
    193   1.1       oki 
    194  1.31   thorpej CFATTACH_DECL(ite, sizeof(struct ite_softc),
    195  1.32   thorpej     itematch, iteattach, NULL, NULL);
    196   1.1       oki 
    197   1.9   thorpej extern struct cfdriver ite_cd;
    198   1.1       oki 
    199  1.29   gehenna dev_type_open(iteopen);
    200  1.29   gehenna dev_type_close(iteclose);
    201  1.29   gehenna dev_type_read(iteread);
    202  1.29   gehenna dev_type_write(itewrite);
    203  1.29   gehenna dev_type_ioctl(iteioctl);
    204  1.29   gehenna dev_type_tty(itetty);
    205  1.29   gehenna dev_type_poll(itepoll);
    206  1.29   gehenna 
    207  1.29   gehenna const struct cdevsw ite_cdevsw = {
    208  1.29   gehenna 	iteopen, iteclose, iteread, itewrite, iteioctl,
    209  1.33  jdolecek 	nostop, itetty, itepoll, nommap, ttykqfilter, D_TTY
    210  1.29   gehenna };
    211  1.29   gehenna 
    212  1.49     isaki int
    213  1.38       chs itematch(struct device *pdp, struct cfdata *cdp, void *auxp)
    214   1.1       oki {
    215   1.1       oki 	struct grf_softc *gp;
    216   1.1       oki 
    217   1.1       oki 	gp = auxp;
    218  1.39       chs 	if (cdp->cf_loc[GRFCF_GRFADDR] != gp->g_cfaddr)
    219  1.39       chs 		return 0;
    220   1.1       oki 
    221  1.39       chs 	return 1;
    222   1.1       oki }
    223   1.1       oki 
    224  1.50     isaki /*
    225   1.1       oki  * iteinit() is the standard entry point for initialization of
    226   1.1       oki  * an ite device, it is also called from ite_cninit().
    227   1.1       oki  */
    228  1.49     isaki void
    229  1.38       chs iteattach(struct device *pdp, struct device *dp, void *auxp)
    230   1.1       oki {
    231   1.1       oki 	struct ite_softc *ip;
    232   1.1       oki 	struct grf_softc *gp;
    233   1.1       oki 
    234   1.1       oki 	gp = (struct grf_softc *)auxp;
    235   1.1       oki 	if (dp) {
    236   1.1       oki 		ip = (struct ite_softc *)dp;
    237   1.1       oki 		if(con_itesoftc.grf != NULL
    238   1.1       oki 			/*&& con_itesoftc.grf->g_unit == gp->g_unit*/) {
    239   1.1       oki 			/*
    240   1.1       oki 			 * console reinit copy params over.
    241   1.1       oki 			 * and console always gets keyboard
    242   1.1       oki 			 */
    243  1.27       wiz 			memcpy(&ip->grf, &con_itesoftc.grf,
    244   1.1       oki 			    (char *)&ip[1] - (char *)&ip->grf);
    245   1.1       oki 			con_itesoftc.grf = NULL;
    246   1.1       oki 			kbd_ite = ip;
    247   1.1       oki 		}
    248   1.1       oki 		ip->grf = gp;
    249  1.44   thorpej 		iteinit(device_unit(&ip->device)); /* XXX */
    250   1.6  christos 		printf(": rows %d cols %d", ip->rows, ip->cols);
    251   1.1       oki 		if (kbd_ite == NULL)
    252   1.1       oki 			kbd_ite = ip;
    253   1.6  christos 		printf("\n");
    254   1.1       oki 	} else {
    255  1.50     isaki 		if (con_itesoftc.grf != NULL)
    256   1.1       oki 			return;
    257   1.1       oki 		con_itesoftc.grf = gp;
    258   1.1       oki 		con_itesoftc.tabs = cons_tabs;
    259   1.1       oki 	}
    260   1.1       oki }
    261   1.1       oki 
    262   1.1       oki struct ite_softc *
    263  1.38       chs getitesp(dev_t dev)
    264   1.1       oki {
    265   1.1       oki 	extern int x68k_realconfig;
    266   1.1       oki 
    267   1.1       oki 	if (x68k_realconfig && con_itesoftc.grf == NULL)
    268   1.1       oki 		return(ite_cd.cd_devs[UNIT(dev)]);
    269   1.1       oki 
    270   1.1       oki 	if (con_itesoftc.grf == NULL)
    271   1.1       oki 		panic("no ite_softc for console");
    272   1.1       oki 	return(&con_itesoftc);
    273   1.1       oki }
    274   1.1       oki 
    275  1.49     isaki void
    276  1.38       chs iteinit(dev_t dev)
    277   1.1       oki {
    278   1.1       oki 	struct ite_softc *ip;
    279   1.1       oki 
    280   1.1       oki 	ip = getitesp(dev);
    281   1.1       oki 
    282   1.1       oki 	if (ip->flags & ITE_INITED)
    283   1.1       oki 		return;
    284  1.27       wiz 	memcpy(&kbdmap, &ascii_kbdmap, sizeof(struct kbdmap));
    285   1.1       oki 
    286   1.1       oki 	ip->curx = 0;
    287   1.1       oki 	ip->cury = 0;
    288   1.1       oki 	ip->cursorx = 0;
    289   1.1       oki 	ip->cursory = 0;
    290   1.1       oki 
    291  1.44   thorpej 	ip->isw = &itesw[device_unit(&ip->device)]; /* XXX */
    292   1.1       oki 	SUBR_INIT(ip);
    293   1.1       oki 	SUBR_CURSOR(ip, DRAW_CURSOR);
    294   1.1       oki 	if (!ip->tabs)
    295   1.1       oki 		ip->tabs = malloc(MAX_TABS*sizeof(u_char), M_DEVBUF, M_WAITOK);
    296   1.1       oki 	ite_reset(ip);
    297   1.1       oki 	ip->flags |= ITE_INITED;
    298   1.1       oki }
    299   1.1       oki 
    300   1.1       oki /*
    301   1.1       oki  * Perform functions necessary to setup device as a terminal emulator.
    302   1.1       oki  */
    303  1.49     isaki int
    304  1.38       chs iteon(dev_t dev, int flag)
    305   1.1       oki {
    306   1.1       oki 	int unit = UNIT(dev);
    307  1.12   minoura 	struct ite_softc *ip;
    308   1.1       oki 
    309  1.12   minoura 	if (unit < 0 || unit >= ite_cd.cd_ndevs ||
    310  1.12   minoura 	    (ip = getitesp(unit)) == NULL || (ip->flags&ITE_ALIVE) == 0)
    311   1.1       oki 		return(ENXIO);
    312   1.1       oki 	/* force ite active, overriding graphics mode */
    313   1.1       oki 	if (flag & 1) {
    314   1.1       oki 		ip->flags |= ITE_ACTIVE;
    315   1.1       oki 		ip->flags &= ~(ITE_INGRF|ITE_INITED);
    316   1.1       oki 	}
    317   1.1       oki 	/* leave graphics mode */
    318   1.1       oki 	if (flag & 2) {
    319   1.1       oki 		ip->flags &= ~ITE_INGRF;
    320   1.1       oki 		if ((ip->flags & ITE_ACTIVE) == 0)
    321   1.1       oki 			return(0);
    322   1.1       oki 	}
    323   1.1       oki 	ip->flags |= ITE_ACTIVE;
    324   1.1       oki 	if (ip->flags & ITE_INGRF)
    325   1.1       oki 		return(0);
    326   1.1       oki 	iteinit(dev);
    327  1.20   minoura 	if (flag & 2)
    328  1.20   minoura 		ite_reset(ip);
    329  1.14   minoura #if NKBD > 0
    330  1.49     isaki 	mfp_send_usart(0x49);	/* XXX */
    331  1.14   minoura #endif
    332   1.1       oki 	return(0);
    333   1.1       oki }
    334   1.1       oki 
    335   1.1       oki /*
    336   1.1       oki  * "Shut down" device as terminal emulator.
    337   1.1       oki  * Note that we do not deinit the console device unless forced.
    338   1.1       oki  * Deinit'ing the console every time leads to a very active
    339   1.1       oki  * screen when processing /etc/rc.
    340   1.1       oki  */
    341  1.49     isaki void
    342  1.38       chs iteoff(dev_t dev, int flag)
    343   1.1       oki {
    344   1.4       oki 	int unit = UNIT(dev);
    345  1.38       chs 	struct ite_softc *ip;
    346   1.1       oki 
    347   1.4       oki 	/* XXX check whether when call from grf.c */
    348  1.12   minoura 	if (unit < 0 || unit >= ite_cd.cd_ndevs ||
    349  1.12   minoura 	    (ip = getitesp(unit)) == NULL || (ip->flags&ITE_ALIVE) == 0)
    350   1.4       oki 		return;
    351   1.1       oki 	if (flag & 2)
    352   1.1       oki 		ip->flags |= ITE_INGRF;
    353   1.1       oki 
    354   1.1       oki 	if ((ip->flags & ITE_ACTIVE) == 0)
    355   1.1       oki 		return;
    356   1.1       oki 	if ((flag & 1) ||
    357   1.1       oki 	    (ip->flags & (ITE_INGRF|ITE_ISCONS|ITE_INITED)) == ITE_INITED)
    358   1.1       oki 		SUBR_DEINIT(ip);
    359   1.1       oki 
    360   1.1       oki 	/*
    361   1.1       oki 	 * XXX When the system is rebooted with "reboot", init(8)
    362   1.1       oki 	 * kills the last process to have the console open.
    363  1.37    simonb 	 * If we don't revent the ITE_ACTIVE bit from being
    364   1.1       oki 	 * cleared, we will never see messages printed during
    365   1.1       oki 	 * the process of rebooting.
    366   1.1       oki 	 */
    367  1.14   minoura 	if ((flag & 2) == 0 && (ip->flags & ITE_ISCONS) == 0) {
    368   1.1       oki 		ip->flags &= ~ITE_ACTIVE;
    369  1.14   minoura #if NKBD > 0
    370  1.49     isaki 		mfp_send_usart(0x48);	/* XXX */
    371  1.14   minoura #endif
    372  1.14   minoura 	}
    373   1.1       oki }
    374   1.1       oki 
    375   1.1       oki /*
    376   1.1       oki  * standard entry points to the device.
    377   1.1       oki  */
    378   1.1       oki 
    379   1.1       oki /* ARGSUSED */
    380  1.49     isaki int
    381  1.42  christos iteopen(dev_t dev, int mode, int devtype, struct lwp *l)
    382   1.1       oki {
    383   1.1       oki 	int unit = UNIT(dev);
    384  1.38       chs 	struct tty *tp;
    385  1.38       chs 	struct ite_softc *ip;
    386  1.38       chs 	int error;
    387   1.1       oki 	int first = 0;
    388   1.1       oki 
    389  1.15   minoura 	if (unit >= ite_cd.cd_ndevs || (ip = getitesp(dev)) == NULL)
    390  1.15   minoura 		return (ENXIO);
    391   1.3       oki 	if (!ite_tty[unit]) {
    392   1.1       oki 		tp = ite_tty[unit] = ttymalloc();
    393   1.3       oki 		tty_attach(tp);
    394   1.3       oki 	} else
    395   1.1       oki 		tp = ite_tty[unit];
    396  1.47      elad 	if (kauth_authorize_device_tty(l->l_cred, KAUTH_DEVICE_TTY_OPEN, tp))
    397   1.1       oki 		return (EBUSY);
    398   1.1       oki 	if ((ip->flags & ITE_ACTIVE) == 0) {
    399   1.1       oki 		error = iteon(dev, 0);
    400   1.1       oki 		if (error)
    401   1.1       oki 			return (error);
    402   1.1       oki 		first = 1;
    403   1.1       oki 	}
    404   1.1       oki 	tp->t_oproc = itestart;
    405   1.1       oki 	tp->t_param = NULL;
    406   1.1       oki 	tp->t_dev = dev;
    407   1.1       oki 	if ((tp->t_state&TS_ISOPEN) == 0) {
    408   1.1       oki 		ttychars(tp);
    409   1.1       oki 		tp->t_iflag = TTYDEF_IFLAG;
    410   1.1       oki 		tp->t_oflag = TTYDEF_OFLAG;
    411   1.1       oki 		tp->t_cflag = TTYDEF_CFLAG;
    412   1.1       oki 		tp->t_lflag = TTYDEF_LFLAG;
    413   1.1       oki 		tp->t_ispeed = tp->t_ospeed = TTYDEF_SPEED;
    414   1.1       oki 		tp->t_state = TS_ISOPEN|TS_CARR_ON;
    415   1.1       oki 		ttsetwater(tp);
    416   1.1       oki 	}
    417  1.23       eeh 	error = (*tp->t_linesw->l_open)(dev, tp);
    418   1.1       oki 	if (error == 0) {
    419   1.1       oki 		tp->t_winsize.ws_row = ip->rows;
    420   1.1       oki 		tp->t_winsize.ws_col = ip->cols;
    421   1.1       oki 	} else if (first)
    422   1.1       oki 		iteoff(dev, 0);
    423   1.1       oki 	return (error);
    424   1.1       oki }
    425   1.1       oki 
    426   1.1       oki /*ARGSUSED*/
    427  1.49     isaki int
    428  1.42  christos iteclose(dev_t dev, int flag, int mode, struct lwp *l)
    429   1.1       oki {
    430  1.38       chs 	struct tty *tp = ite_tty[UNIT(dev)];
    431   1.1       oki 
    432  1.23       eeh 	(*tp->t_linesw->l_close)(tp, flag);
    433   1.1       oki 	ttyclose(tp);
    434   1.1       oki 	iteoff(dev, 0);
    435   1.1       oki #if 0
    436   1.1       oki 	ttyfree(tp);
    437   1.1       oki 	ite_tty[UNIT(dev)] = (struct tty *)0;
    438   1.1       oki #endif
    439   1.1       oki 	return(0);
    440   1.1       oki }
    441   1.1       oki 
    442  1.49     isaki int
    443  1.38       chs iteread(dev_t dev, struct uio *uio, int flag)
    444   1.1       oki {
    445  1.38       chs 	struct tty *tp = ite_tty[UNIT(dev)];
    446   1.1       oki 
    447  1.23       eeh 	return ((*tp->t_linesw->l_read)(tp, uio, flag));
    448   1.1       oki }
    449   1.1       oki 
    450  1.49     isaki int
    451  1.38       chs itewrite(dev_t dev, struct uio *uio, int flag)
    452   1.1       oki {
    453  1.38       chs 	struct tty *tp = ite_tty[UNIT(dev)];
    454   1.1       oki 
    455  1.23       eeh 	return ((*tp->t_linesw->l_write)(tp, uio, flag));
    456  1.25       scw }
    457  1.25       scw 
    458  1.49     isaki int
    459  1.42  christos itepoll(dev_t dev, int events, struct lwp *l)
    460  1.25       scw {
    461  1.38       chs 	struct tty *tp = ite_tty[UNIT(dev)];
    462  1.50     isaki 
    463  1.42  christos 	return ((*tp->t_linesw->l_poll)(tp, events, l));
    464   1.1       oki }
    465   1.1       oki 
    466   1.1       oki struct tty *
    467  1.38       chs itetty(dev_t dev)
    468   1.1       oki {
    469   1.1       oki 
    470   1.1       oki 	return (ite_tty[UNIT(dev)]);
    471   1.1       oki }
    472   1.1       oki 
    473  1.49     isaki int
    474  1.48  christos iteioctl(dev_t dev, u_long cmd, void *addr, int flag, struct lwp *l)
    475   1.1       oki {
    476   1.1       oki 	struct iterepeat *irp;
    477  1.38       chs 	struct tty *tp = ite_tty[UNIT(dev)];
    478   1.1       oki 	int error;
    479   1.1       oki 
    480  1.42  christos 	error = (*tp->t_linesw->l_ioctl)(tp, cmd, addr, flag, l);
    481  1.28    atatat 	if (error != EPASSTHROUGH)
    482   1.1       oki 		return (error);
    483  1.28    atatat 
    484  1.42  christos 	error = ttioctl(tp, cmd, addr, flag, l);
    485  1.28    atatat 	if (error != EPASSTHROUGH)
    486   1.1       oki 		return (error);
    487   1.1       oki 
    488   1.1       oki 	switch (cmd) {
    489   1.1       oki 	case ITEIOCSKMAP:
    490   1.1       oki 		if (addr == 0)
    491   1.1       oki 			return(EFAULT);
    492  1.27       wiz 		memcpy(&kbdmap, addr, sizeof(struct kbdmap));
    493   1.1       oki 		return(0);
    494   1.1       oki 
    495   1.1       oki 	case ITEIOCGKMAP:
    496   1.1       oki 		if (addr == NULL)
    497   1.1       oki 			return(EFAULT);
    498  1.27       wiz 		memcpy(addr, &kbdmap, sizeof(struct kbdmap));
    499   1.1       oki 		return(0);
    500   1.1       oki 
    501   1.1       oki 	case ITEIOCGREPT:
    502   1.1       oki 		irp = (struct iterepeat *)addr;
    503   1.1       oki 		irp->start = start_repeat_timeo;
    504   1.1       oki 		irp->next = next_repeat_timeo;
    505   1.1       oki 
    506   1.1       oki 	case ITEIOCSREPT:
    507   1.1       oki 		irp = (struct iterepeat *)addr;
    508   1.1       oki 		if (irp->start < ITEMINREPEAT && irp->next < ITEMINREPEAT)
    509   1.1       oki 			return(EINVAL);
    510   1.1       oki 		start_repeat_timeo = irp->start;
    511   1.1       oki 		next_repeat_timeo = irp->next;
    512   1.1       oki #if x68k
    513   1.1       oki 	case ITELOADFONT:
    514   1.1       oki 		if (addr) {
    515  1.49     isaki 			memcpy(kern_font, addr, 4096 /*sizeof(kernel_font)*/);
    516  1.26     isaki 			ite_set_glyph();
    517   1.1       oki 			return 0;
    518   1.1       oki 		} else
    519   1.1       oki 			return EFAULT;
    520   1.1       oki 
    521   1.1       oki 	case ITETVCTRL:
    522  1.14   minoura 		if (addr && *(u_int8_t *)addr < 0x40) {
    523  1.49     isaki 			return mfp_send_usart(* (u_int8_t *)addr);
    524  1.14   minoura 		} else {
    525   1.1       oki 			return EFAULT;
    526  1.14   minoura 		}
    527   1.1       oki #endif
    528   1.1       oki 	}
    529  1.28    atatat 	return (EPASSTHROUGH);
    530   1.1       oki }
    531   1.1       oki 
    532  1.49     isaki void
    533  1.38       chs itestart(struct tty *tp)
    534   1.1       oki {
    535   1.1       oki 	struct clist *rbp;
    536   1.1       oki 	struct ite_softc *ip;
    537   1.1       oki 	u_char buf[ITEBURST];
    538  1.16   minoura 	int s, len;
    539   1.1       oki 
    540   1.1       oki 	ip = getitesp(tp->t_dev);
    541   1.1       oki 	/*
    542   1.1       oki 	 * (Potentially) lower priority.  We only need to protect ourselves
    543   1.1       oki 	 * from keyboard interrupts since that is all that can affect the
    544   1.6  christos 	 * state of our tty (kernel printf doesn't go through this routine).
    545   1.1       oki 	 */
    546   1.1       oki 	s = spltty();
    547   1.1       oki 	if (tp->t_state & (TS_TIMEOUT | TS_BUSY | TS_TTSTOP))
    548   1.1       oki 		goto out;
    549   1.1       oki 	tp->t_state |= TS_BUSY;
    550   1.1       oki 	rbp = &tp->t_outq;
    551   1.1       oki 	len = q_to_b(rbp, buf, ITEBURST);
    552   1.1       oki 	/*splx(s);*/
    553   1.1       oki 
    554   1.1       oki 	/* Here is a really good place to implement pre/jumpscroll() */
    555   1.1       oki 	ite_putstr(buf, len, tp->t_dev);
    556   1.1       oki 
    557   1.1       oki 	/*s = spltty();*/
    558   1.1       oki 	tp->t_state &= ~TS_BUSY;
    559   1.1       oki 	/* we have characters remaining. */
    560   1.1       oki 	if (rbp->c_cc) {
    561   1.1       oki 		tp->t_state |= TS_TIMEOUT;
    562  1.52     joerg 		callout_schedule(&tp->t_rstrt_ch, 1);
    563   1.1       oki 	}
    564   1.1       oki 	/* wakeup we are below */
    565   1.1       oki 	if (rbp->c_cc <= tp->t_lowat) {
    566   1.1       oki 		if (tp->t_state & TS_ASLEEP) {
    567   1.1       oki 			tp->t_state &= ~TS_ASLEEP;
    568  1.48  christos 			wakeup((void *)rbp);
    569   1.1       oki 		}
    570   1.1       oki 		selwakeup(&tp->t_wsel);
    571   1.1       oki 	}
    572   1.1       oki out:
    573   1.1       oki 	splx(s);
    574   1.1       oki }
    575   1.1       oki 
    576   1.1       oki /* XXX called after changes made in underlying grf layer. */
    577   1.1       oki /* I want to nuke this */
    578  1.49     isaki void
    579  1.38       chs ite_reinit(dev_t dev)
    580   1.1       oki {
    581   1.1       oki 	struct ite_softc *ip;
    582   1.4       oki 	int unit = UNIT(dev);
    583   1.4       oki 
    584   1.4       oki 	/* XXX check whether when call from grf.c */
    585  1.12   minoura 	if (unit < 0 || unit >= ite_cd.cd_ndevs ||
    586  1.12   minoura 	    (ip = getitesp(unit)) == NULL)
    587   1.4       oki 		return;
    588   1.1       oki 
    589   1.1       oki 	ip->flags &= ~ITE_INITED;
    590   1.1       oki 	iteinit(dev);
    591   1.1       oki }
    592   1.1       oki 
    593  1.49     isaki void
    594  1.38       chs ite_reset(struct ite_softc *ip)
    595   1.1       oki {
    596   1.1       oki 	int i;
    597   1.1       oki 
    598   1.1       oki 	ip->curx = 0;
    599   1.1       oki 	ip->cury = 0;
    600   1.1       oki 	ip->attribute = 0;
    601   1.1       oki 	ip->save_curx = 0;
    602   1.1       oki 	ip->save_cury = 0;
    603   1.1       oki 	ip->save_attribute = 0;
    604   1.1       oki 	ip->ap = ip->argbuf;
    605   1.1       oki 	ip->emul_level = EMUL_VT300_8;
    606   1.1       oki 	ip->eightbit_C1 = 0;
    607   1.1       oki 	ip->top_margin = 0;
    608   1.1       oki 	ip->bottom_margin = ip->rows - 1;
    609   1.1       oki 	ip->inside_margins = 0; /* origin mode == absolute */
    610   1.1       oki 	ip->linefeed_newline = 0;
    611   1.1       oki 	ip->auto_wrap = 1;
    612   1.1       oki 	ip->cursor_appmode = 0;
    613   1.1       oki 	ip->keypad_appmode = 0;
    614   1.1       oki 	ip->imode = 0;
    615   1.1       oki 	ip->key_repeat = 1;
    616   1.1       oki 	ip->G0 = CSET_ASCII;
    617   1.1       oki 	ip->G1 = CSET_JIS1983;
    618   1.1       oki 	ip->G2 = CSET_JISKANA;
    619   1.1       oki 	ip->G3 = CSET_JIS1990;
    620   1.1       oki 	ip->GL = &ip->G0;
    621   1.1       oki 	ip->GR = &ip->G1;
    622   1.1       oki 	ip->save_GL = 0;
    623   1.1       oki 	ip->save_char = 0;
    624   1.1       oki 	ip->fgcolor = 7;
    625   1.1       oki 	ip->bgcolor = 0;
    626   1.1       oki 	for (i = 0; i < ip->cols; i++)
    627   1.1       oki 		ip->tabs[i] = ((i & 7) == 0);
    628   1.1       oki 	/* XXX clear screen */
    629   1.1       oki 	SUBR_CLEAR(ip, 0, 0, ip->rows, ip->cols);
    630   1.1       oki 	attrclr(ip, 0, 0, ip->rows, ip->cols);
    631   1.1       oki }
    632   1.1       oki 
    633   1.1       oki /* Used in console at startup only */
    634   1.1       oki int
    635  1.49     isaki ite_cnfilter(u_char c)
    636   1.1       oki {
    637   1.1       oki 	static u_char mod = 0;
    638   1.1       oki 	struct key key;
    639   1.1       oki 	u_char code, up, mask;
    640  1.16   minoura 	int s;
    641   1.1       oki 
    642   1.1       oki 	up = c & 0x80 ? 1 : 0;
    643   1.1       oki 	c &= 0x7f;
    644   1.1       oki 	code = 0;
    645   1.1       oki 
    646   1.1       oki 	s = spltty();
    647   1.1       oki 
    648   1.1       oki 	mask = 0;
    649   1.1       oki 	if (c >= KBD_LEFT_ALT && !(c >= 0x63 && c <= 0x6c)) {	/* 0x63: F1, 0x6c:F10 */
    650   1.1       oki 		switch (c) {
    651   1.1       oki 		case KBD_LEFT_SHIFT:
    652   1.1       oki 			mask = KBD_MOD_SHIFT;
    653   1.1       oki 			break;
    654   1.1       oki 
    655   1.1       oki 		case KBD_LEFT_ALT:
    656   1.1       oki 			mask = KBD_MOD_LALT;
    657   1.1       oki 			break;
    658   1.1       oki 
    659   1.1       oki 		case KBD_RIGHT_ALT:
    660   1.1       oki 			mask = KBD_MOD_RALT;
    661   1.1       oki 			break;
    662   1.1       oki 
    663   1.1       oki 		case KBD_LEFT_META:
    664   1.1       oki 			mask = KBD_MOD_LMETA;
    665   1.1       oki 			break;
    666   1.1       oki 
    667   1.1       oki 		case KBD_RIGHT_META:
    668   1.1       oki 			mask = KBD_MOD_RMETA;
    669   1.1       oki 			break;
    670   1.1       oki 
    671  1.49     isaki 		case KBD_CAPS_LOCK:
    672   1.1       oki 			/*
    673   1.1       oki 			 * capslock already behaves `right', don't need to
    674   1.1       oki 			 * keep track of the state in here.
    675   1.1       oki 			 */
    676   1.1       oki 			mask = KBD_MOD_CAPS;
    677   1.1       oki 			break;
    678   1.1       oki 
    679   1.1       oki 		case KBD_CTRL:
    680   1.1       oki 			mask = KBD_MOD_CTRL;
    681   1.1       oki 			break;
    682   1.1       oki 
    683   1.1       oki 		case KBD_RECONNECT:
    684   1.1       oki 			/* ite got 0xff */
    685   1.1       oki 			if (up)
    686   1.1       oki 				kbd_setLED();
    687   1.1       oki 			break;
    688   1.1       oki 		}
    689   1.1       oki 		if (mask & KBD_MOD_CAPS) {
    690   1.1       oki 			if (!up) {
    691   1.1       oki 				mod ^= KBD_MOD_CAPS;
    692   1.1       oki 				kbdled ^= LED_CAPS_LOCK;
    693   1.1       oki 				kbd_setLED();
    694   1.1       oki 			}
    695   1.1       oki 		} else if (up)
    696   1.1       oki 			mod &= ~mask;
    697   1.1       oki 		else mod |= mask;
    698  1.49     isaki 		splx(s);
    699   1.1       oki 		return -1;
    700   1.1       oki 	}
    701   1.1       oki 
    702   1.1       oki 	if (up) {
    703   1.1       oki 		splx(s);
    704   1.1       oki 		return -1;
    705   1.1       oki 	}
    706   1.1       oki 
    707   1.1       oki 	/* translate modifiers */
    708   1.1       oki 	if (mod & KBD_MOD_SHIFT) {
    709   1.1       oki 		if (mod & KBD_MOD_ALT)
    710   1.1       oki 			key = kbdmap.alt_shift_keys[c];
    711  1.50     isaki 		else
    712   1.1       oki 			key = kbdmap.shift_keys[c];
    713   1.1       oki 	} else if (mod & KBD_MOD_ALT)
    714   1.1       oki 		key = kbdmap.alt_keys[c];
    715   1.1       oki 	else {
    716   1.1       oki 		key = kbdmap.keys[c];
    717   1.1       oki 		/* if CAPS and key is CAPable (no pun intended) */
    718   1.1       oki 		if ((mod & KBD_MOD_CAPS) && (key.mode & KBD_MODE_CAPS))
    719   1.1       oki 			key = kbdmap.shift_keys[c];
    720   1.1       oki 	}
    721   1.1       oki 	code = key.code;
    722   1.1       oki 
    723   1.1       oki 	/* if string return */
    724   1.1       oki 	if (key.mode & (KBD_MODE_STRING | KBD_MODE_KPAD)) {
    725   1.1       oki 		splx(s);
    726   1.1       oki 		return -1;
    727   1.1       oki 	}
    728   1.1       oki 	/* handle dead keys */
    729   1.1       oki 	if (key.mode & KBD_MODE_DEAD) {
    730   1.1       oki 		splx(s);
    731   1.1       oki 		return -1;
    732   1.1       oki 	}
    733   1.1       oki 	if (mod & KBD_MOD_CTRL)
    734   1.1       oki 		code &= 0x1f;
    735   1.1       oki 	if (mod & KBD_MOD_META)
    736   1.1       oki 		code |= 0x80;
    737   1.1       oki 
    738   1.1       oki 	/* do console mapping. */
    739   1.1       oki 	code = code == '\r' ? '\n' : code;
    740   1.1       oki 
    741   1.1       oki 	splx(s);
    742   1.1       oki 	return (code);
    743   1.1       oki }
    744   1.1       oki 
    745   1.1       oki /* And now the old stuff. */
    746  1.49     isaki inline static void
    747  1.38       chs itesendch(int ch)
    748   1.1       oki {
    749  1.24   minoura 	(*kbd_tty->t_linesw->l_rint)(ch, kbd_tty);
    750   1.1       oki }
    751   1.1       oki 
    752   1.1       oki 
    753   1.1       oki void
    754  1.49     isaki ite_filter(u_char c)
    755   1.1       oki {
    756   1.1       oki 	static u_short mod = 0;
    757  1.38       chs 	unsigned char code, *str;
    758   1.1       oki 	u_short up, mask;
    759   1.1       oki 	struct key key;
    760   1.1       oki 	int s, i;
    761   1.1       oki 
    762  1.44   thorpej 	if (!kbd_ite || !(kbd_tty = ite_tty[device_unit(&kbd_ite->device)]))
    763   1.1       oki 		return;
    764   1.1       oki 
    765   1.1       oki 	/* have to make sure we're at spltty in here */
    766  1.49     isaki 	s = spltty();
    767   1.1       oki 
    768   1.1       oki 	up = c & 0x80 ? 1 : 0;
    769   1.1       oki 	c &= 0x7f;
    770   1.1       oki 	code = 0;
    771  1.50     isaki 
    772   1.1       oki 	mask = 0;
    773   1.1       oki 	if (c >= KBD_LEFT_ALT &&
    774   1.1       oki 	    !(c >= 0x63 && c <= 0x6c)) {	/* 0x63: F1, 0x6c:F10 */
    775   1.1       oki 		switch (c) {
    776   1.1       oki 		case KBD_LEFT_SHIFT:
    777   1.1       oki 			mask = KBD_MOD_SHIFT;
    778   1.1       oki 			break;
    779   1.1       oki 
    780   1.1       oki 		case KBD_LEFT_ALT:
    781   1.1       oki 			mask = KBD_MOD_LALT;
    782   1.1       oki 			break;
    783  1.49     isaki 
    784   1.1       oki 		case KBD_RIGHT_ALT:
    785   1.1       oki 			mask = KBD_MOD_RALT;
    786   1.1       oki 			break;
    787  1.49     isaki 
    788   1.1       oki 		case KBD_LEFT_META:
    789   1.1       oki 			mask = KBD_MOD_LMETA;
    790   1.1       oki 			break;
    791   1.1       oki 
    792   1.1       oki 		case KBD_RIGHT_META:
    793   1.1       oki 			mask = KBD_MOD_RMETA;
    794   1.1       oki 			break;
    795   1.1       oki 
    796   1.1       oki 		case KBD_CAPS_LOCK:
    797   1.1       oki 			/*
    798   1.1       oki 			 * capslock already behaves `right', don't need to keep
    799   1.1       oki 			 * track of the state in here.
    800   1.1       oki 			 */
    801   1.1       oki 			mask = KBD_MOD_CAPS;
    802   1.1       oki 			break;
    803   1.1       oki 
    804   1.1       oki 		case KBD_CTRL:
    805   1.1       oki 			mask = KBD_MOD_CTRL;
    806   1.1       oki 			break;
    807   1.1       oki 
    808   1.1       oki 		case KBD_OPT1:
    809   1.1       oki 			mask = KBD_MOD_OPT1;
    810   1.1       oki 			break;
    811   1.1       oki 
    812   1.1       oki 		case KBD_OPT2:
    813   1.1       oki 			mask = KBD_MOD_OPT2;
    814   1.1       oki 			break;
    815   1.1       oki 
    816   1.1       oki 		case KBD_RECONNECT:
    817   1.1       oki 			if (up) { /* ite got 0xff */
    818   1.1       oki 				kbd_setLED();
    819   1.1       oki 			}
    820   1.1       oki 			break;
    821   1.1       oki 		}
    822   1.1       oki 
    823   1.1       oki 		if (mask & KBD_MOD_CAPS) {
    824   1.1       oki 			if (!up) {
    825   1.1       oki 				mod ^= KBD_MOD_CAPS;
    826   1.1       oki 				kbdled ^= LED_CAPS_LOCK;
    827   1.1       oki 				kbd_setLED();
    828   1.1       oki 			}
    829   1.1       oki 		} else if (up) {
    830   1.1       oki 			mod &= ~mask;
    831   1.1       oki 		} else mod |= mask;
    832   1.1       oki 
    833   1.1       oki 		/*
    834   1.1       oki 		 * return even if it wasn't a modifier key, the other
    835   1.1       oki 		 * codes up here are either special (like reset warning),
    836   1.1       oki 		 * or not yet defined
    837   1.1       oki 		 */
    838  1.49     isaki 		splx(s);
    839   1.1       oki 		return;
    840   1.1       oki 	}
    841   1.1       oki 
    842   1.1       oki 	if (up) {
    843  1.49     isaki 		splx(s);
    844   1.1       oki 		return;
    845   1.1       oki 	}
    846   1.1       oki 
    847   1.1       oki 	/*
    848   1.1       oki 	 * intercept LAlt-LMeta-F1 here to switch back to original ascii-keymap.
    849   1.1       oki 	 * this should probably be configurable..
    850   1.1       oki 	 */
    851  1.16   minoura 	if (mod == (KBD_MOD_LALT|KBD_MOD_LMETA) && c == 0x63) {
    852  1.27       wiz 		memcpy(&kbdmap, &ascii_kbdmap, sizeof(struct kbdmap));
    853  1.49     isaki 		splx(s);
    854   1.1       oki 		return;
    855   1.1       oki 	}
    856   1.1       oki 
    857   1.1       oki 	/* translate modifiers */
    858   1.1       oki 	if (mod & KBD_MOD_SHIFT) {
    859   1.1       oki 		if (mod & KBD_MOD_ALT)
    860   1.1       oki 			key = kbdmap.alt_shift_keys[c];
    861  1.50     isaki 		else
    862   1.1       oki 			key = kbdmap.shift_keys[c];
    863   1.1       oki 	} else if (mod & KBD_MOD_ALT)
    864   1.1       oki 		key = kbdmap.alt_keys[c];
    865   1.1       oki 	else {
    866   1.1       oki 		key = kbdmap.keys[c];
    867   1.1       oki 		/* if CAPS and key is CAPable (no pun intended) */
    868   1.1       oki 		if ((mod & KBD_MOD_CAPS) && (key.mode & KBD_MODE_CAPS))
    869   1.1       oki 			key = kbdmap.shift_keys[c];
    870   1.1       oki 		else if ((mod & KBD_MOD_OPT2) && (key.mode & KBD_MODE_KPAD))
    871   1.1       oki 			key = kbdmap.shift_keys[c];
    872   1.1       oki 	}
    873   1.1       oki 	code = key.code;
    874  1.50     isaki 
    875   1.1       oki 	/* handle dead keys */
    876   1.1       oki 	if (key.mode & KBD_MODE_DEAD) {
    877  1.49     isaki 		splx(s);
    878   1.1       oki 		return;
    879   1.1       oki 	}
    880  1.50     isaki 	/* if not string, apply META and CTRL modifiers */
    881  1.50     isaki 	if (! (key.mode & KBD_MODE_STRING)
    882   1.1       oki 	    && (!(key.mode & KBD_MODE_KPAD) ||
    883   1.1       oki 		(kbd_ite && !kbd_ite->keypad_appmode))) {
    884   1.1       oki 		if ((mod & KBD_MOD_CTRL) &&
    885   1.1       oki 		    (code == ' ' || (code >= '@' && code <= 'z')))
    886   1.1       oki 			code &= 0x1f;
    887   1.1       oki 		if (mod & KBD_MOD_META)
    888   1.1       oki 			code |= 0x80;
    889   1.1       oki 	} else if ((key.mode & KBD_MODE_KPAD) &&
    890   1.1       oki 	       (kbd_ite && kbd_ite->keypad_appmode)) {
    891  1.36  jdolecek 		static const char * const in = "0123456789-+.\r()/*";
    892  1.36  jdolecek 		static const char * const out = "pqrstuvwxymlnMPQRS";
    893  1.36  jdolecek 		char *cp = strchr(in, code);
    894   1.1       oki 
    895  1.50     isaki 		/*
    896   1.1       oki 		 * keypad-appmode sends SS3 followed by the above
    897   1.1       oki 		 * translated character
    898   1.1       oki 		 */
    899  1.49     isaki 		(*kbd_tty->t_linesw->l_rint)(27, kbd_tty);
    900  1.49     isaki 		(*kbd_tty->t_linesw->l_rint)('O', kbd_tty);
    901  1.49     isaki 		(*kbd_tty->t_linesw->l_rint)(out[cp - in], kbd_tty);
    902   1.1       oki 		splx(s);
    903   1.1       oki 		return;
    904   1.1       oki 	} else {
    905   1.1       oki 		/* *NO* I don't like this.... */
    906   1.1       oki 		static u_char app_cursor[] =
    907   1.1       oki 		{
    908   1.1       oki 		  3, 27, 'O', 'A',
    909   1.1       oki 		  3, 27, 'O', 'B',
    910   1.1       oki 		  3, 27, 'O', 'C',
    911   1.1       oki 		  3, 27, 'O', 'D'};
    912   1.1       oki 
    913   1.1       oki 		str = kbdmap.strings + code;
    914  1.50     isaki 		/*
    915   1.1       oki 		 * if this is a cursor key, AND it has the default
    916   1.1       oki 		 * keymap setting, AND we're in app-cursor mode, switch
    917   1.1       oki 		 * to the above table. This is *nasty* !
    918   1.1       oki 		 */
    919   1.1       oki 		if (c >= 0x3b && c <= 0x3e && kbd_ite->cursor_appmode
    920  1.27       wiz 		    && !memcmp(str, "\x03\x1b[", 3) &&
    921  1.36  jdolecek 		    strchr("ABCD", str[3]))
    922   1.1       oki 			str = app_cursor + 4 * (str[3] - 'A');
    923   1.1       oki 
    924  1.50     isaki 		/*
    925   1.1       oki 		 * using a length-byte instead of 0-termination allows
    926   1.1       oki 		 * to embed \0 into strings, although this is not used
    927   1.1       oki 		 * in the default keymap
    928   1.1       oki 		 */
    929   1.1       oki 		for (i = *str++; i; i--)
    930  1.49     isaki 			(*kbd_tty->t_linesw->l_rint)(*str++, kbd_tty);
    931   1.1       oki 		splx(s);
    932   1.1       oki 		return;
    933   1.1       oki 	}
    934  1.24   minoura 	(*kbd_tty->t_linesw->l_rint)(code, kbd_tty);
    935   1.1       oki 
    936   1.1       oki 	splx(s);
    937   1.1       oki 	return;
    938   1.1       oki }
    939   1.1       oki 
    940   1.1       oki /* helper functions, makes the code below more readable */
    941  1.49     isaki inline static void
    942  1.40        he ite_sendstr(struct ite_softc *ip, const char *str)
    943   1.1       oki {
    944   1.1       oki 	while (*str)
    945  1.49     isaki 		itesendch(*str++);
    946   1.1       oki }
    947   1.1       oki 
    948  1.49     isaki inline static void
    949  1.38       chs alignment_display(struct ite_softc *ip)
    950   1.1       oki {
    951   1.1       oki 	int i, j;
    952   1.1       oki 
    953   1.1       oki 	for (j = 0; j < ip->rows; j++)
    954   1.1       oki 		for (i = 0; i < ip->cols; i++)
    955   1.1       oki 			SUBR_PUTC(ip, 'E', j, i, ATTR_NOR);
    956   1.1       oki 	attrclr(ip, 0, 0, ip->rows, ip->cols);
    957   1.1       oki }
    958   1.1       oki 
    959  1.49     isaki inline static void
    960  1.38       chs snap_cury(struct ite_softc *ip)
    961   1.1       oki {
    962   1.1       oki 	if (ip->inside_margins) {
    963   1.1       oki 		if (ip->cury < ip->top_margin)
    964   1.1       oki 			ip->cury = ip->top_margin;
    965   1.1       oki 		if (ip->cury > ip->bottom_margin)
    966   1.1       oki 			ip->cury = ip->bottom_margin;
    967   1.1       oki 	}
    968   1.1       oki }
    969   1.1       oki 
    970  1.49     isaki inline static void
    971  1.38       chs ite_dnchar(struct ite_softc *ip, int n)
    972   1.1       oki {
    973   1.1       oki 	n = min(n, ip->cols - ip->curx);
    974   1.1       oki 	if (n < ip->cols - ip->curx) {
    975   1.1       oki 		SUBR_SCROLL(ip, ip->cury, ip->curx + n, n, SCROLL_LEFT);
    976   1.1       oki 		attrmov(ip, ip->cury, ip->curx + n, ip->cury, ip->curx,
    977   1.1       oki 			1, ip->cols - ip->curx - n);
    978   1.1       oki 		attrclr(ip, ip->cury, ip->cols - n, 1, n);
    979   1.1       oki 	}
    980   1.1       oki 	while (n-- > 0)
    981   1.1       oki 		SUBR_PUTC(ip, ' ', ip->cury, ip->cols - n - 1, ATTR_NOR);
    982   1.1       oki }
    983   1.1       oki 
    984  1.49     isaki static void
    985  1.38       chs ite_inchar(struct ite_softc *ip, int n)
    986   1.1       oki {
    987   1.1       oki 	int c = ip->save_char;
    988   1.1       oki 	ip->save_char = 0;
    989   1.1       oki 	n = min(n, ip->cols - ip->curx);
    990   1.1       oki 	if (n < ip->cols - ip->curx) {
    991   1.1       oki 		SUBR_SCROLL(ip, ip->cury, ip->curx, n, SCROLL_RIGHT);
    992   1.1       oki 		attrmov(ip, ip->cury, ip->curx, ip->cury, ip->curx + n,
    993   1.1       oki 			1, ip->cols - ip->curx - n);
    994   1.1       oki 		attrclr(ip, ip->cury, ip->curx, 1, n);
    995   1.1       oki 	}
    996   1.1       oki 	while (n--)
    997   1.1       oki 		SUBR_PUTC(ip, ' ', ip->cury, ip->curx + n, ATTR_NOR);
    998   1.1       oki 	ip->save_char = c;
    999   1.1       oki }
   1000   1.1       oki 
   1001  1.49     isaki inline static void
   1002  1.38       chs ite_clrtoeol(struct ite_softc *ip)
   1003   1.1       oki {
   1004   1.1       oki 	int y = ip->cury, x = ip->curx;
   1005   1.1       oki 	if (ip->cols - x > 0) {
   1006   1.1       oki 		SUBR_CLEAR(ip, y, x, 1, ip->cols - x);
   1007   1.1       oki 		attrclr(ip, y, x, 1, ip->cols - x);
   1008   1.1       oki 	}
   1009   1.1       oki }
   1010   1.1       oki 
   1011  1.49     isaki inline static void
   1012  1.38       chs ite_clrtobol(struct ite_softc *ip)
   1013   1.1       oki {
   1014   1.1       oki 	int y = ip->cury, x = min(ip->curx + 1, ip->cols);
   1015   1.1       oki 	SUBR_CLEAR(ip, y, 0, 1, x);
   1016   1.1       oki 	attrclr(ip, y, 0, 1, x);
   1017   1.1       oki }
   1018   1.1       oki 
   1019  1.49     isaki inline static void
   1020  1.38       chs ite_clrline(struct ite_softc *ip)
   1021   1.1       oki {
   1022   1.1       oki 	int y = ip->cury;
   1023   1.1       oki 	SUBR_CLEAR(ip, y, 0, 1, ip->cols);
   1024   1.1       oki 	attrclr(ip, y, 0, 1, ip->cols);
   1025   1.1       oki }
   1026   1.1       oki 
   1027  1.49     isaki inline static void
   1028  1.38       chs ite_clrtoeos(struct ite_softc *ip)
   1029   1.1       oki {
   1030   1.1       oki 	ite_clrtoeol(ip);
   1031   1.1       oki 	if (ip->cury < ip->rows - 1) {
   1032   1.1       oki 		SUBR_CLEAR(ip, ip->cury + 1, 0, ip->rows - 1 - ip->cury, ip->cols);
   1033   1.1       oki 		attrclr(ip, ip->cury, 0, ip->rows - ip->cury, ip->cols);
   1034   1.1       oki 	}
   1035   1.1       oki }
   1036   1.1       oki 
   1037  1.49     isaki inline static void
   1038  1.38       chs ite_clrtobos(struct ite_softc *ip)
   1039   1.1       oki {
   1040   1.1       oki 	ite_clrtobol(ip);
   1041   1.1       oki 	if (ip->cury > 0) {
   1042   1.1       oki 		SUBR_CLEAR(ip, 0, 0, ip->cury, ip->cols);
   1043   1.1       oki 		attrclr(ip, 0, 0, ip->cury, ip->cols);
   1044   1.1       oki 	}
   1045   1.1       oki }
   1046   1.1       oki 
   1047  1.49     isaki inline static void
   1048  1.38       chs ite_clrscreen(struct ite_softc *ip)
   1049   1.1       oki {
   1050   1.1       oki 	SUBR_CLEAR(ip, 0, 0, ip->rows, ip->cols);
   1051   1.1       oki 	attrclr(ip, 0, 0, ip->rows, ip->cols);
   1052   1.1       oki }
   1053   1.1       oki 
   1054   1.1       oki 
   1055   1.1       oki 
   1056  1.49     isaki inline static void
   1057  1.38       chs ite_dnline(struct ite_softc *ip, int n)
   1058   1.1       oki {
   1059   1.1       oki 	/*
   1060   1.1       oki 	 * interesting.. if the cursor is outside the scrolling
   1061   1.1       oki 	 * region, this command is simply ignored..
   1062   1.1       oki 	 */
   1063   1.1       oki 	if (ip->cury < ip->top_margin || ip->cury > ip->bottom_margin)
   1064   1.1       oki 		return;
   1065   1.1       oki 
   1066   1.1       oki 	n = min(n, ip->bottom_margin + 1 - ip->cury);
   1067   1.1       oki 	if (n <= ip->bottom_margin - ip->cury) {
   1068   1.1       oki 		SUBR_SCROLL(ip, ip->cury + n, 0, n, SCROLL_UP);
   1069   1.1       oki 		attrmov(ip, ip->cury + n, 0, ip->cury, 0,
   1070   1.1       oki 			ip->bottom_margin + 1 - ip->cury - n, ip->cols);
   1071   1.1       oki 	}
   1072   1.1       oki 	SUBR_CLEAR(ip, ip->bottom_margin - n + 1, 0, n, ip->cols);
   1073   1.1       oki 	attrclr(ip, ip->bottom_margin - n + 1, 0, n, ip->cols);
   1074   1.1       oki }
   1075   1.1       oki 
   1076  1.49     isaki inline static void
   1077  1.38       chs ite_inline(struct ite_softc *ip, int n)
   1078   1.1       oki {
   1079   1.1       oki 	/*
   1080   1.1       oki 	 * interesting.. if the cursor is outside the scrolling
   1081   1.1       oki 	 * region, this command is simply ignored..
   1082   1.1       oki 	 */
   1083   1.1       oki 	if (ip->cury < ip->top_margin || ip->cury > ip->bottom_margin)
   1084   1.1       oki 		return;
   1085   1.1       oki 
   1086   1.1       oki 	if (n <= 0)
   1087   1.1       oki 		n = 1;
   1088   1.1       oki 	else n = min(n, ip->bottom_margin + 1 - ip->cury);
   1089   1.1       oki 	if (n <= ip->bottom_margin  - ip->cury) {
   1090   1.1       oki 		SUBR_SCROLL(ip, ip->cury, 0, n, SCROLL_DOWN);
   1091   1.1       oki 		attrmov(ip, ip->cury, 0, ip->cury + n, 0,
   1092   1.1       oki 			ip->bottom_margin + 1 - ip->cury - n, ip->cols);
   1093   1.1       oki 	}
   1094   1.1       oki 	SUBR_CLEAR(ip, ip->cury, 0, n, ip->cols);
   1095   1.1       oki 	attrclr(ip, ip->cury, 0, n, ip->cols);
   1096   1.1       oki 	ip->curx = 0;
   1097   1.1       oki }
   1098   1.1       oki 
   1099  1.49     isaki inline static void
   1100  1.38       chs ite_index(struct ite_softc *ip)
   1101   1.1       oki {
   1102   1.1       oki 	++ip->cury;
   1103   1.1       oki 	if ((ip->cury == ip->bottom_margin+1) || (ip->cury == ip->rows)) {
   1104   1.1       oki 		ip->cury--;
   1105   1.1       oki 		SUBR_SCROLL(ip, ip->top_margin + 1, 0, 1, SCROLL_UP);
   1106   1.1       oki 		ite_clrline(ip);
   1107   1.1       oki 	}
   1108   1.1       oki 	/*clr_attr(ip, ATTR_INV);*/
   1109   1.1       oki }
   1110   1.1       oki 
   1111  1.49     isaki inline static void
   1112  1.38       chs ite_lf(struct ite_softc *ip)
   1113   1.1       oki {
   1114   1.1       oki 	++ip->cury;
   1115   1.1       oki 	if (ip->cury > ip->bottom_margin) {
   1116   1.1       oki 		ip->cury--;
   1117   1.1       oki 		SUBR_SCROLL(ip, ip->top_margin + 1, 0, 1, SCROLL_UP);
   1118   1.1       oki 		ite_clrline(ip);
   1119   1.1       oki 	}
   1120   1.1       oki /*	SUBR_CURSOR(ip, MOVE_CURSOR);*/
   1121   1.1       oki 	/*clr_attr(ip, ATTR_INV);*/
   1122   1.1       oki 	/* reset character set ... thanks for mohta. */
   1123   1.1       oki 	ip->G0 = CSET_ASCII;
   1124   1.1       oki 	ip->G1 = CSET_JIS1983;
   1125   1.1       oki 	ip->G2 = CSET_JISKANA;
   1126   1.1       oki 	ip->G3 = CSET_JIS1990;
   1127   1.1       oki 	ip->GL = &ip->G0;
   1128   1.1       oki 	ip->GR = &ip->G1;
   1129   1.1       oki 	ip->save_GL = 0;
   1130   1.1       oki 	ip->save_char = 0;
   1131   1.1       oki }
   1132   1.1       oki 
   1133  1.49     isaki inline static void
   1134  1.38       chs ite_crlf(struct ite_softc *ip)
   1135   1.1       oki {
   1136   1.1       oki 	ip->curx = 0;
   1137   1.1       oki 	ite_lf (ip);
   1138   1.1       oki }
   1139   1.1       oki 
   1140  1.49     isaki inline static void
   1141  1.38       chs ite_cr(struct ite_softc *ip)
   1142   1.1       oki {
   1143   1.1       oki 	if (ip->curx) {
   1144   1.1       oki 		ip->curx = 0;
   1145   1.1       oki 	}
   1146   1.1       oki }
   1147   1.1       oki 
   1148  1.49     isaki inline static void
   1149  1.38       chs ite_rlf(struct ite_softc *ip)
   1150   1.1       oki {
   1151   1.1       oki 	ip->cury--;
   1152   1.1       oki 	if ((ip->cury < 0) || (ip->cury == ip->top_margin - 1)) {
   1153   1.1       oki 		ip->cury++;
   1154   1.1       oki 		SUBR_SCROLL(ip, ip->top_margin, 0, 1, SCROLL_DOWN);
   1155   1.1       oki 		ite_clrline(ip);
   1156   1.1       oki 	}
   1157   1.1       oki 	clr_attr(ip, ATTR_INV);
   1158   1.1       oki }
   1159   1.1       oki 
   1160  1.49     isaki inline static int
   1161  1.38       chs atoi(const char *cp)
   1162   1.1       oki {
   1163   1.1       oki 	int n;
   1164   1.1       oki 
   1165   1.1       oki 	for (n = 0; *cp && *cp >= '0' && *cp <= '9'; cp++)
   1166   1.1       oki 		n = n * 10 + *cp - '0';
   1167   1.1       oki 	return n;
   1168   1.1       oki }
   1169   1.1       oki 
   1170  1.49     isaki inline static int
   1171  1.38       chs ite_argnum(struct ite_softc *ip)
   1172   1.1       oki {
   1173   1.1       oki 	char ch;
   1174   1.1       oki 	int n;
   1175   1.1       oki 
   1176   1.1       oki 	/* convert argument string into number */
   1177   1.1       oki 	if (ip->ap == ip->argbuf)
   1178   1.1       oki 		return 1;
   1179   1.1       oki 	ch = *ip->ap;
   1180   1.1       oki 	*ip->ap = 0;
   1181  1.49     isaki 	n = atoi(ip->argbuf);
   1182   1.1       oki 	*ip->ap = ch;
   1183   1.1       oki 
   1184   1.1       oki 	return n;
   1185   1.1       oki }
   1186   1.1       oki 
   1187  1.49     isaki inline static int
   1188  1.38       chs ite_zargnum(struct ite_softc *ip)
   1189   1.1       oki {
   1190   1.1       oki 	char ch;
   1191   1.1       oki 	int n;
   1192   1.1       oki 
   1193   1.1       oki 	/* convert argument string into number */
   1194   1.1       oki 	if (ip->ap == ip->argbuf)
   1195   1.1       oki 		return 0;
   1196   1.1       oki 	ch = *ip->ap;
   1197   1.1       oki 	*ip->ap = 0;	/* terminate string */
   1198  1.49     isaki 	n = atoi(ip->argbuf);
   1199   1.1       oki 	*ip->ap = ch;
   1200  1.50     isaki 
   1201   1.1       oki 	return n;	/* don't "n ? n : 1" here, <CSI>0m != <CSI>1m ! */
   1202   1.1       oki }
   1203   1.1       oki 
   1204   1.1       oki void
   1205  1.49     isaki ite_putstr(const u_char *s, int len, dev_t dev)
   1206   1.1       oki {
   1207   1.1       oki 	struct ite_softc *ip;
   1208   1.1       oki 	int i;
   1209   1.1       oki 
   1210   1.1       oki 	ip = getitesp(dev);
   1211   1.1       oki 
   1212   1.1       oki 	/* XXX avoid problems */
   1213   1.1       oki 	if ((ip->flags & (ITE_ACTIVE|ITE_INGRF)) != ITE_ACTIVE)
   1214   1.1       oki 	  	return;
   1215   1.1       oki 
   1216   1.1       oki 	SUBR_CURSOR(ip, START_CURSOROPT);
   1217   1.1       oki 	for (i = 0; i < len; i++)
   1218   1.1       oki 		if (s[i])
   1219   1.1       oki 			iteputchar(s[i], ip);
   1220   1.1       oki 	SUBR_CURSOR(ip, END_CURSOROPT);
   1221   1.1       oki }
   1222   1.1       oki 
   1223  1.49     isaki void
   1224  1.38       chs iteputchar(int c, struct ite_softc *ip)
   1225   1.1       oki {
   1226   1.1       oki 	int n, x, y;
   1227   1.1       oki 	char *cp;
   1228   1.1       oki 
   1229   1.1       oki 	if (c >= 0x20 && ip->escape) {
   1230   1.1       oki 		switch (ip->escape) {
   1231   1.1       oki 
   1232   1.1       oki 		case ESC:
   1233   1.1       oki 			switch (c) {
   1234   1.1       oki 				/* first 7bit equivalents for the 8bit control characters */
   1235  1.50     isaki 
   1236   1.1       oki 			case 'D':
   1237   1.1       oki 				c = IND;
   1238   1.1       oki 				ip->escape = 0;
   1239   1.1       oki 				break; /* and fall into the next switch below (same for all `break') */
   1240   1.1       oki 
   1241   1.1       oki 			case 'E':
   1242   1.1       oki 				/* next line */
   1243   1.1       oki 				c = NEL;
   1244   1.1       oki 				ip->escape = 0;
   1245   1.1       oki 				break;
   1246   1.1       oki 
   1247   1.1       oki 			case 'H':
   1248   1.1       oki 				/* set TAB at current col */
   1249   1.1       oki 				c = HTS;
   1250   1.1       oki 				ip->escape = 0;
   1251   1.1       oki 				break;
   1252   1.1       oki 
   1253   1.1       oki 			case 'M':
   1254   1.1       oki 				/* reverse index */
   1255   1.1       oki 				c = RI;
   1256   1.1       oki 				ip->escape = 0;
   1257   1.1       oki 				break;
   1258   1.1       oki 
   1259   1.1       oki 			case 'N':
   1260   1.1       oki 				/* single shift G2 */
   1261   1.1       oki 				c = SS2;
   1262   1.1       oki 				ip->escape = 0;
   1263   1.1       oki 				break;
   1264   1.1       oki 
   1265   1.1       oki 			case 'O':
   1266   1.1       oki 				/* single shift G3 */
   1267   1.1       oki 				c = SS3;
   1268   1.1       oki 				ip->escape = 0;
   1269   1.1       oki 				break;
   1270   1.1       oki 
   1271   1.1       oki 			case 'P':
   1272   1.1       oki 				/* DCS detected */
   1273   1.1       oki 				c = DCS;
   1274   1.1       oki 				ip->escape = 0;
   1275   1.1       oki 				break;
   1276   1.1       oki 
   1277   1.1       oki 			case '[':
   1278   1.1       oki 				c = CSI;
   1279   1.1       oki 				ip->escape = 0;
   1280   1.1       oki 				break;
   1281   1.1       oki 
   1282   1.1       oki 			case '\\':
   1283   1.1       oki 				/* String Terminator */
   1284   1.1       oki 				c = ST;
   1285   1.1       oki 				ip->escape = 0;
   1286   1.1       oki 				break;
   1287   1.1       oki 
   1288   1.1       oki 			case ']':
   1289   1.1       oki 				c = OSC;
   1290   1.1       oki 				ip->escape = 0;
   1291   1.1       oki 				break;
   1292   1.1       oki 
   1293   1.1       oki 			case '^':
   1294   1.1       oki 				c = PM;
   1295   1.1       oki 				ip->escape = 0;
   1296   1.1       oki 				break;
   1297   1.1       oki 
   1298   1.1       oki 			case '_':
   1299   1.1       oki 				c = APC;
   1300   1.1       oki 				ip->escape = 0;
   1301   1.1       oki 				break;
   1302   1.1       oki 
   1303   1.1       oki 
   1304   1.1       oki 			/* introduces 7/8bit control */
   1305   1.1       oki 			case ' ':
   1306   1.1       oki 				/* can be followed by either F or G */
   1307   1.1       oki 				ip->escape = ' ';
   1308   1.1       oki 				break;
   1309   1.1       oki 
   1310   1.1       oki 
   1311  1.50     isaki 			/* a lot of character set selections, not yet used...
   1312   1.1       oki 			   94-character sets: */
   1313   1.1       oki 			case '(':	/* G0 */
   1314   1.1       oki 			case ')':	/* G1 */
   1315   1.1       oki 				ip->escape = c;
   1316   1.1       oki 				return;
   1317   1.1       oki 
   1318   1.1       oki 			case '*':	/* G2 */
   1319   1.1       oki 			case '+':	/* G3 */
   1320   1.1       oki 			case 'B':	/* ASCII */
   1321   1.1       oki 			case 'A':	/* ISO latin 1 */
   1322   1.1       oki 			case '<':	/* user preferred suplemental */
   1323   1.1       oki 			case '0':	/* dec special graphics */
   1324   1.1       oki 
   1325   1.1       oki 			/* 96-character sets: */
   1326   1.1       oki 			case '-':	/* G1 */
   1327   1.1       oki 			case '.':	/* G2 */
   1328   1.1       oki 			case '/':	/* G3 */
   1329   1.1       oki 
   1330   1.1       oki 			/* national character sets: */
   1331   1.1       oki 			case '4':	/* dutch */
   1332   1.1       oki 			case '5':
   1333   1.1       oki 			case 'C':	/* finnish */
   1334   1.1       oki 			case 'R':	/* french */
   1335   1.1       oki 			case 'Q':	/* french canadian */
   1336   1.1       oki 			case 'K':	/* german */
   1337   1.1       oki 			case 'Y':	/* italian */
   1338   1.1       oki 			case '6':	/* norwegian/danish */
   1339   1.1       oki 			/* note: %5 and %6 are not supported (two chars..) */
   1340   1.1       oki 
   1341   1.1       oki 				ip->escape = 0;
   1342   1.1       oki 				/* just ignore for now */
   1343   1.1       oki 				return;
   1344   1.1       oki 
   1345   1.1       oki 			/* 94-multibyte character sets designate */
   1346   1.1       oki 			case '$':
   1347   1.1       oki 				ip->escape = '$';
   1348   1.1       oki 				return;
   1349   1.1       oki 
   1350   1.1       oki 			/* locking shift modes */
   1351   1.1       oki 			case '`':
   1352   1.1       oki 				ip->GR = &ip->G1;
   1353   1.1       oki 				ip->escape = 0;
   1354   1.1       oki 				return;
   1355   1.1       oki 
   1356   1.1       oki 			case 'n':
   1357   1.1       oki 				ip->GL = &ip->G2;
   1358   1.1       oki 				ip->escape = 0;
   1359   1.1       oki 				return;
   1360   1.1       oki 
   1361   1.1       oki 			case '}':
   1362   1.1       oki 				ip->GR = &ip->G2;
   1363   1.1       oki 				ip->escape = 0;
   1364   1.1       oki 				return;
   1365   1.1       oki 
   1366   1.1       oki 			case 'o':
   1367   1.1       oki 				ip->GL = &ip->G3;
   1368   1.1       oki 				ip->escape = 0;
   1369   1.1       oki 				return;
   1370   1.1       oki 
   1371   1.1       oki 			case '|':
   1372   1.1       oki 				ip->GR = &ip->G3;
   1373   1.1       oki 				ip->escape = 0;
   1374   1.1       oki 				return;
   1375   1.1       oki 
   1376   1.1       oki 			case '~':
   1377   1.1       oki 				ip->GR = &ip->G1;
   1378   1.1       oki 				ip->escape = 0;
   1379   1.1       oki 				return;
   1380   1.1       oki 
   1381   1.1       oki 			/* font width/height control */
   1382   1.1       oki 			case '#':
   1383   1.1       oki 				ip->escape = '#';
   1384   1.1       oki 				return;
   1385   1.1       oki 
   1386   1.1       oki 			case 'c':
   1387   1.1       oki 				/* hard terminal reset .. */
   1388  1.49     isaki 				ite_reset(ip);
   1389   1.1       oki 				SUBR_CURSOR(ip, MOVE_CURSOR);
   1390   1.1       oki 				ip->escape = 0;
   1391   1.1       oki 				return;
   1392   1.1       oki 
   1393   1.1       oki 
   1394   1.1       oki 			case '7':
   1395   1.1       oki 				/* save cursor */
   1396   1.1       oki 				ip->save_curx = ip->curx;
   1397   1.1       oki 				ip->save_cury = ip->cury;
   1398   1.1       oki 				ip->save_attribute = ip->attribute;
   1399   1.1       oki 				ip->sc_om = ip->inside_margins;
   1400   1.1       oki 				ip->sc_G0 = ip->G0;
   1401   1.1       oki 				ip->sc_G1 = ip->G1;
   1402   1.1       oki 				ip->sc_G2 = ip->G2;
   1403   1.1       oki 				ip->sc_G3 = ip->G3;
   1404   1.1       oki 				ip->sc_GL = ip->GL;
   1405   1.1       oki 				ip->sc_GR = ip->GR;
   1406   1.1       oki 				ip->escape = 0;
   1407   1.1       oki 				return;
   1408   1.1       oki 
   1409   1.1       oki 			case '8':
   1410   1.1       oki 				/* restore cursor */
   1411   1.1       oki 				ip->curx = ip->save_curx;
   1412   1.1       oki 				ip->cury = ip->save_cury;
   1413   1.1       oki 				ip->attribute = ip->save_attribute;
   1414   1.1       oki 				ip->inside_margins = ip->sc_om;
   1415   1.1       oki 				ip->G0 = ip->sc_G0;
   1416   1.1       oki 				ip->G1 = ip->sc_G1;
   1417   1.1       oki 				ip->G2 = ip->sc_G2;
   1418   1.1       oki 				ip->G3 = ip->sc_G3;
   1419   1.1       oki 				ip->GL = ip->sc_GL;
   1420   1.1       oki 				ip->GR = ip->sc_GR;
   1421   1.1       oki 				SUBR_CURSOR(ip, MOVE_CURSOR);
   1422   1.1       oki 				ip->escape = 0;
   1423   1.1       oki 				return;
   1424   1.1       oki 
   1425   1.1       oki 			case '=':
   1426   1.1       oki 				/* keypad application mode */
   1427   1.1       oki 				ip->keypad_appmode = 1;
   1428   1.1       oki 				ip->escape = 0;
   1429   1.1       oki 				return;
   1430   1.1       oki 
   1431   1.1       oki 			case '>':
   1432   1.1       oki 				/* keypad numeric mode */
   1433   1.1       oki 				ip->keypad_appmode = 0;
   1434   1.1       oki 				ip->escape = 0;
   1435   1.1       oki 				return;
   1436   1.1       oki 
   1437   1.1       oki 			case 'Z':	/* request ID */
   1438   1.1       oki 				if (ip->emul_level == EMUL_VT100)
   1439  1.49     isaki 					ite_sendstr(ip, "\033[61;0c"); /* XXX not clean */
   1440   1.1       oki 				else
   1441  1.49     isaki 					ite_sendstr(ip, "\033[63;0c"); /* XXX not clean */
   1442   1.1       oki 				ip->escape = 0;
   1443   1.1       oki 				return;
   1444   1.1       oki 
   1445   1.1       oki 			/* default catch all for not recognized ESC sequences */
   1446   1.1       oki 			default:
   1447   1.1       oki 				ip->escape = 0;
   1448   1.1       oki 				return;
   1449   1.1       oki 			}
   1450   1.1       oki 			break;
   1451   1.1       oki 
   1452   1.1       oki 
   1453   1.1       oki 		case '(': /* designate G0 */
   1454   1.1       oki 			switch (c) {
   1455   1.1       oki 			case 'B': /* USASCII */
   1456   1.1       oki 				ip->G0 = CSET_ASCII;
   1457   1.1       oki 				ip->escape = 0;
   1458   1.1       oki 				return;
   1459   1.1       oki 			case 'I':
   1460   1.1       oki 				ip->G0 = CSET_JISKANA;
   1461   1.1       oki 				ip->escape = 0;
   1462   1.1       oki 				return;
   1463   1.1       oki 			case 'J':
   1464   1.1       oki 				ip->G0 = CSET_JISROMA;
   1465   1.1       oki 				ip->escape = 0;
   1466   1.1       oki 				return;
   1467   1.1       oki 			case 'A': /* British or ISO-Latin-1 */
   1468   1.1       oki 			case 'H': /* Swedish */
   1469   1.1       oki 			case 'K': /* German */
   1470   1.1       oki 			case 'R': /* French */
   1471   1.1       oki 			case 'Y': /* Italian */
   1472   1.1       oki 			case 'Z': /* Spanish */
   1473   1.1       oki 			default:
   1474   1.1       oki 				/* not supported */
   1475   1.1       oki 				ip->escape = 0;
   1476   1.1       oki 				return;
   1477   1.1       oki 			}
   1478   1.1       oki 
   1479   1.1       oki 		case ')': /* designate G1 */
   1480   1.1       oki 			ip->escape = 0;
   1481   1.1       oki 			return;
   1482   1.1       oki 
   1483   1.1       oki 		case '$': /* 94-multibyte character set */
   1484   1.1       oki 			switch (c) {
   1485   1.1       oki 			case '@':
   1486   1.1       oki 				ip->G0 = CSET_JIS1978;
   1487   1.1       oki 				ip->escape = 0;
   1488   1.1       oki 				return;
   1489   1.1       oki 			case 'B':
   1490   1.1       oki 				ip->G0 = CSET_JIS1983;
   1491   1.1       oki 				ip->escape = 0;
   1492   1.1       oki 				return;
   1493   1.1       oki 			case 'D':
   1494   1.1       oki 				ip->G0 = CSET_JIS1990;
   1495   1.1       oki 				ip->escape = 0;
   1496   1.1       oki 				return;
   1497   1.1       oki 			default:
   1498   1.1       oki 				/* not supported */
   1499   1.1       oki 				ip->escape = 0;
   1500   1.1       oki 				return;
   1501   1.1       oki 			}
   1502   1.1       oki 
   1503   1.1       oki 		case ' ':
   1504   1.1       oki 			switch (c) {
   1505   1.1       oki 			case 'F':
   1506   1.1       oki 				ip->eightbit_C1 = 0;
   1507   1.1       oki 				ip->escape = 0;
   1508   1.1       oki 				return;
   1509   1.1       oki 
   1510   1.1       oki 			case 'G':
   1511   1.1       oki 				ip->eightbit_C1 = 1;
   1512   1.1       oki 				ip->escape = 0;
   1513   1.1       oki 				return;
   1514   1.1       oki 
   1515   1.1       oki 			default:
   1516   1.1       oki 				/* not supported */
   1517   1.1       oki 				ip->escape = 0;
   1518   1.1       oki 				return;
   1519   1.1       oki 			}
   1520   1.1       oki 			break;
   1521   1.1       oki 
   1522   1.1       oki 		case '#':
   1523   1.1       oki 			switch (c) {
   1524   1.1       oki 			case '5':
   1525   1.1       oki 				/* single height, single width */
   1526   1.1       oki 				ip->escape = 0;
   1527   1.1       oki 				return;
   1528   1.1       oki 
   1529   1.1       oki 			case '6':
   1530   1.1       oki 				/* double width, single height */
   1531   1.1       oki 				ip->escape = 0;
   1532   1.1       oki 				return;
   1533   1.1       oki 
   1534   1.1       oki 			case '3':
   1535   1.1       oki 				/* top half */
   1536   1.1       oki 				ip->escape = 0;
   1537   1.1       oki 				return;
   1538   1.1       oki 
   1539   1.1       oki 			case '4':
   1540   1.1       oki 				/* bottom half */
   1541   1.1       oki 				ip->escape = 0;
   1542   1.1       oki 				return;
   1543   1.1       oki 
   1544   1.1       oki 			case '8':
   1545   1.1       oki 				/* screen alignment pattern... */
   1546  1.49     isaki 				alignment_display(ip);
   1547   1.1       oki 				ip->escape = 0;
   1548   1.1       oki 				return;
   1549   1.1       oki 
   1550   1.1       oki 			default:
   1551   1.1       oki 				ip->escape = 0;
   1552   1.1       oki 				return;
   1553   1.1       oki 			}
   1554   1.1       oki 			break;
   1555   1.1       oki 
   1556   1.1       oki 
   1557   1.1       oki 
   1558   1.1       oki 		case CSI:
   1559   1.1       oki 			/* the biggie... */
   1560   1.1       oki 			switch (c) {
   1561   1.1       oki 			case '0': case '1': case '2': case '3': case '4':
   1562   1.1       oki 			case '5': case '6': case '7': case '8': case '9':
   1563   1.1       oki 			case ';': case '\"': case '$': case '>':
   1564   1.1       oki 				if (ip->ap < ip->argbuf + MAX_ARGSIZE)
   1565   1.1       oki 					*ip->ap++ = c;
   1566   1.1       oki 				return;
   1567   1.1       oki 
   1568   1.1       oki 			case 'p':
   1569   1.1       oki 				*ip->ap = 0;
   1570   1.1       oki 				if (!strncmp(ip->argbuf, "61\"", 3))
   1571   1.1       oki 					ip->emul_level = EMUL_VT100;
   1572   1.1       oki 				else if (!strncmp(ip->argbuf, "63;1\"", 5)
   1573   1.1       oki 					 || !strncmp(ip->argbuf, "62;1\"", 5))
   1574   1.1       oki 					ip->emul_level = EMUL_VT300_7;
   1575   1.1       oki 				else
   1576   1.1       oki 					ip->emul_level = EMUL_VT300_8;
   1577   1.1       oki 				ip->escape = 0;
   1578   1.1       oki 				return;
   1579   1.1       oki 
   1580   1.1       oki 
   1581   1.1       oki 			case '?':
   1582   1.1       oki 				*ip->ap = 0;
   1583   1.1       oki 				ip->escape = '?';
   1584   1.1       oki 				ip->ap = ip->argbuf;
   1585   1.1       oki 				return;
   1586   1.1       oki 
   1587   1.1       oki 
   1588   1.1       oki 			case 'c':
   1589   1.1       oki 				/* device attributes */
   1590   1.1       oki 				*ip->ap = 0;
   1591   1.1       oki 				if (ip->argbuf[0] == '>') {
   1592  1.49     isaki 					ite_sendstr(ip, "\033[>24;0;0;0c");
   1593   1.1       oki 				} else
   1594   1.1       oki 					switch (ite_zargnum(ip)) {
   1595   1.1       oki 					case 0:
   1596   1.1       oki 						/* primary DA request, send primary DA response */
   1597   1.1       oki 						if (ip->emul_level == EMUL_VT100)
   1598  1.49     isaki 							ite_sendstr(ip, "\033[?1;1c");
   1599   1.1       oki 						else
   1600  1.49     isaki 							ite_sendstr(ip, "\033[63;0c");
   1601   1.1       oki 						break;
   1602   1.1       oki 					}
   1603   1.1       oki 				ip->escape = 0;
   1604   1.1       oki 				return;
   1605   1.1       oki 
   1606   1.1       oki 			case 'n':
   1607   1.1       oki 				switch (ite_zargnum(ip)) {
   1608   1.1       oki 				case 5:
   1609  1.49     isaki 					ite_sendstr(ip, "\033[0n");	/* no malfunction */
   1610   1.1       oki 					break;
   1611   1.1       oki 				case 6:
   1612   1.1       oki 					/* cursor position report */
   1613  1.50     isaki 					sprintf(ip->argbuf, "\033[%d;%dR",
   1614   1.1       oki 						 ip->cury + 1, ip->curx + 1);
   1615  1.49     isaki 					ite_sendstr(ip, ip->argbuf);
   1616   1.1       oki 					break;
   1617   1.1       oki 				}
   1618   1.1       oki 				ip->escape = 0;
   1619   1.1       oki 				return;
   1620   1.1       oki 
   1621   1.1       oki 
   1622   1.1       oki 			case 'x':
   1623   1.1       oki 				switch (ite_zargnum(ip)) {
   1624   1.1       oki 				case 0:
   1625   1.1       oki 					/* Fake some terminal parameters.  */
   1626  1.49     isaki 					ite_sendstr(ip, "\033[2;1;1;112;112;1;0x");
   1627   1.1       oki 					break;
   1628   1.1       oki 				case 1:
   1629  1.49     isaki 					ite_sendstr(ip, "\033[3;1;1;112;112;1;0x");
   1630   1.1       oki 					break;
   1631   1.1       oki 				}
   1632   1.1       oki 				ip->escape = 0;
   1633   1.1       oki 				return;
   1634   1.1       oki 
   1635   1.1       oki 
   1636   1.1       oki 			case 'g':
   1637   1.1       oki 				/* clear tabs */
   1638   1.1       oki 				switch (ite_zargnum(ip)) {
   1639   1.1       oki 				case 0:
   1640   1.1       oki 					if (ip->curx < ip->cols)
   1641   1.1       oki 						ip->tabs[ip->curx] = 0;
   1642   1.1       oki 					break;
   1643   1.1       oki 				case 3:
   1644   1.1       oki 					for (n = 0; n < ip->cols; n++)
   1645   1.1       oki 						ip->tabs[n] = 0;
   1646   1.1       oki 					break;
   1647   1.1       oki 
   1648   1.1       oki 				default:
   1649   1.1       oki 					/* ignore */
   1650   1.1       oki 					break;
   1651   1.1       oki 				}
   1652   1.1       oki 				ip->escape = 0;
   1653   1.1       oki 				return;
   1654   1.1       oki 
   1655   1.1       oki 
   1656   1.1       oki 			case 'h': /* set mode */
   1657   1.1       oki 			case 'l': /* reset mode */
   1658  1.49     isaki 				n = ite_zargnum(ip);
   1659   1.1       oki 				switch (n) {
   1660   1.1       oki 				case 4:
   1661   1.1       oki 					ip->imode = (c == 'h');	/* insert/replace mode */
   1662   1.1       oki 					break;
   1663   1.1       oki 				case 20:
   1664   1.1       oki 					ip->linefeed_newline = (c == 'h');
   1665   1.1       oki 					break;
   1666   1.1       oki 				}
   1667   1.1       oki 				ip->escape = 0;
   1668   1.1       oki 				return;
   1669   1.1       oki 
   1670   1.1       oki 
   1671   1.1       oki 			case 'M':
   1672   1.1       oki 				/* delete line */
   1673  1.49     isaki 				ite_dnline(ip, ite_argnum(ip));
   1674   1.1       oki 				ip->escape = 0;
   1675   1.1       oki 				return;
   1676   1.1       oki 
   1677   1.1       oki 
   1678   1.1       oki 			case 'L':
   1679   1.1       oki 				/* insert line */
   1680  1.49     isaki 				ite_inline(ip, ite_argnum(ip));
   1681   1.1       oki 				ip->escape = 0;
   1682   1.1       oki 				return;
   1683   1.1       oki 
   1684   1.1       oki 
   1685   1.1       oki 			case 'P':
   1686   1.1       oki 				/* delete char */
   1687  1.49     isaki 				ite_dnchar(ip, ite_argnum(ip));
   1688   1.1       oki 				ip->escape = 0;
   1689   1.1       oki 				return;
   1690   1.1       oki 
   1691   1.1       oki 
   1692   1.1       oki 			case '@':
   1693   1.1       oki 				/* insert char(s) */
   1694  1.49     isaki 				ite_inchar(ip, ite_argnum(ip));
   1695   1.1       oki 				ip->escape = 0;
   1696   1.1       oki 				return;
   1697   1.1       oki 
   1698   1.1       oki 			case '!':
   1699   1.1       oki 				/* soft terminal reset */
   1700   1.1       oki 				ip->escape = 0; /* XXX */
   1701   1.1       oki 				return;
   1702   1.1       oki 
   1703   1.1       oki 			case 'G':
   1704  1.50     isaki 				/* this one was *not* in my vt320 manual but in
   1705   1.1       oki 				   a vt320 termcap entry.. who is right?
   1706   1.1       oki 				   It's supposed to set the horizontal cursor position. */
   1707   1.1       oki 				*ip->ap = 0;
   1708  1.49     isaki 				x = atoi(ip->argbuf);
   1709  1.49     isaki 				if (x)
   1710  1.49     isaki 					x--;
   1711   1.1       oki 				ip->curx = min(x, ip->cols - 1);
   1712   1.1       oki 				ip->escape = 0;
   1713   1.1       oki 				SUBR_CURSOR(ip, MOVE_CURSOR);
   1714  1.49     isaki 				clr_attr(ip, ATTR_INV);
   1715   1.1       oki 				return;
   1716   1.1       oki 
   1717   1.1       oki 
   1718   1.1       oki 			case 'd':
   1719   1.1       oki 				/* same thing here, this one's for setting the absolute
   1720   1.1       oki 				   vertical cursor position. Not documented... */
   1721   1.1       oki 				*ip->ap = 0;
   1722  1.49     isaki 				y = atoi(ip->argbuf);
   1723  1.49     isaki 				if (y)
   1724  1.49     isaki 					y--;
   1725   1.1       oki 				if (ip->inside_margins)
   1726   1.1       oki 					y += ip->top_margin;
   1727   1.1       oki 				ip->cury = min(y, ip->rows - 1);
   1728   1.1       oki 				ip->escape = 0;
   1729   1.1       oki 				snap_cury(ip);
   1730   1.1       oki 				SUBR_CURSOR(ip, MOVE_CURSOR);
   1731  1.49     isaki 				clr_attr(ip, ATTR_INV);
   1732   1.1       oki 				return;
   1733   1.1       oki 
   1734   1.1       oki 
   1735   1.1       oki 			case 'H':
   1736   1.1       oki 			case 'f':
   1737   1.1       oki 				*ip->ap = 0;
   1738  1.49     isaki 				y = atoi(ip->argbuf);
   1739   1.1       oki 				x = 0;
   1740  1.36  jdolecek 				cp = strchr(ip->argbuf, ';');
   1741   1.1       oki 				if (cp)
   1742  1.49     isaki 					x = atoi(cp + 1);
   1743  1.49     isaki 				if (x)
   1744  1.49     isaki 					x--;
   1745  1.49     isaki 				if (y)
   1746  1.49     isaki 					y--;
   1747   1.1       oki 				if (ip->inside_margins)
   1748   1.1       oki 					y += ip->top_margin;
   1749   1.1       oki 				ip->cury = min(y, ip->rows - 1);
   1750   1.1       oki 				ip->curx = min(x, ip->cols - 1);
   1751   1.1       oki 				ip->escape = 0;
   1752   1.1       oki 				snap_cury(ip);
   1753   1.1       oki 				SUBR_CURSOR(ip, MOVE_CURSOR);
   1754  1.49     isaki 				/*clr_attr(ip, ATTR_INV);*/
   1755   1.1       oki 				return;
   1756   1.1       oki 
   1757   1.1       oki 			case 'A':
   1758   1.1       oki 				/* cursor up */
   1759  1.49     isaki 				n = ite_argnum(ip);
   1760   1.1       oki 				n = ip->cury - (n ? n : 1);
   1761  1.49     isaki 				if (n < 0)
   1762  1.49     isaki 					n = 0;
   1763   1.1       oki 				if (ip->inside_margins)
   1764   1.1       oki 					n = max(ip->top_margin, n);
   1765   1.1       oki 				else if (n == ip->top_margin - 1)
   1766   1.1       oki 					/* allow scrolling outside region, but don't scroll out
   1767   1.1       oki 					   of active region without explicit CUP */
   1768   1.1       oki 					n = ip->top_margin;
   1769   1.1       oki 				ip->cury = n;
   1770   1.1       oki 				ip->escape = 0;
   1771   1.1       oki 				SUBR_CURSOR(ip, MOVE_CURSOR);
   1772  1.49     isaki 				clr_attr(ip, ATTR_INV);
   1773   1.1       oki 				return;
   1774   1.1       oki 
   1775   1.1       oki 			case 'B':
   1776   1.1       oki 				/* cursor down */
   1777  1.49     isaki 				n = ite_argnum(ip);
   1778   1.1       oki 				n = ip->cury + (n ? n : 1);
   1779   1.1       oki 				n = min(ip->rows - 1, n);
   1780   1.1       oki #if 0
   1781   1.1       oki 				if (ip->inside_margins)
   1782   1.1       oki #endif
   1783   1.1       oki 					n = min(ip->bottom_margin, n);
   1784   1.1       oki #if 0
   1785   1.1       oki 				else if (n == ip->bottom_margin + 1)
   1786   1.1       oki 					/* allow scrolling outside region, but don't scroll out
   1787   1.1       oki 					   of active region without explicit CUP */
   1788   1.1       oki 					n = ip->bottom_margin;
   1789   1.1       oki #endif
   1790   1.1       oki 				ip->cury = n;
   1791   1.1       oki 				ip->escape = 0;
   1792   1.1       oki 				SUBR_CURSOR(ip, MOVE_CURSOR);
   1793  1.49     isaki 				clr_attr(ip, ATTR_INV);
   1794   1.1       oki 				return;
   1795   1.1       oki 
   1796   1.1       oki 			case 'C':
   1797   1.1       oki 				/* cursor forward */
   1798  1.49     isaki 				n = ite_argnum(ip);
   1799   1.1       oki 				n = n ? n : 1;
   1800   1.1       oki 				ip->curx = min(ip->curx + n, ip->cols - 1);
   1801   1.1       oki 				ip->escape = 0;
   1802   1.1       oki 				SUBR_CURSOR(ip, MOVE_CURSOR);
   1803  1.49     isaki 				clr_attr(ip, ATTR_INV);
   1804   1.1       oki 				return;
   1805   1.1       oki 
   1806   1.1       oki 			case 'D':
   1807   1.1       oki 				/* cursor backward */
   1808  1.49     isaki 				n = ite_argnum(ip);
   1809   1.1       oki 				n = n ? n : 1;
   1810   1.1       oki 				n = ip->curx - n;
   1811   1.1       oki 				ip->curx = n >= 0 ? n : 0;
   1812   1.1       oki 				ip->escape = 0;
   1813   1.1       oki 				SUBR_CURSOR(ip, MOVE_CURSOR);
   1814  1.49     isaki 				clr_attr(ip, ATTR_INV);
   1815   1.1       oki 				return;
   1816   1.1       oki 
   1817   1.1       oki 
   1818   1.1       oki 			case 'J':
   1819   1.1       oki 				/* erase screen */
   1820   1.1       oki 				*ip->ap = 0;
   1821  1.49     isaki 				n = ite_zargnum(ip);
   1822   1.1       oki 				if (n == 0)
   1823   1.1       oki 					ite_clrtoeos(ip);
   1824   1.1       oki 				else if (n == 1)
   1825   1.1       oki 					ite_clrtobos(ip);
   1826   1.1       oki 				else if (n == 2)
   1827   1.1       oki 					ite_clrscreen(ip);
   1828   1.1       oki 				ip->escape = 0;
   1829   1.1       oki 				return;
   1830   1.1       oki 
   1831   1.1       oki 
   1832   1.1       oki 			case 'K':
   1833   1.1       oki 				/* erase line */
   1834  1.49     isaki 				n = ite_zargnum(ip);
   1835   1.1       oki 				if (n == 0)
   1836   1.1       oki 					ite_clrtoeol(ip);
   1837   1.1       oki 				else if (n == 1)
   1838   1.1       oki 					ite_clrtobol(ip);
   1839   1.1       oki 				else if (n == 2)
   1840   1.1       oki 					ite_clrline(ip);
   1841   1.1       oki 				ip->escape = 0;
   1842   1.1       oki 				return;
   1843   1.1       oki 
   1844   1.1       oki 			case 'S':
   1845   1.1       oki 				/* scroll up */
   1846  1.49     isaki 				n = ite_zargnum(ip);
   1847   1.1       oki 				if (n <= 0)
   1848   1.1       oki 					n = 1;
   1849   1.1       oki 				else if (n > ip->rows-1)
   1850   1.1       oki 					n = ip->rows-1;
   1851   1.1       oki 				SUBR_SCROLL(ip, ip->rows-1, 0, n, SCROLL_UP);
   1852   1.1       oki 				ip->escape = 0;
   1853   1.1       oki 				return;
   1854   1.1       oki 
   1855   1.1       oki 			case 'T':
   1856   1.1       oki 				/* scroll down */
   1857  1.49     isaki 				n = ite_zargnum(ip);
   1858   1.1       oki 				if (n <= 0)
   1859   1.1       oki 					n = 1;
   1860   1.1       oki 				else if (n > ip->rows-1)
   1861   1.1       oki 					n = ip->rows-1;
   1862   1.1       oki 				SUBR_SCROLL(ip, 0, 0, n, SCROLL_DOWN);
   1863   1.1       oki 				ip->escape = 0;
   1864   1.1       oki 				return;
   1865   1.1       oki 
   1866   1.1       oki 			case 'X':
   1867   1.1       oki 				/* erase character */
   1868   1.1       oki 				n = ite_argnum(ip) - 1;
   1869   1.1       oki 				n = min(n, ip->cols - 1 - ip->curx);
   1870   1.1       oki 				for (; n >= 0; n--) {
   1871   1.1       oki 					attrclr(ip, ip->cury, ip->curx + n, 1, 1);
   1872   1.1       oki 					SUBR_PUTC(ip, ' ', ip->cury, ip->curx + n, ATTR_NOR);
   1873   1.1       oki 				}
   1874   1.1       oki 				ip->escape = 0;
   1875   1.1       oki 				return;
   1876   1.1       oki 
   1877   1.1       oki 
   1878   1.1       oki 			case '}': case '`':
   1879   1.1       oki 				/* status line control */
   1880   1.1       oki 				ip->escape = 0;
   1881   1.1       oki 				return;
   1882   1.1       oki 
   1883   1.1       oki 			case 'r':
   1884   1.1       oki 				/* set scrolling region */
   1885   1.1       oki 				ip->escape = 0;
   1886   1.1       oki 				*ip->ap = 0;
   1887  1.49     isaki 				x = atoi(ip->argbuf);
   1888   1.1       oki 				x = x ? x : 1;
   1889   1.1       oki 				y = ip->rows;
   1890  1.36  jdolecek 				cp = strchr(ip->argbuf, ';');
   1891   1.1       oki 				if (cp) {
   1892  1.49     isaki 					y = atoi(cp + 1);
   1893   1.1       oki 					y = y ? y : ip->rows;
   1894   1.1       oki 				}
   1895   1.1       oki 				if (y <= x)
   1896   1.1       oki 					return;
   1897   1.1       oki 				x--;
   1898   1.1       oki 				y--;
   1899   1.1       oki 				ip->top_margin = min(x, ip->rows - 2);
   1900   1.1       oki 				ip->bottom_margin = min(y, ip->rows - 1);
   1901   1.1       oki 				if (ip->inside_margins) {
   1902   1.1       oki 					ip->cury = ip->top_margin;
   1903   1.1       oki 				} else
   1904   1.1       oki 					ip->cury = 0;
   1905   1.1       oki 				ip->curx = 0;
   1906   1.1       oki 				return;
   1907   1.1       oki 
   1908   1.1       oki 
   1909   1.1       oki 			case 'm':
   1910   1.1       oki 				/* big attribute setter/resetter */
   1911   1.1       oki 			{
   1912  1.40        he 				char *c_p;
   1913   1.1       oki 				*ip->ap = 0;
   1914   1.1       oki 				/* kludge to make CSIm work (== CSI0m) */
   1915   1.1       oki 				if (ip->ap == ip->argbuf)
   1916   1.1       oki 					ip->ap++;
   1917  1.40        he 				for (c_p = ip->argbuf; c_p < ip->ap; ) {
   1918  1.40        he 					switch (*c_p) {
   1919   1.1       oki 					case 0:
   1920   1.1       oki 					case '0':
   1921  1.49     isaki 						clr_attr(ip, ATTR_ALL);
   1922   1.1       oki 						ip->fgcolor = 7;
   1923   1.1       oki 						ip->bgcolor = 0;
   1924  1.40        he 						c_p++;
   1925   1.1       oki 						break;
   1926   1.1       oki 
   1927   1.1       oki 					case '1':
   1928  1.49     isaki 						set_attr(ip, ATTR_BOLD);
   1929  1.40        he 						c_p++;
   1930   1.1       oki 						break;
   1931   1.1       oki 
   1932   1.1       oki 					case '2':
   1933  1.40        he 						switch (c_p[1]) {
   1934   1.1       oki 						case '2':
   1935  1.49     isaki 							clr_attr(ip, ATTR_BOLD);
   1936  1.40        he 							c_p += 2;
   1937   1.1       oki 							break;
   1938   1.1       oki 
   1939   1.1       oki 						case '4':
   1940  1.49     isaki 							clr_attr(ip, ATTR_UL);
   1941  1.40        he 							c_p += 2;
   1942   1.1       oki 							break;
   1943   1.1       oki 
   1944   1.1       oki 						case '5':
   1945  1.49     isaki 							clr_attr(ip, ATTR_BLINK);
   1946  1.40        he 							c_p += 2;
   1947   1.1       oki 							break;
   1948   1.1       oki 
   1949   1.1       oki 						case '7':
   1950  1.49     isaki 							clr_attr(ip, ATTR_INV);
   1951  1.40        he 							c_p += 2;
   1952   1.1       oki 							break;
   1953   1.1       oki 
   1954   1.1       oki 						default:
   1955  1.40        he 							c_p++;
   1956   1.1       oki 							break;
   1957   1.1       oki 						}
   1958   1.1       oki 						break;
   1959   1.1       oki 
   1960   1.1       oki 					case '3':
   1961  1.40        he 						switch (c_p[1]) {
   1962   1.1       oki 						case '0': case '1': case '2': case '3':
   1963   1.1       oki 						case '4': case '5': case '6': case '7':
   1964   1.1       oki 							/* foreground colors */
   1965  1.40        he 							ip->fgcolor = c_p[1] - '0';
   1966  1.40        he 							c_p += 2;
   1967   1.1       oki 							break;
   1968   1.1       oki 						default:
   1969  1.40        he 							c_p++;
   1970   1.1       oki 							break;
   1971   1.1       oki 						}
   1972   1.1       oki 						break;
   1973   1.1       oki 
   1974   1.1       oki 					case '4':
   1975  1.40        he 						switch (c_p[1]) {
   1976   1.1       oki 						case '0': case '1': case '2': case '3':
   1977   1.1       oki 						case '4': case '5': case '6': case '7':
   1978   1.1       oki 							/* background colors */
   1979  1.40        he 							ip->bgcolor = c_p[1] - '0';
   1980  1.40        he 							c_p += 2;
   1981   1.1       oki 							break;
   1982   1.1       oki 						default:
   1983  1.49     isaki 							set_attr(ip, ATTR_UL);
   1984  1.40        he 							c_p++;
   1985   1.1       oki 							break;
   1986   1.1       oki 						}
   1987   1.1       oki 						break;
   1988   1.1       oki 
   1989   1.1       oki 					case '5':
   1990  1.49     isaki 						set_attr(ip, ATTR_BLINK);
   1991  1.40        he 						c_p++;
   1992   1.1       oki 						break;
   1993   1.1       oki 
   1994   1.1       oki 					case '7':
   1995  1.49     isaki 						set_attr(ip, ATTR_INV);
   1996  1.40        he 						c_p++;
   1997   1.1       oki 						break;
   1998   1.1       oki 
   1999   1.1       oki 					default:
   2000  1.40        he 						c_p++;
   2001   1.1       oki 						break;
   2002   1.1       oki 					}
   2003   1.1       oki 				}
   2004   1.1       oki 
   2005   1.1       oki 			}
   2006   1.1       oki 				ip->escape = 0;
   2007   1.1       oki 				return;
   2008   1.1       oki 
   2009   1.1       oki 
   2010   1.1       oki 			case 'u':
   2011   1.1       oki 				/* DECRQTSR */
   2012  1.49     isaki 				ite_sendstr(ip, "\033P\033\\");
   2013   1.1       oki 				ip->escape = 0;
   2014   1.1       oki 				return;
   2015   1.1       oki 
   2016   1.1       oki 			default:
   2017   1.1       oki 				ip->escape = 0;
   2018   1.1       oki 				return;
   2019   1.1       oki 			}
   2020   1.1       oki 			break;
   2021   1.1       oki 
   2022   1.1       oki 
   2023   1.1       oki 
   2024   1.1       oki 		case '?':	/* CSI ? */
   2025   1.1       oki 			switch (c) {
   2026   1.1       oki 			case '0': case '1': case '2': case '3': case '4':
   2027   1.1       oki 			case '5': case '6': case '7': case '8': case '9':
   2028   1.1       oki 			case ';': case '\"': case '$':
   2029   1.1       oki 				/* Don't fill the last character; it's needed.  */
   2030   1.1       oki 				/* XXX yeah, where ?? */
   2031   1.1       oki 				if (ip->ap < ip->argbuf + MAX_ARGSIZE - 1)
   2032   1.1       oki 					*ip->ap++ = c;
   2033   1.1       oki 				return;
   2034   1.1       oki 
   2035   1.1       oki 
   2036   1.1       oki 			case 'n':
   2037   1.1       oki 				/* Terminal Reports */
   2038   1.1       oki 				*ip->ap = 0;
   2039   1.1       oki 				if (ip->ap == &ip->argbuf[2]) {
   2040   1.1       oki 					if (!strncmp(ip->argbuf, "15", 2))
   2041   1.1       oki 						/* printer status: no printer */
   2042  1.49     isaki 						ite_sendstr(ip, "\033[13n");
   2043   1.1       oki 
   2044   1.1       oki 					else if (!strncmp(ip->argbuf, "25", 2))
   2045   1.1       oki 						/* udk status */
   2046  1.49     isaki 						ite_sendstr(ip, "\033[20n");
   2047   1.1       oki 
   2048   1.1       oki 					else if (!strncmp(ip->argbuf, "26", 2))
   2049   1.1       oki 						/* keyboard dialect: US */
   2050  1.49     isaki 						ite_sendstr(ip, "\033[27;1n");
   2051   1.1       oki 				}
   2052   1.1       oki 				ip->escape = 0;
   2053   1.1       oki 				return;
   2054   1.1       oki 
   2055   1.1       oki 
   2056   1.1       oki 			case 'h': /* set dec private modes */
   2057   1.1       oki 			case 'l': /* reset dec private modes */
   2058  1.49     isaki 				n = ite_zargnum(ip);
   2059   1.1       oki 				switch (n) {
   2060   1.1       oki 				case 1:
   2061   1.1       oki 					/* CKM - cursor key mode */
   2062   1.1       oki 					ip->cursor_appmode = (c == 'h');
   2063   1.1       oki 					break;
   2064   1.1       oki 
   2065   1.1       oki 				case 3:
   2066   1.1       oki 					/* 132/80 columns (132 == 'h') */
   2067   1.1       oki 					break;
   2068   1.1       oki 
   2069   1.1       oki 				case 4: /* smooth scroll */
   2070   1.1       oki 					break;
   2071   1.1       oki 
   2072   1.1       oki 				case 5:
   2073   1.1       oki 					/* light background (=='h') /dark background(=='l') */
   2074   1.1       oki 					break;
   2075   1.1       oki 
   2076   1.1       oki 				case 6: /* origin mode */
   2077   1.1       oki 					ip->inside_margins = (c == 'h');
   2078   1.1       oki #if 0
   2079   1.1       oki 					ip->curx = 0;
   2080   1.1       oki 					ip->cury = ip->inside_margins ? ip->top_margin : 0;
   2081   1.1       oki 					SUBR_CURSOR(ip, MOVE_CURSOR);
   2082   1.1       oki #endif
   2083   1.1       oki 					break;
   2084   1.1       oki 
   2085   1.1       oki 				case 7: /* auto wraparound */
   2086   1.1       oki 					ip->auto_wrap = (c == 'h');
   2087   1.1       oki 					break;
   2088   1.1       oki 
   2089   1.1       oki 				case 8: /* keyboard repeat */
   2090   1.1       oki 					ip->key_repeat = (c == 'h');
   2091   1.1       oki 					break;
   2092   1.1       oki 
   2093   1.1       oki 				case 20: /* newline mode */
   2094   1.1       oki 					ip->linefeed_newline = (c == 'h');
   2095   1.1       oki 					break;
   2096   1.1       oki 
   2097   1.1       oki 				case 25: /* cursor on/off */
   2098   1.1       oki 					SUBR_CURSOR(ip, (c == 'h') ? DRAW_CURSOR : ERASE_CURSOR);
   2099   1.1       oki 					break;
   2100   1.1       oki 				}
   2101   1.1       oki 				ip->escape = 0;
   2102   1.1       oki 				return;
   2103   1.1       oki 
   2104   1.1       oki 			case 'K':
   2105   1.1       oki 				/* selective erase in line */
   2106   1.1       oki 			case 'J':
   2107   1.1       oki 				/* selective erase in display */
   2108   1.1       oki 
   2109   1.1       oki 			default:
   2110   1.1       oki 				ip->escape = 0;
   2111   1.1       oki 				return;
   2112   1.1       oki 			}
   2113   1.1       oki 			break;
   2114   1.1       oki 
   2115   1.1       oki 
   2116   1.1       oki 		default:
   2117   1.1       oki 			ip->escape = 0;
   2118   1.1       oki 			return;
   2119   1.1       oki 		}
   2120   1.1       oki 	}
   2121   1.1       oki 
   2122   1.1       oki 	switch (c) {
   2123   1.1       oki 	case 0x00:	/* NUL */
   2124   1.1       oki 	case 0x01:	/* SOH */
   2125   1.1       oki 	case 0x02:	/* STX */
   2126   1.1       oki 	case 0x03:	/* ETX */
   2127   1.1       oki 	case 0x04:	/* EOT */
   2128   1.1       oki 	case 0x05:	/* ENQ */
   2129   1.1       oki 	case 0x06:	/* ACK */
   2130   1.1       oki 		break;
   2131   1.1       oki 
   2132   1.1       oki 	case BEL:
   2133   1.1       oki #if NBELL > 0
   2134  1.44   thorpej 		if (kbd_ite && ite_tty[device_unit(&kbd_ite->device)])
   2135   1.1       oki 			opm_bell();
   2136   1.1       oki #endif
   2137   1.1       oki 		break;
   2138   1.1       oki 
   2139   1.1       oki 	case BS:
   2140   1.1       oki 		if (--ip->curx < 0)
   2141   1.1       oki 			ip->curx = 0;
   2142   1.1       oki 		else
   2143   1.1       oki 			SUBR_CURSOR(ip, MOVE_CURSOR);
   2144   1.1       oki 		break;
   2145   1.1       oki 
   2146   1.1       oki 	case HT:
   2147   1.1       oki 		for (n = ip->curx + 1; n < ip->cols; n++) {
   2148   1.1       oki 			if (ip->tabs[n]) {
   2149   1.1       oki 				ip->curx = n;
   2150   1.1       oki 				SUBR_CURSOR(ip, MOVE_CURSOR);
   2151   1.1       oki 				break;
   2152   1.1       oki 			}
   2153   1.1       oki 		}
   2154   1.1       oki 		break;
   2155   1.1       oki 
   2156   1.1       oki 	case VT:	/* VT is treated like LF */
   2157   1.1       oki 	case FF:	/* so is FF */
   2158   1.1       oki 	case LF:
   2159  1.50     isaki 		/* cr->crlf distinction is done here, on output,
   2160   1.1       oki 		   not on input! */
   2161   1.1       oki 		if (ip->linefeed_newline)
   2162  1.49     isaki 			ite_crlf(ip);
   2163   1.1       oki 		else
   2164  1.49     isaki 			ite_lf(ip);
   2165   1.1       oki 		break;
   2166   1.1       oki 
   2167   1.1       oki 	case CR:
   2168  1.49     isaki 		ite_cr(ip);
   2169   1.1       oki 		break;
   2170   1.1       oki 
   2171   1.1       oki 
   2172   1.1       oki 	case SO:
   2173   1.1       oki 		ip->GL = &ip->G1;
   2174   1.1       oki 		break;
   2175   1.1       oki 
   2176   1.1       oki 	case SI:
   2177   1.1       oki 		ip->GL = &ip->G0;
   2178   1.1       oki 		break;
   2179   1.1       oki 
   2180   1.1       oki 	case 0x10:	/* DLE */
   2181   1.1       oki 	case 0x11:	/* DC1/XON */
   2182   1.1       oki 	case 0x12:	/* DC2 */
   2183   1.1       oki 	case 0x13:	/* DC3/XOFF */
   2184   1.1       oki 	case 0x14:	/* DC4 */
   2185   1.1       oki 	case 0x15:	/* NAK */
   2186   1.1       oki 	case 0x16:	/* SYN */
   2187   1.1       oki 	case 0x17:	/* ETB */
   2188   1.1       oki 		break;
   2189   1.1       oki 
   2190   1.1       oki 	case CAN:
   2191   1.1       oki 		ip->escape = 0;	/* cancel any escape sequence in progress */
   2192   1.1       oki 		break;
   2193   1.1       oki 
   2194   1.1       oki 	case 0x19:	/* EM */
   2195   1.1       oki 		break;
   2196   1.1       oki 
   2197   1.1       oki 	case SUB:
   2198   1.1       oki 		ip->escape = 0;	/* dito, but see below */
   2199   1.1       oki 		/* should also display a reverse question mark!! */
   2200   1.1       oki 		break;
   2201   1.1       oki 
   2202   1.1       oki 	case ESC:
   2203   1.1       oki 		ip->escape = ESC;
   2204   1.1       oki 		break;
   2205   1.1       oki 
   2206   1.1       oki 	case 0x1c:	/* FS */
   2207   1.1       oki 	case 0x1d:	/* GS */
   2208   1.1       oki 	case 0x1e:	/* RS */
   2209   1.1       oki 	case 0x1f:	/* US */
   2210   1.1       oki 		break;
   2211   1.1       oki 
   2212   1.1       oki 	/* now it gets weird.. 8bit control sequences.. */
   2213   1.1       oki 	case IND:	/* index: move cursor down, scroll */
   2214  1.49     isaki 		ite_index(ip);
   2215   1.1       oki 		break;
   2216   1.1       oki 
   2217   1.1       oki 	case NEL:	/* next line. next line, first pos. */
   2218  1.49     isaki 		ite_crlf(ip);
   2219   1.1       oki 		break;
   2220   1.1       oki 
   2221   1.1       oki 	case HTS:	/* set horizontal tab */
   2222   1.1       oki 		if (ip->curx < ip->cols)
   2223   1.1       oki 			ip->tabs[ip->curx] = 1;
   2224   1.1       oki 		break;
   2225   1.1       oki 
   2226   1.1       oki 	case RI:	/* reverse index */
   2227  1.49     isaki 		ite_rlf(ip);
   2228   1.1       oki 		break;
   2229   1.1       oki 
   2230   1.1       oki 	case SS2:	/* go into G2 for one character */
   2231   1.1       oki 		ip->save_GL = ip->GR;	/* GL XXX EUC */
   2232   1.1       oki 		ip->GR = &ip->G2;	/* GL XXX */
   2233   1.1       oki 		break;
   2234   1.1       oki 
   2235   1.1       oki 	case SS3:	/* go into G3 for one character */
   2236   1.1       oki 		ip->save_GL = ip->GR;	/* GL XXX EUC */
   2237   1.1       oki 		ip->GR = &ip->G3;	/* GL XXX */
   2238   1.1       oki 		break;
   2239   1.1       oki 
   2240   1.1       oki 	case DCS:	/* device control string introducer */
   2241   1.1       oki 		ip->escape = DCS;
   2242   1.1       oki 		ip->ap = ip->argbuf;
   2243   1.1       oki 		break;
   2244   1.1       oki 
   2245   1.1       oki 	case CSI:	/* control sequence introducer */
   2246   1.1       oki 		ip->escape = CSI;
   2247   1.1       oki 		ip->ap = ip->argbuf;
   2248   1.1       oki 		break;
   2249   1.1       oki 
   2250   1.1       oki 	case ST:	/* string terminator */
   2251   1.1       oki 		/* ignore, if not used as terminator */
   2252   1.1       oki 		break;
   2253   1.1       oki 
   2254   1.1       oki 	case OSC:	/* introduces OS command. Ignore everything upto ST */
   2255   1.1       oki 		ip->escape = OSC;
   2256   1.1       oki 		break;
   2257   1.1       oki 
   2258   1.1       oki 	case PM:	/* privacy message, ignore everything upto ST */
   2259   1.1       oki 		ip->escape = PM;
   2260   1.1       oki 		break;
   2261   1.1       oki 
   2262   1.1       oki 	case APC:	/* application program command, ignore everything upto ST */
   2263   1.1       oki 		ip->escape = APC;
   2264   1.1       oki 		break;
   2265   1.1       oki 
   2266   1.1       oki 	case DEL:
   2267   1.1       oki 		break;
   2268   1.1       oki 
   2269   1.1       oki 	default:
   2270   1.1       oki 		if (!ip->save_char && (*((c & 0x80) ? ip->GR : ip->GL) & CSET_MULTI)) {
   2271   1.1       oki 			ip->save_char = c;
   2272   1.1       oki 			break;
   2273   1.1       oki 		}
   2274   1.1       oki 		if (ip->imode)
   2275   1.1       oki 			ite_inchar(ip, ip->save_char ? 2 : 1);
   2276   1.1       oki 		iteprecheckwrap(ip);
   2277   1.1       oki #ifdef DO_WEIRD_ATTRIBUTES
   2278   1.1       oki 		if ((ip->attribute & ATTR_INV) || attrtest(ip, ATTR_INV)) {
   2279   1.1       oki 			attrset(ip, ATTR_INV);
   2280   1.1       oki 			SUBR_PUTC(ip, c, ip->cury, ip->curx, ATTR_INV);
   2281   1.1       oki 		}
   2282   1.1       oki 		else
   2283   1.1       oki 			SUBR_PUTC(ip, c, ip->cury, ip->curx, ATTR_NOR);
   2284   1.1       oki #else
   2285   1.1       oki 		SUBR_PUTC(ip, c, ip->cury, ip->curx, ip->attribute);
   2286   1.1       oki #endif
   2287   1.1       oki /*		SUBR_CURSOR(ip, DRAW_CURSOR);*/
   2288   1.1       oki 		itecheckwrap(ip);
   2289   1.1       oki 		if (ip->save_char) {
   2290   1.1       oki 			itecheckwrap(ip);
   2291   1.1       oki 			ip->save_char = 0;
   2292   1.1       oki 		}
   2293   1.1       oki 		if (ip->save_GL) {
   2294   1.1       oki 			/*
   2295   1.1       oki 			 * reset single shift
   2296   1.1       oki 			 */
   2297   1.1       oki 			ip->GR = ip->save_GL;
   2298   1.1       oki 			ip->save_GL = 0;
   2299   1.1       oki 		}
   2300   1.1       oki 		break;
   2301   1.1       oki 	}
   2302   1.1       oki }
   2303   1.1       oki 
   2304  1.49     isaki static void
   2305  1.38       chs iteprecheckwrap(struct ite_softc *ip)
   2306   1.1       oki {
   2307   1.1       oki 	if (ip->auto_wrap && ip->curx + (ip->save_char ? 1 : 0) == ip->cols) {
   2308   1.1       oki 		ip->curx = 0;
   2309   1.1       oki 		clr_attr(ip, ATTR_INV);
   2310   1.1       oki 		if (++ip->cury >= ip->bottom_margin + 1) {
   2311   1.1       oki 			ip->cury = ip->bottom_margin;
   2312   1.1       oki 			/*SUBR_CURSOR(ip, MOVE_CURSOR);*/
   2313   1.1       oki 			SUBR_SCROLL(ip, ip->top_margin + 1, 0, 1, SCROLL_UP);
   2314   1.1       oki 			ite_clrtoeol(ip);
   2315   1.1       oki 		} /*else
   2316   1.1       oki 			SUBR_CURSOR(ip, MOVE_CURSOR);*/
   2317   1.1       oki 	}
   2318   1.1       oki }
   2319   1.1       oki 
   2320  1.49     isaki static void
   2321  1.38       chs itecheckwrap(struct ite_softc *ip)
   2322   1.1       oki {
   2323   1.1       oki #if 0
   2324   1.1       oki 	if (++ip->curx == ip->cols) {
   2325   1.1       oki 		if (ip->auto_wrap) {
   2326   1.1       oki 			ip->curx = 0;
   2327   1.1       oki 			clr_attr(ip, ATTR_INV);
   2328   1.1       oki 			if (++ip->cury >= ip->bottom_margin + 1) {
   2329   1.1       oki 				ip->cury = ip->bottom_margin;
   2330   1.1       oki 				SUBR_CURSOR(ip, MOVE_CURSOR);
   2331   1.1       oki 				SUBR_SCROLL(ip, ip->top_margin + 1, 0, 1, SCROLL_UP);
   2332   1.1       oki 				ite_clrtoeol(ip);
   2333   1.1       oki 				return;
   2334   1.1       oki 			}
   2335   1.1       oki 		} else
   2336   1.1       oki 			/* stay there if no autowrap.. */
   2337   1.1       oki 			ip->curx--;
   2338   1.1       oki 	}
   2339   1.1       oki #else
   2340   1.1       oki 	if (ip->curx < ip->cols) {
   2341   1.1       oki 		ip->curx++;
   2342   1.1       oki 		/*SUBR_CURSOR(ip, MOVE_CURSOR);*/
   2343   1.1       oki 	}
   2344   1.1       oki #endif
   2345   1.1       oki }
   2346   1.1       oki 
   2347   1.1       oki #endif
   2348   1.1       oki 
   2349  1.14   minoura #if NITE > 0 && NKBD > 0
   2350  1.14   minoura 
   2351   1.1       oki /*
   2352   1.1       oki  * Console functions
   2353   1.1       oki  */
   2354   1.1       oki #include <dev/cons.h>
   2355  1.38       chs extern void kbdenable(int);
   2356  1.38       chs extern int kbdcngetc(void);
   2357   1.1       oki 
   2358   1.1       oki /*
   2359   1.1       oki  * Return a priority in consdev->cn_pri field highest wins.  This function
   2360   1.1       oki  * is called before any devices have been probed.
   2361   1.1       oki  */
   2362  1.49     isaki void
   2363  1.38       chs itecnprobe(struct consdev *cd)
   2364   1.1       oki {
   2365   1.2       oki 	int maj;
   2366   1.1       oki 
   2367   1.1       oki 	/* locate the major number */
   2368  1.29   gehenna 	maj = cdevsw_lookup_major(&ite_cdevsw);
   2369   1.1       oki 
   2370  1.50     isaki 	/*
   2371   1.1       oki 	 * return priority of the best ite (already picked from attach)
   2372   1.1       oki 	 * or CN_DEAD.
   2373   1.1       oki 	 */
   2374   1.1       oki 	if (con_itesoftc.grf == NULL)
   2375   1.1       oki 		cd->cn_pri = CN_DEAD;
   2376   1.1       oki 	else {
   2377   1.1       oki 		con_itesoftc.flags = (ITE_ALIVE|ITE_CONSOLE);
   2378  1.14   minoura 		/*
   2379  1.14   minoura 		 * hardcode the minor number.
   2380  1.14   minoura 		 * currently we support only one ITE, it is enough for now.
   2381  1.14   minoura 		 */
   2382  1.14   minoura 		con_itesoftc.isw = &itesw[0];
   2383   1.1       oki 		cd->cn_pri = CN_INTERNAL;
   2384  1.14   minoura 		cd->cn_dev = makedev(maj, 0);
   2385   1.1       oki 	}
   2386   1.1       oki 
   2387   1.1       oki }
   2388   1.1       oki 
   2389  1.49     isaki void
   2390  1.38       chs itecninit(struct consdev *cd)
   2391   1.1       oki {
   2392   1.1       oki 	struct ite_softc *ip;
   2393   1.1       oki 
   2394   1.1       oki 	ip = getitesp(cd->cn_dev);
   2395   1.1       oki 	iteinit(cd->cn_dev);	       /* init console unit */
   2396   1.1       oki 	ip->flags |= ITE_ACTIVE | ITE_ISCONS;
   2397  1.14   minoura 	kbdenable(0);
   2398  1.14   minoura 	mfp_send_usart(0x49);
   2399   1.1       oki }
   2400   1.1       oki 
   2401   1.1       oki /*
   2402   1.1       oki  * itecnfinish() is called in ite_init() when the device is
   2403   1.1       oki  * being probed in the normal fasion, thus we can finish setting
   2404   1.1       oki  * up this ite now that the system is more functional.
   2405   1.1       oki  */
   2406  1.49     isaki void
   2407  1.38       chs itecnfinish(struct ite_softc *ip)
   2408   1.1       oki {
   2409   1.1       oki 	static int done;
   2410   1.1       oki 
   2411   1.1       oki 	if (done)
   2412   1.1       oki 		return;
   2413   1.1       oki 	done = 1;
   2414   1.1       oki }
   2415   1.1       oki 
   2416   1.1       oki /*ARGSUSED*/
   2417  1.49     isaki int
   2418  1.38       chs itecngetc(dev_t dev)
   2419   1.1       oki {
   2420  1.38       chs 	int c;
   2421   1.1       oki 
   2422   1.1       oki 	do {
   2423  1.14   minoura 		c = kbdcngetc();
   2424  1.16   minoura 		c = ite_cnfilter(c);
   2425   1.1       oki 	} while (c == -1);
   2426   1.1       oki 	return (c);
   2427   1.1       oki }
   2428   1.1       oki 
   2429  1.49     isaki void
   2430  1.38       chs itecnputc(dev_t dev, int c)
   2431   1.1       oki {
   2432   1.1       oki 	static int paniced = 0;
   2433   1.1       oki 	struct ite_softc *ip = getitesp(dev);
   2434   1.1       oki 	char ch = c;
   2435  1.14   minoura #ifdef ITE_KERNEL_ATTR
   2436  1.14   minoura 	short save_attribute;
   2437  1.14   minoura #endif
   2438   1.1       oki 
   2439   1.1       oki 	if (panicstr && !paniced &&
   2440   1.1       oki 	    (ip->flags & (ITE_ACTIVE|ITE_INGRF)) != ITE_ACTIVE) {
   2441   1.1       oki 		(void) iteon(dev, 3);
   2442   1.1       oki 		paniced = 1;
   2443   1.1       oki 	}
   2444  1.14   minoura #ifdef ITE_KERNEL_ATTR
   2445  1.14   minoura 	save_attribute = ip->attribute;
   2446  1.14   minoura 	ip->attribute = ITE_KERNEL_ATTR;
   2447  1.14   minoura #endif
   2448   1.1       oki 	ite_putstr(&ch, 1, dev);
   2449  1.14   minoura #ifdef ITE_KERNEL_ATTR
   2450  1.14   minoura 	ip->attribute = save_attribute;
   2451  1.14   minoura #endif
   2452   1.1       oki }
   2453  1.14   minoura #endif
   2454