JSVAL _memcached_keys (JSARGS args) {
M *handle = HANDLE(args[0]);
CTX ctx;
ctx.ndx = 0;
ctx.keys = Array::New();
memcached_dump_fn callbacks[1];
callbacks[0] = &dump_fn;
memcached_dump(handle, callbacks, &ctx, 1);
return ctx.keys;
}
if(guLogLevel>2)
{
logfileLine("DelOldKeys not found",cKey);
}
if(!guSilent) printf("DelOldKeys() %s not found\n",cKey);
}
else
{
if(guLogLevel>2)
{
logfileLine("DelOldKeys",cKey);
}
if(!guSilent) printf("DelOldKeys() %s\n",cKey);
}
}
}
}
memcached_dump_func callbacks[1];
callbacks[0]= (memcached_dump_func) &vKeyPrinter;
rc=memcached_dump(gsMemc,callbacks,NULL,1);
if(rc!=MEMCACHED_SUCCESS)
{
if(!guSilent) printf("DelOldKeys() error\n");
}
if(!guSilent) printf("DelOldKeys() end\n");
}//void DelOldKeys()
int main(int argc, char *argv[])
{
memcached_st *memc;
memcached_return_t rc;
memcached_server_st *servers;
memcached_dump_fn callbacks[1];
callbacks[0]= &key_printer;
options_parse(argc, argv);
memc= memcached_create(NULL);
process_hash_option(memc, opt_hash);
if (!opt_servers)
{
char *temp;
if ((temp= getenv("MEMCACHED_SERVERS")))
opt_servers= strdup(temp);
else
{
fprintf(stderr, "No Servers provided\n");
exit(1);
}
}
if (opt_servers)
servers= memcached_servers_parse(opt_servers);
else
servers= memcached_servers_parse(argv[--argc]);
memcached_server_push(memc, servers);
memcached_server_list_free(servers);
memcached_behavior_set(memc, MEMCACHED_BEHAVIOR_BINARY_PROTOCOL,
(uint64_t)opt_binary);
if (!initialize_sasl(memc, opt_username, opt_passwd))
{
memcached_free(memc);
return EXIT_FAILURE;
}
rc= memcached_dump(memc, callbacks, NULL, 1);
if (rc != MEMCACHED_SUCCESS)
{
fprintf(stderr, "memdump: memcache error %s", memcached_strerror(memc, rc));
if (memcached_last_error_errno(memc))
fprintf(stderr, " system error %s", strerror(memcached_last_error_errno(memc)));
fprintf(stderr, "\n");
}
memcached_free(memc);
if (opt_servers)
free(opt_servers);
if (opt_hash)
free(opt_hash);
shutdown_sasl();
return EXIT_SUCCESS;
}
