~drizzle-trunk/drizzle/development

/* - mode: c; c-basic-offset: 2; indent-tabs-mode: nil; -*-

 *  vim:expandtab:shiftwidth=2:tabstop=2:smarttab:

 *

 * Copyright (C) 2009, Patrick "CaptTofu" Galbraith, Padraig O'Sullivan

 * All rights reserved.

 *

 * Redistribution and use in source and binary forms, with or without

 * modification, are permitted provided that the following conditions are met:

 *

 *   * Redistributions of source code must retain the above copyright notice,

 *     this list of conditions and the following disclaimer.

 *   * Redistributions in binary form must reproduce the above copyright notice,

 *     this list of conditions and the following disclaimer in the documentation

 *     and/or other materials provided with the distribution.

 *   * Neither the name of Patrick Galbraith nor the names of its contributors

 *     may be used to endorse or promote products derived from this software

 *     without specific prior written permission.

 *

 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"

 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE

 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE

 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE

 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR

 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF

 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS

 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN

 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)

 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF

 * THE POSSIBILITY OF SUCH DAMAGE.

 */

#include <config.h>

#include <drizzled/function/str/strfunc.h>

#include "memcached_functions.h"

#include "memc_cas_by_key.h"

#include <libmemcached/memcached.h>

#include <string>

using namespace std;

using namespace drizzled;

int64_t MemcachedCasByKey::val_int()

{

  memcached_return rc;

  time_t expiration= 0;

  String *master_key;

  String *key;

  String *res;

  String *cas;

  null_value= false;

  if ((arg_count != 4 && arg_count != 5) ||

      ! (master_key=   args[0]->val_str(&value)) ||

      ! (key=   args[1]->val_str(&value)) ||

      ! (res=   args[2]->val_str(&value)) ||

      ! (cas=   args[3]->val_str(&value)) ||

      ! memc)

  {

    return 0;

  }

  if (arg_count == 5)

  {

    String *tmp_exp= args[4]->val_str(&value);

    expiration= (time_t)atoi(tmp_exp->c_ptr());

  }

  rc= memcached_cas_by_key(memc,

                    master_key->c_ptr(),

                    master_key->length(),

                    key->c_ptr(), key->length(),

                    res->c_ptr(), res->length(),

                    expiration, (uint16_t) 0,

                    (uint64_t) strtol(cas->c_ptr(), (char **)NULL, 10));

  if (rc != MEMCACHED_SUCCESS)

  {

    return 0;

  }

  return 1;

}