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
22
#include <drizzled/server_includes.h>
23
#include <drizzled/field/datetime.h>
25
/****************************************************************************
27
** In string context: YYYY-MM-DD HH:MM:DD
28
** In number context: YYYYMMDDHHMMDD
29
** Stored as a 8 byte unsigned int. Should sometimes be change to a 6 byte int.
30
****************************************************************************/
32
int Field_datetime::store(const char *from,
34
const CHARSET_INFO * const cs __attribute__((unused)))
36
DRIZZLE_TIME time_tmp;
39
enum enum_drizzle_timestamp_type func_res;
40
THD *thd= table ? table->in_use : current_thd;
42
func_res= str_to_datetime(from, len, &time_tmp,
44
(thd->variables.sql_mode &
45
(MODE_NO_ZERO_DATE | MODE_INVALID_DATES))),
47
if ((int) func_res > (int) DRIZZLE_TIMESTAMP_ERROR)
48
tmp= TIME_to_uint64_t_datetime(&time_tmp);
50
error= 1; // Fix if invalid zero date
53
set_datetime_warning(DRIZZLE_ERROR::WARN_LEVEL_WARN,
54
ER_WARN_DATA_OUT_OF_RANGE,
55
from, len, DRIZZLE_TIMESTAMP_DATETIME, 1);
57
#ifdef WORDS_BIGENDIAN
58
if (table && table->s->db_low_byte_first)
64
int64_tstore(ptr,tmp);
69
int Field_datetime::store(double nr)
72
if (nr < 0.0 || nr > 99991231235959.0)
74
set_datetime_warning(DRIZZLE_ERROR::WARN_LEVEL_WARN,
75
ER_WARN_DATA_OUT_OF_RANGE,
76
nr, DRIZZLE_TIMESTAMP_DATETIME);
80
error|= Field_datetime::store((int64_t) rint(nr), false);
85
int Field_datetime::store(int64_t nr,
86
bool unsigned_val __attribute__((unused)))
88
DRIZZLE_TIME not_used;
90
int64_t initial_nr= nr;
91
THD *thd= table ? table->in_use : current_thd;
93
nr= number_to_datetime(nr, ¬_used, (TIME_FUZZY_DATE |
94
(thd->variables.sql_mode &
96
MODE_INVALID_DATES))), &error);
98
if (nr == INT64_C(-1))
105
set_datetime_warning(DRIZZLE_ERROR::WARN_LEVEL_WARN,
106
error == 2 ? ER_WARN_DATA_OUT_OF_RANGE :
107
ER_WARN_DATA_TRUNCATED, initial_nr,
108
DRIZZLE_TIMESTAMP_DATETIME, 1);
110
#ifdef WORDS_BIGENDIAN
111
if (table && table->s->db_low_byte_first)
117
int64_tstore(ptr,nr);
122
int Field_datetime::store_time(DRIZZLE_TIME *ltime,
123
enum enum_drizzle_timestamp_type time_type)
128
We don't perform range checking here since values stored in TIME
129
structure always fit into DATETIME range.
131
if (time_type == DRIZZLE_TIMESTAMP_DATE ||
132
time_type == DRIZZLE_TIMESTAMP_DATETIME)
134
tmp=((ltime->year*10000L+ltime->month*100+ltime->day)*INT64_C(1000000)+
135
(ltime->hour*10000L+ltime->minute*100+ltime->second));
136
if (check_date(ltime, tmp != 0,
138
(current_thd->variables.sql_mode &
139
(MODE_NO_ZERO_DATE | MODE_INVALID_DATES))), &error))
141
char buff[MAX_DATE_STRING_REP_LENGTH];
142
String str(buff, sizeof(buff), &my_charset_utf8_general_ci);
143
make_datetime((DATE_TIME_FORMAT *) 0, ltime, &str);
144
set_datetime_warning(DRIZZLE_ERROR::WARN_LEVEL_WARN, ER_WARN_DATA_TRUNCATED,
145
str.ptr(), str.length(), DRIZZLE_TIMESTAMP_DATETIME,1);
152
set_warning(DRIZZLE_ERROR::WARN_LEVEL_WARN, ER_WARN_DATA_TRUNCATED, 1);
154
#ifdef WORDS_BIGENDIAN
155
if (table && table->s->db_low_byte_first)
161
int64_tstore(ptr,tmp);
165
bool Field_datetime::send_binary(Protocol *protocol)
168
Field_datetime::get_date(&tm, TIME_FUZZY_DATE);
169
return protocol->store(&tm);
173
double Field_datetime::val_real(void)
175
return (double) Field_datetime::val_int();
178
int64_t Field_datetime::val_int(void)
181
#ifdef WORDS_BIGENDIAN
182
if (table && table->s->db_low_byte_first)
191
String *Field_datetime::val_str(String *val_buffer,
192
String *val_ptr __attribute__((unused)))
194
val_buffer->alloc(field_length);
195
val_buffer->length(field_length);
201
#ifdef WORDS_BIGENDIAN
202
if (table && table->s->db_low_byte_first)
209
Avoid problem with slow int64_t arithmetic and sprintf
212
part1=(long) (tmp/INT64_C(1000000));
213
part2=(long) (tmp - (uint64_t) part1*INT64_C(1000000));
215
pos=(char*) val_buffer->ptr() + MAX_DATETIME_WIDTH;
217
*pos--= (char) ('0'+(char) (part2%10)); part2/=10;
218
*pos--= (char) ('0'+(char) (part2%10)); part3= (int) (part2 / 10);
220
*pos--= (char) ('0'+(char) (part3%10)); part3/=10;
221
*pos--= (char) ('0'+(char) (part3%10)); part3/=10;
223
*pos--= (char) ('0'+(char) (part3%10)); part3/=10;
224
*pos--= (char) ('0'+(char) part3);
226
*pos--= (char) ('0'+(char) (part1%10)); part1/=10;
227
*pos--= (char) ('0'+(char) (part1%10)); part1/=10;
229
*pos--= (char) ('0'+(char) (part1%10)); part1/=10;
230
*pos--= (char) ('0'+(char) (part1%10)); part3= (int) (part1/10);
232
*pos--= (char) ('0'+(char) (part3%10)); part3/=10;
233
*pos--= (char) ('0'+(char) (part3%10)); part3/=10;
234
*pos--= (char) ('0'+(char) (part3%10)); part3/=10;
235
*pos=(char) ('0'+(char) part3);
239
bool Field_datetime::get_date(DRIZZLE_TIME *ltime, uint32_t fuzzydate)
241
int64_t tmp=Field_datetime::val_int();
242
uint32_t part1,part2;
243
part1=(uint32_t) (tmp/INT64_C(1000000));
244
part2=(uint32_t) (tmp - (uint64_t) part1*INT64_C(1000000));
246
ltime->time_type= DRIZZLE_TIMESTAMP_DATETIME;
248
ltime->second_part= 0;
249
ltime->second= (int) (part2%100);
250
ltime->minute= (int) (part2/100%100);
251
ltime->hour= (int) (part2/10000);
252
ltime->day= (int) (part1%100);
253
ltime->month= (int) (part1/100%100);
254
ltime->year= (int) (part1/10000);
255
return (!(fuzzydate & TIME_FUZZY_DATE) && (!ltime->month || !ltime->day)) ? 1 : 0;
258
bool Field_datetime::get_time(DRIZZLE_TIME *ltime)
260
return Field_datetime::get_date(ltime,0);
263
int Field_datetime::cmp(const unsigned char *a_ptr, const unsigned char *b_ptr)
266
#ifdef WORDS_BIGENDIAN
267
if (table && table->s->db_low_byte_first)
278
return ((uint64_t) a < (uint64_t) b) ? -1 :
279
((uint64_t) a > (uint64_t) b) ? 1 : 0;
282
void Field_datetime::sort_string(unsigned char *to,uint32_t length __attribute__((unused)))
284
#ifdef WORDS_BIGENDIAN
285
if (!table || !table->s->db_low_byte_first)
311
void Field_datetime::sql_type(String &res) const
313
res.set_ascii(STRING_WITH_LEN("datetime"));