X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=src%2Feventl.c;h=ddd8e540b4ddd2c1ae72805b4d2d274d3e4dbd14;hb=refs%2Fheads%2Fbranch-1.4.4;hp=f9f0dc21a5aa19f3267fdcc6544e22a2155e91cf;hpb=566c07f3d9a4b541493a47d1e28bac4fc146ec6c;p=pazpar2-moved-to-github.git diff --git a/src/eventl.c b/src/eventl.c index f9f0dc2..ddd8e54 100644 --- a/src/eventl.c +++ b/src/eventl.c @@ -1,21 +1,21 @@ /* This file is part of Pazpar2. - Copyright (C) 2006-2010 Index Data + Copyright (C) 2006-2010 Index Data -Pazpar2 is free software; you can redistribute it and/or modify it under -the terms of the GNU General Public License as published by the Free -Software Foundation; either version 2, or (at your option) any later -version. + Pazpar2 is free software; you can redistribute it and/or modify it under + the terms of the GNU General Public License as published by the Free + Software Foundation; either version 2, or (at your option) any later + version. -Pazpar2 is distributed in the hope that it will be useful, but WITHOUT ANY -WARRANTY; without even the implied warranty of MERCHANTABILITY or -FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License -for more details. + Pazpar2 is distributed in the hope that it will be useful, but WITHOUT ANY + WARRANTY; without even the implied warranty of MERCHANTABILITY or + FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License + for more details. -You should have received a copy of the GNU General Public License -along with this program; if not, write to the Free Software -Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA + You should have received a copy of the GNU General Public License + along with this program; if not, write to the Free Software + Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA -*/ + */ /* * Based on ParaZ - a simple tool for harvesting performance data for @@ -53,6 +53,8 @@ Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA #include #include #include +#include +#include #include "eventl.h" #include "sel_thread.h" @@ -62,55 +64,58 @@ struct iochan_man_s { int sel_fd; int no_threads; int log_level; + YAZ_MUTEX iochan_mutex; }; -iochan_man_t iochan_man_create(int no_threads) -{ +iochan_man_t iochan_man_create(int no_threads) { iochan_man_t man = xmalloc(sizeof(*man)); man->channel_list = 0; man->sel_thread = 0; /* can't create sel_thread yet because we may fork */ man->sel_fd = -1; man->no_threads = no_threads; man->log_level = yaz_log_module_level("iochan"); - + man->iochan_mutex = 0; + yaz_mutex_create(&man->iochan_mutex); return man; } -void iochan_man_destroy(iochan_man_t *mp) -{ - if (*mp) - { +void iochan_man_destroy(iochan_man_t *mp) { + if (*mp) { IOCHAN c; if ((*mp)->sel_thread) sel_thread_destroy((*mp)->sel_thread); - + + yaz_mutex_enter((*mp)->iochan_mutex); c = (*mp)->channel_list; - while (c) - { + (*mp)->channel_list = NULL; + yaz_mutex_leave((*mp)->iochan_mutex); + while (c) { IOCHAN c_next = c->next; xfree(c->name); xfree(c); c = c_next; } + yaz_mutex_destroy(&(*mp)->iochan_mutex); xfree(*mp); *mp = 0; } } -void iochan_add(iochan_man_t man, IOCHAN chan) -{ +void iochan_add(iochan_man_t man, IOCHAN chan) { chan->man = man; + yaz_mutex_enter(man->iochan_mutex); + yaz_log(man->log_level, "iochan_add : chan=%p channel list=%p", chan, + man->channel_list); chan->next = man->channel_list; man->channel_list = chan; + yaz_mutex_leave(man->iochan_mutex); } -IOCHAN iochan_create(int fd, IOC_CALLBACK cb, int flags, - const char *name) -{ +IOCHAN iochan_create(int fd, IOC_CALLBACK cb, int flags, const char *name) { IOCHAN new_iochan; - if (!(new_iochan = (IOCHAN)xmalloc(sizeof(*new_iochan)))) - return 0; + if (!(new_iochan = (IOCHAN) xmalloc(sizeof(*new_iochan)))) + return 0; new_iochan->destroyed = 0; new_iochan->fd = fd; new_iochan->flags = flags; @@ -123,13 +128,12 @@ IOCHAN iochan_create(int fd, IOC_CALLBACK cb, int flags, return new_iochan; } -static void work_handler(void *work_data) -{ +static void work_handler(void *work_data) { IOCHAN p = work_data; yaz_log(p->man->log_level, "eventl: work begin chan=%p name=%s event=%d", p, p->name ? p->name : "", p->this_event); - + if (!p->destroyed && (p->this_event & EVENT_TIMEOUT)) (*p->fun)(p, EVENT_TIMEOUT); if (!p->destroyed && (p->this_event & EVENT_INPUT)) @@ -139,62 +143,74 @@ static void work_handler(void *work_data) if (!p->destroyed && (p->this_event & EVENT_EXCEPT)) (*p->fun)(p, EVENT_EXCEPT); - yaz_log(p->man->log_level, "eventl: work end chan=%p name=%s event=%d", - p, p->name ? p->name : "", p->this_event); + yaz_log(p->man->log_level, "eventl: work end chan=%p name=%s event=%d", p, + p->name ? p->name : "", p->this_event); } -static void run_fun(iochan_man_t man, IOCHAN p) -{ - if (p->this_event) - { - if (man->sel_thread) - { - yaz_log(man->log_level, "eventl: work add chan=%p name=%s event=%d", - p, p->name ? p->name : "", p->this_event); +static void run_fun(iochan_man_t man, IOCHAN p) { + if (p->this_event) { + if (man->sel_thread) { + yaz_log(man->log_level, + "eventl: work add chan=%p name=%s event=%d", p, + p->name ? p->name : "", p->this_event); p->thread_users++; sel_thread_add(man->sel_thread, p); - } - else + } else work_handler(p); } } -static int event_loop(iochan_man_t man, IOCHAN *iochans) -{ +static int event_loop(iochan_man_t man, IOCHAN *iochans) { do /* loop as long as there are active associations to process */ { - IOCHAN p, *nextp; - fd_set in, out, except; - int res, max; - static struct timeval to; - struct timeval *timeout; - - FD_ZERO(&in); - FD_ZERO(&out); - FD_ZERO(&except); - timeout = &to; /* hang on select */ - to.tv_sec = 300; - to.tv_usec = 0; - max = 0; - for (p = *iochans; p; p = p->next) - { + IOCHAN p, *nextp; + IOCHAN start; + IOCHAN inv_start; + fd_set in, out, except; + int res, max; + static struct timeval to; + struct timeval *timeout; + +// struct yaz_poll_fd *fds; + int no_fds = 0; + FD_ZERO(&in); + FD_ZERO(&out); + FD_ZERO(&except); + timeout = &to; /* hang on select */ + to.tv_sec = 300; + to.tv_usec = 0; + + // INV: start must no change through the loop + + yaz_mutex_enter(man->iochan_mutex); + start = man->channel_list; + yaz_mutex_leave(man->iochan_mutex); + inv_start = start; + for (p = start; p; p = p->next) { + no_fds++; + } +// fds = (struct yaz_poll_fd *) xmalloc(no_fds * sizeof(*fds)); + + max = 0; + for (p = start; p; p = p->next) { if (p->thread_users > 0) continue; if (p->max_idle && p->max_idle < to.tv_sec) to.tv_sec = p->max_idle; if (p->fd < 0) continue; - 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 (man->sel_fd != -1) - { + 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; + } + yaz_log(man->log_level, "max=%d sel_fd=%d", max, man->sel_fd); + + if (man->sel_fd != -1) { if (man->sel_fd > max) max = man->sel_fd; FD_SET(man->sel_fd, &in); @@ -202,111 +218,99 @@ static int event_loop(iochan_man_t man, IOCHAN *iochans) yaz_log(man->log_level, "select begin nofds=%d", max); res = select(max + 1, &in, &out, &except, timeout); yaz_log(man->log_level, "select returned res=%d", res); - if (res < 0) - { - if (errno == EINTR) - continue; - else - { - yaz_log(YLOG_ERRNO|YLOG_WARN, "select"); + if (res < 0) { + if (errno == EINTR) + continue; + else { + yaz_log(YLOG_ERRNO | YLOG_WARN, "select"); return 0; } - } - if (man->sel_fd != -1) - { - if (FD_ISSET(man->sel_fd, &in)) - { + } + if (man->sel_fd != -1) { + if (FD_ISSET(man->sel_fd, &in)) { IOCHAN chan; yaz_log(man->log_level, "eventl: sel input on sel_fd=%d", man->sel_fd); - while ((chan = sel_thread_result(man->sel_thread))) - { - yaz_log(man->log_level, "eventl: got thread result chan=%p name=%s", - chan, chan->name ? chan->name : ""); + while ((chan = sel_thread_result(man->sel_thread))) { + yaz_log(man->log_level, + "eventl: got thread result chan=%p name=%s", chan, + chan->name ? chan->name : ""); chan->thread_users--; } } } - if (man->log_level) - { + if (man->log_level) { int no = 0; - for (p = *iochans; p; p = p->next) + for (p = start; p; p = p->next) { no++; + } yaz_log(man->log_level, "%d channels", no); } - for (p = *iochans; p; p = p->next) - { + for (p = start; p; p = p->next) { time_t now = time(0); - - if (p->destroyed) - { - yaz_log(man->log_level, "eventl: skip destroyed chan=%p name=%s", p, p->name ? p->name : ""); + + if (p->destroyed) { + yaz_log(man->log_level, + "eventl: skip destroyed chan=%p name=%s", p, + p->name ? p->name : ""); continue; } - if (p->thread_users > 0) - { - yaz_log(man->log_level, "eventl: skip chan=%p name=%s users=%d", p, p->name ? p->name : "", p->thread_users); + if (p->thread_users > 0) { + yaz_log(man->log_level, + "eventl: skip chan=%p name=%s users=%d", p, + p->name ? p->name : "", p->thread_users); continue; } p->this_event = 0; - if (p->max_idle && now - p->last_event > p->max_idle) - { + if (p->max_idle && now - p->last_event > p->max_idle) { p->last_event = now; p->this_event |= EVENT_TIMEOUT; } - if (p->fd >= 0) - { - if (FD_ISSET(p->fd, &in)) - { + if (p->fd >= 0) { + if (FD_ISSET(p->fd, &in)) { p->last_event = now; p->this_event |= EVENT_INPUT; } - if (FD_ISSET(p->fd, &out)) - { + if (FD_ISSET(p->fd, &out)) { p->last_event = now; p->this_event |= EVENT_OUTPUT; } - if (FD_ISSET(p->fd, &except)) - { + if (FD_ISSET(p->fd, &except)) { p->last_event = now; p->this_event |= EVENT_EXCEPT; } } run_fun(man, p); - } - for (nextp = iochans; *nextp; ) - { + } + assert(inv_start == start); + yaz_mutex_enter(man->iochan_mutex); + for (nextp = iochans; *nextp;) { IOCHAN p = *nextp; - if (p->destroyed && p->thread_users == 0) - { + if (p->destroyed && p->thread_users == 0) { *nextp = p->next; xfree(p->name); xfree(p); - } - else + } else nextp = &p->next; } - } - while (*iochans); + yaz_mutex_leave(man->iochan_mutex); + } while (*iochans); return 0; } -void iochan_man_events(iochan_man_t man) -{ - if (man->no_threads > 0 && !man->sel_thread) - { - man->sel_thread = sel_thread_create( - work_handler, 0 /*work_destroy */, &man->sel_fd, man->no_threads); +void iochan_man_events(iochan_man_t man) { + if (man->no_threads > 0 && !man->sel_thread) { + man->sel_thread = sel_thread_create(work_handler, 0 /*work_destroy */, + &man->sel_fd, man->no_threads); yaz_log(man->log_level, "iochan_man_events. Using %d threads", man->no_threads); } event_loop(man, &man->channel_list); } -void pazpar2_sleep(double d) -{ +void pazpar2_sleep(double d) { #ifdef WIN32 Sleep( (DWORD) (d * 1000)); #else