1
1
/* -*- mode: c++; c-basic-offset: 2; indent-tabs-mode: nil; -*-
2
2
* vim:expandtab:shiftwidth=2:tabstop=2:smarttab:
4
* Copyright (C) 2008 Sun Microsystems, Inc.
4
* Copyright (C) 2008 Sun Microsystems
6
6
* This program is free software; you can redistribute it and/or modify
7
7
* it under the terms of the GNU General Public License as published by
17
17
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
20
#include <drizzled/server_includes.h>
21
21
#include <drizzled/dtcollation.h>
23
23
#include <drizzled/definitions.h>
24
#include "drizzled/internal/my_sys.h"
25
#include "drizzled/charset_info.h"
24
#include <mysys/my_sys.h>
25
#include <mystrings/m_ctype.h>
26
26
#include <drizzled/error.h>
27
27
#include <drizzled/function/str/conv_charset.h>
28
28
#include <drizzled/session.h>
29
#include "drizzled/charset.h"
32
left_is_superset(const DTCollation &left, const DTCollation &right)
34
/* Allow convert to Unicode */
35
if (left.collation->state & MY_CS_UNICODE &&
36
(left.derivation < right.derivation ||
37
(left.derivation == right.derivation &&
38
!(right.collation->state & MY_CS_UNICODE))))
40
/* Allow convert from ASCII */
41
if (right.repertoire == MY_REPERTOIRE_ASCII &&
42
(left.derivation < right.derivation ||
43
(left.derivation == right.derivation &&
44
!(left.repertoire == MY_REPERTOIRE_ASCII))))
46
/* Disallow conversion otherwise */
34
51
DTCollation::DTCollation()
36
53
collation= &my_charset_bin;
37
54
derivation= DERIVATION_NONE;
55
repertoire= MY_REPERTOIRE_UNICODE30;
59
84
collation= collation_arg;
60
85
derivation= derivation_arg;
86
set_repertoire_from_charset(collation_arg);
90
void DTCollation::set(const CHARSET_INFO * const collation_arg,
91
Derivation derivation_arg,
92
uint32_t repertoire_arg)
94
collation= collation_arg;
95
derivation= derivation_arg;
96
repertoire= repertoire_arg;
64
100
void DTCollation::set(const CHARSET_INFO * const collation_arg)
66
102
collation= collation_arg;
103
set_repertoire_from_charset(collation_arg);
106
143
else if ((flags & MY_COLL_ALLOW_SUPERSET_CONV) &&
107
collation->state & MY_CS_UNICODE &&
108
(derivation < dt.derivation ||
109
(derivation == dt.derivation &&
110
!(dt.collation->state & MY_CS_UNICODE))))
144
left_is_superset(*this, dt))
114
148
else if ((flags & MY_COLL_ALLOW_SUPERSET_CONV) &&
115
dt.collation->state & MY_CS_UNICODE &&
116
(dt.derivation < derivation ||
117
(dt.derivation == derivation &&
118
!(collation->state & MY_CS_UNICODE))))
149
left_is_superset(dt, *this))
157
188
if (derivation == DERIVATION_EXPLICIT)
159
set(0, DERIVATION_NONE);
190
set(0, DERIVATION_NONE, 0);
162
193
if (collation->state & MY_CS_BINSORT)
164
195
if (dt.collation->state & MY_CS_BINSORT)
169
200
const CHARSET_INFO * const bin= get_charset_by_csname(collation->csname, MY_CS_BINSORT);
170
201
set(bin, DERIVATION_NONE);
204
repertoire|= dt.repertoire;
232
263
Item **args, uint32_t nargs, uint32_t flags,
266
Item **arg, *safe_args[2];
268
memset(safe_args, 0, sizeof(safe_args));
235
270
if (agg_item_collations(coll, fname, args, nargs, flags, item_sep))
274
For better error reporting: save the first and the second argument.
275
We need this only if the the number of args is 3 or 2:
276
- for a longer argument list, "Illegal mix of collations"
277
doesn't display each argument's characteristics.
278
- if nargs is 1, then this error cannot happen.
280
if (nargs >=2 && nargs <= 3)
282
safe_args[0]= args[0];
283
safe_args[1]= args[item_sep];
286
Session *session= current_session;
290
for (i= 0, arg= args; i < nargs; i++, arg+= item_sep)
293
uint32_t dummy_offset;
294
if (!String::needs_conversion(0, (*arg)->collation.collation,
299
if (!(conv= (*arg)->safe_charset_converter(coll.collation)) &&
300
((*arg)->collation.repertoire == MY_REPERTOIRE_ASCII))
301
conv= new Item_func_conv_charset(*arg, coll.collation, 1);
305
if (nargs >=2 && nargs <= 3)
307
/* restore the original arguments for better error message */
308
args[0]= safe_args[0];
309
args[item_sep]= safe_args[1];
311
my_coll_agg_error(args, nargs, fname, item_sep);
313
break; // we cannot return here, we need to restore "arena".
315
if ((*arg)->type() == Item::FIELD_ITEM)
316
((Item_field *)(*arg))->no_const_subst= 1;
318
If in statement prepare, then we create a converter for two
319
constant items, do it once and then reuse it.
320
If we're in execution of a prepared statement, arena is NULL,
321
and the conv was created in runtime memory. This can be
322
the case only if the argument is a parameter marker ('?'),
323
because for all true constants the charset converter has already
324
been created in prepare. In this case register the change for
327
session->change_item_tree(arg, conv);
329
We do not check conv->fixed, because Item_func_conv_charset which can
330
be return by safe_charset_converter can't be fixed at creation
332
conv->fix_fields(session, arg);