#include "adlist.h"
#include "zmalloc.h"
-#define REPLY_INT 0
-#define REPLY_RETCODE 1
-#define REPLY_BULK 2
-#define REPLY_MBULK 3
-
-#define CLIENT_CONNECTING 0
-#define CLIENT_SENDQUERY 1
-#define CLIENT_READREPLY 2
-
-#define MAX_LATENCY 5000
-
#define REDIS_NOTUSED(V) ((void) V)
static struct config {
int keepalive;
long long start;
long long totlatency;
- int *latency;
+ long long *latency;
char *title;
list *clients;
int quiet;
typedef struct _client {
redisContext *context;
- int state;
sds obuf;
- unsigned int written; /* bytes of 'obuf' already written */
- int replytype;
- long long start; /* start time in milliseconds */
+ char *randptr[10]; /* needed for MSET against 10 keys */
+ size_t randlen;
+ unsigned int written; /* bytes of 'obuf' already written */
+ long long start; /* start time of a request */
+ long long latency; /* request latency */
} *client;
/* Prototypes */
static void createMissingClients(client c);
/* Implementation */
+static long long ustime(void) {
+ struct timeval tv;
+ long long ust;
+
+ gettimeofday(&tv, NULL);
+ ust = ((long)tv.tv_sec)*1000000;
+ ust += tv.tv_usec;
+ return ust;
+}
+
static long long mstime(void) {
struct timeval tv;
long long mst;
aeDeleteFileEvent(config.el,c->context->fd,AE_READABLE);
aeCreateFileEvent(config.el,c->context->fd,AE_WRITABLE,writeHandler,c);
c->written = 0;
- c->state = CLIENT_SENDQUERY;
- c->start = mstime();
}
static void randomizeClientKey(client c) {
- char *p;
char buf[32];
- long r;
-
- p = strstr(c->obuf, "_rand");
- if (!p) return;
- p += 5;
- r = random() % config.randomkeys_keyspacelen;
- sprintf(buf,"%ld",r);
- memcpy(p,buf,strlen(buf));
+ size_t i, r;
+
+ for (i = 0; i < c->randlen; i++) {
+ r = random() % config.randomkeys_keyspacelen;
+ snprintf(buf,sizeof(buf),"%012zu",r);
+ memcpy(c->randptr[i],buf,12);
+ }
}
static void clientDone(client c) {
- long long latency;
- config.donerequests ++;
- latency = mstime() - c->start;
- if (latency > MAX_LATENCY) latency = MAX_LATENCY;
- config.latency[latency]++;
-
if (config.donerequests == config.requests) {
freeClient(c);
aeStop(config.el);
}
if (config.keepalive) {
resetClient(c);
- if (config.randomkeys) randomizeClientKey(c);
} else {
config.liveclients--;
createMissingClients(c);
REDIS_NOTUSED(fd);
REDIS_NOTUSED(mask);
+ /* Calculate latency only for the first read event. This means that the
+ * server already sent the reply and we need to parse it. Parsing overhead
+ * is not part of the latency, so calculate it only once, here. */
+ if (c->latency < 0) c->latency = ustime()-(c->start);
+
if (redisBufferRead(c->context) != REDIS_OK) {
fprintf(stderr,"Error: %s\n",c->context->errstr);
exit(1);
fprintf(stderr,"Error: %s\n",c->context->errstr);
exit(1);
}
- if (reply != NULL)
+ if (reply != NULL) {
+ if (reply == (void*)REDIS_REPLY_ERROR) {
+ fprintf(stderr,"Unexpected error reply, exiting...\n");
+ exit(1);
+ }
+
+ if (config.donerequests < config.requests)
+ config.latency[config.donerequests++] = c->latency;
clientDone(c);
+ }
}
}
REDIS_NOTUSED(fd);
REDIS_NOTUSED(mask);
- if (c->state == CLIENT_CONNECTING) {
- c->state = CLIENT_SENDQUERY;
- c->start = mstime();
+ /* When nothing was written yet, randomize keys and set start time. */
+ if (c->written == 0) {
+ if (config.randomkeys) randomizeClientKey(c);
+ c->start = ustime();
+ c->latency = -1;
}
+
if (sdslen(c->obuf) > c->written) {
void *ptr = c->obuf+c->written;
int nwritten = write(c->context->fd,ptr,sdslen(c->obuf)-c->written);
if (sdslen(c->obuf) == c->written) {
aeDeleteFileEvent(config.el,c->context->fd,AE_WRITABLE);
aeCreateFileEvent(config.el,c->context->fd,AE_READABLE,readHandler,c);
- c->state = CLIENT_READREPLY;
}
}
}
-static client createClient(int replytype) {
+static client createClient(char *cmd, int len) {
client c = zmalloc(sizeof(struct _client));
if (config.hostsocket == NULL) {
c->context = redisConnectNonBlock(config.hostip,config.hostport);
fprintf(stderr,"%s: %s\n",config.hostsocket,c->context->errstr);
exit(1);
}
- c->replytype = replytype;
- c->state = CLIENT_CONNECTING;
- c->obuf = sdsempty();
+ c->obuf = sdsnewlen(cmd,len);
+ c->randlen = 0;
c->written = 0;
+
+ /* Find substrings in the output buffer that need to be randomized. */
+ if (config.randomkeys) {
+ char *p = c->obuf, *newline;
+ while ((p = strstr(p,":rand:")) != NULL) {
+ newline = strstr(p,"\r\n");
+ assert(newline-(p+6) == 12); /* 12 chars for randomness */
+ assert(c->randlen < (signed)(sizeof(c->randptr)/sizeof(char*)));
+ c->randptr[c->randlen++] = p+6;
+ p = newline+2;
+ }
+ }
+
redisSetReplyObjectFunctions(c->context,NULL);
aeCreateFileEvent(config.el,c->context->fd,AE_WRITABLE,writeHandler,c);
listAddNodeTail(config.clients,c);
}
static void createMissingClients(client c) {
+ int n = 0;
+
while(config.liveclients < config.numclients) {
- client new = createClient(c->replytype);
- sdsfree(new->obuf);
- new->obuf = sdsdup(c->obuf);
- if (config.randomkeys) randomizeClientKey(c);
+ createClient(c->obuf,sdslen(c->obuf));
+
+ /* Listen backlog is quite limited on most systems */
+ if (++n > 64) {
+ usleep(50000);
+ n = 0;
+ }
}
}
+static int compareLatency(const void *a, const void *b) {
+ return (*(long long*)a)-(*(long long*)b);
+}
+
static void showLatencyReport(void) {
- int j, seen = 0;
+ int i, curlat = 0;
float perc, reqpersec;
reqpersec = (float)config.donerequests/((float)config.totlatency/1000);
printf(" %d bytes payload\n", config.datasize);
printf(" keep alive: %d\n", config.keepalive);
printf("\n");
- for (j = 0; j <= MAX_LATENCY; j++) {
- if (config.latency[j]) {
- seen += config.latency[j];
- perc = ((float)seen*100)/config.donerequests;
- printf("%.2f%% <= %d milliseconds\n", perc, j);
+
+ qsort(config.latency,config.requests,sizeof(long long),compareLatency);
+ for (i = 0; i < config.requests; i++) {
+ if (config.latency[i]/1000 != curlat || i == (config.requests-1)) {
+ curlat = config.latency[i]/1000;
+ perc = ((float)(i+1)*100)/config.requests;
+ printf("%.2f%% <= %d milliseconds\n", perc, curlat);
}
}
printf("%.2f requests per second\n\n", reqpersec);
}
}
-static void prepareForBenchmark(char *title) {
- memset(config.latency,0,sizeof(int)*(MAX_LATENCY+1));
+static void benchmark(char *title, char *cmd, int len) {
+ client c;
+
config.title = title;
- config.start = mstime();
config.donerequests = 0;
-}
-static void endBenchmark(void) {
+ c = createClient(cmd,len);
+ createMissingClients(c);
+
+ config.start = mstime();
+ aeMain(config.el);
config.totlatency = mstime()-config.start;
+
showLatencyReport();
freeAllClients();
}
}
int main(int argc, char **argv) {
+ int i;
client c;
signal(SIGHUP, SIG_IGN);
config.idlemode = 0;
config.latency = NULL;
config.clients = listCreate();
- config.latency = zmalloc(sizeof(int)*(MAX_LATENCY+1));
-
config.hostip = "127.0.0.1";
config.hostport = 6379;
config.hostsocket = NULL;
parseOptions(argc,argv);
+ config.latency = zmalloc(sizeof(long long)*config.requests);
if (config.keepalive == 0) {
printf("WARNING: keepalive disabled, you probably need 'echo 1 > /proc/sys/net/ipv4/tcp_tw_reuse' for Linux and 'sudo sysctl -w net.inet.tcp.msl=1000' for Mac OS X in order to use a lot of clients/requests\n");
if (config.idlemode) {
printf("Creating %d idle connections and waiting forever (Ctrl+C when done)\n", config.numclients);
- prepareForBenchmark("IDLE");
- c = createClient(0); /* will never receive a reply */
- c->obuf = sdsempty();
+ c = createClient("",0); /* will never receive a reply */
createMissingClients(c);
aeMain(config.el);
/* and will wait for every */
}
do {
- prepareForBenchmark("PING");
- c = createClient(REDIS_REPLY_STATUS);
- c->obuf = sdscat(c->obuf,"PING\r\n");
- createMissingClients(c);
- aeMain(config.el);
- endBenchmark();
+ char *data, *cmd;
+ int len;
- prepareForBenchmark("PING (multi bulk)");
- c = createClient(REDIS_REPLY_STATUS);
- c->obuf = sdscat(c->obuf,"*1\r\n$4\r\nPING\r\n");
- createMissingClients(c);
- aeMain(config.el);
- endBenchmark();
-
- prepareForBenchmark("MSET (10 keys, multi bulk)");
- c = createClient(REDIS_REPLY_ARRAY);
- c->obuf = sdscatprintf(c->obuf,"*%d\r\n$4\r\nMSET\r\n", 11);
- {
- int i;
- char *data = zmalloc(config.datasize+2);
- memset(data,'x',config.datasize);
- for (i = 0; i < 10; i++) {
- c->obuf = sdscatprintf(c->obuf,"$%d\r\n%s\r\n",config.datasize,data);
- }
- zfree(data);
- }
- createMissingClients(c);
- aeMain(config.el);
- endBenchmark();
-
- prepareForBenchmark("SET");
- c = createClient(REDIS_REPLY_STATUS);
- c->obuf = sdscat(c->obuf,"SET foo_rand000000000000 ");
- {
- char *data = zmalloc(config.datasize+2);
- memset(data,'x',config.datasize);
- data[config.datasize] = '\r';
- data[config.datasize+1] = '\n';
- c->obuf = sdscatlen(c->obuf,data,config.datasize+2);
+ data = zmalloc(config.datasize+1);
+ memset(data,'x',config.datasize);
+ data[config.datasize] = '\0';
+
+ benchmark("PING (inline)","PING\r\n",6);
+
+ len = redisFormatCommand(&cmd,"PING");
+ benchmark("PING",cmd,len);
+ free(cmd);
+
+ const char *argv[21];
+ argv[0] = "MSET";
+ for (i = 1; i < 21; i += 2) {
+ argv[i] = "foo:rand:000000000000";
+ argv[i+1] = data;
}
- createMissingClients(c);
- aeMain(config.el);
- endBenchmark();
+ len = redisFormatCommandArgv(&cmd,21,argv,NULL);
+ benchmark("MSET (10 keys)",cmd,len);
+ free(cmd);
- prepareForBenchmark("GET");
- c = createClient(REDIS_REPLY_STRING);
- c->obuf = sdscat(c->obuf,"GET foo_rand000000000000\r\n");
- createMissingClients(c);
- aeMain(config.el);
- endBenchmark();
+ len = redisFormatCommand(&cmd,"SET foo:rand:000000000000 %s",data);
+ benchmark("SET",cmd,len);
+ free(cmd);
- prepareForBenchmark("INCR");
- c = createClient(REDIS_REPLY_INTEGER);
- c->obuf = sdscat(c->obuf,"INCR counter_rand000000000000\r\n");
- createMissingClients(c);
- aeMain(config.el);
- endBenchmark();
+ len = redisFormatCommand(&cmd,"GET foo:rand:000000000000");
+ benchmark("GET",cmd,len);
+ free(cmd);
- prepareForBenchmark("LPUSH");
- c = createClient(REDIS_REPLY_INTEGER);
- c->obuf = sdscat(c->obuf,"LPUSH mylist bar\r\n");
- createMissingClients(c);
- aeMain(config.el);
- endBenchmark();
+ len = redisFormatCommand(&cmd,"INCR counter:rand:000000000000");
+ benchmark("INCR",cmd,len);
+ free(cmd);
- prepareForBenchmark("LPOP");
- c = createClient(REDIS_REPLY_STRING);
- c->obuf = sdscat(c->obuf,"LPOP mylist\r\n");
- createMissingClients(c);
- aeMain(config.el);
- endBenchmark();
+ len = redisFormatCommand(&cmd,"LPUSH mylist %s",data);
+ benchmark("LPUSH",cmd,len);
+ free(cmd);
- prepareForBenchmark("SADD");
- c = createClient(REDIS_REPLY_STATUS);
- c->obuf = sdscat(c->obuf,"SADD myset counter_rand000000000000\r\n");
- createMissingClients(c);
- aeMain(config.el);
- endBenchmark();
+ len = redisFormatCommand(&cmd,"LPOP mylist");
+ benchmark("LPOP",cmd,len);
+ free(cmd);
- prepareForBenchmark("SPOP");
- c = createClient(REDIS_REPLY_STRING);
- c->obuf = sdscat(c->obuf,"SPOP myset\r\n");
- createMissingClients(c);
- aeMain(config.el);
- endBenchmark();
+ len = redisFormatCommand(&cmd,"SADD myset counter:rand:000000000000");
+ benchmark("SADD",cmd,len);
+ free(cmd);
- prepareForBenchmark("LPUSH (again, in order to bench LRANGE)");
- c = createClient(REDIS_REPLY_STATUS);
- c->obuf = sdscat(c->obuf,"LPUSH mylist bar\r\n");
- createMissingClients(c);
- aeMain(config.el);
- endBenchmark();
+ len = redisFormatCommand(&cmd,"SPOP myset");
+ benchmark("SPOP",cmd,len);
+ free(cmd);
- prepareForBenchmark("LRANGE (first 100 elements)");
- c = createClient(REDIS_REPLY_ARRAY);
- c->obuf = sdscat(c->obuf,"LRANGE mylist 0 99\r\n");
- createMissingClients(c);
- aeMain(config.el);
- endBenchmark();
+ len = redisFormatCommand(&cmd,"LPUSH mylist %s",data);
+ benchmark("LPUSH (again, in order to bench LRANGE)",cmd,len);
+ free(cmd);
- prepareForBenchmark("LRANGE (first 300 elements)");
- c = createClient(REDIS_REPLY_ARRAY);
- c->obuf = sdscat(c->obuf,"LRANGE mylist 0 299\r\n");
- createMissingClients(c);
- aeMain(config.el);
- endBenchmark();
+ len = redisFormatCommand(&cmd,"LRANGE mylist 0 99");
+ benchmark("LRANGE (first 100 elements)",cmd,len);
+ free(cmd);
- prepareForBenchmark("LRANGE (first 450 elements)");
- c = createClient(REDIS_REPLY_ARRAY);
- c->obuf = sdscat(c->obuf,"LRANGE mylist 0 449\r\n");
- createMissingClients(c);
- aeMain(config.el);
- endBenchmark();
+ len = redisFormatCommand(&cmd,"LRANGE mylist 0 299");
+ benchmark("LRANGE (first 300 elements)",cmd,len);
+ free(cmd);
- prepareForBenchmark("LRANGE (first 600 elements)");
- c = createClient(REDIS_REPLY_ARRAY);
- c->obuf = sdscat(c->obuf,"LRANGE mylist 0 599\r\n");
- createMissingClients(c);
- aeMain(config.el);
- endBenchmark();
+ len = redisFormatCommand(&cmd,"LRANGE mylist 0 449");
+ benchmark("LRANGE (first 450 elements)",cmd,len);
+ free(cmd);
+
+ len = redisFormatCommand(&cmd,"LRANGE mylist 0 599");
+ benchmark("LRANGE (first 600 elements)",cmd,len);
+ free(cmd);
printf("\n");
} while(config.loop);