~drizzle-trunk/drizzle/development

492.3.1 by Lee
break out item_real_func into functions directory
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
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 <drizzled/server_includes.h>
572.1.4 by Monty Taylor
Removed a bunch of unusued tests and defines from autoconf.
21
#include <drizzled/functions/real.h>
492.3.1 by Lee
break out item_real_func into functions directory
22
23
#include CSTDINT_H
24
#include <cassert>
520.9.1 by mordred
More solaris fixes.
25
#if defined(HAVE_IEEEFP_H)
26
# include <ieeefp.h>
27
#endif
572.1.4 by Monty Taylor
Removed a bunch of unusued tests and defines from autoconf.
28
#include CMATH_H
492.3.1 by Lee
break out item_real_func into functions directory
29
572.1.4 by Monty Taylor
Removed a bunch of unusued tests and defines from autoconf.
30
#if defined(CMATH_NAMESPACE)
31
using namespace CMATH_NAMESPACE;
32
#endif
520.4.44 by mordred
A whole bunch of solaris/sun studio compile fixes.
33
492.3.1 by Lee
break out item_real_func into functions directory
34
String *Item_real_func::val_str(String *str)
35
{
36
  assert(fixed == 1);
37
  double nr= val_real();
38
  if (null_value)
39
    return 0; /* purecov: inspected */
40
  str->set_real(nr,decimals, &my_charset_bin);
41
  return str;
42
}
43
44
45
my_decimal *Item_real_func::val_decimal(my_decimal *decimal_value)
46
{
47
  assert(fixed);
48
  double nr= val_real();
49
  if (null_value)
50
    return 0; /* purecov: inspected */
51
  double2my_decimal(E_DEC_FATAL_ERROR, nr, decimal_value);
52
  return decimal_value;
53
}
54
572.1.4 by Monty Taylor
Removed a bunch of unusued tests and defines from autoconf.
55
int64_t Item_real_func::val_int()
56
{
57
  assert(fixed == 1);
58
  return (int64_t) rint(val_real());
59
}
60
61
void Item_real_func::fix_length_and_dec()
62
{
63
  decimals= NOT_FIXED_DEC;
64
  max_length= float_length(decimals);
65
}
492.3.1 by Lee
break out item_real_func into functions directory
66