← Back to branch summary

~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to drizzled/function/math/mod.cc

  • Committer: Brian Aker
  • Date: 2009-05-11 17:50:22 UTC
  • Revision ID: brian@gaz-20090511175022-y35q9ky6uh9ldcjt
Replacing Sun employee copyright headers (aka... anything done by a Sun
employee is copyright by Sun).

Show diffs side-by-side

added added

removed removed

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