~drizzle-trunk/drizzle/development

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

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

 *

 *  Copyright (C) 2008 Sun Microsystems, Inc.

 *

 *  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; version 2 of the License.

 *

 *  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., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA

 */

#include <config.h>

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

#include <drizzled/internal/m_string.h>

namespace drizzled

{

String *Item_func_conv::val_str(String *str)

{

  assert(fixed == 1);

  String *res= args[0]->val_str(str);

  char *endptr,ans[65],*ptr;

  int64_t dec;

  int from_base= (int) args[1]->val_int();

  int to_base= (int) args[2]->val_int();

  int err;

  if (args[0]->null_value || args[1]->null_value || args[2]->null_value ||

      abs(to_base) > 36 || abs(to_base) < 2 ||

      abs(from_base) > 36 || abs(from_base) < 2 || !(res->length()))

  {

    null_value= 1;

    return NULL;

  }

  null_value= 0;

  unsigned_flag= !(from_base < 0);

  if (from_base < 0)

    dec= my_strntoll(res->charset(), res->ptr(), res->length(),

                     -from_base, &endptr, &err);

  else

    dec= (int64_t) my_strntoull(res->charset(), res->ptr(), res->length(),

                                 from_base, &endptr, &err);

  ptr= internal::int64_t2str(dec, ans, to_base);

  str->copy(ans, (uint32_t) (ptr-ans), default_charset());

  return str;

}

} /* namespace drizzled */