← Back to branch summary

~drizzle-trunk/drizzle/development

« back to all changes in this revision

Viewing changes to storage/myisam/mi_write.c

Merged in changes from Andrey.

Show diffs side-by-side

added added

removed removed

Lines of Context:
storage/myisam/mi_write.c
22
22
        /* Functions declared in this file */
23
23
 
24
24
static int w_search(MI_INFO *info,MI_KEYDEF *keyinfo,
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,
 
25
                    uint32_t comp_flag, unsigned char *key,
 
26
                    uint32_t key_length, my_off_t pos, unsigned char *father_buff,
 
27
                    unsigned char *father_keypos, my_off_t father_page,
28
28
                    bool insert_last);
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,
34
 
                                uchar **after_key);
35
 
int _mi_ck_write_tree(register MI_INFO *info, uint keynr,uchar *key,
36
 
                      uint key_length);
37
 
int _mi_ck_write_btree(register MI_INFO *info, uint keynr,uchar *key,
38
 
                       uint key_length);
 
29
static int _mi_balance_page(MI_INFO *info,MI_KEYDEF *keyinfo,unsigned char *key,
 
30
                            unsigned char *curr_buff,unsigned char *father_buff,
 
31
                            unsigned char *father_keypos,my_off_t father_page);
 
32
static unsigned char *_mi_find_last_pos(MI_KEYDEF *keyinfo, unsigned char *page,
 
33
                                unsigned char *key, uint32_t *return_key_length,
 
34
                                unsigned char **after_key);
 
35
int _mi_ck_write_tree(register MI_INFO *info, uint32_t keynr,unsigned char *key,
 
36
                      uint32_t key_length);
 
37
int _mi_ck_write_btree(register MI_INFO *info, uint32_t keynr,unsigned char *key,
 
38
                       uint32_t key_length);
39
39
 
40
40
        /* Write new record to database */
41
41
 
42
 
int mi_write(MI_INFO *info, uchar *record)
 
42
int mi_write(MI_INFO *info, unsigned char *record)
43
43
{
44
44
  MYISAM_SHARE *share=info->s;
45
 
  uint i;
 
45
  uint32_t i;
46
46
  int save_errno;
47
47
  my_off_t filepos;
48
 
  uchar *buff;
 
48
  unsigned char *buff;
49
49
  bool lock_tree= share->concurrent_insert;
50
50
 
51
51
  if (share->options & HA_OPTION_READ_ONLY_DATA)
130
130
                 HA_STATE_ROW_CHANGED);
131
131
  info->state->records++;
132
132
  info->lastpos=filepos;
133
 
  VOID(_mi_writeinfo(info, WRITEINFO_UPDATE_KEYFILE));
 
133
  _mi_writeinfo(info, WRITEINFO_UPDATE_KEYFILE);
134
134
  if (info->invalidator != 0)
135
135
  {
136
136
    (*info->invalidator)(info->filename);
157
157
  {
158
158
    if (info->bulk_insert)
159
159
    {
160
 
      uint j;
 
160
      uint32_t j;
161
161
      for (j=0 ; j < share->base.keys ; j++)
162
162
        mi_flush_bulk_insert(info, j);
163
163
    }
172
172
        if (local_lock_tree)
173
173
          rw_wrlock(&share->key_root_lock[i]);
174
174
        {
175
 
          uint key_length=_mi_make_key(info,i,buff,record,filepos);
 
175
          uint32_t key_length=_mi_make_key(info,i,buff,record,filepos);
176
176
          if (_mi_ck_delete(info,i,buff,key_length))
177
177
          {
178
178
            if (local_lock_tree)
194
194
  my_errno=save_errno;
195
195
err2:
196
196
  save_errno=my_errno;
197
 
  VOID(_mi_writeinfo(info,WRITEINFO_UPDATE_KEYFILE));
 
197
  _mi_writeinfo(info,WRITEINFO_UPDATE_KEYFILE);
198
198
  return(my_errno=save_errno);
199
199
} /* mi_write */
200
200
 
201
201
 
202
202
        /* Write one key to btree */
203
203
 
204
 
int _mi_ck_write(MI_INFO *info, uint keynr, uchar *key, uint key_length)
 
204
int _mi_ck_write(MI_INFO *info, uint32_t keynr, unsigned char *key, uint32_t key_length)
205
205
{
206
206
  if (info->bulk_insert && is_tree_inited(&info->bulk_insert[keynr]))
207
207
  {
218
218
 *                Normal insert code                                  *
219
219
 **********************************************************************/
220
220
 
221
 
int _mi_ck_write_btree(register MI_INFO *info, uint keynr, uchar *key,
222
 
                       uint key_length)
 
221
int _mi_ck_write_btree(register MI_INFO *info, uint32_t keynr, unsigned char *key,
 
222
                       uint32_t key_length)
223
223
{
224
 
  uint error;
225
 
  uint comp_flag;
 
224
  uint32_t error;
 
225
  uint32_t comp_flag;
226
226
  MI_KEYDEF *keyinfo=info->s->keyinfo+keynr;
227
227
  my_off_t  *root=&info->s->state.key_root[keynr];
228
228
 
243
243
} /* _mi_ck_write_btree */
244
244
 
245
245
int _mi_ck_real_write_btree(MI_INFO *info, MI_KEYDEF *keyinfo,
246
 
    uchar *key, uint key_length, my_off_t *root, uint comp_flag)
 
246
    unsigned char *key, uint32_t key_length, my_off_t *root, uint32_t comp_flag)
247
247
{
248
248
  int error;
249
249
  /* key_length parameter is used only if comp_flag is SEARCH_FIND */
250
250
  if (*root == HA_OFFSET_ERROR ||
251
251
      (error=w_search(info, keyinfo, comp_flag, key, key_length,
252
 
                      *root, (uchar *) 0, (uchar*) 0,
 
252
                      *root, (unsigned char *) 0, (unsigned char*) 0,
253
253
                      (my_off_t) 0, 1)) > 0)
254
254
    error=_mi_enlarge_root(info,keyinfo,key,root);
255
255
  return(error);
258
258
 
259
259
        /* Make a new root with key as only pointer */
260
260
 
261
 
int _mi_enlarge_root(MI_INFO *info, MI_KEYDEF *keyinfo, uchar *key,
 
261
int _mi_enlarge_root(MI_INFO *info, MI_KEYDEF *keyinfo, unsigned char *key,
262
262
                     my_off_t *root)
263
263
{
264
 
  uint t_length,nod_flag;
 
264
  uint32_t t_length,nod_flag;
265
265
  MI_KEY_PARAM s_temp;
266
266
  MYISAM_SHARE *share=info->s;
267
267
 
268
268
  nod_flag= (*root != HA_OFFSET_ERROR) ?  share->base.key_reflength : 0;
269
269
  _mi_kpointer(info,info->buff+2,*root); /* if nod */
270
 
  t_length=(*keyinfo->pack_key)(keyinfo,nod_flag,(uchar*) 0,
271
 
                                (uchar*) 0, (uchar*) 0, key,&s_temp);
 
270
  t_length=(*keyinfo->pack_key)(keyinfo,nod_flag,(unsigned char*) 0,
 
271
                                (unsigned char*) 0, (unsigned char*) 0, key,&s_temp);
272
272
  mi_putint(info->buff,t_length+2+nod_flag,nod_flag);
273
273
  (*keyinfo->store_key)(keyinfo,info->buff+2+nod_flag,&s_temp);
274
274
  info->buff_used=info->page_changed=1;         /* info->buff is used */
287
287
        */
288
288
 
289
289
static int w_search(register MI_INFO *info, register MI_KEYDEF *keyinfo,
290
 
                    uint comp_flag, uchar *key, uint key_length, my_off_t page,
291
 
                    uchar *father_buff, uchar *father_keypos,
 
290
                    uint32_t comp_flag, unsigned char *key, uint32_t key_length, my_off_t page,
 
291
                    unsigned char *father_buff, unsigned char *father_keypos,
292
292
                    my_off_t father_page, bool insert_last)
293
293
{
294
294
  int error,flag;
295
 
  uint nod_flag, search_key_length;
296
 
  uchar *temp_buff,*keypos;
297
 
  uchar keybuff[MI_MAX_KEY_BUFF];
 
295
  uint32_t nod_flag, search_key_length;
 
296
  unsigned char *temp_buff,*keypos;
 
297
  unsigned char keybuff[MI_MAX_KEY_BUFF];
298
298
  bool was_last_key;
299
299
  my_off_t next_page, dupp_key_pos;
300
300
 
301
301
  search_key_length= (comp_flag & SEARCH_FIND) ? key_length : USE_WHOLE_KEY;
302
 
  if (!(temp_buff= (uchar*) my_alloca((uint) keyinfo->block_length+
 
302
  if (!(temp_buff= (unsigned char*) my_alloca((uint) keyinfo->block_length+
303
303
                                      MI_MAX_KEY_BUFF*2)))
304
304
    return(-1);
305
305
  if (!_mi_fetch_keypage(info,keyinfo,page,DFLT_INIT_HITS,temp_buff,0))
310
310
  nod_flag=mi_test_if_nod(temp_buff);
311
311
  if (flag == 0)
312
312
  {
313
 
    uint tmp_key_length;
 
313
    uint32_t tmp_key_length;
314
314
        /* get position to record with duplicated key */
315
315
    tmp_key_length=(*keyinfo->get_key)(keyinfo,nod_flag,&keypos,keybuff);
316
316
    if (tmp_key_length)
320
320
 
321
321
    {
322
322
      info->dupp_key_pos= dupp_key_pos;
323
 
      my_afree((uchar*) temp_buff);
 
323
      my_afree((unsigned char*) temp_buff);
324
324
      my_errno=HA_ERR_FOUND_DUPP_KEY;
325
325
      return(-1);
326
326
    }
339
339
    if (_mi_write_keypage(info,keyinfo,page,DFLT_INIT_HITS,temp_buff))
340
340
      goto err;
341
341
  }
342
 
  my_afree((uchar*) temp_buff);
 
342
  my_afree((unsigned char*) temp_buff);
343
343
  return(error);
344
344
err:
345
 
  my_afree((uchar*) temp_buff);
 
345
  my_afree((unsigned char*) temp_buff);
346
346
  return (-1);
347
347
} /* w_search */
348
348
 
373
373
*/
374
374
 
375
375
int _mi_insert(register MI_INFO *info, register MI_KEYDEF *keyinfo,
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,
 
376
               unsigned char *key, unsigned char *anc_buff, unsigned char *key_pos, unsigned char *key_buff,
 
377
               unsigned char *father_buff, unsigned char *father_key_pos, my_off_t father_page,
378
378
               bool insert_last)
379
379
{
380
 
  uint a_length,nod_flag;
 
380
  uint32_t a_length,nod_flag;
381
381
  int t_length;
382
 
  uchar *endpos, *prev_key;
 
382
  unsigned char *endpos, *prev_key;
383
383
  MI_KEY_PARAM s_temp;
384
384
 
385
385
  nod_flag=mi_test_if_nod(anc_buff);
386
386
  a_length=mi_getint(anc_buff);
387
387
  endpos= anc_buff+ a_length;
388
 
  prev_key=(key_pos == anc_buff+2+nod_flag ? (uchar*) 0 : key_buff);
 
388
  prev_key=(key_pos == anc_buff+2+nod_flag ? (unsigned char*) 0 : key_buff);
389
389
  t_length=(*keyinfo->pack_key)(keyinfo,nod_flag,
390
 
                                (key_pos == endpos ? (uchar*) 0 : key_pos),
 
390
                                (key_pos == endpos ? (unsigned char*) 0 : key_pos),
391
391
                                prev_key, prev_key,
392
392
                                key,&s_temp);
393
393
 
399
399
      my_errno=HA_ERR_CRASHED;
400
400
      return(-1);
401
401
    }
402
 
    bmove_upp((uchar*) endpos+t_length,(uchar*) endpos,(uint) (endpos-key_pos));
 
402
    bmove_upp((unsigned char*) endpos+t_length,(unsigned char*) endpos,(uint) (endpos-key_pos));
403
403
  }
404
404
  else
405
405
  {
432
432
        /* split a full page in two and assign emerging item to key */
433
433
 
434
434
int _mi_split_page(register MI_INFO *info, register MI_KEYDEF *keyinfo,
435
 
                   uchar *key, uchar *buff, uchar *key_buff,
 
435
                   unsigned char *key, unsigned char *buff, unsigned char *key_buff,
436
436
                   bool insert_last_key)
437
437
{
438
 
  uint length,a_length,key_ref_length,t_length,nod_flag,key_length;
439
 
  uchar *key_pos,*pos, *after_key= NULL;
 
438
  uint32_t length,a_length,key_ref_length,t_length,nod_flag,key_length;
 
439
  unsigned char *key_pos,*pos, *after_key= NULL;
440
440
  my_off_t new_pos;
441
441
  MI_KEY_PARAM s_temp;
442
442
 
473
473
  if (!(*keyinfo->get_key)(keyinfo,nod_flag,&key_pos,key_buff))
474
474
    return(-1);
475
475
 
476
 
  t_length=(*keyinfo->pack_key)(keyinfo,nod_flag,(uchar *) 0,
477
 
                                (uchar*) 0, (uchar*) 0,
 
476
  t_length=(*keyinfo->pack_key)(keyinfo,nod_flag,(unsigned char *) 0,
 
477
                                (unsigned char*) 0, (unsigned char*) 0,
478
478
                                key_buff, &s_temp);
479
479
  length=(uint) ((buff+a_length)-key_pos);
480
480
  memcpy(info->buff+key_ref_length+t_length, key_pos, length);
495
495
          after_key will contain the position to where the next key starts
496
496
        */
497
497
 
498
 
uchar *_mi_find_half_pos(uint nod_flag, MI_KEYDEF *keyinfo, uchar *page,
499
 
                         uchar *key, uint *return_key_length,
500
 
                         uchar **after_key)
 
498
unsigned char *_mi_find_half_pos(uint32_t nod_flag, MI_KEYDEF *keyinfo, unsigned char *page,
 
499
                         unsigned char *key, uint32_t *return_key_length,
 
500
                         unsigned char **after_key)
501
501
{
502
 
  uint keys,length,key_ref_length;
503
 
  uchar *end,*lastpos;
 
502
  uint32_t keys,length,key_ref_length;
 
503
  unsigned char *end,*lastpos;
504
504
 
505
505
  key_ref_length=2+nod_flag;
506
506
  length=mi_getint(page)-key_ref_length;
538
538
          key will contain the last key
539
539
        */
540
540
 
541
 
static uchar *_mi_find_last_pos(MI_KEYDEF *keyinfo, uchar *page,
542
 
                                uchar *key, uint *return_key_length,
543
 
                                uchar **after_key)
 
541
static unsigned char *_mi_find_last_pos(MI_KEYDEF *keyinfo, unsigned char *page,
 
542
                                unsigned char *key, uint32_t *return_key_length,
 
543
                                unsigned char **after_key)
544
544
{
545
 
  uint keys;
546
 
  uint length;
547
 
  uint last_length= 0;
548
 
  uint key_ref_length;
549
 
  uchar *end, *lastpos, *prevpos= NULL;
550
 
  uchar key_buff[MI_MAX_KEY_BUFF];
 
545
  uint32_t keys;
 
546
  uint32_t length;
 
547
  uint32_t last_length= 0;
 
548
  uint32_t key_ref_length;
 
549
  unsigned char *end, *lastpos, *prevpos= NULL;
 
550
  unsigned char key_buff[MI_MAX_KEY_BUFF];
551
551
 
552
552
  key_ref_length=2;
553
553
  length=mi_getint(page)-key_ref_length;
590
590
        /* returns 0 if balance was done */
591
591
 
592
592
static int _mi_balance_page(register MI_INFO *info, MI_KEYDEF *keyinfo,
593
 
                            uchar *key, uchar *curr_buff, uchar *father_buff,
594
 
                            uchar *father_key_pos, my_off_t father_page)
 
593
                            unsigned char *key, unsigned char *curr_buff, unsigned char *father_buff,
 
594
                            unsigned char *father_key_pos, my_off_t father_page)
595
595
{
596
596
  bool right;
597
 
  uint k_length,father_length,father_keylength,nod_flag,curr_keylength,
 
597
  uint32_t k_length,father_length,father_keylength,nod_flag,curr_keylength,
598
598
       right_length,left_length,new_right_length,new_left_length,extra_length,
599
599
       length,keys;
600
 
  uchar *pos,*buff,*extra_buff;
 
600
  unsigned char *pos,*buff,*extra_buff;
601
601
  my_off_t next_page,new_pos;
602
 
  uchar tmp_part_key[MI_MAX_KEY_BUFF];
 
602
  unsigned char tmp_part_key[MI_MAX_KEY_BUFF];
603
603
 
604
604
  k_length=keyinfo->keylength;
605
605
  father_length=mi_getint(father_buff);
656
656
    else
657
657
    {                                           /* Move keys -> buff */
658
658
 
659
 
      bmove_upp((uchar*) buff+new_right_length,(uchar*) buff+right_length,
 
659
      bmove_upp((unsigned char*) buff+new_right_length,(unsigned char*) buff+right_length,
660
660
                right_length-2);
661
661
      length=new_right_length-right_length-k_length;
662
662
      memcpy(buff+2+length,father_key_pos, k_length);
689
689
  /* Save new parting key */
690
690
  memcpy(tmp_part_key, pos-k_length,k_length);
691
691
  /* Make place for new keys */
692
 
  bmove_upp((uchar*) buff+new_right_length,(uchar*) pos-k_length,
 
692
  bmove_upp((unsigned char*) buff+new_right_length,(unsigned char*) pos-k_length,
693
693
            right_length-extra_length-k_length-2);
694
694
  /* Copy keys from left page */
695
695
  pos= curr_buff+new_left_length;
723
723
 
724
724
typedef struct {
725
725
  MI_INFO *info;
726
 
  uint keynr;
 
726
  uint32_t keynr;
727
727
} bulk_insert_param;
728
728
 
729
 
int _mi_ck_write_tree(register MI_INFO *info, uint keynr, uchar *key,
730
 
                      uint key_length)
 
729
int _mi_ck_write_tree(register MI_INFO *info, uint32_t keynr, unsigned char *key,
 
730
                      uint32_t key_length)
731
731
{
732
732
  int error;
733
733
 
741
741
 
742
742
/* typeof(_mi_keys_compare)=qsort_cmp2 */
743
743
 
744
 
static int keys_compare(bulk_insert_param *param, uchar *key1, uchar *key2)
 
744
static int keys_compare(bulk_insert_param *param, unsigned char *key1, unsigned char *key2)
745
745
{
746
 
  uint not_used[2];
 
746
  uint32_t not_used[2];
747
747
  return ha_key_cmp(param->info->s->keyinfo[param->keynr].seg,
748
748
                    key1, key2, USE_WHOLE_KEY, SEARCH_SAME,
749
749
                    not_used);
750
750
}
751
751
 
752
752
 
753
 
static int keys_free(uchar *key, TREE_FREE mode, bulk_insert_param *param)
 
753
static int keys_free(unsigned char *key, TREE_FREE mode, bulk_insert_param *param)
754
754
{
755
755
  /*
756
756
    Probably I can use info->lastkey here, but I'm not sure,
757
757
    and to be safe I'd better use local lastkey.
758
758
  */
759
 
  uchar lastkey[MI_MAX_KEY_BUFF];
760
 
  uint keylen;
 
759
  unsigned char lastkey[MI_MAX_KEY_BUFF];
 
760
  uint32_t keylen;
761
761
  MI_KEYDEF *keyinfo;
762
762
 
763
763
  switch (mode) {
788
788
  MYISAM_SHARE *share=info->s;
789
789
  MI_KEYDEF *key=share->keyinfo;
790
790
  bulk_insert_param *params;
791
 
  uint i, num_keys, total_keylength;
 
791
  uint32_t i, num_keys, total_keylength;
792
792
  uint64_t key_map;
793
793
 
794
794
  assert(!info->bulk_insert &&
843
843
  return(0);
844
844
}
845
845
 
846
 
void mi_flush_bulk_insert(MI_INFO *info, uint inx)
 
846
void mi_flush_bulk_insert(MI_INFO *info, uint32_t inx)
847
847
{
848
848
  if (info->bulk_insert)
849
849
  {
856
856
{
857
857
  if (info->bulk_insert)
858
858
  {
859
 
    uint i;
 
859
    uint32_t i;
860
860
    for (i=0 ; i < info->s->base.keys ; i++)
861
861
    {
862
862
      if (is_tree_inited(& info->bulk_insert[i]))
864
864
        delete_tree(& info->bulk_insert[i]);
865
865
      }
866
866
    }
867
 
    my_free((void *)info->bulk_insert, MYF(0));
 
867
    free((void *)info->bulk_insert);
868
868
    info->bulk_insert=0;
869
869
  }
870
870
}