view tango/example/cluster/cclient.d @ 341:1bb99290e03a trunk

[svn r362] Started merging the old 'test' dir as well as the newer 'tangotests' dir into 'tests/mini' and 'tests/minicomplex'.
author lindquist
date Sun, 13 Jul 2008 02:51:19 +0200
parents 1700239cab2e
children
line wrap: on
line source

/*******************************************************************************


*******************************************************************************/

import tango.io.Stdout;

import tango.time.StopWatch;

import tango.util.log.Configurator;

import tango.net.cluster.NetworkCache;

import tango.net.cluster.tina.Cluster;

/*******************************************************************************


*******************************************************************************/

void main (char[][] args)
{
        StopWatch w;

        if (args.length > 1)
           {
           auto cluster = (new Cluster).join (args[1..$]);
           auto cache   = new NetworkCache (cluster, "my.cache.channel");

           while (true)
                 {
                 w.start;
                 for (int i=10000; i--;)
                      cache.put ("key", cache.EmptyMessage);

                 Stdout.formatln ("{} put/s", 10000/w.stop);

                 w.start;
                 for (int i=10000; i--;)
                      cache.get ("key");
        
                 Stdout.formatln ("{} get/s", 10000/w.stop);
                 }
           }
        else
           Stdout.formatln ("usage: cache cachehost:port ...");
}