libcouchbase 0.0.4 → 0.0.5

data/ext/libcouchbase/src/hashset.h

@@ -1,86 +0,0 @@
-/* -*- Mode: C; tab-width: 4; c-basic-offset: 4; indent-tabs-mode: nil -*- */
-/*
- *     Copyright 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.
- */
-
-#ifndef LIBCOUCHBASE_HASHSET_H
-#define LIBCOUCHBASE_HASHSET_H 1
-
-#ifdef __cplusplus
-extern "C" {
-#endif
-
-    struct hashset_st {
-        lcb_size_t nbits;
-        lcb_size_t mask;
-
-        lcb_size_t capacity;
-        lcb_size_t *items;
-        lcb_size_t nitems;
-    };
-
-    typedef struct hashset_st *hashset_t;
-
-    /* create hashset instance */
-    hashset_t hashset_create(void);
-
-    /* destroy hashset instance */
-    void hashset_destroy(hashset_t set);
-
-    lcb_size_t hashset_num_items(hashset_t set);
-
-    /**
-     * Makes a list of items inside the hashset.
-     * @param set the hashset
-     * @param itemlist an allocated array large enough to hold the number
-     * of items in the hashset (use hashset_num_items). If this is NULL
-     * then a list is allocated for you
-     *
-     * @return the item list. If the @itemlist param argument was
-     * not-null, then this is the same list; if it was NULL then this
-     * is an allocated list which should be released using @itemlist
-     * free(). It will return NULL if the hashset is empty or memory
-     * allocation for @itemlist was failed.
-     */
-    void **hashset_get_items(hashset_t set, void **itemlist);
-
-
-    /* add item into the hashset.
-     *
-     * @note 0 and 1 is special values, meaning nil and deleted items. the
-     *       function will return -1 indicating error.
-     *
-     * returns zero if the item already in the set and non-zero otherwise
-     */
-    int hashset_add(hashset_t set, void *item);
-
-    /* remove item from the hashset
-     *
-     * returns non-zero if the item was removed and zero if the item wasn't
-     * exist
-     */
-    int hashset_remove(hashset_t set, void *item);
-
-    /* check if existence of the item
-     *
-     * returns non-zero if the item exists and zero otherwise
-     */
-    int hashset_is_member(hashset_t set, void *item);
-
-#ifdef __cplusplus
-}
-#endif
-
-#endif

data/ext/libcouchbase/src/mcserver/negotiate.c

@@ -1,657 +0,0 @@
-/* -*- Mode: C; tab-width: 4; c-basic-offset: 4; indent-tabs-mode: nil -*- */
-/*
- *     Copyright 2014 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 "packetutils.h"
-#include "simplestring.h"
-#include "mcserver.h"
-#include "logging.h"
-#include "settings.h"
-#include <lcbio/lcbio.h>
-#include <lcbio/timer-ng.h>
-#include <lcbio/ssl.h>
-#include <cbsasl/cbsasl.h>
-#include "negotiate.h"
-#include "ctx-log-inl.h"
-
-#define LOGARGS(ctx, lvl) ctx->inner->settings, "negotiation", LCB_LOG_##lvl, __FILE__, __LINE__
-static void cleanup_pending(mc_pSESSREQ);
-static void cleanup_negotiated(mc_pSESSINFO);
-static void bail_pending(mc_pSESSREQ sreq);
-#define SESSREQ_LOGFMT "<%s:%s> (SASLREQ=%p) "
-
-/**
- * Inner negotiation structure which is maintained as part of a 'protocol
- * context'.
- */
-struct mc_SESSINFO {
-    lcbio_PROTOCTX base;
-    cbsasl_conn_t *sasl;
-    char *mech;
-    unsigned int nmech;
-    lcb_settings *settings;
-    lcbio_CONNDONE_cb complete;
-    union {
-        cbsasl_secret_t secret;
-        char buffer[256];
-    } u_auth;
-    cbsasl_callback_t sasl_callbacks[4];
-    lcb_U16 features[MEMCACHED_TOTAL_HELLO_FEATURES+1];
-};
-
-/**
- * Structure used only for initialization. This is only used for the duration
- * of the request for negotiation and is deleted once negotiation has
- * completed (or failed).
- */
-typedef struct mc_SESSREQ {
-    lcbio_CTX *ctx;
-    lcbio_CONNDONE_cb cb;
-    void *data;
-    lcbio_pTIMER timer;
-    lcb_error_t err;
-    mc_pSESSINFO inner;
-} neg_PENDING;
-
-#define SESSREQ_LOGID(s) get_ctx_host(s->ctx), get_ctx_port(s->ctx), (void*)s
-
-static int
-sasl_get_username(void *context, int id, const char **result, unsigned int *len)
-{
-    struct mc_SESSINFO *ctx = context;
-    const char *u = NULL, *p = NULL;
-    if (!context || !result || (id != CBSASL_CB_USER && id != CBSASL_CB_AUTHNAME)) {
-        return SASL_BADPARAM;
-    }
-    u = ctx->settings->bucket;
-    p = lcbauth_get_bpass(ctx->settings->auth, ctx->settings->bucket);
-    *result = u;
-    if (len) {
-        *len = (unsigned int)strlen(*result);
-    }
-
-    return SASL_OK;
-}
-
-static int
-sasl_get_password(cbsasl_conn_t *conn, void *context, int id,
-                  cbsasl_secret_t **psecret)
-{
-    struct mc_SESSINFO *ctx = context;
-    if (!conn || ! psecret || id != CBSASL_CB_PASS || ctx == NULL) {
-        return SASL_BADPARAM;
-    }
-
-    *psecret = &ctx->u_auth.secret;
-    return SASL_OK;
-}
-
-static lcb_error_t
-setup_sasl_params(struct mc_SESSINFO *ctx)
-{
-    int ii;
-    cbsasl_callback_t *callbacks = ctx->sasl_callbacks;
-    const char *pass = NULL, *user = NULL;
-
-    callbacks[0].id = CBSASL_CB_USER;
-    callbacks[0].proc = (int( *)(void)) &sasl_get_username;
-
-    callbacks[1].id = CBSASL_CB_AUTHNAME;
-    callbacks[1].proc = (int( *)(void)) &sasl_get_username;
-
-    callbacks[2].id = CBSASL_CB_PASS;
-    callbacks[2].proc = (int( *)(void)) &sasl_get_password;
-
-    callbacks[3].id = CBSASL_CB_LIST_END;
-    callbacks[3].proc = NULL;
-    callbacks[3].context = NULL;
-
-    for (ii = 0; ii < 3; ii++) {
-        callbacks[ii].context = ctx;
-    }
-
-    memset(&ctx->u_auth, 0, sizeof(ctx->u_auth));
-    user = ctx->settings->bucket;
-    pass = lcbauth_get_bpass(ctx->settings->auth, user);
-
-    if (pass) {
-        unsigned long pwlen;
-        lcb_size_t maxlen;
-
-        pwlen = (unsigned long)strlen(pass);
-        maxlen = sizeof(ctx->u_auth.buffer) - offsetof(cbsasl_secret_t, data);
-        ctx->u_auth.secret.len = pwlen;
-
-        if (pwlen < maxlen) {
-            memcpy(ctx->u_auth.secret.data, pass, pwlen);
-        } else {
-            return LCB_EINVAL;
-        }
-    }
-    return LCB_SUCCESS;
-}
-
-static void
-close_cb(lcbio_SOCKET *s, int reusable, void *arg)
-{
-    *(lcbio_SOCKET **)arg = s;
-    lcbio_ref(s);
-    lcb_assert(reusable);
-}
-
-static void
-negotiation_success(mc_pSESSREQ sreq)
-{
-    /** Dislodge the connection, and return it back to the caller */
-    lcbio_SOCKET *s;
-
-    lcbio_ctx_close(sreq->ctx, close_cb, &s);
-    sreq->ctx = NULL;
-
-    lcbio_protoctx_add(s, &sreq->inner->base);
-    sreq->inner = NULL;
-
-    /** Invoke the callback, marking it a success */
-    sreq->cb(s, sreq->data, LCB_SUCCESS, 0);
-    lcbio_unref(s);
-    cleanup_pending(sreq);
-}
-
-static void
-bail_pending(mc_pSESSREQ sreq)
-{
-    sreq->cb(NULL, sreq->data, sreq->err, 0);
-    cleanup_pending(sreq);
-}
-
-static void
-set_error_ex(mc_pSESSREQ sreq, lcb_error_t err, const char *msg)
-{
-    lcb_log(LOGARGS(sreq, ERR), SESSREQ_LOGFMT "Error: 0x%x, %s", SESSREQ_LOGID(sreq), err, msg);
-    if (sreq->err == LCB_SUCCESS) {
-        sreq->err = err;
-    }
-}
-
-static void
-timeout_handler(void *arg)
-{
-    mc_pSESSREQ sreq = arg;
-    set_error_ex(sreq, LCB_ETIMEDOUT, "Negotiation timed out");
-    bail_pending(sreq);
-}
-
-/**
- * Called to retrive the mechlist from the packet.
- * @return 0 to continue authentication, 1 if no authentication needed, or
- * -1 on error.
- */
-static int
-set_chosen_mech(mc_pSESSREQ sreq, lcb_string *mechlist, const char **data,
-                unsigned int *ndata)
-{
-    cbsasl_error_t saslerr;
-    const char *chosenmech;
-    mc_pSESSINFO ctx = sreq->inner;
-
-    lcb_assert(sreq->inner);
-    if (ctx->settings->sasl_mech_force) {
-        char *forcemech = ctx->settings->sasl_mech_force;
-        if (!strstr(mechlist->base, forcemech)) {
-            /** Requested mechanism not found */
-            set_error_ex(sreq, LCB_SASLMECH_UNAVAILABLE, mechlist->base);
-            return -1;
-        }
-
-        lcb_string_clear(mechlist);
-        if (lcb_string_appendz(mechlist, forcemech)) {
-            set_error_ex(sreq, LCB_CLIENT_ENOMEM, NULL);
-            return -1;
-        }
-    }
-
-    saslerr = cbsasl_client_start(ctx->sasl, mechlist->base,
-                                  NULL, data, ndata, &chosenmech);
-    switch (saslerr) {
-    case SASL_OK:
-        ctx->nmech = strlen(chosenmech);
-        if (! (ctx->mech = strdup(chosenmech)) ) {
-            set_error_ex(sreq, LCB_CLIENT_ENOMEM, NULL);
-            return -1;
-        }
-        return 0;
-    case SASL_NOMECH:
-        lcb_log(LOGARGS(sreq, INFO), SESSREQ_LOGFMT "Server does not support SASL (no mechanisms supported)", SESSREQ_LOGID(sreq));
-        return 1;
-        break;
-    default:
-        lcb_log(LOGARGS(sreq, INFO), SESSREQ_LOGFMT "cbsasl_client_start returned %d", SESSREQ_LOGID(sreq), saslerr);
-        set_error_ex(sreq, LCB_EINTERNAL, "Couldn't start SASL client");
-        return -1;
-    }
-}
-
-/**
- * Given the specific mechanisms, send the auth packet to the server.
- */
-static int
-send_sasl_auth(neg_PENDING *pend, const char *sasl_data, unsigned ndata)
-{
-    mc_pSESSINFO ctx = pend->inner;
-    protocol_binary_request_no_extras req;
-    protocol_binary_request_header *hdr = &req.message.header;
-    memset(&req, 0, sizeof(req));
-
-    hdr->request.magic = PROTOCOL_BINARY_REQ;
-    hdr->request.opcode = PROTOCOL_BINARY_CMD_SASL_AUTH;
-    hdr->request.keylen = htons((lcb_uint16_t)ctx->nmech);
-    hdr->request.datatype = PROTOCOL_BINARY_RAW_BYTES;
-    hdr->request.bodylen = htonl((lcb_uint32_t)ndata + ctx->nmech);
-
-    lcbio_ctx_put(pend->ctx, req.bytes, sizeof(req.bytes));
-    lcbio_ctx_put(pend->ctx, ctx->mech, ctx->nmech);
-    lcbio_ctx_put(pend->ctx, sasl_data, ndata);
-    lcbio_ctx_rwant(pend->ctx, 24);
-    return 0;
-}
-
-static int
-send_sasl_step(mc_pSESSREQ sreq, packet_info *packet)
-{
-    protocol_binary_request_no_extras req;
-    protocol_binary_request_header *hdr = &req.message.header;
-    cbsasl_error_t saslerr;
-    const char *step_data;
-    unsigned int ndata;
-    mc_pSESSINFO ctx = sreq->inner;
-
-    saslerr = cbsasl_client_step(
-            ctx->sasl, packet->payload, PACKET_NBODY(packet), NULL, &step_data,
-            &ndata);
-
-    if (saslerr != SASL_CONTINUE) {
-        set_error_ex(sreq, LCB_EINTERNAL, "Unable to perform SASL STEP");
-        return -1;
-    }
-
-    memset(&req, 0, sizeof(req));
-    hdr->request.magic = PROTOCOL_BINARY_REQ;
-    hdr->request.opcode = PROTOCOL_BINARY_CMD_SASL_STEP;
-    hdr->request.keylen = htons((uint16_t)ctx->nmech);
-    hdr->request.bodylen = htonl((uint32_t)ndata + ctx->nmech);
-    hdr->request.datatype = PROTOCOL_BINARY_RAW_BYTES;
-
-    lcbio_ctx_put(sreq->ctx, req.bytes, sizeof(req.bytes));
-    lcbio_ctx_put(sreq->ctx, ctx->mech, ctx->nmech);
-    lcbio_ctx_put(sreq->ctx, step_data, ndata);
-    lcbio_ctx_rwant(sreq->ctx, 24);
-    return 0;
-}
-
-static int
-send_hello(mc_pSESSREQ sreq)
-{
-    protocol_binary_request_no_extras req;
-    protocol_binary_request_header *hdr = &req.message.header;
-    unsigned ii;
-    const char *external_id = "";
-    const char *comma = "";
-    char client_id[200] = { 0 };
-    lcb_U16 features[MEMCACHED_TOTAL_HELLO_FEATURES];
-    unsigned nfeatures = 0;
-    size_t nclistr;
-
-    features[nfeatures++] = PROTOCOL_BINARY_FEATURE_TLS;
-    if (sreq->inner->settings->tcp_nodelay) {
-        features[nfeatures++] = PROTOCOL_BINARY_FEATURE_TCPNODELAY;
-    }
-
-#ifndef LCB_NO_SNAPPY
-    if (sreq->inner->settings->compressopts != LCB_COMPRESS_NONE) {
-        features[nfeatures++] = PROTOCOL_BINARY_FEATURE_DATATYPE;
-    }
-#endif
-
-    if (sreq->inner->settings->fetch_mutation_tokens) {
-        features[nfeatures++] = PROTOCOL_BINARY_FEATURE_MUTATION_SEQNO;
-    }
-
-    if (sreq->inner->settings->client_string) {
-        external_id = sreq->inner->settings->client_string;
-        comma = ", ";
-    }
-
-    snprintf(client_id, 199, "libcouchbase/%s%s%s",
-        LCB_VERSION_STRING, comma, external_id);
-    nclistr = strlen(client_id);
-
-    memset(&req, 0, sizeof req);
-    hdr->request.opcode = PROTOCOL_BINARY_CMD_HELLO;
-    hdr->request.magic = PROTOCOL_BINARY_REQ;
-    hdr->request.keylen = htons((lcb_U16)nclistr);
-    hdr->request.bodylen = htonl((lcb_U32)(nclistr+ (sizeof features[0]) * nfeatures));
-    hdr->request.datatype = PROTOCOL_BINARY_RAW_BYTES;
-
-    lcbio_ctx_put(sreq->ctx, req.bytes, sizeof req.bytes);
-    lcbio_ctx_put(sreq->ctx, client_id, strlen(client_id));
-    for (ii = 0; ii < nfeatures; ii++) {
-        lcb_U16 tmp = htons(features[ii]);
-        lcbio_ctx_put(sreq->ctx, &tmp, sizeof tmp);
-    }
-    lcbio_ctx_rwant(sreq->ctx, 24);
-    return 0;
-}
-
-static int
-parse_hello(mc_pSESSREQ sreq, packet_info *packet)
-{
-    /* some caps */
-    const char *cur;
-    const char *payload = PACKET_BODY(packet);
-    const char *limit = payload + PACKET_NBODY(packet);
-    for (cur = payload; cur < limit; cur += 2) {
-        lcb_U16 tmp;
-        memcpy(&tmp, cur, sizeof(tmp));
-        tmp = ntohs(tmp);
-        lcb_log(LOGARGS(sreq, DEBUG), SESSREQ_LOGFMT "Found feature 0x%x (%s)", SESSREQ_LOGID(sreq), tmp, protocol_feature_2_text(tmp));
-        sreq->inner->features[tmp] = 1;
-    }
-    return 0;
-}
-
-
-typedef enum {
-    SREQ_S_WAIT,
-    SREQ_S_AUTHDONE,
-    SREQ_S_HELLODONE,
-    SREQ_S_ERROR
-} sreq_STATE;
-
-/**
- * It's assumed the server buffers will be reset upon close(), so we must make
- * sure to _not_ release the ringbuffer if that happens.
- */
-static void
-handle_read(lcbio_CTX *ioctx, unsigned nb)
-{
-    mc_pSESSREQ sreq = lcbio_ctx_data(ioctx);
-    packet_info info;
-    unsigned required;
-    uint16_t status;
-    sreq_STATE state = SREQ_S_WAIT;
-    int rc;
-
-    GT_NEXT_PACKET:
-
-    memset(&info, 0, sizeof(info));
-    rc = lcb_pktinfo_ectx_get(&info, ioctx, &required);
-    if (rc == 0) {
-        LCBIO_CTX_RSCHEDULE(ioctx, required);
-        return;
-    } else if (rc < 0) {
-        state = SREQ_S_ERROR;
-    }
-
-    status = PACKET_STATUS(&info);
-
-    switch (PACKET_OPCODE(&info)) {
-    case PROTOCOL_BINARY_CMD_SASL_LIST_MECHS: {
-        lcb_string str;
-        int saslrc;
-        const char *mechlist_data;
-        unsigned int nmechlist_data;
-        if (lcb_string_init(&str)) {
-            set_error_ex(sreq, LCB_CLIENT_ENOMEM, NULL);
-            state = SREQ_S_ERROR;
-            break;
-        }
-
-        if (lcb_string_append(&str, info.payload, PACKET_NBODY(&info))) {
-            lcb_string_release(&str);
-            set_error_ex(sreq, LCB_CLIENT_ENOMEM, NULL);
-            state = SREQ_S_ERROR;
-            break;
-        }
-
-        saslrc = set_chosen_mech(sreq, &str, &mechlist_data, &nmechlist_data);
-        if (saslrc == 0) {
-            if (0 == send_sasl_auth(sreq, mechlist_data, nmechlist_data)) {
-                state = SREQ_S_WAIT;
-            } else {
-                state = SREQ_S_ERROR;
-            }
-
-        } else if (saslrc < 0) {
-            state = SREQ_S_ERROR;
-
-        } else {
-            state = SREQ_S_HELLODONE;
-        }
-        lcb_string_release(&str);
-        break;
-    }
-
-    case PROTOCOL_BINARY_CMD_SASL_AUTH: {
-        if (status == PROTOCOL_BINARY_RESPONSE_SUCCESS) {
-            send_hello(sreq);
-            state = SREQ_S_AUTHDONE;
-            break;
-        }
-
-        if (status != PROTOCOL_BINARY_RESPONSE_AUTH_CONTINUE) {
-            set_error_ex(sreq, LCB_AUTH_ERROR, "SASL AUTH failed");
-            state = SREQ_S_ERROR;
-            break;
-        }
-        if (send_sasl_step(sreq, &info) == 0 && send_hello(sreq) == 0) {
-            state = SREQ_S_WAIT;
-        } else {
-            state = SREQ_S_ERROR;
-        }
-        break;
-    }
-
-    case PROTOCOL_BINARY_CMD_SASL_STEP: {
-        if (status != PROTOCOL_BINARY_RESPONSE_SUCCESS) {
-            lcb_log(LOGARGS(sreq, WARN), SESSREQ_LOGFMT "SASL auth failed with STATUS=0x%x", SESSREQ_LOGID(sreq), status);
-            set_error_ex(sreq, LCB_AUTH_ERROR, "SASL Step Failed");
-            state = SREQ_S_ERROR;
-        } else {
-            /* Wait for pipelined HELLO response */
-            state = SREQ_S_AUTHDONE;
-        }
-        break;
-    }
-
-    case PROTOCOL_BINARY_CMD_HELLO: {
-        state = SREQ_S_HELLODONE;
-        if (status == PROTOCOL_BINARY_RESPONSE_SUCCESS) {
-            parse_hello(sreq, &info);
-        } else if (status == PROTOCOL_BINARY_RESPONSE_UNKNOWN_COMMAND ||
-                status == PROTOCOL_BINARY_RESPONSE_NOT_SUPPORTED) {
-            lcb_log(LOGARGS(sreq, DEBUG), SESSREQ_LOGFMT "Server does not support HELLO", SESSREQ_LOGID(sreq));
-            /* nothing */
-        } else {
-            set_error_ex(sreq, LCB_PROTOCOL_ERROR, "Hello response unexpected");
-            state = SREQ_S_ERROR;
-        }
-        break;
-    }
-
-    default: {
-        state = SREQ_S_ERROR;
-        lcb_log(LOGARGS(sreq, ERROR), SESSREQ_LOGFMT "Received unknown response. OP=0x%x. RC=0x%x", SESSREQ_LOGID(sreq), PACKET_OPCODE(&info), PACKET_STATUS(&info));
-        set_error_ex(sreq, LCB_NOT_SUPPORTED, "Received unknown response");
-        break;
-    }
-    }
-
-    lcb_pktinfo_ectx_done(&info, ioctx);
-    if (sreq->err != LCB_SUCCESS) {
-        bail_pending(sreq);
-    } else if (state == SREQ_S_ERROR) {
-        set_error_ex(sreq, LCB_ERROR, "FIXME: Error code set without description");
-    } else if (state == SREQ_S_HELLODONE) {
-        negotiation_success(sreq);
-    } else {
-        goto GT_NEXT_PACKET;
-    }
-
-    (void)nb;
-}
-
-static void
-handle_ioerr(lcbio_CTX *ctx, lcb_error_t err)
-{
-    mc_pSESSREQ sreq = lcbio_ctx_data(ctx);
-    set_error_ex(sreq, err, "IO Error");
-    bail_pending(sreq);
-}
-
-static void
-cleanup_negotiated(mc_pSESSINFO ctx)
-{
-    if (ctx->sasl) {
-        cbsasl_dispose(&ctx->sasl);
-    }
-    if (ctx->mech) {
-        free(ctx->mech);
-    }
-    free(ctx);
-}
-
-static void
-cleanup_pending(mc_pSESSREQ sreq)
-{
-    if (sreq->inner) {
-        cleanup_negotiated(sreq->inner);
-        sreq->inner = NULL;
-    }
-    if (sreq->timer) {
-        lcbio_timer_destroy(sreq->timer);
-        sreq->timer = NULL;
-    }
-    if (sreq->ctx) {
-        lcbio_ctx_close(sreq->ctx, NULL, NULL);
-        sreq->ctx = NULL;
-    }
-    free(sreq);
-}
-
-void
-mc_sessreq_cancel(mc_pSESSREQ sreq)
-{
-    cleanup_pending(sreq);
-}
-
-mc_pSESSREQ
-mc_sessreq_start(lcbio_SOCKET *sock, lcb_settings *settings,
-              uint32_t tmo, lcbio_CONNDONE_cb callback, void *data)
-{
-    lcb_error_t err;
-    cbsasl_error_t saslerr;
-    protocol_binary_request_no_extras req;
-    const lcb_host_t *curhost;
-    struct lcbio_NAMEINFO nistrs;
-    mc_pSESSREQ sreq;
-    mc_pSESSINFO sasl;
-    lcbio_CTXPROCS procs;
-
-    if ((sreq = calloc(1, sizeof(*sreq))) == NULL) {
-        return NULL;
-    }
-
-    if ((sasl = calloc(1, sizeof(*sasl))) == NULL) {
-        cleanup_pending(sreq);
-        return NULL;
-    }
-
-    procs.cb_err = handle_ioerr;
-    procs.cb_read = handle_read;
-
-    lcbio_get_nameinfo(sock, &nistrs);
-    sreq->cb = callback;
-    sreq->data = data;
-    sreq->inner = sasl;
-    sreq->timer = lcbio_timer_new(sock->io, sreq, timeout_handler);
-
-    if ((err = lcbio_sslify_if_needed(sock, settings)) != LCB_SUCCESS) {
-        set_error_ex(sreq, err, "Couldn't initialize SSL on socket");
-        lcbio_async_signal(sreq->timer);
-        return sreq;
-    }
-
-    sreq->ctx = lcbio_ctx_new(sock, sreq, &procs);
-    sreq->ctx->subsys = "sasl";
-
-    if (tmo) {
-        lcbio_timer_rearm(sreq->timer, tmo);
-    }
-
-    sasl->base.id = LCBIO_PROTOCTX_SESSINFO;
-    sasl->base.dtor = (void (*)(struct lcbio_PROTOCTX *))cleanup_negotiated;
-    sasl->settings = settings;
-
-    err = setup_sasl_params(sasl);
-    if (err != LCB_SUCCESS) {
-        cleanup_pending(sreq);
-        return NULL;
-    }
-
-
-    curhost = lcbio_get_host(sock);
-    saslerr = cbsasl_client_new(
-            "couchbase", curhost->host, nistrs.local, nistrs.remote,
-            sasl->sasl_callbacks, 0, &sasl->sasl);
-
-    if (saslerr != SASL_OK) {
-        cleanup_pending(sreq);
-        return NULL;
-    }
-
-    memset(&req, 0, sizeof(req));
-    req.message.header.request.magic = PROTOCOL_BINARY_REQ;
-    req.message.header.request.opcode = PROTOCOL_BINARY_CMD_SASL_LIST_MECHS;
-    req.message.header.request.datatype = PROTOCOL_BINARY_RAW_BYTES;
-    req.message.header.request.bodylen = 0;
-    req.message.header.request.keylen = 0;
-    req.message.header.request.opaque = 0;
-
-    lcbio_ctx_put(sreq->ctx, req.bytes, sizeof(req.bytes));
-    LCBIO_CTX_RSCHEDULE(sreq->ctx, 24);
-    return sreq;
-}
-
-mc_pSESSINFO
-mc_sess_get(lcbio_SOCKET *sock)
-{
-    return (void *)lcbio_protoctx_get(sock, LCBIO_PROTOCTX_SESSINFO);
-}
-
-const char *
-mc_sess_get_saslmech(mc_pSESSINFO info)
-{
-    return info->mech;
-}
-
-int
-mc_sess_chkfeature(mc_pSESSINFO info, lcb_U16 feature)
-{
-    if (feature > MEMCACHED_TOTAL_HELLO_FEATURES) {
-        return 0;
-    }
-    return info->features[feature];
-}