1 #include "libmemcached/common.h"
5 #include <libmemcached/memcached.h>
7 #include "client_options.h"
10 static int opt_binary
= 0;
11 static int opt_verbose
= 0;
12 static time_t opt_expire
= 0;
13 static char *opt_servers
= NULL
;
14 static char *opt_hash
= NULL
;
16 #define PROGRAM_NAME "memrm"
17 #define PROGRAM_DESCRIPTION "Erase a key or set of keys from a memcached cluster."
20 void options_parse(int argc
, char *argv
[]);
22 int main(int argc
, char *argv
[])
26 memcached_server_st
*servers
;
28 options_parse(argc
, argv
);
34 if ((temp
= getenv("MEMCACHED_SERVERS")))
35 opt_servers
= strdup(temp
);
38 fprintf(stderr
, "No Servers provided\n");
43 memc
= memcached_create(NULL
);
44 process_hash_option(memc
, opt_hash
);
46 servers
= memcached_servers_parse(opt_servers
);
47 memcached_server_push(memc
, servers
);
48 memcached_server_list_free(servers
);
49 memcached_behavior_set(memc
, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL
, opt_binary
);
54 printf("key: %s\nexpires: %llu\n", argv
[optind
], (unsigned long long)opt_expire
);
55 rc
= memcached_delete(memc
, argv
[optind
], strlen(argv
[optind
]), opt_expire
);
57 if (rc
!= MEMCACHED_SUCCESS
)
59 fprintf(stderr
, "memrm: %s: memcache error %s",
60 argv
[optind
], memcached_strerror(memc
, rc
));
61 if (memc
->cached_errno
)
62 fprintf(stderr
, " system error %s", strerror(memc
->cached_errno
));
63 fprintf(stderr
, "\n");
80 void options_parse(int argc
, char *argv
[])
82 memcached_programs_help_st help_options
[]=
87 static struct option long_options
[]=
89 {"version", no_argument
, NULL
, OPT_VERSION
},
90 {"help", no_argument
, NULL
, OPT_HELP
},
91 {"verbose", no_argument
, &opt_verbose
, OPT_VERBOSE
},
92 {"debug", no_argument
, &opt_verbose
, OPT_DEBUG
},
93 {"servers", required_argument
, NULL
, OPT_SERVERS
},
94 {"expire", required_argument
, NULL
, OPT_EXPIRE
},
95 {"hash", required_argument
, NULL
, OPT_HASH
},
96 {"binary", no_argument
, NULL
, OPT_BINARY
},
104 option_rv
= getopt_long(argc
, argv
, "Vhvds:", long_options
, &option_index
);
105 if (option_rv
== -1) break;
113 case OPT_VERBOSE
: /* --verbose or -v */
114 opt_verbose
= OPT_VERBOSE
;
116 case OPT_DEBUG
: /* --debug or -d */
117 opt_verbose
= OPT_DEBUG
;
119 case OPT_VERSION
: /* --version or -V */
120 version_command(PROGRAM_NAME
);
122 case OPT_HELP
: /* --help or -h */
123 help_command(PROGRAM_NAME
, PROGRAM_DESCRIPTION
, long_options
, help_options
);
125 case OPT_SERVERS
: /* --servers or -s */
126 opt_servers
= strdup(optarg
);
128 case OPT_EXPIRE
: /* --expire */
129 opt_expire
= (time_t)strtoll(optarg
, (char **)NULL
, 10);
132 opt_hash
= strdup(optarg
);
135 /* getopt_long already printed an error message. */