~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to drizzled/functions/str/strfunc.cc

  • Committer: Monty Taylor
  • Date: 2008-11-07 04:45:58 UTC
  • mfrom: (574.3.4 drizzle-clean-code)
  • mto: This revision was merged to the branch mainline in revision 579.
  • Revision ID: monty@inaugust.com-20081107044558-2me2c70ksfr3qs9i
Merged from Lee (and from trunk by proxy)

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
/* Copyright (C) 2000-2006 MySQL AB
 
2
 
 
3
   This program is free software; you can redistribute it and/or modify
 
4
   it under the terms of the GNU General Public License as published by
 
5
   the Free Software Foundation; version 2 of the License.
 
6
 
 
7
   This program is distributed in the hope that it will be useful,
 
8
   but WITHOUT ANY WARRANTY; without even the implied warranty of
 
9
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 
10
   GNU General Public License for more details.
 
11
 
 
12
   You should have received a copy of the GNU General Public License
 
13
   along with this program; if not, write to the Free Software
 
14
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */
 
15
 
 
16
 
 
17
/**
 
18
  @file
 
19
 
 
20
  @brief
 
21
  This file defines all string functions
 
22
 
 
23
  @warning
 
24
    Some string functions don't always put and end-null on a String.
 
25
    (This shouldn't be needed)
 
26
*/
 
27
 
 
28
#include <drizzled/server_includes.h>
 
29
#include <mysys/sha1.h>
 
30
#include <zlib.h>
 
31
#include <drizzled/query_id.h>
 
32
#include <uuid/uuid.h>
 
33
#include <drizzled/data_home.h>
 
34
#include <drizzled/error.h>
 
35
 
 
36
// For soundex_map
 
37
#include <mysys/my_static.h>
 
38
#include CMATH_H
 
39
 
 
40
#if defined(CMATH_NAMESPACE)
 
41
using namespace CMATH_NAMESPACE;
 
42
#endif
 
43
 
 
44
using namespace std;
 
45
 
 
46
bool Item_str_func::fix_fields(Session *session, Item **ref)
 
47
{
 
48
  bool res= Item_func::fix_fields(session, ref);
 
49
  /*
 
50
    In Item_str_func::check_well_formed_result() we may set null_value
 
51
    flag on the same condition as in test() below.
 
52
  */
 
53
  maybe_null= (maybe_null || true);
 
54
  return res;
 
55
}
 
56
 
 
57
 
 
58
my_decimal *Item_str_func::val_decimal(my_decimal *decimal_value)
 
59
{
 
60
  assert(fixed == 1);
 
61
  char buff[64];
 
62
  String *res, tmp(buff,sizeof(buff), &my_charset_bin);
 
63
  res= val_str(&tmp);
 
64
  if (!res)
 
65
    return 0;
 
66
  (void)str2my_decimal(E_DEC_FATAL_ERROR, (char*) res->ptr(),
 
67
                       res->length(), res->charset(), decimal_value);
 
68
  return decimal_value;
 
69
}
 
70
 
 
71
 
 
72
double Item_str_func::val_real()
 
73
{
 
74
  assert(fixed == 1);
 
75
  int err_not_used;
 
76
  char *end_not_used, buff[64];
 
77
  String *res, tmp(buff,sizeof(buff), &my_charset_bin);
 
78
  res= val_str(&tmp);
 
79
  return res ? my_strntod(res->charset(), (char*) res->ptr(), res->length(),
 
80
                          &end_not_used, &err_not_used) : 0.0;
 
81
}
 
82
 
 
83
 
 
84
int64_t Item_str_func::val_int()
 
85
{
 
86
  assert(fixed == 1);
 
87
  int err;
 
88
  char buff[22];
 
89
  String *res, tmp(buff,sizeof(buff), &my_charset_bin);
 
90
  res= val_str(&tmp);
 
91
  return (res ?
 
92
          my_strntoll(res->charset(), res->ptr(), res->length(), 10, NULL,
 
93
                      &err) :
 
94
          (int64_t) 0);
 
95
}
 
96
 
 
97
void Item_str_func::left_right_max_length()
 
98
{
 
99
  max_length=args[0]->max_length;
 
100
  if (args[1]->const_item())
 
101
  {
 
102
    int length=(int) args[1]->val_int()*collation.collation->mbmaxlen;
 
103
    if (length <= 0)
 
104
      max_length=0;
 
105
    else
 
106
      set_if_smaller(max_length,(uint) length);
 
107
  }
 
108
}
 
109