r24670: Use torture functions for settings.
[kai/samba.git] / source4 / torture / nbench / nbench.c
index a649b5fa159288dccf4b2a55640ca9c83140d6a8..ba8f3deaae75ddba673c9df15d606a60d2245a11 100644 (file)
@@ -5,7 +5,7 @@
    
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
-   the Free Software Foundation; either version 2 of the License, or
+   the Free Software Foundation; either version 3 of the License, or
    (at your option) any later version.
    
    This program is distributed in the hope that it will be useful,
    GNU General Public License for more details.
    
    You should have received a copy of the GNU General Public License
-   along with this program; if not, write to the Free Software
-   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */
 
 #include "includes.h"
+#include "libcli/libcli.h"
+#include "torture/ui.h"
+#include "torture/util.h"
+#include "torture/torture.h"
+#include "system/filesys.h"
+#include "system/locale.h"
+#include "pstring.h"
+
+#include "torture/nbench/proto.h"
 
 int nbench_line_count = 0;
 static int timelimit = 600;
 static int warmup;
 static const char *loadfile;
+static int read_only;
 
-#define ival(s) strtol(s, NULL, 0)
+#define ival(s) strtoll(s, NULL, 0)
 
 /* run a test that simulates an approximate netbench client load */
-static BOOL run_netbench(struct smbcli_state *cli, int client)
+static BOOL run_netbench(struct torture_context *tctx, struct smbcli_state *cli, int client)
 {
+       int torture_nprocs = torture_setting_int(tctx, "nprocs", 4);
        int i;
        pstring line;
        char *cname;
        FILE *f;
-       fstring params[20];
-       const char *p;
        BOOL correct = True;
+       double target_rate = lp_parm_double(-1, "torture", "targetrate", 0);    
 
-       nb_setup(cli, client, warmup);
+       if (target_rate != 0 && client == 0) {
+               printf("Targetting %.4f MByte/sec\n", target_rate);
+       }
+
+       if (torture_nprocs == 1) {
+               if (!read_only && !torture_setup_dir(cli, "\\clients")) {
+                       return False;
+               }
+       }
+
+       nb_setup(cli, client);
 
        asprintf(&cname, "client%d", client+1);
 
@@ -49,20 +68,13 @@ static BOOL run_netbench(struct smbcli_state *cli, int client)
                return False;
        }
 
+
 again:
+       nbio_time_reset();
+
        while (fgets(line, sizeof(line)-1, f)) {
                NTSTATUS status;
-               double t = end_timer();
-
-               if (warmup && t >= warmup) {
-                       warmup = 0;
-                       nb_warmup_done();
-                       start_timer();
-               }
-
-               if (end_timer() >= timelimit) {
-                       goto done;
-               }
+               const char **params0, **params;
 
                nbench_line_count++;
 
@@ -70,12 +82,21 @@ again:
 
                all_string_sub(line,"client1", cname, sizeof(line));
                
-               p = line;
-               for (i=0; 
-                    i<19 && next_token(&p, params[i], " ", sizeof(fstring));
-                    i++) ;
-
-               params[i][0] = 0;
+               params = params0 = str_list_make_shell(NULL, line, " ");
+               i = str_list_length(params);
+
+               if (i > 0 && isdigit(params[0][0])) {
+                       double targett = strtod(params[0], NULL);
+                       if (target_rate != 0) {
+                               nbio_target_rate(target_rate);
+                       } else {
+                               nbio_time_delay(targett);
+                       }
+                       params++;
+                       i--;
+               } else if (target_rate != 0) {
+                       nbio_target_rate(target_rate);
+               }
 
                if (i < 2 || params[0][0] == '#') continue;
 
@@ -84,12 +105,19 @@ again:
                        exit(1);
                }
 
-               if (strncmp(params[i-1], "NT_STATUS_", 10) != 0) {
+               if (strncmp(params[i-1], "NT_STATUS_", 10) != 0 &&
+                   strncmp(params[i-1], "0x", 2) != 0) {
                        printf("Badly formed status at line %d\n", nbench_line_count);
+                       talloc_free(params);
                        continue;
                }
 
-               status = nt_status_string_to_code(params[i-1]);
+               /* accept numeric or string status codes */
+               if (strncmp(params[i-1], "0x", 2) == 0) {
+                       status = NT_STATUS(strtoul(params[i-1], NULL, 16));
+               } else {
+                       status = nt_status_string_to_code(params[i-1]);
+               }
 
                DEBUG(9,("run_netbench(%d): %s %s\n", client, params[0], params[1]));
 
@@ -98,15 +126,15 @@ again:
                                   ival(params[4]), status);
                } else if (!strcmp(params[0],"Close")) {
                        nb_close(ival(params[1]), status);
-               } else if (!strcmp(params[0],"Rename")) {
+               } else if (!read_only && !strcmp(params[0],"Rename")) {
                        nb_rename(params[1], params[2], status);
-               } else if (!strcmp(params[0],"Unlink")) {
+               } else if (!read_only && !strcmp(params[0],"Unlink")) {
                        nb_unlink(params[1], ival(params[2]), status);
-               } else if (!strcmp(params[0],"Deltree")) {
+               } else if (!read_only && !strcmp(params[0],"Deltree")) {
                        nb_deltree(params[1]);
-               } else if (!strcmp(params[0],"Rmdir")) {
+               } else if (!read_only && !strcmp(params[0],"Rmdir")) {
                        nb_rmdir(params[1], status);
-               } else if (!strcmp(params[0],"Mkdir")) {
+               } else if (!read_only && !strcmp(params[0],"Mkdir")) {
                        nb_mkdir(params[1], status);
                } else if (!strcmp(params[0],"QUERY_PATH_INFORMATION")) {
                        nb_qpathinfo(params[1], ival(params[2]), status);
@@ -114,16 +142,16 @@ again:
                        nb_qfileinfo(ival(params[1]), ival(params[2]), status);
                } else if (!strcmp(params[0],"QUERY_FS_INFORMATION")) {
                        nb_qfsinfo(ival(params[1]), status);
-               } else if (!strcmp(params[0],"SET_FILE_INFORMATION")) {
+               } else if (!read_only && !strcmp(params[0],"SET_FILE_INFORMATION")) {
                        nb_sfileinfo(ival(params[1]), ival(params[2]), status);
                } else if (!strcmp(params[0],"FIND_FIRST")) {
                        nb_findfirst(params[1], ival(params[2]), 
                                     ival(params[3]), ival(params[4]), status);
-               } else if (!strcmp(params[0],"WriteX")) {
+               } else if (!read_only && !strcmp(params[0],"WriteX")) {
                        nb_writex(ival(params[1]), 
                                  ival(params[2]), ival(params[3]), ival(params[4]),
                                  status);
-               } else if (!strcmp(params[0],"Write")) {
+               } else if (!read_only && !strcmp(params[0],"Write")) {
                        nb_write(ival(params[1]), 
                                 ival(params[2]), ival(params[3]), ival(params[4]),
                                 status);
@@ -144,6 +172,10 @@ again:
                } else {
                        printf("[%d] Unknown operation %s\n", nbench_line_count, params[0]);
                }
+
+               talloc_free(params0);
+               
+               if (nb_tick()) goto done;
        }
 
        rewind(f);
@@ -151,8 +183,10 @@ again:
 
 done:
        fclose(f);
-       nb_cleanup(cname);
 
+       if (!read_only && torture_nprocs == 1) {
+               smbcli_deltree(cli->tree, "\\clients");
+       }
        if (!torture_close_connection(cli)) {
                correct = False;
        }
@@ -162,43 +196,74 @@ done:
 
 
 /* run a test that simulates an approximate netbench client load */
-BOOL torture_nbench(int dummy)
+BOOL torture_nbench(struct torture_context *torture)
 {
        BOOL correct = True;
-       extern int torture_nprocs;
+       int torture_nprocs = torture_setting_int(torture, "nprocs", 4);
        struct smbcli_state *cli;
        const char *p;
 
-       p = lp_parm_string(-1, "torture", "timelimit");
+       read_only = torture_setting_bool(torture, "readonly", False);
+
+       p = torture_setting_string(torture, "timelimit", NULL);
        if (p && *p) {
                timelimit = atoi(p);
        }
 
        warmup = timelimit / 20;
 
-       loadfile =  lp_parm_string(-1, "torture", "loadfile");
+       loadfile = torture_setting_string(torture, "loadfile", NULL);
        if (!loadfile || !*loadfile) {
                loadfile = "client.txt";
        }
 
-       if (!torture_open_connection(&cli)) {
-               return False;
-       }
+       if (torture_nprocs > 1) {
+               if (!torture_open_connection(&cli, 0)) {
+                       return False;
+               }
 
-       nb_setup(cli, -1, warmup);
-       nb_deltree("\\clients");
+               if (!read_only && !torture_setup_dir(cli, "\\clients")) {
+                       return False;
+               }
+       }
 
-       nbio_shmem(torture_nprocs);
+       nbio_shmem(torture_nprocs, timelimit, warmup);
 
        printf("Running for %d seconds with load '%s' and warmup %d secs\n", 
               timelimit, loadfile, warmup);
 
-       signal(SIGALRM, SIGNAL_CAST nb_alarm);
+       /* we need to reset SIGCHLD here as the name resolution
+          library may have changed it. We rely on correct signals
+          from childs in the main torture code which reaps
+          children. This is why smbtorture BENCH-NBENCH was sometimes
+          failing */
+       signal(SIGCHLD, SIG_DFL);
+
+
+       signal(SIGALRM, nb_alarm);
        alarm(1);
-       torture_create_procs(run_netbench, &correct);
+       torture_create_procs(torture, run_netbench, &correct);
        alarm(0);
 
-       printf("\nThroughput %g MB/sec\n", 
-              1.0e-6 * nbio_total() / timelimit);
+       if (!read_only && torture_nprocs > 1) {
+               smbcli_deltree(cli->tree, "\\clients");
+       }
+
+       printf("\nThroughput %g MB/sec\n", nbio_result());
        return correct;
 }
+
+NTSTATUS torture_nbench_init(void)
+{
+       struct torture_suite *suite = torture_suite_create(
+                                                                               talloc_autofree_context(),
+                                                                               "BENCH");
+
+       torture_suite_add_simple_test(suite, "NBENCH", torture_nbench);
+
+       suite->description = talloc_strdup(suite, 
+                                                               "Benchmarks");
+
+       torture_register_suite(suite);
+       return NT_STATUS_OK;
+}