Removed dumb bug concerning set (was still using a buffer).
[m6w6/libmemcached] / src / memcp.c
index b259c698fadfdea434499cd5f5519f27f9286dde..bba346b973f047856fb1eff95df45e0f8ff177c9 100644 (file)
 #include <sys/types.h>\r
 #include <sys/stat.h>\r
 #include <sys/types.h>\r
-#include <sys/mman.h>\r
 #include <fcntl.h>\r
+#include <errno.h>\r
 \r
 #include <memcached.h>\r
 #include "client_options.h"\r
 \r
-static int opt_verbose;\r
-static char *opt_servers;\r
-static int opt_replace;\r
+/* Prototypes */\r
+void options_parse(int argc, char *argv[]);\r
 \r
-struct memcached_st *parse_opt_servers (struct memcached_st *m,\r
-                                       char *opt_servers)\r
-{\r
-  char *s, *hostname;\r
-  unsigned int portnum;\r
-  while (s = strsep(&opt_servers, ",")) {\r
-    hostname = strsep(&s, ":");\r
-    portnum = atoi(s);\r
-    memcached_server_add(m, hostname, portnum);\r
-  }\r
-  return m;\r
-}\r
+static int opt_verbose= 0;\r
+static char *opt_servers= NULL;\r
+static int opt_method= 0;\r
+uint16_t opt_flags= 0;\r
+time_t opt_expires= 0;\r
 \r
 int main(int argc, char *argv[])\r
 {\r
   memcached_st *memc;\r
   char *string;\r
-  unsigned int x;\r
   size_t string_length;\r
-  uint16_t flags = 0;\r
-  time_t expires = 0;\r
   memcached_return rc;\r
+  options_parse(argc, argv);\r
+\r
+  memc= memcached_init(NULL);\r
+  if (opt_servers)\r
+    parse_opt_servers(memc, opt_servers);\r
+  else\r
+    parse_opt_servers(memc, argv[--argc]);\r
+\r
+  while (optind < argc) \r
+  {\r
+    struct stat sbuf;\r
+    int fd;\r
+    char *ptr;\r
+    ssize_t read_length;\r
+    char *file_buffer_ptr;\r
+\r
+    fd= open(argv[optind], O_RDONLY);\r
+    if (fd < 0) \r
+    {\r
+      fprintf(stderr, "memcp: %s: %s\n", argv[optind], strerror(errno));\r
+      optind++;\r
+      continue;\r
+    }\r
+\r
+    (void)fstat(fd, &sbuf);\r
+\r
+    ptr= rindex(argv[optind], '/');\r
+    if (ptr)\r
+      ptr++;\r
+    else\r
+      ptr= argv[optind];\r
+\r
+    if (opt_verbose) \r
+    {\r
+      static char *opstr[] = { "set", "add", "replace" };\r
+      printf("op: %s\nsource file: %s\nlength: %zu\n"\r
+            "key: %s\nflags: %u\n expires: %llu\n",\r
+            opstr[opt_method], argv[optind], sbuf.st_size,\r
+            ptr, opt_flags, opt_expires);\r
+    }\r
+\r
+    if ((file_buffer_ptr= (char *)malloc(sizeof(char) * sbuf.st_size)) == NULL)\r
+    {\r
+      fprintf(stderr, "malloc: %s\n", strerror(errno)); \r
+      exit(1);\r
+    }\r
+\r
+    if ((read_length= read(fd, file_buffer_ptr, sbuf.st_size)) == -1)\r
+    {\r
+      fprintf(stderr, "read: %s\n", strerror(errno)); \r
+      exit(1);\r
+    }\r
+    assert(read_length == sbuf.st_size);\r
+\r
+    if (opt_method == OPT_ADD)\r
+      rc= memcached_add(memc, ptr, strlen(ptr),\r
+                        file_buffer_ptr, sbuf.st_size,\r
+                       opt_expires, opt_flags);\r
+    else if (opt_method == OPT_REPLACE)\r
+      rc= memcached_replace(memc, ptr, strlen(ptr),\r
+                           file_buffer_ptr, sbuf.st_size,\r
+                           opt_expires, opt_flags);\r
+    else\r
+      rc= memcached_set(memc, ptr, strlen(ptr),\r
+                        file_buffer_ptr, sbuf.st_size,\r
+                        opt_expires, opt_flags);\r
+\r
+    if (rc != MEMCACHED_SUCCESS)\r
+      fprintf(stderr, "memcp: %s: memcache error %s\n", \r
+             ptr, memcached_strerror(memc, rc));\r
+\r
+    WATCHPOINT;\r
+    free(file_buffer_ptr);\r
+    close(fd);\r
+    optind++;\r
+  }\r
+\r
+  memcached_deinit(memc);\r
+\r
+  cleanup();\r
+\r
+  return 0;\r
+};\r
+\r
+void options_parse(int argc, char *argv[])\r
+{\r
+  int option_index= 0;\r
+  int option_rv;\r
 \r
   static struct option long_options[] =\r
     {\r
       {"version", no_argument, NULL, OPT_VERSION},\r
       {"help", no_argument, NULL, OPT_HELP},\r
-      {"verbose", no_argument, &opt_verbose, 1},\r
-      {"debug", no_argument, &opt_verbose, 2},\r
+      {"verbose", no_argument, &opt_verbose, OPT_VERBOSE},\r
+      {"debug", no_argument, &opt_verbose, OPT_DEBUG},\r
       {"servers", required_argument, NULL, OPT_SERVERS},\r
       {"flag", required_argument, NULL, OPT_FLAG},\r
       {"expire", required_argument, NULL, OPT_EXPIRE},\r
-      {"set",  no_argument, &opt_replace, 0},\r
-      {"add",  no_argument, &opt_replace, 1},\r
-      {"replace",  no_argument, &opt_replace, 2},\r
+      {"set",  no_argument, NULL, OPT_SET},\r
+      {"add",  no_argument, NULL, OPT_ADD},\r
+      {"replace",  no_argument, NULL, OPT_REPLACE},\r
       {0, 0, 0, 0},\r
     };\r
-  int option_index = 0;\r
-  int option_rv;\r
+\r
   while (1) \r
   {\r
-    option_rv = getopt_long(argc, argv, "", long_options, &option_index);\r
+    option_rv= getopt_long(argc, argv, "Vhvds:", long_options, &option_index);\r
+\r
     if (option_rv == -1) break;\r
+\r
     switch (option_rv) {\r
     case 0:\r
-      if (long_options[option_index].name)\r
       break;\r
-    case OPT_VERSION: /* --version */\r
+    case OPT_VERSION: /* --version or -V */\r
       printf("memcache tools, memcp, v1.0\n");\r
       exit(0);\r
-      break;\r
-    case OPT_HELP: /* --help */\r
+    case OPT_HELP: /* --help or -h */\r
       printf("useful help messages go here\n");\r
       exit(0);\r
-      break;\r
-    case OPT_SERVERS: /* --servers */\r
-      opt_servers = strdup(optarg);\r
+    case OPT_SERVERS: /* --servers or -s */\r
+      opt_servers= strdup_cleanup(optarg);\r
       break;\r
     case OPT_FLAG: /* --flag */\r
-      flags = (uint16_t) atoi(optarg);\r
+      opt_flags= (uint16_t)strtol(optarg, (char **)NULL, 10);\r
       break;\r
     case OPT_EXPIRE: /* --expire */\r
-      expires = (time_t)atoi(optarg);\r
+      opt_expires= (time_t)strtol(optarg, (char **)NULL, 10);\r
+      break;\r
+    case OPT_SET:\r
+      opt_method= OPT_SET;\r
+      break;\r
+    case OPT_REPLACE:\r
+      opt_method= OPT_REPLACE;\r
+      break;\r
+    case OPT_ADD:\r
+      opt_method= OPT_ADD;\r
       break;\r
     case '?':\r
       /* getopt_long already printed an error message. */\r
@@ -85,47 +169,4 @@ int main(int argc, char *argv[])
       abort();\r
     }\r
   }\r
-\r
-  memc= memcached_init(NULL);\r
-  memc= parse_opt_servers(memc, opt_servers);\r
-\r
-  while (optind <= argc) {\r
-    char *mptr;\r
-    struct stat sbuf;\r
-    int fd;\r
-    char *ptr;\r
-\r
-    fd= open(argv[optind], O_RDONLY);\r
-\r
-    if (fd == -1)\r
-    {\r
-      fprintf(stderr, "Failed opening %s\n", argv[optind]);\r
-      continue;\r
-    }\r
-\r
-    (void)fstat(fd, &sbuf);\r
-    mptr= mmap(NULL, sbuf.st_size, PROT_READ, MAP_PRIVATE, fd, 0);\r
-\r
-    ptr= rindex(argv[optind], '/');\r
-    if (ptr)\r
-    {\r
-      ptr++;\r
-    }\r
-    else\r
-    {\r
-      ptr= argv[optind];\r
-    }\r
-    \r
-    rc= memcached_set(memc, ptr, strlen(ptr),\r
-                      mptr, sbuf.st_size,\r
-                      expires, flags);\r
-\r
-    munmap(mptr, sbuf.st_size);\r
-    close(fd);\r
-    optind++;\r
-  }\r
-\r
-  memcached_deinit(memc);\r
-\r
-  return 0;\r
-};\r
+}\r