src/motif/gsockmot.c

   1 /* -------------------------------------------------------------------------
   2  * Project: GSocket (Generic Socket) for WX
   3  * Name:    gsockmot.c
   4  * Purpose: GSocket: Motif part
   5  * CVSID:   $Id$
   6  * ------------------------------------------------------------------------- */
   7
   8 #include "wx/setup.h"
   9
  10 #if wxUSE_SOCKETS
  11
  12 #include <stdlib.h>
  13 #include <X11/Intrinsic.h>
  14 #include "wx/gsocket.h"
  15 #include "wx/unix/gsockunx.h"
  16
  17 extern XtAppContext wxGetAppContext();
  18
  19 static void _GSocket_Motif_Input(XtPointer data, int *fid,
  20                                  XtInputId *id)
  21 {
  22   GSocket *socket = (GSocket *)data;
  23
  24   _GSocket_Detected_Read(socket);
  25 }
  26
  27 static void _GSocket_Motif_Output(XtPointer data, int *fid,
  28                                   XtInputId *id)
  29 {
  30   GSocket *socket = (GSocket *)data;
  31
  32   _GSocket_Detected_Write(socket);
  33 }
  34
  35 void _GSocket_GUI_Init(GSocket *socket)
  36 {
  37   int i;
  38   int *m_id;
  39
  40   socket->m_gui_dependent = (char *)malloc(sizeof(int)*2);
  41   m_id = (int *)(socket->m_gui_dependent);
  42
  43   m_id[0] = -1;
  44   m_id[1] = -1;
  45 }
  46
  47 void _GSocket_GUI_Destroy(GSocket *socket)
  48 {
  49   free(socket->m_gui_dependent);
  50 }
  51
  52 void _GSocket_Install_Callback(GSocket *socket, GSocketEvent event)
  53 {
  54   int *m_id = (int *)(socket->m_gui_dependent);
  55   int c;
  56
  57   if (socket->m_fd == -1)
  58     return;
  59
  60   switch (event)
  61   {
  62     case GSOCK_LOST:       /* fall-through */
  63     case GSOCK_INPUT:      c = 0; break;
  64     case GSOCK_OUTPUT:     c = 1; break;
  65     case GSOCK_CONNECTION: c = ((socket->m_server) ? 0 : 1); break;
  66     default: return;
  67   }
  68
  69   if (m_id[c] != -1)
  70     XtRemoveInput(m_id[c]);
  71
  72   if (c == 0)
  73   {
  74      m_id[0] = XtAppAddInput(wxGetAppContext(), socket->m_fd,
  75                              (XtPointer *)XtInputReadMask,
  76                              (XtInputCallbackProc) _GSocket_Motif_Input,
  77                              (XtPointer) socket);
  78   }
  79   else
  80   {
  81      m_id[1] = XtAppAddInput(wxGetAppContext(), socket->m_fd,
  82                              (XtPointer *)XtInputWriteMask,
  83                              (XtInputCallbackProc) _GSocket_Motif_Output,
  84                              (XtPointer) socket);
  85   }
  86 }
  87
  88 void _GSocket_Uninstall_Callback(GSocket *socket, GSocketEvent event)
  89 {
  90   int *m_id = (int *)(socket->m_gui_dependent);
  91   int c;
  92
  93   switch (event)
  94   {
  95     case GSOCK_LOST:       /* fall-through */
  96     case GSOCK_INPUT:      c = 0; break;
  97     case GSOCK_OUTPUT:     c = 1; break;
  98     case GSOCK_CONNECTION: c = ((socket->m_server) ? 0 : 1); break;
  99     default: return;
 100   }
 101
 102   if (m_id[c] != -1)
 103     XtRemoveInput(m_id[c]);
 104
 105   m_id[c] = -1;
 106 }
 107
 108 void _GSocket_Enable_Events(GSocket *socket)
 109 {
 110   _GSocket_Install_Callback(socket, GSOCK_INPUT);
 111   _GSocket_Install_Callback(socket, GSOCK_OUTPUT);
 112 }
 113
 114 void _GSocket_Disable_Events(GSocket *socket)
 115 {
 116   _GSocket_Uninstall_Callback(socket, GSOCK_INPUT);
 117   _GSocket_Uninstall_Callback(socket, GSOCK_OUTPUT);
 118 }
 119
 120 #endif /* wxUSE_SOCKETS */