~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
1241.9.36 by Monty Taylor
ZOMG. I deleted drizzled/server_includes.h.
20
#include "config.h"
574.3.3 by Lee
moving functions from item_strfunc to functions/str directory
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
  if (use_mb(res->charset()))
47
  {
48
    register uint32_t l;
49
    while (ptr < end)
50
    {
51
      if ((l= my_ismbchar(res->charset(),ptr,end)))
52
      {
53
        tmp-= l;
54
        memcpy(tmp,ptr,l);
55
        ptr+= l;
56
      }
57
      else
58
        *--tmp= *ptr++;
59
    }
60
  }
61
  else
62
  {
63
    while (ptr < end)
64
      *--tmp= *ptr++;
65
  }
66
  return &tmp_value;
67
}
68
69
70
void Item_func_reverse::fix_length_and_dec()
71
{
72
  collation.set(args[0]->collation);
73
  max_length = args[0]->max_length;
74
}