couchbase 1.3.15 → 3.0.0.alpha.1

data/ext/couchbase_ext/arithmetic.c

@@ -1,316 +0,0 @@
-/* vim: ft=c et ts=8 sts=4 sw=4 cino=
- *
- *   Copyright 2011, 2012 Couchbase, Inc.
- *
- * Licensed under the Apache License, Version 2.0 (the "License");
- * you may not use this file except in compliance with the License.
- * You may obtain a copy of the License at
- *
- *     http://www.apache.org/licenses/LICENSE-2.0
- *
- * Unless required by applicable law or agreed to in writing, software
- * distributed under the License is distributed on an "AS IS" BASIS,
- * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
- * See the License for the specific language governing permissions and
- * limitations under the License.
- */
-
-#include "couchbase_ext.h"
-
-    void
-cb_arithmetic_callback(lcb_t handle, const void *cookie, lcb_error_t error, const lcb_arithmetic_resp_t *resp)
-{
-    struct cb_context_st *ctx = (struct cb_context_st *)cookie;
-    struct cb_bucket_st *bucket = ctx->bucket;
-    VALUE cas, key, val, exc, res;
-    ID o;
-
-    ctx->nqueries--;
-    key = STR_NEW((const char*)resp->v.v0.key, resp->v.v0.nkey);
-    cb_strip_key_prefix(bucket, key);
-
-    cas = resp->v.v0.cas > 0 ? ULL2NUM(resp->v.v0.cas) : Qnil;
-    o = ctx->arith > 0 ? cb_sym_increment : cb_sym_decrement;
-    exc = cb_check_error(error, "failed to perform arithmetic operation", key);
-    if (exc != Qnil) {
-        rb_ivar_set(exc, cb_id_iv_cas, cas);
-        rb_ivar_set(exc, cb_id_iv_operation, o);
-        ctx->exception = exc;
-    }
-    val = ULL2NUM(resp->v.v0.value);
-    if (bucket->async) {    /* asynchronous */
-        if (ctx->proc != Qnil) {
-            res = rb_class_new_instance(0, NULL, cb_cResult);
-            rb_ivar_set(res, cb_id_iv_error, exc);
-            rb_ivar_set(res, cb_id_iv_operation, o);
-            rb_ivar_set(res, cb_id_iv_key, key);
-            rb_ivar_set(res, cb_id_iv_value, val);
-            rb_ivar_set(res, cb_id_iv_cas, cas);
-            cb_proc_call(bucket, ctx->proc, 1, res);
-        }
-    } else {                /* synchronous */
-        if (NIL_P(exc)) {
-            if (ctx->extended) {
-                rb_hash_aset(ctx->rv, key, rb_ary_new3(2, val, cas));
-            } else {
-                rb_hash_aset(ctx->rv, key, val);
-            }
-        }
-    }
-    if (ctx->nqueries == 0) {
-        ctx->proc = Qnil;
-        if (bucket->async) {
-            cb_context_free(ctx);
-        }
-    }
-    (void)handle;
-}
-
-    static inline VALUE
-cb_bucket_arithmetic(int sign, int argc, VALUE *argv, VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    struct cb_context_st *ctx;
-    VALUE rv, proc, exc;
-    lcb_error_t err;
-    struct cb_params_st params;
-
-    if (!cb_bucket_connected_bang(bucket, sign > 0 ? cb_sym_increment : cb_sym_decrement)) {
-        return Qnil;
-    }
-
-    memset(&params, 0, sizeof(struct cb_params_st));
-    rb_scan_args(argc, argv, "0*&", &params.args, &proc);
-    if (!bucket->async && proc != Qnil) {
-        rb_raise(rb_eArgError, "synchronous mode doesn't support callbacks");
-    }
-    params.type = cb_cmd_arith;
-    params.bucket = bucket;
-    params.cmd.arith.sign = sign;
-    cb_params_build(&params);
-    ctx = cb_context_alloc_common(bucket, proc, params.cmd.arith.num);
-    ctx->extended = params.cmd.arith.extended;
-    err = lcb_arithmetic(bucket->handle, (const void *)ctx,
-            params.cmd.arith.num, params.cmd.arith.ptr);
-    cb_params_destroy(&params);
-    exc = cb_check_error(err, "failed to schedule arithmetic request", Qnil);
-    if (exc != Qnil) {
-        cb_context_free(ctx);
-        rb_exc_raise(exc);
-    }
-    bucket->nbytes += params.npayload;
-    if (bucket->async) {
-        cb_maybe_do_loop(bucket);
-        return Qnil;
-    } else {
-        if (ctx->nqueries > 0) {
-            /* we have some operations pending */
-            lcb_wait(bucket->handle);
-        }
-        exc = ctx->exception;
-        rv = ctx->rv;
-        cb_context_free(ctx);
-        if (exc != Qnil) {
-            rb_exc_raise(exc);
-        }
-        if (params.cmd.store.num > 1) {
-            return rv;  /* return as a hash {key => cas, ...} */
-        } else {
-            VALUE vv = Qnil;
-            rb_hash_foreach(rv, cb_first_value_i, (VALUE)&vv);
-            return vv;
-        }
-        return rv;
-    }
-}
-
-/*
- * Increment the value of an existing numeric key
- *
- * @since 1.0.0
- *
- * The increment methods allow you to increase a given stored integer
- * value. These are the incremental equivalent of the decrement operations
- * and work on the same basis; updating the value of a key if it can be
- * parsed to an integer. The update operation occurs on the server and is
- * provided at the protocol level. This simplifies what would otherwise be a
- * two-stage get and set operation.
- *
- * @note that server treats values as unsigned numbers, therefore if
- * you try to store negative number and then increment or decrement it
- * will cause overflow. (see "Integer overflow" example below)
- *
- * @overload incr(key, delta = 1, options = {})
- *   @param key [String, Symbol] Key used to reference the value.
- *   @param delta [Fixnum] Integer (up to 64 bits) value to increment
- *   @param options [Hash] Options for operation.
- *   @option options [true, false] :create (false) If set to +true+, it will
- *     initialize the key with zero value and zero flags (use +:initial+
- *     option to set another initial value). Note: it won't increment the
- *     missing value.
- *   @option options [Fixnum] :initial (0) Integer (up to 64 bits) value for
- *     missing key initialization. This option imply +:create+ option is
- *     +true+.
- *   @option options [Fixnum] :ttl (self.default_ttl) Expiry time for key.
- *     Values larger than 30*24*60*60 seconds (30 days) are interpreted as
- *     absolute times (from the epoch). This option ignored for existent
- *     keys.
- *   @option options [true, false] :extended (false) If set to +true+, the
- *     operation will return tuple +[value, cas]+, otherwise (by default) it
- *     returns just value.
- *
- *   @yieldparam ret [Result] the result of operation in asynchronous mode
- *     (valid attributes: +error+, +operation+, +key+, +value+, +cas+).
- *
- *   @return [Fixnum] the actual value of the key.
- *
- *   @raise [Couchbase::Error::NotFound] if key is missing and +:create+
- *     option isn't +true+.
- *
- *   @raise [Couchbase::Error::DeltaBadval] if the key contains non-numeric
- *     value
- *
- *   @raise [Couchbase::Error::Connect] if connection closed (see {Bucket#reconnect})
- *
- *   @raise [ArgumentError] when passing the block in synchronous mode
- *
- *   @example Increment key by one
- *     c.incr("foo")
- *
- *   @example Increment key by 50
- *     c.incr("foo", 50)
- *
- *   @example Increment key by one <b>OR</b> initialize with zero
- *     c.incr("foo", :create => true)   #=> will return old+1 or 0
- *
- *   @example Increment key by one <b>OR</b> initialize with three
- *     c.incr("foo", 50, :initial => 3) #=> will return old+50 or 3
- *
- *   @example Increment key and get its CAS value
- *     val, cas = c.incr("foo", :extended => true)
- *
- *   @example Integer overflow
- *     c.set("foo", -100)
- *     c.get("foo")           #=> -100
- *     c.incr("foo")          #=> 18446744073709551517
- *     # but it might look like working
- *     c.set("foo", -2)
- *     c.get("foo")           #=> -2
- *     c.incr("foo", 2)       #=> 0
- *     # on server:
- *     #    // UINT64_MAX is 18446744073709551615
- *     #    uint64_t num = atoll("-2");
- *     #    // num is 18446744073709551614
- *     #    num += 2
- *     #    // num is 0
- *
- *   @example Asynchronous invocation
- *     c.run do
- *       c.incr("foo") do |ret|
- *         ret.operation   #=> :increment
- *         ret.success?    #=> true
- *         ret.key         #=> "foo"
- *         ret.value
- *         ret.cas
- *       end
- *     end
- *
- */
-    VALUE
-cb_bucket_incr(int argc, VALUE *argv, VALUE self)
-{
-    return cb_bucket_arithmetic(+1, argc, argv, self);
-}
-
-/*
- * Decrement the value of an existing numeric key
- *
- * @since 1.0.0
- *
- * The decrement methods reduce the value of a given key if the
- * corresponding value can be parsed to an integer value. These operations
- * are provided at a protocol level to eliminate the need to get, update,
- * and reset a simple integer value in the database. It supports the use of
- * an explicit offset value that will be used to reduce the stored value in
- * the database.
- *
- * @note that server values stored and transmitted as unsigned numbers,
- *   therefore if you try to decrement negative or zero key, you will always
- *   get zero.
- *
- * @overload decr(key, delta = 1, options = {})
- *   @param key [String, Symbol] Key used to reference the value.
- *   @param delta [Fixnum] Integer (up to 64 bits) value to decrement
- *   @param options [Hash] Options for operation.
- *   @option options [true, false] :create (false) If set to +true+, it will
- *     initialize the key with zero value and zero flags (use +:initial+
- *     option to set another initial value). Note: it won't decrement the
- *     missing value.
- *   @option options [Fixnum] :initial (0) Integer (up to 64 bits) value for
- *     missing key initialization. This option imply +:create+ option is
- *     +true+.
- *   @option options [Fixnum] :ttl (self.default_ttl) Expiry time for key.
- *     Values larger than 30*24*60*60 seconds (30 days) are interpreted as
- *     absolute times (from the epoch). This option ignored for existent
- *     keys.
- *   @option options [true, false] :extended (false) If set to +true+, the
- *     operation will return tuple +[value, cas]+, otherwise (by default) it
- *     returns just value.
- *
- *   @yieldparam ret [Result] the result of operation in asynchronous mode
- *     (valid attributes: +error+, +operation+, +key+, +value+, +cas+).
- *
- *   @return [Fixnum] the actual value of the key.
- *
- *   @raise [Couchbase::Error::NotFound] if key is missing and +:create+
- *     option isn't +true+.
- *
- *   @raise [Couchbase::Error::DeltaBadval] if the key contains non-numeric
- *     value
- *
- *   @raise [Couchbase::Error::Connect] if connection closed (see {Bucket#reconnect})
- *
- *   @raise [ArgumentError] when passing the block in synchronous mode
- *
- *   @example Decrement key by one
- *     c.decr("foo")
- *
- *   @example Decrement key by 50
- *     c.decr("foo", 50)
- *
- *   @example Decrement key by one <b>OR</b> initialize with zero
- *     c.decr("foo", :create => true)   #=> will return old-1 or 0
- *
- *   @example Decrement key by one <b>OR</b> initialize with three
- *     c.decr("foo", 50, :initial => 3) #=> will return old-50 or 3
- *
- *   @example Decrement key and get its CAS value
- *     val, cas = c.decr("foo", :extended => true)
- *
- *   @example Decrementing zero
- *     c.set("foo", 0)
- *     c.decrement("foo", 100500)   #=> 0
- *
- *   @example Decrementing negative value
- *     c.set("foo", -100)
- *     c.decrement("foo", 100500)   #=> 0
- *
- *   @example Asynchronous invocation
- *     c.run do
- *       c.decr("foo") do |ret|
- *         ret.operation   #=> :decrement
- *         ret.success?    #=> true
- *         ret.key         #=> "foo"
- *         ret.value
- *         ret.cas
- *       end
- *     end
- *
- */
-    VALUE
-cb_bucket_decr(int argc, VALUE *argv, VALUE self)
-{
-    return cb_bucket_arithmetic(-1, argc, argv, self);
-}
-
-

data/ext/couchbase_ext/bucket.c

@@ -1,1436 +0,0 @@
-/* vim: ft=c et ts=8 sts=4 sw=4 cino=
- *
- *   Copyright 2011, 2012 Couchbase, Inc.
- *
- * Licensed under the Apache License, Version 2.0 (the "License");
- * you may not use this file except in compliance with the License.
- * You may obtain a copy of the License at
- *
- *     http://www.apache.org/licenses/LICENSE-2.0
- *
- * Unless required by applicable law or agreed to in writing, software
- * distributed under the License is distributed on an "AS IS" BASIS,
- * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
- * See the License for the specific language governing permissions and
- * limitations under the License.
- */
-
-#include "couchbase_ext.h"
-
-    static VALUE
-trigger_on_connect_callback(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    VALUE on_connect_proc = bucket->on_connect_proc;
-    if (RTEST(on_connect_proc)) {
-        VALUE res = rb_class_new_instance(0, NULL, cb_cResult);
-        rb_ivar_set(res, cb_id_iv_error, bucket->exception);
-        bucket->exception = Qnil;
-        rb_ivar_set(res, cb_id_iv_operation, cb_sym_connect);
-        rb_ivar_set(res, cb_id_iv_value, self);
-        return rb_funcall(on_connect_proc, cb_id_call, 1, res);
-    } else {
-        bucket->trigger_connect_cb_on_set = 1;
-        return Qnil;
-    }
-}
-
-    static void
-bootstrap_callback(lcb_t handle, lcb_error_t error)
-{
-    struct cb_bucket_st *bucket = (struct cb_bucket_st *)lcb_get_cookie(handle);
-
-    lcb_breakout(handle);
-    bucket->exception = cb_check_error(error, "bootstrap error", Qnil);
-    if (!bucket->connected) {
-        bucket->connected = 1;
-        if (bucket->async) {
-            (void)trigger_on_connect_callback(bucket->self);
-        }
-    }
-}
-
-    void
-cb_bucket_free(void *ptr)
-{
-    struct cb_bucket_st *bucket = ptr;
-
-    if (bucket) {
-        bucket->destroying = 1;
-        if (bucket->handle) {
-            lcb_destroy(bucket->handle);
-            lcb_destroy_io_ops(bucket->io);
-        }
-        if (bucket->object_space) {
-            st_free_table(bucket->object_space);
-        }
-        xfree(bucket);
-    }
-}
-
-    static int
-cb_bucket_mark_object_i(st_index_t key, st_data_t value, st_data_t arg)
-{
-    ((mark_f)value)((void*)key, (struct cb_bucket_st*)arg);
-    return ST_CONTINUE;
-}
-
-    void
-cb_bucket_mark(void *ptr)
-{
-    struct cb_bucket_st *bucket = ptr;
-
-    if (bucket) {
-        rb_gc_mark(bucket->authority);
-        rb_gc_mark(bucket->hostname);
-        rb_gc_mark(bucket->pool);
-        rb_gc_mark(bucket->bucket);
-        rb_gc_mark(bucket->username);
-        rb_gc_mark(bucket->password);
-        rb_gc_mark(bucket->exception);
-        rb_gc_mark(bucket->on_error_proc);
-        rb_gc_mark(bucket->on_connect_proc);
-        rb_gc_mark(bucket->key_prefix_val);
-        rb_gc_mark(bucket->node_list);
-        rb_gc_mark(bucket->bootstrap_transports);
-        if (bucket->object_space) {
-            st_foreach(bucket->object_space, cb_bucket_mark_object_i, (st_data_t)bucket);
-        }
-    }
-}
-
-    static void
-do_scan_connection_options(struct cb_bucket_st *bucket, int argc, VALUE *argv)
-{
-    VALUE uri, opts, arg;
-    char port_s[8];
-
-    if (rb_scan_args(argc, argv, "02", &uri, &opts) > 0) {
-        if (TYPE(uri) == T_HASH && argc == 1) {
-            opts = uri;
-            uri = Qnil;
-        }
-        if (uri != Qnil) {
-            const char path_re[] = "^(/pools/([A-Za-z0-9_.-]+)(/buckets/([A-Za-z0-9_.-]+))?)?";
-            VALUE match, uri_obj, re;
-
-            Check_Type(uri, T_STRING);
-            uri_obj = rb_funcall(cb_mURI, cb_id_parse, 1, uri);
-
-            arg = rb_funcall(uri_obj, cb_id_scheme, 0);
-            if (arg == Qnil || rb_str_cmp(arg, STR_NEW_CSTR("http"))) {
-                rb_raise(rb_eArgError, "invalid URI: invalid scheme");
-            }
-
-            arg = rb_funcall(uri_obj, cb_id_user, 0);
-            if (arg != Qnil) {
-                bucket->username = rb_str_dup_frozen(StringValue(arg));
-            }
-
-            arg = rb_funcall(uri_obj, cb_id_password, 0);
-            if (arg != Qnil) {
-                bucket->password = rb_str_dup_frozen(StringValue(arg));
-            }
-            arg = rb_funcall(uri_obj, cb_id_host, 0);
-            if (arg != Qnil) {
-                bucket->hostname = rb_str_dup_frozen(StringValue(arg));
-            } else {
-                rb_raise(rb_eArgError, "invalid URI: missing hostname");
-            }
-
-            arg = rb_funcall(uri_obj, cb_id_port, 0);
-            bucket->port = NIL_P(arg) ? 8091 : (uint16_t)NUM2UINT(arg);
-
-            arg = rb_funcall(uri_obj, cb_id_path, 0);
-            re = rb_reg_new(path_re, sizeof(path_re) - 1, 0);
-            match = rb_funcall(re, cb_id_match, 1, arg);
-            arg = rb_reg_nth_match(2, match);
-            bucket->pool = NIL_P(arg) ? cb_vStrDefault : rb_str_dup_frozen(StringValue(arg));
-            rb_str_freeze(bucket->pool);
-            arg = rb_reg_nth_match(4, match);
-            bucket->bucket = NIL_P(arg) ? cb_vStrDefault : rb_str_dup_frozen(StringValue(arg));
-            rb_str_freeze(bucket->bucket);
-        }
-        if (TYPE(opts) == T_HASH) {
-            arg = rb_hash_aref(opts, cb_sym_type);
-            if (arg != Qnil) {
-                if (arg == cb_sym_cluster) {
-                    bucket->type = LCB_TYPE_CLUSTER;
-                } else {
-                    bucket->type = LCB_TYPE_BUCKET;
-                }
-            }
-            arg = rb_hash_aref(opts, cb_sym_node_list);
-            if (arg != Qnil) {
-                Check_Type(arg, T_ARRAY);
-                bucket->node_list = rb_ary_join(arg, STR_NEW_CSTR(";"));
-                rb_str_freeze(bucket->node_list);
-            }
-            arg = rb_hash_aref(opts, cb_sym_bootstrap_transports);
-            if (arg != Qnil) {
-                Check_Type(arg, T_ARRAY);
-                bucket->bootstrap_transports = arg;
-            }
-            arg = rb_hash_aref(opts, cb_sym_hostname);
-            if (arg != Qnil) {
-                bucket->hostname = rb_str_dup_frozen(StringValue(arg));
-            } else {
-                arg = rb_hash_aref(opts, cb_sym_host);
-                if (arg != Qnil) {
-                    bucket->hostname = rb_str_dup_frozen(StringValue(arg));
-                }
-            }
-            arg = rb_hash_aref(opts, cb_sym_pool);
-            if (arg != Qnil) {
-                bucket->pool = rb_str_dup_frozen(StringValue(arg));
-            }
-            arg = rb_hash_aref(opts, cb_sym_bucket);
-            if (arg != Qnil) {
-                bucket->bucket = rb_str_dup_frozen(StringValue(arg));
-            }
-            arg = rb_hash_aref(opts, cb_sym_username);
-            if (arg != Qnil) {
-                bucket->username = rb_str_dup_frozen(StringValue(arg));
-            }
-            arg = rb_hash_aref(opts, cb_sym_password);
-            if (arg != Qnil) {
-                bucket->password = rb_str_dup_frozen(StringValue(arg));
-            }
-            arg = rb_hash_aref(opts, cb_sym_port);
-            if (arg != Qnil) {
-                bucket->port = (uint16_t)NUM2UINT(arg);
-            }
-            arg = rb_hash_lookup2(opts, cb_sym_quiet, Qundef);
-            if (arg != Qundef) {
-                bucket->quiet = RTEST(arg);
-            }
-            arg = rb_hash_aref(opts, cb_sym_timeout);
-            if (arg != Qnil) {
-                bucket->timeout = (uint32_t)NUM2ULONG(arg);
-            }
-            arg = rb_hash_aref(opts, cb_sym_default_ttl);
-            if (arg != Qnil) {
-                bucket->default_ttl = (uint32_t)NUM2ULONG(arg);
-            }
-            arg = rb_hash_aref(opts, cb_sym_default_observe_timeout);
-            if (arg != Qnil) {
-                bucket->default_observe_timeout = (uint32_t)NUM2ULONG(arg);
-            }
-            arg = rb_hash_aref(opts, cb_sym_default_flags);
-            if (arg != Qnil) {
-                bucket->default_flags = (uint32_t)NUM2ULONG(arg);
-            }
-            arg = rb_hash_aref(opts, cb_sym_default_format);
-            if (arg != Qnil) {
-                if (TYPE(arg) == T_FIXNUM) {
-                    rb_warn("numeric argument to :default_format option is deprecated, use symbol");
-                    switch (FIX2INT(arg)) {
-                        case CB_FMT_DOCUMENT:
-                            arg = cb_sym_document;
-                            break;
-                        case CB_FMT_MARSHAL:
-                            arg = cb_sym_marshal;
-                            break;
-                        case CB_FMT_PLAIN:
-                            arg = cb_sym_plain;
-                            break;
-                    }
-                }
-                if (arg == cb_sym_document) {
-                    cb_bucket_transcoder_set(bucket->self, cb_mDocument);
-                } else if (arg == cb_sym_marshal) {
-                    cb_bucket_transcoder_set(bucket->self, cb_mMarshal);
-                } else if (arg == cb_sym_plain) {
-                    cb_bucket_transcoder_set(bucket->self, cb_mPlain);
-                }
-            }
-            arg = rb_hash_lookup2(opts, cb_sym_transcoder, Qundef);
-            if (arg != Qundef) {
-                cb_bucket_transcoder_set(bucket->self, arg);
-            }
-            arg = rb_hash_aref(opts, cb_sym_environment);
-            if (arg != Qnil) {
-                if (arg == cb_sym_production || arg == cb_sym_development) {
-                    bucket->environment = arg;
-                }
-            }
-            arg = rb_hash_aref(opts, cb_sym_key_prefix);
-            if (arg != Qnil) {
-                bucket->key_prefix_val = rb_str_dup_frozen(StringValue(arg));
-            }
-            arg = rb_hash_aref(opts, cb_sym_default_arithmetic_init);
-            if (arg != Qnil) {
-                bucket->default_arith_create = RTEST(arg);
-                if (TYPE(arg) == T_FIXNUM) {
-                    bucket->default_arith_init = NUM2ULL(arg);
-                }
-            }
-            arg = rb_hash_aref(opts, cb_sym_engine);
-            if (arg != Qnil) {
-                if (arg == cb_sym_default) {
-                    bucket->engine = cb_sym_default;
-                } else if (arg == cb_sym_select) {
-                    bucket->engine = cb_sym_select;
-#ifdef _WIN32
-                } else if (arg == cb_sym_iocp) {
-                    bucket->engine = cb_sym_iocp;
-#else
-                } else if (arg == cb_sym_libev) {
-                    bucket->engine = cb_sym_libev;
-                } else if (arg == cb_sym_libevent) {
-                    bucket->engine = cb_sym_libevent;
-#ifdef BUILD_EVENTMACHINE_PLUGIN
-                } else if (arg == cb_sym_eventmachine) {
-                    bucket->engine = cb_sym_eventmachine;
-#endif
-#endif
-                } else {
-                    VALUE ins = rb_funcall(arg, rb_intern("inspect"), 0);
-                    rb_raise(rb_eArgError, "Couchbase: unknown engine %s", RSTRING_PTR(ins));
-                }
-            }
-            bucket->async = RTEST(rb_hash_aref(opts, cb_sym_async));
-            arg = rb_hash_aref(opts, cb_sym_transcoder);
-            if (arg != Qnil) {
-                bucket->default_arith_create = RTEST(arg);
-                if (TYPE(arg) == T_FIXNUM) {
-                    bucket->default_arith_init = NUM2ULL(arg);
-                }
-            }
-        } else {
-            opts = Qnil;
-        }
-    }
-    if (RTEST(bucket->password) && !RTEST(bucket->username)) {
-        bucket->username = bucket->bucket;
-    }
-    if (bucket->default_observe_timeout < 2) {
-        rb_raise(rb_eArgError, "default_observe_timeout is too low");
-    }
-    snprintf(port_s, sizeof(port_s), ":%u", bucket->port);
-    bucket->authority = rb_str_dup(bucket->hostname);
-    rb_str_cat2(bucket->authority, port_s);
-    rb_str_freeze(bucket->authority);
-}
-
-    static VALUE
-em_disconnect_block(VALUE unused, VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    if (bucket->handle) {
-        return cb_bucket_disconnect(self);
-    }
-    (void)unused;
-    return Qnil;
-}
-
-    static void
-do_connect(struct cb_bucket_st *bucket)
-{
-    lcb_error_t err;
-    struct lcb_create_st create_opts;
-    lcb_config_transport_t transports[3] = {
-        LCB_CONFIG_TRANSPORT_HTTP,
-        LCB_CONFIG_TRANSPORT_LIST_END,
-        LCB_CONFIG_TRANSPORT_LIST_END
-    };
-
-    if (bucket->handle) {
-        cb_bucket_disconnect(bucket->self);
-    }
-
-    {
-        struct lcb_create_io_ops_st ciops;
-        memset(&ciops, 0, sizeof(ciops));
-        ciops.version = 0;
-
-        if (bucket->engine == cb_sym_libevent) {
-            ciops.v.v0.type = LCB_IO_OPS_LIBEVENT;
-        } else if (bucket->engine == cb_sym_select) {
-            ciops.v.v0.type = LCB_IO_OPS_SELECT;
-#ifdef _WIN32
-        } else if (bucket->engine == cb_sym_iocp) {
-            ciops.v.v0.type = LCB_IO_OPS_WINIOCP;
-#endif
-        } else if (bucket->engine == cb_sym_libev) {
-            ciops.v.v0.type = LCB_IO_OPS_LIBEV;
-#ifdef BUILD_EVENTMACHINE_PLUGIN
-        } else if (bucket->engine == cb_sym_eventmachine) {
-            ciops.version = 2;
-            ciops.v.v2.create = cb_create_ruby_em_io_opts;
-            ciops.v.v2.cookie = bucket;
-#endif
-        } else {
-#ifdef _WIN32
-            ciops.v.v0.type = LCB_IO_OPS_DEFAULT;
-#else
-            ciops.version = 2;
-            ciops.v.v2.create = cb_create_ruby_mt_io_opts;
-            ciops.v.v2.cookie = NULL;
-#endif
-        }
-        err = lcb_create_io_ops(&bucket->io, &ciops);
-        if (err != LCB_SUCCESS) {
-            rb_exc_raise(cb_check_error(err, "failed to create IO instance", Qnil));
-        }
-    }
-
-    memset(&create_opts, 0, sizeof(struct lcb_create_st));
-    create_opts.version = 2;
-    create_opts.v.v2.type = bucket->type;
-    create_opts.v.v2.host = RTEST(bucket->node_list) ? RSTRING_PTR(bucket-> node_list) : RSTRING_PTR(bucket->authority);
-    create_opts.v.v2.user = RTEST(bucket->username) ? RSTRING_PTR(bucket->username) : NULL;
-    create_opts.v.v2.passwd = RTEST(bucket->password) ? RSTRING_PTR(bucket->password) : NULL;
-    create_opts.v.v2.bucket = RSTRING_PTR(bucket->bucket);
-    create_opts.v.v2.io = bucket->io;
-    if (RTEST(bucket->bootstrap_transports) && RARRAY_LEN(bucket->bootstrap_transports) > 0) {
-        int i;
-        for (i = 0; i < 2 && i < RARRAY_LEN(bucket->bootstrap_transports); ++i) {
-            VALUE transport_sym = rb_ary_entry(bucket->bootstrap_transports, i);
-            if (transport_sym == cb_sym_cccp) {
-                transports[i] = LCB_CONFIG_TRANSPORT_CCCP;
-            } else if (transport_sym == cb_sym_http) {
-                transports[i] = LCB_CONFIG_TRANSPORT_HTTP;
-            } else {
-                transports[i] = LCB_CONFIG_TRANSPORT_LIST_END;
-                break;
-            }
-        }
-    }
-    create_opts.v.v2.transports = transports;
-    err = lcb_create(&bucket->handle, &create_opts);
-    if (err != LCB_SUCCESS) {
-        bucket->handle = NULL;
-        rb_exc_raise(cb_check_error(err, "failed to create libcouchbase instance", Qnil));
-    }
-    lcb_set_cookie(bucket->handle, bucket);
-    (void)lcb_set_bootstrap_callback(bucket->handle, bootstrap_callback);
-    (void)lcb_set_store_callback(bucket->handle, cb_storage_callback);
-    (void)lcb_set_get_callback(bucket->handle, cb_get_callback);
-    (void)lcb_set_touch_callback(bucket->handle, cb_touch_callback);
-    (void)lcb_set_remove_callback(bucket->handle, cb_delete_callback);
-    (void)lcb_set_stat_callback(bucket->handle, cb_stat_callback);
-    (void)lcb_set_arithmetic_callback(bucket->handle, cb_arithmetic_callback);
-    (void)lcb_set_version_callback(bucket->handle, cb_version_callback);
-    (void)lcb_set_http_complete_callback(bucket->handle, cb_http_complete_callback);
-    (void)lcb_set_http_data_callback(bucket->handle, cb_http_data_callback);
-    (void)lcb_set_observe_callback(bucket->handle, cb_observe_callback);
-    (void)lcb_set_unlock_callback(bucket->handle, cb_unlock_callback);
-
-    lcb_cntl(bucket->handle, (bucket->timeout > 0) ? LCB_CNTL_SET : LCB_CNTL_GET,
-             LCB_CNTL_OP_TIMEOUT, &bucket->timeout);
-    err = lcb_connect(bucket->handle);
-    if (err != LCB_SUCCESS) {
-        cb_bucket_disconnect(bucket->self);
-        rb_exc_raise(cb_check_error(err, "failed to connect libcouchbase instance to server", Qnil));
-    }
-    bucket->exception = Qnil;
-    if (bucket->engine == cb_sym_eventmachine && !bucket->async_disconnect_hook_set) {
-        bucket->async_disconnect_hook_set = 1;
-        rb_block_call(em_m, cb_id_add_shutdown_hook, 0, NULL, em_disconnect_block, bucket->self);
-    }
-    if (!bucket->async) {
-        lcb_wait(bucket->handle);
-        if (bucket->exception != Qnil) {
-            cb_bucket_disconnect(bucket->self);
-            rb_exc_raise(bucket->exception);
-        }
-    }
-}
-
-    VALUE
-cb_bucket_alloc(VALUE klass)
-{
-    VALUE obj;
-    struct cb_bucket_st *bucket;
-
-    /* allocate new bucket struct and set it to zero */
-    obj = Data_Make_Struct(klass, struct cb_bucket_st, cb_bucket_mark, cb_bucket_free,
-            bucket);
-    return obj;
-}
-
-/*
- * Initialize new Bucket.
- *
- * @since 1.0.0
- *
- * @overload initialize(url, options = {})
- *   Initialize bucket using URI of the cluster and options. It is possible
- *   to override some parts of URI using the options keys (e.g. :host or
- *   :port)
- *
- *   @param [String] url The full URL of management API of the cluster.
- *   @param [Hash] options The options for connection. See options definition
- *     below.
- *
- * @overload initialize(options = {})
- *   Initialize bucket using options only.
- *
- *   @param [Hash] options The options for operation for connection
- *   @option options [Array] :node_list (nil) the list of nodes to connect
- *     to. If specified it takes precedence over +:host+ option. The list
- *     must be array of strings in form of host names or host names with
- *     ports (in first case port 8091 will be used, see examples).
- *   @option options [String] :hostname ("localhost") the hostname or
- *     IP address of the node
- *   @option options [Fixnum] :port (8091) the port of the managemenent API
- *   @option options [String] :pool ("default") the pool name
- *   @option options [String] :bucket ("default") the bucket name
- *   @option options [Fixnum] :default_ttl (0) the TTL used by default during
- *     storing key-value pairs.
- *   @option options [Fixnum] :default_flags (0) the default flags.
- *   @option options [Symbol] :default_format (:document) the format, which
- *     will be used for values by default. Note that changing format will
- *     amend flags. (see {Bucket#default_format})
- *   @option options [String] :username (nil) the user name to connect to the
- *     cluster. Used to authenticate on management API. The username could
- *     be skipped for protected buckets, the bucket name will be used
- *     instead.
- *   @option options [String] :password (nil) the password of the user.
- *   @option options [true, false] :quiet (false) the flag controlling if raising
- *     exception when the client executes operations on non-existent keys. If it
- *     is +true+ it will raise {Couchbase::Error::NotFound} exceptions. The
- *     default behaviour is to return +nil+ value silently (might be useful in
- *     Rails cache).
- *   @option options [Symbol] :environment (:production) the mode of the
- *     connection. Currently it influences only on design documents set. If
- *     the environment is +:development+, you will able to get design
- *     documents with 'dev_' prefix, otherwise (in +:production+ mode) the
- *     library will hide them from you.
- *   @option options [String] :key_prefix (nil) the prefix string which will
- *     be prepended to each key before sending out, and sripped before
- *     returning back to the application.
- *   @option options [Fixnum] :timeout (2500000) the timeout for IO
- *     operations (in microseconds)
- *   @option options [Fixnum, true] :default_arithmetic_init (0) the default
- *     initial value for arithmetic operations. Setting this option to any
- *     non positive number forces creation missing keys with given default
- *     value. Setting it to +true+ will use zero as initial value. (see
- *     {Bucket#incr} and {Bucket#decr}).
- *   @option options [Symbol] :engine (:default) the IO engine to use
- *     Currently following engines are supported:
- *     :default      :: Built-in engine (multi-thread friendly)
- *     :select       :: select(2) IO plugin from libcouchbase
- *     :iocp         :: "I/O Completion Ports" plugin from libcouchbase (windows only)
- *     :libevent     :: libevent IO plugin from libcouchbase (optional)
- *     :libev        :: libev IO plugin from libcouchbase (optional)
- *     :eventmachine :: EventMachine plugin (builtin, but requires EM gem and ruby 1.9+)
- *   @option options [true, false] :async (false) If true, the
- *     connection instance will be considered always asynchronous and
- *     IO interaction will be occured only when {Couchbase::Bucket#run}
- *     called. See {Couchbase::Bucket#on_connect} to hook your code
- *     after the instance will be connected.
- *   @option options [Array] :bootstrap_transports (nil) the list of
- *     bootrap transport mechanisms the library should try during
- *     initial connection and also when cluster changes its
- *     topology. When +nil+ passed it will fallback to best accessible
- *     option. The order of the array elements does not matter at the
- *     momemnt. Currently following values are supported:
- *     :http :: Previous default protocol, which involves open HTTP stream
- *     :cccp :: Cluster Configutration Carrier Publication: new binary
- *              protocol for efficient delivery of cluster
- *              configuration changes to the clients. Read more at
- *              http://www.couchbase.com/wiki/display/couchbase/Cluster+Configuration+Carrier+Publication
- *
- * @example Initialize connection using default options
- *   Couchbase.new
- *
- * @example Select custom bucket
- *   Couchbase.new(:bucket => 'foo')
- *   Couchbase.new('http://localhost:8091/pools/default/buckets/foo')
- *
- * @example Connect to protected bucket
- *   Couchbase.new(:bucket => 'protected', :username => 'protected', :password => 'secret')
- *   Couchbase.new('http://localhost:8091/pools/default/buckets/protected',
- *                 :username => 'protected', :password => 'secret')
- *
- * @example Use list of nodes, in case some nodes might be dead
- *   Couchbase.new(:node_list => ['example.com:8091', 'example.org:8091', 'example.net'])
- *
- * @raise [Couchbase::Error::BucketNotFound] if there is no such bucket to
- *   connect to
- *
- * @raise [Couchbase::Error::Connect] if the socket wasn't accessible
- *   (doesn't accept connections or doesn't respond in time)
- *
- * @return [Bucket]
- */
-    VALUE
-cb_bucket_init(int argc, VALUE *argv, VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    bucket->self = self;
-    bucket->exception = Qnil;
-    bucket->type = LCB_TYPE_BUCKET;
-    bucket->hostname = cb_vStrLocalhost;
-    bucket->port = 8091;
-    bucket->pool = cb_vStrDefault;
-    bucket->bucket = cb_vStrDefault;
-    bucket->username = Qnil;
-    bucket->password = Qnil;
-    bucket->engine = cb_sym_default;
-    bucket->async = 0;
-    bucket->quiet = 0;
-    bucket->default_ttl = 0;
-    bucket->default_flags = 0;
-    cb_bucket_transcoder_set(self, cb_mDocument);
-    bucket->default_observe_timeout = 2500000;
-    bucket->on_error_proc = Qnil;
-    bucket->on_connect_proc = Qnil;
-    bucket->timeout = 0;
-    bucket->environment = cb_sym_production;
-    bucket->key_prefix_val = Qnil;
-    bucket->node_list = Qnil;
-    bucket->bootstrap_transports = Qnil;
-    bucket->object_space = st_init_numtable();
-    bucket->destroying = 0;
-    bucket->connected = 0;
-    bucket->on_connect_proc = Qnil;
-    bucket->async_disconnect_hook_set = 0;
-
-    do_scan_connection_options(bucket, argc, argv);
-    do_connect(bucket);
-
-    return self;
-}
-
-/*
- * Initialize copy
- *
- * Initializes copy of the object, used by {Couchbase::Bucket#dup}
- *
- * @param orig [Couchbase::Bucket] the source for copy
- *
- * @return [Couchbase::Bucket]
- */
-    VALUE
-cb_bucket_init_copy(VALUE copy, VALUE orig)
-{
-    struct cb_bucket_st *copy_b;
-    struct cb_bucket_st *orig_b;
-
-    if (copy == orig)
-        return copy;
-
-    if (TYPE(orig) != T_DATA || TYPE(copy) != T_DATA ||
-            RDATA(orig)->dfree != (RUBY_DATA_FUNC)cb_bucket_free) {
-        rb_raise(rb_eTypeError, "wrong argument type");
-    }
-
-    copy_b = DATA_PTR(copy);
-    orig_b = DATA_PTR(orig);
-
-    copy_b->self = copy;
-    copy_b->port = orig_b->port;
-    copy_b->authority = orig_b->authority;
-    copy_b->hostname = orig_b->hostname;
-    copy_b->pool = orig_b->pool;
-    copy_b->bucket = orig_b->bucket;
-    copy_b->username = orig_b->username;
-    copy_b->password = orig_b->password;
-    copy_b->engine = orig_b->engine;
-    copy_b->async = orig_b->async;
-    copy_b->quiet = orig_b->quiet;
-    copy_b->transcoder = orig_b->transcoder;
-    copy_b->default_flags = orig_b->default_flags;
-    copy_b->default_ttl = orig_b->default_ttl;
-    copy_b->environment = orig_b->environment;
-    copy_b->timeout = orig_b->timeout;
-    copy_b->exception = Qnil;
-    copy_b->async_disconnect_hook_set = 0;
-    if (orig_b->on_error_proc != Qnil) {
-        copy_b->on_error_proc = rb_funcall(orig_b->on_error_proc, cb_id_dup, 0);
-    }
-    if (orig_b->on_connect_proc != Qnil) {
-        copy_b->on_connect_proc = rb_funcall(orig_b->on_connect_proc, cb_id_dup, 0);
-    }
-    if (orig_b->key_prefix_val != Qnil) {
-        copy_b->key_prefix_val = rb_funcall(orig_b->key_prefix_val, cb_id_dup, 0);
-    }
-    if (orig_b->node_list != Qnil) {
-        copy_b->node_list = rb_funcall(orig_b->node_list, cb_id_dup, 0);
-    }
-    if (orig_b->bootstrap_transports != Qnil) {
-        copy_b->bootstrap_transports = rb_funcall(orig_b->bootstrap_transports, cb_id_dup, 0);
-    }
-    copy_b->key_prefix_val = orig_b->key_prefix_val;
-    copy_b->object_space = st_init_numtable();
-    copy_b->destroying = 0;
-    copy_b->connected = 0;
-
-    do_connect(copy_b);
-
-    return copy;
-}
-
-/*
- * Reconnect the bucket
- *
- * @since 1.1.0
- *
- * Reconnect the bucket using initial configuration with optional
- * redefinition.
- *
- * @overload reconnect(url, options = {})
- *  see {Bucket#initialize Bucket#initialize(url, options)}
- *  @return [Couchbase::Bucket]
- *
- * @overload reconnect(options = {})
- *  see {Bucket#initialize Bucket#initialize(options)}
- *  @return [Couchbase::Bucket]
- *
- *  @example reconnect with current parameters
- *    c.reconnect
- *
- *  @example reconnect the instance to another bucket
- *    c.reconnect(:bucket => 'new')
- */
-    VALUE
-cb_bucket_reconnect(int argc, VALUE *argv, VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-
-    do_scan_connection_options(bucket, argc, argv);
-    do_connect(bucket);
-
-    return self;
-}
-
-/* Document-method: connected?
- * Check whether the instance connected to the cluster.
- *
- * @since 1.1.0
- *
- * @return [true, false] +true+ if the instance connected to the cluster
- */
-    VALUE
-cb_bucket_connected_p(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    return (bucket->handle && bucket->connected) ? Qtrue : Qfalse;
-}
-
-/* Document-method: async?
- * Check whether the connection asynchronous.
- *
- * @since 1.0.0
- *
- * By default all operations are synchronous and block waiting for
- * results, but you can make them asynchronous and run event loop
- * explicitly. (see {Bucket#run})
- *
- * @example Return value of #get operation depending on async flag
- *   connection = Connection.new
- *   connection.async?      #=> false
- *
- *   connection.run do |conn|
- *     conn.async?          #=> true
- *   end
- *
- * @return [true, false] +true+ if the connection if asynchronous
- *
- * @see Bucket#run
- */
-    VALUE
-cb_bucket_async_p(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    return bucket->async ? Qtrue : Qfalse;
-}
-
-    VALUE
-cb_bucket_quiet_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    return bucket->quiet ? Qtrue : Qfalse;
-}
-
-    VALUE
-cb_bucket_quiet_set(VALUE self, VALUE val)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-
-    bucket->quiet = RTEST(val);
-    return bucket->quiet ? Qtrue : Qfalse;
-}
-
-    VALUE
-cb_bucket_default_flags_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    return ULONG2NUM(bucket->default_flags);
-}
-
-    VALUE
-cb_bucket_default_flags_set(VALUE self, VALUE val)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-
-    bucket->default_flags = (uint32_t)NUM2ULONG(val);
-    return val;
-}
-
-    VALUE
-cb_bucket_transcoder_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    return bucket->transcoder;
-}
-
-    VALUE
-cb_bucket_transcoder_set(VALUE self, VALUE val)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-
-    if (val != Qnil && !rb_respond_to(val, cb_id_dump) && !rb_respond_to(val, cb_id_load)) {
-        rb_raise(rb_eArgError, "transcoder must respond to dump and load methods");
-    }
-    bucket->transcoder = val;
-
-    return bucket->transcoder;
-}
-
-    VALUE
-cb_bucket_default_format_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-
-    if (bucket->transcoder == cb_mDocument) {
-        return cb_sym_document;
-    } else if (bucket->transcoder == cb_mMarshal) {
-        return cb_sym_marshal;
-    } else if (bucket->transcoder == cb_mPlain) {
-        return cb_sym_plain;
-    }
-    return Qnil;
-}
-
-    VALUE
-cb_bucket_default_format_set(VALUE self, VALUE val)
-{
-    if (TYPE(val) == T_FIXNUM) {
-        rb_warn("numeric argument to #default_format option is deprecated, use symbol");
-        switch (FIX2INT(val)) {
-            case CB_FMT_DOCUMENT:
-                val = cb_sym_document;
-                break;
-            case CB_FMT_MARSHAL:
-                val = cb_sym_marshal;
-                break;
-            case CB_FMT_PLAIN:
-                val = cb_sym_plain;
-                break;
-        }
-    }
-    if (val == cb_sym_document) {
-        cb_bucket_transcoder_set(self, cb_mDocument);
-    } else if (val == cb_sym_marshal) {
-        cb_bucket_transcoder_set(self, cb_mMarshal);
-    } else if (val == cb_sym_plain) {
-        cb_bucket_transcoder_set(self, cb_mPlain);
-    } else {
-        rb_raise(rb_eArgError, "unknown format");
-    }
-
-    return val;
-}
-
-    VALUE
-cb_bucket_on_error_set(VALUE self, VALUE val)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-
-    if (rb_respond_to(val, cb_id_call)) {
-        bucket->on_error_proc = val;
-    } else {
-        bucket->on_error_proc = Qnil;
-    }
-
-    return bucket->on_error_proc;
-}
-
-    VALUE
-cb_bucket_on_error_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-
-    if (rb_block_given_p()) {
-        return cb_bucket_on_error_set(self, rb_block_proc());
-    } else {
-        return bucket->on_error_proc;
-    }
-}
-
-    static
-VALUE trigger_on_connect_callback_block(VALUE nil, VALUE self)
-{
-    (void)nil;
-    return trigger_on_connect_callback(self);
-}
-
-    VALUE
-cb_bucket_on_connect_set(VALUE self, VALUE val)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-
-    if (rb_respond_to(val, cb_id_call)) {
-        bucket->on_connect_proc = val;
-        if (bucket->trigger_connect_cb_on_set) {
-            bucket->trigger_connect_cb_on_set = 0;
-            if (bucket->async) {
-                VALUE args[] = {INT2FIX(0)};
-                /* setup timer with zero interval to call on_connect
-                 * callback on the next tick */
-                rb_block_call(bucket->self, cb_id_create_timer, 1,
-                        args, trigger_on_connect_callback_block, bucket->self);
-            } else {
-                trigger_on_connect_callback(self);
-            }
-        }
-    } else {
-        bucket->on_connect_proc = Qnil;
-    }
-
-    return bucket->on_connect_proc;
-}
-
-    VALUE
-cb_bucket_on_connect_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-
-    if (rb_block_given_p()) {
-        return cb_bucket_on_connect_set(self, rb_block_proc());
-    } else {
-        return bucket->on_connect_proc;
-    }
-}
-
-    VALUE
-cb_bucket_timeout_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    return ULONG2NUM(bucket->timeout);
-}
-
-    VALUE
-cb_bucket_timeout_set(VALUE self, VALUE val)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    VALUE tmval;
-
-    bucket->timeout = (uint32_t)NUM2ULONG(val);
-    lcb_cntl(bucket->handle, LCB_CNTL_SET, LCB_CNTL_OP_TIMEOUT, &bucket->timeout);
-    tmval = ULONG2NUM(bucket->timeout);
-
-    return tmval;
-}
-
-    VALUE
-cb_bucket_default_arithmetic_init_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    return ULL2NUM(bucket->default_arith_init);
-}
-
-    VALUE
-cb_bucket_default_arithmetic_init_set(VALUE self, VALUE val)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-
-    bucket->default_arith_create = RTEST(val);
-    if (bucket->default_arith_create) {
-        bucket->default_arith_init = NUM2ULL(val);
-    } else {
-        bucket->default_arith_init = 0;
-    }
-    return ULL2NUM(bucket->default_arith_init);
-}
-
-    VALUE
-cb_bucket_key_prefix_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    return bucket->key_prefix_val;
-}
-
-    VALUE
-cb_bucket_key_prefix_set(VALUE self, VALUE val)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-
-    bucket->key_prefix_val = rb_str_dup_frozen(StringValue(val));
-
-    return bucket->key_prefix_val;
-}
-
-/* Document-method: hostname
- *
- * @since 1.0.0
- *
- * @return [String] the host name of the management interface (default: "localhost")
- */
-    VALUE
-cb_bucket_hostname_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    if (bucket->handle) {
-        const char *host;
-        char *colon;
-        unsigned long len;
-        host = lcb_get_node(bucket->handle, LCB_NODE_HTCONFIG | LCB_NODE_NEVERNULL, 0);
-        if (host != NULL && (colon = strstr(host, ":"))  != NULL) {
-            *colon = '\0';
-        }
-        len = RSTRING_LEN(bucket->hostname);
-        if (len != strlen(host) || strncmp(RSTRING_PTR(bucket->hostname), host, len) != 0) {
-            bucket->hostname = STR_NEW_CSTR(host);
-            rb_str_freeze(bucket->hostname);
-        }
-    }
-    return bucket->hostname;
-}
-
-/* Document-method: port
- *
- * @since 1.0.0
- *
- * @return [Fixnum] the port number of the management interface (default: 8091)
- */
-    VALUE
-cb_bucket_port_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    if (bucket->handle) {
-        const char *port;
-        port = lcb_get_node(bucket->handle, LCB_NODE_HTCONFIG | LCB_NODE_NEVERNULL, 0);
-        if (port && (port = strstr(port, ":"))) {
-            port++;
-        }
-        bucket->port = atoi(port);
-    }
-    return UINT2NUM(bucket->port);
-}
-
-/* Document-method: authority
- *
- * @since 1.0.0
- *
- * @return [String] host with port
- */
-    VALUE
-cb_bucket_authority_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    VALUE old_hostname = bucket->hostname;
-    uint16_t old_port = bucket->port;
-    VALUE hostname = cb_bucket_hostname_get(self);
-    cb_bucket_port_get(self);
-
-    if (hostname != old_hostname || bucket->port != old_port) {
-        char port_s[8];
-        snprintf(port_s, sizeof(port_s), ":%u", bucket->port);
-        bucket->authority = rb_str_dup(hostname);
-        rb_str_cat2(bucket->authority, port_s);
-        rb_str_freeze(bucket->authority);
-    }
-    return bucket->authority;
-}
-
-/* Document-method: bucket
- *
- * @since 1.0.0
- *
- * @return [String] the bucket name
- */
-    VALUE
-cb_bucket_bucket_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    return bucket->bucket;
-}
-
-/* Document-method: pool
- *
- * @since 1.0.0
- *
- * @return [String] the pool name (usually "default")
- */
-    VALUE
-cb_bucket_pool_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    return bucket->pool;
-}
-
-/* Document-method: username
- *
- * @since 1.0.0
- *
- * @return [String] the username for protected buckets (usually matches
- *   the bucket name)
- */
-    VALUE
-cb_bucket_username_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    return bucket->username;
-}
-
-/* Document-method: password
- *
- * @since 1.0.0
- *
- * @return [String] the password for protected buckets
- */
-    VALUE
-cb_bucket_password_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    return bucket->password;
-}
-
-/* Document-method: environment
- *
- * @since 1.2.0
- *
- * @see Bucket#initialize
- *
- * @return [Symbol] the environment (+:development+ or +:production+)
- */
-    VALUE
-cb_bucket_environment_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    return bucket->environment;
-}
-/* Document-method: num_replicas
- *
- * @since 1.2.0.dp6
- *
- * The numbers of the replicas for each node in the cluster
- *
- * @return [Fixnum]
- */
-    VALUE
-cb_bucket_num_replicas_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    int32_t nr = lcb_get_num_replicas(bucket->handle);
-    if (nr < 0) {
-        return Qnil;
-    } else {
-        return INT2FIX(nr);
-    }
-}
-/* Document-method: default_observe_timeout
- *
- * @since 1.2.0.dp6
- *
- * Get default timeout value for {Bucket#observe_and_wait} operation in
- * microseconds
- *
- * @return [Fixnum]
- */
-    VALUE
-cb_bucket_default_observe_timeout_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    return INT2FIX(bucket->default_observe_timeout);
-}
-
-/* Document-method: default_observe_timeout=
- *
- * @since 1.2.0.dp6
- *
- * Set default timeout value for {Bucket#observe_and_wait} operation in
- * microseconds
- *
- * @return [Fixnum]
- */
-    VALUE
-cb_bucket_default_observe_timeout_set(VALUE self, VALUE val)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    bucket->default_observe_timeout = FIX2INT(val);
-    return val;
-}
-/* Document-method: url
- *
- * @since 1.0.0
- *
- * @return [String] the address of the cluster management interface
- */
-    VALUE
-cb_bucket_url_get(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    VALUE str;
-
-    (void)cb_bucket_authority_get(self);
-    str = rb_str_buf_new2("http://");
-    rb_str_append(str, bucket->authority);
-    rb_str_buf_cat2(str, "/pools/");
-    rb_str_append(str, bucket->pool);
-    rb_str_buf_cat2(str, "/buckets/");
-    rb_str_append(str, bucket->bucket);
-    rb_str_buf_cat2(str, "/");
-    return str;
-}
-
-/*
- * Returns a string containing a human-readable representation of the
- * {Bucket}.
- *
- * @since 1.0.0
- *
- * @return [String]
- */
-    VALUE
-cb_bucket_inspect(VALUE self)
-{
-    VALUE str;
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    char buf[200];
-
-    str = rb_str_buf_new2("#<");
-    rb_str_buf_cat2(str, rb_obj_classname(self));
-    snprintf(buf, 25, ":%p \"", (void *)self);
-    (void)cb_bucket_authority_get(self);
-    rb_str_buf_cat2(str, buf);
-    rb_str_buf_cat2(str, "http://");
-    rb_str_append(str, bucket->authority);
-    rb_str_buf_cat2(str, "/pools/");
-    rb_str_append(str, bucket->pool);
-    rb_str_buf_cat2(str, "/buckets/");
-    rb_str_append(str, bucket->bucket);
-    rb_str_buf_cat2(str, "/\" transcoder=");
-    rb_str_append(str, rb_inspect(bucket->transcoder));
-    snprintf(buf, 150, ", default_flags=0x%x, quiet=%s, connected=%s, timeout=%u",
-            bucket->default_flags,
-            bucket->quiet ? "true" : "false",
-            (bucket->handle && bucket->connected) ? "true" : "false",
-            bucket->timeout);
-    rb_str_buf_cat2(str, buf);
-    if (bucket->handle && bucket->connected) {
-        lcb_config_transport_t type;
-        rb_str_buf_cat2(str, ", bootstrap_transport=");
-        lcb_cntl(bucket->handle, LCB_CNTL_GET, LCB_CNTL_CONFIG_TRANSPORT, &type);
-        switch (type) {
-        case LCB_CONFIG_TRANSPORT_HTTP:
-            rb_str_buf_cat2(str, ":http");
-            break;
-        case LCB_CONFIG_TRANSPORT_CCCP:
-            rb_str_buf_cat2(str, ":cccp");
-            break;
-        default:
-            rb_str_buf_cat2(str, "<unknown>");
-            break;
-        }
-    }
-    if (RTEST(bucket->key_prefix_val)) {
-        rb_str_buf_cat2(str, ", key_prefix=");
-        rb_str_append(str, rb_inspect(bucket->key_prefix_val));
-    }
-    rb_str_buf_cat2(str, ">");
-
-    return str;
-}
-
-    static void
-do_loop(struct cb_bucket_st *bucket)
-{
-    lcb_wait(bucket->handle);
-    bucket->nbytes = 0;
-}
-
-    void
-cb_maybe_do_loop(struct cb_bucket_st *bucket)
-{
-    if (bucket->threshold != 0 && bucket->nbytes > bucket->threshold) {
-        do_loop(bucket);
-    }
-}
-
-    static VALUE
-do_run(VALUE *args)
-{
-    VALUE self = args[0], opts = args[1], proc = args[2], exc;
-    VALUE was_async = args[3];
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-
-    if (bucket->handle == NULL) {
-        rb_raise(cb_eConnectError, "closed connection");
-    }
-
-    if (bucket->running) {
-        rb_raise(cb_eInvalidError, "nested #run");
-    }
-    bucket->threshold = 0;
-    if (opts != Qnil) {
-        VALUE arg;
-        Check_Type(opts, T_HASH);
-        arg = rb_hash_aref(opts, cb_sym_send_threshold);
-        if (arg != Qnil) {
-            bucket->threshold = (uint32_t)NUM2ULONG(arg);
-        }
-    }
-    bucket->async = 1;
-    bucket->running = 1;
-    if (proc != Qnil) {
-        cb_proc_call(bucket, proc, 1, self);
-    }
-    if (bucket->exception != Qnil) {
-        exc = bucket->exception;
-        bucket->exception = Qnil;
-        if (was_async) {
-            cb_async_error_notify(bucket, exc);
-            /* XXX return here? */
-        } else {
-            rb_exc_raise(exc);
-        }
-    }
-    do_loop(bucket);
-    if (bucket->exception != Qnil) {
-        exc = bucket->exception;
-        bucket->exception = Qnil;
-        if (!was_async) {
-            rb_exc_raise(exc);
-        }
-        /* async connections notified immediately from the callbacks
-         * via cb_async_error_notify() */
-    }
-    return Qnil;
-}
-
-    static VALUE
-ensure_run(VALUE *args)
-{
-    VALUE self = args[0];
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-
-    bucket->running = 0;
-    bucket->async = args[3];
-    bucket->running = args[4];
-    return Qnil;
-}
-
-/*
- * Run the event loop.
- *
- * @since 1.0.0
- *
- * @param [Hash] options The options for operation for connection
- * @option options [Fixnum] :send_threshold (0) if the internal command
- *   buffer will exceeds this value, then the library will start network
- *   interaction and block the current thread until all scheduled commands
- *   will be completed.
- *
- * @yieldparam [Bucket] bucket the bucket instance
- *
- * @example Use block to run the loop
- *   c = Couchbase.new
- *   c.run do
- *     c.get("foo") {|ret| puts ret.value}
- *   end
- *
- * @example Use lambda to run the loop
- *   c = Couchbase.new
- *   operations = lambda do |c|
- *     c.get("foo") {|ret| puts ret.value}
- *   end
- *   c.run(&operations)
- *
- * @example Use threshold to send out commands automatically
- *   c = Couchbase.connect
- *   sent = 0
- *   c.run(:send_threshold => 8192) do  # 8Kb
- *     c.set("foo1", "x" * 100) {|r| sent += 1}
- *     # 128 bytes buffered, sent is 0 now
- *     c.set("foo2", "x" * 10000) {|r| sent += 1}
- *     # 10028 bytes added, sent is 2 now
- *     c.set("foo3", "x" * 100) {|r| sent += 1}
- *   end
- *   # all commands were executed and sent is 3 now
- *
- * @example Use {Couchbase::Bucket#run} without block for async connection
- *   c = Couchbase.new(:async => true)
- *   c.run      # ensure that instance connected
- *   c.set("foo", "bar"){|r| puts r.cas}
- *   c.run
- *
- * @return [nil]
- *
- * @raise [Couchbase::Error::Connect] if connection closed (see {Bucket#reconnect})
- */
-    VALUE
-cb_bucket_run(int argc, VALUE *argv, VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    VALUE args[5];
-
-    /* it is allowed to omit block for async connections */
-    if (!bucket->async) {
-        rb_need_block();
-    }
-    args[0] = self;
-    rb_scan_args(argc, argv, "01&", &args[1], &args[2]);
-    args[3] = bucket->async;
-    args[4] = bucket->running;
-    rb_ensure(do_run, (VALUE)args, ensure_run, (VALUE)args);
-    return Qnil;
-}
-
-/*
- * Stop the event loop.
- *
- * @since 1.2.0
- *
- * @example Breakout the event loop when 5th request is completed
- *   c = Couchbase.connect
- *   c.run do
- *     10.times do |ii|
- *       c.get("foo") do |ret|
- *         puts ii
- *         c.stop if ii == 5
- *       end
- *     end
- *   end
- *
- * @return [nil]
- */
-    VALUE
-cb_bucket_stop(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-    lcb_breakout(bucket->handle);
-    return Qnil;
-}
-
-/*
- * Close the connection to the cluster
- *
- * @since 1.1.0
- *
- * @return [true]
- *
- * @raise [Couchbase::Error::Connect] if connection closed (see {Bucket#reconnect})
- */
-    VALUE
-cb_bucket_disconnect(VALUE self)
-{
-    struct cb_bucket_st *bucket = DATA_PTR(self);
-
-    if (bucket->handle) {
-        lcb_destroy(bucket->handle);
-        lcb_destroy_io_ops(bucket->io);
-        bucket->handle = NULL;
-        bucket->io = NULL;
-        bucket->connected = 0;
-        return Qtrue;
-    } else {
-        rb_raise(cb_eConnectError, "closed connection");
-        return Qfalse;
-    }
-}