Kernel - Misc fixes and debug in VTerm/PTY, AxWin3 starts again
[tpg/acess2.git] / KernelLand / Kernel / drv / pty.c
index 496f264..abfd9d1 100644 (file)
@@ -5,6 +5,7 @@
  * drv/pty.c
  * - Pseudo Terminals
  */
+#define DEBUG  1
 #include <acess.h>
 #include <vfs.h>
 #include <fs_devfs.h>
@@ -29,6 +30,7 @@ struct sPTY
        void    *OutputHandle;
        tPTY_OutputFcn  OutputFcn;
        tPTY_ReqResize  ReqResize;
+       tPTY_ModeSet    ModeSet;
 
        struct ptymode  Mode;
        struct ptydims  Dims;
@@ -115,11 +117,12 @@ tPTY      *gpPTY_FirstNamedPTY;
 // === CODE ===
 int PTY_Install(char **Arguments)
 {
+       DevFS_AddDevice(&gPTY_Driver);
        return MODULE_ERR_OK;
 }
 
 // --- Management ---
-tPTY *PTY_Create(const char *Name, void *Handle, tPTY_OutputFcn Output, tPTY_ReqResize ReqResize)
+tPTY *PTY_Create(const char *Name, void *Handle, tPTY_OutputFcn Output, tPTY_ReqResize ReqResize, tPTY_ModeSet ModeSet)
 {
        tPTY    **prev_np = NULL;
        size_t  namelen;
@@ -186,6 +189,7 @@ tPTY *PTY_Create(const char *Name, void *Handle, tPTY_OutputFcn Output, tPTY_Req
        ret->OutputHandle = Handle;
        ret->OutputFcn = Output;
        ret->ReqResize = ReqResize;
+       ret->ModeSet = ModeSet;
        // - Server node
        ret->ServerNode.ImplPtr = ret;
        ret->ServerNode.Type = &gPTY_NodeType_Server;
@@ -226,17 +230,31 @@ int PTY_SetAttrib(tPTY *PTY, const struct ptydims *Dims, const struct ptymode *M
                        errno = EINVAL;
                        return -1;
                }
-               PTY->Mode = *Mode;
-               if( !WasClient && !PTY->OutputFcn )
+               if( WasClient )
+               {
+                       if( PTY->ModeSet && PTY->ModeSet(PTY->OutputHandle, Mode) )
+                       {
+                               errno = EINVAL;
+                               return -1;
+                       }
+                       else if( !PTY->OutputFcn )
+                       {
+                               Log_Warning("PTY", "TODO: Need to stop client output until modeset has been ACKed");
+                               // Block write until acked
+                               // ACK by server doing GETMODE
+                       }
+               }
+               else
                {
-                       Log_Warning("PTY", "TODO: Need to stop client output until modeset has been ACKed");
-                       // Block write until acked
-                       // ACK by server doing GETMODE
+                       // Should the client be informed that the server just twiddled the modes?
                }
+               LOG("PTY %p mode set to {0%o, 0%o}", PTY, Mode->InputMode, Mode->OutputMode);
+               PTY->Mode = *Mode;
        }
        if( Dims )
        {
-               if( WasClient ) {
+               if( WasClient )
+               {
                        // Poke the server?
                        if( PTY->ReqResize && PTY->ReqResize(PTY->OutputHandle, Dims) )
                        {
@@ -248,9 +266,11 @@ int PTY_SetAttrib(tPTY *PTY, const struct ptydims *Dims, const struct ptymode *M
                                // Inform server process... somehow
                        }
                }
-               else {
+               else
+               {
                        // SIGWINSZ to client
                }
+               LOG("PTY %p dims set to %ix%i", PTY, Dims->W, Dims->H);
                PTY->Dims = *Dims;
        }
        return 0;
@@ -263,8 +283,10 @@ void PTY_Close(tPTY *PTY)
 
 size_t _rb_write(void *buf, size_t buflen, int *rd, int *wr, const void *data, size_t len)
 {
-       size_t space = (*rd - *wr + buflen) % buflen - 1;
+       size_t space = (*rd - *wr + buflen - 1) % buflen;
+       ENTER("pbuf ibuflen prd pwr pdata ilen", buf, buflen, rd, wr, data, len);
        len = MIN(space, len);
+       LOG("space = %i, *rd = %i, *wr = %i", space, *rd, *wr);
        if(*wr + len >= buflen) {
                size_t prelen = buflen - *wr;
                memcpy((char*)buf + *wr, data, prelen);
@@ -275,6 +297,7 @@ size_t _rb_write(void *buf, size_t buflen, int *rd, int *wr, const void *data, s
                memcpy((char*)buf + *wr, data, len);
                *wr += len;
        }
+       LEAVE('i', len);
        return len;
 }
 size_t _rb_read(void *buf, size_t buflen, int *rd, int *wr, void *data, size_t len)
@@ -316,8 +339,9 @@ size_t PTY_int_SendInput(tPTY *PTY, const char *Input, size_t Length)
 {
        size_t  ret = 1, print = 1;
        
-       // Only counts for text input modes
-       if( (PTY->Mode.OutputMode & PTYOMODE_BUFFMT) == PTYBUFFMT_TEXT )
+       // Input mode stuff only counts for text output mode
+       // - Any other is Uint32 keypresses
+       if( (PTY->Mode.OutputMode & PTYOMODE_BUFFMT) != PTYBUFFMT_TEXT )
                return PTY_int_WriteInput(PTY, Input, Length);
        // If in raw mode, flush directlr
        if( (PTY->Mode.InputMode & PTYIMODE_RAW) )
@@ -438,9 +462,9 @@ int PTY_ReadDir(tVFS_Node *Node, int Pos, char Name[FILENAME_MAX])
                return -1;
        
        if( pty->Name[0] )
-               snprintf(Name, 255, "%s%c", pty->Name, (Pos == 0 ? 'c' : 's'));
+               snprintf(Name, FILENAME_MAX, "%s%c", pty->Name, (Pos == 0 ? 'c' : 's'));
        else
-               snprintf(Name, 255, "%i%c", pty->NumericName, (Pos == 0 ? 'c' : 's'));
+               snprintf(Name, FILENAME_MAX, "%i%c", pty->NumericName, (Pos == 0 ? 'c' : 's'));
        return 0;
 }
 
@@ -498,9 +522,9 @@ tVFS_Node *PTY_FindDir(tVFS_Node *Node, const char *Name, Uint Flags)
 tVFS_Node *PTY_MkNod(tVFS_Node *Node, const char *Name, Uint Mode)
 {
        // zero-length name means a numbered pty has been requested
-       if( Name[0] == '\0' )
+       if( Name[0] == '\0' || (Name[0] == '#' && Name[1] == '\0') )
        {
-               tPTY    *ret = PTY_Create(NULL, NULL, NULL, NULL);
+               tPTY    *ret = PTY_Create(NULL, NULL, NULL, NULL, NULL);
                if( !ret )
                        return NULL;
                return &ret->ServerNode;
@@ -509,7 +533,7 @@ tVFS_Node *PTY_MkNod(tVFS_Node *Node, const char *Name, Uint Mode)
        // Otherwise return a named PTY
        // TODO: Should the request be for '<name>s' or just '<name>'   
 
-       tPTY    *ret = PTY_Create(Name, NULL, NULL, NULL);
+       tPTY    *ret = PTY_Create(Name, NULL, NULL, NULL, NULL);
        if(!ret)
                return NULL;
        return &ret->ServerNode;
@@ -569,7 +593,7 @@ size_t PTY_WriteClient(tVFS_Node *Node, off_t Offset, size_t Length, const void
        // Write to either FIFO or directly to output function
        if( pty->OutputFcn )
        {
-               pty->OutputFcn(pty->OutputHandle, Buffer, Length, pty->Mode.OutputMode);
+               pty->OutputFcn(pty->OutputHandle, Length, Buffer);
        }
        else
        {
@@ -592,7 +616,7 @@ int PTY_IOCtlClient(tVFS_Node *Node, int ID, void *Data)
        {
        case DRV_IOCTL_TYPE:    return DRV_TYPE_TERMINAL;
        case DRV_IOCTL_IDENT:   memcpy(Data, "PTY\0", 4);       return 0;
-       case DRV_IOCTL_VER:     return 0x100;
+       case DRV_IOCTL_VERSION: return 0x100;
        case DRV_IOCTL_LOOKUP:  return 0;
        
        case PTY_IOCTL_GETMODE:
@@ -618,7 +642,7 @@ void PTY_ReferenceClient(tVFS_Node *Node)
 {
        Node->ReferenceCount ++;
        // TODO: Add PID to list of client PIDs
-       Log_Notice("PTY", "TODO: List of client PIDs");
+//     Log_Notice("PTY", "ReferenceClient: TODO - List of client PIDs");
 }
 
 void PTY_CloseClient(tVFS_Node *Node)
@@ -627,6 +651,7 @@ void PTY_CloseClient(tVFS_Node *Node)
        Node->ReferenceCount --;
 
        // Remove PID from list
+       // TODO: Maintain list of client processes
 
        // Free structure if this was the last open handle
        if( Node->ReferenceCount == 0 && pty->ServerNode.ReferenceCount == 0 )
@@ -669,11 +694,7 @@ size_t PTY_ReadServer(tVFS_Node *Node, off_t Offset, size_t Length, void *Buffer
 //\! Write to the client's input
 size_t PTY_WriteServer(tVFS_Node *Node, off_t Offset, size_t Length, const void *Buffer, Uint Flags)
 {
-       // Write to current line buffer, flushing on unknown character or newline
-       // - or line wrap?
-       // Echo back if instructed
-       PTY_SendInput(Node->ImplPtr, Buffer, Length);
-       return -1;
+       return PTY_SendInput(Node->ImplPtr, Buffer, Length);
 }
 
 int PTY_IOCtlServer(tVFS_Node *Node, int ID, void *Data)
@@ -685,7 +706,7 @@ int PTY_IOCtlServer(tVFS_Node *Node, int ID, void *Data)
        {
        case DRV_IOCTL_TYPE:    return DRV_TYPE_TERMINAL;
        case DRV_IOCTL_IDENT:   memcpy(Data, "PTY\0", 4);       return 0;
-       case DRV_IOCTL_VER:     return 0x100;
+       case DRV_IOCTL_VERSION: return 0x100;
        case DRV_IOCTL_LOOKUP:  return 0;
        
        case PTY_IOCTL_GETMODE:
@@ -705,6 +726,8 @@ int PTY_IOCtlServer(tVFS_Node *Node, int ID, void *Data)
                if( !CheckMem(Data, sizeof(*dims)) ) { errno = EINVAL; return -1; }
                PTY_SetAttrib(pty, dims, NULL, 0);
                break;
+       case PTY_IOCTL_GETID:
+               return pty->NumericName;
        }
        errno = ENOSYS;
        return -1;

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