1
/* -*- mode: c++; c-basic-offset: 2; indent-tabs-mode: nil; -*-
2
* vim:expandtab:shiftwidth=2:tabstop=2:smarttab:
4
* Copyright (C) 2008 Sun Microsystems
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.
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.
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
20
#include <drizzled/server_includes.h>
21
#include <drizzled/function/numhybrid.h>
23
void Item_func_numhybrid::fix_num_length_and_dec()
26
void Item_func_numhybrid::fix_length_and_dec()
28
fix_num_length_and_dec();
32
String *Item_func_numhybrid::val_str(String *str)
35
switch (hybrid_type) {
38
my_decimal decimal_value, *val;
39
if (!(val= decimal_op(&decimal_value)))
40
return 0; // null is set
41
my_decimal_round(E_DEC_FATAL_ERROR, val, decimals, false, val);
42
my_decimal2string(E_DEC_FATAL_ERROR, val, 0, 0, 0, str);
50
str->set_int(nr, unsigned_flag, &my_charset_bin);
58
str->set_real(nr,decimals,&my_charset_bin);
62
return str_op(&str_value);
70
double Item_func_numhybrid::val_real()
73
switch (hybrid_type) {
76
my_decimal decimal_value, *val;
78
if (!(val= decimal_op(&decimal_value)))
79
return 0.0; // null is set
80
my_decimal2double(E_DEC_FATAL_ERROR, val, &result);
85
int64_t result= int_op();
86
return unsigned_flag ? (double) ((uint64_t) result) : (double) result;
94
String *res= str_op(&str_value);
95
return (res ? my_strntod(res->charset(), (char*) res->ptr(), res->length(),
96
&end_not_used, &err_not_used) : 0.0);
105
int64_t Item_func_numhybrid::val_int()
108
switch (hybrid_type) {
111
my_decimal decimal_value, *val;
112
if (!(val= decimal_op(&decimal_value)))
113
return 0; // null is set
115
my_decimal2int(E_DEC_FATAL_ERROR, val, unsigned_flag, &result);
121
return (int64_t) rint(real_op());
126
if (!(res= str_op(&str_value)))
129
char *end= (char*) res->ptr() + res->length();
130
const CHARSET_INFO * const cs= str_value.charset();
131
return (*(cs->cset->strtoll10))(cs, res->ptr(), &end, &err_not_used);
140
my_decimal *Item_func_numhybrid::val_decimal(my_decimal *decimal_value)
142
my_decimal *val= decimal_value;
144
switch (hybrid_type) {
146
val= decimal_op(decimal_value);
150
int64_t result= int_op();
151
int2my_decimal(E_DEC_FATAL_ERROR, result, unsigned_flag, decimal_value);
156
double result= (double)real_op();
157
double2my_decimal(E_DEC_FATAL_ERROR, result, decimal_value);
163
if (!(res= str_op(&str_value)))
166
str2my_decimal(E_DEC_FATAL_ERROR, (char*) res->ptr(),
167
res->length(), res->charset(), decimal_value);