~drizzle-trunk/drizzle/development

/* -*- mode: c++; c-basic-offset: 2; indent-tabs-mode: nil; -*-

 *  vim:expandtab:shiftwidth=2:tabstop=2:smarttab:

 *

 *  Copyright (C) 2008 Sun Microsystems

 *

 *  This program is free software; you can redistribute it and/or modify

 *  it under the terms of the GNU General Public License as published by

 *  the Free Software Foundation; version 2 of the License.

 *

 *  This program is distributed in the hope that it will be useful,

 *  but WITHOUT ANY WARRANTY; without even the implied warranty of

 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

 *  GNU General Public License for more details.

 *

 *  You should have received a copy of the GNU General Public License

 *  along with this program; if not, write to the Free Software

 *  Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA

 */

#include <drizzled/server_includes.h>

#include CSTDINT_H

#include <drizzled/functions/floor.h>

#include CMATH_H

#if defined(CMATH_NAMESPACE)

using namespace CMATH_NAMESPACE;

#endif

int64_t Item_func_floor::int_op()

{

  int64_t result;

  switch (args[0]->result_type()) {

  case INT_RESULT:

    result= args[0]->val_int();

    null_value= args[0]->null_value;

    break;

  case DECIMAL_RESULT:

  {

    my_decimal dec_buf, *dec;

    if ((dec= Item_func_floor::decimal_op(&dec_buf)))

      my_decimal2int(E_DEC_FATAL_ERROR, dec, unsigned_flag, &result);

    else

      result= 0;

    break;

  }

  default:

    result= (int64_t)Item_func_floor::real_op();

  };

  return result;

}

double Item_func_floor::real_op()

{

  /*

    the volatile's for BUG #3051 to calm optimizer down (because of gcc's

    bug)

  */

  volatile double value= args[0]->val_real();

  null_value= args[0]->null_value;

  return floor(value);

}

my_decimal *Item_func_floor::decimal_op(my_decimal *decimal_value)

{

  my_decimal val, *value= args[0]->val_decimal(&val);

  if (!(null_value= (args[0]->null_value ||

                     my_decimal_floor(E_DEC_FATAL_ERROR, value,

                                      decimal_value) > 1)))

    return decimal_value;

  return 0;

}