Add a debug CLI command to seed random(3).

This is a lot less useful than it could have been, as the Open Group
only mandates that:

	Like rand(), random() shall produce by default a sequence
	of numbers that can be duplicated by calling srandom() with
	1 as the seed.

But crucially leaves out *which* sequence of numbers.

git-svn-id: svn+ssh://projects.linpro.no/svn/varnish/trunk@3366 d4fa192b-c00b-0410-8231-f00ffab90ce4

diff --git a/varnish-cache/bin/varnishd/cache_center.c b/varnish-cache/bin/varnishd/cache_center.c
index c05916c8a1256f70104badcaf85ed6405e82db9f..e3a91509ef938c25951cfa9c7eb7a7e9861bfcd0 100644 (file)
--- a/varnish-cache/bin/varnishd/cache_center.c
+++ b/varnish-cache/bin/varnishd/cache_center.c
@@ -1055,9 +1055,23 @@ cli_debug_xid(struct cli *cli, const char * const *av, void *priv)
        cli_out(cli, "XID is %u", xids);
 }
 
+static void
+cli_debug_srandom(struct cli *cli, const char * const *av, void *priv)
+{
+       (void)priv;
+       unsigned long seed;
+
+       if (av[2] != NULL)
+               seed = strtoul(av[2], NULL, 0);
+       srandom(seed);
+       cli_out(cli, "Random(3) seeded with %lu", seed);
+}
+
 static struct cli_proto debug_cmds[] = {
        { "debug.xid", "debug.xid",
                "\tExamine or set XID\n", 0, 1, cli_debug_xid },
+       { "debug.srandom", "debug.srandom",
+               "\tSeed the random(3) function\n", 0, 1, cli_debug_srandom },
        { NULL }
 };