16
16
/* Write a row to a MyISAM table */
18
#include "myisam_priv.h"
20
#include "drizzled/internal/m_string.h"
21
#include <drizzled/util/test.h>
23
using namespace drizzled;
18
#include "myisamdef.h"
25
20
#define MAX_POINTER_LENGTH 8
27
22
/* Functions declared in this file */
29
24
static int w_search(MI_INFO *info,MI_KEYDEF *keyinfo,
30
uint32_t comp_flag, unsigned char *key,
31
uint32_t key_length, internal::my_off_t pos, unsigned char *father_buff,
32
unsigned char *father_keypos, internal::my_off_t father_page,
25
uint comp_flag, uchar *key,
26
uint key_length, my_off_t pos, uchar *father_buff,
27
uchar *father_keypos, my_off_t father_page,
34
static int _mi_balance_page(MI_INFO *info,MI_KEYDEF *keyinfo,unsigned char *key,
35
unsigned char *curr_buff,unsigned char *father_buff,
36
unsigned char *father_keypos,internal::my_off_t father_page);
37
static unsigned char *_mi_find_last_pos(MI_KEYDEF *keyinfo, unsigned char *page,
38
unsigned char *key, uint32_t *return_key_length,
39
unsigned char **after_key);
40
int _mi_ck_write_tree(register MI_INFO *info, uint32_t keynr,unsigned char *key,
42
int _mi_ck_write_btree(register MI_INFO *info, uint32_t keynr,unsigned char *key,
29
static int _mi_balance_page(MI_INFO *info,MI_KEYDEF *keyinfo,uchar *key,
30
uchar *curr_buff,uchar *father_buff,
31
uchar *father_keypos,my_off_t father_page);
32
static uchar *_mi_find_last_pos(MI_KEYDEF *keyinfo, uchar *page,
33
uchar *key, uint *return_key_length,
35
int _mi_ck_write_tree(register MI_INFO *info, uint keynr,uchar *key,
37
int _mi_ck_write_btree(register MI_INFO *info, uint keynr,uchar *key,
45
40
/* Write new record to database */
47
int mi_write(MI_INFO *info, unsigned char *record)
42
int mi_write(MI_INFO *info, uchar *record)
49
44
MYISAM_SHARE *share=info->s;
52
internal::my_off_t filepos;
54
49
bool lock_tree= share->concurrent_insert;
56
51
if (share->options & HA_OPTION_READ_ONLY_DATA)
53
return(my_errno=EACCES);
60
55
if (_mi_readinfo(info,F_WRLCK,1))
62
57
filepos= ((share->state.dellink != HA_OFFSET_ERROR &&
63
58
!info->append_insert_at_end) ?
64
59
share->state.dellink :
100
95
is_tree_inited(&info->bulk_insert[i])));
101
96
if (local_lock_tree)
98
rw_wrlock(&share->key_root_lock[i]);
103
99
share->keyinfo[i].version++;
106
102
if (share->keyinfo[i].ck_insert(info,i,buff,
107
103
_mi_make_key(info,i,buff,record,filepos)))
106
rw_unlock(&share->key_root_lock[i]);
113
111
/* The above changed info->lastkey2. Inform mi_rnext_same(). */
114
112
info->update&= ~HA_STATE_RNEXT_SAME;
115
rw_unlock(&share->key_root_lock[i]);
117
118
if (share->calc_checksum)
139
145
not critical to use outdated share->is_log_table value (2) locking
140
146
mutex here for every write is too expensive.
142
if (share->is_log_table) // Log table do not exist in Drizzle
148
if (share->is_log_table)
149
mi_update_status((void*) info);
149
if (errno == HA_ERR_FOUND_DUPP_KEY || errno == HA_ERR_RECORD_FILE_FULL ||
150
errno == HA_ERR_NULL_IN_SPATIAL || errno == HA_ERR_OUT_OF_MEM)
155
if (my_errno == HA_ERR_FOUND_DUPP_KEY || my_errno == HA_ERR_RECORD_FILE_FULL ||
156
my_errno == HA_ERR_NULL_IN_SPATIAL || my_errno == HA_ERR_OUT_OF_MEM)
152
158
if (info->bulk_insert)
155
161
for (j=0 ; j < share->base.keys ; j++)
156
162
mi_flush_bulk_insert(info, j);
161
167
if (mi_is_key_active(share->state.key_map, i))
169
bool local_lock_tree= (lock_tree &&
170
!(info->bulk_insert &&
171
is_tree_inited(&info->bulk_insert[i])));
173
rw_wrlock(&share->key_root_lock[i]);
164
uint32_t key_length=_mi_make_key(info,i,buff,record,filepos);
175
uint key_length=_mi_make_key(info,i,buff,record,filepos);
165
176
if (_mi_ck_delete(info,i,buff,key_length))
179
rw_unlock(&share->key_root_lock[i]);
184
rw_unlock(&share->key_root_lock[i]);
176
191
mi_mark_crashed(info);
178
193
info->update= (HA_STATE_CHANGED | HA_STATE_WRITTEN | HA_STATE_ROW_CHANGED);
182
_mi_writeinfo(info,WRITEINFO_UPDATE_KEYFILE);
183
return(errno=save_errno);
197
VOID(_mi_writeinfo(info,WRITEINFO_UPDATE_KEYFILE));
198
return(my_errno=save_errno);
187
202
/* Write one key to btree */
189
int _mi_ck_write(MI_INFO *info, uint32_t keynr, unsigned char *key, uint32_t key_length)
204
int _mi_ck_write(MI_INFO *info, uint keynr, uchar *key, uint key_length)
191
206
if (info->bulk_insert && is_tree_inited(&info->bulk_insert[keynr]))
203
218
* Normal insert code *
204
219
**********************************************************************/
206
int _mi_ck_write_btree(register MI_INFO *info, uint32_t keynr, unsigned char *key,
221
int _mi_ck_write_btree(register MI_INFO *info, uint keynr, uchar *key,
211
226
MI_KEYDEF *keyinfo=info->s->keyinfo+keynr;
212
internal::my_off_t *root=&info->s->state.key_root[keynr];
227
my_off_t *root=&info->s->state.key_root[keynr];
214
229
if (keyinfo->flag & HA_SORT_ALLOWS_SAME)
215
230
comp_flag=SEARCH_BIGGER; /* Put after same key */
228
243
} /* _mi_ck_write_btree */
230
245
int _mi_ck_real_write_btree(MI_INFO *info, MI_KEYDEF *keyinfo,
231
unsigned char *key, uint32_t key_length, internal::my_off_t *root, uint32_t comp_flag)
246
uchar *key, uint key_length, my_off_t *root, uint comp_flag)
234
249
/* key_length parameter is used only if comp_flag is SEARCH_FIND */
235
250
if (*root == HA_OFFSET_ERROR ||
236
251
(error=w_search(info, keyinfo, comp_flag, key, key_length,
237
*root, (unsigned char *) 0, (unsigned char*) 0,
238
(internal::my_off_t) 0, 1)) > 0)
252
*root, (uchar *) 0, (uchar*) 0,
253
(my_off_t) 0, 1)) > 0)
239
254
error=_mi_enlarge_root(info,keyinfo,key,root);
241
256
} /* _mi_ck_real_write_btree */
244
259
/* Make a new root with key as only pointer */
246
int _mi_enlarge_root(MI_INFO *info, MI_KEYDEF *keyinfo, unsigned char *key,
247
internal::my_off_t *root)
261
int _mi_enlarge_root(MI_INFO *info, MI_KEYDEF *keyinfo, uchar *key,
249
uint32_t t_length,nod_flag;
264
uint t_length,nod_flag;
250
265
MI_KEY_PARAM s_temp;
251
266
MYISAM_SHARE *share=info->s;
253
268
nod_flag= (*root != HA_OFFSET_ERROR) ? share->base.key_reflength : 0;
254
269
_mi_kpointer(info,info->buff+2,*root); /* if nod */
255
t_length=(*keyinfo->pack_key)(keyinfo,nod_flag,(unsigned char*) 0,
256
(unsigned char*) 0, (unsigned char*) 0, key,&s_temp);
270
t_length=(*keyinfo->pack_key)(keyinfo,nod_flag,(uchar*) 0,
271
(uchar*) 0, (uchar*) 0, key,&s_temp);
257
272
mi_putint(info->buff,t_length+2+nod_flag,nod_flag);
258
273
(*keyinfo->store_key)(keyinfo,info->buff+2+nod_flag,&s_temp);
259
274
info->buff_used=info->page_changed=1; /* info->buff is used */
274
289
static int w_search(register MI_INFO *info, register MI_KEYDEF *keyinfo,
275
uint32_t comp_flag, unsigned char *key, uint32_t key_length, internal::my_off_t page,
276
unsigned char *father_buff, unsigned char *father_keypos,
277
internal::my_off_t father_page, bool insert_last)
290
uint comp_flag, uchar *key, uint key_length, my_off_t page,
291
uchar *father_buff, uchar *father_keypos,
292
my_off_t father_page, bool insert_last)
280
uint32_t nod_flag, search_key_length;
281
unsigned char *temp_buff,*keypos;
282
unsigned char keybuff[MI_MAX_KEY_BUFF];
295
uint nod_flag, search_key_length;
296
uchar *temp_buff,*keypos;
297
uchar keybuff[MI_MAX_KEY_BUFF];
283
298
bool was_last_key;
284
internal::my_off_t next_page, dupp_key_pos;
299
my_off_t next_page, dupp_key_pos;
286
301
search_key_length= (comp_flag & SEARCH_FIND) ? key_length : USE_WHOLE_KEY;
287
if (!(temp_buff= (unsigned char*) malloc(keyinfo->block_length+
302
if (!(temp_buff= (uchar*) my_alloca((uint) keyinfo->block_length+
290
305
if (!_mi_fetch_keypage(info,keyinfo,page,DFLT_INIT_HITS,temp_buff,0))
360
375
int _mi_insert(register MI_INFO *info, register MI_KEYDEF *keyinfo,
361
unsigned char *key, unsigned char *anc_buff, unsigned char *key_pos, unsigned char *key_buff,
362
unsigned char *father_buff, unsigned char *father_key_pos, internal::my_off_t father_page,
376
uchar *key, uchar *anc_buff, uchar *key_pos, uchar *key_buff,
377
uchar *father_buff, uchar *father_key_pos, my_off_t father_page,
363
378
bool insert_last)
365
uint32_t a_length,nod_flag;
380
uint a_length,nod_flag;
367
unsigned char *endpos, *prev_key;
382
uchar *endpos, *prev_key;
368
383
MI_KEY_PARAM s_temp;
370
385
nod_flag=mi_test_if_nod(anc_buff);
371
386
a_length=mi_getint(anc_buff);
372
387
endpos= anc_buff+ a_length;
373
prev_key=(key_pos == anc_buff+2+nod_flag ? (unsigned char*) 0 : key_buff);
388
prev_key=(key_pos == anc_buff+2+nod_flag ? (uchar*) 0 : key_buff);
374
389
t_length=(*keyinfo->pack_key)(keyinfo,nod_flag,
375
(key_pos == endpos ? (unsigned char*) 0 : key_pos),
390
(key_pos == endpos ? (uchar*) 0 : key_pos),
376
391
prev_key, prev_key,
381
396
if (t_length >= keyinfo->maxlength*2+MAX_POINTER_LENGTH)
383
398
mi_print_error(info->s, HA_ERR_CRASHED);
384
errno=HA_ERR_CRASHED;
399
my_errno=HA_ERR_CRASHED;
387
internal::bmove_upp((unsigned char*) endpos+t_length,(unsigned char*) endpos,(uint) (endpos-key_pos));
402
bmove_upp((uchar*) endpos+t_length,(uchar*) endpos,(uint) (endpos-key_pos));
391
406
if (-t_length >= keyinfo->maxlength*2+MAX_POINTER_LENGTH)
393
408
mi_print_error(info->s, HA_ERR_CRASHED);
394
errno=HA_ERR_CRASHED;
409
my_errno=HA_ERR_CRASHED;
397
memmove(key_pos, key_pos - t_length, endpos - key_pos + t_length);
412
memcpy(key_pos, key_pos - t_length, endpos - key_pos + t_length);
399
414
(*keyinfo->store_key)(keyinfo,key_pos,&s_temp);
400
415
a_length+=t_length;
417
432
/* split a full page in two and assign emerging item to key */
419
434
int _mi_split_page(register MI_INFO *info, register MI_KEYDEF *keyinfo,
420
unsigned char *key, unsigned char *buff, unsigned char *key_buff,
435
uchar *key, uchar *buff, uchar *key_buff,
421
436
bool insert_last_key)
423
uint32_t length,a_length,key_ref_length,t_length,nod_flag,key_length;
424
unsigned char *key_pos,*pos, *after_key= NULL;
425
internal::my_off_t new_pos;
438
uint length,a_length,key_ref_length,t_length,nod_flag,key_length;
439
uchar *key_pos,*pos, *after_key= NULL;
426
441
MI_KEY_PARAM s_temp;
428
443
if (info->s->keyinfo+info->lastinx == keyinfo)
458
473
if (!(*keyinfo->get_key)(keyinfo,nod_flag,&key_pos,key_buff))
461
t_length=(*keyinfo->pack_key)(keyinfo,nod_flag,(unsigned char *) 0,
462
(unsigned char*) 0, (unsigned char*) 0,
476
t_length=(*keyinfo->pack_key)(keyinfo,nod_flag,(uchar *) 0,
477
(uchar*) 0, (uchar*) 0,
463
478
key_buff, &s_temp);
464
479
length=(uint) ((buff+a_length)-key_pos);
465
480
memcpy(info->buff+key_ref_length+t_length, key_pos, length);
480
495
after_key will contain the position to where the next key starts
483
unsigned char *_mi_find_half_pos(uint32_t nod_flag, MI_KEYDEF *keyinfo, unsigned char *page,
484
unsigned char *key, uint32_t *return_key_length,
485
unsigned char **after_key)
498
uchar *_mi_find_half_pos(uint nod_flag, MI_KEYDEF *keyinfo, uchar *page,
499
uchar *key, uint *return_key_length,
487
uint32_t keys,length,key_ref_length;
488
unsigned char *end,*lastpos;
502
uint keys,length,key_ref_length;
490
505
key_ref_length=2+nod_flag;
491
506
length=mi_getint(page)-key_ref_length;
523
538
key will contain the last key
526
static unsigned char *_mi_find_last_pos(MI_KEYDEF *keyinfo, unsigned char *page,
527
unsigned char *key, uint32_t *return_key_length,
528
unsigned char **after_key)
541
static uchar *_mi_find_last_pos(MI_KEYDEF *keyinfo, uchar *page,
542
uchar *key, uint *return_key_length,
532
uint32_t last_length= 0;
533
uint32_t key_ref_length;
534
unsigned char *end, *lastpos, *prevpos= NULL;
535
unsigned char key_buff[MI_MAX_KEY_BUFF];
549
uchar *end, *lastpos, *prevpos= NULL;
550
uchar key_buff[MI_MAX_KEY_BUFF];
537
552
key_ref_length=2;
538
553
length=mi_getint(page)-key_ref_length;
575
590
/* returns 0 if balance was done */
577
592
static int _mi_balance_page(register MI_INFO *info, MI_KEYDEF *keyinfo,
578
unsigned char *key, unsigned char *curr_buff, unsigned char *father_buff,
579
unsigned char *father_key_pos, internal::my_off_t father_page)
593
uchar *key, uchar *curr_buff, uchar *father_buff,
594
uchar *father_key_pos, my_off_t father_page)
582
uint32_t k_length,father_length,father_keylength,nod_flag,curr_keylength,
597
uint k_length,father_length,father_keylength,nod_flag,curr_keylength,
583
598
right_length,left_length,new_right_length,new_left_length,extra_length,
585
unsigned char *pos,*buff,*extra_buff;
586
internal::my_off_t next_page,new_pos;
587
unsigned char tmp_part_key[MI_MAX_KEY_BUFF];
600
uchar *pos,*buff,*extra_buff;
601
my_off_t next_page,new_pos;
602
uchar tmp_part_key[MI_MAX_KEY_BUFF];
589
604
k_length=keyinfo->keylength;
590
605
father_length=mi_getint(father_buff);
636
651
memcpy(pos+k_length, buff+2, length);
637
652
pos=buff+2+length;
638
653
memcpy(father_key_pos, pos, k_length);
639
memmove(buff+2, pos+k_length, new_right_length);
654
memcpy(buff+2, pos+k_length, new_right_length);
642
657
{ /* Move keys -> buff */
644
internal::bmove_upp((unsigned char*) buff+new_right_length,(unsigned char*) buff+right_length,
659
bmove_upp((uchar*) buff+new_right_length,(uchar*) buff+right_length,
646
661
length=new_right_length-right_length-k_length;
647
662
memcpy(buff+2+length,father_key_pos, k_length);
674
689
/* Save new parting key */
675
690
memcpy(tmp_part_key, pos-k_length,k_length);
676
691
/* Make place for new keys */
677
internal::bmove_upp((unsigned char*) buff+new_right_length,(unsigned char*) pos-k_length,
692
bmove_upp((uchar*) buff+new_right_length,(uchar*) pos-k_length,
678
693
right_length-extra_length-k_length-2);
679
694
/* Copy keys from left page */
680
695
pos= curr_buff+new_left_length;
727
742
/* typeof(_mi_keys_compare)=qsort_cmp2 */
729
static int keys_compare(bulk_insert_param *param, unsigned char *key1, unsigned char *key2)
744
static int keys_compare(bulk_insert_param *param, uchar *key1, uchar *key2)
731
uint32_t not_used[2];
732
747
return ha_key_cmp(param->info->s->keyinfo[param->keynr].seg,
733
748
key1, key2, USE_WHOLE_KEY, SEARCH_SAME,
738
static int keys_free(unsigned char *key, TREE_FREE mode, bulk_insert_param *param)
753
static int keys_free(uchar *key, TREE_FREE mode, bulk_insert_param *param)
741
756
Probably I can use info->lastkey here, but I'm not sure,
742
757
and to be safe I'd better use local lastkey.
744
unsigned char lastkey[MI_MAX_KEY_BUFF];
759
uchar lastkey[MI_MAX_KEY_BUFF];
746
761
MI_KEYDEF *keyinfo;
750
765
if (param->info->s->concurrent_insert)
767
rw_wrlock(¶m->info->s->key_root_lock[param->keynr]);
752
768
param->info->s->keyinfo[param->keynr].version++;
815
833
init_tree(&info->bulk_insert[i],
816
834
cache_size * key[i].maxlength,
817
835
cache_size * key[i].maxlength, 0,
818
(qsort_cmp2)keys_compare, false,
836
(qsort_cmp2)keys_compare, 0,
819
837
(tree_element_free) keys_free, (void *)params++);