]>
git.saurik.com Git - redis.git/blob - benchmark.c
1 /* Redis benchmark utility.
3 * Copyright (c) 2006-2009, 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
;
84 typedef struct _client
{
89 int mbulk
; /* Number of elements in an mbulk reply */
90 int readlen
; /* readlen == -1 means read a single line */
92 unsigned int written
; /* bytes of 'obuf' already written */
94 long long start
; /* start time in milliseconds */
98 static void writeHandler ( aeEventLoop
* el
, int fd
, void * privdata
, int mask
);
99 static void createMissingClients ( client c
);
102 static long long mstime ( void ) {
106 gettimeofday (& tv
, NULL
);
107 mst
= (( long ) tv
. tv_sec
)* 1000 ;
108 mst
+= tv
. tv_usec
/ 1000 ;
112 static void freeClient ( client c
) {
115 aeDeleteFileEvent ( config
. el
, c
-> fd
, AE_WRITABLE
);
116 aeDeleteFileEvent ( config
. el
, c
-> fd
, AE_READABLE
);
121 config
. liveclients
--;
122 ln
= listSearchKey ( config
. clients
, c
);
124 listDelNode ( config
. clients
, ln
);
127 static void freeAllClients ( void ) {
128 listNode
* ln
= config
. clients
-> head
, * next
;
132 freeClient ( ln
-> value
);
137 static void resetClient ( client c
) {
138 aeDeleteFileEvent ( config
. el
, c
-> fd
, AE_WRITABLE
);
139 aeDeleteFileEvent ( config
. el
, c
-> fd
, AE_READABLE
);
140 aeCreateFileEvent ( config
. el
, c
-> fd
, AE_WRITABLE
, writeHandler
, c
);
142 c
-> ibuf
= sdsempty ();
143 c
-> readlen
= ( c
-> replytype
== REPLY_BULK
||
144 c
-> replytype
== REPLY_MBULK
) ? - 1 : 0 ;
148 c
-> state
= CLIENT_SENDQUERY
;
150 createMissingClients ( c
);
153 static void randomizeClientKey ( client c
) {
158 p
= strstr ( c
-> obuf
, "_rand" );
161 r
= random () % config
. randomkeys_keyspacelen
;
162 sprintf ( buf
, " %l d" , r
);
163 memcpy ( p
, buf
, strlen ( buf
));
166 static void prepareClientForReply ( client c
, int type
) {
167 if ( type
== REPLY_BULK
) {
168 c
-> replytype
= REPLY_BULK
;
170 } else if ( type
== REPLY_MBULK
) {
171 c
-> replytype
= REPLY_MBULK
;
180 static void clientDone ( client c
) {
181 static int last_tot_received
= 1 ;
184 config
. donerequests
++;
185 latency
= mstime () - c
-> start
;
186 if ( latency
> MAX_LATENCY
) latency
= MAX_LATENCY
;
187 config
. latency
[ latency
]++;
189 if ( config
. debug
&& last_tot_received
!= c
-> totreceived
) {
190 printf ( "Tot bytes received: %d \n " , c
-> totreceived
);
191 last_tot_received
= c
-> totreceived
;
193 if ( config
. donerequests
== config
. requests
) {
198 if ( config
. keepalive
) {
200 if ( config
. randomkeys
) randomizeClientKey ( c
);
202 config
. liveclients
--;
203 createMissingClients ( c
);
204 config
. liveclients
++;
209 static void readHandler ( aeEventLoop
* el
, int fd
, void * privdata
, int mask
)
218 nread
= read ( c
-> fd
, buf
, 1024 );
220 fprintf ( stderr
, "Reading from socket: %s \n " , strerror ( errno
));
225 fprintf ( stderr
, "EOF from client \n " );
229 c
-> totreceived
+= nread
;
230 c
-> ibuf
= sdscatlen ( c
-> ibuf
, buf
, nread
);
233 /* Are we waiting for the first line of the command of for sdf
234 * count in bulk or multi bulk operations? */
235 if ( c
-> replytype
== REPLY_INT
||
236 c
-> replytype
== REPLY_RETCODE
||
237 ( c
-> replytype
== REPLY_BULK
&& c
-> readlen
== - 1 ) ||
238 ( c
-> replytype
== REPLY_MBULK
&& c
-> readlen
== - 1 ) ||
239 ( c
-> replytype
== REPLY_MBULK
&& c
-> mbulk
== - 1 )) {
242 /* Check if the first line is complete. This is only true if
243 * there is a newline inside the buffer. */
244 if (( p
= strchr ( c
-> ibuf
, ' \n ' )) != NULL
) {
245 if ( c
-> replytype
== REPLY_BULK
||
246 ( c
-> replytype
== REPLY_MBULK
&& c
-> mbulk
!= - 1 ))
248 /* Read the count of a bulk reply (being it a single bulk or
249 * a multi bulk reply). "$<count>" for the protocol spec. */
252 c
-> readlen
= atoi ( c
-> ibuf
+ 1 )+ 2 ;
253 // printf("BULK ATOI: %s\n", c->ibuf+1);
254 /* Handle null bulk reply "$-1" */
255 if ( c
-> readlen
- 2 == - 1 ) {
259 /* Leave all the rest in the input buffer */
260 c
-> ibuf
= sdsrange ( c
-> ibuf
,( p
- c
-> ibuf
)+ 1 ,- 1 );
261 /* fall through to reach the point where the code will try
262 * to check if the bulk reply is complete. */
263 } else if ( c
-> replytype
== REPLY_MBULK
&& c
-> mbulk
== - 1 ) {
264 /* Read the count of a multi bulk reply. That is, how many
265 * bulk replies we have to read next. "*<count>" protocol. */
268 c
-> mbulk
= atoi ( c
-> ibuf
+ 1 );
269 /* Handle null bulk reply "*-1" */
270 if ( c
-> mbulk
== - 1 ) {
274 // printf("%p) %d elements list\n", c, c->mbulk);
275 /* Leave all the rest in the input buffer */
276 c
-> ibuf
= sdsrange ( c
-> ibuf
,( p
- c
-> ibuf
)+ 1 ,- 1 );
279 c
-> ibuf
= sdstrim ( c
-> ibuf
, " \r\n " );
285 /* bulk read, did we read everything? */
286 if ((( c
-> replytype
== REPLY_MBULK
&& c
-> mbulk
!= - 1 ) ||
287 ( c
-> replytype
== REPLY_BULK
)) && c
-> readlen
!= - 1 &&
288 ( unsigned ) c
-> readlen
<= sdslen ( c
-> ibuf
))
290 // printf("BULKSTATUS mbulk:%d readlen:%d sdslen:%d\n",
291 // c->mbulk,c->readlen,sdslen(c->ibuf));
292 if ( c
-> replytype
== REPLY_BULK
) {
294 } else if ( c
-> replytype
== REPLY_MBULK
) {
295 // printf("%p) %d (%d)) ",c, c->mbulk, c->readlen);
296 // fwrite(c->ibuf,c->readlen,1,stdout);
298 if (-- c
-> mbulk
== 0 ) {
301 c
-> ibuf
= sdsrange ( c
-> ibuf
, c
-> readlen
,- 1 );
309 static void writeHandler ( aeEventLoop
* el
, int fd
, void * privdata
, int mask
)
316 if ( c
-> state
== CLIENT_CONNECTING
) {
317 c
-> state
= CLIENT_SENDQUERY
;
320 if ( sdslen ( c
-> obuf
) > c
-> written
) {
321 void * ptr
= c
-> obuf
+ c
-> written
;
322 int len
= sdslen ( c
-> obuf
) - c
-> written
;
323 int nwritten
= write ( c
-> fd
, ptr
, len
);
324 if ( nwritten
== - 1 ) {
325 fprintf ( stderr
, "Writing to socket: %s \n " , strerror ( errno
));
329 c
-> written
+= nwritten
;
330 if ( sdslen ( c
-> obuf
) == c
-> written
) {
331 aeDeleteFileEvent ( config
. el
, c
-> fd
, AE_WRITABLE
);
332 aeCreateFileEvent ( config
. el
, c
-> fd
, AE_READABLE
, readHandler
, c
);
333 c
-> state
= CLIENT_READREPLY
;
338 static client
createClient ( void ) {
339 client c
= zmalloc ( sizeof ( struct _client
));
340 char err
[ ANET_ERR_LEN
];
342 c
-> fd
= anetTcpNonBlockConnect ( err
, config
. hostip
, config
. hostport
);
343 if ( c
-> fd
== ANET_ERR
) {
345 fprintf ( stderr
, "Connect: %s \n " , err
);
348 anetTcpNoDelay ( NULL
, c
-> fd
);
349 c
-> obuf
= sdsempty ();
350 c
-> ibuf
= sdsempty ();
355 c
-> state
= CLIENT_CONNECTING
;
356 aeCreateFileEvent ( config
. el
, c
-> fd
, AE_WRITABLE
, writeHandler
, c
);
357 config
. liveclients
++;
358 listAddNodeTail ( config
. clients
, c
);
362 static void createMissingClients ( client c
) {
363 while ( config
. liveclients
< config
. numclients
) {
364 client
new = createClient ();
367 new -> obuf
= sdsdup ( c
-> obuf
);
368 if ( config
. randomkeys
) randomizeClientKey ( c
);
369 prepareClientForReply ( new , c
-> replytype
);
373 static void showLatencyReport ( char * title
) {
375 float perc
, reqpersec
;
377 reqpersec
= ( float ) config
. donerequests
/(( float ) config
. totlatency
/ 1000 );
379 printf ( "====== %s ====== \n " , title
);
380 printf ( " %d requests completed in %.2f seconds \n " , config
. donerequests
,
381 ( float ) config
. totlatency
/ 1000 );
382 printf ( " %d parallel clients \n " , config
. numclients
);
383 printf ( " %d bytes payload \n " , config
. datasize
);
384 printf ( " keep alive: %d \n " , config
. keepalive
);
386 for ( j
= 0 ; j
<= MAX_LATENCY
; j
++) {
387 if ( config
. latency
[ j
]) {
388 seen
+= config
. latency
[ j
];
389 perc
= (( float ) seen
* 100 )/ config
. donerequests
;
390 printf ( "%.2f%% <= %d milliseconds \n " , perc
, j
);
393 printf ( "%.2f requests per second \n\n " , reqpersec
);
395 printf ( " %s : %.2f requests per second \n " , title
, reqpersec
);
399 static void prepareForBenchmark ( void )
401 memset ( config
. latency
, 0 , sizeof ( int )*( MAX_LATENCY
+ 1 ));
402 config
. start
= mstime ();
403 config
. donerequests
= 0 ;
406 static void endBenchmark ( char * title
) {
407 config
. totlatency
= mstime ()- config
. start
;
408 showLatencyReport ( title
);
412 void parseOptions ( int argc
, char ** argv
) {
415 for ( i
= 1 ; i
< argc
; i
++) {
416 int lastarg
= i
== argc
- 1 ;
418 if (! strcmp ( argv
[ i
], "-c" ) && ! lastarg
) {
419 config
. numclients
= atoi ( argv
[ i
+ 1 ]);
421 } else if (! strcmp ( argv
[ i
], "-n" ) && ! lastarg
) {
422 config
. requests
= atoi ( argv
[ i
+ 1 ]);
424 } else if (! strcmp ( argv
[ i
], "-k" ) && ! lastarg
) {
425 config
. keepalive
= atoi ( argv
[ i
+ 1 ]);
427 } else if (! strcmp ( argv
[ i
], "-h" ) && ! lastarg
) {
428 char * ip
= zmalloc ( 32 );
429 if ( anetResolve ( NULL
, argv
[ i
+ 1 ], ip
) == ANET_ERR
) {
430 printf ( "Can't resolve %s \n " , argv
[ i
]);
435 } else if (! strcmp ( argv
[ i
], "-p" ) && ! lastarg
) {
436 config
. hostport
= atoi ( argv
[ i
+ 1 ]);
438 } else if (! strcmp ( argv
[ i
], "-d" ) && ! lastarg
) {
439 config
. datasize
= atoi ( argv
[ i
+ 1 ]);
441 if ( config
. datasize
< 1 ) config
. datasize
= 1 ;
442 if ( config
. datasize
> 1024 * 1024 ) config
. datasize
= 1024 * 1024 ;
443 } else if (! strcmp ( argv
[ i
], "-r" ) && ! lastarg
) {
444 config
. randomkeys
= 1 ;
445 config
. randomkeys_keyspacelen
= atoi ( argv
[ i
+ 1 ]);
446 if ( config
. randomkeys_keyspacelen
< 0 )
447 config
. randomkeys_keyspacelen
= 0 ;
449 } else if (! strcmp ( argv
[ i
], "-q" )) {
451 } else if (! strcmp ( argv
[ i
], "-l" )) {
453 } else if (! strcmp ( argv
[ i
], "-D" )) {
455 } else if (! strcmp ( argv
[ i
], "-I" )) {
458 printf ( "Wrong option ' %s ' or option argument missing \n\n " , argv
[ i
]);
459 printf ( "Usage: redis-benchmark [-h <host>] [-p <port>] [-c <clients>] [-n <requests]> [-k <boolean>] \n\n " );
460 printf ( " -h <hostname> Server hostname (default 127.0.0.1) \n " );
461 printf ( " -p <hostname> Server port (default 6379) \n " );
462 printf ( " -c <clients> Number of parallel connections (default 50) \n " );
463 printf ( " -n <requests> Total number of requests (default 10000) \n " );
464 printf ( " -d <size> Data size of SET/GET value in bytes (default 2) \n " );
465 printf ( " -k <boolean> 1=keep alive 0=reconnect (default 1) \n " );
466 printf ( " -r <keyspacelen> Use random keys for SET/GET/INCR \n " );
467 printf ( " Using this option the benchmark will get/set keys \n " );
468 printf ( " in the form mykey_rand000000012456 instead of constant \n " );
469 printf ( " keys, the <keyspacelen> argument determines the max \n " );
470 printf ( " number of values for the random number. For instance \n " );
471 printf ( " if set to 10 only rand000000000000 - rand000000000009 \n " );
472 printf ( " range will be allowed. \n " );
473 printf ( " -q Quiet. Just show query/sec values \n " );
474 printf ( " -l Loop. Run the tests forever \n " );
475 printf ( " -I Idle mode. Just open N idle connections and wait. \n " );
476 printf ( " -D Debug mode. more verbose. \n " );
482 int main ( int argc
, char ** argv
) {
485 signal ( SIGHUP
, SIG_IGN
);
486 signal ( SIGPIPE
, SIG_IGN
);
489 config
. numclients
= 50 ;
490 config
. requests
= 10000 ;
491 config
. liveclients
= 0 ;
492 config
. el
= aeCreateEventLoop ();
493 config
. keepalive
= 1 ;
494 config
. donerequests
= 0 ;
496 config
. randomkeys
= 0 ;
497 config
. randomkeys_keyspacelen
= 0 ;
501 config
. latency
= NULL
;
502 config
. clients
= listCreate ();
503 config
. latency
= zmalloc ( sizeof ( int )*( MAX_LATENCY
+ 1 ));
505 config
. hostip
= "127.0.0.1" ;
506 config
. hostport
= 6379 ;
508 parseOptions ( argc
, argv
);
510 if ( config
. keepalive
== 0 ) {
511 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 " );
514 if ( config
. idlemode
) {
515 printf ( "Creating %d idle connections and waiting forever (Ctrl+C when done) \n " , config
. numclients
);
516 prepareForBenchmark ();
519 c
-> obuf
= sdsempty ();
520 prepareClientForReply ( c
, REPLY_RETCODE
); /* will never receive it */
521 createMissingClients ( c
);
523 /* and will wait for every */
527 prepareForBenchmark ();
530 c
-> obuf
= sdscatprintf ( c
-> obuf
, "SET foo_rand000000000000 %d \r\n " , config
. datasize
);
532 char * data
= zmalloc ( config
. datasize
+ 2 );
533 memset ( data
, 'x' , config
. datasize
);
534 data
[ config
. datasize
] = ' \r ' ;
535 data
[ config
. datasize
+ 1 ] = ' \n ' ;
536 c
-> obuf
= sdscatlen ( c
-> obuf
, data
, config
. datasize
+ 2 );
538 prepareClientForReply ( c
, REPLY_RETCODE
);
539 createMissingClients ( c
);
543 prepareForBenchmark ();
546 c
-> obuf
= sdscat ( c
-> obuf
, "GET foo_rand000000000000 \r\n " );
547 prepareClientForReply ( c
, REPLY_BULK
);
548 createMissingClients ( c
);
552 prepareForBenchmark ();
555 c
-> obuf
= sdscat ( c
-> obuf
, "INCR counter_rand000000000000 \r\n " );
556 prepareClientForReply ( c
, REPLY_INT
);
557 createMissingClients ( c
);
559 endBenchmark ( "INCR" );
561 prepareForBenchmark ();
564 c
-> obuf
= sdscat ( c
-> obuf
, "LPUSH mylist 3 \r\n bar \r\n " );
565 prepareClientForReply ( c
, REPLY_INT
);
566 createMissingClients ( c
);
568 endBenchmark ( "LPUSH" );
570 prepareForBenchmark ();
573 c
-> obuf
= sdscat ( c
-> obuf
, "LPOP mylist \r\n " );
574 prepareClientForReply ( c
, REPLY_BULK
);
575 createMissingClients ( c
);
577 endBenchmark ( "LPOP" );
579 prepareForBenchmark ();
582 c
-> obuf
= sdscat ( c
-> obuf
, "PING \r\n " );
583 prepareClientForReply ( c
, REPLY_RETCODE
);
584 createMissingClients ( c
);
586 endBenchmark ( "PING" );
588 prepareForBenchmark ();
591 c
-> obuf
= sdscat ( c
-> obuf
, "LPUSH mylist 3 \r\n bar \r\n " );
592 prepareClientForReply ( c
, REPLY_RETCODE
);
593 createMissingClients ( c
);
595 endBenchmark ( "LPUSH (again, in order to bench LRANGE)" );
597 prepareForBenchmark ();
600 c
-> obuf
= sdscat ( c
-> obuf
, "LRANGE mylist 0 99 \r\n " );
601 prepareClientForReply ( c
, REPLY_MBULK
);
602 createMissingClients ( c
);
604 endBenchmark ( "LRANGE (first 100 elements)" );
606 prepareForBenchmark ();
609 c
-> obuf
= sdscat ( c
-> obuf
, "LRANGE mylist 0 299 \r\n " );
610 prepareClientForReply ( c
, REPLY_MBULK
);
611 createMissingClients ( c
);
613 endBenchmark ( "LRANGE (first 300 elements)" );
615 prepareForBenchmark ();
618 c
-> obuf
= sdscat ( c
-> obuf
, "LRANGE mylist 0 449 \r\n " );
619 prepareClientForReply ( c
, REPLY_MBULK
);
620 createMissingClients ( c
);
622 endBenchmark ( "LRANGE (first 450 elements)" );
624 prepareForBenchmark ();
627 c
-> obuf
= sdscat ( c
-> obuf
, "LRANGE mylist 0 599 \r\n " );
628 prepareClientForReply ( c
, REPLY_MBULK
);
629 createMissingClients ( c
);
631 endBenchmark ( "LRANGE (first 600 elements)" );
634 } while ( config
. loop
);