Drizzled Public API Documentation

mod.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 <math.h>
22 #include <drizzled/function/math/mod.h>
23 #include <drizzled/type/decimal.h>
24 
25 #include <algorithm>
26 
27 using namespace std;
28 
29 namespace drizzled
30 {
31 
32 int64_t Item_func_mod::int_op()
33 {
34  assert(fixed == 1);
35  int64_t value= args[0]->val_int();
36  int64_t val2= args[1]->val_int();
37  int64_t result;
38 
39  if ((null_value= args[0]->null_value || args[1]->null_value))
40  return 0;
41  if (val2 == 0)
42  {
43  signal_divide_by_null();
44  return 0;
45  }
46 
47  if (args[0]->unsigned_flag)
48  result= args[1]->unsigned_flag ?
49  ((uint64_t) value) % ((uint64_t) val2) : ((uint64_t) value) % val2;
50  else
51  result= args[1]->unsigned_flag ?
52  (int64_t)(value % ((uint64_t) val2)) : (int64_t)(value % val2);
53 
54  return result;
55 }
56 
57 double Item_func_mod::real_op()
58 {
59  assert(fixed == 1);
60  double value= args[0]->val_real();
61  double val2= args[1]->val_real();
62  if ((null_value= args[0]->null_value || args[1]->null_value))
63  return 0.0;
64  if (val2 == 0.0)
65  {
66  signal_divide_by_null();
67  return 0.0;
68  }
69  return fmod(value,val2);
70 }
71 
72 
73 type::Decimal *Item_func_mod::decimal_op(type::Decimal *decimal_value)
74 {
75  type::Decimal value1, *val1;
76  type::Decimal value2, *val2;
77 
78  val1= args[0]->val_decimal(&value1);
79  if ((null_value= args[0]->null_value))
80  return 0;
81  val2= args[1]->val_decimal(&value2);
82  if ((null_value= args[1]->null_value))
83  return 0;
84  switch (class_decimal_mod(E_DEC_FATAL_ERROR & ~E_DEC_DIV_ZERO, decimal_value,
85  val1, val2)) {
86  case E_DEC_TRUNCATED:
87  case E_DEC_OK:
88  return decimal_value;
89  case E_DEC_DIV_ZERO:
90  signal_divide_by_null();
91  default:
92  null_value= 1;
93  return 0;
94  }
95 }
96 
97 
98 void Item_func_mod::result_precision()
99 {
100  decimals= max(args[0]->decimals, args[1]->decimals);
101  max_length= max(args[0]->max_length, args[1]->max_length);
102 }
103 
104 
105 void Item_func_mod::fix_length_and_dec()
106 {
107  Item_num_op::fix_length_and_dec();
108  maybe_null= 1;
109  unsigned_flag= args[0]->unsigned_flag;
110 }
111 
112 } /* namespace drizzled */