Kernel/vterm - Fix clobbering of AltBuf's heap footer
[tpg/acess2.git] / KernelLand / Kernel / drv / vterm_vt100.c
1 /*
2  * Acess2 Kernel
3  * - By John Hodge (thePowersGang)
4  *
5  * drv/vterm_vt100.c
6  * - Virtual Terminal - VT100 (Kinda) Emulation
7  */
8 #define DEBUG   0
9 #include "vterm.h"
10
11 #define sTerminal       sVTerm
12 #include "../../../Usermode/Applications/gui_terminal_src/vt100.c"
13
14 void *Display_GetTermState(tTerminal *Term) {
15         return Term->VT100Info;;
16 }
17 void Display_SetTermState(tTerminal *Term, void *State) {
18         Term->VT100Info = State;
19 }
20
21 void Display_AddText(tTerminal *Term, size_t Length, const char *UTF8Text)
22 {
23         LOG("'%*C'", Length, UTF8Text);
24         VT_int_PutRawString(Term, (const void*)UTF8Text, Length);
25 }
26 void Display_Newline(tTerminal *Term, bool bCarriageReturn)
27 {
28         LOG("");
29         VT_int_PutChar(Term, '\n');
30 }
31 void Display_SetScrollArea(tTerminal *Term, int Start, int Count)
32 {
33         LOG("(%i,+%i)", Start, Count);
34         Term->ScrollTop = Start;
35         Term->ScrollHeight = Count;
36 }
37 void Display_ScrollDown(tTerminal *Term, int CountDown)
38 {
39         LOG("(%i)", CountDown);
40         VT_int_UpdateScreen(Term, 0);
41         if( Term->Flags & VT_FLAG_ALTBUF )
42                 VT_int_ScrollText(Term, CountDown);
43         else
44         {
45                 if(Term->ViewPos/Term->TextWidth + CountDown < 0)
46                         return ;
47                 if(Term->ViewPos/Term->TextWidth + CountDown  > Term->TextHeight * (giVT_Scrollback + 1))
48                         return ;
49                 
50                 Term->ViewPos += Term->TextWidth * CountDown;
51         }
52 }
53 void Display_SetCursor(tTerminal *Term, int Row, int Col)
54 {
55         LOG("(R%i,C%i)", Row, Col);
56         VT_int_UpdateScreen(Term, 0);
57          int    maxrows = ((Term->Flags & VT_FLAG_ALTBUF) ? 1 : (giVT_Scrollback+1))*Term->TextHeight;
58         ASSERTCR( Row, >=, 0, );
59         ASSERTCR( Row, <, maxrows, );
60         ASSERTCR( Col, >=, 0, );
61         ASSERTCR( Col, <, Term->TextWidth, );
62         *(Term->Flags & VT_FLAG_ALTBUF ? &Term->AltWritePos : &Term->WritePos) = Row*Term->TextWidth + Col;
63 }
64 void Display_MoveCursor(tTerminal *Term, int RelRow, int RelCol)
65 {
66         LOG("(R+%i,C+%i)", RelRow, RelCol);
67         int     *wrpos = (Term->Flags & VT_FLAG_ALTBUF ? &Term->AltWritePos : &Term->WritePos);
68
69         if( RelCol != 0 )
70         {
71                 // 
72                 if( RelCol < 0 )
73                 {
74                          int    avail = *wrpos % Term->TextWidth;
75                         if( RelCol < -avail )
76                                 RelCol = -avail;
77                 }
78                 else
79                 {
80                         size_t  avail = Term->TextWidth - (*wrpos % Term->TextWidth);
81                         if(RelCol > avail)
82                                 RelCol = avail;
83                 }
84                 *wrpos += RelCol;
85         }
86         if( RelRow != 0 )
87         {
88                  int    currow = *wrpos / Term->TextWidth;
89                  int    maxrows = ((Term->Flags & VT_FLAG_ALTBUF) ? 1 : (giVT_Scrollback+1))*Term->TextHeight;
90                 if( RelRow < 0 )
91                 {
92                         if( RelRow < -currow )
93                                 RelRow = -currow;
94                 }
95                 else
96                 {
97                         if( currow + RelRow > maxrows-1 )
98                                 RelRow = maxrows-1 - currow;
99                 }
100                 *wrpos += RelRow*Term->TextWidth;
101         }
102         LOG("=(R%i,C%i)", *wrpos / Term->TextWidth, *wrpos % Term->TextWidth);
103 }
104 void Display_SaveCursor(tTerminal *Term)
105 {
106         Term->SavedWritePos = (Term->Flags & VT_FLAG_ALTBUF) ? Term->AltWritePos : Term->WritePos;
107         LOG("Saved = %i", Term->SavedWritePos);
108 }
109 void Display_RestoreCursor(tTerminal *Term)
110 {
111          int    max = ((Term->Flags & VT_FLAG_ALTBUF) ? 1 : (giVT_Scrollback+1))*Term->TextHeight * Term->TextWidth;
112          int    *wrpos = ((Term->Flags & VT_FLAG_ALTBUF) ? &Term->AltWritePos : &Term->WritePos);
113         if( Term->SavedWritePos >= max )
114                 *wrpos = max-1;
115         else
116                 *wrpos = Term->SavedWritePos;
117         LOG("Restored %i", *wrpos);
118 }
119 // 0: All, 1: Forward, -1: Reverse
120 void Display_ClearLine(tTerminal *Term, int Dir)
121 {
122         const int       wrpos = (Term->Flags & VT_FLAG_ALTBUF ? Term->AltWritePos : Term->WritePos);
123         const int       row = wrpos / Term->TextWidth;
124         const int       col = wrpos % Term->TextWidth;
125
126         LOG("(Dir=%i)", Dir);
127
128         // Erase all
129         if( Dir == 0 ) {
130                 VT_int_ClearLine(Term, row);
131                 VT_int_UpdateScreen(Term, 0);
132         }
133         // Erase to right
134         else if( Dir == 1 ) {
135                 VT_int_ClearInLine(Term, row, col, Term->TextWidth);
136                 VT_int_UpdateScreen(Term, 0);
137         }
138         // Erase to left
139         else if( Dir == -1 ) {
140                 VT_int_ClearInLine(Term, row, 0, col);
141                 VT_int_UpdateScreen(Term, 0);
142         }
143         else {
144                 // ERROR!
145                 ASSERTC(Dir, >=, -1);
146                 ASSERTC(Dir, <=, 1);
147         }
148 }
149 void Display_ClearLines(tTerminal *Term, int Dir)
150 {
151         LOG("(Dir=%i)", Dir);   
152          int    *wrpos = (Term->Flags & VT_FLAG_ALTBUF ? &Term->AltWritePos : &Term->WritePos);
153         
154         // All
155         if( Dir == 0 ) {
156                 int count;
157                 
158                 if( Term->Flags & VT_FLAG_ALTBUF ) {
159                         count = Term->TextHeight;
160                 }
161                 else {
162                         count = Term->TextHeight * (giVT_Scrollback + 1);
163                         Term->ViewPos = 0;
164                 }
165                 while( count -- )
166                         VT_int_ClearLine(Term, count);
167                 *wrpos = 0;
168                 VT_int_UpdateScreen(Term, 1);
169         }
170         // Downwards
171         else if( Dir == 1 ) {
172                 Log_Warning("VTerm", "TODO: ClearLines Down");
173         }
174         // Upwards
175         else if( Dir == -1 ) {
176                 Log_Warning("VTerm", "TODO: ClearLines Up");
177         }
178         else {
179                 // ERROR!
180                 ASSERTC(Dir, >=, -1);
181                 ASSERTC(Dir, <=, 1);
182         }
183 }
184 void Display_ResetAttributes(tTerminal *Term)
185 {
186         LOG("");        
187         Term->CurColour = DEFAULT_COLOUR;
188 }
189 void Display_SetForeground(tTerminal *Term, uint32_t RGB)
190 {
191         LOG("(%06x)", RGB);
192         Term->CurColour &= 0x8000FFFF;
193         Term->CurColour |= (Uint32)VT_Colour24to12(RGB) << 16;
194         
195 }
196 void Display_SetBackground(tTerminal *Term, uint32_t RGB)
197 {
198         LOG("(%06x)", RGB);
199         Term->CurColour &= 0xFFFF8000;
200         Term->CurColour |= (Uint32)VT_Colour24to12(RGB) <<  0;
201 }
202 void Display_Flush(tTerminal *Term)
203 {
204         LOG("");
205         VT_int_UpdateScreen(Term, 0);
206 }
207 void Display_ShowAltBuffer(tTerminal *Term, bool AltBufEnabled)
208 {
209         LOG("(%B)", AltBufEnabled);
210         VT_int_ToggleAltBuffer(Term, AltBufEnabled);
211 }
212 void Display_SetTitle(tTerminal *Term, const char *Title)
213 {
214         // ignore
215 }
216

UCC git Repository :: git.ucc.asn.au