-static char *memcached_value_fetch(memcached_st *ptr, char *key, size_t *key_length,
- size_t *value_length,
- uint16_t *flags,
- memcached_return *error,
- char load_key,
- unsigned int server_key)
-{
- char buffer[MEMCACHED_DEFAULT_COMMAND_SIZE];
- char *string_ptr;
- char *end_ptr;
-
- assert(value_length);
- assert(flags);
- assert(error);
-
- memset(buffer, 0, MEMCACHED_DEFAULT_COMMAND_SIZE);
- end_ptr= buffer + MEMCACHED_DEFAULT_COMMAND_SIZE;
-
- *value_length= 0;
-
- *error= memcached_response(ptr, buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, server_key);
-
- if (*error == MEMCACHED_SUCCESS)
- {
- char *next_ptr;
-
- string_ptr= buffer;
- string_ptr+= 6; /* "VALUE " */
-
- /* We load the key */
- if (load_key)
- {
- memset(key, 0, MEMCACHED_MAX_KEY);
- *key_length= 0;
-
- for (; end_ptr == string_ptr || *string_ptr != ' '; string_ptr++)
- {
- *key= *string_ptr;
- key++;
- (*key_length)++;
- }
- }
- else /* Skip characters */
- 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);
-
- if (end_ptr == string_ptr)
- goto read_error;
-
- /* 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+= 2;
-
- if (end_ptr < string_ptr)
- goto read_error;
-
- if (*value_length)
- {
- size_t read_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));
- if (!value)
- {
- *value_length= 0;
- *error= MEMCACHED_MEMORY_ALLOCATION_FAILURE;
- return NULL;
- }
- memset(value, 0, ((*value_length) +2) * sizeof(char));
-
- value_ptr= value;
- read_length= 0;
- /*
- We read the \r\n into the string since not doing so is more
- cycles then the waster of memory to do so.
-
- We are null terminating through, which will most likely make
- some people lazy about using the return length.
- */
- to_read= (*value_length) + 2;
-
- read_length= memcached_io_read(ptr, server_key,
- value_ptr, to_read);
-
- if (read_length != (size_t)(*value_length + 2))
- {
- free(value);
- goto read_error;
- }
-
- value[*value_length]= 0;
- value[(*value_length) + 1]= 0;
-
- return value;
- }
- }
- else if (*error == MEMCACHED_END)
- *error= MEMCACHED_NOTFOUND;
-
- return NULL;
-read_error:
- *error= MEMCACHED_PARTIAL_READ;
- return NULL;
-}
-