0c4c96bd7612eaee1353c10778d3ae8007e3bc5b
[kai/samba.git] / 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
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 tevent_context *evt_ctx;
43         struct messaging_context *msg_ctx;
44         pid_t pid;
45         int i, n;
46         char buf[12];
47         int ret;
48
49         load_case_tables();
50
51         setup_logging(argv[0],True);
52         
53         lp_load(get_dyn_CONFIGFILE(),False,False,False,True);
54
55         if (!(evt_ctx = tevent_context_init(NULL)) ||
56             !(msg_ctx = messaging_init(NULL, procid_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                 ret = tevent_loop_once(evt_ctx);
79                 if (ret != 0) {
80                         break;
81                 }
82         }
83
84         /* Now test that the duplicate filtering code works. */
85         pong_count = 0;
86
87         safe_strcpy(buf, "1234567890", sizeof(buf)-1);
88
89         for (i=0;i<n;i++) {
90                 messaging_send(msg_ctx, procid_self(), MSG_PING,
91                                &data_blob_null);
92                 messaging_send_buf(msg_ctx, procid_self(), MSG_PING,
93                                    (uint8 *)buf, 11);
94         }
95
96         for (i=0;i<n;i++) {
97                 ret = tevent_loop_once(evt_ctx);
98                 if (ret != 0) {
99                         break;
100                 }
101         }
102
103         if (pong_count != 2) {
104                 fprintf(stderr, "Duplicate filter failed (%d).\n", pong_count);
105         }
106
107         /* Speed testing */
108
109         pong_count = 0;
110
111         {
112                 struct timeval tv = timeval_current();
113                 size_t timelimit = n;
114                 size_t ping_count = 0;
115
116                 printf("Sending pings for %d seconds\n", (int)timelimit);
117                 while (timeval_elapsed(&tv) < timelimit) {              
118                         if(NT_STATUS_IS_OK(messaging_send_buf(
119                                                    msg_ctx, pid_to_procid(pid),
120                                                    MSG_PING,
121                                                    (uint8 *)buf, 11)))
122                            ping_count++;
123                         if(NT_STATUS_IS_OK(messaging_send(
124                                                    msg_ctx, pid_to_procid(pid),
125                                                    MSG_PING, &data_blob_null)))
126                            ping_count++;
127
128                         while (ping_count > pong_count + 20) {
129                                 ret = tevent_loop_once(evt_ctx);
130                                 if (ret != 0) {
131                                         break;
132                                 }
133                         }
134                 }
135                 
136                 printf("waiting for %d remaining replies (done %d)\n", 
137                        (int)(ping_count - pong_count), pong_count);
138                 while (timeval_elapsed(&tv) < 30 && pong_count < ping_count) {
139                         ret = tevent_loop_once(evt_ctx);
140                         if (ret != 0) {
141                                 break;
142                         }
143                 }
144                 
145                 if (ping_count != pong_count) {
146                         fprintf(stderr, "ping test failed! received %d, sent "
147                                 "%d\n", pong_count, (int)ping_count);
148                 }
149                 
150                 printf("ping rate of %.0f messages/sec\n", 
151                        (ping_count+pong_count)/timeval_elapsed(&tv));
152         }
153
154         return (0);
155 }
156