source/torture/msgtest.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3    Copyright (C) Andrew Tridgell 2000
   4
   5    This program is free software; you can redistribute it and/or modify
   6    it under the terms of the GNU General Public License as published by
   7    the Free Software Foundation; either version 2 of the License, or
   8    (at your option) any later version.
   9
  10    This program is distributed in the hope that it will be useful,
  11    but WITHOUT ANY WARRANTY; without even the implied warranty of
  12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13    GNU General Public License for more details.
  14
  15    You should have received a copy of the GNU General Public License
  16    along with this program; if not, write to the Free Software
  17    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  18 */
  19
  20 /*
  21   test code for internal messaging
  22  */
  23
  24 #include "includes.h"
  25
  26 static int pong_count;
  27
  28
  29 /* samba4 timeval functions */
  30
  31 double timeval_elapsed2(const struct timeval *tv1, const struct timeval *tv2)
  32 {
  33         return (tv2->tv_sec - tv1->tv_sec) +
  34                (tv2->tv_usec - tv1->tv_usec)*1.0e-6;
  35 }
  36
  37 /**
  38   return the number of seconds elapsed since a given time
  39 */
  40 double timeval_elapsed(const struct timeval *tv)
  41 {
  42         struct timeval tv2 = timeval_current();
  43         return timeval_elapsed2(tv, &tv2);
  44 }
  45
  46 /****************************************************************************
  47 a useful function for testing the message system
  48 ****************************************************************************/
  49 void pong_message(int msg_type, struct process_id src, void *buf, size_t len)
  50 {
  51         pong_count++;
  52 }
  53
  54  int main(int argc, char *argv[])
  55 {
  56         pid_t pid;
  57         int i, n;
  58         char buf[12];
  59
  60         load_case_tables();
  61
  62         setup_logging(argv[0],True);
  63
  64         lp_load(dyn_CONFIGFILE,False,False,False,True);
  65
  66         message_init();
  67
  68         if (argc != 3) {
  69                 fprintf(stderr, "%s: Usage - %s pid count\n", argv[0], argv[0]);
  70                 exit(1);
  71         }
  72
  73         pid = atoi(argv[1]);
  74         n = atoi(argv[2]);
  75
  76         message_register(MSG_PONG, pong_message);
  77
  78         for (i=0;i<n;i++) {
  79                 message_send_pid(pid_to_procid(pid), MSG_PING, NULL, 0, True);
  80         }
  81
  82         while (pong_count < i) {
  83                 message_dispatch();
  84                 smb_msleep(1);
  85         }
  86
  87         /* Now test that the duplicate filtering code works. */
  88         pong_count = 0;
  89
  90         safe_strcpy(buf, "1234567890", sizeof(buf)-1);
  91
  92         for (i=0;i<n;i++) {
  93                 message_send_pid(pid_to_procid(getpid()), MSG_PING,
  94                                  NULL, 0, False);
  95                 message_send_pid(pid_to_procid(getpid()), MSG_PING,
  96                                  buf, 11, False);
  97         }
  98
  99         for (i=0;i<n;i++) {
 100                 message_dispatch();
 101                 smb_msleep(1);
 102         }
 103
 104         if (pong_count != 2) {
 105                 fprintf(stderr, "Duplicate filter failed (%d).\n", pong_count);
 106         }
 107
 108         /* Speed testing */
 109
 110         pong_count = 0;
 111
 112         {
 113                 struct timeval tv = timeval_current();
 114                 size_t timelimit = n;
 115                 size_t ping_count = 0;
 116
 117                 printf("Sending pings for %d seconds\n", timelimit);
 118                 while (timeval_elapsed(&tv) < timelimit) {
 119                         if(message_send_pid(pid_to_procid(pid), MSG_PING,
 120                                                                 buf, 11, False)) ping_count++;
 121                         if(message_send_pid(pid_to_procid(pid), MSG_PING,
 122                                                                 NULL, 0, False)) ping_count++;
 123
 124                         while (ping_count > pong_count + 20) {
 125                                 message_dispatch();
 126                         }
 127                 }
 128
 129                 printf("waiting for %d remaining replies (done %d)\n",
 130                            ping_count - pong_count, pong_count);
 131                 while (timeval_elapsed(&tv) < 30 && pong_count < ping_count) {
 132                         message_dispatch();
 133                 }
 134
 135                 if (ping_count != pong_count) {
 136                         fprintf(stderr, "ping test failed! received %d, sent %d\n",
 137                        pong_count, ping_count);
 138                 }
 139
 140                 printf("ping rate of %.0f messages/sec\n",
 141                            (ping_count+pong_count)/timeval_elapsed(&tv));
 142         }
 143
 144         return (0);
 145 }
 146