~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to drizzled/functions/mod.cc

  • Committer: Brian Aker
  • Date: 2008-10-13 16:50:30 UTC
  • mfrom: (509.1.4 codestyle)
  • Revision ID: brian@tangent.org-20081013165030-642le57opeglwfdw
Merge from Monty

Show diffs side-by-side

added added

removed removed

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