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