1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
|
/*
* The Unix Channel
*
* by Michel Beaudouin-Lafon and Stephane Chatty
*
* Copyright 1990-1993
* Laboratoire de Recherche en Informatique (LRI)
* Centre d'Etudes de la Navigation Aerienne
*
* Xt-based multiplexers
*
* $Id$
* $CurLog$
*/
#include "XtMultiplexer.h"
#include "error.h"
IvlXtMultiplexer :: IvlXtMultiplexer ()
: IvlBaseMultiplexer ()
{
memset (ReadId, 0, NFILE * sizeof (XtInputId));
memset (WriteId, 0, NFILE * sizeof (XtInputId));
}
IvlXtMultiplexer :: ~IvlXtMultiplexer ()
{
}
/* the input and output callback for channels */
static void
inputCB (XtPointer client_data, int*, XtInputId*)
{
IvlChannel* chan = (IvlChannel*) client_data;
chan->HandleRead ();
}
static void
outputCB (XtPointer client_data, int*, XtInputId*)
{
IvlChannel* chan = (IvlChannel*) client_data;
chan->HandleWrite ();
}
void
IvlXtMultiplexer :: SetMasks (int fd, IOMODE mode)
{
IvlChannel* ch = Channels [fd];
if (!ch)
return;
/* remove if already there */
if (ReadId [fd]) {
XtRemoveInput (ReadId [fd]);
ReadId [fd] = (XtInputId) 0;
ReadCount--;
}
if (WriteId [fd]) {
XtRemoveInput (WriteId [fd]);
WriteId [fd] = (XtInputId) 0;
WriteCount--;
}
/* add channel */
if (mode & IORead) {
ReadId [fd] = XtAddInput (fd, (XtPointer) XtInputReadMask, inputCB, (caddr_t) ch);
ReadCount++;
}
if (mode & IOWrite) {
WriteId [fd] = XtAddInput (fd, (XtPointer) XtInputWriteMask, outputCB, (caddr_t) ch);
WriteCount++;
}
if (mode & IOSelect)
Error (ErrWarn, "AddChannel", "select condition ignored");
}
void
IvlXtMultiplexer :: FireTimers (void* mpx, XtIntervalId*)
{
IvlCoreTimer::Fire (((IvlXtMultiplexer*) mpx)->GetTimerSet ());
}
void
IvlXtMultiplexer :: SetTimeOut (Millisecond delay)
{
/* should replace with XtAppAddTimeOut */
TimeOut = XtAddTimeOut (delay, &IvlXtMultiplexer::FireTimers, this);
}
void
IvlXtMultiplexer :: SuppressTimeOut ()
{
XtRemoveTimeOut (TimeOut);
TimeOut = 0;
}
void
IvlXtMultiplexer :: FireSignals (void* mpx)
{
((IvlXtMultiplexer*) mpx)->HandleDeferredSignals ();
}
void
IvlXtMultiplexer :: AddSignalHook ()
{
/* should replace with XtAppAddWorkProc */
XtAddWorkProc ((XtWorkProc) (&IvlXtMultiplexer::FireSignals), this);
}
MPX_RES
IvlXtMultiplexer :: Loop ()
{
XEvent event;
bool waiting = true;
while (Looping && (waiting || ReadCount || WriteCount)) {
// *** problem with other loop: work proc are not called!
// *** we must find a way to exit properly with this one...
// *** sending ourselves an event???
XtNextEvent (&event);
XtDispatchEvent (&event);
if (ReadCount || WriteCount)
waiting = false;
}
if (Looping) {
Looping = false;
return isMpxEmpty;
}
return isMpxTerminated;
}
|
