]>
git.saurik.com Git - redis.git/blob - src/redis-benchmark.c
1 /* Redis benchmark utility.
3 * Copyright (c) 2009-2010, Salvatore Sanfilippo <antirez at gmail dot com>
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions are met:
9 * * Redistributions of source code must retain the above copyright notice,
10 * this list of conditions and the following disclaimer.
11 * * Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
14 * * Neither the name of Redis nor the names of its contributors may be used
15 * to endorse or promote products derived from this software without
16 * specific prior written permission.
18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
19 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
22 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
23 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
24 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
25 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
26 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
27 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
28 * POSSIBILITY OF SUCH DAMAGE.
49 #define REPLY_RETCODE 1
53 #define CLIENT_CONNECTING 0
54 #define CLIENT_SENDQUERY 1
55 #define CLIENT_READREPLY 2
57 #define MAX_LATENCY 5000
59 #define REDIS_NOTUSED(V) ((void) V)
61 static struct config
{
70 int randomkeys_keyspacelen
;
85 typedef struct _client
{
90 int mbulk
; /* Number of elements in an mbulk reply */
91 int readlen
; /* readlen == -1 means read a single line */
93 unsigned int written
; /* bytes of 'obuf' already written */
95 long long start
; /* start time in milliseconds */
99 static void writeHandler ( aeEventLoop
* el
, int fd
, void * privdata
, int mask
);
100 static void createMissingClients ( client c
);
103 static long long mstime ( void ) {
107 gettimeofday (& tv
, NULL
);
108 mst
= (( long ) tv
. tv_sec
)* 1000 ;
109 mst
+= tv
. tv_usec
/ 1000 ;
113 static void freeClient ( client c
) {
116 aeDeleteFileEvent ( config
. el
, c
-> fd
, AE_WRITABLE
);
117 aeDeleteFileEvent ( config
. el
, c
-> fd
, AE_READABLE
);
122 config
. liveclients
--;
123 ln
= listSearchKey ( config
. clients
, c
);
125 listDelNode ( config
. clients
, ln
);
128 static void freeAllClients ( void ) {
129 listNode
* ln
= config
. clients
-> head
, * next
;
133 freeClient ( ln
-> value
);
138 static void resetClient ( client c
) {
139 aeDeleteFileEvent ( config
. el
, c
-> fd
, AE_WRITABLE
);
140 aeDeleteFileEvent ( config
. el
, c
-> fd
, AE_READABLE
);
141 aeCreateFileEvent ( config
. el
, c
-> fd
, AE_WRITABLE
, writeHandler
, c
);
143 c
-> ibuf
= sdsempty ();
144 c
-> readlen
= ( c
-> replytype
== REPLY_BULK
||
145 c
-> replytype
== REPLY_MBULK
) ? - 1 : 0 ;
149 c
-> state
= CLIENT_SENDQUERY
;
151 createMissingClients ( c
);
154 static void randomizeClientKey ( client c
) {
159 p
= strstr ( c
-> obuf
, "_rand" );
162 r
= random () % config
. randomkeys_keyspacelen
;
163 sprintf ( buf
, " %l d" , r
);
164 memcpy ( p
, buf
, strlen ( buf
));
167 static void prepareClientForReply ( client c
, int type
) {
168 if ( type
== REPLY_BULK
) {
169 c
-> replytype
= REPLY_BULK
;
171 } else if ( type
== REPLY_MBULK
) {
172 c
-> replytype
= REPLY_MBULK
;
181 static void clientDone ( client c
) {
182 static int last_tot_received
= 1 ;
185 config
. donerequests
++;
186 latency
= mstime () - c
-> start
;
187 if ( latency
> MAX_LATENCY
) latency
= MAX_LATENCY
;
188 config
. latency
[ latency
]++;
190 if ( config
. debug
&& last_tot_received
!= c
-> totreceived
) {
191 printf ( "Tot bytes received: %d \n " , c
-> totreceived
);
192 last_tot_received
= c
-> totreceived
;
194 if ( config
. donerequests
== config
. requests
) {
199 if ( config
. keepalive
) {
201 if ( config
. randomkeys
) randomizeClientKey ( c
);
203 config
. liveclients
--;
204 createMissingClients ( c
);
205 config
. liveclients
++;
210 static void readHandler ( aeEventLoop
* el
, int fd
, void * privdata
, int mask
)
219 nread
= read ( c
-> fd
, buf
, 1024 );
221 fprintf ( stderr
, "Reading from socket: %s \n " , strerror ( errno
));
226 fprintf ( stderr
, "EOF from client \n " );
230 c
-> totreceived
+= nread
;
231 c
-> ibuf
= sdscatlen ( c
-> ibuf
, buf
, nread
);
234 /* Are we waiting for the first line of the command of for sdf
235 * count in bulk or multi bulk operations? */
236 if ( c
-> replytype
== REPLY_INT
||
237 c
-> replytype
== REPLY_RETCODE
||
238 ( c
-> replytype
== REPLY_BULK
&& c
-> readlen
== - 1 ) ||
239 ( c
-> replytype
== REPLY_MBULK
&& c
-> readlen
== - 1 ) ||
240 ( c
-> replytype
== REPLY_MBULK
&& c
-> mbulk
== - 1 )) {
243 /* Check if the first line is complete. This is only true if
244 * there is a newline inside the buffer. */
245 if (( p
= strchr ( c
-> ibuf
, ' \n ' )) != NULL
) {
246 if ( c
-> replytype
== REPLY_BULK
||
247 ( c
-> replytype
== REPLY_MBULK
&& c
-> mbulk
!= - 1 ))
249 /* Read the count of a bulk reply (being it a single bulk or
250 * a multi bulk reply). "$<count>" for the protocol spec. */
253 c
-> readlen
= atoi ( c
-> ibuf
+ 1 )+ 2 ;
254 // printf("BULK ATOI: %s\n", c->ibuf+1);
255 /* Handle null bulk reply "$-1" */
256 if ( c
-> readlen
- 2 == - 1 ) {
260 /* Leave all the rest in the input buffer */
261 c
-> ibuf
= sdsrange ( c
-> ibuf
,( p
- c
-> ibuf
)+ 1 ,- 1 );
262 /* fall through to reach the point where the code will try
263 * to check if the bulk reply is complete. */
264 } else if ( c
-> replytype
== REPLY_MBULK
&& c
-> mbulk
== - 1 ) {
265 /* Read the count of a multi bulk reply. That is, how many
266 * bulk replies we have to read next. "*<count>" protocol. */
269 c
-> mbulk
= atoi ( c
-> ibuf
+ 1 );
270 /* Handle null bulk reply "*-1" */
271 if ( c
-> mbulk
== - 1 ) {
275 // printf("%p) %d elements list\n", c, c->mbulk);
276 /* Leave all the rest in the input buffer */
277 c
-> ibuf
= sdsrange ( c
-> ibuf
,( p
- c
-> ibuf
)+ 1 ,- 1 );
280 c
-> ibuf
= sdstrim ( c
-> ibuf
, " \r\n " );
286 /* bulk read, did we read everything? */
287 if ((( c
-> replytype
== REPLY_MBULK
&& c
-> mbulk
!= - 1 ) ||
288 ( c
-> replytype
== REPLY_BULK
)) && c
-> readlen
!= - 1 &&
289 ( unsigned ) c
-> readlen
<= sdslen ( c
-> ibuf
))
291 // printf("BULKSTATUS mbulk:%d readlen:%d sdslen:%d\n",
292 // c->mbulk,c->readlen,sdslen(c->ibuf));
293 if ( c
-> replytype
== REPLY_BULK
) {
295 } else if ( c
-> replytype
== REPLY_MBULK
) {
296 // printf("%p) %d (%d)) ",c, c->mbulk, c->readlen);
297 // fwrite(c->ibuf,c->readlen,1,stdout);
299 if (-- c
-> mbulk
== 0 ) {
302 c
-> ibuf
= sdsrange ( c
-> ibuf
, c
-> readlen
,- 1 );
310 static void writeHandler ( aeEventLoop
* el
, int fd
, void * privdata
, int mask
)
317 if ( c
-> state
== CLIENT_CONNECTING
) {
318 c
-> state
= CLIENT_SENDQUERY
;
321 if ( sdslen ( c
-> obuf
) > c
-> written
) {
322 void * ptr
= c
-> obuf
+ c
-> written
;
323 int len
= sdslen ( c
-> obuf
) - c
-> written
;
324 int nwritten
= write ( c
-> fd
, ptr
, len
);
325 if ( nwritten
== - 1 ) {
327 fprintf ( stderr
, "Writing to socket: %s \n " , strerror ( errno
));
331 c
-> written
+= nwritten
;
332 if ( sdslen ( c
-> obuf
) == c
-> written
) {
333 aeDeleteFileEvent ( config
. el
, c
-> fd
, AE_WRITABLE
);
334 aeCreateFileEvent ( config
. el
, c
-> fd
, AE_READABLE
, readHandler
, c
);
335 c
-> state
= CLIENT_READREPLY
;
340 static client
createClient ( void ) {
341 client c
= zmalloc ( sizeof ( struct _client
));
342 char err
[ ANET_ERR_LEN
];
344 if ( config
. hostsocket
== NULL
)
345 c
-> fd
= anetTcpNonBlockConnect ( err
, config
. hostip
, config
. hostport
);
347 c
-> fd
= anetUnixNonBlockConnect ( err
, config
. hostsocket
);
349 if ( c
-> fd
== ANET_ERR
) {
351 fprintf ( stderr
, "Connect: %s \n " , err
);
354 anetTcpNoDelay ( NULL
, c
-> fd
);
355 c
-> obuf
= sdsempty ();
356 c
-> ibuf
= sdsempty ();
361 c
-> state
= CLIENT_CONNECTING
;
362 aeCreateFileEvent ( config
. el
, c
-> fd
, AE_WRITABLE
, writeHandler
, c
);
363 config
. liveclients
++;
364 listAddNodeTail ( config
. clients
, c
);
368 static void createMissingClients ( client c
) {
369 while ( config
. liveclients
< config
. numclients
) {
370 client
new = createClient ();
373 new -> obuf
= sdsdup ( c
-> obuf
);
374 if ( config
. randomkeys
) randomizeClientKey ( c
);
375 prepareClientForReply ( new , c
-> replytype
);
379 static void showLatencyReport ( char * title
) {
381 float perc
, reqpersec
;
383 reqpersec
= ( float ) config
. donerequests
/(( float ) config
. totlatency
/ 1000 );
385 printf ( "====== %s ====== \n " , title
);
386 printf ( " %d requests completed in %.2f seconds \n " , config
. donerequests
,
387 ( float ) config
. totlatency
/ 1000 );
388 printf ( " %d parallel clients \n " , config
. numclients
);
389 printf ( " %d bytes payload \n " , config
. datasize
);
390 printf ( " keep alive: %d \n " , config
. keepalive
);
392 for ( j
= 0 ; j
<= MAX_LATENCY
; j
++) {
393 if ( config
. latency
[ j
]) {
394 seen
+= config
. latency
[ j
];
395 perc
= (( float ) seen
* 100 )/ config
. donerequests
;
396 printf ( "%.2f%% <= %d milliseconds \n " , perc
, j
);
399 printf ( "%.2f requests per second \n\n " , reqpersec
);
401 printf ( " %s : %.2f requests per second \n " , title
, reqpersec
);
405 static void prepareForBenchmark ( void )
407 memset ( config
. latency
, 0 , sizeof ( int )*( MAX_LATENCY
+ 1 ));
408 config
. start
= mstime ();
409 config
. donerequests
= 0 ;
412 static void endBenchmark ( char * title
) {
413 config
. totlatency
= mstime ()- config
. start
;
414 showLatencyReport ( title
);
418 void parseOptions ( int argc
, char ** argv
) {
421 for ( i
= 1 ; i
< argc
; i
++) {
422 int lastarg
= i
== argc
- 1 ;
424 if (! strcmp ( argv
[ i
], "-c" ) && ! lastarg
) {
425 config
. numclients
= atoi ( argv
[ i
+ 1 ]);
427 } else if (! strcmp ( argv
[ i
], "-n" ) && ! lastarg
) {
428 config
. requests
= atoi ( argv
[ i
+ 1 ]);
430 } else if (! strcmp ( argv
[ i
], "-k" ) && ! lastarg
) {
431 config
. keepalive
= atoi ( argv
[ i
+ 1 ]);
433 } else if (! strcmp ( argv
[ i
], "-h" ) && ! lastarg
) {
434 char * ip
= zmalloc ( 32 );
435 if ( anetResolve ( NULL
, argv
[ i
+ 1 ], ip
) == ANET_ERR
) {
436 printf ( "Can't resolve %s \n " , argv
[ i
]);
441 } else if (! strcmp ( argv
[ i
], "-p" ) && ! lastarg
) {
442 config
. hostport
= atoi ( argv
[ i
+ 1 ]);
444 } else if (! strcmp ( argv
[ i
], "-s" ) && ! lastarg
) {
445 config
. hostsocket
= argv
[ i
+ 1 ];
447 } else if (! strcmp ( argv
[ i
], "-d" ) && ! lastarg
) {
448 config
. datasize
= atoi ( argv
[ i
+ 1 ]);
450 if ( config
. datasize
< 1 ) config
. datasize
= 1 ;
451 if ( config
. datasize
> 1024 * 1024 ) config
. datasize
= 1024 * 1024 ;
452 } else if (! strcmp ( argv
[ i
], "-r" ) && ! lastarg
) {
453 config
. randomkeys
= 1 ;
454 config
. randomkeys_keyspacelen
= atoi ( argv
[ i
+ 1 ]);
455 if ( config
. randomkeys_keyspacelen
< 0 )
456 config
. randomkeys_keyspacelen
= 0 ;
458 } else if (! strcmp ( argv
[ i
], "-q" )) {
460 } else if (! strcmp ( argv
[ i
], "-l" )) {
462 } else if (! strcmp ( argv
[ i
], "-D" )) {
464 } else if (! strcmp ( argv
[ i
], "-I" )) {
467 printf ( "Wrong option ' %s ' or option argument missing \n\n " , argv
[ i
]);
468 printf ( "Usage: redis-benchmark [-h <host>] [-p <port>] [-c <clients>] [-n <requests]> [-k <boolean>] \n\n " );
469 printf ( " -h <hostname> Server hostname (default 127.0.0.1) \n " );
470 printf ( " -p <port> Server port (default 6379) \n " );
471 printf ( " -s <socket> Server socket (overrides host and port) \n " );
472 printf ( " -c <clients> Number of parallel connections (default 50) \n " );
473 printf ( " -n <requests> Total number of requests (default 10000) \n " );
474 printf ( " -d <size> Data size of SET/GET value in bytes (default 2) \n " );
475 printf ( " -k <boolean> 1=keep alive 0=reconnect (default 1) \n " );
476 printf ( " -r <keyspacelen> Use random keys for SET/GET/INCR, random values for SADD \n " );
477 printf ( " Using this option the benchmark will get/set keys \n " );
478 printf ( " in the form mykey_rand000000012456 instead of constant \n " );
479 printf ( " keys, the <keyspacelen> argument determines the max \n " );
480 printf ( " number of values for the random number. For instance \n " );
481 printf ( " if set to 10 only rand000000000000 - rand000000000009 \n " );
482 printf ( " range will be allowed. \n " );
483 printf ( " -q Quiet. Just show query/sec values \n " );
484 printf ( " -l Loop. Run the tests forever \n " );
485 printf ( " -I Idle mode. Just open N idle connections and wait. \n " );
486 printf ( " -D Debug mode. more verbose. \n " );
492 int main ( int argc
, char ** argv
) {
495 signal ( SIGHUP
, SIG_IGN
);
496 signal ( SIGPIPE
, SIG_IGN
);
499 config
. numclients
= 50 ;
500 config
. requests
= 10000 ;
501 config
. liveclients
= 0 ;
502 config
. el
= aeCreateEventLoop ();
503 config
. keepalive
= 1 ;
504 config
. donerequests
= 0 ;
506 config
. randomkeys
= 0 ;
507 config
. randomkeys_keyspacelen
= 0 ;
511 config
. latency
= NULL
;
512 config
. clients
= listCreate ();
513 config
. latency
= zmalloc ( sizeof ( int )*( MAX_LATENCY
+ 1 ));
515 config
. hostip
= "127.0.0.1" ;
516 config
. hostport
= 6379 ;
517 config
. hostsocket
= NULL
;
519 parseOptions ( argc
, argv
);
521 if ( config
. keepalive
== 0 ) {
522 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 " );
525 if ( config
. idlemode
) {
526 printf ( "Creating %d idle connections and waiting forever (Ctrl+C when done) \n " , config
. numclients
);
527 prepareForBenchmark ();
530 c
-> obuf
= sdsempty ();
531 prepareClientForReply ( c
, REPLY_RETCODE
); /* will never receive it */
532 createMissingClients ( c
);
534 /* and will wait for every */
538 prepareForBenchmark ();
541 c
-> obuf
= sdscat ( c
-> obuf
, "PING \r\n " );
542 prepareClientForReply ( c
, REPLY_RETCODE
);
543 createMissingClients ( c
);
545 endBenchmark ( "PING" );
547 prepareForBenchmark ();
550 c
-> obuf
= sdscat ( c
-> obuf
, "*1 \r\n $4 \r\n PING \r\n " );
551 prepareClientForReply ( c
, REPLY_RETCODE
);
552 createMissingClients ( c
);
554 endBenchmark ( "PING (multi bulk)" );
556 prepareForBenchmark ();
559 c
-> obuf
= sdscatprintf ( c
-> obuf
, "SET foo_rand000000000000 %d \r\n " , config
. datasize
);
561 char * data
= zmalloc ( config
. datasize
+ 2 );
562 memset ( data
, 'x' , config
. datasize
);
563 data
[ config
. datasize
] = ' \r ' ;
564 data
[ config
. datasize
+ 1 ] = ' \n ' ;
565 c
-> obuf
= sdscatlen ( c
-> obuf
, data
, config
. datasize
+ 2 );
567 prepareClientForReply ( c
, REPLY_RETCODE
);
568 createMissingClients ( c
);
572 prepareForBenchmark ();
575 c
-> obuf
= sdscat ( c
-> obuf
, "GET foo_rand000000000000 \r\n " );
576 prepareClientForReply ( c
, REPLY_BULK
);
577 createMissingClients ( c
);
581 prepareForBenchmark ();
584 c
-> obuf
= sdscat ( c
-> obuf
, "INCR counter_rand000000000000 \r\n " );
585 prepareClientForReply ( c
, REPLY_INT
);
586 createMissingClients ( c
);
588 endBenchmark ( "INCR" );
590 prepareForBenchmark ();
593 c
-> obuf
= sdscat ( c
-> obuf
, "LPUSH mylist 3 \r\n bar \r\n " );
594 prepareClientForReply ( c
, REPLY_INT
);
595 createMissingClients ( c
);
597 endBenchmark ( "LPUSH" );
599 prepareForBenchmark ();
602 c
-> obuf
= sdscat ( c
-> obuf
, "LPOP mylist \r\n " );
603 prepareClientForReply ( c
, REPLY_BULK
);
604 createMissingClients ( c
);
606 endBenchmark ( "LPOP" );
608 prepareForBenchmark ();
611 c
-> obuf
= sdscat ( c
-> obuf
, "SADD myset 24 \r\n counter_rand000000000000 \r\n " );
612 prepareClientForReply ( c
, REPLY_RETCODE
);
613 createMissingClients ( c
);
615 endBenchmark ( "SADD" );
617 prepareForBenchmark ();
620 c
-> obuf
= sdscat ( c
-> obuf
, "SPOP myset \r\n " );
621 prepareClientForReply ( c
, REPLY_BULK
);
622 createMissingClients ( c
);
624 endBenchmark ( "SPOP" );
626 prepareForBenchmark ();
629 c
-> obuf
= sdscat ( c
-> obuf
, "LPUSH mylist 3 \r\n bar \r\n " );
630 prepareClientForReply ( c
, REPLY_RETCODE
);
631 createMissingClients ( c
);
633 endBenchmark ( "LPUSH (again, in order to bench LRANGE)" );
635 prepareForBenchmark ();
638 c
-> obuf
= sdscat ( c
-> obuf
, "LRANGE mylist 0 99 \r\n " );
639 prepareClientForReply ( c
, REPLY_MBULK
);
640 createMissingClients ( c
);
642 endBenchmark ( "LRANGE (first 100 elements)" );
644 prepareForBenchmark ();
647 c
-> obuf
= sdscat ( c
-> obuf
, "LRANGE mylist 0 299 \r\n " );
648 prepareClientForReply ( c
, REPLY_MBULK
);
649 createMissingClients ( c
);
651 endBenchmark ( "LRANGE (first 300 elements)" );
653 prepareForBenchmark ();
656 c
-> obuf
= sdscat ( c
-> obuf
, "LRANGE mylist 0 449 \r\n " );
657 prepareClientForReply ( c
, REPLY_MBULK
);
658 createMissingClients ( c
);
660 endBenchmark ( "LRANGE (first 450 elements)" );
662 prepareForBenchmark ();
665 c
-> obuf
= sdscat ( c
-> obuf
, "LRANGE mylist 0 599 \r\n " );
666 prepareClientForReply ( c
, REPLY_MBULK
);
667 createMissingClients ( c
);
669 endBenchmark ( "LRANGE (first 600 elements)" );
672 } while ( config
. loop
);