1 /* This file is part of the yazpp toolkit.
2 * Copyright (C) 1998-2009 Index Data and Mike Taylor
3 * See the file LICENSE for details.
10 #include <sys/types.h>
23 #include <yazpp/socket-manager.h>
26 using namespace yazpp_1;
28 SocketManager::SocketEntry **SocketManager::lookupObserver(
29 ISocketObserver *observer)
33 for (se = &m_observers; *se; se = &(*se)->next)
34 if ((*se)->observer == observer)
39 void SocketManager::addObserver(int fd, ISocketObserver *observer)
43 se = *lookupObserver(observer);
47 se->next= m_observers;
49 se->observer = observer;
53 se->last_activity = 0;
57 void SocketManager::deleteObserver(ISocketObserver *observer)
59 SocketEntry **se = lookupObserver(observer);
62 removeEvent (observer);
63 SocketEntry *se_tmp = *se;
69 void SocketManager::deleteObservers()
71 SocketEntry *se = m_observers;
75 SocketEntry *se_next = se->next;
82 void SocketManager::maskObserver(ISocketObserver *observer, int mask)
86 yaz_log(m_log, "obs=%p read=%d write=%d except=%d", observer,
87 mask & SOCKET_OBSERVE_READ,
88 mask & SOCKET_OBSERVE_WRITE,
89 mask & SOCKET_OBSERVE_EXCEPT);
91 se = *lookupObserver(observer);
96 void SocketManager::timeoutObserver(ISocketObserver *observer,
101 se = *lookupObserver(observer);
103 se->timeout = timeout;
107 void SocketManager::inspect_poll_result(int res, struct yaz_poll_fd *fds,
108 int no_fds, int timeout)
111 yaz_log(m_log, "yaz_poll returned res=%d", res);
112 time_t now = time(0);
114 int no_put_events = 0;
117 for (i = 0, p = m_observers; p; p = p->next, i++)
119 enum yaz_poll_mask output_mask = fds[i].output_mask;
122 if (output_mask & yaz_poll_read)
123 mask |= SOCKET_OBSERVE_READ;
125 if (output_mask & yaz_poll_write)
126 mask |= SOCKET_OBSERVE_WRITE;
128 if (output_mask & yaz_poll_except)
129 mask |= SOCKET_OBSERVE_EXCEPT;
133 SocketEvent *event = new SocketEvent;
134 p->last_activity = now;
135 event->observer = p->observer;
139 yaz_log (m_log, "putEvent I/O mask=%d", mask);
141 else if (res == 0 && p->timeout_this == timeout)
143 SocketEvent *event = new SocketEvent;
144 assert (p->last_activity);
145 yaz_log (m_log, "putEvent timeout fd=%d, now = %ld last_activity=%ld timeout=%d",
146 p->fd, now, p->last_activity, p->timeout);
147 p->last_activity = now;
148 event->observer = p->observer;
149 event->event = SOCKET_OBSERVE_TIMEOUT;
155 SocketEvent *event = getEvent();
158 event->observer->socketNotify(event->event);
165 yaz_log(YLOG_WARN, "unhandled socket event. yaz_poll returned %d", res);
166 yaz_log(YLOG_WARN, "no_put_events=%d no_fds=%d i=%d timeout=%d",
167 no_put_events, no_fds, i, timeout);
172 int SocketManager::processEvent()
175 SocketEvent *event = getEvent();
177 yaz_log (m_log, "SocketManager::processEvent manager=%p", this);
180 event->observer->socketNotify(event->event);
186 time_t now = time(0);
189 for (p = m_observers; p; p = p->next)
194 struct yaz_poll_fd *fds = new yaz_poll_fd [no_fds];
195 for (i = 0, p = m_observers; p; p = p->next, i++)
199 if (p->mask & SOCKET_OBSERVE_READ)
200 input_mask += yaz_poll_read;
201 if (p->mask & SOCKET_OBSERVE_WRITE)
202 input_mask += yaz_poll_write;
203 if (p->mask & SOCKET_OBSERVE_EXCEPT)
204 input_mask += yaz_poll_except;
205 if (p->timeout > 0 ||
206 (p->timeout == 0 && (p->mask & SOCKET_OBSERVE_WRITE) == 0))
209 timeout_this = p->timeout;
210 if (p->last_activity)
211 timeout_this -= now - p->last_activity;
213 p->last_activity = now;
214 if (timeout_this < 0 || timeout_this > 2147483646)
216 if (timeout == -1 || timeout_this < timeout)
217 timeout = timeout_this;
218 p->timeout_this = timeout_this;
219 yaz_log (m_log, "SocketManager::select timeout_this=%d",
223 p->timeout_this = -1;
224 fds[i].input_mask = (enum yaz_poll_mask) input_mask;
228 while ((res = yaz_poll(fds, no_fds, timeout, 0)) < 0)
232 yaz_log(YLOG_ERRNO|YLOG_WARN, "yaz_poll");
233 yaz_log(YLOG_WARN, "errno=%d timeout=%d", errno, timeout);
239 inspect_poll_result(res, fds, no_fds, timeout);
246 // n p n p ...... n p n p
249 void SocketManager::putEvent(SocketEvent *event)
251 // put in back of queue
254 m_queue_back->prev = event;
255 assert (m_queue_front);
259 assert (!m_queue_front);
260 m_queue_front = event;
262 event->next = m_queue_back;
264 m_queue_back = event;
267 SocketManager::SocketEvent *SocketManager::getEvent()
269 // get from front of queue
270 SocketEvent *event = m_queue_front;
273 assert (m_queue_back);
274 m_queue_front = event->prev;
277 assert (m_queue_back);
278 m_queue_front->next = 0;
285 void SocketManager::removeEvent(ISocketObserver *observer)
287 SocketEvent *ev = m_queue_back;
290 SocketEvent *ev_next = ev->next;
291 if (observer == ev->observer)
294 ev->prev->next = ev->next;
296 m_queue_back = ev->next;
298 ev->next->prev = ev->prev;
300 m_queue_front = ev->prev;
307 SocketManager::SocketManager()
315 SocketManager::~SocketManager()
322 * c-file-style: "Stroustrup"
323 * indent-tabs-mode: nil
325 * vim: shiftwidth=4 tabstop=8 expandtab