-#include <memcached.h>
+#include "common.h"
static char *memcached_value_fetch(memcached_st *ptr, char *key, size_t *key_length,
size_t *value_length,
{
char buffer[MEMCACHED_DEFAULT_COMMAND_SIZE];
char *string_ptr;
+ char *end_ptr;
+
+ assert(value_length);
+ assert(flags);
+ assert(error);
+
+ end_ptr= buffer + MEMCACHED_DEFAULT_COMMAND_SIZE;
*value_length= 0;
if (*error == MEMCACHED_SUCCESS)
{
- char *end_ptr;
+ char *next_ptr;
string_ptr= buffer;
string_ptr+= 6; /* "VALUE " */
if (load_key)
{
memset(key, 0, MEMCACHED_MAX_KEY);
- for (end_ptr= string_ptr; *end_ptr != ' '; end_ptr++)
+ for (; end_ptr == string_ptr || *string_ptr != ' '; string_ptr++)
{
- *key= *end_ptr;
+ *key= *string_ptr;
key++;
}
}
else /* Skip characters */
- for (end_ptr= string_ptr; *end_ptr != ' '; end_ptr++);
+ for (; end_ptr == string_ptr || *string_ptr != ' '; string_ptr++);
+
+ if (end_ptr == string_ptr)
+ goto read_error;
+
+ /* Flags fetch move past space */
+ string_ptr++;
+ if (end_ptr == string_ptr)
+ goto read_error;
+ for (next_ptr= string_ptr; end_ptr == string_ptr || *string_ptr != ' '; string_ptr++);
+ *flags= (uint16_t)strtol(next_ptr, &string_ptr, 10);
- /* Flags fetch */
- string_ptr= end_ptr + 1;
- for (end_ptr= string_ptr; *end_ptr != ' '; end_ptr++);
- *flags= (uint16_t)strtol(string_ptr, &end_ptr, 10);
+ if (end_ptr == string_ptr)
+ goto read_error;
- /* Length fetch */
- string_ptr= end_ptr + 1;
- for (end_ptr= string_ptr; *end_ptr != ' '; end_ptr++);
- *value_length= strtoll(string_ptr, &end_ptr, 10);
+ /* Length fetch move past space*/
+ string_ptr++;
+ if (end_ptr == string_ptr)
+ goto read_error;
+
+ for (next_ptr= string_ptr; end_ptr == string_ptr || *string_ptr != ' '; string_ptr++);
+ *value_length= (size_t)strtoll(next_ptr, &string_ptr, 10);
+
+ if (end_ptr == string_ptr)
+ goto read_error;
/* Skip past the \r\n */
- string_ptr= end_ptr +2;
+ string_ptr+= 2;
+
+ if (end_ptr < string_ptr)
+ goto read_error;
if (*value_length)
{
size_t read_length;
+ size_t partial_length;
+ size_t to_read;
char *value;
+ char *value_ptr;
/* We add two bytes so that we can walk the \r\n */
value= (char *)malloc(((*value_length) +2) * sizeof(char));
+ memset(value, 0, ((*value_length) +2) * sizeof(char));
if (!value)
{
return NULL;
}
- read_length= read(ptr->hosts[server_key].fd, value, (*value_length)+2);
+ value_ptr= value;
+ read_length= 0;
+ to_read= (*value_length) + 2;
+ /* This is overkill */
+ while ((partial_length= recv(ptr->hosts[server_key].fd, value_ptr, to_read, 0)) > 0)
+ {
+ value_ptr+= partial_length;
+ read_length+= partial_length;
+ to_read-= partial_length;
+ if (read_length == (size_t)(*value_length + 2))
+ break;
+ }
- if ((read_length -2) != *value_length)
+ if (read_length != (size_t)(*value_length + 2))
{
free(value);
- *error= MEMCACHED_PARTIAL_READ;
-
- return NULL;
+ goto read_error;
}
return value;
}
}
+ return NULL;
+read_error:
+ *error= MEMCACHED_PARTIAL_READ;
return NULL;
}
size_t send_length;
char buffer[MEMCACHED_DEFAULT_COMMAND_SIZE];
unsigned int server_key;
+ char *value;
+ LIBMEMCACHED_MEMCACHED_GET_START();
*value_length= 0;
*error= memcached_connect(ptr);
if (*error != MEMCACHED_SUCCESS)
return NULL;
- if ((write(ptr->hosts[server_key].fd, buffer, send_length) == -1))
+ if ((send(ptr->hosts[server_key].fd, buffer, send_length, 0) == -1))
{
*error= MEMCACHED_WRITE_FAILURE;
return NULL;
}
- return memcached_value_fetch(ptr, key, &key_length, value_length, flags,
+ value= memcached_value_fetch(ptr, key, &key_length, value_length, flags,
error, 0, server_key);
+ LIBMEMCACHED_MEMCACHED_GET_END();
+
+ return value;
}
memcached_return memcached_mget(memcached_st *ptr,
unsigned int number_of_keys)
{
char buffer[HUGE_STRING_LEN];
- char *buffer_ptr;
unsigned int x;
memcached_return rc;
+ memcached_string_st **cursor_key_exec;
+ LIBMEMCACHED_MEMCACHED_MGET_START();
ptr->cursor_server= 0;
memset(buffer, 0, HUGE_STRING_LEN);
if (rc != MEMCACHED_SUCCESS)
return rc;
- memcpy(buffer, "get", strlen("get"));
- buffer_ptr= buffer;
- buffer_ptr+=strlen("get");
+ cursor_key_exec= (memcached_string_st **)malloc(sizeof(memcached_string_st *) * ptr->number_of_hosts);
+ memset(cursor_key_exec, 0, sizeof(memcached_string_st *) * ptr->number_of_hosts);
+
for (x= 0; x < number_of_keys; x++)
{
- *buffer_ptr= ' ';
- buffer_ptr++;
- memcpy(buffer_ptr, keys[x], key_length[x]);
- buffer_ptr+= key_length[x];
+ unsigned int server_key;
+
+ server_key= memcached_generate_hash(keys[x], key_length[x]) % ptr->number_of_hosts;
+
+ if (cursor_key_exec[server_key])
+ {
+ memcached_string_st *string= cursor_key_exec[server_key];
+
+ memcached_string_append_character(ptr, string, ' ');
+ memcached_string_append(ptr, string, keys[x], key_length[x]);
+ }
+ else
+ {
+ memcached_string_st *string= memcached_string_init(ptr, SMALL_STRING_LEN);
+
+ /* We need to figure out the correct way to error in case of this failure */
+ if (!string)
+ assert(0);
+
+ memcached_string_append(ptr, string, "get ", 4);
+ memcached_string_append(ptr, string, keys[x], key_length[x]);
+
+ cursor_key_exec[server_key]= string;
+ }
}
- memcpy(buffer_ptr, "\r\n", 2);
- buffer_ptr+=2;
/*
- This must be fixed. Right now we hit every server, and send keys
- to all servers. We should fix this quickly.
+ Should we muddle on if some servers are dead?
*/
for (x= 0; x < ptr->number_of_hosts; x++)
{
- if ((write(ptr->hosts[x].fd, buffer, (size_t)(buffer_ptr - buffer)) == -1))
+ if (cursor_key_exec[x])
{
- memcached_quit(ptr);
- rc= MEMCACHED_SOME_ERRORS;
+ memcached_string_st *string= cursor_key_exec[x];
+ memcached_string_append(ptr, string, "\r\n", 2);
+
+ if ((send(ptr->hosts[x].fd, string->string,
+ memcached_string_length(ptr, string), 0) == -1))
+ {
+ memcached_quit(ptr);
+ rc= MEMCACHED_SOME_ERRORS;
+ }
+ memcached_string_free(ptr, string);
+ cursor_key_exec[x]= NULL; /* Remove warning */
}
}
+ free(cursor_key_exec);
+
+ LIBMEMCACHED_MEMCACHED_MGET_END();
return rc;
}
if (*error == MEMCACHED_NOTFOUND)
ptr->cursor_server++;
+ else if (*error != MEMCACHED_SUCCESS)
+ return NULL;
else
return value_check;
}