Drizzled Public API Documentation

conv.cc
1 /* -*- mode: c++; c-basic-offset: 2; indent-tabs-mode: nil; -*-
2  * vim:expandtab:shiftwidth=2:tabstop=2:smarttab:
3  *
4  * Copyright (C) 2008 Sun Microsystems, Inc.
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; version 2 of the License.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program; if not, write to the Free Software
17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
18  */
19 
20 #include <config.h>
21 #include <drizzled/function/str/conv.h>
22 #include <drizzled/internal/m_string.h>
23 
24 namespace drizzled
25 {
26 
28 {
29  assert(fixed == 1);
30  String *res= args[0]->val_str(str);
31  char *endptr,ans[65],*ptr;
32  int64_t dec;
33  int from_base= (int) args[1]->val_int();
34  int to_base= (int) args[2]->val_int();
35  int err;
36 
37  if (args[0]->null_value || args[1]->null_value || args[2]->null_value ||
38  abs(to_base) > 36 || abs(to_base) < 2 ||
39  abs(from_base) > 36 || abs(from_base) < 2 || !(res->length()))
40  {
41  null_value= 1;
42  return NULL;
43  }
44  null_value= 0;
45  unsigned_flag= !(from_base < 0);
46 
47  if (from_base < 0)
48  dec= my_strntoll(res->charset(), res->ptr(), res->length(),
49  -from_base, &endptr, &err);
50  else
51  dec= (int64_t) my_strntoull(res->charset(), res->ptr(), res->length(),
52  from_base, &endptr, &err);
53 
54  ptr= internal::int64_t2str(dec, ans, to_base);
55  str->copy(ans, (uint32_t) (ptr-ans), default_charset());
56  return str;
57 }
58 
59 
60 } /* namespace drizzled */