+ *value_length= 0;
+ *error= memcached_connect(ptr);
+
+ if (*error != MEMCACHED_SUCCESS)
+ goto error;
+
+ server_key= memcached_generate_hash(key, key_length) % ptr->number_of_hosts;
+
+ send_length= snprintf(buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, "get %.*s\r\n",
+ (int)key_length, key);
+
+ if ((memcached_io_write(ptr, server_key, buffer, send_length, 1)) == -1)
+ {
+ *error= MEMCACHED_WRITE_FAILURE;
+ goto error;
+ }
+
+ value= memcached_value_fetch(ptr, key, &key_length, value_length, flags,
+ error, 0, server_key);
+ if (*error == MEMCACHED_END && *value_length == 0)
+ {
+ *error= MEMCACHED_NOTFOUND;
+ goto error;
+ }
+ else if (*error == MEMCACHED_SUCCESS)
+ {
+ memcached_return rc;
+ /* We need to read END */
+ rc= memcached_response(ptr, buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, server_key);
+
+ if (rc != MEMCACHED_END)
+ {
+ *error= MEMCACHED_PROTOCOL_ERROR;
+ goto error;
+ }
+ }
+ else
+ goto error;
+
+ LIBMEMCACHED_MEMCACHED_GET_END();
+
+ return value;
+
+error:
+ free(value);
+ *value_length= 0;
+
+ LIBMEMCACHED_MEMCACHED_GET_END();
+
+ return NULL;
+}
+
+memcached_return memcached_mget(memcached_st *ptr,
+ char **keys, size_t *key_length,
+ unsigned int number_of_keys)
+{
+ char buffer[HUGE_STRING_LEN];
+ 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);
+
+ rc= memcached_connect(ptr);
+
+ if (rc != MEMCACHED_SUCCESS)
+ return rc;
+
+ 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++)
+ {
+ 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_create(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;
+ }
+ }
+
+
+ /*
+ Should we muddle on if some servers are dead?
+ */
+ for (x= 0; x < ptr->number_of_hosts; x++)
+ {
+ if (cursor_key_exec[x])
+ {
+ memcached_string_st *string= cursor_key_exec[x];
+ memcached_string_append(ptr, string, "\r\n", 2);
+
+ if ((memcached_io_write(ptr, x, string->string,
+ memcached_string_length(ptr, string), 1)) == -1)
+ {
+ memcached_quit(ptr);
+ rc= MEMCACHED_SOME_ERRORS;
+ }
+ memcached_string_free(ptr, string);
+ cursor_key_exec[x]= NULL; /* Remove warning */