16
16
/* Create a MyISAM table */
18
#include "myisam_priv.h"
19
#include "drizzled/internal/my_bit.h"
20
#include "drizzled/internal/my_sys.h"
22
#include "drizzled/util/test.h"
23
#include "drizzled/global_charset_info.h"
24
#include "drizzled/error.h"
30
using namespace drizzled;
18
#include "myisamdef.h"
19
#include <mysys/my_tree.h>
20
#include <mysys/queues.h>
21
#include <mysys/my_bit.h>
23
#include <drizzled/util/test.h>
33
26
Old options is used when recreating database, from myisamchk
39
32
MI_CREATE_INFO *ci,uint32_t flags)
41
34
register uint32_t i, j;
42
int dfile= 0, file= 0;
35
File dfile= 0, file= 0;
43
36
int errpos,save_errno, create_mode= O_RDWR | O_TRUNC;
45
38
uint32_t fields,length,max_key_length,packed,pointer,real_length_diff,
80
73
if (!(ci->old_options & HA_OPTION_TEMP_COMPRESS_RECORD))
81
74
options=ci->old_options &
82
75
(HA_OPTION_COMPRESS_RECORD | HA_OPTION_PACK_RECORD |
83
HA_OPTION_READ_ONLY_DATA |
84
HA_OPTION_TMP_TABLE );
76
HA_OPTION_READ_ONLY_DATA | HA_OPTION_CHECKSUM |
77
HA_OPTION_TMP_TABLE | HA_OPTION_DELAY_KEY_WRITE);
86
79
options=ci->old_options &
87
(HA_OPTION_TMP_TABLE );
80
(HA_OPTION_CHECKSUM | HA_OPTION_TMP_TABLE | HA_OPTION_DELAY_KEY_WRITE);
90
83
if (ci->reloc_rows > ci->max_rows)
170
163
if (packed || (flags & HA_PACK_RECORD))
171
164
options|=HA_OPTION_PACK_RECORD; /* Must use packed records */
165
/* We can't use checksum with static length rows */
166
if (!(options & HA_OPTION_PACK_RECORD))
167
options&= ~HA_OPTION_CHECKSUM;
172
168
if (!(options & (HA_OPTION_PACK_RECORD | HA_OPTION_COMPRESS_RECORD)))
173
169
min_pack_length+= varchar_length;
174
170
if (flags & HA_CREATE_TMP_TABLE)
176
172
options|= HA_OPTION_TMP_TABLE;
177
173
create_mode|= O_EXCL;
175
if (flags & HA_CREATE_CHECKSUM || (options & HA_OPTION_CHECKSUM))
177
options|= HA_OPTION_CHECKSUM;
180
if (flags & HA_CREATE_DELAY_KEY_WRITE)
181
options|= HA_OPTION_DELAY_KEY_WRITE;
182
if (flags & HA_CREATE_RELIES_ON_SQL_LAYER)
183
options|= HA_OPTION_RELIES_ON_SQL_LAYER;
180
185
packed=(packed+7)/8;
181
186
if (pack_reclength != INT32_MAX)
182
187
pack_reclength+= reclength+packed +
183
test(test_all_bits(options,
184
uint32_t(HA_PACK_RECORD)));
188
test(test_all_bits(options, HA_OPTION_CHECKSUM | HA_PACK_RECORD));
185
189
min_pack_length+=packed;
187
191
if (!ci->data_file_length && ci->max_rows)
236
240
/* Test if prefix compression */
237
241
if (keydef->flag & HA_PACK_KEY)
243
/* Can't use space_compression on number keys */
244
if ((keydef->seg[0].flag & HA_SPACE_PACK) &&
245
keydef->seg[0].type == (int) HA_KEYTYPE_NUM)
246
keydef->seg[0].flag&= ~HA_SPACE_PACK;
239
248
/* Only use HA_PACK_KEY when first segment is a variable length key */
240
249
if (!(keydef->seg[0].flag & (HA_SPACE_PACK | HA_BLOB_PART |
241
250
HA_VAR_LENGTH_PART)))
261
270
/* numbers are stored with high by first to make compression easier */
262
271
switch (keyseg->type) {
272
case HA_KEYTYPE_SHORT_INT:
263
273
case HA_KEYTYPE_LONG_INT:
274
case HA_KEYTYPE_FLOAT:
264
275
case HA_KEYTYPE_DOUBLE:
276
case HA_KEYTYPE_USHORT_INT:
265
277
case HA_KEYTYPE_ULONG_INT:
266
278
case HA_KEYTYPE_LONGLONG:
267
279
case HA_KEYTYPE_ULONGLONG:
280
case HA_KEYTYPE_INT24:
268
281
case HA_KEYTYPE_UINT24:
282
case HA_KEYTYPE_INT8:
269
283
keyseg->flag|= HA_SWAP_KEY;
271
285
case HA_KEYTYPE_VARTEXT1:
341
355
block_length= (keydef->block_length ?
342
356
my_round_up_to_next_power(keydef->block_length) :
343
357
myisam_block_size);
344
block_length= max(block_length, (uint32_t)MI_MIN_KEY_BLOCK_LENGTH);
345
block_length= min(block_length, (uint32_t)MI_MAX_KEY_BLOCK_LENGTH);
358
block_length= cmax(block_length, MI_MIN_KEY_BLOCK_LENGTH);
359
block_length= cmin(block_length, MI_MAX_KEY_BLOCK_LENGTH);
347
361
keydef->block_length= (uint16_t) MI_BLOCK_SIZE(length-real_length_diff,
348
362
pointer,MI_MAX_KEYPTR_SIZE,
350
364
if (keydef->block_length > MI_MAX_KEY_BLOCK_LENGTH ||
351
365
length >= MI_MAX_KEY_BUFF)
353
errno=HA_WRONG_CREATE_OPTION;
367
my_errno=HA_WRONG_CREATE_OPTION;
356
set_if_bigger(max_key_block_length,(uint32_t)keydef->block_length);
370
set_if_bigger(max_key_block_length,keydef->block_length);
357
371
keydef->keylength= (uint16_t) key_length;
358
372
keydef->minlength= (uint16_t) (length-min_key_length_skip);
359
373
keydef->maxlength= (uint16_t) length;
396
410
my_printf_error(0, "MyISAM table '%s' has too many columns and/or "
397
411
"indexes and/or unique constraints.",
398
MYF(0), name + internal::dirname_length(name));
399
errno= HA_WRONG_CREATE_OPTION;
412
MYF(0), name + dirname_length(name));
413
my_errno= HA_WRONG_CREATE_OPTION;
430
444
got from MYI file header (see also myisampack.c:save_state)
432
446
share.base.key_reflength=
433
mi_get_pointer_length(max(ci->key_file_length,tmp),3);
447
mi_get_pointer_length(cmax(ci->key_file_length,tmp),3);
434
448
share.base.keys= share.state.header.keys= keys;
435
449
share.state.header.uniques= uniques;
436
450
share.state.header.fulltext_keys= fulltext_keys;
449
463
share.base.records=ci->max_rows;
450
464
share.base.reloc= ci->reloc_rows;
451
465
share.base.reclength=real_reclength;
452
share.base.pack_reclength=reclength;
466
share.base.pack_reclength=reclength+ test(options & HA_OPTION_CHECKSUM);
453
467
share.base.max_pack_length=pack_reclength;
454
468
share.base.min_pack_length=min_pack_length;
455
469
share.base.pack_bits=packed;
459
473
/* max_data_file_length and max_key_file_length are recalculated on open */
460
474
if (options & HA_OPTION_TMP_TABLE)
461
share.base.max_data_file_length=(internal::my_off_t) ci->data_file_length;
475
share.base.max_data_file_length=(my_off_t) ci->data_file_length;
463
477
share.base.min_block_length=
464
478
(share.base.pack_reclength+3 < MI_EXTEND_BLOCK_LENGTH &&
465
479
! share.base.blobs) ?
466
max(share.base.pack_reclength,(ulong)MI_MIN_BLOCK_LENGTH) :
480
cmax(share.base.pack_reclength,MI_MIN_BLOCK_LENGTH) :
467
481
MI_EXTEND_BLOCK_LENGTH;
468
482
if (! (flags & HA_DONT_TOUCH_DATA))
469
483
share.state.create_time= (long) time((time_t*) 0);
474
488
NOTE: For test_if_reopen() we need a real path name. Hence we need
475
MY_RETURN_REAL_PATH for every internal::fn_format(filename, ...).
489
MY_RETURN_REAL_PATH for every fn_format(filename, ...).
477
491
if (ci->index_file_name)
479
char *iext= strrchr((char *)ci->index_file_name, '.');
493
char *iext= strrchr(ci->index_file_name, '.');
480
494
int have_iext= iext && !strcmp(iext, MI_NAME_IEXT);
481
495
if (options & HA_OPTION_TMP_TABLE)
484
498
/* chop off the table name, tempory tables use generated name */
485
if ((path= strrchr((char *)ci->index_file_name, FN_LIBCHAR)))
499
if ((path= strrchr(ci->index_file_name, FN_LIBCHAR)))
487
internal::fn_format(filename, name, ci->index_file_name, MI_NAME_IEXT,
501
fn_format(filename, name, ci->index_file_name, MI_NAME_IEXT,
488
502
MY_REPLACE_DIR | MY_UNPACK_FILENAME |
489
503
MY_RETURN_REAL_PATH | MY_APPEND_EXT);
493
internal::fn_format(filename, ci->index_file_name, "", MI_NAME_IEXT,
507
fn_format(filename, ci->index_file_name, "", MI_NAME_IEXT,
494
508
MY_UNPACK_FILENAME | MY_RETURN_REAL_PATH |
495
509
(have_iext ? MY_REPLACE_EXT : MY_APPEND_EXT));
497
internal::fn_format(linkname, name, "", MI_NAME_IEXT,
511
fn_format(linkname, name, "", MI_NAME_IEXT,
498
512
MY_UNPACK_FILENAME|MY_APPEND_EXT);
499
513
linkname_ptr=linkname;
508
char *iext= strrchr((char *)name, '.');
522
char *iext= strrchr(name, '.');
509
523
int have_iext= iext && !strcmp(iext, MI_NAME_IEXT);
510
internal::fn_format(filename, name, "", MI_NAME_IEXT,
524
fn_format(filename, name, "", MI_NAME_IEXT,
511
525
MY_UNPACK_FILENAME | MY_RETURN_REAL_PATH |
512
526
(have_iext ? MY_REPLACE_EXT : MY_APPEND_EXT));
530
544
my_printf_error(0, "MyISAM table '%s' is in use "
531
545
"(most likely by a MERGE table). Try FLUSH TABLES.",
532
MYF(0), name + internal::dirname_length(name));
533
errno= HA_ERR_TABLE_EXIST;
546
MYF(0), name + dirname_length(name));
547
my_errno= HA_ERR_TABLE_EXIST;
537
if ((file= internal::my_create_with_symlink(linkname_ptr,
541
MYF(MY_WME | create_flag))) < 0)
551
if ((file= my_create_with_symlink(linkname_ptr, filename, 0, create_mode,
552
MYF(MY_WME | create_flag))) < 0)
548
559
if (ci->data_file_name)
550
char *dext= strrchr((char *)ci->data_file_name, '.');
561
char *dext= strrchr(ci->data_file_name, '.');
551
562
int have_dext= dext && !strcmp(dext, MI_NAME_DEXT);
553
564
if (options & HA_OPTION_TMP_TABLE)
556
567
/* chop off the table name, tempory tables use generated name */
557
if ((path= strrchr((char *)ci->data_file_name, FN_LIBCHAR)))
568
if ((path= strrchr(ci->data_file_name, FN_LIBCHAR)))
559
internal::fn_format(filename, name, ci->data_file_name, MI_NAME_DEXT,
570
fn_format(filename, name, ci->data_file_name, MI_NAME_DEXT,
560
571
MY_REPLACE_DIR | MY_UNPACK_FILENAME | MY_APPEND_EXT);
564
internal::fn_format(filename, ci->data_file_name, "", MI_NAME_DEXT,
575
fn_format(filename, ci->data_file_name, "", MI_NAME_DEXT,
565
576
MY_UNPACK_FILENAME |
566
577
(have_dext ? MY_REPLACE_EXT : MY_APPEND_EXT));
569
internal::fn_format(linkname, name, "",MI_NAME_DEXT,
580
fn_format(linkname, name, "",MI_NAME_DEXT,
570
581
MY_UNPACK_FILENAME | MY_APPEND_EXT);
571
582
linkname_ptr=linkname;
576
internal::fn_format(filename,name,"", MI_NAME_DEXT,
587
fn_format(filename,name,"", MI_NAME_DEXT,
577
588
MY_UNPACK_FILENAME | MY_APPEND_EXT);
579
590
create_flag=(flags & HA_CREATE_KEEP_FILES) ? 0 : MY_DELETE_OLD;
581
if ((dfile= internal::my_create_with_symlink(linkname_ptr,
582
filename, 0, create_mode,
583
MYF(MY_WME | create_flag))) < 0)
593
my_create_with_symlink(linkname_ptr, filename, 0, create_mode,
594
MYF(MY_WME | create_flag))) < 0)
670
if (internal::my_close(dfile,MYF(0)))
681
if (my_close(dfile,MYF(0)))
674
685
pthread_mutex_unlock(&THR_LOCK_myisam);
675
if (internal::my_close(file,MYF(0)))
686
if (my_close(file,MYF(0)))
677
688
free((char*) rec_per_key_part);
681
692
pthread_mutex_unlock(&THR_LOCK_myisam);
683
694
switch (errpos) {
685
internal::my_close(dfile,MYF(0));
696
my_close(dfile,MYF(0));
686
697
/* fall through */
688
699
if (! (flags & HA_DONT_TOUCH_DATA))
689
internal::my_delete_with_symlink(internal::fn_format(filename,name,"",MI_NAME_DEXT,
700
my_delete_with_symlink(fn_format(filename,name,"",MI_NAME_DEXT,
690
701
MY_UNPACK_FILENAME | MY_APPEND_EXT),
692
703
/* fall through */
694
internal::my_close(file,MYF(0));
705
my_close(file,MYF(0));
695
706
if (! (flags & HA_DONT_TOUCH_DATA))
696
internal::my_delete_with_symlink(internal::fn_format(filename,name,"",MI_NAME_IEXT,
707
my_delete_with_symlink(fn_format(filename,name,"",MI_NAME_IEXT,
697
708
MY_UNPACK_FILENAME | MY_APPEND_EXT),
700
711
free((char*) rec_per_key_part);
701
return(errno=save_errno); /* return the fatal errno */
712
return(my_errno=save_errno); /* return the fatal errno */