pair.C

/* $Id$ */

/*
 *
 * Copyright (C) 2002-2004 Maxwell Krohn (max@okcupid.com)
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License as
 * published by the Free Software Foundation; either version 2, or (at
 * your option) any later version.
 *
 * This program is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
 * USA
 *
 */

#include "pair.h"

void pair_dump1 (const pair_t &p) { p.dump1 (); }
void pair_encode (encode_t *e, str sep, const pair_t &p)
{ p.encode (e, sep); }
void pair_trav (callback<void, const pair_t &>::ref cb, pair_t *p)
{ (*cb) (*p); }

void
pair_t::dump1 () const
{
  warnx << key;
  if (vals.size () == 0) {
    warnx << "\n";
    return;
  }
  warnx << " --> ";
  if (vals[0])
    warnx << vals[0];

  warnx << "\n";
}

//
// XXX - todo -- fold this and the following into one function
//
vec<u_int64_t> *
pair_t::to_uint64 () const
{
  vec<u_int64_t> *ret = NULL;
  const char *nptr;
  char *endptr;
  size_t s;

  switch (uis) {
  case IV_ST_NONE:
    s = vals.size ();
    uivals.setsize (s);
    for (u_int i = 0; i < s; i++) {

      nptr = vals[i].cstr();
      endptr = NULL;

      errno = 0;
      uivals[i] = strtoull (nptr, &endptr, 0);
      if (*endptr || endptr == nptr) {
	uis = IV_ST_FAIL;
	break;
      }
    }
    if (uis != IV_ST_FAIL) {
      uis = IV_ST_OK;
      ret = &uivals;
    }
    break;
  case IV_ST_OK:
    ret = &uivals;
    break;
  case IV_ST_FAIL:
  default:
    break;
  }

  return ret;
}

vec<int64_t> *
pair_t::to_int () const
{
  vec<int64_t> *ret = NULL;
  const char *nptr;
  char *endptr;
  size_t s;

  switch (is) {
  case IV_ST_NONE:
    {
      s = vals.size ();
      ivals.setsize (s);
      for (u_int i = 0; i < s; i++) {

	nptr = vals[i].cstr();
	endptr = NULL;

	errno = 0;
	ivals[i] = strtoll (nptr, &endptr, 0);
	if (*endptr || endptr == nptr || errno == ERANGE) {
	  is = IV_ST_FAIL;
	  break;
	}
      }
      if (is != IV_ST_FAIL) {
	is = IV_ST_OK;
	ret = &ivals;
      }
      break;
    }
  case IV_ST_OK:
    ret = &ivals;
    break;
  case IV_ST_FAIL:
  default:
    break;
  }
  return ret;
}

bool
pair_t::to_int (int64_t *v) const
{
  vec<int64_t> *p = to_int ();
  if (p && p->size () > 0) {
    *v = (*p)[0];
    return true;
  } 
  return false;
}

bool
pair_t::to_uint64 (u_int64_t *v) const
{
  vec<u_int64_t> *p = to_uint64 ();
  if (p && p->size () > 0) {
    *v = (*p)[0];
    return true;
  }
  return false;
}


bool
pair_t::to_double (double *dp) const 
{
  bool ret = false;
  if (vals.size() > 0) {
    const char *start = vals[0].cstr ();
    char *ep = NULL;
    double d = strtod(start, &ep);
    if (ep && *ep == '\0') {
      ret = true;
      *dp = d;
    }
  }
  return ret;
}