1
/* - mode: c++; c-basic-offset: 2; indent-tabs-mode: nil; -*-
2
* vim:expandtab:shiftwidth=2:tabstop=2:smarttab:
4
* Copyright (C) 2008 MySQL
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; either version 2 of the License, or
9
* (at your option) any later version.
11
* This program is distributed in the hope that it will be useful,
12
* but WITHOUT ANY WARRANTY; without even the implied warranty of
13
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14
* GNU General Public License for more details.
16
* You should have received a copy of the GNU General Public License
17
* along with this program; if not, write to the Free Software
18
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
23
#include "drizzled/field/enum.h"
24
#include "drizzled/error.h"
25
#include "drizzled/table.h"
26
#include "drizzled/session.h"
27
#include "drizzled/strfunc.h"
32
using namespace drizzled;
34
/****************************************************************************
36
** This is a string which only can have a selection of different values.
37
** If one uses this string in a number context one gets the type number.
38
****************************************************************************/
40
enum ha_base_keytype Field_enum::key_type() const
44
default: return HA_KEYTYPE_BINARY;
47
case 4: return HA_KEYTYPE_ULONG_INT;
48
case 8: return HA_KEYTYPE_ULONGLONG;
52
void Field_enum::store_type(uint64_t value)
55
case 1: ptr[0]= (unsigned char) value; break;
57
#ifdef WORDS_BIGENDIAN
58
if (table->s->db_low_byte_first)
60
int2store(ptr,(unsigned short) value);
64
shortstore(ptr,(unsigned short) value);
66
case 3: int3store(ptr,(long) value); break;
68
#ifdef WORDS_BIGENDIAN
69
if (table->s->db_low_byte_first)
75
longstore(ptr,(long) value);
78
#ifdef WORDS_BIGENDIAN
79
if (table->s->db_low_byte_first)
85
int64_tstore(ptr,value); break;
90
* Given a supplied string, looks up the string in the internal typelib
91
* and stores the found key. Upon not finding an entry in the typelib,
92
* we always throw an error.
94
int Field_enum::store(const char *from, uint32_t length, const CHARSET_INFO * const)
98
ASSERT_COLUMN_MARKED_FOR_WRITE;
100
/* Remove end space */
101
length= field_charset->cset->lengthsp(field_charset, from, length);
102
tmp= find_type2(typelib, from, length, field_charset);
105
if (length < 6) /* Can't be more than 99999 enums */
107
/* This is for reading numbers with LOAD DATA INFILE */
108
/* Convert the string to an integer using stringstream */
109
std::stringstream ss;
113
if (tmp == 0 || tmp > typelib->count)
115
my_error(ER_INVALID_ENUM_VALUE, MYF(ME_FATALERROR), from);
121
my_error(ER_INVALID_ENUM_VALUE, MYF(ME_FATALERROR), from);
125
store_type((uint64_t) tmp);
129
int Field_enum::store(double from)
131
return Field_enum::store((int64_t) from, false);
135
* @note MySQL allows 0 values, saying that 0 is "the index of the
136
* blank string error", whatever that means. Uhm, Drizzle doesn't
137
* allow this. To store an ENUM column value using an integer, you
138
* must specify the 1-based index of the enum column definition's
141
int Field_enum::store(int64_t from, bool)
143
ASSERT_COLUMN_MARKED_FOR_WRITE;
145
if (from <= 0 || (uint64_t) from > typelib->count)
147
/* Convert the integer to a string using stringstream */
148
std::stringstream ss;
150
ss << from; ss >> tmp;
152
my_error(ER_INVALID_ENUM_VALUE, MYF(ME_FATALERROR), tmp.c_str());
155
store_type((uint64_t) (uint32_t) from);
159
double Field_enum::val_real(void)
161
return (double) Field_enum::val_int();
164
int64_t Field_enum::val_int(void)
166
ASSERT_COLUMN_MARKED_FOR_READ;
168
switch (packlength) {
170
return (int64_t) ptr[0];
174
#ifdef WORDS_BIGENDIAN
175
if (table->s->db_low_byte_first)
180
return (int64_t) tmp;
183
return (int64_t) uint3korr(ptr);
187
#ifdef WORDS_BIGENDIAN
188
if (table->s->db_low_byte_first)
193
return (int64_t) tmp;
198
#ifdef WORDS_BIGENDIAN
199
if (table->s->db_low_byte_first)
207
return 0; // impossible
210
String *Field_enum::val_str(String *, String *val_ptr)
212
uint32_t tmp=(uint32_t) Field_enum::val_int();
214
ASSERT_COLUMN_MARKED_FOR_READ;
216
if (!tmp || tmp > typelib->count)
217
val_ptr->set("", 0, field_charset);
219
val_ptr->set((const char*) typelib->type_names[tmp-1],
220
typelib->type_lengths[tmp-1],
225
int Field_enum::cmp(const unsigned char *a_ptr, const unsigned char *b_ptr)
227
unsigned char *old= ptr;
228
ptr= (unsigned char*) a_ptr;
229
uint64_t a=Field_enum::val_int();
230
ptr= (unsigned char*) b_ptr;
231
uint64_t b=Field_enum::val_int();
233
return (a < b) ? -1 : (a > b) ? 1 : 0;
236
void Field_enum::sort_string(unsigned char *to,uint32_t )
238
uint64_t value=Field_enum::val_int();
240
for (uint32_t i=0 ; i < packlength ; i++)
242
*to-- = (unsigned char) (value & 255);
247
void Field_enum::sql_type(String &res) const
250
String enum_item(buffer, sizeof(buffer), res.charset());
253
res.append(STRING_WITH_LEN("enum("));
256
uint32_t *len= typelib->type_lengths;
257
for (const char **pos= typelib->type_names; *pos; pos++, len++)
259
uint32_t dummy_errors;
262
/* convert to res.charset() == utf8, then quote */
263
enum_item.copy(*pos, *len, charset(), res.charset(), &dummy_errors);
264
append_unescaped(&res, enum_item.c_ptr(), enum_item.length());
270
Field *Field_enum::new_field(memory::Root *root, Table *new_table,
273
Field_enum *res= (Field_enum*) Field::new_field(root, new_table, keep_type);
275
res->typelib= copy_typelib(root, typelib);