- memcached_io_write(ptr, NULL, 0, 1);
-
- /* we have already incremented the response counter, and memcached_response
- will read out all messages.. To avoid memcached_response to wait forever
- for a response to a command I have in my buffer, let's decrement the
- response counter :) */
- memcached_server_response_decrement(ptr);
-
- /* memcached_response may call memcached_io_read, but let's use a short
- timeout if there is no data yet */
- timeout= ptr->root->poll_timeout;
- ptr->root->poll_timeout= 1;
- memcached_response(ptr, buffer, sizeof(buffer), &result);
- ptr->root->poll_timeout= timeout;
- memcached_server_response_increment(ptr);
- ptr->root->purging = 0;
+ if (memcached_io_write(ptr, NULL, 0, 1) == -1)
+ {
+ ptr->root->purging= 0;
+ return MEMCACHED_WRITE_FAILURE;
+ }
+ WATCHPOINT_ASSERT(ptr->fd != -1);
+
+ uint32_t no_msg= memcached_server_response_count(ptr) - 1;
+ if (no_msg > 0)
+ {
+ memcached_result_st result;
+ memcached_result_st *result_ptr;
+ char buffer[SMALL_STRING_LEN];
+
+ /*
+ * We need to increase the timeout, because we might be waiting for
+ * data to be sent from the server (the commands was in the output buffer
+ * and just flushed
+ */
+ long timeo= ptr->root->poll_timeout;
+ ptr->root->poll_timeout= 2000;
+
+ result_ptr= memcached_result_create(ptr->root, &result);
+ WATCHPOINT_ASSERT(result_ptr);
+
+ for (x= 0; x < no_msg; x++)
+ {
+ memcached_result_reset(result_ptr);
+ memcached_return rc= memcached_read_one_response(ptr, buffer,
+ sizeof (buffer),
+ result_ptr);
+ /*
+ * Purge doesn't care for what kind of command results that is received.
+ * The only kind of errors I care about if is I'm out of sync with the
+ * protocol or have problems reading data from the network..
+ */
+ if (rc== MEMCACHED_PROTOCOL_ERROR || rc == MEMCACHED_UNKNOWN_READ_FAILURE)
+ {
+ WATCHPOINT_ERROR(rc);
+ ret = rc;
+ memcached_io_reset(ptr);
+ }
+ }
+
+ memcached_result_free(result_ptr);
+ ptr->root->poll_timeout=timeo;
+ }
+ ptr->root->purging= 0;
+
+ return ret;