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
|
// The following test exercises the Eric C. Newton's <ecn@clark.net>
// XtReactor implementation.
#include "ace/OS_main.h"
#include "ace/XtReactor/XtReactor.h"
#include "ace/Reactor.h"
#include "ace/Message_Block.h"
#include "ace/Log_Msg.h"
#include "ace/OS_NS_unistd.h"
#include <Xm/PushB.h>
class Stdin : public ACE_Event_Handler
{
public:
ACE_HANDLE get_handle (void) const { return ACE_STDIN; }
int handle_input (ACE_HANDLE)
{
char c;
if (ACE_OS::read (ACE_STDIN, &c, 1)==1)
ACE_DEBUG ((LM_DEBUG,
"Got input '%d'\n",
(int) c));
return 0;
}
int handle_timeout (const ACE_Time_Value &tv,
const void *)
{
ACE_DEBUG ((LM_DEBUG,
"Timeout! %f\n",
(double) (tv.msec ()/1000.)));
return 0;
}
};
static void
ActivateCB (Widget, XtPointer, XtPointer)
{
ACE_DEBUG ((LM_DEBUG,
"Button pushed!\n"));
}
int
ACE_TMAIN (int argc, ACE_TCHAR**argv)
{
// The worlds most useless user interface
Widget top_level = XtVaAppInitialize (0,
"buttontest",
0,
0,
&argc,
argv,
0,
static_cast<void *>(0));
char change[] = "change"; // XmCreatePushButton() wants a non-const
// string.
Widget button = XmCreatePushButton (top_level,
change,
0,
0);
XtManageChild (button);
XtAddCallback (button,
XmNactivateCallback,
ActivateCB,
0);
// A reactor beastie.
ACE_XtReactor xreactor (XtWidgetToApplicationContext (top_level));
ACE_Reactor reactor (&xreactor);
// Print a message when data is recv'd on stdin...
ACE_Event_Handler * stdin_;
ACE_NEW_RETURN (stdin_,
Stdin,
-1);
reactor.register_handler (stdin_,
ACE_Event_Handler::READ_MASK);
// Print a message every 10 seconds
if (reactor.schedule_timer (stdin_, 0,
ACE_Time_Value (10),
ACE_Time_Value (10)) == -1)
ACE_ERROR_RETURN ((LM_ERROR,
"%p\n",
"schedule_timer"), -1);
// Show the top_level widget
XtRealizeWidget (top_level);
// Demonstrate Reactor/Xt event loop unification:
XtAppMainLoop (XtWidgetToApplicationContext (top_level));
}
|
