~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to drizzled/item.cc

edit

Show diffs side-by-side

added added

removed removed

Lines of Context:
17
17
 *  Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
18
18
 */
19
19
 
20
 
#include <config.h>
21
 
#include <drizzled/sql_select.h>
22
 
#include <drizzled/error.h>
23
 
#include <drizzled/show.h>
24
 
#include <drizzled/item/cmpfunc.h>
25
 
#include <drizzled/item/cache_row.h>
26
 
#include <drizzled/item/type_holder.h>
27
 
#include <drizzled/item/sum.h>
28
 
#include <drizzled/item/copy_string.h>
29
 
#include <drizzled/function/str/conv_charset.h>
30
 
#include <drizzled/sql_base.h>
31
 
#include <drizzled/util/convert.h>
32
 
#include <drizzled/plugin/client.h>
33
 
#include <drizzled/time_functions.h>
34
 
 
35
 
#include <drizzled/field/str.h>
36
 
#include <drizzled/field/num.h>
37
 
 
38
 
#include <drizzled/field/blob.h>
39
 
#include <drizzled/field/date.h>
40
 
#include <drizzled/field/datetime.h>
41
 
#include <drizzled/field/decimal.h>
42
 
#include <drizzled/field/double.h>
43
 
#include <drizzled/field/enum.h>
44
 
#include <drizzled/field/epoch.h>
45
 
#include <drizzled/field/int32.h>
46
 
#include <drizzled/field/int64.h>
47
 
#include <drizzled/field/microtime.h>
48
 
#include <drizzled/field/null.h>
49
 
#include <drizzled/field/real.h>
50
 
#include <drizzled/field/size.h>
51
 
#include <drizzled/field/time.h>
52
 
#include <drizzled/field/varstring.h>
53
 
 
54
 
#include <drizzled/current_session.h>
55
 
#include <drizzled/session.h>
56
 
 
57
 
#include <drizzled/internal/m_string.h>
 
20
#include "config.h"
 
21
#include "drizzled/sql_select.h"
 
22
#include "drizzled/error.h"
 
23
#include "drizzled/show.h"
 
24
#include "drizzled/item/cmpfunc.h"
 
25
#include "drizzled/item/cache_row.h"
 
26
#include "drizzled/item/type_holder.h"
 
27
#include "drizzled/item/sum.h"
 
28
#include "drizzled/item/copy_string.h"
 
29
#include "drizzled/function/str/conv_charset.h"
 
30
#include "drizzled/sql_base.h"
 
31
#include "drizzled/util/convert.h"
 
32
#include "drizzled/plugin/client.h"
 
33
#include "drizzled/time_functions.h"
 
34
 
 
35
#include "drizzled/field/str.h"
 
36
#include "drizzled/field/num.h"
 
37
 
 
38
#include "drizzled/field/blob.h"
 
39
#include "drizzled/field/date.h"
 
40
#include "drizzled/field/datetime.h"
 
41
#include "drizzled/field/decimal.h"
 
42
#include "drizzled/field/double.h"
 
43
#include "drizzled/field/enum.h"
 
44
#include "drizzled/field/epoch.h"
 
45
#include "drizzled/field/int32.h"
 
46
#include "drizzled/field/int64.h"
 
47
#include "drizzled/field/microtime.h"
 
48
#include "drizzled/field/null.h"
 
49
#include "drizzled/field/real.h"
 
50
#include "drizzled/field/size.h"
 
51
#include "drizzled/field/time.h"
 
52
#include "drizzled/field/varstring.h"
 
53
 
 
54
#include "drizzled/internal/m_string.h"
58
55
 
59
56
#include <cstdio>
60
57
#include <math.h>
105
102
      type::Decimal decimal_value;
106
103
      type::Decimal *val= val_decimal(&decimal_value);
107
104
      if (val)
108
 
        return not val->isZero();
 
105
        return not val->is_zero();
109
106
      return false;
110
107
    }
111
108
 
149
146
    return NULL;
150
147
 
151
148
  class_decimal_round(E_DEC_FATAL_ERROR, dec, decimals, false, &dec_buf);
152
 
  class_decimal2string(&dec_buf, 0, str);
 
149
  class_decimal2string(E_DEC_FATAL_ERROR, &dec_buf, 0, 0, 0, str);
153
150
  return str;
154
151
}
155
152
 
186
183
                     res->length(), 
187
184
                     res->charset()) & E_DEC_BAD_NUM)
188
185
  {
189
 
    push_warning_printf(&getSession(), 
 
186
    push_warning_printf(current_session, 
190
187
                        DRIZZLE_ERROR::WARN_LEVEL_WARN,
191
188
                        ER_TRUNCATED_WRONG_VALUE,
192
189
                        ER(ER_TRUNCATED_WRONG_VALUE), "DECIMAL",
199
196
{
200
197
  assert(fixed);
201
198
  type::Time ltime;
202
 
  if (get_date(ltime, TIME_FUZZY_DATE))
 
199
  if (get_date(&ltime, TIME_FUZZY_DATE))
203
200
  {
204
201
    decimal_value->set_zero();
205
202
    null_value= 1;                               // set NULL, stop processing
212
209
{
213
210
  assert(fixed);
214
211
  type::Time ltime;
215
 
  if (get_time(ltime))
 
212
  if (get_time(&ltime))
216
213
  {
217
214
    decimal_value->set_zero();
218
215
    return NULL;
236
233
  /* Note that fix_fields may not be called for Item_avg_field items */
237
234
  int64_t result;
238
235
  type::Decimal value, *dec_val= val_decimal(&value);
239
 
 
240
236
  if (null_value)
241
237
    return 0;
242
238
  dec_val->val_int32(E_DEC_FATAL_ERROR, unsigned_flag, &result);
243
 
 
244
239
  return result;
245
240
}
246
241
 
247
 
bool Item::save_time_in_field(Field *field)
 
242
int Item::save_time_in_field(Field *field)
248
243
{
249
244
  type::Time ltime;
250
 
 
251
 
  if (get_time(ltime))
 
245
  if (get_time(&ltime))
252
246
    return set_field_to_null(field);
253
 
 
254
247
  field->set_notnull();
255
 
 
256
 
  return field->store_time(ltime, type::DRIZZLE_TIMESTAMP_TIME);
 
248
  return field->store_time(&ltime, DRIZZLE_TIMESTAMP_TIME);
257
249
}
258
250
 
259
 
bool Item::save_date_in_field(Field *field)
 
251
int Item::save_date_in_field(Field *field)
260
252
{
261
253
  type::Time ltime;
262
 
 
263
 
  if (get_date(ltime, TIME_FUZZY_DATE))
 
254
  if (get_date(&ltime, TIME_FUZZY_DATE))
264
255
    return set_field_to_null(field);
265
 
 
266
256
  field->set_notnull();
267
 
 
268
 
  return field->store_time(ltime, type::DRIZZLE_TIMESTAMP_DATETIME);
 
257
  return field->store_time(&ltime, DRIZZLE_TIMESTAMP_DATETIME);
269
258
}
270
259
 
271
260
/**
276
265
{
277
266
  if (null_value)
278
267
    return set_field_to_null(field);
279
 
 
280
268
  field->set_notnull();
281
 
 
282
269
  return field->store(result->ptr(), result->length(), collation.collation);
283
270
}
284
271
 
297
284
  with_sum_func(false),
298
285
  is_autogenerated_name(true),
299
286
  with_subselect(false),
300
 
  collation(&my_charset_bin, DERIVATION_COERCIBLE),
301
 
  _session(*current_session)
 
287
  collation(&my_charset_bin, DERIVATION_COERCIBLE)
302
288
{
303
289
  cmp_context= (Item_result)-1;
304
290
 
305
291
  /* Put item in free list so that we can free all items at end */
306
 
  next= getSession().free_list;
307
 
  getSession().free_list= this;
 
292
  Session *session= current_session;
 
293
  next= session->free_list;
 
294
  session->free_list= this;
308
295
 
309
296
  /*
310
297
    Item constructor can be called during execution other then SQL_COM
311
 
    command => we should check session->getLex()->current_select on zero (session->lex
 
298
    command => we should check session->lex->current_select on zero (session->lex
312
299
    can be uninitialised)
313
300
  */
314
 
  if (getSession().getLex()->current_select)
 
301
  if (session->lex->current_select)
315
302
  {
316
 
    enum_parsing_place place= getSession().getLex()->current_select->parsing_place;
 
303
    enum_parsing_place place= session->lex->current_select->parsing_place;
317
304
    if (place == SELECT_LIST || place == IN_HAVING)
318
 
      getSession().getLex()->current_select->select_n_having_items++;
 
305
      session->lex->current_select->select_n_having_items++;
319
306
  }
320
307
}
321
308
 
336
323
  is_autogenerated_name(item->is_autogenerated_name),
337
324
  with_subselect(item->with_subselect),
338
325
  collation(item->collation),
339
 
  cmp_context(item->cmp_context),
340
 
  _session(*session)
 
326
  cmp_context(item->cmp_context)
341
327
{
342
328
  /* Put this item in the session's free list */
343
 
  next= getSession().free_list;
344
 
  getSession().free_list= this;
 
329
  next= session->free_list;
 
330
  session->free_list= this;
345
331
}
346
332
 
347
333
uint32_t Item::float_length(uint32_t decimals_par) const
439
425
    if (orig_len != length && ! is_autogenerated_name)
440
426
    {
441
427
      if (length == 0)
442
 
        push_warning_printf(&getSession(), 
 
428
        push_warning_printf(current_session, 
443
429
                            DRIZZLE_ERROR::WARN_LEVEL_WARN,
444
430
                            ER_NAME_BECOMES_EMPTY, 
445
431
                            ER(ER_NAME_BECOMES_EMPTY),
446
432
                            str + length - orig_len);
447
433
      else
448
 
        push_warning_printf(&getSession(),
 
434
        push_warning_printf(current_session, 
449
435
                            DRIZZLE_ERROR::WARN_LEVEL_WARN,
450
436
                            ER_REMOVED_SPACES, 
451
437
                            ER(ER_REMOVED_SPACES),
474
460
  return conv->safe ? conv : NULL;
475
461
}
476
462
 
477
 
bool Item::get_date(type::Time &ltime,uint32_t fuzzydate)
 
463
bool Item::get_date(type::Time *ltime,uint32_t fuzzydate)
478
464
{
479
 
  do
480
 
  {
481
 
    if (is_null())
482
 
    {
483
 
      break;
484
 
    }
485
 
    else if (result_type() == STRING_RESULT)
486
 
    {
487
 
      char buff[type::Time::MAX_STRING_LENGTH];
488
 
      String tmp(buff,sizeof(buff), &my_charset_bin),*res;
489
 
      if (!(res=val_str(&tmp)) ||
490
 
          str_to_datetime_with_warn(&getSession(), res->ptr(), res->length(),
491
 
                                    &ltime, fuzzydate) <= type::DRIZZLE_TIMESTAMP_ERROR)
492
 
      {
493
 
        break;
494
 
      }
495
 
    }
496
 
    else
497
 
    {
498
 
      int64_t value= val_int();
499
 
      type::datetime_t date_value;
500
 
 
501
 
      ltime.convert(date_value, value, fuzzydate);
502
 
 
503
 
      if (not type::is_valid(date_value))
504
 
      {
505
 
        char buff[DECIMAL_LONGLONG_DIGITS], *end;
506
 
        end= internal::int64_t10_to_str(value, buff, -10);
507
 
        make_truncated_value_warning(&getSession(), DRIZZLE_ERROR::WARN_LEVEL_WARN,
508
 
                                     buff, (int) (end-buff), type::DRIZZLE_TIMESTAMP_NONE, NULL);
509
 
        break;
510
 
      }
511
 
    }
512
 
 
513
 
    return false;
514
 
  } while (0);
515
 
 
516
 
  ltime.reset();
517
 
 
 
465
  if (result_type() == STRING_RESULT)
 
466
  {
 
467
    char buff[40];
 
468
    String tmp(buff,sizeof(buff), &my_charset_bin),*res;
 
469
    if (!(res=val_str(&tmp)) ||
 
470
        str_to_datetime_with_warn(res->ptr(), res->length(),
 
471
                                  ltime, fuzzydate) <= DRIZZLE_TIMESTAMP_ERROR)
 
472
      goto err;
 
473
  }
 
474
  else
 
475
  {
 
476
    int64_t value= val_int();
 
477
    int was_cut;
 
478
    if (number_to_datetime(value, ltime, fuzzydate, &was_cut) == -1L)
 
479
    {
 
480
      char buff[22], *end;
 
481
      end= internal::int64_t10_to_str(value, buff, -10);
 
482
      make_truncated_value_warning(current_session, DRIZZLE_ERROR::WARN_LEVEL_WARN,
 
483
                                   buff, (int) (end-buff), DRIZZLE_TIMESTAMP_NONE,
 
484
                                   NULL);
 
485
      goto err;
 
486
    }
 
487
  }
 
488
  return false;
 
489
 
 
490
err:
 
491
  memset(ltime, 0, sizeof(*ltime));
518
492
  return true;
519
493
}
520
494
 
521
 
bool Item::get_time(type::Time &ltime)
 
495
bool Item::get_time(type::Time *ltime)
522
496
{
523
 
  char buff[type::Time::MAX_STRING_LENGTH];
 
497
  char buff[40];
524
498
  String tmp(buff,sizeof(buff),&my_charset_bin),*res;
525
 
  if (!(res=val_str(&tmp)) or
526
 
      str_to_time_with_warn(&getSession(), res->ptr(), res->length(), &ltime))
 
499
  if (!(res=val_str(&tmp)) ||
 
500
      str_to_time_with_warn(res->ptr(), res->length(), ltime))
527
501
  {
528
 
    ltime.reset();
529
 
 
 
502
    memset(ltime, 0, sizeof(*ltime));
530
503
    return true;
531
504
  }
532
 
 
533
505
  return false;
534
506
}
535
507
 
536
 
bool Item::get_date_result(type::Time &ltime,uint32_t fuzzydate)
 
508
bool Item::get_date_result(type::Time *ltime,uint32_t fuzzydate)
537
509
{
538
 
  return get_date(ltime, fuzzydate);
 
510
  return get_date(ltime,fuzzydate);
539
511
}
540
512
 
541
513
bool Item::is_null()
788
760
    Item *real_itm= real_item();
789
761
 
790
762
    ref_pointer_array[el]= real_itm;
791
 
    if (!(item_ref= new Item_aggregate_ref(&session->getLex()->current_select->context,
 
763
    if (!(item_ref= new Item_aggregate_ref(&session->lex->current_select->context,
792
764
                                           ref_pointer_array + el, 0, name)))
793
765
      return; /* fatal_error is set */
794
766
    if (type() == SUM_FUNC_ITEM)
821
793
  if (mark_item)
822
794
    mark_item->depended_from= last;
823
795
  current->mark_as_dependent(last);
824
 
  if (session->getLex()->describe & DESCRIBE_EXTENDED)
 
796
  if (session->lex->describe & DESCRIBE_EXTENDED)
825
797
  {
826
798
    char warn_buff[DRIZZLE_ERRMSG_SIZE];
827
799
    snprintf(warn_buff, sizeof(warn_buff), ER(ER_WARN_FIELD_RESOLVED),
887
859
    - the found item on success
888
860
    - NULL if find_item is not in group_list
889
861
*/
890
 
static Item** find_field_in_group_list(Session *session, Item *find_item, Order *group_list)
 
862
static Item** find_field_in_group_list(Item *find_item, Order *group_list)
891
863
{
892
864
  const char *db_name;
893
865
  const char *table_name;
966
938
          best match, they must reference the same column, otherwise the field
967
939
          is ambiguous.
968
940
        */
969
 
        my_error(ER_NON_UNIQ_ERROR, MYF(0), find_item->full_name(), session->where());
 
941
        my_error(ER_NON_UNIQ_ERROR, MYF(0), find_item->full_name(), current_session->where);
970
942
        return NULL;
971
943
      }
972
944
    }
1002
974
  /* If this is a non-aggregated field inside HAVING, search in GROUP BY. */
1003
975
  if (select->having_fix_field && !ref->with_sum_func && group_list)
1004
976
  {
1005
 
    group_by_ref= find_field_in_group_list(session, ref, group_list);
 
977
    group_by_ref= find_field_in_group_list(ref, group_list);
1006
978
 
1007
979
    /* Check if the fields found in SELECT and GROUP BY are the same field. */
1008
980
    if (group_by_ref && (select_ref != not_found_item) &&
1011
983
      ambiguous_fields= true;
1012
984
      push_warning_printf(session, DRIZZLE_ERROR::WARN_LEVEL_WARN, ER_NON_UNIQ_ERROR,
1013
985
                          ER(ER_NON_UNIQ_ERROR), ref->full_name(),
1014
 
                          session->where());
 
986
                          current_session->where);
1015
987
 
1016
988
    }
1017
989
  }
1090
1062
 
1091
1063
bool Item::is_datetime()
1092
1064
{
1093
 
  return field::isDateTime(field_type());
 
1065
  switch (field_type())
 
1066
  {
 
1067
    case DRIZZLE_TYPE_TIME:
 
1068
    case DRIZZLE_TYPE_DATE:
 
1069
    case DRIZZLE_TYPE_DATETIME:
 
1070
    case DRIZZLE_TYPE_TIMESTAMP:
 
1071
    case DRIZZLE_TYPE_MICROTIME:
 
1072
      return true;
 
1073
    case DRIZZLE_TYPE_BLOB:
 
1074
    case DRIZZLE_TYPE_VARCHAR:
 
1075
    case DRIZZLE_TYPE_DOUBLE:
 
1076
    case DRIZZLE_TYPE_DECIMAL:
 
1077
    case DRIZZLE_TYPE_ENUM:
 
1078
    case DRIZZLE_TYPE_LONG:
 
1079
    case DRIZZLE_TYPE_LONGLONG:
 
1080
    case DRIZZLE_TYPE_NULL:
 
1081
    case DRIZZLE_TYPE_UUID:
 
1082
    case DRIZZLE_TYPE_BOOLEAN:
 
1083
      return false;
 
1084
  }
 
1085
 
 
1086
  assert(0);
 
1087
  abort();
1094
1088
}
1095
1089
 
1096
1090
String *Item::check_well_formed_result(String *str, bool send_error)
1103
1097
                                       str->length(), &well_formed_error);
1104
1098
  if (wlen < str->length())
1105
1099
  {
 
1100
    Session *session= current_session;
1106
1101
    char hexbuf[7];
1107
1102
    enum DRIZZLE_ERROR::enum_warning_level level;
1108
1103
    uint32_t diff= str->length() - wlen;
1119
1114
      null_value= 1;
1120
1115
      str= 0;
1121
1116
    }
1122
 
    push_warning_printf(&getSession(), level, ER_INVALID_CHARACTER_STRING,
 
1117
    push_warning_printf(session, level, ER_INVALID_CHARACTER_STRING,
1123
1118
                        ER(ER_INVALID_CHARACTER_STRING), cs->csname, hexbuf);
1124
1119
  }
1125
1120
  return str;
1184
1179
                                 0,
1185
1180
                                 Field::NONE,
1186
1181
                                 name,
1187
 
                                 decimals);
 
1182
                                 decimals,
 
1183
                                 0,
 
1184
                                 unsigned_flag);
1188
1185
    break;
1189
1186
  case DRIZZLE_TYPE_LONG:
1190
1187
    field= new field::Int32((unsigned char*) 0, max_length, null_ptr, 0, Field::NONE, name);
1197
1194
                            name, decimals, 0, unsigned_flag);
1198
1195
    break;
1199
1196
  case DRIZZLE_TYPE_NULL:
1200
 
    field= new Field_null((unsigned char*) 0, max_length, name);
 
1197
    field= new Field_null((unsigned char*) 0, max_length, name, &my_charset_bin);
1201
1198
    break;
1202
1199
  case DRIZZLE_TYPE_DATE:
1203
 
    field= new Field_date(maybe_null, name);
 
1200
    field= new Field_date(maybe_null, name, &my_charset_bin);
1204
1201
    break;
1205
1202
 
1206
1203
  case DRIZZLE_TYPE_MICROTIME:
1211
1208
    field= new field::Epoch(maybe_null, name);
1212
1209
    break;
1213
1210
  case DRIZZLE_TYPE_DATETIME:
1214
 
    field= new Field_datetime(maybe_null, name);
 
1211
    field= new Field_datetime(maybe_null, name, &my_charset_bin);
1215
1212
    break;
1216
1213
  case DRIZZLE_TYPE_TIME:
1217
 
    field= new field::Time(maybe_null, name);
 
1214
    field= new field::Time(maybe_null, name, &my_charset_bin);
1218
1215
    break;
1219
1216
  case DRIZZLE_TYPE_BOOLEAN:
1220
1217
  case DRIZZLE_TYPE_UUID:
1406
1403
  case DRIZZLE_TYPE_TIME:
1407
1404
    {
1408
1405
      type::Time tm;
1409
 
      get_time(tm);
 
1406
      get_time(&tm);
1410
1407
      if (not null_value)
1411
1408
        result= client->store(&tm);
1412
1409
      break;
1416
1413
  case DRIZZLE_TYPE_TIMESTAMP:
1417
1414
    {
1418
1415
      type::Time tm;
1419
 
      get_date(tm, TIME_FUZZY_DATE);
 
1416
      get_date(&tm, TIME_FUZZY_DATE);
1420
1417
      if (!null_value)
1421
1418
        result= client->store(&tm);
1422
1419
      break;
1428
1425
  return result;
1429
1426
}
1430
1427
 
1431
 
uint32_t Item::max_char_length() const
1432
 
{
1433
 
  return max_length / collation.collation->mbmaxlen;
1434
 
}
1435
 
 
1436
 
void Item::fix_length_and_charset(uint32_t max_char_length_arg, CHARSET_INFO *cs)
1437
 
1438
 
  max_length= char_to_byte_length_safe(max_char_length_arg, cs->mbmaxlen);
1439
 
  collation.collation= cs;
1440
 
}
1441
 
 
1442
 
void Item::fix_char_length(uint32_t max_char_length_arg)
1443
 
1444
 
  max_length= char_to_byte_length_safe(max_char_length_arg, collation.collation->mbmaxlen);
1445
 
}
1446
 
 
1447
 
void Item::fix_char_length_uint64_t(uint64_t max_char_length_arg)
1448
 
1449
 
  uint64_t max_result_length= max_char_length_arg *
1450
 
    collation.collation->mbmaxlen;
1451
 
 
1452
 
  if (max_result_length >= MAX_BLOB_WIDTH)
1453
 
  { 
1454
 
    max_length= MAX_BLOB_WIDTH;
1455
 
    maybe_null= false;
1456
 
  }
1457
 
  else
1458
 
  {
1459
 
    max_length= max_result_length;
1460
 
  }
1461
 
}
1462
 
 
1463
 
void Item::fix_length_and_charset_datetime(uint32_t max_char_length_arg)
1464
 
1465
 
  collation.set(&my_charset_bin);
1466
 
  fix_char_length(max_char_length_arg);
1467
 
}
1468
 
 
1469
1428
Item_result item_cmp_type(Item_result a,Item_result b)
1470
1429
{
1471
1430
  if (a == STRING_RESULT && b == STRING_RESULT)
1681
1640
  case STRING_RESULT:
1682
1641
    assert(item->collation.collation);
1683
1642
 
 
1643
    enum enum_field_types type;
1684
1644
    /*
1685
1645
      DATE/TIME fields have STRING_RESULT result type.
1686
1646
      To preserve type they needed to be handled separately.
1687
1647
    */
1688
 
    if (field::isDateTime(item->field_type()))
 
1648
    if ((type= item->field_type()) == DRIZZLE_TYPE_DATETIME ||
 
1649
        type == DRIZZLE_TYPE_TIME ||
 
1650
        type == DRIZZLE_TYPE_MICROTIME ||
 
1651
        type == DRIZZLE_TYPE_DATE ||
 
1652
        type == DRIZZLE_TYPE_TIMESTAMP)
1689
1653
    {
1690
1654
      new_field= item->tmp_table_field_from_field_type(table, 1);
1691
1655
      /*