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, see <http://www.gnu.org/licenses/>.
  17 */
  18
  19 /*
  20   test code for internal messaging
  21  */
  22
  23 #include "includes.h"
  24 #include "messages.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 tevent_context *evt_ctx;
  44         struct messaging_context *msg_ctx;
  45         pid_t pid;
  46         int i, n;
  47         char buf[12];
  48         int ret;
  49         TALLOC_CTX *frame = talloc_stackframe();
  50
  51         smb_init_locale();
  52
  53         setup_logging(argv[0], DEBUG_STDOUT);
  54
  55         lp_load_global(get_dyn_CONFIGFILE());
  56
  57         if (!(evt_ctx = samba_tevent_context_init(NULL)) ||
  58             !(msg_ctx = messaging_init(NULL, evt_ctx))) {
  59                 fprintf(stderr, "could not init messaging context\n");
  60                 TALLOC_FREE(frame);
  61                 exit(1);
  62         }
  63
  64         if (argc != 3) {
  65                 fprintf(stderr, "%s: Usage - %s pid count\n", argv[0],
  66                         argv[0]);
  67                 TALLOC_FREE(frame);
  68                 exit(1);
  69         }
  70
  71         pid = atoi(argv[1]);
  72         n = atoi(argv[2]);
  73
  74         messaging_register(msg_ctx, NULL, MSG_PONG, pong_message);
  75
  76         for (i=0;i<n;i++) {
  77                 messaging_send(msg_ctx, pid_to_procid(pid), MSG_PING,
  78                                &data_blob_null);
  79         }
  80
  81         while (pong_count < i) {
  82                 ret = tevent_loop_once(evt_ctx);
  83                 if (ret != 0) {
  84                         break;
  85                 }
  86         }
  87
  88         /* Ensure all messages get through to ourselves. */
  89         pong_count = 0;
  90
  91         strlcpy(buf, "1234567890", sizeof(buf));
  92
  93         for (i=0;i<n;i++) {
  94                 messaging_send(msg_ctx, messaging_server_id(msg_ctx), MSG_PING,
  95                                &data_blob_null);
  96                 messaging_send_buf(msg_ctx, messaging_server_id(msg_ctx),
  97                                    MSG_PING,(uint8 *)buf, 11);
  98         }
  99
 100         /*
 101          * We have to loop at least 2 times for
 102          * each message as local ping messages are
 103          * handled by an immediate callback, that
 104          * has to be dispatched, which sends a pong
 105          * message, which also has to be dispatched.
 106          * Above we sent 2*n messages, which means
 107          * we have to dispatch 4*n times.
 108          */
 109
 110         while (pong_count < n*2) {
 111                 ret = tevent_loop_once(evt_ctx);
 112                 if (ret != 0) {
 113                         break;
 114                 }
 115         }
 116
 117         if (pong_count != 2*n) {
 118                 fprintf(stderr, "Message count failed (%d).\n", pong_count);
 119         }
 120
 121         /* Speed testing */
 122
 123         pong_count = 0;
 124
 125         {
 126                 struct timeval tv = timeval_current();
 127                 size_t timelimit = n;
 128                 size_t ping_count = 0;
 129
 130                 printf("Sending pings for %d seconds\n", (int)timelimit);
 131                 while (timeval_elapsed(&tv) < timelimit) {
 132                         if(NT_STATUS_IS_OK(messaging_send_buf(
 133                                                    msg_ctx, pid_to_procid(pid),
 134                                                    MSG_PING,
 135                                                    (uint8 *)buf, 11)))
 136                            ping_count++;
 137                         if(NT_STATUS_IS_OK(messaging_send(
 138                                                    msg_ctx, pid_to_procid(pid),
 139                                                    MSG_PING, &data_blob_null)))
 140                            ping_count++;
 141
 142                         while (ping_count > pong_count + 20) {
 143                                 ret = tevent_loop_once(evt_ctx);
 144                                 if (ret != 0) {
 145                                         break;
 146                                 }
 147                         }
 148                 }
 149
 150                 printf("waiting for %d remaining replies (done %d)\n",
 151                        (int)(ping_count - pong_count), pong_count);
 152                 while (timeval_elapsed(&tv) < 30 && pong_count < ping_count) {
 153                         ret = tevent_loop_once(evt_ctx);
 154                         if (ret != 0) {
 155                                 break;
 156                         }
 157                 }
 158
 159                 if (ping_count != pong_count) {
 160                         fprintf(stderr, "ping test failed! received %d, sent "
 161                                 "%d\n", pong_count, (int)ping_count);
 162                 }
 163
 164                 printf("ping rate of %.0f messages/sec\n",
 165                        (ping_count+pong_count)/timeval_elapsed(&tv));
 166         }
 167
 168         TALLOC_FREE(frame);
 169         return (0);
 170 }
 171