add possibility to get a dict with transponderdata for servicerefs
[vuplus_dvbapp] / lib / base / ebase.cpp
1 #include <lib/base/ebase.h>
2
3 #include <fcntl.h>
4 #include <unistd.h>
5 #include <errno.h>
6
7 #include <lib/base/eerror.h>
8 #include <lib/base/elock.h>
9
10 eSocketNotifier::eSocketNotifier(eMainloop *context, int fd, int requested, bool startnow): context(*context), fd(fd), state(0), requested(requested)
11 {
12         if (startnow)   
13                 start();
14 }
15
16 eSocketNotifier::~eSocketNotifier()
17 {
18         stop();
19 }
20
21 void eSocketNotifier::start()
22 {
23         if (state)
24                 stop();
25
26         context.addSocketNotifier(this);
27         state=1;
28 }
29
30 void eSocketNotifier::stop()
31 {
32         if (state)
33                 context.removeSocketNotifier(this);
34
35         state=0;
36 }
37
38                                         // timer
39 void eTimer::start(long msek, bool singleShot)
40 {
41         if (bActive)
42                 stop();
43
44         bActive = true;
45         bSingleShot = singleShot;
46         interval = msek;
47         gettimeofday(&nextActivation, 0);
48 //      eDebug("this = %p\nnow sec = %d, usec = %d\nadd %d msec", this, nextActivation.tv_sec, nextActivation.tv_usec, msek);
49         nextActivation += (msek<0 ? 0 : msek);
50 //      eDebug("next Activation sec = %d, usec = %d", nextActivation.tv_sec, nextActivation.tv_usec );
51         context.addTimer(this);
52 }
53
54 void eTimer::startLongTimer( int seconds )
55 {
56         if (bActive)
57                 stop();
58
59         bActive = bSingleShot = true;
60         interval = 0;
61         gettimeofday(&nextActivation, 0);
62 //      eDebug("this = %p\nnow sec = %d, usec = %d\nadd %d sec", this, nextActivation.tv_sec, nextActivation.tv_usec, seconds);
63         if ( seconds > 0 )
64                 nextActivation.tv_sec += seconds;
65 //      eDebug("next Activation sec = %d, usec = %d", nextActivation.tv_sec, nextActivation.tv_usec );
66         context.addTimer(this);
67 }
68
69 void eTimer::stop()
70 {
71         if (bActive)
72         {
73                 bActive=false;
74                 context.removeTimer(this);
75         }
76 }
77
78 void eTimer::changeInterval(long msek)
79 {
80         if (bActive)  // Timer is running?
81         {
82                 context.removeTimer(this);       // then stop
83                 nextActivation -= interval;  // sub old interval
84         }
85         else
86                 bActive=true; // then activate Timer
87
88         interval = msek;                                                // set new Interval
89         nextActivation += interval;             // calc nextActivation
90
91         context.addTimer(this);                         // add Timer to context TimerList
92 }
93
94 void eTimer::activate()   // Internal Funktion... called from eApplication
95 {
96         context.removeTimer(this);
97
98         if (!bSingleShot)
99         {
100                 nextActivation += interval;
101                 context.addTimer(this);
102         }
103         else
104                 bActive=false;
105
106         /*emit*/ timeout();
107 }
108
109 void eTimer::addTimeOffset( int offset )
110 {
111         nextActivation.tv_sec += offset;
112 }
113
114 // mainloop
115 ePtrList<eMainloop> eMainloop::existing_loops;
116
117 void eMainloop::addSocketNotifier(eSocketNotifier *sn)
118 {
119         int fd = sn->getFD();
120         ASSERT(notifiers.find(fd) == notifiers.end());
121         ASSERT(new_notifiers.find(fd) == new_notifiers.end());
122         new_notifiers[fd]=sn;
123 }
124
125 void eMainloop::removeSocketNotifier(eSocketNotifier *sn)
126 {
127         int fd = sn->getFD();
128         std::map<int,eSocketNotifier*>::iterator i(notifiers.find(fd));
129         if (i != notifiers.end())
130                 return notifiers.erase(i);
131         i = new_notifiers.find(fd);
132         if (i != new_notifiers.end())
133                 return new_notifiers.erase(i);
134         eFatal("removed socket notifier which is not present");
135 }
136
137 int eMainloop::processOneEvent(unsigned int user_timeout, PyObject **res, ePyObject additional)
138 {
139         int return_reason = 0;
140                 /* get current time */
141         timeval now;
142         gettimeofday(&now, 0);
143         m_now_is_invalid = 0;
144                 
145         if (additional && !PyDict_Check(additional))
146                 eFatal("additional, but it's not dict");
147                 
148         if (additional && !res)
149                 eFatal("additional, but no res");
150                 
151         int poll_timeout = -1; /* infinite in case of empty timer list */
152                 
153         if (m_timer_list)
154         {
155                 singleLock s(recalcLock);
156                 poll_timeout = timeval_to_usec(m_timer_list.begin()->getNextActivation() - now);
157                         /* if current timer already passed, don't delay infinite. */
158                 if (poll_timeout < 0)
159                         poll_timeout = 0;
160                         
161                         /* convert us to ms */
162                 poll_timeout /= 1000;
163         }
164         
165         if ((user_timeout > 0) && (poll_timeout > 0) && ((unsigned int)poll_timeout > user_timeout))
166         {
167                 poll_timeout = user_timeout;
168                 return_reason = 1;
169         }
170
171         for (std::map<int, eSocketNotifier*>::iterator it(new_notifiers.begin()); it != new_notifiers.end();)
172         {
173                 notifiers[it->first]=it->second;
174                 new_notifiers.erase(it++);
175         }
176
177         int nativecount=notifiers.size(),
178                 fdcount=nativecount,
179                 ret=0;
180
181         if (additional)
182                 fdcount += PyDict_Size(additional);
183                 
184                 // build the poll aray
185         pollfd pfd[fdcount];  // make new pollfd array
186         std::map<int,eSocketNotifier*>::iterator it = notifiers.begin();
187         int i=0;
188         for (; i < nativecount; ++i, ++it)
189         {
190                 pfd[i].fd = it->first;
191                 pfd[i].events = it->second->getRequested();
192         }
193         
194         if (additional)
195         {
196                 PyObject *key, *val;
197                 int pos=0;
198                 while (PyDict_Next(additional, &pos, &key, &val)) {
199                         pfd[i].fd = PyObject_AsFileDescriptor(key);
200                         pfd[i++].events = PyInt_AsLong(val);
201                 }
202         }
203         
204         ret = ::poll(pfd, fdcount, poll_timeout);
205                         /* ret > 0 means that there are some active poll entries. */
206         if (ret > 0)
207         {
208                 int i=0;
209                 return_reason = 0;
210                 for (; i < nativecount ; ++i)
211                 {
212                         if (pfd[i].revents)
213                         {
214                                 int handled = 0;
215                                 it = notifiers.find(pfd[i].fd);
216                                 if (it != notifiers.end())
217                                 {
218                                         int req = it->second->getRequested();
219                                         handled |= req;
220                                         if (pfd[i].revents & req)
221                                                 it->second->activate(pfd[i].revents);
222                                 }
223                                 pfd[i].revents &= ~handled;
224                                 if (pfd[i].revents & (POLLERR|POLLHUP|POLLNVAL))
225                                         eDebug("poll: unhandled POLLERR/HUP/NVAL for fd %d(%d)", pfd[i].fd, pfd[i].revents);
226                         }
227                 }
228                 for (; i < fdcount; ++i)
229                 {
230                         if (pfd[i].revents)
231                         {
232                                 if (!*res)
233                                         *res = PyList_New(0);
234                                 ePyObject it = PyTuple_New(2);
235                                 PyTuple_SET_ITEM(it, 0, PyInt_FromLong(pfd[i].fd));
236                                 PyTuple_SET_ITEM(it, 1, PyInt_FromLong(pfd[i].revents));
237                                 PyList_Append(*res, it);
238                                 Py_DECREF(it);
239                         }
240                 }
241                         
242                 ret = 1; /* poll did not timeout. */
243         } else if (ret < 0)
244         {
245                         /* when we got a signal, we get EINTR. */
246                 if (errno != EINTR)
247                         eDebug("poll made error (%m)");
248                 else
249                 {
250                         return_reason = 2;
251                         ret = -1; /* don't assume the timeout has passed when we got a signal */
252                 }
253         }
254         
255                 /* when we not processed anything, check timers. */
256         if (!m_timer_list.empty())
257         {
258                         /* we know that this time has passed. */
259                 singleLock s(recalcLock);
260
261                 if (ret || m_now_is_invalid)
262                         gettimeofday(&now, 0);
263                 else
264                         now += poll_timeout;
265
266                         /* process all timers which are ready. first remove them out of the list. */
267                 while ((!m_timer_list.empty()) && (m_timer_list.begin()->getNextActivation() <= now))
268                         m_timer_list.begin()->activate();
269         }
270         
271         return return_reason;
272 }
273
274 void eMainloop::addTimer(eTimer* e)
275 {
276         m_timer_list.insert_in_order(e);
277 }
278
279 void eMainloop::removeTimer(eTimer* e)
280 {
281         m_timer_list.remove(e);
282 }
283
284 int eMainloop::iterate(unsigned int user_timeout, PyObject **res, ePyObject dict)
285 {
286         int ret = 0;
287         
288         timeval user_timer;
289         gettimeofday(&user_timer, 0);
290         user_timer += user_timeout;
291
292                 /* TODO: this code just became ugly. fix that. */
293         do
294         {
295                 if (m_interrupt_requested)
296                 {
297                         m_interrupt_requested = 0;
298                         return 0;
299                 }
300                 if (app_quit_now) return -1;
301                 timeval now, timeout;
302                 gettimeofday(&now, 0);
303                 timeout = user_timer - now;
304                 
305                 if (user_timeout && (user_timer <= now))
306                         return 0;
307                 
308                 int to = 0;
309                 if (user_timeout)
310                         to = timeout.tv_sec * 1000 + timeout.tv_usec / 1000;
311                 
312                 ret = processOneEvent(to, res, dict);
313                 if (res && *res)
314                         return ret;
315         } while (ret == 0);
316         
317         return ret;
318 }
319
320 int eMainloop::runLoop()
321 {
322         while (!app_quit_now)
323                 iterate();
324         return retval;
325 }
326
327 void eMainloop::reset()
328 {
329         app_quit_now=false;
330 }
331
332 PyObject *eMainloop::poll(ePyObject timeout, ePyObject dict)
333 {
334         PyObject *res=0;
335         
336         if (app_quit_now)
337                 Py_RETURN_NONE;
338         
339         int user_timeout = (timeout == Py_None) ? 0 : PyInt_AsLong(timeout);
340
341         iterate(user_timeout, &res, dict);
342         ePyObject ret(res);
343         
344         if (!ret) /* return empty list on timeout */
345                 return PyList_New(0);
346         
347         return ret;
348 }
349
350 void eMainloop::interruptPoll()
351 {
352         m_interrupt_requested = 1;
353 }
354
355 void eMainloop::quit(int ret)
356 {
357         retval = ret;
358         app_quit_now = true;
359 }
360
361 void eMainloop::addTimeOffset(int offset)
362 {
363         for (ePtrList<eMainloop>::iterator it(eMainloop::existing_loops)
364                 ;it != eMainloop::existing_loops.end(); ++it)
365         {
366                 singleLock s(it->recalcLock);
367                 it->m_now_is_invalid = 1;
368                 for (ePtrList<eTimer>::iterator tit = it->m_timer_list.begin(); tit != it->m_timer_list.end(); ++tit )
369                         tit->addTimeOffset(offset);
370         }
371 }
372
373 eApplication* eApp = 0;