1 /*
2    Copyright (c) 2000, 2010, Oracle and/or its affiliates.
3 
4    This program is free software; you can redistribute it and/or modify
5    it under the terms of the GNU General Public License as published by
6    the Free Software Foundation; version 2 of the License.
7 
8    This program is distributed in the hope that it will be useful,
9    but WITHOUT ANY WARRANTY; without even the implied warranty of
10    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
11    GNU General Public License for more details.
12 
13    You should have received a copy of the GNU General Public License
14    along with this program; if not, write to the Free Software
15    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1335  USA */
16 
17 
18 /**
19   @file
20 
21   @brief
22   Buffers to save and compare item values
23 */
24 
25 #include "mariadb.h"
26 #include "sql_priv.h"
27 /*
28   It is necessary to include set_var.h instead of item.h because there
29   are dependencies on include order for set_var.h and item.h. This
30   will be resolved later.
31 */
32 #include "sql_class.h"          // THD
33 #include "set_var.h"            // Cached_item, Cached_item_field, ...
34 
35 /**
36   Create right type of Cached_item for an item.
37 */
38 
new_Cached_item(THD * thd,Item * item,bool pass_through_ref)39 Cached_item *new_Cached_item(THD *thd, Item *item, bool pass_through_ref)
40 {
41   if (pass_through_ref && item->real_item()->type() == Item::FIELD_ITEM &&
42       !(((Item_field *) (item->real_item()))->field->flags & BLOB_FLAG))
43   {
44     Item_field *real_item= (Item_field *) item->real_item();
45     Field *cached_field= real_item->field;
46     return new (thd->mem_root) Cached_item_field(thd, cached_field);
47   }
48   switch (item->result_type()) {
49   case STRING_RESULT:
50     return new Cached_item_str(thd, (Item_field *) item);
51   case INT_RESULT:
52     return new Cached_item_int((Item_field *) item);
53   case REAL_RESULT:
54     return new Cached_item_real(item);
55   case DECIMAL_RESULT:
56     return new Cached_item_decimal(item);
57   case ROW_RESULT:
58   default:
59     DBUG_ASSERT(0);
60     return 0;
61   }
62 }
63 
~Cached_item()64 Cached_item::~Cached_item() {}
65 
66 /**
67   Compare with old value and replace value with new value.
68 
69   @return
70     Return true if values have changed
71 */
72 
Cached_item_str(THD * thd,Item * arg)73 Cached_item_str::Cached_item_str(THD *thd, Item *arg)
74   :Cached_item_item(arg),
75    value_max_length(MY_MIN(arg->max_length, thd->variables.max_sort_length)),
76    value(value_max_length)
77 {}
78 
cmp(void)79 bool Cached_item_str::cmp(void)
80 {
81   String *res;
82   bool tmp;
83 
84   if ((res=item->val_str(&tmp_value)))
85     res->length(MY_MIN(res->length(), value_max_length));
86   if (null_value != item->null_value)
87   {
88     if ((null_value= item->null_value))
89       return TRUE;				// New value was null
90     tmp=TRUE;
91   }
92   else if (null_value)
93     return 0;					// new and old value was null
94   else
95     tmp= sortcmp(&value,res,item->collation.collation) != 0;
96   if (tmp)
97     value.copy(*res);				// Remember for next cmp
98   return tmp;
99 }
100 
101 
cmp_read_only()102 int Cached_item_str::cmp_read_only()
103 {
104   String *res= item->val_str(&tmp_value);
105 
106   if (null_value)
107   {
108     if (item->null_value)
109       return 0;
110     else
111       return -1;
112   }
113   if (item->null_value)
114     return 1;
115 
116   return sortcmp(&value, res, item->collation.collation);
117 }
118 
119 
~Cached_item_str()120 Cached_item_str::~Cached_item_str()
121 {
122   item=0;					// Safety
123 }
124 
cmp(void)125 bool Cached_item_real::cmp(void)
126 {
127   double nr= item->val_real();
128   if (null_value != item->null_value || nr != value)
129   {
130     null_value= item->null_value;
131     value=nr;
132     return TRUE;
133   }
134   return FALSE;
135 }
136 
137 
cmp_read_only()138 int Cached_item_real::cmp_read_only()
139 {
140   double nr= item->val_real();
141   if (null_value)
142   {
143     if (item->null_value)
144       return 0;
145     else
146       return -1;
147   }
148   if (item->null_value)
149     return 1;
150   return (nr == value)? 0 : ((nr < value)? 1: -1);
151 }
152 
153 
cmp(void)154 bool Cached_item_int::cmp(void)
155 {
156   longlong nr=item->val_int();
157   if (null_value != item->null_value || nr != value)
158   {
159     null_value= item->null_value;
160     value=nr;
161     return TRUE;
162   }
163   return FALSE;
164 }
165 
166 
cmp_read_only()167 int Cached_item_int::cmp_read_only()
168 {
169   longlong nr= item->val_int();
170   if (null_value)
171   {
172     if (item->null_value)
173       return 0;
174     else
175       return -1;
176   }
177   if (item->null_value)
178     return 1;
179   return (nr == value)? 0 : ((nr < value)? 1: -1);
180 }
181 
182 
cmp(void)183 bool Cached_item_field::cmp(void)
184 {
185   bool tmp= FALSE;                              // Value is identical
186   /* Note that field can't be a blob here ! */
187   if (null_value != field->is_null())
188   {
189     null_value= !null_value;
190     tmp= TRUE;                                  // Value has changed
191   }
192 
193   /*
194     If value is not null and value changed (from null to not null or
195     because of value change), then copy the new value to buffer.
196     */
197   if (! null_value && (tmp || (tmp= (field->cmp(buff) != 0))))
198     field->get_image(buff,length,field->charset());
199   return tmp;
200 }
201 
202 
cmp_read_only()203 int Cached_item_field::cmp_read_only()
204 {
205   if (null_value)
206   {
207     if (field->is_null())
208       return 0;
209     else
210       return -1;
211   }
212   if (field->is_null())
213     return 1;
214 
215   return field->cmp(buff);
216 }
217 
218 
Cached_item_decimal(Item * it)219 Cached_item_decimal::Cached_item_decimal(Item *it)
220   :Cached_item_item(it)
221 {
222   my_decimal_set_zero(&value);
223 }
224 
225 
cmp()226 bool Cached_item_decimal::cmp()
227 {
228   my_decimal tmp;
229   my_decimal *ptmp= item->val_decimal(&tmp);
230   if (null_value != item->null_value ||
231       (!item->null_value && my_decimal_cmp(&value, ptmp)))
232   {
233     null_value= item->null_value;
234     /* Save only not null values */
235     if (!null_value)
236     {
237       my_decimal2decimal(ptmp, &value);
238       return TRUE;
239     }
240     return FALSE;
241   }
242   return FALSE;
243 }
244 
245 
cmp_read_only()246 int Cached_item_decimal::cmp_read_only()
247 {
248   my_decimal tmp;
249   my_decimal *ptmp= item->val_decimal(&tmp);
250   if (null_value)
251   {
252     if (item->null_value)
253       return 0;
254     else
255       return -1;
256   }
257   if (item->null_value)
258     return 1;
259   return my_decimal_cmp(&value, ptmp);
260 }
261 
262