lib/tevent/testsuite.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3
   4    testing of the events subsystem
   5
   6    Copyright (C) Stefan Metzmacher 2006-2009
   7
   8      ** NOTE! The following LGPL license applies to the tevent
   9      ** library. This does NOT imply that all of Samba is released
  10      ** under the LGPL
  11
  12    This library is free software; you can redistribute it and/or
  13    modify it under the terms of the GNU Lesser General Public
  14    License as published by the Free Software Foundation; either
  15    version 3 of the License, or (at your option) any later version.
  16
  17    This library is distributed in the hope that it will be useful,
  18    but WITHOUT ANY WARRANTY; without even the implied warranty of
  19    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  20    Lesser General Public License for more details.
  21
  22    You should have received a copy of the GNU Lesser General Public
  23    License along with this library; if not, see <http://www.gnu.org/licenses/>.
  24 */
  25
  26 #include "includes.h"
  27 #include "lib/tevent/tevent.h"
  28 #include "system/filesys.h"
  29 #include "system/select.h"
  30 #include "torture/torture.h"
  31 #ifdef HAVE_PTHREAD
  32 #include <pthread.h>
  33 #include <assert.h>
  34 #endif
  35
  36 static int fde_count;
  37
  38 static void fde_handler(struct tevent_context *ev_ctx, struct tevent_fd *f,
  39                         uint16_t flags, void *private_data)
  40 {
  41         int *fd = (int *)private_data;
  42         char c;
  43 #ifdef SA_SIGINFO
  44         kill(getpid(), SIGUSR1);
  45 #endif
  46         kill(getpid(), SIGALRM);
  47         read(fd[0], &c, 1);
  48         write(fd[1], &c, 1);
  49         fde_count++;
  50 }
  51
  52 static void finished_handler(struct tevent_context *ev_ctx, struct tevent_timer *te,
  53                              struct timeval tval, void *private_data)
  54 {
  55         int *finished = (int *)private_data;
  56         (*finished) = 1;
  57 }
  58
  59 static void count_handler(struct tevent_context *ev_ctx, struct tevent_signal *te,
  60                           int signum, int count, void *info, void *private_data)
  61 {
  62         int *countp = (int *)private_data;
  63         (*countp) += count;
  64 }
  65
  66 static bool test_event_context(struct torture_context *test,
  67                                const void *test_data)
  68 {
  69         struct tevent_context *ev_ctx;
  70         int fd[2] = { -1, -1 };
  71         const char *backend = (const char *)test_data;
  72         int alarm_count=0, info_count=0;
  73         struct tevent_fd *fde;
  74 #ifdef SA_RESTART
  75         struct tevent_signal *se1 = NULL;
  76 #endif
  77         struct tevent_signal *se2 = NULL;
  78 #ifdef SA_SIGINFO
  79         struct tevent_signal *se3 = NULL;
  80 #endif
  81         int finished=0;
  82         struct timeval t;
  83         char c = 0;
  84
  85         ev_ctx = tevent_context_init_byname(test, backend);
  86         if (ev_ctx == NULL) {
  87                 torture_comment(test, "event backend '%s' not supported\n", backend);
  88                 return true;
  89         }
  90
  91         torture_comment(test, "Testing event backend '%s'\n", backend);
  92
  93         /* reset globals */
  94         fde_count = 0;
  95
  96         /* create a pipe */
  97         pipe(fd);
  98
  99         fde = tevent_add_fd(ev_ctx, ev_ctx, fd[0], TEVENT_FD_READ,
 100                             fde_handler, fd);
 101         tevent_fd_set_auto_close(fde);
 102
 103         tevent_add_timer(ev_ctx, ev_ctx, timeval_current_ofs(2,0),
 104                          finished_handler, &finished);
 105
 106 #ifdef SA_RESTART
 107         se1 = tevent_add_signal(ev_ctx, ev_ctx, SIGALRM, SA_RESTART, count_handler, &alarm_count);
 108 #endif
 109 #ifdef SA_RESETHAND
 110         se2 = tevent_add_signal(ev_ctx, ev_ctx, SIGALRM, SA_RESETHAND, count_handler, &alarm_count);
 111 #endif
 112 #ifdef SA_SIGINFO
 113         se3 = tevent_add_signal(ev_ctx, ev_ctx, SIGUSR1, SA_SIGINFO, count_handler, &info_count);
 114 #endif
 115
 116         write(fd[1], &c, 1);
 117
 118         t = timeval_current();
 119         while (!finished) {
 120                 errno = 0;
 121                 if (tevent_loop_once(ev_ctx) == -1) {
 122                         talloc_free(ev_ctx);
 123                         torture_fail(test, talloc_asprintf(test, "Failed event loop %s\n", strerror(errno)));
 124                 }
 125         }
 126
 127         talloc_free(fde);
 128         close(fd[1]);
 129
 130         while (alarm_count < fde_count+1) {
 131                 if (tevent_loop_once(ev_ctx) == -1) {
 132                         break;
 133                 }
 134         }
 135
 136         torture_comment(test, "Got %.2f pipe events/sec\n", fde_count/timeval_elapsed(&t));
 137
 138 #ifdef SA_RESTART
 139         talloc_free(se1);
 140 #endif
 141
 142         torture_assert_int_equal(test, alarm_count, 1+fde_count, "alarm count mismatch");
 143
 144 #ifdef SA_SIGINFO
 145         talloc_free(se3);
 146         torture_assert_int_equal(test, info_count, fde_count, "info count mismatch");
 147 #endif
 148
 149         talloc_free(ev_ctx);
 150
 151         return true;
 152 }
 153
 154 #ifdef HAVE_PTHREAD
 155
 156 static pthread_mutex_t threaded_mutex = PTHREAD_MUTEX_INITIALIZER;
 157 static bool do_shutdown = false;
 158
 159 static void test_event_threaded_lock(void)
 160 {
 161         int ret;
 162         ret = pthread_mutex_lock(&threaded_mutex);
 163         assert(ret == 0);
 164 }
 165
 166 static void test_event_threaded_unlock(void)
 167 {
 168         int ret;
 169         ret = pthread_mutex_unlock(&threaded_mutex);
 170         assert(ret == 0);
 171 }
 172
 173 static void test_event_threaded_trace(enum tevent_trace_point point,
 174                                       void *private_data)
 175 {
 176         switch (point) {
 177         case TEVENT_TRACE_BEFORE_WAIT:
 178                 test_event_threaded_unlock();
 179                 break;
 180         case TEVENT_TRACE_AFTER_WAIT:
 181                 test_event_threaded_lock();
 182                 break;
 183         }
 184 }
 185
 186 static void test_event_threaded_timer(struct tevent_context *ev,
 187                                       struct tevent_timer *te,
 188                                       struct timeval current_time,
 189                                       void *private_data)
 190 {
 191         return;
 192 }
 193
 194 static void *test_event_poll_thread(void *private_data)
 195 {
 196         struct tevent_context *ev = (struct tevent_context *)private_data;
 197
 198         test_event_threaded_lock();
 199
 200         while (true) {
 201                 int ret;
 202                 ret = tevent_loop_once(ev);
 203                 assert(ret == 0);
 204                 if (do_shutdown) {
 205                         test_event_threaded_unlock();
 206                         return NULL;
 207                 }
 208         }
 209
 210 }
 211
 212 static void test_event_threaded_read_handler(struct tevent_context *ev,
 213                                              struct tevent_fd *fde,
 214                                              uint16_t flags,
 215                                              void *private_data)
 216 {
 217         int *pfd = (int *)private_data;
 218         char c;
 219         ssize_t nread;
 220
 221         if ((flags & TEVENT_FD_READ) == 0) {
 222                 return;
 223         }
 224
 225         do {
 226                 nread = read(*pfd, &c, 1);
 227         } while ((nread == -1) && (errno == EINTR));
 228
 229         assert(nread == 1);
 230 }
 231
 232 static bool test_event_context_threaded(struct torture_context *test,
 233                                         const void *test_data)
 234 {
 235         struct tevent_context *ev;
 236         struct tevent_timer *te;
 237         struct tevent_fd *fde;
 238         pthread_t poll_thread;
 239         int fds[2];
 240         int ret;
 241         char c = 0;
 242
 243         ev = tevent_context_init_byname(test, "poll_mt");
 244         torture_assert(test, ev != NULL, "poll_mt not supported");
 245
 246         tevent_set_trace_callback(ev, test_event_threaded_trace, NULL);
 247
 248         te = tevent_add_timer(ev, ev, timeval_current_ofs(5, 0),
 249                               test_event_threaded_timer, NULL);
 250         torture_assert(test, te != NULL, "Could not add timer");
 251
 252         ret = pthread_create(&poll_thread, NULL, test_event_poll_thread, ev);
 253         torture_assert(test, ret == 0, "Could not create poll thread");
 254
 255         ret = pipe(fds);
 256         torture_assert(test, ret == 0, "Could not create pipe");
 257
 258         poll(NULL, 0, 100);
 259
 260         test_event_threaded_lock();
 261
 262         fde = tevent_add_fd(ev, ev, fds[0], TEVENT_FD_READ,
 263                             test_event_threaded_read_handler, &fds[0]);
 264         torture_assert(test, fde != NULL, "Could not add fd event");
 265
 266         test_event_threaded_unlock();
 267
 268         poll(NULL, 0, 100);
 269
 270         write(fds[1], &c, 1);
 271
 272         poll(NULL, 0, 100);
 273
 274         test_event_threaded_lock();
 275         do_shutdown = true;
 276         test_event_threaded_unlock();
 277
 278         write(fds[1], &c, 1);
 279
 280         ret = pthread_join(poll_thread, NULL);
 281         torture_assert(test, ret == 0, "pthread_join failed");
 282
 283         return true;
 284 }
 285
 286 #endif
 287
 288 struct torture_suite *torture_local_event(TALLOC_CTX *mem_ctx)
 289 {
 290         struct torture_suite *suite = torture_suite_create(mem_ctx, "event");
 291         const char **list = tevent_backend_list(suite);
 292         int i;
 293
 294         for (i=0;list && list[i];i++) {
 295                 torture_suite_add_simple_tcase_const(suite, list[i],
 296                                                test_event_context,
 297                                                (const void *)list[i]);
 298         }
 299
 300 #ifdef HAVE_PTHREAD
 301         torture_suite_add_simple_tcase_const(suite, "poll_mt_threaded",
 302                                              test_event_context_threaded,
 303                                              NULL);
 304 #endif
 305
 306         return suite;
 307 }