3 * - By John Hodge (thePowersGang)
6 * - Virtual Terminal - Terminal buffer manipulation
9 #define DEBUG_CHECKHEAP 0
13 # define HEAP_VALIDATE() Heap_Validate()
15 # define HEAP_VALIDATE() do{}while(0)
18 extern int Term_HandleVT100(tVTerm *Term, int Len, const char *Buf);
23 * \fn void VT_int_PutString(tVTerm *Term, const Uint8 *Buffer, Uint Count)
24 * \brief Print a string to the Virtual Terminal
26 void VT_int_PutString(tVTerm *Term, const Uint8 *Buffer, Uint Count)
29 for( int ofs = 0; ofs < Count; )
31 int esc_len = Term_HandleVT100(Term, Count - ofs, (const void*)(Buffer + ofs));
34 //LOG("%i '%*C'", esc_len, esc_len, Buffer+ofs);
35 LOG("%i '%.*s'", esc_len, esc_len, Buffer+ofs);
36 VT_int_PutRawString(Term, Buffer + ofs, esc_len);
37 //Debug("Raw string '%.*s'", esc_len, Buffer+ofs);
40 //Debug("Escape code '%.*s'", esc_len, Buffer+ofs);
42 ASSERTCR(esc_len, >, 0, );
46 VT_int_UpdateScreen( Term, 1 );
49 void VT_int_PutRawString(tVTerm *Term, const Uint8 *String, size_t Bytes)
51 for( int i = 0; i < Bytes; ) {
53 i += ReadUTF8(String+i, &val);
54 VT_int_PutChar(Term, val);
59 * \fn void VT_int_PutChar(tVTerm *Term, Uint32 Ch)
60 * \brief Write a single character to a VTerm
62 void VT_int_PutChar(tVTerm *Term, Uint32 Ch)
68 const size_t maxrows = VT_int_GetBufferRows(Term);
69 const size_t limit = maxrows * Term->TextWidth;
70 tVT_Pos *wrpos = VT_int_GetWritePosPtr(Term);
71 tVT_Char *buffer = (Term->Flags & VT_FLAG_ALTBUF ? Term->AltBuf : Term->Text);
73 // If writing with the cursor on righthand edge, wrap down to next line
74 // TODO: Wrap to same line?
75 if( wrpos->Col >= Term->TextWidth )
77 ASSERTC(wrpos->Col, <=, Term->TextWidth);
78 VT_int_UpdateScreen( Term, 0 );
83 // Scroll entire buffer (about to write outside limit)
84 if( wrpos->Row >= maxrows )
86 ASSERTC(wrpos->Row, <, maxrows + 1);
87 VT_int_ScrollText(Term, 1);
91 // Bring written cell into view
92 if( !(Term->Flags & VT_FLAG_ALTBUF) )
94 if( wrpos->Row >= Term->ViewTopRow + Term->TextHeight )
96 size_t new_pos = wrpos->Row - (Term->TextHeight - 1);
97 size_t count = new_pos - Term->ViewTopRow;
98 VT_int_ScrollFramebuffer(Term, count);
99 //Debug("VT_int_PutChar: VScroll down to %i", new_pos);
100 Term->ViewTopRow = new_pos;
102 else if( wrpos->Row < Term->ViewTopRow )
104 size_t new_pos = wrpos->Row;
105 size_t count = Term->ViewTopRow - new_pos;
106 VT_int_ScrollFramebuffer(Term, -count);
107 //Debug("VT_int_PutChar: VScroll up to %i", new_pos);
108 Term->ViewTopRow = new_pos;
112 // no action, cell is visible
116 size_t write_pos = wrpos->Row * Term->TextWidth + wrpos->Col;
117 ASSERTC(write_pos, <, limit);
121 case '\0': // Ignore NULL byte
124 VT_int_UpdateScreen( Term, 0 ); // Update the line before newlining
126 // TODO: Force scroll?
132 size_t col = wrpos->Col;
134 buffer[ write_pos ].Ch = '\0';
135 buffer[ write_pos ].Colour = Term->CurColour;
138 } while( (col & 7) && col < Term->TextWidth );
142 // Backspace is invalid at Offset 0
143 if(write_pos == 0) break;
147 if(buffer[ write_pos ].Ch != '\0') {
148 buffer[ write_pos ].Ch = 0;
149 buffer[ write_pos ].Colour = Term->CurColour;
153 i = 7; // Limit it to 8
155 buffer[ write_pos ].Ch = 0;
156 buffer[ write_pos ].Colour = Term->CurColour;
158 } while(write_pos && i-- && buffer[ write_pos ].Ch == '\0');
159 if(buffer[ write_pos ].Ch != '\0')
161 wrpos->Col = write_pos % Term->TextWidth;
165 buffer[ write_pos ].Ch = Ch;
166 buffer[ write_pos ].Colour = Term->CurColour;
167 // Update the line before wrapping
168 if( (write_pos + 1) % Term->TextWidth == 0 )
169 VT_int_UpdateScreen( Term, 0 );
175 ASSERTC(write_pos, <=, limit);
179 // TODO: Schedule a delayed screen update
184 void VT_int_ScrollText(tVTerm *Term, int Count)
187 int scroll_top, scroll_height;
191 // Get buffer pointer and attributes
192 size_t height = VT_int_GetBufferRows(Term);
193 tVT_Pos *wrpos = VT_int_GetWritePosPtr(Term);
195 if( Term->Flags & VT_FLAG_ALTBUF )
198 scroll_top = Term->ScrollTop;
199 scroll_height = Term->ScrollHeight;
205 scroll_height = height;
208 const tVT_Pos init_wrpos = *wrpos;
210 // Scroll text upwards (more space at bottom)
214 if(Count > scroll_height) Count = scroll_height;
215 size_t chars = Term->TextWidth*Count;
216 size_t base = Term->TextWidth*scroll_top;
217 size_t len = Term->TextWidth*(scroll_height - Count);
219 // Scroll terminal cache
220 ASSERTC( base + chars + len, <=, Term->TextWidth*height );
221 memmove( &buf[base], &buf[base+chars], len*sizeof(tVT_Char) );
224 for( int i = 0; i < chars; i ++ )
226 ASSERTC(base + len + i, <, Term->TextWidth*height);
227 buf[ base + len + i ].Ch = 0;
228 buf[ base + len + i ].Colour = Term->CurColour;
232 VT_int_ScrollFramebuffer( Term, Count );
233 if( Term->Flags & VT_FLAG_ALTBUF )
234 wrpos->Row = scroll_top;
236 wrpos->Row = Term->ViewTopRow + (Term->TextHeight - Count);
237 for( int i = 0; i < Count; i ++ )
239 VT_int_UpdateScreen( Term, 0 );
246 if(Count > scroll_height) Count = scroll_height;
248 size_t chars = Term->TextWidth*Count;
249 size_t base = Term->TextWidth*scroll_top;
250 size_t len = Term->TextWidth*scroll_height - chars;
252 // Scroll terminal cache
253 ASSERTC( base + chars + len, <=, Term->TextWidth*height );
254 memmove( &buf[base+chars], &buf[base], len*sizeof(tVT_Char) );
256 // Clear preceding rows
257 for( int i = 0; i < chars; i ++ )
260 buf[ i ].Colour = Term->CurColour;
263 // Update screen (shift framebuffer, re-render revealed lines)
264 VT_int_ScrollFramebuffer( Term, -Count );
265 if( Term->Flags & VT_FLAG_ALTBUF )
266 wrpos->Row = scroll_top;
268 wrpos->Row = Term->ViewTopRow;
269 for( int i = 0; i < Count; i ++ )
271 VT_int_UpdateScreen( Term, 0 );
282 * \brief Clears a line in a virtual terminal
283 * \param Term Terminal to modify
284 * \param Num Line number to clear
286 void VT_int_ClearLine(tVTerm *Term, int Row)
290 size_t height = VT_int_GetBufferRows(Term);
291 tVT_Char *buffer = (Term->Flags & VT_FLAG_ALTBUF ? Term->AltBuf : Term->Text);
292 ASSERTCR(Row, >=, 0, );
293 ASSERTCR(Row, <, height, );
295 size_t base = Row * Term->TextWidth;
297 for( int i = 0; i < Term->TextWidth; i ++ )
299 buffer[ base + i ].Ch = 0;
300 buffer[ base + i ].Colour = Term->CurColour;
306 void VT_int_ClearInLine(tVTerm *Term, int Row, int FirstCol, int LastCol)
310 size_t height = VT_int_GetBufferRows(Term);
311 tVT_Char *buffer = (Term->Flags & VT_FLAG_ALTBUF ? Term->AltBuf : Term->Text);
312 ASSERTCR(Row, >=, 0, );
313 ASSERTCR(Row, <, height, );
315 ASSERTCR(FirstCol, <=, LastCol, );
316 ASSERTCR(FirstCol, <, Term->TextWidth, );
317 ASSERTCR(LastCol, <=, Term->TextWidth, );
319 size_t base = Row * Term->TextWidth;
320 for( int i = FirstCol; i < LastCol; i ++ )
322 ASSERTC(base + i, <, height * Term->TextWidth);
323 buffer[ base + i ].Ch = 0;
324 buffer[ base + i ].Colour = Term->CurColour;
331 * \brief Update the screen mode
332 * \param Term Terminal to update
333 * \param NewMode New mode to set
334 * \param NewWidth New framebuffer width
335 * \param NewHeight New framebuffer height
337 void VT_int_Resize(tVTerm *Term, int NewWidth, int NewHeight)
339 int oldW = Term->Width;
340 int oldTW = Term->TextWidth;
341 int oldH = Term->Height;
342 int oldTH = Term->TextHeight;
343 tVT_Char *oldTBuf = Term->Text;
344 Uint32 *oldFB = Term->Buffer;
349 // TODO: Increase RealWidth/RealHeight when this happens
350 if(NewWidth > giVT_RealWidth) NewWidth = giVT_RealWidth;
351 if(NewHeight > giVT_RealHeight) NewHeight = giVT_RealHeight;
353 // Fast exit if no resolution change
354 if(NewWidth == Term->Width && NewHeight == Term->Height)
357 // Calculate new dimensions
358 Term->Width = NewWidth;
359 Term->Height = NewHeight;
360 Term->TextWidth = NewWidth / giVT_CharWidth;
361 Term->TextHeight = NewHeight / giVT_CharHeight;
362 Term->ScrollHeight = Term->TextHeight - (oldTH - Term->ScrollHeight) - Term->ScrollTop;
364 // Allocate new buffers
367 Term->TextWidth * Term->TextHeight * (giVT_Scrollback+1),
372 w = (oldTW > Term->TextWidth) ? Term->TextWidth : oldTW;
373 h = (oldTH > Term->TextHeight) ? Term->TextHeight : oldTH;
374 h *= giVT_Scrollback + 1;
375 for( int i = 0; i < h; i ++ )
378 &Term->Text[i*Term->TextWidth],
387 Term->AltBuf = realloc(
389 Term->TextWidth * Term->TextHeight * sizeof(tVT_Char)
394 Term->Buffer = calloc( Term->Width * Term->Height, sizeof(Uint32) );
396 w = (oldW > Term->Width) ? Term->Width : oldW;
397 h = (oldH > Term->Height) ? Term->Height : oldH;
398 for( int i = 0; i < h; i ++ )
401 &Term->Buffer[i*Term->Width],
414 Log_Log("VTerm", "Set VT %p to text mode (%ix%i)",
415 Term, Term->TextWidth, Term->TextHeight);
418 Log_Log("VTerm", "Set VT %p to framebuffer mode (%ix%i)",
419 Term, Term->Width, Term->Height);
421 //case TERM_MODE_2DACCEL:
422 //case TERM_MODE_3DACCEL:
431 void VT_int_ToggleAltBuffer(tVTerm *Term, int Enabled)
434 Term->Flags |= VT_FLAG_ALTBUF;
436 Term->Flags &= ~VT_FLAG_ALTBUF;
437 VT_int_UpdateScreen(Term, 1);
440 tVT_Pos *VT_int_GetWritePosPtr(tVTerm *Term)
442 return ((Term->Flags & VT_FLAG_ALTBUF) ? &Term->AltWritePos : &Term->WritePos);
445 size_t VT_int_GetBufferRows(tVTerm *Term)
447 return ((Term->Flags & VT_FLAG_ALTBUF) ? 1 : (giVT_Scrollback+1))*Term->TextHeight;