Move sourcecode into 'senf/' directory
[senf.git] / senf / Scheduler / Scheduler.test.cc
1 // $Id$
2 //
3 // Copyright (C) 2006
4 // Fraunhofer Institute for Open Communication Systems (FOKUS)
5 // Competence Center NETwork research (NET), St. Augustin, GERMANY
6 //     Stefan Bund <g0dil@berlios.de>
7 //
8 // This program is free software; you can redistribute it and/or modify
9 // it under the terms of the GNU General Public License as published by
10 // the Free Software Foundation; either version 2 of the License, or
11 // (at your option) any later version.
12 //
13 // This program is distributed in the hope that it will be useful,
14 // but WITHOUT ANY WARRANTY; without even the implied warranty of
15 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16 // GNU General Public License for more details.
17 //
18 // You should have received a copy of the GNU General Public License
19 // along with this program; if not, write to the
20 // Free Software Foundation, Inc.,
21 // 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
22
23 /** \file
24     \brief Scheduler unit tests */
25
26 //#include "Scheduler.test.hh"
27 //#include "Scheduler.test.ih"
28
29 // Custom includes
30 #include <sys/types.h>
31 #include <signal.h>
32 #include <sys/wait.h>
33 #include <unistd.h>
34 #include <sys/socket.h>
35 #include <sys/un.h>
36 #include <errno.h>
37 #include <string.h>
38 #include <iostream>
39 #include <boost/bind.hpp>
40
41 #include "Scheduler.hh"
42
43 #include "../Utils/auto_unit_test.hh"
44 #include <boost/test/test_tools.hpp>
45
46 #define prefix_
47 ///////////////////////////////cc.p////////////////////////////////////////
48
49 namespace {
50
51     char const * SOCK_PATH = "/tmp/sched_test.sock";
52
53     void error(char const * fn, char const * proc="")
54     {
55         std::cerr << "\n" << proc << fn << ": " << strerror(errno) << std::endl;
56     }
57
58     void fail(char const * fn)
59     {
60         error(fn,"server: ");
61         _exit(1);
62     }
63
64     void server()
65     {
66         int sock = socket(PF_UNIX,SOCK_STREAM,0);
67         if (sock<0) fail("socket");
68         struct sockaddr_un sun;
69         memset(&sun,0,sizeof(sun));
70         sun.sun_family = AF_UNIX;
71         strcpy(sun.sun_path,SOCK_PATH);
72         if (bind(sock,(struct sockaddr*)&sun,sizeof(sun))<0) fail("bind");
73         if (listen(sock,1)<0) fail("listen");
74         int conn = accept(sock,0,0);
75         if (conn < 0) fail("accept");
76
77         ///////////////////////////////////////////////////////////////////////////
78
79         if (write(conn,"READ",4)<0) fail("write");
80         char buffer[1024];
81         int size =  read(conn,buffer,1024);
82         if (size<0) fail("read");
83         if (size == 5) {
84             buffer[5] = 0;
85             if (strcmp(buffer,"WRITE")==0) {
86                 if (write(conn,"OK",2)<0) fail("write");
87             } else
88                 if (write(conn,"FAIL",4)<0) fail("write");
89         } else
90             if (write(conn,"FAIL",4)<0) fail("write");
91
92         ///////////////////////////////////////////////////////////////////////////
93
94         close(conn);
95         close(sock);
96     }
97
98     int start_server()
99     {
100         unlink(SOCK_PATH);
101         int pid = fork();
102         if (pid == 0) {
103             signal(SIGCHLD, SIG_IGN);
104             server();
105             _exit(0);
106         }
107         if (pid < 0) {
108             error("fork");
109             return 0;
110         }
111         signal(SIGCHLD, SIG_DFL);
112
113         sleep(1); // Wait for the server socket to be opened
114         return pid;
115     }
116
117     bool stop_server(int pid)
118     {
119         sleep(1); // Wait for the server to terminate
120         if (kill(pid,SIGTERM)<0) {
121             error("kill");
122             return false;
123         }
124         int status = 0;
125         if (waitpid(pid,&status,0)<0) {
126             error("waitpid");
127             return false;
128         }
129         unlink(SOCK_PATH);
130         if (WIFSIGNALED(status)) {
131             std::cerr << "\nserver terminated with signal " << WTERMSIG(status) << std::endl;
132             return false;
133         }
134         if (WEXITSTATUS(status)!=0) {
135             std::cerr << "\nserver terminated with exit status " << WEXITSTATUS(status) << std::endl;
136             return false;
137         }
138         return true;
139     }
140
141     char buffer[1024];
142     int size;
143     int event;
144
145     void callback(int fd, int ev)
146     {
147         event = ev;
148         switch (event & senf::scheduler::FdEvent::EV_ALL) {
149         case senf::scheduler::FdEvent::EV_READ:
150             size = recv(fd,buffer,1024,0);
151             break;
152         case senf::scheduler::FdEvent::EV_PRIO:
153             size = recv(fd,buffer,1024,MSG_OOB);
154             break;
155         case senf::scheduler::FdEvent::EV_WRITE:
156             size = write(fd,buffer,size);
157             break;
158         }
159         senf::scheduler::terminate();
160     }
161
162     bool timeoutCalled = false;
163     void timeout()
164     {
165         timeoutCalled = true;
166         senf::scheduler::terminate();
167     }
168
169     struct HandleWrapper
170     {
171         HandleWrapper(int fd,std::string const & tag) : fd_(fd), tag_(tag) {}
172         int fd_;
173         std::string tag_;
174     };
175
176     int retrieve_filehandle(HandleWrapper const & handle)
177     {
178         return handle.fd_;
179     }
180
181     void handleCallback(HandleWrapper const & handle, int event)
182     {
183         if (handle.tag_ != "TheTag")
184             return;
185         callback(handle.fd_,event);
186     }
187
188     bool is_close(senf::ClockService::clock_type a, senf::ClockService::clock_type b)
189     {
190         return (a<b ? b-a : a-b) < senf::ClockService::milliseconds(100);
191     }
192     
193     senf::ClockService::clock_type sigtime (0);
194
195     void sigusr(siginfo_t const &)
196     {
197         sigtime = senf::ClockService::now();
198         senf::scheduler::terminate();
199     }
200
201     void delay(unsigned long milliseconds)
202     {
203         struct timespec ts;
204         ts.tv_sec = milliseconds / 1000;
205         ts.tv_nsec = (milliseconds % 1000) * 1000000;
206         while (nanosleep(&ts,&ts) < 0 && errno == EINTR) ;
207     }
208
209     void blockingHandler()
210     {
211         delay(2200);
212         senf::scheduler::terminate();
213     }
214
215     unsigned eventCount (0);
216
217     void eventeventhandler()
218     {
219         ++ eventCount;
220     }
221 }
222
223 void schedulerTest()
224 {
225     int pid = start_server();
226     BOOST_REQUIRE (pid);
227
228     int sock = socket(PF_UNIX,SOCK_STREAM,0);
229     if (sock<0) {
230         error("socket");
231         BOOST_FAIL("socket");
232     }
233     struct sockaddr_un sun;
234     memset(&sun,0,sizeof(sun));
235     sun.sun_family = AF_UNIX;
236     strcpy(sun.sun_path,SOCK_PATH);
237
238     if (connect(sock,(struct sockaddr*)&sun,sizeof(sun))<0) {
239         error("connect");
240         BOOST_FAIL("connect");
241     }
242
243     ///////////////////////////////////////////////////////////////////////////
244
245     senf::scheduler::EventHook evev ("eventCounter", eventeventhandler,
246                                      senf::scheduler::EventHook::PRE);
247
248     {
249         senf::scheduler::FdEvent fde1 ("testFdEvent", boost::bind(&callback, sock, _1),
250                                       sock, senf::scheduler::FdEvent::EV_READ);
251         event = senf::scheduler::FdEvent::EV_NONE;
252         SENF_CHECK_NO_THROW( senf::scheduler::process() );
253         BOOST_CHECK_EQUAL( event, senf::scheduler::FdEvent::EV_READ );
254         BOOST_REQUIRE_EQUAL( size, 4 );
255         buffer[size]=0;
256         BOOST_CHECK_EQUAL( buffer, "READ" );
257
258         HandleWrapper handle(sock,"TheTag");
259         senf::scheduler::FdEvent fde2 ("testFdEvent", boost::bind(&handleCallback,handle,_1),
260                                       handle, senf::scheduler::FdEvent::EV_WRITE);
261         strcpy(buffer,"WRITE");
262         size=5;
263         event = senf::scheduler::FdEvent::EV_NONE;
264         SENF_CHECK_NO_THROW( senf::scheduler::process() );
265         BOOST_CHECK_EQUAL( event, senf::scheduler::FdEvent::EV_WRITE );
266
267         SENF_CHECK_NO_THROW( fde2.disable() );
268         event = senf::scheduler::FdEvent::EV_NONE;
269         sleep(1);
270         SENF_CHECK_NO_THROW( senf::scheduler::process() );
271         BOOST_CHECK_EQUAL( event, senf::scheduler::FdEvent::EV_READ|senf::scheduler::FdEvent::EV_HUP );
272         BOOST_REQUIRE_EQUAL( size, 2 );
273         buffer[size]=0;
274         BOOST_CHECK_EQUAL( buffer, "OK" );
275     }
276     
277     {
278         senf::scheduler::TimerEvent timer1 ("testTimer1", &timeout, 
279                                             senf::ClockService::now()+senf::ClockService::milliseconds(200));
280         senf::scheduler::TimerEvent timer2 ("testTimer2", &timeout,
281                                             senf::ClockService::now()+senf::ClockService::milliseconds(400));
282                                             
283         event = senf::scheduler::FdEvent::EV_NONE;
284         senf::ClockService::clock_type t (senf::ClockService::now());
285         SENF_CHECK_NO_THROW( senf::scheduler::process() );
286         BOOST_CHECK_PREDICATE( is_close, (senf::ClockService::now()-t) (senf::ClockService::milliseconds(200)) );
287         BOOST_CHECK( timeoutCalled );
288         BOOST_CHECK( ! timer1.enabled() );
289         BOOST_CHECK_EQUAL( event, senf::scheduler::FdEvent::EV_NONE );
290         BOOST_CHECK_PREDICATE( is_close, (senf::ClockService::now()) (senf::scheduler::eventTime()) );
291         timeoutCalled = false;
292         SENF_CHECK_NO_THROW( senf::scheduler::process() );
293         BOOST_CHECK_PREDICATE( is_close, (senf::ClockService::now()-t) (senf::ClockService::milliseconds(400)) );
294         BOOST_CHECK( timeoutCalled );
295         BOOST_CHECK_EQUAL( event, senf::scheduler::FdEvent::EV_NONE );
296         BOOST_CHECK( ! timer2.enabled() );
297
298         BOOST_MESSAGE( "A 'Scheduler task hanging' error is expected to be signaled here." );
299         SENF_CHECK_NO_THROW( timer1.action(&blockingHandler) );
300         SENF_CHECK_NO_THROW( timer1.timeout(senf::ClockService::now()) );
301         SENF_CHECK_NO_THROW( senf::scheduler::process() );
302         BOOST_CHECK_EQUAL( senf::scheduler::watchdogEvents(), 1u );
303     }
304
305     {
306         senf::scheduler::TimerEvent timer ("testWatchdog", &timeout,
307                                            senf::ClockService::now()+senf::ClockService::milliseconds(400));
308         senf::scheduler::SignalEvent sig (SIGUSR1, &sigusr);
309
310         senf::ClockService::clock_type t = senf::ClockService::now();
311         ::kill(::getpid(), SIGUSR1);
312         delay(200);
313         SENF_CHECK_NO_THROW( senf::scheduler::process() ); 
314         BOOST_CHECK_PREDICATE( is_close, (senf::ClockService::now()) (t+senf::ClockService::milliseconds(200)) );
315         BOOST_CHECK_PREDICATE( is_close, (sigtime) (t+senf::ClockService::milliseconds(200)) );
316         SENF_CHECK_NO_THROW( senf::scheduler::process() ); 
317     } 
318
319     BOOST_CHECK( eventCount >= 8u );
320
321  
322     ///////////////////////////////////////////////////////////////////////////
323
324     close(sock);
325
326     BOOST_CHECK (stop_server(pid));
327 }
328
329 BOOST_AUTO_UNIT_TEST(testSchedulerPollTimers)
330 {
331     BOOST_CHECK( ! senf::scheduler::usingHiresTimers() );
332     schedulerTest();
333 }
334
335 BOOST_AUTO_UNIT_TEST(testSchedulerHiresTimers)
336 {
337     if (senf::scheduler::haveScalableHiresTimers())
338         BOOST_MESSAGE( "Using timerfd() hires timers" );
339     else
340         BOOST_MESSAGE( "Using POSIX hires timers");
341     SENF_CHECK_NO_THROW( senf::scheduler::hiresTimers() );
342     BOOST_CHECK( senf::scheduler::usingHiresTimers() );
343     schedulerTest();
344     SENF_CHECK_NO_THROW( senf::scheduler::loresTimers() );
345     BOOST_CHECK( ! senf::scheduler::usingHiresTimers() );
346 }
347
348 BOOST_AUTO_UNIT_TEST(testSchedulerPOSIXTimers)
349 {
350     if (senf::scheduler::haveScalableHiresTimers()) {
351         SENF_CHECK_NO_THROW( senf::scheduler::detail::TimerDispatcher::instance().timerSource(
352                                  std::auto_ptr<senf::scheduler::detail::TimerSource>(
353                                      new senf::scheduler::detail::POSIXTimerSource())) );
354         schedulerTest();
355         senf::scheduler::loresTimers();
356     }
357 }
358
359 namespace {
360     
361     void sigme()
362     {
363         senf::scheduler::BlockSignals signalBlocker;
364         signalBlocker.block();
365         signalBlocker.unblock();
366         BOOST_CHECK( ! signalBlocker.blocked() );
367         signalBlocker.unblock();
368         signalBlocker.block();
369         BOOST_CHECK( signalBlocker.blocked() );
370         ::kill(::getpid(), SIGUSR1);
371         delay(200);
372     }
373
374 }
375
376 BOOST_AUTO_UNIT_TEST(blockSignals)
377 {
378     senf::scheduler::TimerEvent signaler ("sigme", &sigme, senf::ClockService::now());
379     senf::scheduler::TimerEvent timer (
380         "testWatchdog", &timeout, senf::ClockService::now()+senf::ClockService::milliseconds(400));
381     senf::scheduler::SignalEvent sig (SIGUSR1, &sigusr);
382     
383     senf::ClockService::clock_type t = senf::ClockService::now();
384     SENF_CHECK_NO_THROW( senf::scheduler::process() ); 
385
386     BOOST_CHECK_PREDICATE( is_close, 
387                            (senf::ClockService::now()) 
388                            (t+senf::ClockService::milliseconds(200)) );
389     BOOST_CHECK_PREDICATE( is_close, (sigtime) (t+senf::ClockService::milliseconds(200)) );
390
391     SENF_CHECK_NO_THROW( senf::scheduler::process() ); 
392 }
393
394 ///////////////////////////////cc.e////////////////////////////////////////
395 #undef prefix_
396
397 \f
398 // Local Variables:
399 // mode: c++
400 // fill-column: 100
401 // c-file-style: "senf"
402 // indent-tabs-mode: nil
403 // ispell-local-dictionary: "american"
404 // compile-command: "scons -u test"
405 // comment-column: 40
406 // End: