r15729: Second part of Aleksey Fedoseev <fedoseev@ru.ibm.com> patch.
[jra/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 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