6 #include "client_options.h"
9 static int opt_verbose
= 0;
10 static time_t opt_expire
= 0;
11 static char *opt_servers
= NULL
;
13 #define PROGRAM_NAME "memrm"
14 #define PROGRAM_DESCRIPTION "Erase a key or set of keys from a memcached cluster."
17 void options_parse(int argc
, char *argv
[]);
19 int main(int argc
, char *argv
[])
23 memcached_server_st
*servers
;
25 options_parse(argc
, argv
);
31 if ((temp
= getenv("MEMCACHED_SERVERS")))
32 opt_servers
= strdup(temp
);
37 memc
= memcached_create(NULL
);
39 servers
= memcached_servers_parse(opt_servers
);
40 memcached_server_push(memc
, servers
);
41 memcached_server_list_free(servers
);
46 printf("key: %s\nexpires: %llu\n", argv
[optind
], (unsigned long long)opt_expire
);
47 rc
= memcached_delete(memc
, argv
[optind
], strlen(argv
[optind
]), opt_expire
);
49 if (rc
!= MEMCACHED_SUCCESS
)
51 fprintf(stderr
, "memrm: %s: memcache error %s",
52 argv
[optind
], memcached_strerror(memc
, rc
));
53 if (memc
->cached_errno
)
54 fprintf(stderr
, " system error %s", strerror(memc
->cached_errno
));
55 fprintf(stderr
, "\n");
69 void options_parse(int argc
, char *argv
[])
71 memcached_programs_help_st help_options
[]=
76 static struct option long_options
[]=
78 {"version", no_argument
, NULL
, OPT_VERSION
},
79 {"help", no_argument
, NULL
, OPT_HELP
},
80 {"verbose", no_argument
, &opt_verbose
, OPT_VERBOSE
},
81 {"debug", no_argument
, &opt_verbose
, OPT_DEBUG
},
82 {"servers", required_argument
, NULL
, OPT_SERVERS
},
83 {"expire", required_argument
, NULL
, OPT_EXPIRE
},
91 option_rv
= getopt_long(argc
, argv
, "Vhvds:", long_options
, &option_index
);
92 if (option_rv
== -1) break;
97 case OPT_VERBOSE
: /* --verbose or -v */
98 opt_verbose
= OPT_VERBOSE
;
100 case OPT_DEBUG
: /* --debug or -d */
101 opt_verbose
= OPT_DEBUG
;
103 case OPT_VERSION
: /* --version or -V */
104 version_command(PROGRAM_NAME
);
106 case OPT_HELP
: /* --help or -h */
107 help_command(PROGRAM_NAME
, PROGRAM_DESCRIPTION
, long_options
, help_options
);
109 case OPT_SERVERS
: /* --servers or -s */
110 opt_servers
= strdup(optarg
);
112 case OPT_EXPIRE
: /* --expire */
113 opt_expire
= (time_t)strtoll(optarg
, (char **)NULL
, 10);
116 /* getopt_long already printed an error message. */