1 /* This file is part of the yazpp toolkit.
2 * Copyright (C) 1998-2012 Index Data and Mike Taylor
3 * See the file LICENSE for details.
13 #include <sys/types.h>
26 #include <yazpp/socket-manager.h>
29 using namespace yazpp_1;
31 SocketManager::SocketEntry **SocketManager::lookupObserver(
32 ISocketObserver *observer)
36 for (se = &m_observers; *se; se = &(*se)->next)
37 if ((*se)->observer == observer)
42 int SocketManager::getNumberOfObservers()
46 for (se = m_observers; se; se = se->next, i++)
51 void SocketManager::addObserver(int fd, ISocketObserver *observer)
55 se = *lookupObserver(observer);
59 se->next= m_observers;
61 se->observer = observer;
65 se->last_activity = 0;
69 void SocketManager::deleteObserver(ISocketObserver *observer)
71 SocketEntry **se = lookupObserver(observer);
74 removeEvent (observer);
75 SocketEntry *se_tmp = *se;
81 void SocketManager::deleteObservers()
83 SocketEntry *se = m_observers;
87 SocketEntry *se_next = se->next;
94 void SocketManager::maskObserver(ISocketObserver *observer, int mask)
98 yaz_log(m_log, "obs=%p read=%d write=%d except=%d", observer,
99 mask & SOCKET_OBSERVE_READ,
100 mask & SOCKET_OBSERVE_WRITE,
101 mask & SOCKET_OBSERVE_EXCEPT);
103 se = *lookupObserver(observer);
108 void SocketManager::timeoutObserver(ISocketObserver *observer,
113 se = *lookupObserver(observer);
115 se->timeout = timeout;
119 void SocketManager::inspect_poll_result(int res, struct yaz_poll_fd *fds,
120 int no_fds, int timeout)
123 yaz_log(m_log, "yaz_poll returned res=%d", res);
124 time_t now = time(0);
126 int no_put_events = 0;
127 int no_lost_observers = 0;
129 for (i = 0; i < no_fds; i++)
132 for (p = m_observers; p; p = p->next)
133 if (p->fd == fds[i].fd)
137 // m_observers list changed since poll started
142 enum yaz_poll_mask output_mask = fds[i].output_mask;
145 if (output_mask & yaz_poll_read)
146 mask |= SOCKET_OBSERVE_READ;
148 if (output_mask & yaz_poll_write)
149 mask |= SOCKET_OBSERVE_WRITE;
151 if (output_mask & yaz_poll_except)
152 mask |= SOCKET_OBSERVE_EXCEPT;
156 SocketEvent *event = new SocketEvent;
157 p->last_activity = now;
158 event->observer = p->observer;
162 yaz_log (m_log, "putEvent I/O mask=%d", mask);
164 else if (res == 0 && p->timeout_this == timeout)
166 SocketEvent *event = new SocketEvent;
167 assert (p->last_activity);
168 yaz_log (m_log, "putEvent timeout fd=%d, now = %ld last_activity=%ld timeout=%d",
169 p->fd, now, p->last_activity, p->timeout);
170 p->last_activity = now;
171 event->observer = p->observer;
172 event->event = SOCKET_OBSERVE_TIMEOUT;
178 SocketEvent *event = getEvent();
181 event->observer->socketNotify(event->event);
186 if (no_lost_observers == 0)
189 yaz_log(YLOG_WARN, "unhandled socket event. yaz_poll returned %d",
191 yaz_log(YLOG_WARN, "no_put_events=%d no_fds=%d i=%d timeout=%d",
192 no_put_events, no_fds, i, timeout);
197 int SocketManager::processEvent()
200 SocketEvent *event = getEvent();
202 yaz_log (m_log, "SocketManager::processEvent manager=%p", this);
205 event->observer->socketNotify(event->event);
211 time_t now = time(0);
214 for (p = m_observers; p; p = p->next)
219 struct yaz_poll_fd *fds = new yaz_poll_fd [no_fds];
220 for (i = 0, p = m_observers; p; p = p->next, i++)
224 if (p->mask & SOCKET_OBSERVE_READ)
225 input_mask += yaz_poll_read;
226 if (p->mask & SOCKET_OBSERVE_WRITE)
227 input_mask += yaz_poll_write;
228 if (p->mask & SOCKET_OBSERVE_EXCEPT)
229 input_mask += yaz_poll_except;
230 if (p->timeout > 0 ||
231 (p->timeout == 0 && (p->mask & SOCKET_OBSERVE_WRITE) == 0))
234 timeout_this = p->timeout;
235 if (p->last_activity)
236 timeout_this -= now - p->last_activity;
238 p->last_activity = now;
239 if (timeout_this < 0 || timeout_this > 2147483646)
241 if (timeout == -1 || timeout_this < timeout)
242 timeout = timeout_this;
243 p->timeout_this = timeout_this;
244 yaz_log (m_log, "SocketManager::select timeout_this=%d",
248 p->timeout_this = -1;
249 fds[i].input_mask = (enum yaz_poll_mask) input_mask;
253 while ((res = yaz_poll(fds, no_fds, timeout, 0)) < 0 && pass < 10)
257 yaz_log(YLOG_ERRNO|YLOG_WARN, "yaz_poll");
258 yaz_log(YLOG_WARN, "errno=%d timeout=%d", errno, timeout);
262 inspect_poll_result(res, fds, no_fds, timeout);
265 return res >= 0 ? 1 : -1;
269 // n p n p ...... n p n p
272 void SocketManager::putEvent(SocketEvent *event)
274 // put in back of queue
277 m_queue_back->prev = event;
278 assert (m_queue_front);
282 assert (!m_queue_front);
283 m_queue_front = event;
285 event->next = m_queue_back;
287 m_queue_back = event;
290 SocketManager::SocketEvent *SocketManager::getEvent()
292 // get from front of queue
293 SocketEvent *event = m_queue_front;
296 assert (m_queue_back);
297 m_queue_front = event->prev;
300 assert (m_queue_back);
301 m_queue_front->next = 0;
308 void SocketManager::removeEvent(ISocketObserver *observer)
310 SocketEvent *ev = m_queue_back;
313 SocketEvent *ev_next = ev->next;
314 if (observer == ev->observer)
317 ev->prev->next = ev->next;
319 m_queue_back = ev->next;
321 ev->next->prev = ev->prev;
323 m_queue_front = ev->prev;
330 SocketManager::SocketManager()
338 SocketManager::~SocketManager()
345 * c-file-style: "Stroustrup"
346 * indent-tabs-mode: nil
348 * vim: shiftwidth=4 tabstop=8 expandtab