Simplify in a lot of places using odr_strdupn
[yaz-moved-to-github.git] / src / eventl.c
index 74509c8..3075d59 100644 (file)
@@ -1,17 +1,17 @@
-/*
- * Copyright (C) 1995-2007, Index Data ApS
+/* This file is part of the YAZ toolkit.
+ * Copyright (C) 1995-2013 Index Data
  * See the file LICENSE for details.
- *
- * $Id: eventl.c,v 1.12 2007-11-09 18:47:50 adam Exp $
  */
-
 /**
  * \file eventl.c
  * \brief Implements event loop handling for GFS.
  *
  * This source implements the main event loop for the Generic Frontend
- * Server. It uses select(2).
+ * Server.
  */
+#if HAVE_CONFIG_H
+#include <config.h>
+#endif
 
 #include <assert.h>
 #include <errno.h>
 #include <sys/time.h>
 #endif
 
-#define NPOLL 1
-
-#if NPOLL
 #include <yaz/poll.h>
-#else
-
-#ifdef WIN32
-#include <winsock.h>
-#endif
-#if HAVE_UNISTD_H
-#include <unistd.h>
-#endif
-#if HAVE_SYS_SELECT_H
-#include <sys/select.h>
-#endif
-#endif
 
 #include <yaz/log.h>
 #include <yaz/comstack.h>
 #include <yaz/xmalloc.h>
+#include <yaz/errno.h>
 #include "eventl.h"
 #include "session.h"
 #include <yaz/statserv.h>
 
-#if YAZ_GNU_THREADS
-#include <pth.h>
-#define YAZ_EV_SELECT pth_select
-#endif
-
-#ifndef YAZ_EV_SELECT
-#define YAZ_EV_SELECT select
-#endif
-
 static int log_level=0;
 static int log_level_initialized=0;
 
@@ -88,22 +65,12 @@ IOCHAN iochan_create(int fd, IOC_CALLBACK cb, int flags, int chan_id)
 
 int iochan_is_alive(IOCHAN chan)
 {
-    static struct timeval to;
-    fd_set in, out, except;
-    int res, max;
-
-    to.tv_sec = 0;
-    to.tv_usec = 0;
-
-    FD_ZERO(&in);
-    FD_ZERO(&out);
-    FD_ZERO(&except);
-
-    FD_SET(chan->fd, &in);
-
-    max = chan->fd + 1;
+    struct yaz_poll_fd fds;
+    int res;
 
-    res = YAZ_EV_SELECT(max + 1, &in, 0, 0, &to);
+    fds.fd = chan->fd;
+    fds.input_mask = yaz_poll_read;
+    res = yaz_poll(&fds, 1, 0, 0);
     if (res == 0)
         return 1;
     if (!ir_read(chan, EVENT_INPUT))
@@ -111,47 +78,35 @@ int iochan_is_alive(IOCHAN chan)
     return 1;
 }
 
-int event_loop(IOCHAN *iochans)
+int iochan_event_loop(IOCHAN *iochans)
 {
     do /* loop as long as there are active associations to process */
     {
         IOCHAN p, nextp;
-#if NPOLL
         int i;
         int tv_sec = 3600;
         int no_fds = 0;
         struct yaz_poll_fd *fds = 0;
-#else
-        fd_set in, out, except;
-        static struct timeval to;
-        int max;
-#endif
         int res;
         time_t now = time(0);
 
-        if (statserv_must_terminate())
-        {
-            for (p = *iochans; p; p = p->next)
-                p->force_event = EVENT_TIMEOUT;
-        }
-#if NPOLL
         for (p = *iochans; p; p = p->next)
             no_fds++;
-        fds = xmalloc(no_fds * sizeof(*fds));
+        fds = (struct yaz_poll_fd *) xmalloc(no_fds * sizeof(*fds));
         for (i = 0, p = *iochans; p; p = p->next, i++)
         {
             time_t w, ftime;
-            enum yaz_poll_mask input_mask = 0;
+            enum yaz_poll_mask input_mask = yaz_poll_none;
             yaz_log(log_level, "fd=%d flags=%d force_event=%d",
                     p->fd, p->flags, p->force_event);
             if (p->force_event)
                 tv_sec = 0;          /* polling select */
             if (p->flags & EVENT_INPUT)
-                input_mask += yaz_poll_read;
+                yaz_poll_add(input_mask, yaz_poll_read);
             if (p->flags & EVENT_OUTPUT)
-                input_mask += yaz_poll_write;
+                yaz_poll_add(input_mask, yaz_poll_write);
             if (p->flags & EVENT_EXCEPT)
-                input_mask += yaz_poll_except;
+                yaz_poll_add(input_mask, yaz_poll_except);
             if (p->max_idle && p->last_event)
             {
                 ftime = p->last_event + p->max_idle;
@@ -159,77 +114,29 @@ int event_loop(IOCHAN *iochans)
                     w = p->max_idle;
                 else
                     w = ftime - now;
+                /* tv_sec will be minimum wait.. */
                 if (w < tv_sec)
-                    tv_sec = w;
+                    tv_sec = (int) w; /* can hold it because w < tv_sec */
             }
             fds[i].fd = p->fd;
             fds[i].input_mask = input_mask;
         }
-        res = yaz_poll(fds, no_fds, tv_sec);
-#else
-        FD_ZERO(&in);
-        FD_ZERO(&out);
-        FD_ZERO(&except);
-        to.tv_sec = 3600;
-        to.tv_usec = 0;
-        max = 0;
-        for (p = *iochans; p; p = p->next)
-        {
-            time_t w, ftime;
-            yaz_log(log_level, "fd=%d flags=%d force_event=%d",
-                    p->fd, p->flags, p->force_event);
-            if (p->force_event)
-                to.tv_sec = 0;          /* polling select */
-            if (p->flags & EVENT_INPUT)
-                FD_SET(p->fd, &in);
-            if (p->flags & EVENT_OUTPUT)
-                FD_SET(p->fd, &out);
-            if (p->flags & EVENT_EXCEPT)
-                FD_SET(p->fd, &except);
-            if (p->fd > max)
-                max = p->fd;
-            if (p->max_idle && p->last_event)
-            {
-                ftime = p->last_event + p->max_idle;
-                if (ftime < now)
-                    w = p->max_idle;
-                else
-                    w = ftime - now;
-                if (w < to.tv_sec)
-                    to.tv_sec = w;
-            }
-        }
-        yaz_log(log_level, "select start %ld", (long) to.tv_sec);
-        res = YAZ_EV_SELECT(max + 1, &in, &out, &except, &to);
-        yaz_log(log_level, "select end");
-#endif
+        res = yaz_poll(fds, no_fds, tv_sec, 0);
         if (res < 0)
         {
             if (yaz_errno() == EINTR)
             {
-                if (statserv_must_terminate())
-                {
-                    for (p = *iochans; p; p = p->next)
-                        p->force_event = EVENT_TIMEOUT;
-                }
                 xfree(fds);
                 continue;
             }
             else
             {
-                /* Destroy the first member in the chain, and try again */
-                association *assoc = (association *)iochan_getdata(*iochans);
-                COMSTACK conn = assoc->client_link;
-
-                cs_close(conn);
-                destroy_association(assoc);
-                iochan_destroy(*iochans);
-                yaz_log(log_level, "error select, destroying iochan %p",
-                        *iochans);
+                yaz_log(YLOG_WARN|YLOG_ERRNO, "yaz_poll");
+                xfree(fds);
+                continue;
             }
         }
         now = time(0);
-#if NPOLL
         for (i = 0, p = *iochans; p; p = p->next, i++)
         {
             int force_event = p->force_event;
@@ -262,38 +169,6 @@ int event_loop(IOCHAN *iochans)
             }
         }
         xfree(fds);
-#else
-        for (p = *iochans; p; p = p->next)
-        {
-            int force_event = p->force_event;
-
-            p->force_event = 0;
-            if (!p->destroyed && (FD_ISSET(p->fd, &in) ||
-                force_event == EVENT_INPUT))
-            {
-                p->last_event = now;
-                (*p->fun)(p, EVENT_INPUT);
-            }
-            if (!p->destroyed && (FD_ISSET(p->fd, &out) ||
-                force_event == EVENT_OUTPUT))
-            {
-                p->last_event = now;
-                (*p->fun)(p, EVENT_OUTPUT);
-            }
-            if (!p->destroyed && (FD_ISSET(p->fd, &except) ||
-                force_event == EVENT_EXCEPT))
-            {
-                p->last_event = now;
-                (*p->fun)(p, EVENT_EXCEPT);
-            }
-            if (!p->destroyed && ((p->max_idle && now - p->last_event >=
-                p->max_idle) || force_event == EVENT_TIMEOUT))
-            {
-                p->last_event = now;
-                (*p->fun)(p, EVENT_TIMEOUT);
-            }
-        }
-#endif
         for (p = *iochans; p; p = nextp)
         {
             nextp = p->next;
@@ -328,6 +203,7 @@ int event_loop(IOCHAN *iochans)
 /*
  * Local variables:
  * c-basic-offset: 4
+ * c-file-style: "Stroustrup"
  * indent-tabs-mode: nil
  * End:
  * vim: shiftwidth=4 tabstop=8 expandtab