3 * - By John Hodge (thePowersGang)
6 * - VT100/xterm Emulation
9 #include "include/vt100.h"
10 #include "include/display.h"
11 #include <ctype.h> // isalpha
13 # define _SysDebug(v...) Debug("VT100 "v)
15 # include <acess/sys.h> // _SysDebug
20 const uint32_t caVT100Colours[] = {
21 // Black, Red, Green, Yellow, Blue, Purple, Cyan, Gray
22 // Same again, but bright
23 0x000000, 0x770000, 0x007700, 0x777700, 0x000077, 0x770077, 0x007777, 0xAAAAAAA,
24 0xCCCCCC, 0xFF0000, 0x00FF00, 0xFFFF00, 0x0000FF, 0xFF00FF, 0x00FFFF, 0xFFFFFFF
27 int Term_HandleVT100_Long(tTerminal *Term, int Len, const char *Buf);
29 static inline int min(int a, int b)
34 int Term_HandleVT100(tTerminal *Term, int Len, const char *Buf)
36 #define MAX_VT100_ESCAPE_LEN 16
37 static char inc_buf[MAX_VT100_ESCAPE_LEN];
38 static int inc_len = 0;
40 if( inc_len > 0 || *Buf == '\x1b' )
42 // Handle VT100 (like) escape sequence
43 int new_bytes = min(MAX_VT100_ESCAPE_LEN - inc_len, Len);
45 int old_inc_len = inc_len;
46 memcpy(inc_buf + inc_len, Buf, new_bytes);
48 if( new_bytes == 0 ) {
54 //_SysDebug("inc_buf = %i '%.*s'", inc_len, inc_len, inc_buf);
57 return 1; // Skip 1 character (the '\x1b')
61 case '[': // Multibyte, funtime starts
62 ret = Term_HandleVT100_Long(Term, inc_len-2, inc_buf+2);
68 Display_ScrollDown(Term, 1);
72 Display_ScrollDown(Term, -1);
82 assert(ret > old_inc_len);
83 //_SysDebug("%i bytes of escape code '%.*s' (return %i)",
84 // ret, ret, inc_buf, ret-old_inc_len);
85 ret -= old_inc_len; // counter cached bytes
94 // TODO: Need to handle \t and ^A-Z
96 Display_MoveCursor(Term, 0, -1);
97 Display_AddText(Term, 1, " ");
98 Display_MoveCursor(Term, 0, -1);
101 // TODO: tab (get current cursor pos, space until multiple of 8)
104 // TODO: Support disabling CR after NL
105 Display_Newline(Term, 1);
108 if( Len >= 2 && Buf[1] == '\n' ) {
109 Display_Newline(Term, 1);
113 Display_MoveCursor(Term, 0, INT_MIN);
128 // Force an exit right now
140 int Term_HandleVT100_Long(tTerminal *Term, int Len, const char *Buffer)
144 int args[6] = {0,0,0,0,0,0};
145 int bQuestionMark = 0;
148 if(j == Len) return 0;
152 if(j == Len) return 0;
155 if( '0' <= c && c <= '9' )
159 if(j == Len) return 0;
162 while('0' <= c && c <= '9') {
165 if(j == Len) return 0;
175 _SysDebug("Unexpected char 0x%x in VT100 escape code '\\e[%.*s'", c,
191 case 25: // Hide cursor
192 _SysDebug("TODO: \\e[?25%c Show/Hide cursor", c);
194 case 1047: // Alternate buffer
195 Display_ShowAltBuffer(Term, set);
198 _SysDebug("TODO: \\e[?%i%c Unknow DEC private mode", args[0], c);
203 _SysDebug("Unknown VT100 extended escape char 0x%x", c);
216 Display_SetCursor(Term, args[0], args[1]);
224 _SysDebug("TODO: VT100 %i J", args[0]);
226 case 2: // Everything
227 Display_ClearLines(Term, 0);
230 _SysDebug("Unknown VT100 %i J", args[0]);
239 _SysDebug("TODO: VT100 %i K", args[0]);
242 Display_ClearLine(Term, 0);
245 _SysDebug("Unknown VT100 %i K", args[0]);
248 case 'T': // Scroll down n=1
249 Display_ScrollDown(Term, 1);
255 Display_ResetAttributes(Term);
259 for( int i = 0; i < argc; i ++ )
264 Display_ResetAttributes(Term);
268 Display_SetForeground( Term, caVT100Colours[ args[i]-30 ] );
272 Display_SetBackground( Term, caVT100Colours[ args[i]-30 ] );
275 _SysDebug("TODO: VT100 \\e[%im", args[i]);
281 // Set scrolling region
283 Display_SetScrollArea(Term, args[0], args[1] - args[0]);
287 Display_SaveCursor(Term);
290 Display_RestoreCursor(Term);
293 _SysDebug("Unknown VT100 long escape char 0x%x '%c'", c, c);