#include "common.h"
#include "memcached_io.h"
-static memcached_return memcached_send(memcached_st *ptr,
- char *key, size_t key_length,
- char *value, size_t value_length,
- time_t expiration,
- uint16_t flags,
- char *verb)
+typedef enum {
+ SET_OP,
+ REPLACE_OP,
+ ADD_OP,
+ PREPEND_OP,
+ APPEND_OP,
+ CAS_OP,
+} memcached_storage_action;
+
+/* Inline this */
+char *storage_op_string(memcached_storage_action verb)
{
+ switch (verb)
+ {
+ case SET_OP:
+ return "set";
+ case REPLACE_OP:
+ return "replace";
+ case ADD_OP:
+ return "add";
+ case PREPEND_OP:
+ return "prepend";
+ case APPEND_OP:
+ return "append";
+ case CAS_OP:
+ return "cas";
+ };
+
+ return SET_OP;
+}
+
+static inline memcached_return memcached_send(memcached_st *ptr,
+ char *key, size_t key_length,
+ char *value, size_t value_length,
+ time_t expiration,
+ uint16_t flags,
+ uint64_t cas,
+ memcached_storage_action verb)
+{
+ char to_write;
size_t write_length;
ssize_t sent_length;
memcached_return rc;
char buffer[MEMCACHED_DEFAULT_COMMAND_SIZE];
unsigned int server_key;
- assert(value);
- assert(value_length);
+ WATCHPOINT_ASSERT(!(value == NULL && value_length > 0));
+ WATCHPOINT_ASSERT(!(value && value_length == 0));
+
+ if (key_length == 0)
+ return MEMCACHED_NO_KEY_PROVIDED;
+
+ /* Leaving this WATCHPOINT_ASSERT in since only a library fubar could blow this */
+#ifdef NOT_DONE
+ if (!(ptr->flags & MEM_NO_BLOCK) && ptr->write_buffer_offset != 0)
+ WATCHPOINT_ASSERT(0);
+#endif
- memset(buffer, 0, MEMCACHED_DEFAULT_COMMAND_SIZE);
+ if (ptr->hosts == NULL || ptr->number_of_hosts == 0)
+ return MEMCACHED_NO_SERVERS;
+
+ server_key= memcached_generate_hash(ptr, key, key_length);
- rc= memcached_connect(ptr);
+ rc= memcached_connect(ptr, server_key);
if (rc != MEMCACHED_SUCCESS)
return rc;
- assert(ptr->write_buffer_offset == 0);
- server_key= memcached_generate_hash(key, key_length) % ptr->number_of_hosts;
+ if (cas)
+ write_length= snprintf(buffer, MEMCACHED_DEFAULT_COMMAND_SIZE,
+ "%s %.*s %u %llu %zu\r\n", storage_op_string(verb),
+ (int)key_length, key, flags,
+ (unsigned long long)expiration, value_length);
+ else
+ write_length= snprintf(buffer, MEMCACHED_DEFAULT_COMMAND_SIZE,
+ "%s %.*s %u %llu %zu %llu\r\n", storage_op_string(verb),
+ (int)key_length, key, flags,
+ (unsigned long long)expiration, value_length,
+ (unsigned long long)cas);
- write_length= snprintf(buffer, MEMCACHED_DEFAULT_COMMAND_SIZE,
- "%s %.*s %x %llu %zu\r\n", verb,
- (int)key_length, key, flags,
- (unsigned long long)expiration, value_length);
if (write_length >= MEMCACHED_DEFAULT_COMMAND_SIZE)
{
rc= MEMCACHED_WRITE_FAILURE;
goto error;
}
- if ((sent_length= memcached_io_write(ptr, server_key, buffer, write_length)) == -1)
- {
- rc= MEMCACHED_WRITE_FAILURE;
- goto error;
- }
- assert(write_length == sent_length);
-
/*
We have to flush after sending the command. Memcached is not smart enough
to just keep reading from the socket :(
*/
- if ((sent_length= memcached_io_flush(ptr, server_key)) == -1)
- return MEMCACHED_WRITE_FAILURE;
-
- if ((sent_length= memcached_io_write(ptr, server_key, value, value_length)) == -1)
+ if ((sent_length= memcached_io_write(ptr, server_key, buffer, write_length, 0)) == -1)
{
rc= MEMCACHED_WRITE_FAILURE;
goto error;
}
- assert(value_length == sent_length);
- if ((sent_length= memcached_io_write(ptr, server_key, "\r\n", 2)) == -1)
+ if ((sent_length= memcached_io_write(ptr, server_key, value, value_length, 0)) == -1)
{
rc= MEMCACHED_WRITE_FAILURE;
goto error;
}
- assert(2 == sent_length);
-
- if ((sent_length= memcached_io_flush(ptr, server_key)) == -1)
- return MEMCACHED_WRITE_FAILURE;
-
- //assert(sent_length == write_length + value_length + 2);
+ if ((ptr->flags & MEM_NO_BLOCK) && verb == SET_OP)
+ to_write= 0;
+ else
+ to_write= 1;
- sent_length= recv(ptr->hosts[server_key].fd, buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, 0);
+ if ((sent_length= memcached_io_write(ptr, server_key, "\r\n", 2, to_write)) == -1)
+ {
+ memcached_quit_server(ptr, server_key);
+ rc= MEMCACHED_WRITE_FAILURE;
+ goto error;
+ }
- if (sent_length && buffer[0] == 'S') /* STORED */
- return MEMCACHED_SUCCESS;
- else if (write_length && buffer[0] == 'N') /* NOT_STORED */
- return MEMCACHED_NOTSTORED;
- else if (write_length && buffer[0] == 'E') /* ERROR */
+ if ((ptr->flags & MEM_NO_BLOCK) && verb == SET_OP)
{
- printf("BUFFER :%s:\n", buffer);
- return MEMCACHED_PROTOCOL_ERROR;
+ rc= MEMCACHED_SUCCESS;
+ memcached_server_response_increment(ptr, server_key);
}
else
- return MEMCACHED_READ_FAILURE;
+ {
+ rc= memcached_response(ptr, buffer, MEMCACHED_DEFAULT_COMMAND_SIZE, server_key);
+ }
+ if (rc == MEMCACHED_STORED)
+ return MEMCACHED_SUCCESS;
+ else
+ return rc;
error:
memcached_io_reset(ptr, server_key);
memcached_return memcached_set(memcached_st *ptr, char *key, size_t key_length,
char *value, size_t value_length,
time_t expiration,
- uint16_t flags)
+ uint16_t flags)
{
memcached_return rc;
LIBMEMCACHED_MEMCACHED_SET_START();
rc= memcached_send(ptr, key, key_length, value, value_length,
- expiration, flags, "set");
+ expiration, flags, 0, SET_OP);
LIBMEMCACHED_MEMCACHED_SET_END();
return rc;
}
-memcached_return memcached_add(memcached_st *ptr, char *key, size_t key_length,
+memcached_return memcached_add(memcached_st *ptr,
+ char *key, size_t key_length,
char *value, size_t value_length,
time_t expiration,
- uint16_t flags)
+ uint16_t flags)
{
memcached_return rc;
LIBMEMCACHED_MEMCACHED_ADD_START();
rc= memcached_send(ptr, key, key_length, value, value_length,
- expiration, flags, "add");
+ expiration, flags, 0, ADD_OP);
LIBMEMCACHED_MEMCACHED_ADD_END();
return rc;
}
-memcached_return memcached_replace(memcached_st *ptr, char *key, size_t key_length,
+memcached_return memcached_replace(memcached_st *ptr,
+ char *key, size_t key_length,
char *value, size_t value_length,
time_t expiration,
- uint16_t flags)
+ uint16_t flags)
{
memcached_return rc;
LIBMEMCACHED_MEMCACHED_REPLACE_START();
rc= memcached_send(ptr, key, key_length, value, value_length,
- expiration, flags, "replace");
+ expiration, flags, 0, REPLACE_OP);
LIBMEMCACHED_MEMCACHED_REPLACE_END();
return rc;
}
+
+memcached_return memcached_prepend(memcached_st *ptr,
+ char *key, size_t key_length,
+ char *value, size_t value_length,
+ time_t expiration,
+ uint16_t flags)
+{
+ memcached_return rc;
+ rc= memcached_send(ptr, key, key_length, value, value_length,
+ expiration, flags, 0, PREPEND_OP);
+ return rc;
+}
+
+memcached_return memcached_append(memcached_st *ptr,
+ char *key, size_t key_length,
+ char *value, size_t value_length,
+ time_t expiration,
+ uint16_t flags)
+{
+ memcached_return rc;
+ rc= memcached_send(ptr, key, key_length, value, value_length,
+ expiration, flags, 0, APPEND_OP);
+ return rc;
+}
+
+memcached_return memcached_cas(memcached_st *ptr,
+ char *key, size_t key_length,
+ char *value, size_t value_length,
+ time_t expiration,
+ uint16_t flags,
+ uint64_t cas)
+{
+ memcached_return rc;
+ rc= memcached_send(ptr, key, key_length, value, value_length,
+ expiration, flags, cas, APPEND_OP);
+ return rc;
+}