2 * Acess2 Virtual Terminal Driver
8 #include <tpl_drv_video.h>
9 #include <tpl_drv_keyboard.h>
10 #include <tpl_drv_terminal.h>
13 #define USE_CTRL_ALT 0
16 #define VERSION ((0<<8)|(50))
19 #define MAX_INPUT_CHARS32 64
20 #define MAX_INPUT_CHARS8 (MAX_INPUT_CHARS32*4)
21 #define VT_SCROLLBACK 2 // 2 Screens of text
22 //#define DEFAULT_OUTPUT "VGA"
23 //#define DEFAULT_OUTPUT "BochsGA"
24 #define DEFAULT_OUTPUT "Vesa"
25 #define DEFAULT_INPUT "PS2Keyboard"
26 #define DEFAULT_WIDTH 80
27 #define DEFAULT_HEIGHT 25
28 #define DEFAULT_COLOUR (VT_COL_BLACK|(0xAAA<<16))
30 #define VT_FLAG_HIDECSR 0x01
31 #define VT_FLAG_HASFB 0x10 //!< Set if the VTerm has requested the Framebuffer
34 VT_INMODE_TEXT8, // UTF-8 Text Mode (VT100 Emulation)
35 VT_INMODE_TEXT32, // UTF-32 Text Mode (Acess Native)
41 int Mode; //!< Current Mode (see ::eTplTerminal_Modes)
42 int Flags; //!< Flags (see VT_FLAG_*)
43 short Width; //!< Virtual Width
44 short Height; //!< Virtual Height
46 int ViewPos; //!< View Buffer Offset (Text Only)
47 int WritePos; //!< Write Buffer Offset (Text Only)
48 Uint32 CurColour; //!< Current Text Colour
50 int InputRead; //!< Input buffer read position
51 int InputWrite; //!< Input buffer write position
52 char InputBuffer[MAX_INPUT_CHARS8];
57 char Name[2]; //!< Name of the terminal
62 extern void Debug_SetKTerminal(char *File);
65 int VT_Install(char **Arguments);
66 void VT_InitOutput(void);
67 void VT_InitInput(void);
68 char *VT_ReadDir(tVFS_Node *Node, int Pos);
69 tVFS_Node *VT_FindDir(tVFS_Node *Node, char *Name);
70 int VT_Root_IOCtl(tVFS_Node *Node, int Id, void *Data);
71 Uint64 VT_Read(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer);
72 Uint64 VT_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer);
73 int VT_Terminal_IOCtl(tVFS_Node *Node, int Id, void *Data);
74 void VT_SetResolution(int IsTextMode, int Width, int Height);
75 void VT_SetTerminal(int ID);
76 void VT_KBCallBack(Uint32 Codepoint);
77 void VT_int_PutString(tVTerm *Term, Uint8 *Buffer, Uint Count);
78 int VT_int_ParseEscape(tVTerm *Term, char *Buffer);
79 void VT_int_PutChar(tVTerm *Term, Uint32 Ch);
80 void VT_int_ScrollFramebuffer( tVTerm *Term );
81 void VT_int_UpdateScreen( tVTerm *Term, int UpdateAll );
82 void VT_int_ChangeMode(tVTerm *Term, int NewMode);
85 const Uint16 caVT100Colours[] = {
86 VT_COL_BLACK, 0x700, 0x070, 0x770, 0x007, 0x707, 0x077, 0xAAA,
87 VT_COL_GREY, 0xF00, 0x0F0, 0xFF0, 0x00F, 0xF0F, 0x0FF, VT_COL_WHITE
91 MODULE_DEFINE(0, VERSION, VTerm, VT_Install, NULL, DEFAULT_OUTPUT, DEFAULT_INPUT, NULL);
92 tDevFS_Driver gVT_DrvInfo = {
95 .Flags = VFS_FFLAG_DIRECTORY,
99 .ReadDir = VT_ReadDir,
100 .FindDir = VT_FindDir,
101 .IOCtl = VT_Root_IOCtl
105 tVTerm gVT_Terminals[NUM_VTS];
106 int giVT_CurrentTerminal = 0;
107 tVTerm *gpVT_CurTerm = &gVT_Terminals[0];
108 // --- Video State ---
109 short giVT_RealWidth; //!< Real Width
110 short giVT_RealHeight; //!< Real Height
111 // --- Driver Handles ---
112 char *gsVT_OutputDevice = NULL;
113 char *gsVT_InputDevice = NULL;
114 int giVT_OutputDevHandle = -2;
115 int giVT_InputDevHandle = -2;
116 // --- Key States --- (Used for VT Switching/Magic Combos)
117 int gbVT_CtrlDown = 0;
118 int gbVT_AltDown = 0;
119 int gbVT_SysrqDown = 0;
123 * \fn int VT_Install(char **Arguments)
124 * \brief Installs the Virtual Terminal Driver
126 int VT_Install(char **Arguments)
128 char **args = Arguments;
135 for( ; (arg = *args); args++ )
137 if(arg[0] != '-') continue;
143 if(args[1] == NULL) break;
144 if(gsVT_OutputDevice) free(gsVT_OutputDevice);
145 gsVT_OutputDevice = malloc(strlen(args[1])+1);
146 strcpy(gsVT_OutputDevice, args[1]);
152 if(args[1] == NULL) break;
153 if(gsVT_InputDevice) free(gsVT_InputDevice);
154 gsVT_InputDevice = malloc(strlen(args[1])+1);
155 strcpy(gsVT_InputDevice, args[1]);
163 if(!gsVT_OutputDevice) gsVT_OutputDevice = "/Devices/"DEFAULT_OUTPUT;
164 if(!gsVT_InputDevice) gsVT_InputDevice = "/Devices/"DEFAULT_INPUT;
166 Log_Log("VTerm", "Using '%s' as output", gsVT_OutputDevice);
167 Log_Log("VTerm", "Using '%s' as input", gsVT_InputDevice);
170 for( i = 0; i < NUM_VTS; i++ )
172 gVT_Terminals[i].Mode = TERM_MODE_TEXT;
173 gVT_Terminals[i].Flags = 0;
174 gVT_Terminals[i].Width = DEFAULT_WIDTH;
175 gVT_Terminals[i].Height = DEFAULT_HEIGHT;
176 gVT_Terminals[i].CurColour = DEFAULT_COLOUR;
177 gVT_Terminals[i].WritePos = 0;
178 gVT_Terminals[i].ViewPos = 0;
180 gVT_Terminals[i].Buffer = calloc( DEFAULT_WIDTH*DEFAULT_HEIGHT*VT_SCROLLBACK, sizeof(tVT_Char) );
182 gVT_Terminals[i].Name[0] = '0'+i;
183 gVT_Terminals[i].Name[1] = '\0';
184 gVT_Terminals[i].Node.Inode = i;
185 gVT_Terminals[i].Node.ImplPtr = &gVT_Terminals[i];
186 gVT_Terminals[i].Node.NumACLs = 0; // Only root can open virtual terminals
188 gVT_Terminals[i].Node.Read = VT_Read;
189 gVT_Terminals[i].Node.Write = VT_Write;
190 gVT_Terminals[i].Node.IOCtl = VT_Terminal_IOCtl;
194 DevFS_AddDevice( &gVT_DrvInfo );
199 // Set kernel output to VT0
200 Debug_SetKTerminal("/Devices/VTerm/0");
202 Log_Log("VTerm", "Returning %i", MODULE_ERR_OK);
203 return MODULE_ERR_OK;
207 * \fn void VT_InitOutput()
208 * \brief Initialise Video Output
212 giVT_OutputDevHandle = VFS_Open(gsVT_OutputDevice, VFS_OPENFLAG_WRITE);
213 if(giVT_InputDevHandle == -1) {
214 Log_Warning("VTerm", "Oh F**k, I can't open the video device '%s'", gsVT_OutputDevice);
218 VT_SetResolution(1, 640, 400);
222 * \fn void VT_InitInput()
223 * \brief Initialises the input
227 giVT_InputDevHandle = VFS_Open(gsVT_InputDevice, VFS_OPENFLAG_READ);
228 if(giVT_InputDevHandle == -1) return ;
229 VFS_IOCtl(giVT_InputDevHandle, KB_IOCTL_SETCALLBACK, VT_KBCallBack);
233 * \fn char *VT_ReadDir(tVFS_Node *Node, int Pos)
234 * \brief Read from the VTerm Directory
236 char *VT_ReadDir(tVFS_Node *Node, int Pos)
238 if(Pos < 0) return NULL;
239 if(Pos >= NUM_VTS) return NULL;
240 return strdup( gVT_Terminals[Pos].Name );
244 * \fn tVFS_Node *VT_FindDir(tVFS_Node *Node, char *Name)
245 * \brief Find an item in the VTerm directory
247 tVFS_Node *VT_FindDir(tVFS_Node *Node, char *Name)
251 ENTER("pNode sName", Node, Name);
253 // Open the input and output files if needed
254 if(giVT_OutputDevHandle == -2) VT_InitOutput();
255 if(giVT_InputDevHandle == -2) VT_InitInput();
258 if(Name[0] < '0' || Name[0] > '9' || Name[1] != '\0') {
269 LEAVE('p', &gVT_Terminals[num].Node);
270 return &gVT_Terminals[num].Node;
274 * \fn int VT_Root_IOCtl(tVFS_Node *Node, int Id, void *Data)
275 * \brief Control the VTerm Driver
277 int VT_Root_IOCtl(tVFS_Node *Node, int Id, void *Data)
282 case DRV_IOCTL_TYPE: return DRV_TYPE_MISC;
283 case DRV_IOCTL_IDENT: memcpy(Data, "VT\0\0", 4); return 0;
284 case DRV_IOCTL_VERSION: return VERSION;
285 case DRV_IOCTL_LOOKUP: return 0;
287 case 4: // Get Video Driver
288 if(Data) strcpy(Data, gsVT_OutputDevice);
289 return strlen(gsVT_OutputDevice);
291 case 5: // Set Video Driver
292 if(!Data) return -EINVAL;
293 if(Threads_GetUID() != 0) return -EACCES;
297 free(gsVT_OutputDevice);
299 gsVT_OutputDevice = malloc(len+1);
300 strcpy(gsVT_OutputDevice, Data);
302 VFS_Close(giVT_OutputDevHandle);
303 giVT_OutputDevHandle = -1;
312 * \fn Uint64 VT_Read(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer)
313 * \brief Read from a virtual terminal
315 Uint64 VT_Read(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer)
318 tVTerm *term = &gVT_Terminals[ Node->Inode ];
320 // Check current mode
326 while(term->InputRead == term->InputWrite) Threads_Yield();
328 ((char*)Buffer)[pos] = term->InputBuffer[term->InputRead];
331 term->InputRead %= MAX_INPUT_CHARS8;
339 while(term->InputRead == term->InputWrite) Threads_Yield();
340 ((Uint32*)Buffer)[pos] = ((Uint32*)term->InputBuffer)[term->InputRead];
343 term->InputRead %= MAX_INPUT_CHARS32;
351 * \fn Uint64 VT_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer)
352 * \brief Write to a virtual terminal
354 Uint64 VT_Write(tVFS_Node *Node, Uint64 Offset, Uint64 Length, void *Buffer)
356 tVTerm *term = &gVT_Terminals[ Node->Inode ];
363 VT_int_PutString(term, Buffer, Length);
366 size = term->Width*term->Height*4;
367 if( Offset > size ) {
368 Log_Notice("VTerm", "VT_Write: Offset (0x%llx) > FBSize (0x%x)",
373 if( Offset + Length > size ) {
374 Log_Notice("VTerm", "VT_Write: Offset+Length (0x%llx) > FBSize (0x%x)",
375 Offset+Length, size);
376 Length = size - Offset;
379 memcpy( (void*)((Uint)term->Buffer + (Uint)Offset), Buffer, Length );
381 if( Node->Inode == giVT_CurrentTerminal )
383 if( giVT_RealWidth > term->Width || giVT_RealHeight > term->Height )
387 x = Offset/4; y = x / term->Width; x %= term->Width;
388 w = Length/4+x; h = w / term->Width; w %= term->Width;
391 VFS_WriteAt( giVT_OutputDevHandle,
392 (x+y*term->RealWidth)*4,
396 Buffer = (void*)( (Uint)Buffer + term->Width*term->Height*4 );
402 return VFS_WriteAt( giVT_OutputDevHandle, Offset, Length, Buffer );
411 * \fn int VT_Terminal_IOCtl(tVFS_Node *Node, int Id, void *Data)
412 * \brief Call an IO Control on a virtual terminal
414 int VT_Terminal_IOCtl(tVFS_Node *Node, int Id, void *Data)
417 tVTerm *term = Node->ImplPtr;
418 ENTER("pNode iId pData", Node, Id, Data);
420 if(Id >= DRV_IOCTL_LOOKUP) {
421 // Only root can fiddle with graphics modes
422 // TODO: Remove this and replace with user ownership
423 if( Threads_GetUID() != 0 ) return -1;
429 LEAVE('i', DRV_TYPE_TERMINAL);
430 return DRV_TYPE_TERMINAL;
431 case DRV_IOCTL_IDENT:
432 memcpy(Data, "VT\0\0", 4);
435 case DRV_IOCTL_VERSION:
438 case DRV_IOCTL_LOOKUP:
442 // Get/Set the mode (and apply any changes)
443 case TERM_IOCTL_MODETYPE:
446 Log_Log("VTerm", "VTerm %i mode set to %i", (int)Node->Inode, *iData);
447 // Update mode if needed
448 if(term->Mode != *iData)
449 VT_int_ChangeMode(term, *iData);
451 // Update the screen dimensions
452 if(Node->Inode == giVT_CurrentTerminal)
453 VT_SetTerminal( giVT_CurrentTerminal );
455 LEAVE('i', term->Mode);
458 // Get/set the terminal width
459 case TERM_IOCTL_WIDTH:
460 if(Data != NULL) term->Width = *iData;
461 Log("VT_Terminal_IOCtl - RETURN term->Width = %i", term->Width);
462 LEAVE('i', term->Width);
465 // Get/set the terminal height
466 case TERM_IOCTL_HEIGHT:
467 if(Data != NULL) term->Height = *iData;
468 Log("VT_Terminal_IOCtl - RETURN term->Height = %i", term->Height);
469 LEAVE('i', term->Height);
472 case TERM_IOCTL_FORCESHOW:
473 Log_Log("VTerm", "Thread %i forced VTerm %i to be shown",
474 Threads_GetTID(), (int)Node->Inode);
475 VT_SetTerminal( Node->Inode );
483 void VT_SetResolution(int IsTextMode, int Width, int Height)
485 tVideo_IOCtl_Mode mode = {0};
488 // Create the video mode
490 mode.height = Height;
495 VFS_IOCtl( giVT_OutputDevHandle, VIDEO_IOCTL_FINDMODE, &mode );
497 giVT_RealWidth = mode.width;
498 giVT_RealHeight = mode.height;
499 VFS_IOCtl( giVT_OutputDevHandle, VIDEO_IOCTL_GETSETMODE, &tmp );
501 tmp = IsTextMode ? VIDEO_BUFFMT_TEXT : VIDEO_BUFFMT_FRAMEBUFFER;
502 VFS_IOCtl( giVT_OutputDevHandle, VIDEO_IOCTL_SETBUFFORMAT, &tmp );
506 * \fn void VT_SetTerminal(int ID)
507 * \brief Set the current terminal
509 void VT_SetTerminal(int ID)
511 // Update current terminal ID
512 Log_Log("VTerm", "Changed terminal from %i to %i", giVT_CurrentTerminal, ID);
513 giVT_CurrentTerminal = ID;
514 gpVT_CurTerm = &gVT_Terminals[ID];
517 if( gpVT_CurTerm->Mode == TERM_MODE_TEXT && !(gpVT_CurTerm->Flags & VT_FLAG_HIDECSR) )
519 tVideo_IOCtl_Pos pos;
520 pos.x = gpVT_CurTerm->WritePos % gpVT_CurTerm->Width;
521 pos.y = gpVT_CurTerm->WritePos / gpVT_CurTerm->Width;
522 VFS_IOCtl(giVT_OutputDevHandle, VIDEO_IOCTL_SETCURSOR, &pos);
525 if( gpVT_CurTerm->Mode == TERM_MODE_TEXT )
526 VT_SetResolution( 1, gpVT_CurTerm->Width*giVT_CharWidth, gpVT_CurTerm->Height*giVT_CharHeight );
528 VT_SetResolution( 0, gpVT_CurTerm->Width, gpVT_CurTerm->Height );
531 VT_int_UpdateScreen( &gVT_Terminals[ ID ], 1 );
535 * \fn void VT_KBCallBack(Uint32 Codepoint)
536 * \brief Called on keyboard interrupt
537 * \param Codepoint Pseudo-UTF32 character
539 * Handles a key press and sends the key code to the user's buffer.
540 * If the code creates a kernel-magic sequence, it is not passed to the
541 * user and is handled in-kernel.
543 void VT_KBCallBack(Uint32 Codepoint)
545 tVTerm *term = &gVT_Terminals[giVT_CurrentTerminal];
547 // How the hell did we get a Codepoint of zero?
548 if(Codepoint == 0) return;
551 if( Codepoint & 0x80000000 )
553 Codepoint &= 0x7FFFFFFF;
557 case KEY_RSHIFT: gbVT_CtrlDown = 0; break;
558 case KEY_LSHIFT: gbVT_AltDown = 0; break;
576 case KEY_RSHIFT: gbVT_CtrlDown = 1; break;
577 case KEY_LSHIFT: gbVT_AltDown = 1; break;
591 if(!gbVT_AltDown || !gbVT_CtrlDown)
596 case KEY_F1: VT_SetTerminal(0); return;
597 case KEY_F2: VT_SetTerminal(1); return;
598 case KEY_F3: VT_SetTerminal(2); return;
599 case KEY_F4: VT_SetTerminal(3); return;
600 case KEY_F5: VT_SetTerminal(4); return;
601 case KEY_F6: VT_SetTerminal(5); return;
602 case KEY_F7: VT_SetTerminal(6); return;
603 case KEY_F8: VT_SetTerminal(7); return;
604 case KEY_F9: VT_SetTerminal(8); return;
605 case KEY_F10: VT_SetTerminal(9); return;
606 case KEY_F11: VT_SetTerminal(10); return;
607 case KEY_F12: VT_SetTerminal(11); return;
609 if( gpVT_CurTerm->ViewPos > gpVT_CurTerm->Width )
610 gpVT_CurTerm->ViewPos -= gpVT_CurTerm->Width;
612 gpVT_CurTerm->ViewPos = 0;
615 if( gpVT_CurTerm->ViewPos < gpVT_CurTerm->Width*(gpVT_CurTerm->Height*(VT_SCROLLBACK-1)) )
616 gpVT_CurTerm->ViewPos += gpVT_CurTerm->Width;
618 gpVT_CurTerm->ViewPos = gpVT_CurTerm->Width*(gpVT_CurTerm->Height*(VT_SCROLLBACK-1));
624 if(term->Mode == TERM_MODE_TEXT)
629 // Ignore Modifer Keys
630 if(Codepoint > KEY_MODIFIERS) return;
632 // Get UTF-8/ANSI Encoding
636 buf[0] = '\x1B'; buf[1] = '['; buf[2] = 'D';
640 buf[0] = '\x1B'; buf[1] = '['; buf[2] = 'C';
644 buf[0] = '\x1B'; buf[1] = '['; buf[2] = 'A';
648 buf[0] = '\x1B'; buf[1] = '['; buf[2] = 'B';
653 buf[0] = '\x1B'; buf[1] = '['; buf[2] = '5'; // Some overline also
654 //len = 4; // Commented out until I'm sure
660 // Attempt to encode in UTF-8
662 len = WriteUTF8( buf, Codepoint );
664 Warning("Codepoint (%x) is unrepresentable in UTF-8", Codepoint);
670 // Unprintable / Don't Pass
675 if( MAX_INPUT_CHARS8 - term->InputWrite >= len )
676 memcpy( &term->InputBuffer[term->InputWrite], buf, len );
678 memcpy( &term->InputBuffer[term->InputWrite], buf, MAX_INPUT_CHARS8 - term->InputWrite );
679 memcpy( &term->InputBuffer[0], buf, len - (MAX_INPUT_CHARS8 - term->InputWrite) );
681 // Roll the buffer over
682 term->InputWrite += len;
683 term->InputWrite %= MAX_INPUT_CHARS8;
684 if( (term->InputWrite - term->InputRead + MAX_INPUT_CHARS8)%MAX_INPUT_CHARS8 < len ) {
685 term->InputRead = term->InputWrite + 1;
686 term->InputRead %= MAX_INPUT_CHARS8;
692 // Encode the raw UTF-32 Key
693 ((Uint32*)term->InputBuffer)[ term->InputWrite ] = Codepoint;
695 term->InputWrite %= MAX_INPUT_CHARS32;
696 if(term->InputRead == term->InputWrite) {
698 term->InputRead %= MAX_INPUT_CHARS32;
704 * \fn void VT_int_ClearLine(tVTerm *Term, int Num)
705 * \brief Clears a line in a virtual terminal
707 void VT_int_ClearLine(tVTerm *Term, int Num)
710 //ENTER("pTerm iNum", Term, Num);
711 for( i = Term->Width; i--; )
713 Term->Text[ Num*Term->Width + i ].Ch = 0;
714 Term->Text[ Num*Term->Width + i ].Colour = Term->CurColour;
720 * \fn int VT_int_ParseEscape(tVTerm *Term, char *Buffer)
721 * \brief Parses a VT100 Escape code
723 int VT_int_ParseEscape(tVTerm *Term, char *Buffer)
728 int args[4] = {0,0,0,0};
736 while('0' <= c && c <= '9') {
741 if( j != 1 ) argc ++;
744 // Get string (what does this do?)
752 if( ('a' <= c && c <= 'z') || ('A' <= c && c <= 'Z'))
758 if(argc == 1) tmp = args[0];
761 if( Term->WritePos-(tmp-1) % Term->Width == 0 )
762 Term->WritePos -= Term->WritePos % Term->Width;
764 Term->WritePos -= tmp;
769 if(argc == 1) tmp = args[0];
771 if( (Term->WritePos + tmp) % Term->Width == 0 ) {
772 Term->WritePos -= Term->WritePos % Term->Width;
773 Term->WritePos += Term->Width - 1;
775 Term->WritePos += tmp;
785 int i = Term->Height * VT_SCROLLBACK;
786 while( i-- ) VT_int_ClearLine(Term, i);
789 VT_int_UpdateScreen(Term, 1);
799 if( 0 <= args[argc] && args[argc] <= 8)
803 case 0: Term->CurColour = DEFAULT_COLOUR; break; // Reset
804 case 1: Term->CurColour |= 0x80000000; break; // Bright
805 case 2: Term->CurColour &= ~0x80000000; break; // Dim
809 else if(30 <= args[argc] && args[argc] <= 37) {
810 Term->CurColour &= 0xF000FFFF;
811 Term->CurColour |= (Uint32)caVT100Colours[ args[argc]-30+(Term->CurColour>>28) ] << 16;
814 else if(40 <= args[argc] && args[argc] <= 47) {
815 Term->CurColour &= 0xFFFF8000;
816 Term->CurColour |= caVT100Colours[ args[argc]-40+((Term->CurColour>>12)&15) ];
832 * \fn void VT_int_PutString(tVTerm *Term, Uint8 *Buffer, Uint Count)
833 * \brief Print a string to the Virtual Terminal
835 void VT_int_PutString(tVTerm *Term, Uint8 *Buffer, Uint Count)
839 for( i = 0; i < Count; i++ )
841 if( Buffer[i] == 0x1B ) // Escape Sequence
844 i += VT_int_ParseEscape(Term, (char*)&Buffer[i]);
848 if( Buffer[i] < 128 ) // Plain ASCII
849 VT_int_PutChar(Term, Buffer[i]);
851 i += ReadUTF8(&Buffer[i], &val);
852 VT_int_PutChar(Term, val);
856 VT_int_UpdateScreen( Term, 0 );
859 if( Term == gpVT_CurTerm && !(Term->Flags & VT_FLAG_HIDECSR) )
861 tVideo_IOCtl_Pos pos;
862 pos.x = Term->WritePos % Term->Width;
863 pos.y = Term->WritePos / Term->Width;
864 VFS_IOCtl(giVT_OutputDevHandle, VIDEO_IOCTL_SETCURSOR, &pos);
869 * \fn void VT_int_PutChar(tVTerm *Term, Uint32 Ch)
870 * \brief Write a single character to a VTerm
872 void VT_int_PutChar(tVTerm *Term, Uint32 Ch)
875 //ENTER("pTerm xCh", Term, Ch);
876 //LOG("Term = {WritePos:%i, ViewPos:%i}", Term->WritePos, Term->ViewPos);
880 case '\0': return; // Ignore NULL byte
882 VT_int_UpdateScreen( Term, 0 ); // Update the line before newlining
883 Term->WritePos += Term->Width;
885 Term->WritePos -= Term->WritePos % Term->Width;
890 Term->Text[ Term->WritePos ].Ch = '\0';
891 Term->Text[ Term->WritePos ].Colour = Term->CurColour;
893 } while(Term->WritePos & 7);
897 // Backspace is invalid at Offset 0
898 if(Term->WritePos == 0) break;
902 if(Term->Text[ Term->WritePos ].Ch != '\0') {
903 Term->Text[ Term->WritePos ].Ch = 0;
904 Term->Text[ Term->WritePos ].Colour = Term->CurColour;
908 i = 7; // Limit it to 8
910 Term->Text[ Term->WritePos ].Ch = 0;
911 Term->Text[ Term->WritePos ].Colour = Term->CurColour;
913 } while(Term->WritePos && i-- && Term->Text[ Term->WritePos ].Ch == '\0');
914 if(Term->Text[ Term->WritePos ].Ch != '\0')
919 Term->Text[ Term->WritePos ].Ch = Ch;
920 Term->Text[ Term->WritePos ].Colour = Term->CurColour;
926 if(Term->WritePos >= Term->Width*Term->Height*VT_SCROLLBACK)
929 Term->WritePos -= Term->Width;
930 VT_int_UpdateScreen( Term, 0 );
932 // Update view position
933 base = Term->Width*Term->Height*(VT_SCROLLBACK-1);
934 if(Term->ViewPos < base) Term->ViewPos += Term->Width;
935 if(Term->ViewPos > base) Term->ViewPos = base;
937 // Scroll terminal cache
938 base = Term->Width*(Term->Height*VT_SCROLLBACK-1);
943 &Term->Text[Term->Width],
944 (Term->Width*Term->Height*VT_SCROLLBACK-Term->Width)*sizeof(tVT_Char)
948 for( i = 0; i < Term->Width; i ++ )
950 Term->Text[ base + i ].Ch = 0;
951 Term->Text[ base + i ].Colour = Term->CurColour;
954 //LOG("Scrolled buffer");
955 VT_int_ScrollFramebuffer( Term );
956 VT_int_UpdateScreen( Term, 0 );
958 else if(Term->WritePos >= Term->ViewPos + Term->Width*Term->Height)
960 //LOG("Scrolled screen");
961 Term->WritePos -= Term->Width;
962 VT_int_UpdateScreen( Term, 0 );
963 Term->WritePos += Term->Width;
965 Term->ViewPos += Term->Width;
966 VT_int_ScrollFramebuffer( Term );
967 VT_int_UpdateScreen( Term, 0 );
974 * \fn void VT_int_ScrollFramebuffer( tVTerm *Term )
975 * \note Scrolls the framebuffer by 1 text line
977 void VT_int_ScrollFramebuffer( tVTerm *Term )
986 // Only update if this is the current terminal
987 if( Term != gpVT_CurTerm ) return;
989 // This should only be called in text mode
991 tmp = VIDEO_BUFFMT_2DSTREAM;
992 VFS_IOCtl(giVT_OutputDevHandle, VIDEO_IOCTL_SETBUFFORMAT, &tmp);
994 buf.Op = VIDEO_2DOP_BLIT;
995 buf.DstX = 0; buf.DstY = 0;
996 buf.SrcX = 0; buf.SrcY = giVT_CharHeight;
997 buf.W = Term->Width * giVT_CharWidth;
998 buf.H = (Term->Height-1) * giVT_CharHeight;
1000 VFS_WriteAt(giVT_OutputDevHandle, 0, 1+12, &buf);
1003 tmp = VIDEO_BUFFMT_TEXT;
1004 VFS_IOCtl(giVT_OutputDevHandle, VIDEO_IOCTL_SETBUFFORMAT, &tmp);
1008 * \fn void VT_int_UpdateScreen( tVTerm *Term, int UpdateAll )
1009 * \brief Updates the video framebuffer
1011 void VT_int_UpdateScreen( tVTerm *Term, int UpdateAll )
1013 // Only update if this is the current terminal
1014 if( Term != gpVT_CurTerm ) return;
1016 switch( Term->Mode )
1018 case TERM_MODE_TEXT:
1020 //LOG("UpdateAll = 1");
1021 //LOG("VFS_WriteAt(0x%x, 0, %i*sizeof(tVT_Char), &Term->Text[%i])",
1022 // giVT_OutputDevHandle, Term->Width*Term->Height, Term->ViewPos);
1024 giVT_OutputDevHandle,
1026 Term->Width*Term->Height*sizeof(tVT_Char),
1027 &Term->Text[Term->ViewPos]
1030 int pos = Term->WritePos - Term->WritePos % Term->Width;
1031 //LOG("UpdateAll = 0");
1032 //LOG("VFS_WriteAt(0x%x, %i*sizeof(tVT_Char), %i*sizeof(tVT_Char), &Term->Text[%i])",
1033 // giVT_OutputDevHandle, (pos - Term->ViewPos), Term->Width, pos);
1035 giVT_OutputDevHandle,
1036 (pos - Term->ViewPos)*sizeof(tVT_Char),
1037 Term->Width*sizeof(tVT_Char),
1044 giVT_OutputDevHandle,
1046 Term->Width*Term->Height*sizeof(Uint32),
1054 * \fn void VT_int_ChangeMode(tVTerm *Term, int NewMode)
1055 * \brief Change the mode of a VTerm
1057 void VT_int_ChangeMode(tVTerm *Term, int NewMode)
1061 case TERM_MODE_TEXT:
1062 Log_Log("VTerm", "Set VT %p to text mode", Term);
1064 Term->Text = calloc( Term->Width*Term->Height*VT_SCROLLBACK, sizeof(tVT_Char) );
1067 Log_Log("VTerm", "Set VT %p to framebuffer mode (%ix%i)", Term,
1068 Term->Width, Term->Height);
1070 Term->Buffer = calloc( Term->Width*Term->Height, sizeof(Uint32) );
1071 Log_Debug("VTerm", "Term->Buffer = %p", Term->Buffer);
1073 //case TERM_MODE_2DACCEL:
1074 //case TERM_MODE_3DACCEL:
1078 Term->Mode = NewMode;
1084 #define MONOSPACE_FONT 10816
1086 #if MONOSPACE_FONT == 10808 // 8x8
1087 # include "vterm_font_8x8.h"
1088 #elif MONOSPACE_FONT == 10816 // 8x16
1089 # include "vterm_font_8x16.h"
1092 // === PROTOTYPES ===
1093 Uint8 *VT_Font_GetChar(Uint32 Codepoint);
1096 int giVT_CharWidth = FONT_WIDTH;
1097 int giVT_CharHeight = FONT_HEIGHT;
1101 * \fn void VT_Font_Render(Uint32 Codepoint, void *Buffer, int Pitch, Uint32 BGC, Uint32 FGC)
1102 * \brief Render a font character
1104 void VT_Font_Render(Uint32 Codepoint, void *Buffer, int Pitch, Uint32 BGC, Uint32 FGC)
1107 Uint32 *buf = Buffer;
1110 font = VT_Font_GetChar(Codepoint);
1112 for(y = 0; y < FONT_HEIGHT; y ++)
1114 for(x = 0; x < FONT_WIDTH; x ++)
1116 if(*font & (1 << (FONT_WIDTH-x-1)))
1127 * \fn Uint32 VT_Colour12to24(Uint16 Col12)
1130 Uint32 VT_Colour12to24(Uint16 Col12)
1135 ret = (tmp << 0) | (tmp << 4);
1136 tmp = (Col12 & 0xF0) >> 4;
1137 ret |= (tmp << 8) | (tmp << 12);
1138 tmp = (Col12 & 0xF00) >> 8;
1139 ret |= (tmp << 16) | (tmp << 20);
1144 * \fn Uint8 *VT_Font_GetChar(Uint32 Codepoint)
1145 * \brief Gets an index into the font array given a Unicode Codepoint
1146 * \note See http://en.wikipedia.org/wiki/CP437
1148 Uint8 *VT_Font_GetChar(Uint32 Codepoint)
1152 return &VTermFont[Codepoint*FONT_HEIGHT];
1155 case 0xC7: index = 128; break; // Ç
1156 case 0xFC: index = 129; break; // ü
1157 case 0xE9: index = 130; break; // é
1158 case 0xE2: index = 131; break; // â
1159 case 0xE4: index = 132; break; // ä
1160 case 0xE0: index = 133; break; // à
1161 case 0xE5: index = 134; break; // å
1162 case 0xE7: index = 135; break; // ç
1163 case 0xEA: index = 136; break; // ê
1164 case 0xEB: index = 137; break; // ë
1165 case 0xE8: index = 138; break; // è
1166 case 0xEF: index = 139; break; // ï
1167 case 0xEE: index = 140; break; // î
1168 case 0xEC: index = 141; break; // ì
1169 case 0xC4: index = 142; break; // Ä
1170 case 0xC5: index = 143; break; // Å
1173 return &VTermFont[index*FONT_HEIGHT];
1176 EXPORTAS(&giVT_CharWidth, giVT_CharWidth);
1177 EXPORTAS(&giVT_CharHeight, giVT_CharHeight);
1178 EXPORT(VT_Font_Render);
1179 EXPORT(VT_Colour12to24);