ref: 632b7adffbd137d9cbe95431fa6919f875c47e5b
parent: b831ec005baf286bb3418c51baf7e5814a940bfa
author: cinap_lenrek <cinap_lenrek@gmx.de>
date: Sun Oct 27 15:09:13 EDT 2013
vt: remove defunct hp terminal emulation
--- a/sys/src/cmd/vt/hp.c
+++ /dev/null
@@ -1,212 +1,0 @@
-#include <u.h>
-#include <libc.h>
-#include <ndraw.h>
-#include <bio.h>
-#include "cons.h"
-
-char *term = "2621";
-
-struct funckey fk[32];
-
-void
-emulate(void)
-{- char buf[BUFS+1];
- int n;
- int c;
- int standout = 0;
- int insmode = 0;
-
- for (;;) {- if (x > xmax || y > ymax) {- x = 0;
- newline();
- }
- buf[0] = get_next_char();
- buf[1] = '\0';
- switch(buf[0]) {-
- case '\000': /* nulls, just ignore 'em */
- break;
-
- case '\007': /* bell */
- ringbell();
- break;
-
- case '\t': /* tab modulo 8 */
- x = (x|7)+1;
- break;
-
- case '\033':
- switch(get_next_char()) {-
- case 'j':
- get_next_char();
- break;
-
- case '&': /* position cursor &c */
- switch(get_next_char()) {-
- case 'a':
- for (;;) {- n = number(buf, nil);
- switch(buf[0]) {-
- case 'r':
- case 'y':
- y = n;
- continue;
-
- case 'c':
- x = n;
- continue;
-
- case 'R':
- case 'Y':
- y = n;
- break;
-
- case 'C':
- x = n;
- break;
- }
- break;
- }
- break;
-
- case 'd': /* underline stuff */
- if ((n=get_next_char())>='A' && n <= 'O')
- standout++;
- else if (n == '@')
- standout = 0;
- break;
-
- default:
- get_next_char();
- break;
-
- }
- break;
-
- case 'i': /* back tab */
- if (x>0)
- x = (x-1) & ~07;
- break;
-
- case 'H': /* home cursor */
- case 'h':
- x = 0;
- y = 0;
- break;
-
- case 'L': /* insert blank line */
- scroll(y, ymax, y+1, y);
- break;
-
- case 'M': /* delete line */
- scroll(y+1, ymax+1, y, ymax);
- break;
-
- case 'J': /* clear to end of display */
- xtipple(Rpt(pt(0, y+1),
- pt(xmax+1, ymax+1)));
- /* flow */
- case 'K': /* clear to EOL */
- xtipple(Rpt(pt(x, y),
- pt(xmax+1, y+1)));
- break;
-
- case 'P': /* delete char */
- bitblt(&screen, pt(x, y),
- &screen, Rpt(pt(x+1, y),
- pt(xmax+1, y+1)),
- S);
- xtipple(Rpt(pt(xmax, y),
- pt(xmax+1, y+1)));
- break;
-
- case 'Q': /* enter insert mode */
- insmode++;
- break;
-
- case 'R': /* leave insert mode */
- insmode = 0;
- break;
-
- case 'S': /* roll up */
- scroll(1, ymax+1, 0, ymax);
- break;
-
- case 'T':
- scroll(0, ymax, 1, 0);
- break;
-
- case 'A': /* upline */
- case 't':
- if (y>0)
- y--;
- if (olines > 0)
- olines--;
- break;
-
- case 'B':
- case 'w':
- y++; /* downline */
- break;
-
- case 'C': /* right */
- case 'v':
- x++;
- break;
-
- case 'D': /* left */
- case 'u':
- x--;
-
- }
- break;
-
- case '\b': /* backspace */
- if(x > 0)
- --x;
- break;
-
- case '\n': /* linefeed */
- newline();
- standout = 0;
- if( ttystate[cs->raw].nlcr )
- x = 0;
- break;
-
- case '\r': /* carriage return */
- x = 0;
- standout = 0;
- if( ttystate[cs->raw].crnl )
- newline();
- break;
-
- default: /* ordinary char */
- n = 1;
- c = 0;
- while (!cs->raw && host_avail() && x+n<=xmax && n<BUFS
- && (c = get_next_char())>=' ' && c<'\177') {- buf[n++] = c;
- c = 0;
- }
- buf[n] = 0;
- if (insmode) {- bitblt(&screen, pt(x+n, y), &screen,
- Rpt(pt(x, y), pt(xmax-n+1, y+1)), S);
- }
- xtipple(Rpt(pt(x,y), pt(x+n, y+1)));
- string(&screen, pt(x, y), font, buf, DxorS);
- if (standout)
- rectf(&screen,
- Rpt(pt(x,y),pt(x+n,y+1)),
- DxorS);
- x += n;
- peekc = c;
- break;
- }
- }
-}
--- a/sys/src/cmd/vt/mkfile
+++ b/sys/src/cmd/vt/mkfile
@@ -1,9 +1,5 @@
</$objtype/mkfile
-#TARG=hp\
-# vt\
-# vt220\
-
TARG=vt
OFILES=\
--
⑨