/* - 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;
}
