source4/torture/raw/tconrate.c

   1 /*
   2    SMB tree connection rate test
   3
   4    Copyright (C) 2006-2007 James Peach
   5
   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.
  10
  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.
  15
  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/>.
  18 */
  19
  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"
  26
  27 #include "system/filesys.h"
  28 #include "system/shmem.h"
  29
  30 #define TIME_LIMIT_SECS 30
  31 #define usec_to_sec(s) ((s) / 1000000)
  32 #define sec_to_usec(s) ((s) * 1000000)
  33
  34 /* Map a shared memory buffer of at least nelem counters. */
  35 static void * map_count_buffer(unsigned nelem, size_t elemsz)
  36 {
  37         void * buf;
  38         size_t bufsz;
  39         size_t pagesz = getpagesize();
  40
  41         bufsz = nelem * elemsz;
  42         bufsz = (bufsz + pagesz) % pagesz; /* round up to pagesz */
  43
  44 #ifdef MAP_ANON
  45         /* BSD */
  46         buf = mmap(NULL, bufsz, PROT_READ|PROT_WRITE, MAP_ANON|MAP_SHARED,
  47                         -1 /* fd */, 0 /* offset */);
  48 #else
  49         buf = mmap(NULL, bufsz, PROT_READ|PROT_WRITE, MAP_FILE|MAP_SHARED,
  50                         open("/dev/zero", O_RDWR), 0 /* offset */);
  51 #endif
  52
  53         if (buf == MAP_FAILED) {
  54                 printf("failed to map count buffer: %s\n",
  55                                 strerror(errno));
  56                 return NULL;
  57         }
  58
  59         return buf;
  60
  61 }
  62
  63 static int fork_tcon_client(struct torture_context *tctx,
  64                 int *tcon_count, unsigned tcon_timelimit,
  65                 const char *host, const char *share)
  66 {
  67         pid_t child;
  68         struct smbcli_state *cli;
  69         struct timeval end;
  70         struct timeval now;
  71         struct smbcli_options options;
  72
  73         lp_smbcli_options(tctx->lp_ctx, &options);
  74
  75         child = fork();
  76         if (child == -1) {
  77                 printf("failed to fork child: %s\n,", strerror(errno));
  78                 return -1;
  79         } else if (child != 0) {
  80                 /* Parent, just return. */
  81                 return 0;
  82         }
  83
  84         /* Child. Just make as many connections as possible within the
  85          * time limit. Don't bother synchronising the child start times
  86          * because it's probably not work the effort, and a bit of startup
  87          * jitter is probably a more realistic test.
  88          */
  89
  90
  91         end = timeval_current();
  92         now = timeval_current();
  93         end.tv_sec += tcon_timelimit;
  94         *tcon_count = 0;
  95
  96         while (timeval_compare(&now, &end) == -1) {
  97                 NTSTATUS status;
  98
  99                 status = smbcli_full_connection(NULL, &cli,
 100                                 host, lp_smb_ports(tctx->lp_ctx), share,
 101                                 NULL, cmdline_credentials,
 102                                 lp_resolve_context(tctx->lp_ctx),
 103                                 tctx->ev, &options);
 104
 105                 if (!NT_STATUS_IS_OK(status)) {
 106                         printf("failed to connect to //%s/%s: %s\n",
 107                                 host, share, nt_errstr(status));
 108                         goto done;
 109                 }
 110
 111                 smbcli_tdis(cli);
 112
 113                 *tcon_count = *tcon_count + 1;
 114                 now = timeval_current();
 115         }
 116
 117 done:
 118         exit(0);
 119 }
 120
 121 static bool children_remain(void)
 122 {
 123         /* Reap as many children as possible. */
 124         for (;;) {
 125                 pid_t ret = waitpid(-1, NULL, WNOHANG);
 126                 if (ret == 0) {
 127                         /* no children ready */
 128                         return true;
 129                 }
 130                 if (ret == -1) {
 131                         /* no children left. maybe */
 132                         return errno == ECHILD ? false : true;
 133                 }
 134         }
 135
 136         /* notreached */
 137         return false;
 138 }
 139
 140 static double rate_convert_secs(unsigned count,
 141                 const struct timeval *start, const struct timeval *end)
 142 {
 143         return (double)count /
 144                 usec_to_sec((double)usec_time_diff(end, start));
 145 }
 146
 147 /* Test the rate at which the server will accept connections.  */
 148 bool torture_bench_treeconnect(struct torture_context *tctx)
 149 {
 150         const char *host = torture_setting_string(tctx, "host", NULL);
 151         const char *share = torture_setting_string(tctx, "share", NULL);
 152
 153         int timelimit = torture_setting_int(tctx, "timelimit",
 154                                         TIME_LIMIT_SECS);
 155         int nprocs = torture_setting_int(tctx, "nprocs", 4);
 156
 157         int *curr_counts = map_count_buffer(nprocs, sizeof(int));
 158         int *last_counts = talloc_array(NULL, int, nprocs);
 159
 160         struct timeval now, last, start;
 161         int i, delta;
 162
 163         torture_assert(tctx, nprocs > 0, "bad proc count");
 164         torture_assert(tctx, timelimit > 0, "bad timelimit");
 165         torture_assert(tctx, curr_counts, "allocation failure");
 166         torture_assert(tctx, last_counts, "allocation failure");
 167
 168         start = last = timeval_current();
 169         for (i = 0; i < nprocs; ++i) {
 170                 fork_tcon_client(tctx, &curr_counts[i], timelimit, host, share);
 171         }
 172
 173         while (children_remain()) {
 174
 175                 sleep(1);
 176                 now = timeval_current();
 177
 178                 for (i = 0, delta = 0; i < nprocs; ++i) {
 179                         delta += curr_counts[i] - last_counts[i];
 180                 }
 181
 182                 printf("%u connections/sec\n",
 183                         (unsigned)rate_convert_secs(delta, &last, &now));
 184
 185                 memcpy(last_counts, curr_counts, nprocs * sizeof(int));
 186                 last = timeval_current();
 187         }
 188
 189         now = timeval_current();
 190
 191         for (i = 0, delta = 0; i < nprocs; ++i) {
 192                 delta += curr_counts[i];
 193         }
 194
 195         printf("TOTAL: %u connections/sec over %u secs\n",
 196                         (unsigned)rate_convert_secs(delta, &start, &now),
 197                         timelimit);
 198         return true;
 199 }
 200
 201 /* vim: set sts=8 sw=8 : */