Fix all warnings found via clang.
[awesomized/libmemcached] / libmemcached / error.cc
index ef207a955f25d610efdc346e7e5a204c95efe32c..d15f9843d295cbec9afe9e951f9309cd1a142f60 100644 (file)
@@ -35,7 +35,8 @@
  *
  */
 
-#include "libmemcached/common.h"
+#include <libmemcached/common.h>
+#include <cstdarg>
 
 #define MAX_ERROR_LENGTH 2048
 struct memcached_error_t
@@ -49,81 +50,405 @@ struct memcached_error_t
   char message[MAX_ERROR_LENGTH];
 };
 
-static void _set(memcached_st *memc, memcached_string_t *str, const memcached_return_t rc, const int local_errno)
+static void _set(org::libmemcached::Instance& server, memcached_st& memc)
 {
-  WATCHPOINT_ASSERT(memc);
-  if (! memc)
+  if (server.error_messages and server.error_messages->query_id != server.root->query_id)
+  {
+    memcached_error_free(server);
+  }
+
+  if (memc.error_messages == NULL)
+  {
     return;
+  }
 
-  if (memc->error_messages && memc->error_messages->query_id != memc->query_id)
+  memcached_error_t *error= libmemcached_xmalloc(&memc, memcached_error_t);
+  if (error == NULL) // Bad business if this happens
+  {
+    return;
+  }
+
+  memcpy(error, memc.error_messages, sizeof(memcached_error_t));
+  error->next= server.error_messages;
+  server.error_messages= error;
+}
+
+#if 0
+static int error_log_fd= -1;
+#endif
+
+static void _set(memcached_st& memc, memcached_string_t *str, memcached_return_t &rc, const char *at, int local_errno= 0)
+{
+  if (memc.error_messages && memc.error_messages->query_id != memc.query_id)
   {
     memcached_error_free(memc);
   }
 
-  memcached_error_t *error;
-  error= (struct memcached_error_t *)libmemcached_malloc(memc, sizeof(struct memcached_error_t));
+  // For memory allocation we use our error since it is a bit more specific
+  if (local_errno == ENOMEM and rc == MEMCACHED_ERRNO)
+  {
+    rc= MEMCACHED_MEMORY_ALLOCATION_FAILURE;
+  }
+
+  if (rc == MEMCACHED_MEMORY_ALLOCATION_FAILURE)
+  {
+    local_errno= ENOMEM;
+  }
+
+  if (rc == MEMCACHED_ERRNO and not local_errno)
+  {
+    local_errno= errno;
+    rc= MEMCACHED_ERRNO;
+  }
+
+  if (rc == MEMCACHED_ERRNO and local_errno == ENOTCONN)
+  {
+    rc= MEMCACHED_CONNECTION_FAILURE;
+  }
+
+  if (rc == MEMCACHED_ERRNO and local_errno == ECONNRESET)
+  {
+    rc= MEMCACHED_CONNECTION_FAILURE;
+  }
+
+  if (local_errno == EINVAL)
+  {
+    rc= MEMCACHED_INVALID_ARGUMENTS;
+  }
+
+  if (local_errno == ECONNREFUSED)
+  {
+    rc= MEMCACHED_CONNECTION_FAILURE;
+  }
 
-  if (! error)
+  memcached_error_t *error= libmemcached_xmalloc(&memc, memcached_error_t);
+  if (error == NULL) // Bad business if this happens
+  {
     return;
+  }
 
-  error->root= memc;
-  error->query_id= memc->query_id;
+  error->root= &memc;
+  error->query_id= memc.query_id;
   error->rc= rc;
   error->local_errno= local_errno;
 
-  if (str)
+  const char *errmsg_ptr;
+  char errmsg[MAX_ERROR_LENGTH];
+  errmsg[0]= 0;
+  errmsg_ptr= errmsg;
+
+  if (local_errno)
+  {
+#ifdef STRERROR_R_CHAR_P
+    errmsg_ptr= strerror_r(local_errno, errmsg, sizeof(errmsg));
+#else
+    strerror_r(local_errno, errmsg, sizeof(errmsg));
+    errmsg_ptr= errmsg;
+#endif
+  }
+
+
+  if (str and str->size and local_errno)
+  {
+    error->size= (int)snprintf(error->message, MAX_ERROR_LENGTH, "(%lu) %s(%s), %.*s -> %s", 
+                               long(error->root),
+                               memcached_strerror(&memc, rc), 
+                               errmsg_ptr,
+                               memcached_string_printf(*str), at);
+  }
+  else if (local_errno)
+  {
+    error->size= (int)snprintf(error->message, MAX_ERROR_LENGTH, "(%lu) %s(%s) -> %s", 
+                               long(error->root),
+                               memcached_strerror(&memc, rc), 
+                               errmsg_ptr,
+                               at);
+  }
+  else if (rc == MEMCACHED_PARSE_ERROR and str and str->size)
   {
-    size_t length= str->size > (size_t)MAX_ERROR_LENGTH ? MAX_ERROR_LENGTH : str->size;
-    error->size= length;
-    memcpy(error->message, str->c_str, error->size);
-    error->message[error->size]= 0;
+    error->size= (int)snprintf(error->message, MAX_ERROR_LENGTH, "(%lu) %.*s -> %s", 
+                               long(error->root),
+                               int(str->size), str->c_str, at);
+  }
+  else if (str and str->size)
+  {
+    error->size= (int)snprintf(error->message, MAX_ERROR_LENGTH, "(%lu) %s, %.*s -> %s", 
+                               long(error->root),
+                               memcached_strerror(&memc, rc), 
+                               int(str->size), str->c_str, at);
   }
   else
   {
-    error->size= 0;
+    error->size= (int)snprintf(error->message, MAX_ERROR_LENGTH, "(%lu) %s -> %s", 
+                               long(error->root),
+                               memcached_strerror(&memc, rc), at);
+  }
+
+  error->next= memc.error_messages;
+  memc.error_messages= error;
+
+#if 0
+  if (error_log_fd == -1)
+  {
+//    unlink("/tmp/libmemcachd.log");
+    if ((error_log_fd= open("/tmp/libmemcachd.log", O_CREAT | O_WRONLY | O_APPEND, 0644)) < 0)
+    {
+      perror("open");
+      error_log_fd= -1;
+    }
+  }
+  ::write(error_log_fd, error->message, error->size);
+  ::write(error_log_fd, "\n", 1);
+#endif
+}
+
+memcached_return_t memcached_set_error(memcached_st& memc, memcached_return_t rc, const char *at, const char *str, size_t length)
+{
+  assert_msg(rc != MEMCACHED_ERRNO, "Programmer error, MEMCACHED_ERRNO was set to be returned to client");
+  memcached_string_t tmp= { str, length };
+  return memcached_set_error(memc, rc, at, tmp);
+}
+
+memcached_return_t memcached_set_error(org::libmemcached::Instance& self, memcached_return_t rc, const char *at, const char *str, size_t length)
+{
+  assert_msg(rc != MEMCACHED_ERRNO, "Programmer error, MEMCACHED_ERRNO was set to be returned to client");
+  assert_msg(rc != MEMCACHED_SOME_ERRORS, "Programmer error, MEMCACHED_SOME_ERRORS was about to be set on a Instance");
+
+  memcached_string_t tmp= { str, length };
+  return memcached_set_error(self, rc, at, tmp);
+}
+
+#ifndef __INTEL_COMPILER
+#pragma GCC diagnostic ignored "-Wformat-nonliteral"
+#endif
+
+memcached_return_t memcached_set_error(memcached_st& memc, memcached_return_t rc, const char *at, memcached_string_t& str)
+{
+  assert_msg(rc != MEMCACHED_ERRNO, "Programmer error, MEMCACHED_ERRNO was set to be returned to client");
+  if (memcached_fatal(rc) == false)
+  {
+    return rc;
+  }
+
+  _set(memc, &str, rc, at);
+
+  return rc;
+}
+
+memcached_return_t memcached_set_parser_error(memcached_st& memc,
+                                              const char *at,
+                                              const char *format, ...)
+{
+  va_list args;
+
+  char buffer[BUFSIZ];
+  va_start(args, format);
+  int length= vsnprintf(buffer, sizeof(buffer), format, args);
+  va_end(args);
+
+  return memcached_set_error(memc, MEMCACHED_PARSE_ERROR, at, buffer, length);
+}
+
+static inline size_t append_host_to_string(org::libmemcached::Instance& self, char* buffer, const size_t buffer_length)
+{
+  size_t size= 0;
+  switch (self.type)
+  {
+  case MEMCACHED_CONNECTION_TCP:
+  case MEMCACHED_CONNECTION_UDP:
+    size+= snprintf(buffer, buffer_length, " host: %s:%d",
+                    self.hostname, int(self.port()));
+    break;
+
+  case MEMCACHED_CONNECTION_UNIX_SOCKET:
+    size+= snprintf(buffer, buffer_length, " socket: %s",
+                    self.hostname);
+    break;
+  }
+
+  return size;
+}
+
+memcached_return_t memcached_set_error(org::libmemcached::Instance& self, memcached_return_t rc, const char *at, memcached_string_t& str)
+{
+  assert_msg(rc != MEMCACHED_ERRNO, "Programmer error, MEMCACHED_ERRNO was set to be returned to client");
+  assert_msg(rc != MEMCACHED_SOME_ERRORS, "Programmer error, MEMCACHED_SOME_ERRORS was about to be set on a org::libmemcached::Instance");
+  if (memcached_fatal(rc) == false)
+  {
+    return rc;
+  }
+
+  char hostname_port_message[MAX_ERROR_LENGTH];
+  char* hostname_port_message_ptr= hostname_port_message;
+  int size= 0;
+  if (str.size)
+  {
+    size= snprintf(hostname_port_message_ptr, sizeof(hostname_port_message), "%.*s, ",
+                   memcached_string_printf(str));
+    hostname_port_message_ptr+= size;
+  }
+
+  size+= append_host_to_string(self, hostname_port_message_ptr, sizeof(hostname_port_message) -size);
+
+  memcached_string_t error_host= { hostname_port_message, size_t(size) };
+
+  assert(self.root);
+  if (self.root == NULL)
+  {
+    return rc;
+  }
+
+  _set(*self.root, &error_host, rc, at);
+  _set(self, (*self.root));
+  assert(self.root->error_messages);
+  assert(self.error_messages);
+
+  return rc;
+}
+
+memcached_return_t memcached_set_error(org::libmemcached::Instance& self, memcached_return_t rc, const char *at)
+{
+  assert_msg(rc != MEMCACHED_SOME_ERRORS, "Programmer error, MEMCACHED_SOME_ERRORS was about to be set on a org::libmemcached::Instance");
+  if (memcached_fatal(rc) == false)
+  {
+    return rc;
+  }
+
+  char hostname_port[NI_MAXHOST +NI_MAXSERV + sizeof("host : ")];
+  size_t size= append_host_to_string(self, hostname_port, sizeof(hostname_port));
+
+  memcached_string_t error_host= { hostname_port, size};
+
+  if (self.root == NULL)
+  {
+    return rc;
+  }
+
+  _set(*self.root, &error_host, rc, at);
+  _set(self, *self.root);
+
+  return rc;
+}
+
+memcached_return_t memcached_set_error(memcached_st& self, memcached_return_t rc, const char *at)
+{
+  assert_msg(rc != MEMCACHED_ERRNO, "Programmer error, MEMCACHED_ERRNO was set to be returned to client");
+  if (memcached_fatal(rc) == false)
+  {
+    return rc;
+  }
+
+  _set(self, NULL, rc, at);
+
+  return rc;
+}
+
+memcached_return_t memcached_set_errno(memcached_st& self, int local_errno, const char *at, const char *str, size_t length)
+{
+  memcached_string_t tmp= { str, length };
+  return memcached_set_errno(self, local_errno, at, tmp);
+}
+
+memcached_return_t memcached_set_errno(org::libmemcached::Instance& self, int local_errno, const char *at, const char *str, size_t length)
+{
+  memcached_string_t tmp= { str, length };
+  return memcached_set_errno(self, local_errno, at, tmp);
+}
+
+memcached_return_t memcached_set_errno(memcached_st& self, int local_errno, const char *at)
+{
+  if (local_errno == 0)
+  {
+    return MEMCACHED_SUCCESS;
   }
 
-  error->next= memc->error_messages;
-  memc->error_messages= error;
+  memcached_return_t rc= MEMCACHED_ERRNO;
+  _set(self, NULL, rc, at, local_errno);
+
+  return rc;
 }
 
-memcached_return_t memcached_set_error_string(memcached_st *memc, memcached_return_t rc, const char *str, size_t length)
+memcached_return_t memcached_set_errno(memcached_st& memc, int local_errno, const char *at, memcached_string_t& str)
 {
-  memcached_string_t tmp;
-  tmp.c_str= str;
-  tmp.size= length;
-  return memcached_set_error(memc, rc, &tmp);
+  if (local_errno == 0)
+  {
+    return MEMCACHED_SUCCESS;
+  }
+
+  memcached_return_t rc= MEMCACHED_ERRNO;
+  _set(memc, &str, rc, at, local_errno);
+
+  return rc;
 }
 
-memcached_return_t memcached_set_error(memcached_st *memc, memcached_return_t rc, memcached_string_t *str)
+memcached_return_t memcached_set_errno(org::libmemcached::Instance& self, int local_errno, const char *at, memcached_string_t& str)
 {
-  if (rc == MEMCACHED_SUCCESS)
+  if (local_errno == 0)
+  {
     return MEMCACHED_SUCCESS;
+  }
+
+  char hostname_port_message[MAX_ERROR_LENGTH];
+  char* hostname_port_message_ptr= hostname_port_message;
+  size_t size= 0;
+  if (str.size)
+  {
+    size= snprintf(hostname_port_message_ptr, sizeof(hostname_port_message), "%.*s, ", memcached_string_printf(str));
+  }
+  size+= append_host_to_string(self, hostname_port_message_ptr, sizeof(hostname_port_message) -size);
+
+  memcached_string_t error_host= { hostname_port_message, size };
 
-  _set(memc, str, rc, 0);
+  memcached_return_t rc= MEMCACHED_ERRNO;
+  if (self.root == NULL)
+  {
+    return rc;
+  }
+
+  _set(*self.root, &error_host, rc, at, local_errno);
+  _set(self, (*self.root));
 
   return rc;
 }
 
-memcached_return_t memcached_set_errno(memcached_st *memc, int local_errno, memcached_string_t *str)
+memcached_return_t memcached_set_errno(org::libmemcached::Instance& self, int local_errno, const char *at)
 {
-  _set(memc, str, MEMCACHED_ERRNO, local_errno);
+  if (local_errno == 0)
+  {
+    return MEMCACHED_SUCCESS;
+  }
+
+  char hostname_port_message[MAX_ERROR_LENGTH];
+  size_t size= append_host_to_string(self, hostname_port_message, sizeof(hostname_port_message));
+
+  memcached_string_t error_host= { hostname_port_message, size };
+
+  memcached_return_t rc= MEMCACHED_ERRNO;
+  if (self.root == NULL)
+  {
+    return rc;
+  }
 
-  return MEMCACHED_ERRNO;
+  _set(*self.root, &error_host, rc, at, local_errno);
+  _set(self, (*self.root));
+
+  return rc;
 }
 
 static void _error_print(const memcached_error_t *error)
 {
-  if (! error)
+  if (error == NULL)
+  {
     return;
+  }
 
-  if (! error->size)
+  if (error->size == 0)
   {
-    fprintf(stderr, "%s\n", memcached_strerror(NULL, error->rc) );
+    fprintf(stderr, "\t%s\n", memcached_strerror(NULL, error->rc) );
   }
   else
   {
-    fprintf(stderr, "%s %s\n", memcached_strerror(NULL, error->rc), error->message);
+    fprintf(stderr, "\t%s %s\n", memcached_strerror(NULL, error->rc), error->message);
   }
 
   _error_print(error->next);
@@ -131,71 +456,182 @@ static void _error_print(const memcached_error_t *error)
 
 void memcached_error_print(const memcached_st *self)
 {
-  if (! self)
+  if (self == NULL)
+  {
     return;
+  }
 
   _error_print(self->error_messages);
+
+  for (uint32_t x= 0; x < memcached_server_count(self); x++)
+  {
+    org::libmemcached::Instance* instance= memcached_instance_by_position(self, x);
+
+    _error_print(instance->error_messages);
+  }
 }
 
 static void _error_free(memcached_error_t *error)
 {
-  if (! error)
-    return;
-
-  _error_free(error->next);
-
-  if (error && error->root)
+  if (error)
   {
+    _error_free(error->next);
+
     libmemcached_free(error->root, error);
   }
-  else if (error)
-  {
-    free(error);
-  }
 }
 
-void memcached_error_free(memcached_st *self)
+void memcached_error_free(memcached_stself)
 {
-  if (! self)
-    return;
+  _error_free(self.error_messages);
+  self.error_messages= NULL;
+}
+
+void memcached_error_free(org::libmemcached::Instance& self)
+{
+  _error_free(self.error_messages);
+  self.error_messages= NULL;
+}
+
+void memcached_error_free(memcached_server_st& self)
+{
+  _error_free(self.error_messages);
+  self.error_messages= NULL;
+}
 
-  _error_free(self->error_messages);
+const char *memcached_error(const memcached_st *memc)
+{
+  return memcached_last_error_message(memc);
 }
 
-const char *memcached_last_error_message(memcached_st *memc)
+const char *memcached_last_error_message(const memcached_st *memc)
 {
-  if (! memc)
-    return memcached_strerror(memc, MEMCACHED_INVALID_ARGUMENTS);
+  if (memc)
+  {
+    if (memc->error_messages)
+    {
+      if (memc->error_messages->size == 0)
+      {
+        return memc->error_messages->message;
+      }
+
+      return memcached_strerror(memc, memc->error_messages->rc);
+    }
 
-  if (! memc->error_messages)
     return memcached_strerror(memc, MEMCACHED_SUCCESS);
+  }
+
+  return memcached_strerror(memc, MEMCACHED_INVALID_ARGUMENTS);
+}
 
-  if (! memc->error_messages->size)
+bool memcached_has_current_error(memcached_st &memc)
+{
+  if (memc.error_messages 
+      and memc.error_messages->query_id == memc.query_id
+      and memcached_failed(memc.error_messages->rc))
   {
-    return memcached_strerror(memc, memc->error_messages->rc);
+    return true;
   }
 
-  return memc->error_messages->message;
+  return false;
 }
 
-memcached_return_t memcached_last_error(memcached_st *memc)
+bool memcached_has_current_error(org::libmemcached::Instance& server)
 {
-  if (! memc)
-    return MEMCACHED_INVALID_ARGUMENTS;
+  return memcached_has_current_error(*(server.root));
+}
+
+memcached_return_t memcached_last_error(const memcached_st *memc)
+{
+  if (memc)
+  {
+    if (memc->error_messages)
+    {
+      return memc->error_messages->rc;
+    }
 
-  if (! memc->error_messages)
     return MEMCACHED_SUCCESS;
+  }
 
-  return memc->error_messages->rc;
+  return MEMCACHED_INVALID_ARGUMENTS;
 }
 
-int memcached_last_error_errno(memcached_st *memc)
+int memcached_last_error_errno(const memcached_st *memc)
 {
-  if (! memc)
+  if (memc == NULL)
+  {
     return 0;
+  }
 
-  if (! memc->error_messages)
+  if (memc->error_messages == NULL)
+  {
     return 0;
+  }
 
   return memc->error_messages->local_errno;
 }
+
+const char *memcached_server_error(const memcached_server_instance_st server)
+{
+  if (server == NULL)
+  {
+    return NULL;
+  }
+
+  if (server->error_messages == NULL)
+  {
+    return memcached_strerror(server->root, MEMCACHED_SUCCESS);
+  }
+
+  if (server->error_messages->size == 0)
+  {
+    return memcached_strerror(server->root, server->error_messages->rc);
+  }
+
+  return server->error_messages->message;
+}
+
+
+memcached_error_t *memcached_error_copy(const org::libmemcached::Instance& server)
+{
+  if (server.error_messages == NULL)
+  {
+    return NULL;
+  }
+
+  memcached_error_t *error= libmemcached_xmalloc(server.root, memcached_error_t);
+  memcpy(error, server.error_messages, sizeof(memcached_error_t));
+  error->next= NULL;
+
+  return error;
+}
+
+memcached_return_t memcached_server_error_return(memcached_server_instance_st ptr)
+{
+  if (ptr == NULL)
+  {
+    return MEMCACHED_INVALID_ARGUMENTS;
+  }
+
+  if (ptr and ptr->error_messages)
+  {
+    return ptr->error_messages->rc;
+  }
+
+  return MEMCACHED_SUCCESS;
+}
+
+memcached_return_t memcached_instance_error_return(org::libmemcached::Instance* instance)
+{
+  if (instance == NULL)
+  {
+    return MEMCACHED_INVALID_ARGUMENTS;
+  }
+
+  if (instance and instance->error_messages)
+  {
+    return instance->error_messages->rc;
+  }
+
+  return MEMCACHED_SUCCESS;
+}