s3: Fix bug #9085.
[Samba.git] / source4 / torture / raw / tconrate.c
blob06cb7650c154711e44b138bb8f949a0fff31a164
1 /*
2 SMB tree connection rate test
4 Copyright (C) 2006-2007 James Peach
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program. If not, see <http://www.gnu.org/licenses/>.
20 #include "includes.h"
21 #include "libcli/libcli.h"
22 #include "libcli/resolve/resolve.h"
23 #include "torture/smbtorture.h"
24 #include "lib/cmdline/popt_common.h"
25 #include "param/param.h"
27 #include "system/filesys.h"
28 #include "system/shmem.h"
30 #define TIME_LIMIT_SECS 30
31 #define usec_to_sec(s) ((s) / 1000000)
33 /* Map a shared memory buffer of at least nelem counters. */
34 static void * map_count_buffer(unsigned nelem, size_t elemsz)
36 void * buf;
37 size_t bufsz;
38 size_t pagesz = getpagesize();
40 bufsz = nelem * elemsz;
41 bufsz = (bufsz + pagesz) % pagesz; /* round up to pagesz */
43 #ifdef MAP_ANON
44 /* BSD */
45 buf = mmap(NULL, bufsz, PROT_READ|PROT_WRITE, MAP_ANON|MAP_SHARED,
46 -1 /* fd */, 0 /* offset */);
47 #else
48 buf = mmap(NULL, bufsz, PROT_READ|PROT_WRITE, MAP_FILE|MAP_SHARED,
49 open("/dev/zero", O_RDWR), 0 /* offset */);
50 #endif
52 if (buf == MAP_FAILED) {
53 printf("failed to map count buffer: %s\n",
54 strerror(errno));
55 return NULL;
58 return buf;
62 static int fork_tcon_client(struct torture_context *tctx,
63 int *tcon_count, unsigned tcon_timelimit,
64 const char *host, const char *share)
66 pid_t child;
67 struct smbcli_state *cli;
68 struct timeval end;
69 struct timeval now;
70 struct smbcli_options options;
71 struct smbcli_session_options session_options;
73 lp_smbcli_options(tctx->lp_ctx, &options);
74 lp_smbcli_session_options(tctx->lp_ctx, &session_options);
76 child = fork();
77 if (child == -1) {
78 printf("failed to fork child: %s\n,", strerror(errno));
79 return -1;
80 } else if (child != 0) {
81 /* Parent, just return. */
82 return 0;
85 /* Child. Just make as many connections as possible within the
86 * time limit. Don't bother synchronising the child start times
87 * because it's probably not work the effort, and a bit of startup
88 * jitter is probably a more realistic test.
92 end = timeval_current();
93 now = timeval_current();
94 end.tv_sec += tcon_timelimit;
95 *tcon_count = 0;
97 while (timeval_compare(&now, &end) == -1) {
98 NTSTATUS status;
100 status = smbcli_full_connection(NULL, &cli,
101 host, lp_smb_ports(tctx->lp_ctx), share,
102 NULL, lp_socket_options(tctx->lp_ctx), cmdline_credentials,
103 lp_resolve_context(tctx->lp_ctx),
104 tctx->ev, &options, &session_options,
105 lp_iconv_convenience(tctx->lp_ctx),
106 lp_gensec_settings(tctx, tctx->lp_ctx));
108 if (!NT_STATUS_IS_OK(status)) {
109 printf("failed to connect to //%s/%s: %s\n",
110 host, share, nt_errstr(status));
111 goto done;
114 smbcli_tdis(cli);
115 talloc_free(cli);
117 *tcon_count = *tcon_count + 1;
118 now = timeval_current();
121 done:
122 exit(0);
125 static bool children_remain(void)
127 /* Reap as many children as possible. */
128 for (;;) {
129 pid_t ret = waitpid(-1, NULL, WNOHANG);
130 if (ret == 0) {
131 /* no children ready */
132 return true;
134 if (ret == -1) {
135 /* no children left. maybe */
136 return errno == ECHILD ? false : true;
140 /* notreached */
141 return false;
144 static double rate_convert_secs(unsigned count,
145 const struct timeval *start, const struct timeval *end)
147 return (double)count /
148 usec_to_sec((double)usec_time_diff(end, start));
151 /* Test the rate at which the server will accept connections. */
152 bool torture_bench_treeconnect(struct torture_context *tctx)
154 const char *host = torture_setting_string(tctx, "host", NULL);
155 const char *share = torture_setting_string(tctx, "share", NULL);
157 int timelimit = torture_setting_int(tctx, "timelimit",
158 TIME_LIMIT_SECS);
159 int nprocs = torture_setting_int(tctx, "nprocs", 4);
161 int *curr_counts = map_count_buffer(nprocs, sizeof(int));
162 int *last_counts = talloc_array(NULL, int, nprocs);
164 struct timeval now, last, start;
165 int i, delta;
167 torture_assert(tctx, nprocs > 0, "bad proc count");
168 torture_assert(tctx, timelimit > 0, "bad timelimit");
169 torture_assert(tctx, curr_counts, "allocation failure");
170 torture_assert(tctx, last_counts, "allocation failure");
172 start = last = timeval_current();
173 for (i = 0; i < nprocs; ++i) {
174 fork_tcon_client(tctx, &curr_counts[i], timelimit, host, share);
177 while (children_remain()) {
179 sleep(1);
180 now = timeval_current();
182 for (i = 0, delta = 0; i < nprocs; ++i) {
183 delta += curr_counts[i] - last_counts[i];
186 printf("%u connections/sec\n",
187 (unsigned)rate_convert_secs(delta, &last, &now));
189 memcpy(last_counts, curr_counts, nprocs * sizeof(int));
190 last = timeval_current();
193 now = timeval_current();
195 for (i = 0, delta = 0; i < nprocs; ++i) {
196 delta += curr_counts[i];
199 printf("TOTAL: %u connections/sec over %u secs\n",
200 (unsigned)rate_convert_secs(delta, &start, &now),
201 timelimit);
202 return true;
205 /* vim: set sts=8 sw=8 : */