source3/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 3 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 /****************************************************************************
  30 a useful function for testing the message system
  31 ****************************************************************************/
  32 static void pong_message(struct messaging_context *msg_ctx,
  33                          void *private_data,
  34                          uint32_t msg_type,
  35                          struct server_id pid,
  36                          DATA_BLOB *data)
  37 {
  38         pong_count++;
  39 }
  40
  41  int main(int argc, char *argv[])
  42 {
  43         struct event_context *evt_ctx;
  44         struct messaging_context *msg_ctx;
  45         pid_t pid;
  46         int i, n;
  47         char buf[12];
  48
  49         load_case_tables();
  50
  51         setup_logging(argv[0],True);
  52
  53         lp_load(dyn_CONFIGFILE,False,False,False,True);
  54
  55         if (!(evt_ctx = event_context_init(NULL)) ||
  56             !(msg_ctx = messaging_init(NULL, server_id_self(), evt_ctx))) {
  57                 fprintf(stderr, "could not init messaging context\n");
  58                 exit(1);
  59         }
  60
  61         if (argc != 3) {
  62                 fprintf(stderr, "%s: Usage - %s pid count\n", argv[0],
  63                         argv[0]);
  64                 exit(1);
  65         }
  66
  67         pid = atoi(argv[1]);
  68         n = atoi(argv[2]);
  69
  70         messaging_register(msg_ctx, NULL, MSG_PONG, pong_message);
  71
  72         for (i=0;i<n;i++) {
  73                 messaging_send(msg_ctx, pid_to_procid(pid), MSG_PING,
  74                                &data_blob_null);
  75         }
  76
  77         while (pong_count < i) {
  78                 message_dispatch(msg_ctx);
  79                 smb_msleep(1);
  80         }
  81
  82         /* Now test that the duplicate filtering code works. */
  83         pong_count = 0;
  84
  85         safe_strcpy(buf, "1234567890", sizeof(buf)-1);
  86
  87         for (i=0;i<n;i++) {
  88                 messaging_send(msg_ctx, pid_to_procid(getpid()), MSG_PING,
  89                                &data_blob_null);
  90                 messaging_send_buf(msg_ctx, pid_to_procid(getpid()), MSG_PING,
  91                                    (uint8 *)buf, 11);
  92         }
  93
  94         for (i=0;i<n;i++) {
  95                 message_dispatch(msg_ctx);
  96                 smb_msleep(1);
  97         }
  98
  99         if (pong_count != 2) {
 100                 fprintf(stderr, "Duplicate filter failed (%d).\n", pong_count);
 101         }
 102
 103         /* Speed testing */
 104
 105         pong_count = 0;
 106
 107         {
 108                 struct timeval tv = timeval_current();
 109                 size_t timelimit = n;
 110                 size_t ping_count = 0;
 111
 112                 printf("Sending pings for %d seconds\n", (int)timelimit);
 113                 while (timeval_elapsed(&tv) < timelimit) {
 114                         if(NT_STATUS_IS_OK(messaging_send_buf(
 115                                                    msg_ctx, pid_to_procid(pid),
 116                                                    MSG_PING,
 117                                                    (uint8 *)buf, 11)))
 118                            ping_count++;
 119                         if(NT_STATUS_IS_OK(messaging_send(
 120                                                    msg_ctx, pid_to_procid(pid),
 121                                                    MSG_PING, &data_blob_null)))
 122                            ping_count++;
 123
 124                         while (ping_count > pong_count + 20) {
 125                                 message_dispatch(msg_ctx);
 126                         }
 127                 }
 128
 129                 printf("waiting for %d remaining replies (done %d)\n",
 130                        (int)(ping_count - pong_count), pong_count);
 131                 while (timeval_elapsed(&tv) < 30 && pong_count < ping_count) {
 132                         message_dispatch(msg_ctx);
 133                 }
 134
 135                 if (ping_count != pong_count) {
 136                         fprintf(stderr, "ping test failed! received %d, sent "
 137                                 "%d\n", pong_count, (int)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