]> git.saurik.com Git - redis.git/blob - src/redis-cli.c
memory fragmentation reporting in INFO also added for Mac OS X
[redis.git] / src / redis-cli.c
1 /* Redis CLI (command line interface)
2 *
3 * Copyright (c) 2009-2010, Salvatore Sanfilippo <antirez at gmail dot com>
4 * All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions are met:
8 *
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.
17 *
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.
29 */
30
31 #include "fmacros.h"
32 #include "version.h"
33
34 #include <stdio.h>
35 #include <string.h>
36 #include <stdlib.h>
37 #include <unistd.h>
38 #include <ctype.h>
39 #include <errno.h>
40 #include <sys/stat.h>
41
42 #include "anet.h"
43 #include "sds.h"
44 #include "adlist.h"
45 #include "zmalloc.h"
46 #include "linenoise.h"
47
48 #define REDIS_CMD_INLINE 1
49 #define REDIS_CMD_BULK 2
50 #define REDIS_CMD_MULTIBULK 4
51
52 #define REDIS_NOTUSED(V) ((void) V)
53
54 static struct config {
55 char *hostip;
56 int hostport;
57 long repeat;
58 int dbnum;
59 int interactive;
60 int shutdown;
61 int monitor_mode;
62 int pubsub_mode;
63 int raw_output; /* output mode per command */
64 int tty; /* flag for default output format */
65 char mb_sep;
66 char *auth;
67 char *historyfile;
68 } config;
69
70 static int cliReadReply(int fd);
71 static void usage();
72
73 /* Connect to the client. If force is not zero the connection is performed
74 * even if there is already a connected socket. */
75 static int cliConnect(int force) {
76 char err[ANET_ERR_LEN];
77 static int fd = ANET_ERR;
78
79 if (fd == ANET_ERR || force) {
80 if (force) close(fd);
81 fd = anetTcpConnect(err,config.hostip,config.hostport);
82 if (fd == ANET_ERR) {
83 fprintf(stderr, "Could not connect to Redis at %s:%d: %s", config.hostip, config.hostport, err);
84 return -1;
85 }
86 anetTcpNoDelay(NULL,fd);
87 }
88 return fd;
89 }
90
91 static sds cliReadLine(int fd) {
92 sds line = sdsempty();
93
94 while(1) {
95 char c;
96 ssize_t ret;
97
98 ret = read(fd,&c,1);
99 if (ret <= 0) {
100 sdsfree(line);
101 return NULL;
102 } else if ((ret == 0) || (c == '\n')) {
103 break;
104 } else {
105 line = sdscatlen(line,&c,1);
106 }
107 }
108 return sdstrim(line,"\r\n");
109 }
110
111 static int cliReadSingleLineReply(int fd, int quiet) {
112 sds reply = cliReadLine(fd);
113
114 if (reply == NULL) return 1;
115 if (!quiet)
116 printf("%s", reply);
117 sdsfree(reply);
118 return 0;
119 }
120
121 static void printStringRepr(char *s, int len) {
122 printf("\"");
123 while(len--) {
124 switch(*s) {
125 case '\\':
126 case '"':
127 printf("\\%c",*s);
128 break;
129 case '\n': printf("\\n"); break;
130 case '\r': printf("\\r"); break;
131 case '\t': printf("\\t"); break;
132 case '\a': printf("\\a"); break;
133 case '\b': printf("\\b"); break;
134 default:
135 if (isprint(*s))
136 printf("%c",*s);
137 else
138 printf("\\x%02x",(unsigned char)*s);
139 break;
140 }
141 s++;
142 }
143 printf("\"");
144 }
145
146 static int cliReadBulkReply(int fd) {
147 sds replylen = cliReadLine(fd);
148 char *reply, crlf[2];
149 int bulklen;
150
151 if (replylen == NULL) return 1;
152 bulklen = atoi(replylen);
153 if (bulklen == -1) {
154 sdsfree(replylen);
155 printf("(nil)\n");
156 return 0;
157 }
158 reply = zmalloc(bulklen);
159 anetRead(fd,reply,bulklen);
160 anetRead(fd,crlf,2);
161 if (config.raw_output || !config.tty) {
162 if (bulklen && fwrite(reply,bulklen,1,stdout) == 0) {
163 zfree(reply);
164 return 1;
165 }
166 } else {
167 /* If you are producing output for the standard output we want
168 * a more interesting output with quoted characters and so forth */
169 printStringRepr(reply,bulklen);
170 }
171 zfree(reply);
172 return 0;
173 }
174
175 static int cliReadMultiBulkReply(int fd) {
176 sds replylen = cliReadLine(fd);
177 int elements, c = 1;
178 int retval = 0;
179
180 if (replylen == NULL) return 1;
181 elements = atoi(replylen);
182 if (elements == -1) {
183 sdsfree(replylen);
184 printf("(nil)\n");
185 return 0;
186 }
187 if (elements == 0) {
188 printf("(empty list or set)\n");
189 }
190 while(elements--) {
191 if (config.tty) printf("%d. ", c);
192 if (cliReadReply(fd)) retval = 1;
193 if (elements) printf("%c",config.mb_sep);
194 c++;
195 }
196 return retval;
197 }
198
199 static int cliReadReply(int fd) {
200 char type;
201 int nread;
202
203 if ((nread = anetRead(fd,&type,1)) <= 0) {
204 if (config.shutdown) return 0;
205 if (config.interactive &&
206 (nread == 0 || (nread == -1 && errno == ECONNRESET)))
207 {
208 return ECONNRESET;
209 } else {
210 printf("I/O error while reading from socket: %s",strerror(errno));
211 exit(1);
212 }
213 }
214 switch(type) {
215 case '-':
216 if (config.tty) printf("(error) ");
217 cliReadSingleLineReply(fd,0);
218 return 1;
219 case '+':
220 return cliReadSingleLineReply(fd,0);
221 case ':':
222 if (config.tty) printf("(integer) ");
223 return cliReadSingleLineReply(fd,0);
224 case '$':
225 return cliReadBulkReply(fd);
226 case '*':
227 return cliReadMultiBulkReply(fd);
228 default:
229 printf("protocol error, got '%c' as reply type byte", type);
230 return 1;
231 }
232 }
233
234 static int selectDb(int fd) {
235 int retval;
236 sds cmd;
237 char type;
238
239 if (config.dbnum == 0)
240 return 0;
241
242 cmd = sdsempty();
243 cmd = sdscatprintf(cmd,"SELECT %d\r\n",config.dbnum);
244 anetWrite(fd,cmd,sdslen(cmd));
245 anetRead(fd,&type,1);
246 if (type <= 0 || type != '+') return 1;
247 retval = cliReadSingleLineReply(fd,1);
248 if (retval) {
249 return retval;
250 }
251 return 0;
252 }
253
254 static void showInteractiveHelp(void) {
255 printf(
256 "\n"
257 "Welcome to redis-cli " REDIS_VERSION "!\n"
258 "Just type any valid Redis command to see a pretty printed output.\n"
259 "\n"
260 "It is possible to quote strings, like in:\n"
261 " set \"my key\" \"some string \\xff\\n\"\n"
262 "\n"
263 "You can find a list of valid Redis commands at\n"
264 " http://code.google.com/p/redis/wiki/CommandReference\n"
265 "\n"
266 "Note: redis-cli supports line editing, use up/down arrows for history."
267 "\n\n");
268 }
269
270 static int cliSendCommand(int argc, char **argv, int repeat) {
271 char *command = argv[0];
272 int fd, j, retval = 0;
273 sds cmd;
274
275 config.raw_output = !strcasecmp(command,"info");
276 if (!strcasecmp(command,"help")) {
277 showInteractiveHelp();
278 return 0;
279 }
280 if (!strcasecmp(command,"shutdown")) config.shutdown = 1;
281 if (!strcasecmp(command,"monitor")) config.monitor_mode = 1;
282 if (!strcasecmp(command,"subscribe") ||
283 !strcasecmp(command,"psubscribe")) config.pubsub_mode = 1;
284 if ((fd = cliConnect(0)) == -1) return 1;
285
286 /* Select db number */
287 retval = selectDb(fd);
288 if (retval) {
289 fprintf(stderr,"Error setting DB num\n");
290 return 1;
291 }
292
293 /* Build the command to send */
294 cmd = sdscatprintf(sdsempty(),"*%d\r\n",argc);
295 for (j = 0; j < argc; j++) {
296 cmd = sdscatprintf(cmd,"$%lu\r\n",
297 (unsigned long)sdslen(argv[j]));
298 cmd = sdscatlen(cmd,argv[j],sdslen(argv[j]));
299 cmd = sdscatlen(cmd,"\r\n",2);
300 }
301
302 while(repeat--) {
303 anetWrite(fd,cmd,sdslen(cmd));
304 while (config.monitor_mode) {
305 if (cliReadSingleLineReply(fd,0)) exit(1);
306 printf("\n");
307 }
308
309 if (config.pubsub_mode) {
310 printf("Reading messages... (press Ctrl-c to quit)\n");
311 while (1) {
312 cliReadReply(fd);
313 printf("\n\n");
314 }
315 }
316
317 retval = cliReadReply(fd);
318 if (!config.raw_output && config.tty) printf("\n");
319 if (retval) return retval;
320 }
321 return 0;
322 }
323
324 static int parseOptions(int argc, char **argv) {
325 int i;
326
327 for (i = 1; i < argc; i++) {
328 int lastarg = i==argc-1;
329
330 if (!strcmp(argv[i],"-h") && !lastarg) {
331 char *ip = zmalloc(32);
332 if (anetResolve(NULL,argv[i+1],ip) == ANET_ERR) {
333 printf("Can't resolve %s\n", argv[i]);
334 exit(1);
335 }
336 config.hostip = ip;
337 i++;
338 } else if (!strcmp(argv[i],"-h") && lastarg) {
339 usage();
340 } else if (!strcmp(argv[i],"-p") && !lastarg) {
341 config.hostport = atoi(argv[i+1]);
342 i++;
343 } else if (!strcmp(argv[i],"-r") && !lastarg) {
344 config.repeat = strtoll(argv[i+1],NULL,10);
345 i++;
346 } else if (!strcmp(argv[i],"-n") && !lastarg) {
347 config.dbnum = atoi(argv[i+1]);
348 i++;
349 } else if (!strcmp(argv[i],"-a") && !lastarg) {
350 config.auth = argv[i+1];
351 i++;
352 } else if (!strcmp(argv[i],"-i")) {
353 fprintf(stderr,
354 "Starting interactive mode using -i is deprecated. Interactive mode is started\n"
355 "by default when redis-cli is executed without a command to execute.\n"
356 );
357 } else if (!strcmp(argv[i],"-c")) {
358 fprintf(stderr,
359 "Reading last argument from standard input using -c is deprecated.\n"
360 "When standard input is connected to a pipe or regular file, it is\n"
361 "automatically used as last argument.\n"
362 );
363 } else if (!strcmp(argv[i],"-v")) {
364 printf("redis-cli shipped with Redis verison %s\n", REDIS_VERSION);
365 exit(0);
366 } else {
367 break;
368 }
369 }
370 return i;
371 }
372
373 static sds readArgFromStdin(void) {
374 char buf[1024];
375 sds arg = sdsempty();
376
377 while(1) {
378 int nread = read(fileno(stdin),buf,1024);
379
380 if (nread == 0) break;
381 else if (nread == -1) {
382 perror("Reading from standard input");
383 exit(1);
384 }
385 arg = sdscatlen(arg,buf,nread);
386 }
387 return arg;
388 }
389
390 static void usage() {
391 fprintf(stderr, "usage: redis-cli [-iv] [-h host] [-p port] [-a authpw] [-r repeat_times] [-n db_num] cmd arg1 arg2 arg3 ... argN\n");
392 fprintf(stderr, "usage: echo \"argN\" | redis-cli [-h host] [-p port] [-a authpw] [-r repeat_times] [-n db_num] cmd arg1 arg2 ... arg(N-1)\n");
393 fprintf(stderr, "\nIf a pipe from standard input is detected this data is used as last argument.\n\n");
394 fprintf(stderr, "example: cat /etc/passwd | redis-cli set my_passwd\n");
395 fprintf(stderr, "example: redis-cli get my_passwd\n");
396 fprintf(stderr, "example: redis-cli -r 100 lpush mylist x\n");
397 fprintf(stderr, "\nRun in interactive mode: redis-cli -i or just don't pass any command\n");
398 exit(1);
399 }
400
401 /* Turn the plain C strings into Sds strings */
402 static char **convertToSds(int count, char** args) {
403 int j;
404 char **sds = zmalloc(sizeof(char*)*count);
405
406 for(j = 0; j < count; j++)
407 sds[j] = sdsnew(args[j]);
408
409 return sds;
410 }
411
412 #define LINE_BUFLEN 4096
413 static void repl() {
414 int argc, j;
415 char *line;
416 sds *argv;
417
418 config.interactive = 1;
419 while((line = linenoise("redis> ")) != NULL) {
420 if (line[0] != '\0') {
421 argv = sdssplitargs(line,&argc);
422 linenoiseHistoryAdd(line);
423 if (config.historyfile) linenoiseHistorySave(config.historyfile);
424 if (argv == NULL) {
425 printf("Invalid argument(s)\n");
426 continue;
427 } else if (argc > 0) {
428 if (strcasecmp(argv[0],"quit") == 0 ||
429 strcasecmp(argv[0],"exit") == 0)
430 {
431 exit(0);
432 } else {
433 int err;
434
435 if ((err = cliSendCommand(argc, argv, 1)) != 0) {
436 if (err == ECONNRESET) {
437 printf("Reconnecting... ");
438 fflush(stdout);
439 if (cliConnect(1) == -1) exit(1);
440 printf("OK\n");
441 cliSendCommand(argc,argv,1);
442 }
443 }
444 }
445 }
446 /* Free the argument vector */
447 for (j = 0; j < argc; j++)
448 sdsfree(argv[j]);
449 zfree(argv);
450 }
451 /* linenoise() returns malloc-ed lines like readline() */
452 free(line);
453 }
454 exit(0);
455 }
456
457 static int noninteractive(int argc, char **argv) {
458 int retval = 0;
459 struct stat s;
460 fstat(fileno(stdin), &s);
461 if (S_ISFIFO(s.st_mode) || S_ISREG(s.st_mode)) { /* pipe, regular file */
462 argv = zrealloc(argv, (argc+1)*sizeof(char*));
463 argv[argc] = readArgFromStdin();
464 retval = cliSendCommand(argc+1, argv, config.repeat);
465 } else {
466 /* stdin is probably a tty, can be tested with S_ISCHR(s.st_mode) */
467 retval = cliSendCommand(argc, argv, config.repeat);
468 }
469 return retval;
470 }
471
472 int main(int argc, char **argv) {
473 int firstarg;
474
475 config.hostip = "127.0.0.1";
476 config.hostport = 6379;
477 config.repeat = 1;
478 config.dbnum = 0;
479 config.interactive = 0;
480 config.shutdown = 0;
481 config.monitor_mode = 0;
482 config.pubsub_mode = 0;
483 config.raw_output = 0;
484 config.auth = NULL;
485 config.historyfile = NULL;
486 config.tty = isatty(fileno(stdout)) || (getenv("FAKETTY") != NULL);
487 config.mb_sep = '\n';
488
489 if (getenv("HOME") != NULL) {
490 config.historyfile = malloc(256);
491 snprintf(config.historyfile,256,"%s/.rediscli_history",getenv("HOME"));
492 linenoiseHistoryLoad(config.historyfile);
493 }
494
495 firstarg = parseOptions(argc,argv);
496 argc -= firstarg;
497 argv += firstarg;
498
499 if (config.auth != NULL) {
500 char *authargv[2];
501 int dbnum = config.dbnum;
502
503 /* We need to save the real configured database number and set it to
504 * zero here, otherwise cliSendCommand() will try to perform the
505 * SELECT command before the authentication, and it will fail. */
506 config.dbnum = 0;
507 authargv[0] = "AUTH";
508 authargv[1] = config.auth;
509 cliSendCommand(2, convertToSds(2, authargv), 1);
510 config.dbnum = dbnum; /* restore the right DB number */
511 }
512
513 /* Start interactive mode when no command is provided */
514 if (argc == 0) repl();
515 /* Otherwise, we have some arguments to execute */
516 return noninteractive(argc,convertToSds(argc,argv));
517 }