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;
129 for (i = 0, p = m_observers; p; p = p->next, i++)
131 enum yaz_poll_mask output_mask = fds[i].output_mask;
134 if (output_mask & yaz_poll_read)
135 mask |= SOCKET_OBSERVE_READ;
137 if (output_mask & yaz_poll_write)
138 mask |= SOCKET_OBSERVE_WRITE;
140 if (output_mask & yaz_poll_except)
141 mask |= SOCKET_OBSERVE_EXCEPT;
145 SocketEvent *event = new SocketEvent;
146 p->last_activity = now;
147 event->observer = p->observer;
151 yaz_log (m_log, "putEvent I/O mask=%d", mask);
153 else if (res == 0 && p->timeout_this == timeout)
155 SocketEvent *event = new SocketEvent;
156 assert (p->last_activity);
157 yaz_log (m_log, "putEvent timeout fd=%d, now = %ld last_activity=%ld timeout=%d",
158 p->fd, now, p->last_activity, p->timeout);
159 p->last_activity = now;
160 event->observer = p->observer;
161 event->event = SOCKET_OBSERVE_TIMEOUT;
167 SocketEvent *event = getEvent();
170 event->observer->socketNotify(event->event);
177 yaz_log(YLOG_WARN, "unhandled socket event. yaz_poll returned %d", res);
178 yaz_log(YLOG_WARN, "no_put_events=%d no_fds=%d i=%d timeout=%d",
179 no_put_events, no_fds, i, timeout);
183 int SocketManager::processEvent()
186 SocketEvent *event = getEvent();
188 yaz_log (m_log, "SocketManager::processEvent manager=%p", this);
191 event->observer->socketNotify(event->event);
197 time_t now = time(0);
200 for (p = m_observers; p; p = p->next)
205 struct yaz_poll_fd *fds = new yaz_poll_fd [no_fds];
206 for (i = 0, p = m_observers; p; p = p->next, i++)
210 if (p->mask & SOCKET_OBSERVE_READ)
211 input_mask += yaz_poll_read;
212 if (p->mask & SOCKET_OBSERVE_WRITE)
213 input_mask += yaz_poll_write;
214 if (p->mask & SOCKET_OBSERVE_EXCEPT)
215 input_mask += yaz_poll_except;
216 if (p->timeout > 0 ||
217 (p->timeout == 0 && (p->mask & SOCKET_OBSERVE_WRITE) == 0))
220 timeout_this = p->timeout;
221 if (p->last_activity)
222 timeout_this -= now - p->last_activity;
224 p->last_activity = now;
225 if (timeout_this < 0 || timeout_this > 2147483646)
227 if (timeout == -1 || timeout_this < timeout)
228 timeout = timeout_this;
229 p->timeout_this = timeout_this;
230 yaz_log (m_log, "SocketManager::select timeout_this=%d",
234 p->timeout_this = -1;
235 fds[i].input_mask = (enum yaz_poll_mask) input_mask;
239 while ((res = yaz_poll(fds, no_fds, timeout, 0)) < 0 && pass < 10)
243 yaz_log(YLOG_ERRNO|YLOG_WARN, "yaz_poll");
244 yaz_log(YLOG_WARN, "errno=%d timeout=%d", errno, timeout);
248 inspect_poll_result(res, fds, no_fds, timeout);
251 return res >= 0 ? 1 : -1;
255 // n p n p ...... n p n p
258 void SocketManager::putEvent(SocketEvent *event)
260 // put in back of queue
263 m_queue_back->prev = event;
264 assert (m_queue_front);
268 assert (!m_queue_front);
269 m_queue_front = event;
271 event->next = m_queue_back;
273 m_queue_back = event;
276 SocketManager::SocketEvent *SocketManager::getEvent()
278 // get from front of queue
279 SocketEvent *event = m_queue_front;
282 assert (m_queue_back);
283 m_queue_front = event->prev;
286 assert (m_queue_back);
287 m_queue_front->next = 0;
294 void SocketManager::removeEvent(ISocketObserver *observer)
296 SocketEvent *ev = m_queue_back;
299 SocketEvent *ev_next = ev->next;
300 if (observer == ev->observer)
303 ev->prev->next = ev->next;
305 m_queue_back = ev->next;
307 ev->next->prev = ev->prev;
309 m_queue_front = ev->prev;
316 SocketManager::SocketManager()
324 SocketManager::~SocketManager()
331 * c-file-style: "Stroustrup"
332 * indent-tabs-mode: nil
334 * vim: shiftwidth=4 tabstop=8 expandtab