3 * - By John Hodge (thePowersGang)
6 * - Virtual Terminal - VT100 (Kinda) Emulation
11 const Uint16 caVT100Colours[] = {
12 // Black, Red, Green, Yellow, Blue, Purple, Cyan, Gray
13 // Same again, but bright
14 VT_COL_BLACK, 0x700, 0x070, 0x770, 0x007, 0x707, 0x077, 0xAAA,
15 VT_COL_GREY, 0xF00, 0x0F0, 0xFF0, 0x00F, 0xF0F, 0x0FF, VT_COL_WHITE
20 * \brief Handle a standard large escape code
22 * Handles any escape code of the form \x1B[n,...A where n is an integer
23 * and A is any letter.
25 void VT_int_ParseEscape_StandardLarge(tVTerm *Term, char CmdChar, int argc, int *args)
35 if(argc == 1) tmp *= args[0];
36 if( Term->Flags & VT_FLAG_ALTBUF )
38 if( (Term->AltWritePos + tmp) % Term->TextWidth == 0 ) {
39 Term->AltWritePos -= Term->AltWritePos % Term->TextWidth;
40 Term->AltWritePos += Term->TextWidth - 1;
43 Term->AltWritePos += tmp;
47 if( (Term->WritePos + tmp) % Term->TextWidth == 0 ) {
48 Term->WritePos -= Term->WritePos % Term->TextWidth;
49 Term->WritePos += Term->TextWidth - 1;
52 Term->WritePos += tmp;
60 case 0: // Erase below
62 case 1: // Erase above
65 if( Term->Flags & VT_FLAG_ALTBUF )
67 int i = Term->TextHeight;
68 while( i-- ) VT_int_ClearLine(Term, i);
69 Term->AltWritePos = 0;
70 VT_int_UpdateScreen(Term, 1);
74 int i = Term->TextHeight * (giVT_Scrollback + 1);
75 while( i-- ) VT_int_ClearLine(Term, i);
78 VT_int_UpdateScreen(Term, 1);
88 case 0: // Erase to right
89 if( Term->Flags & VT_FLAG_ALTBUF )
92 max = Term->Width - Term->AltWritePos % Term->Width;
93 for( i = 0; i < max; i ++ )
94 Term->AltBuf[Term->AltWritePos+i].Ch = 0;
99 max = Term->Width - Term->WritePos % Term->Width;
100 for( i = 0; i < max; i ++ )
101 Term->Text[Term->WritePos+i].Ch = 0;
103 VT_int_UpdateScreen(Term, 0);
105 case 1: // Erase to left
106 if( Term->Flags & VT_FLAG_ALTBUF )
108 int i = Term->AltWritePos % Term->Width;
110 Term->AltBuf[Term->AltWritePos++].Ch = 0;
114 int i = Term->WritePos % Term->Width;
116 Term->Text[Term->WritePos++].Ch = 0;
118 VT_int_UpdateScreen(Term, 0);
121 if( Term->Flags & VT_FLAG_ALTBUF )
123 VT_int_ClearLine(Term, Term->AltWritePos / Term->Width);
127 VT_int_ClearLine(Term, Term->WritePos / Term->Width);
129 VT_int_UpdateScreen(Term, 0);
134 // Set cursor position
136 if( Term->Flags & VT_FLAG_ALTBUF )
137 Term->AltWritePos = args[0] + args[1]*Term->TextWidth;
139 Term->WritePos = args[0] + args[1]*Term->TextWidth;
140 //Log_Debug("VTerm", "args = {%i, %i}", args[0], args[1]);
142 // // Reset formatting?
144 // Term->CurColour = DEFAULT_COLOUR;
146 // Scroll up `n` lines
149 // Scroll down `n` lines
151 if(argc == 1) tmp *= args[0];
152 if( Term->Flags & VT_FLAG_ALTBUF )
153 VT_int_ScrollText(Term, tmp);
156 if(Term->ViewPos/Term->TextWidth + tmp < 0)
158 if(Term->ViewPos/Term->TextWidth + tmp > Term->TextHeight * (giVT_Scrollback + 1))
161 Term->ViewPos += Term->TextWidth*tmp;
170 case 2: // Keyboard action mode
171 case 4: // Insert mode
172 case 12: // Send/receive
173 case 20: // Automatic newline
187 if( 0 <= args[argc] && args[argc] <= 8)
191 case 0: Term->CurColour = DEFAULT_COLOUR; break; // Reset
192 case 1: Term->CurColour |= 0x80000000; break; // Bright
193 case 2: Term->CurColour &= ~0x80000000; break; // Dim
197 else if(30 <= args[argc] && args[argc] <= 37) {
198 // Get colour index, accounting for bright bit
199 colour_idx = args[argc]-30 + ((Term->CurColour>>28) & 8);
200 Term->CurColour &= 0x8000FFFF;
201 Term->CurColour |= (Uint32)caVT100Colours[ colour_idx ] << 16;
204 else if(40 <= args[argc] && args[argc] <= 47) {
205 // Get colour index, accounting for bright bit
206 colour_idx = args[argc]-40 + ((Term->CurColour>>12) & 8);
207 Term->CurColour &= 0xFFFF8000;
208 Term->CurColour |= caVT100Colours[ colour_idx ];
210 // Foreground Colour - bright
211 else if(90 <= args[argc] && args[argc] <= 97 ) {
212 colour_idx = args[argc]-90 + 8;
213 Term->CurColour &= 0x8000FFFF;
214 Term->CurColour |= (Uint32)caVT100Colours[ colour_idx ] << 16;
216 // Background Colour - bright
217 else if(100 <= args[argc] && args[argc] <= 107 ) {
218 colour_idx = args[argc]-100 + 8;
219 Term->CurColour &= 0xFFFF8000;
220 Term->CurColour |= (Uint32)caVT100Colours[ colour_idx ];
223 Log_Warning("VTerm", "Unknown font flag %i", args[argc]);
228 // Set scrolling region
230 if( argc != 2 ) break;
231 Term->ScrollTop = args[0];
232 Term->ScrollHeight = args[1] - args[0];
235 // Save cursor position
237 if( argc != 0 ) break;
238 Term->SavedWritePos = (Term->Flags & VT_FLAG_ALTBUF) ? Term->AltWritePos : Term->WritePos;
241 // Restore saved cursor position
243 if( argc != 0 ) break;
244 *((Term->Flags & VT_FLAG_ALTBUF) ? &Term->AltWritePos : &Term->WritePos) = Term->SavedWritePos;
248 Log_Warning("VTerm", "Unknown control sequence '\\x1B[%c'", CmdChar);
254 * \fn int VT_int_ParseEscape(tVTerm *Term, const char *Buffer)
255 * \brief Parses a VT100 Escape code
257 int VT_int_ParseEscape(tVTerm *Term, const char *Buffer, size_t Bytes)
261 int args[6] = {0,0,0,0};
262 int bQuestionMark = 0;
263 const int ofs = Term->EscapeCodeLen;
264 const int sparespace = sizeof(Term->EscapeCodeCache)-Term->EscapeCodeLen;
265 const int copysize = MIN(Bytes, sparespace);
267 memcpy( Term->EscapeCodeCache + Term->EscapeCodeLen, Buffer, copysize );
268 Term->EscapeCodeLen += copysize;
270 Bytes = Term->EscapeCodeLen;
271 Buffer = Term->EscapeCodeCache;
273 if( Bytes == j ) return j-ofs;
276 Term->EscapeCodeLen = 0;
280 if( Bytes == j ) return j-ofs;
288 if(Bytes == j) return j-ofs;
292 if(Bytes == j) return j-ofs;
295 if( '0' <= c && c <= '9' )
299 if(Bytes == j) return j-ofs;
302 while('0' <= c && c <= '9') {
305 if(Bytes == j) return j-ofs;
313 if( !('a' <= c && c <= 'z') && !('A' <= c && c <= 'Z') )
315 // Error - eat ESC only?
316 // > j : Entire code skipped
317 Term->EscapeCodeLen = 0;
325 // DEC Private Mode Set
331 Term->Flags &= ~VT_FLAG_HIDECSR;
334 VT_int_ToggleAltBuffer(Term, 1);
343 Term->Flags |= VT_FLAG_HIDECSR;
346 VT_int_ToggleAltBuffer(Term, 0);
351 Log_Warning("VTerm", "Unknown control sequence '\\x1B[?%c'", c);
357 VT_int_ParseEscape_StandardLarge(Term, c, argc, args);
364 //Log_Notice("VTerm", "TODO: Handle short escape codes");
366 static volatile int tmp = 0;
369 Debug("VTerm: Unknown short 0x%x", c);
376 //Log_Debug("VTerm", "j = %i, Buffer = '%s'", j, Buffer);
377 Term->EscapeCodeLen = 0;