3 * - By John Hodge (thePowersGang)
6 * - Virtual Terminal - Initialisation and VFS Interface
12 #include <api_drv_keyboard.h>
13 #include <api_drv_video.h>
15 #include <semaphore.h>
18 #define VERSION ((0<<8)|(50))
21 //#define DEFAULT_OUTPUT "BochsGA"
22 #define DEFAULT_OUTPUT "Vesa"
23 #define FALLBACK_OUTPUT "x86_VGAText"
24 #define DEFAULT_INPUT "Keyboard"
25 #define DEFAULT_WIDTH 640
26 #define DEFAULT_HEIGHT 480
27 #define DEFAULT_SCROLLBACK 4 // 2 Screens of text + current screen
28 //#define DEFAULT_SCROLLBACK 0
33 extern void Debug_SetKTerminal(const char *File);
36 int VT_Install(char **Arguments);
37 char *VT_ReadDir(tVFS_Node *Node, int Pos);
38 tVFS_Node *VT_FindDir(tVFS_Node *Node, const char *Name);
39 int VT_Root_IOCtl(tVFS_Node *Node, int Id, void *Data);
40 size_t VT_Read(tVFS_Node *Node, off_t Offset, size_t Length, void *Buffer);
41 size_t VT_Write(tVFS_Node *Node, off_t Offset, size_t Length, const void *Buffer);
42 int VT_Terminal_IOCtl(tVFS_Node *Node, int Id, void *Data);
43 void VT_Terminal_Reference(tVFS_Node *Node);
44 void VT_Terminal_Close(tVFS_Node *Node);
45 //void VT_SetTerminal(int Term);
50 MODULE_DEFINE(0, VERSION, VTerm, VT_Install, NULL, NULL);
51 tVFS_NodeType gVT_RootNodeType = {
52 .TypeName = "VTerm Root",
53 .ReadDir = VT_ReadDir,
54 .FindDir = VT_FindDir,
55 .IOCtl = VT_Root_IOCtl
57 tVFS_NodeType gVT_TermNodeType = {
61 .IOCtl = VT_Terminal_IOCtl
63 tDevFS_Driver gVT_DrvInfo = {
66 .Flags = VFS_FFLAG_DIRECTORY,
70 .Type = &gVT_RootNodeType
74 tVTerm gVT_Terminals[NUM_VTS];
75 int giVT_CurrentTerminal = 0;
76 tVTerm *gpVT_CurTerm = &gVT_Terminals[0];
77 // --- Video State ---
78 short giVT_RealWidth = DEFAULT_WIDTH; //!< Screen Width
79 short giVT_RealHeight = DEFAULT_HEIGHT; //!< Screen Height
80 int giVT_Scrollback = DEFAULT_SCROLLBACK;
81 // --- Driver Handles ---
82 char *gsVT_OutputDevice = NULL;
83 char *gsVT_InputDevice = NULL;
84 int giVT_OutputDevHandle = -2;
85 int giVT_InputDevHandle = -2;
89 * \fn int VT_Install(char **Arguments)
90 * \brief Installs the Virtual Terminal Driver
92 int VT_Install(char **Arguments)
101 for(args = Arguments; (arg = *args); args++ )
103 char data[strlen(arg)+1];
107 val = strchr(arg, '=');
110 data[ val - arg ] = '\0';
113 Log_Debug("VTerm", "Argument '%s'", arg);
115 if( strcmp(opt, "Video") == 0 ) {
116 if( !gsVT_OutputDevice )
117 gsVT_OutputDevice = strdup(val);
119 else if( strcmp(opt, "Input") == 0 ) {
120 if( !gsVT_InputDevice )
121 gsVT_InputDevice = strdup(val);
123 else if( strcmp(opt, "Width") == 0 ) {
124 giVT_RealWidth = atoi( val );
126 else if( strcmp(opt, "Height") == 0 ) {
127 giVT_RealHeight = atoi( val );
129 else if( strcmp(opt, "Scrollback") == 0 ) {
130 giVT_Scrollback = atoi( val );
136 if(!gsVT_OutputDevice) gsVT_OutputDevice = (char*)DEFAULT_OUTPUT;
137 else if( Module_EnsureLoaded( gsVT_OutputDevice ) ) gsVT_OutputDevice = (char*)DEFAULT_OUTPUT;
138 if( Module_EnsureLoaded( gsVT_OutputDevice ) ) gsVT_OutputDevice = (char*)FALLBACK_OUTPUT;
139 if( Module_EnsureLoaded( gsVT_OutputDevice ) ) {
140 Log_Error("VTerm", "Fallback video '%s' is not avaliable, giving up", FALLBACK_OUTPUT);
141 return MODULE_ERR_MISC;
144 if(!gsVT_InputDevice) gsVT_InputDevice = (char*)DEFAULT_INPUT;
145 else if( Module_EnsureLoaded( gsVT_InputDevice ) ) gsVT_InputDevice = (char*)DEFAULT_INPUT;
146 if( Module_EnsureLoaded( gsVT_InputDevice ) ) {
147 Log_Error("VTerm", "Fallback input '%s' is not avaliable, input will not be avaliable", DEFAULT_INPUT);
150 // Create device paths
153 tmp = malloc( 9 + strlen(gsVT_OutputDevice) + 1 );
154 strcpy(tmp, "/Devices/");
155 strcpy(&tmp[9], gsVT_OutputDevice);
156 gsVT_OutputDevice = tmp;
158 tmp = malloc( 9 + strlen(gsVT_InputDevice) + 1 );
159 strcpy(tmp, "/Devices/");
160 strcpy(&tmp[9], gsVT_InputDevice);
161 gsVT_InputDevice = tmp;
164 Log_Log("VTerm", "Using '%s' as output", gsVT_OutputDevice);
165 Log_Log("VTerm", "Using '%s' as input", gsVT_InputDevice);
172 Log_Debug("VTerm", "Initialising nodes (and creating buffers)");
173 for( i = 0; i < NUM_VTS; i++ )
175 gVT_Terminals[i].Mode = TERM_MODE_TEXT;
176 gVT_Terminals[i].Flags = 0;
177 // gVT_Terminals[i].Flags = VT_FLAG_HIDECSR; //HACK - Stop all those memcpy calls
178 gVT_Terminals[i].CurColour = DEFAULT_COLOUR;
179 gVT_Terminals[i].WritePos = 0;
180 gVT_Terminals[i].AltWritePos = 0;
181 gVT_Terminals[i].ViewPos = 0;
182 gVT_Terminals[i].ReadingThread = -1;
183 gVT_Terminals[i].ScrollHeight = 0;
186 VT_int_ChangeMode( &gVT_Terminals[i],
187 TERM_MODE_TEXT, giVT_RealWidth, giVT_RealHeight );
189 gVT_Terminals[i].Name[0] = '0'+i;
190 gVT_Terminals[i].Name[1] = '\0';
191 gVT_Terminals[i].Node.Inode = i;
192 gVT_Terminals[i].Node.ImplPtr = &gVT_Terminals[i];
193 gVT_Terminals[i].Node.NumACLs = 0; // Only root can open virtual terminals
195 gVT_Terminals[i].Node.Type = &gVT_TermNodeType;
196 // Semaphore_Init(&gVT_Terminals[i].InputSemaphore, 0, MAX_INPUT_CHARS8, "VTerm", gVT_Terminals[i].Name);
199 Log_Debug("VTerm", "Registering with DevFS");
201 DevFS_AddDevice( &gVT_DrvInfo );
203 // Set kernel output to VT0
204 Log_Debug("VTerm", "Setting kernel output to VT#0");
205 Debug_SetKTerminal("/Devices/VTerm/0");
207 return MODULE_ERR_OK;
211 * \brief Set the video resolution
212 * \param Width New screen width
213 * \param Height New screen height
215 void VT_SetResolution(int Width, int Height)
217 tVideo_IOCtl_Mode mode = {0};
221 // Create the video mode
223 mode.height = Height;
228 VFS_IOCtl( giVT_OutputDevHandle, VIDEO_IOCTL_FINDMODE, &mode );
230 if( Width != mode.width || Height != mode.height )
233 "Selected resolution (%ix%i) is not supported by the device, using (%ix%i)",
234 giVT_RealWidth, giVT_RealHeight,
235 mode.width, mode.height
237 giVT_RealWidth = mode.width;
238 giVT_RealHeight = mode.height;
240 VFS_IOCtl( giVT_OutputDevHandle, VIDEO_IOCTL_GETSETMODE, &tmp );
242 // Resize text terminals if needed
243 if( gVT_Terminals[0].Text && (giVT_RealWidth != mode.width || giVT_RealHeight != mode.height) )
245 int newBufSize = (giVT_RealWidth/giVT_CharWidth)
246 *(giVT_RealHeight/giVT_CharHeight)
247 *(giVT_Scrollback+1);
249 // Resize the text terminals
250 Log_Debug("VTerm", "Resizing terminals to %ix%i",
251 giVT_RealWidth/giVT_CharWidth, giVT_RealHeight/giVT_CharHeight);
252 for( i = 0; i < NUM_VTS; i ++ )
254 if( gVT_Terminals[i].Mode != TERM_MODE_TEXT ) continue;
256 gVT_Terminals[i].TextWidth = giVT_RealWidth/giVT_CharWidth;
257 gVT_Terminals[i].TextHeight = giVT_RealHeight/giVT_CharHeight;
258 gVT_Terminals[i].ScrollHeight = gVT_Terminals[i].TextHeight;
260 gVT_Terminals[i].Text = realloc(
261 gVT_Terminals[i].Text,
262 newBufSize*sizeof(tVT_Char)
269 * \fn char *VT_ReadDir(tVFS_Node *Node, int Pos)
270 * \brief Read from the VTerm Directory
272 char *VT_ReadDir(tVFS_Node *Node, int Pos)
274 if(Pos < 0) return NULL;
275 if(Pos >= NUM_VTS) return NULL;
276 return strdup( gVT_Terminals[Pos].Name );
280 * \fn tVFS_Node *VT_FindDir(tVFS_Node *Node, const char *Name)
281 * \brief Find an item in the VTerm directory
282 * \param Node Root node
283 * \param Name Name (number) of the terminal
285 tVFS_Node *VT_FindDir(tVFS_Node *Node, const char *Name)
289 ENTER("pNode sName", Node, Name);
291 // Open the input and output files if needed
292 if(giVT_OutputDevHandle == -2) VT_InitOutput();
293 if(giVT_InputDevHandle == -2) VT_InitInput();
296 if(Name[0] < '0' || Name[0] > '9' || Name[1] != '\0') {
307 LEAVE('p', &gVT_Terminals[num].Node);
308 return &gVT_Terminals[num].Node;
312 * \fn int VT_Root_IOCtl(tVFS_Node *Node, int Id, void *Data)
313 * \brief Control the VTerm Driver
315 int VT_Root_IOCtl(tVFS_Node *Node, int Id, void *Data)
320 case DRV_IOCTL_TYPE: return DRV_TYPE_MISC;
321 case DRV_IOCTL_IDENT: memcpy(Data, "VT\0\0", 4); return 0;
322 case DRV_IOCTL_VERSION: return VERSION;
323 case DRV_IOCTL_LOOKUP: return 0;
325 case 4: // Get Video Driver
326 if(Data) strcpy(Data, gsVT_OutputDevice);
327 return strlen(gsVT_OutputDevice);
329 case 5: // Set Video Driver
330 if(!Data) return -EINVAL;
331 if(Threads_GetUID() != 0) return -EACCES;
335 // TODO: Check if the string used is a heap string
337 free(gsVT_OutputDevice);
339 gsVT_OutputDevice = malloc(len+1);
340 strcpy(gsVT_OutputDevice, Data);
342 VFS_Close(giVT_OutputDevHandle);
343 giVT_OutputDevHandle = -1;
352 * \brief Read from a virtual terminal
354 size_t VT_Read(tVFS_Node *Node, off_t Offset, size_t Length, void *Buffer)
358 tVTerm *term = &gVT_Terminals[ Node->Inode ];
359 Uint32 *codepoint_buf = Buffer;
360 Uint32 *codepoint_in;
362 Mutex_Acquire( &term->ReadingLock );
364 // Check current mode
369 VT_int_UpdateCursor(term, 1);
371 VFS_SelectNode(Node, VFS_SELECT_READ, NULL, "VT_Read (UTF-8)");
373 avail = term->InputWrite - term->InputRead;
375 avail += MAX_INPUT_CHARS8;
376 if(avail > Length - pos)
377 avail = Length - pos;
381 ((char*)Buffer)[pos] = term->InputBuffer[term->InputRead];
384 while(term->InputRead >= MAX_INPUT_CHARS8)
385 term->InputRead -= MAX_INPUT_CHARS8;
392 VFS_SelectNode(Node, VFS_SELECT_READ, NULL, "VT_Read (UCS-4)");
394 avail = term->InputWrite - term->InputRead;
396 avail += MAX_INPUT_CHARS32;
398 if(avail > Length - pos)
399 avail = Length - pos;
401 codepoint_in = (void*)term->InputBuffer;
402 codepoint_buf = Buffer;
406 codepoint_buf[pos] = codepoint_in[term->InputRead];
409 while(term->InputRead >= MAX_INPUT_CHARS32)
410 term->InputRead -= MAX_INPUT_CHARS32;
416 // Mark none avaliable if buffer empty
417 if( term->InputRead == term->InputWrite )
418 VFS_MarkAvaliable(&term->Node, 0);
420 term->ReadingThread = -1;
422 // VT_int_UpdateCursor(term, term->Mode == TERM_MODE_TEXT);
424 Mutex_Release( &term->ReadingLock );
430 * \brief Write to a virtual terminal
432 size_t VT_Write(tVFS_Node *Node, off_t Offset, size_t Length, const void *Buffer)
434 tVTerm *term = &gVT_Terminals[ Node->Inode ];
442 VT_int_PutString(term, Buffer, Length);
448 size = term->Width*term->Height*4;
449 if( Offset > size ) {
450 Log_Notice("VTerm", "VT_Write: Offset (0x%llx) > FBSize (0x%x)",
454 if( Offset + Length > size ) {
455 Log_Notice("VTerm", "VT_Write: Offset+Length (0x%llx) > FBSize (0x%x)",
456 Offset+Length, size);
457 Length = size - Offset;
460 // Update screen if needed
461 if( Node->Inode == giVT_CurrentTerminal )
463 if( giVT_RealHeight > term->Height )
464 Offset += (giVT_RealHeight - term->Height) / 2 * term->Width * 4;
465 // Handle undersized virtual terminals
466 if( giVT_RealWidth > term->Width )
468 // No? :( Well, just center it
471 // TODO: Fix to handle the final line correctly?
472 x = Offset/4; y = x / term->Width; x %= term->Width;
473 w = Length/4+x; h = w / term->Width; w %= term->Width;
476 x += (giVT_RealWidth - term->Width) / 2;
477 dst_ofs = (x + y * giVT_RealWidth) * 4;
480 VFS_WriteAt( giVT_OutputDevHandle,
485 Buffer = (void*)( (Uint)Buffer + term->Width*4 );
486 dst_ofs += giVT_RealWidth * 4;
492 return VFS_WriteAt( giVT_OutputDevHandle, Offset, Length, Buffer );
498 term->Buffer = malloc( term->Width * term->Height * 4 );
499 // Copy to the local cache
500 memcpy( (char*)term->Buffer + (Uint)Offset, Buffer, Length );
503 // Just pass on (for now)
504 // TODO: Handle locally too to ensure no information is lost on
505 // VT Switch (and to isolate terminals from each other)
506 case TERM_MODE_2DACCEL:
507 //case TERM_MODE_3DACCEL:
508 if( Node->Inode == giVT_CurrentTerminal )
510 VFS_Write( giVT_OutputDevHandle, Length, Buffer );
519 * \fn int VT_Terminal_IOCtl(tVFS_Node *Node, int Id, void *Data)
520 * \brief Call an IO Control on a virtual terminal
522 int VT_Terminal_IOCtl(tVFS_Node *Node, int Id, void *Data)
526 tVTerm *term = Node->ImplPtr;
527 ENTER("pNode iId pData", Node, Id, Data);
529 if(Id >= DRV_IOCTL_LOOKUP) {
530 // Only root can fiddle with graphics modes
531 // TODO: Remove this and replace with user ownership
532 if( Threads_GetUID() != 0 ) return -1;
539 LEAVE('i', DRV_TYPE_TERMINAL);
540 return DRV_TYPE_TERMINAL;
541 case DRV_IOCTL_IDENT:
542 memcpy(Data, "VT\0\0", 4);
545 case DRV_IOCTL_VERSION:
548 case DRV_IOCTL_LOOKUP:
552 // Get/Set the mode (and apply any changes)
553 case TERM_IOCTL_MODETYPE:
556 if( CheckMem(Data, sizeof(int)) == 0 ) {
560 Log_Log("VTerm", "VTerm %i mode set to %i", (int)Node->Inode, *iData);
562 // Update mode if needed
563 if( term->Mode != *iData || term->NewWidth || term->NewHeight)
565 // Adjust for text mode
566 if( *iData == TERM_MODE_TEXT ) {
567 term->NewHeight *= giVT_CharHeight;
568 term->NewWidth *= giVT_CharWidth;
570 // Fill unchanged dimensions
571 if(term->NewHeight == 0) term->NewHeight = term->Height;
572 if(term->NewWidth == 0) term->NewWidth = term->Width;
574 VT_int_ChangeMode(term, *iData, term->NewWidth, term->NewHeight);
575 // Clear unapplied dimensions
580 // Update the screen dimensions
581 if(Node->Inode == giVT_CurrentTerminal)
582 VT_SetTerminal( giVT_CurrentTerminal );
584 LEAVE('i', term->Mode);
587 // Get/set the terminal width
588 case TERM_IOCTL_WIDTH:
590 if( CheckMem(Data, sizeof(int)) == 0 ) {
594 term->NewWidth = *iData;
597 ret = term->NewWidth;
598 else if( term->Mode == TERM_MODE_TEXT )
599 ret = term->TextWidth;
605 // Get/set the terminal height
606 case TERM_IOCTL_HEIGHT:
608 if( CheckMem(Data, sizeof(int)) == 0 ) {
612 term->NewHeight = *iData;
614 if( term->NewHeight )
615 ret = term->NewHeight;
616 else if( term->Mode == TERM_MODE_TEXT )
617 ret = term->TextHeight;
623 case TERM_IOCTL_FORCESHOW:
624 Log_Log("VTerm", "Thread %i forced VTerm %i to be shown",
625 Threads_GetTID(), (int)Node->Inode);
626 VT_SetTerminal( Node->Inode );
630 case TERM_IOCTL_GETSETCURSOR:
633 tVideo_IOCtl_Pos *pos = Data;
634 if( !CheckMem(Data, sizeof(*pos)) ) {
640 if( term->Mode == TERM_MODE_TEXT )
642 if(term->Flags & VT_FLAG_ALTBUF)
643 term->AltWritePos = pos->x + pos->y * term->TextWidth;
645 term->WritePos = pos->x + pos->y * term->TextWidth + term->ViewPos;
646 VT_int_UpdateCursor(term, 0);
650 term->VideoCursorX = pos->x;
651 term->VideoCursorY = pos->y;
652 VT_int_UpdateCursor(term, 1);
655 ret = (term->Flags & VT_FLAG_ALTBUF) ? term->AltWritePos : term->WritePos-term->ViewPos;
659 case TERM_IOCTL_SETCURSORBITMAP: {
660 tVideo_IOCtl_Bitmap *bmp = Data;
663 free( term->VideoCursor );
664 term->VideoCursor = NULL;
669 // Sanity check bitmap
670 if( !CheckMem(bmp, sizeof(tVideo_IOCtl_Bitmap)) ) {
671 Log_Notice("VTerm", "%p in TERM_IOCTL_SETCURSORBITMAP invalid", bmp);
675 if( !CheckMem(bmp->Data, bmp->W*bmp->H*sizeof(Uint32)) ) {
676 Log_Notice("VTerm", "%p in TERM_IOCTL_SETCURSORBITMAP invalid", bmp);
681 // Reallocate if needed
682 if(term->VideoCursor)
684 if(bmp->W * bmp->H != term->VideoCursor->W * term->VideoCursor->H) {
685 free(term->VideoCursor);
686 term->VideoCursor = NULL;
689 if(!term->VideoCursor) {
690 term->VideoCursor = malloc(sizeof(tVideo_IOCtl_Pos) + bmp->W*bmp->H*sizeof(Uint32));
691 if(!term->VideoCursor) {
692 Log_Error("VTerm", "Unable to allocate memory for cursor");
698 memcpy(term->VideoCursor, bmp, sizeof(tVideo_IOCtl_Pos) + bmp->W*bmp->H*sizeof(Uint32));
700 Log_Debug("VTerm", "Set VT%i's cursor to %p %ix%i",
701 (int)term->Node.Inode, bmp, bmp->W, bmp->H);
703 if(gpVT_CurTerm == term)
704 VFS_IOCtl(giVT_OutputDevHandle, VIDEO_IOCTL_SETCURSORBITMAP, term->VideoCursor);
713 void VT_Terminal_Reference(tVFS_Node *Node)
715 // Append PID to list
718 void VT_Terminal_Close(tVFS_Node *Node)
720 // Remove PID from list
724 * \fn void VT_SetTerminal(int ID)
725 * \brief Set the current terminal
727 void VT_SetTerminal(int ID)
729 // Copy the screen state
730 if( ID != giVT_CurrentTerminal && gpVT_CurTerm->Mode != TERM_MODE_TEXT )
732 if( !gpVT_CurTerm->Buffer )
733 gpVT_CurTerm->Buffer = malloc( gpVT_CurTerm->Width*gpVT_CurTerm->Height*4 );
734 if( gpVT_CurTerm->Width < giVT_RealWidth )
738 Uint32 *dest = gpVT_CurTerm->Buffer;
739 // Slower scanline copy
740 for( line = 0; line < gpVT_CurTerm->Height; line ++ )
742 VFS_ReadAt(giVT_OutputDevHandle, ofs, gpVT_CurTerm->Width*4, dest);
743 ofs += giVT_RealWidth * 4;
744 dest += gpVT_CurTerm->Width;
749 VFS_ReadAt(giVT_OutputDevHandle,
750 0, gpVT_CurTerm->Height*giVT_RealWidth*4,
756 // Update current terminal ID
757 Log_Log("VTerm", "Changed terminal from %i to %i", giVT_CurrentTerminal, ID);
758 giVT_CurrentTerminal = ID;
759 gpVT_CurTerm = &gVT_Terminals[ID];
761 LOG("Attempting VT_SetMode");
763 if( gpVT_CurTerm->Mode == TERM_MODE_TEXT )
765 VT_SetMode( VIDEO_BUFFMT_TEXT );
769 // Update the cursor image
770 if(gpVT_CurTerm->VideoCursor)
771 VFS_IOCtl(giVT_OutputDevHandle, VIDEO_IOCTL_SETCURSORBITMAP, gpVT_CurTerm->VideoCursor);
772 VT_SetMode( VIDEO_BUFFMT_FRAMEBUFFER );
777 if(gpVT_CurTerm->Buffer)
779 // TODO: Handle non equal sized
781 giVT_OutputDevHandle,
783 gpVT_CurTerm->Width*gpVT_CurTerm->Height*sizeof(Uint32),
786 LOG("Updated screen contents");
789 VT_int_UpdateCursor(gpVT_CurTerm, 1);
791 VT_int_UpdateScreen(gpVT_CurTerm, 1);