~drizzle-trunk/drizzle/development

574.3.3 by Lee
moving functions from item_strfunc to functions/str directory
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
670.1.20 by Monty Taylor
Renamed functions to function... everything else is singular.
22
#include <drizzled/function/str/reverse.h>
574.3.3 by Lee
moving functions from item_strfunc to functions/str directory
23
24
String *Item_func_reverse::val_str(String *str)
25
{
26
  assert(fixed == 1);
27
  String *res = args[0]->val_str(str);
28
  char *ptr, *end, *tmp;
29
30
  if ((null_value=args[0]->null_value))
31
    return 0;
32
  /* An empty string is a special case as the string pointer may be null */
33
  if (!res->length())
34
    return &my_empty_string;
35
  if (tmp_value.alloced_length() < res->length() &&
36
      tmp_value.realloc(res->length()))
37
  {
38
    null_value= 1;
39
    return 0;
40
  }
41
  tmp_value.length(res->length());
42
  tmp_value.set_charset(res->charset());
43
  ptr= (char *) res->ptr();
44
  end= ptr + res->length();
45
  tmp= (char *) tmp_value.ptr() + tmp_value.length();
46
#ifdef USE_MB
47
  if (use_mb(res->charset()))
48
  {
49
    register uint32_t l;
50
    while (ptr < end)
51
    {
52
      if ((l= my_ismbchar(res->charset(),ptr,end)))
53
      {
54
        tmp-= l;
55
        memcpy(tmp,ptr,l);
56
        ptr+= l;
57
      }
58
      else
59
        *--tmp= *ptr++;
60
    }
61
  }
62
  else
63
#endif /* USE_MB */
64
  {
65
    while (ptr < end)
66
      *--tmp= *ptr++;
67
  }
68
  return &tmp_value;
69
}
70
71
72
void Item_func_reverse::fix_length_and_dec()
73
{
74
  collation.set(args[0]->collation);
75
  max_length = args[0]->max_length;
76
}