/*
* $Log$
+ * Revision 1.15 2008/02/07 13:19:48 james
+ * *** empty log message ***
+ *
+ * Revision 1.14 2008/02/07 12:21:16 james
+ * *** empty log message ***
+ *
+ * Revision 1.13 2008/02/07 12:16:04 james
+ * *** empty log message ***
+ *
+ * Revision 1.12 2008/02/07 11:32:41 james
+ * *** empty log message ***
+ *
+ * Revision 1.11 2008/02/07 11:11:14 staffcvs
+ * *** empty log message ***
+ *
+ * Revision 1.10 2008/02/07 01:02:52 james
+ * *** empty log message ***
+ *
* Revision 1.9 2008/02/07 00:43:27 james
* *** empty log message ***
*
{
ansi_write (a, "\033[0m", 4);
a->attr = CRT_ATTR_NORMAL;
+ a->color = ANSI_INVAL;
+}
+
+void
+ansi_set_color (ANSI * a, int color)
+{
+ int dif;
+ char buf[16];
+ int i;
+ int fg,bg;
+
+ if ((a->color == ANSI_INVAL) || (color!=a->color)) {
+ fg=CRT_COLOR_FG(color);
+ bg=CRT_COLOR_BG(color);
+
+ if (fg & CRT_COLOR_INTENSITY) {
+ fg+=90;
+ } else {
+ fg+=30;
+ }
+
+ if (bg & CRT_COLOR_INTENSITY) {
+ bg+=100;
+ } else {
+ bg+=40;
+ }
+
+ i=sprintf(buf,"\033[%d;%dm",fg,bg);
+#if 0
+ fprintf(stderr,"Color set to %d %d %x\n",fg,bg,color);
+#endif
+
+ ansi_write (a,buf,i);
+ a->color=color;
+ }
}
void
a->attr = attr;
+#if 0
if (attr == CRT_ATTR_NORMAL)
{
ansi_force_attr_normal (a);
return;
}
+#endif
if (dif & CRT_ATTR_UNDERLINE)
{
ca.chr = ' ';
ansi_set_attr (a, ca.attr);
+ ansi_set_color(a,ca.color);
ansi_write (a, &ca.chr, 1);
/*Can't easily wrap round here as don't know size of destination screen*/
/*so invalidate the cached cursor position*/
- if (a->pos.x >= CRT_COLS)
+ if (a->pos.x >= a->size.x)
a->pos.x = ANSI_INVAL;
}
crt_cls (&a->crt);
ansi_force_attr_normal (a);
+ ansi_set_color(a,CRT_COLOR_NORMAL);
ansi_move (a, p);
ansi_write (a, "\033[2J", 4);
/*different emulators leave cursor in different places after cls differently*/
a->pos.x = ANSI_INVAL;
}
+int ansi_scroll_up(ANSI *a,CRT_Pos s,CRT_Pos e)
+{
+char buf[16];
+int i;
+if (s.x) return -1;
+if (e.x!=(CRT_COLS-1)) return -1;
+if (s.y) return -1;
+if (s.y>=a->size.y) return -1;
+
+ansi_showhide_cursor (a, 1);
+i=sprintf(buf,"\033[%d;%dr",s.y+1,e.y+1);
+ansi_write(a,buf,i);
+i=sprintf(buf,"\033[%d;%dH",e.y+1,0);
+ansi_write(a,buf,i);
+ansi_write (a, "\033D",2);
+ansi_write(a,"\033[r", 3);
+
+a->pos.x=ANSI_INVAL;
+
+return 0;
+}
+
+
+void ansi_spot_scroll_up(ANSI * a, CRT * c)
+{
+int l,n,p;
+
+ l = c->sh.e.x - c->sh.s.x;
+ l++;
+ l *= sizeof (CRT_CA);
+
+ n = c->sh.e.y - c->sh.s.y;
+ p = CRT_ADDR_POS (&c->sh.s);
+
+ while (n--)
+ {
+ if (memcmp (&c->screen[p], &a->crt.screen[p + CRT_COLS], l))
+ return;
+ p += CRT_COLS;
+ }
+
+ if (ansi_scroll_up(a,c->sh.s,c->sh.e)) return;
+
+ n = c->sh.e.y - c->sh.s.y;
+ p = CRT_ADDR_POS (&c->sh.s);
+
+ while (n--)
+ {
+ memcpy (&a->crt.screen[p], &a->crt.screen[p + CRT_COLS], l);
+ p += CRT_COLS;
+ }
+
+c->sh.dir=0; //FIXME: horrid hack
+
+}
+
+void ansi_spot_scroll(ANSI * a, CRT * c)
+{
+
+ switch(c->sh.dir) {
+case -1:
+/*we only care about up for the moment */
+ansi_spot_scroll_up(a,c);
+break;
+}
+
+return;
+}
+
+
+
void
ansi_draw (ANSI * a, CRT * c)
int o;
int hidden_cursor = 0;
+ ansi_spot_scroll(a,c);
+
for (p.y = 0; p.y < CRT_ROWS; ++p.y)
{
if (p.y >= a->size.y)
ansi_showhide_cursor (a, 1);
ansi_set_attr (a, CRT_ATTR_REVERSE);
+ ansi_set_color(a,CRT_MAKE_COLOR(CRT_COLOR_WHITE,CRT_COLOR_RED));
ansi_move (a, p);
ansi_write (a, msg, sizeof (msg));
ansi_cls (a);
ansi_write (a, "\033=", 2);
+ ansi_write (a, "\033[?6l", 5);
+ ansi_write (a, "\033[r", 3);
ansi_draw (a, &a->crt);
}
void
-ansi_flush_escape (ANSI * a, VT102 * v)
+ansi_flush_escape (ANSI * a, VT102 * v,TTY *t)
{
ANSI_Parser *p = &a->parser;
int i;
for (i = 0; i < p->escape_ptr; ++i)
{
- vt102_send (v, p->escape_buf[i]);
+ vt102_send (v, p->escape_buf[i],t);
}
p->escape_ptr = 0;
}
void
-ansi_parse_deckey (ANSI * a, VT102 * v)
+ansi_parse_deckey (ANSI * a, VT102 * v,TTY *t)
{
ANSI_Parser *p = &a->parser;
if ((p->escape_buf[1] != '[') && (p->escape_buf[1] != 'O'))
{
- ansi_flush_escape (a, v);
+ ansi_flush_escape (a, v,t);
return;
}
if ((p->escape_buf[2] >= 'A') || (p->escape_buf[2] <= 'Z'))
{
- vt102_send (v, KEY_UP + (p->escape_buf[2] - 'A'));
+ vt102_send (v, KEY_UP + (p->escape_buf[2] - 'A'),t);
}
else if ((p->escape_buf[2] >= 'a') || (p->escape_buf[2] <= 'z'))
{
- vt102_send (v, KEY_154 + (p->escape_buf[2] - 'a'));
+ vt102_send (v, KEY_154 + (p->escape_buf[2] - 'a'),t);
}
else
{
- ansi_flush_escape (a, v);
+ ansi_flush_escape (a, v,t);
return;
}
p->in_escape = 0;
}
void
-ansi_parse_ansikey (ANSI * a, VT102 * v)
+ansi_parse_ansikey (ANSI * a, VT102 * v,TTY *t)
{
ANSI_Parser *p = &a->parser;
if ((p->escape_buf[1] != '[') || (p->escape_buf[3] != '~'))
{
- ansi_flush_escape (a, v);
+ ansi_flush_escape (a, v,t);
return;
}
if ((p->escape_buf[2] >= '0') || (p->escape_buf[2] <= '9'))
{
- vt102_send (v, KEY_180 + (p->escape_buf[2] - '0'));
+ vt102_send (v, KEY_180 + (p->escape_buf[2] - '0'),t);
}
else
{
- ansi_flush_escape (a, v);
+ ansi_flush_escape (a, v,t);
return;
}
void
-ansi_parse_escape (ANSI * a, VT102 * v)
+ansi_parse_escape (ANSI * a, VT102 * v,TTY *t)
{
ANSI_Parser *p = &a->parser;
switch (p->escape_ptr)
case 'O':
break;
default:
- ansi_flush_escape (a, v);
+ ansi_flush_escape (a, v,t);
}
break;
case 3:
switch (p->escape_buf[1])
{
case 'O':
- ansi_parse_deckey (a, v);
+ ansi_parse_deckey (a, v,t);
break;
case '[':
if ((p->escape_buf[2] >= 'A') && (p->escape_buf[2] <= 'Z'))
- ansi_parse_deckey (a, v);
+ ansi_parse_deckey (a, v,t);
break;
default:
- ansi_flush_escape (a, v);
+ ansi_flush_escape (a, v,t);
}
break;
case 4:
switch (p->escape_buf[1])
{
case '[':
- ansi_parse_ansikey (a, v);
+ ansi_parse_ansikey (a, v,t);
break;
default:
- ansi_flush_escape (a, v);
+ ansi_flush_escape (a, v,t);
}
break;
case 5:
- ansi_flush_escape (a, v);
+ ansi_flush_escape (a, v,t);
}
}
void
-ansi_check_escape (ANSI * a, VT102 * v)
+ansi_check_escape (ANSI * a, VT102 * v,TTY *t)
{
ANSI_Parser *p = &a->parser;
struct timeval now, diff;
/*Time up? */
if (diff.tv_sec || (diff.tv_usec > ANSI_ESCAPE_TIMEOUT))
- ansi_flush_escape (a, v);
+ ansi_flush_escape (a, v,t);
}
void
-ansi_parse_char (ANSI * a, int c, VT102 * v)
+ansi_parse_char (ANSI * a, int c, VT102 * v,TTY *t)
{
ANSI_Parser *p = &a->parser;
/*See if it's time to flush the escape*/
- ansi_check_escape (a, v);
+ ansi_check_escape (a, v,t);
if (c == 033)
{
if (p->in_escape)
- ansi_flush_escape (a, v);
+ ansi_flush_escape (a, v,t);
p->in_escape++;
p->escape_ptr = 0;
if (p->in_escape)
{
p->escape_buf[p->escape_ptr++] = c;
- ansi_parse_escape (a, v);
+ ansi_parse_escape (a, v,t);
}
else
{
- vt102_send (v, c);
+ vt102_send (v, c,t);
}
}
void
-ansi_parse (ANSI * a, char *buf, int len, VT102 * v)
+ansi_parse (ANSI * a, char *buf, int len, VT102 * v,TTY *t)
{
while (len--)
- ansi_parse_char (a, *(buf++), v);
+ ansi_parse_char (a, *(buf++), v,t);
}
int
-ansi_dispatch (ANSI * a, VT102 * v)
+ansi_dispatch (ANSI * a, VT102 * v,TTY *t)
{
char buf[1024];
int red;
- ansi_check_escape (a, v);
+ ansi_check_escape (a, v,t);
red = ansi_read (a, buf, sizeof (buf));
if (red <= 0)
return red;
+#if 0
if (*buf == 3)
return -1;
+#endif
+
+#if 0
+ if (*buf == 1)
+ return 1;
+#endif
+
- ansi_parse (a, buf, red, v);
+ ansi_parse (a, buf, red, v,t);
return 0;
}