18
18
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
22
#include <boost/lexical_cast.hpp>
24
#include "drizzled/field/date.h"
25
#include "drizzled/error.h"
26
#include "drizzled/table.h"
27
#include "drizzled/temporal.h"
28
#include "drizzled/session.h"
29
#include "drizzled/time_functions.h"
21
#ifdef USE_PRAGMA_IMPLEMENTATION
22
#pragma implementation // gcc: Class implementation
25
#include <drizzled/server_includes.h>
26
#include <drizzled/field/date.h>
40
28
/****************************************************************************
41
** Drizzle date type stored in 3 bytes
30
** This is identical to the old date type, but stored on 3 bytes instead of 4
42
31
** In number context: YYYYMMDD
43
32
****************************************************************************/
60
49
nearly-identical class Field_date doesn't ever return 3 from its
63
int Field_date::store(const char *from,
65
const CHARSET_INFO * const )
68
* Try to create a DateTime from the supplied string. Throw an error
69
* if unable to create a valid DateTime. A DateTime is used so that
70
* automatic conversion from the higher-storage DateTime can be used
71
* and matches on datetime format strings can occur.
73
ASSERT_COLUMN_MARKED_FOR_WRITE;
75
if (! temporal.from_string(from, (size_t) len))
77
my_error(ER_INVALID_DATETIME_VALUE, MYF(ME_FATALERROR), from);
80
/* Create the stored integer format. @TODO This should go away. Should be up to engine... */
81
uint32_t int_value= (temporal.years() * 10000) + (temporal.months() * 100) + temporal.days();
82
int4store(ptr, int_value);
86
int Field_date::store(double from)
88
ASSERT_COLUMN_MARKED_FOR_WRITE;
89
if (from < 0.0 || from > 99991231235959.0)
91
/* Convert the double to a string using stringstream */
94
ss.precision(18); /* 18 places should be fine for error display of double input. */
95
ss << from; ss >> tmp;
97
my_error(ER_INVALID_DATETIME_VALUE, MYF(ME_FATALERROR), tmp.c_str());
100
return Field_date::store((int64_t) rint(from), false);
103
int Field_date::store(int64_t from, bool)
106
* Try to create a DateTime from the supplied integer. Throw an error
107
* if unable to create a valid DateTime.
109
ASSERT_COLUMN_MARKED_FOR_WRITE;
111
if (! temporal.from_int64_t(from))
113
/* Convert the integer to a string using boost::lexical_cast */
114
std::string tmp(boost::lexical_cast<std::string>(from));
116
my_error(ER_INVALID_DATETIME_VALUE, MYF(ME_FATALERROR), tmp.c_str());
120
/* Create the stored integer format. @TODO This should go away. Should be up to engine... */
121
uint32_t int_value= (temporal.years() * 10000) + (temporal.months() * 100) + temporal.days();
122
int4store(ptr, int_value);
126
int Field_date::store_time(DRIZZLE_TIME *ltime,
127
enum enum_drizzle_timestamp_type time_type)
53
int Field_newdate::store(const char *from,
55
const CHARSET_INFO * const cs __attribute__((unused)))
60
THD *thd= table ? table->in_use : current_thd;
61
enum enum_drizzle_timestamp_type ret;
62
if ((ret= str_to_datetime(from, len, &l_time,
64
(thd->variables.sql_mode &
65
(MODE_NO_ZERO_DATE | MODE_INVALID_DATES))),
66
&error)) <= DRIZZLE_TIMESTAMP_ERROR)
73
tmp= l_time.day + l_time.month*32 + l_time.year*16*32;
74
if (!error && (ret != DRIZZLE_TIMESTAMP_DATE) &&
75
(l_time.hour || l_time.minute || l_time.second || l_time.second_part))
76
error= 3; // Datetime was cut (note)
80
set_datetime_warning(error == 3 ? DRIZZLE_ERROR::WARN_LEVEL_NOTE :
81
DRIZZLE_ERROR::WARN_LEVEL_WARN,
82
ER_WARN_DATA_TRUNCATED,
83
from, len, DRIZZLE_TIMESTAMP_DATE, 1);
90
int Field_newdate::store(double nr)
92
if (nr < 0.0 || nr > 99991231235959.0)
94
int3store(ptr,(int32_t) 0);
95
set_datetime_warning(DRIZZLE_ERROR::WARN_LEVEL_WARN,
96
ER_WARN_DATA_TRUNCATED, nr, DRIZZLE_TIMESTAMP_DATE);
99
return Field_newdate::store((int64_t) rint(nr), false);
103
int Field_newdate::store(int64_t nr,
104
bool unsigned_val __attribute__((unused)))
109
THD *thd= table ? table->in_use : current_thd;
110
if (number_to_datetime(nr, &l_time,
112
(thd->variables.sql_mode &
113
(MODE_NO_ZERO_DATE | MODE_INVALID_DATES))),
120
tmp= l_time.day + l_time.month*32 + l_time.year*16*32;
122
if (!error && l_time.time_type != DRIZZLE_TIMESTAMP_DATE &&
123
(l_time.hour || l_time.minute || l_time.second || l_time.second_part))
127
set_datetime_warning(error == 3 ? DRIZZLE_ERROR::WARN_LEVEL_NOTE :
128
DRIZZLE_ERROR::WARN_LEVEL_WARN,
130
ER_WARN_DATA_OUT_OF_RANGE : ER_WARN_DATA_TRUNCATED,
131
nr,DRIZZLE_TIMESTAMP_DATE, 1);
138
int Field_newdate::store_time(DRIZZLE_TIME *ltime,timestamp_type time_type)
131
142
if (time_type == DRIZZLE_TIMESTAMP_DATE ||
132
143
time_type == DRIZZLE_TIMESTAMP_DATETIME)
134
tmp= ltime->year*10000 + ltime->month*100 + ltime->day;
145
tmp=ltime->year*16*32+ltime->month*32+ltime->day;
135
146
if (check_date(ltime, tmp != 0,
136
147
(TIME_FUZZY_DATE |
137
(current_session->variables.sql_mode &
148
(current_thd->variables.sql_mode &
138
149
(MODE_NO_ZERO_DATE | MODE_INVALID_DATES))), &error))
140
151
char buff[MAX_DATE_STRING_REP_LENGTH];
141
152
String str(buff, sizeof(buff), &my_charset_utf8_general_ci);
142
make_date(ltime, &str);
153
make_date((DATE_TIME_FORMAT *) 0, ltime, &str);
143
154
set_datetime_warning(DRIZZLE_ERROR::WARN_LEVEL_WARN, ER_WARN_DATA_TRUNCATED,
144
155
str.ptr(), str.length(), DRIZZLE_TIMESTAMP_DATE, 1);
162
173
set_warning(DRIZZLE_ERROR::WARN_LEVEL_WARN, ER_WARN_DATA_TRUNCATED, 1);
168
double Field_date::val_real(void)
170
return (double) Field_date::val_int();
173
int64_t Field_date::val_int(void)
177
ASSERT_COLUMN_MARKED_FOR_READ;
180
bool Field_newdate::send_binary(Protocol *protocol)
183
Field_newdate::get_date(&tm,0);
184
return protocol->store_date(&tm);
188
double Field_newdate::val_real(void)
190
return (double) Field_newdate::val_int();
194
int64_t Field_newdate::val_int(void)
196
uint32_t j= uint3korr(ptr);
197
j= (j % 32L)+(j / 32L % 16L)*100L + (j/(16L*32L))*10000L;
181
198
return (int64_t) j;
184
String *Field_date::val_str(String *val_buffer, String *)
202
String *Field_newdate::val_str(String *val_buffer,
203
String *val_ptr __attribute__((unused)))
186
205
val_buffer->alloc(field_length);
187
206
val_buffer->length(field_length);
188
uint32_t tmp=(uint32_t) uint4korr(ptr);
207
uint32_t tmp=(uint32_t) uint3korr(ptr);
190
209
char *pos=(char*) val_buffer->ptr()+10;
192
ASSERT_COLUMN_MARKED_FOR_READ;
194
211
/* Open coded to get more speed */
195
212
*pos--=0; // End NULL
196
part=(int32_t) (tmp % 100);
197
*pos--= (char) ('0'+part%10);
198
*pos--= (char) ('0'+part/10);
200
part=(int32_t) (tmp/100%100);
201
*pos--= (char) ('0'+part%10);
202
*pos--= (char) ('0'+part/10);
204
part=(int32_t) (tmp/10000);
213
part=(int) (tmp & 31);
214
*pos--= (char) ('0'+part%10);
215
*pos--= (char) ('0'+part/10);
217
part=(int) (tmp >> 5 & 15);
218
*pos--= (char) ('0'+part%10);
219
*pos--= (char) ('0'+part/10);
221
part=(int) (tmp >> 9);
205
222
*pos--= (char) ('0'+part%10); part/=10;
206
223
*pos--= (char) ('0'+part%10); part/=10;
207
224
*pos--= (char) ('0'+part%10); part/=10;
209
226
return val_buffer;
212
bool Field_date::get_date(DRIZZLE_TIME *ltime,uint32_t fuzzydate)
230
bool Field_newdate::get_date(DRIZZLE_TIME *ltime,uint fuzzydate)
214
uint32_t tmp=(uint32_t) uint4korr(ptr);
215
ltime->day= (int) (tmp%100);
216
ltime->month= (int) (tmp/100%100);
217
ltime->year= (int) (tmp/10000);
232
uint32_t tmp=(uint32_t) uint3korr(ptr);
233
ltime->day= tmp & 31;
234
ltime->month= (tmp >> 5) & 15;
235
ltime->year= (tmp >> 9);
218
236
ltime->time_type= DRIZZLE_TIMESTAMP_DATE;
219
237
ltime->hour= ltime->minute= ltime->second= ltime->second_part= ltime->neg= 0;
220
238
return ((!(fuzzydate & TIME_FUZZY_DATE) && (!ltime->month || !ltime->day)) ?
224
bool Field_date::get_time(DRIZZLE_TIME *ltime)
243
bool Field_newdate::get_time(DRIZZLE_TIME *ltime)
226
return Field_date::get_date(ltime,0);
245
return Field_newdate::get_date(ltime,0);
229
int Field_date::cmp(const unsigned char *a_ptr, const unsigned char *b_ptr)
249
int Field_newdate::cmp(const uchar *a_ptr, const uchar *b_ptr)
232
a=(uint32_t) uint4korr(a_ptr);
233
b=(uint32_t) uint4korr(b_ptr);
252
a=(uint32_t) uint3korr(a_ptr);
253
b=(uint32_t) uint3korr(b_ptr);
234
254
return (a < b) ? -1 : (a > b) ? 1 : 0;
237
void Field_date::sort_string(unsigned char *to,uint32_t )
258
void Field_newdate::sort_string(uchar *to,uint length __attribute__((unused)))
245
void Field_date::sql_type(String &res) const
266
void Field_newdate::sql_type(String &res) const
247
268
res.set_ascii(STRING_WITH_LEN("date"));
250
} /* namespace drizzled */