set_var.cc 86.7 KB
Newer Older
1
/* Copyright (C) 2000-2003 MySQL AB
2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24

   This program is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 2 of the License, or
   (at your option) any later version.

   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA */

/*
  Handling of MySQL SQL variables

  To add a new variable, one has to do the following:

  - Use one of the 'sys_var... classes from set_var.h or write a specific
    one for the variable type.
  - Define it in the 'variable definition list' in this file.
25 26
  - If the variable should be changeable or one should be able to access it
    with @@variable_name, it should be added to the 'list of all variables'
27 28 29
    list (sys_variables) in this file.
  - If the variable is thread specific, add it to 'system_variables' struct.
    If not, add it to mysqld.cc and an declaration in 'mysql_priv.h'
30 31
  - If the variable should be changed from the command line, add a definition
    of it in the my_option structure list in mysqld.dcc
32 33
  - Don't forget to initialize new fields in global_system_variables and
    max_system_variables!
34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49
  - If the variable should show up in 'show variables' add it to the
    init_vars[] struct in this file

  TODO:
    - Add full support for the variable character_set (for 4.1)

    - When updating myisam_delay_key_write, we should do a 'flush tables'
      of all MyISAM tables to ensure that they are reopen with the
      new attribute.
*/

#ifdef __GNUC__
#pragma implementation				// gcc: Class implementation
#endif

#include "mysql_priv.h"
50
#include <mysql.h>
51 52 53
#include "slave.h"
#include "sql_acl.h"
#include <my_getopt.h>
54
#include <thr_alarm.h>
55 56 57 58 59 60 61 62 63 64 65 66 67 68 69
#include <myisam.h>
#ifdef HAVE_BERKELEY_DB
#include "ha_berkeley.h"
#endif
#ifdef HAVE_INNOBASE_DB
#include "ha_innodb.h"
#endif

static HASH system_variable_hash;
const char *bool_type_names[]= { "OFF", "ON", NullS };
TYPELIB bool_typelib=
{
  array_elements(bool_type_names)-1, "", bool_type_names
};

70 71 72 73 74 75
const char *delay_key_write_type_names[]= { "OFF", "ON", "ALL", NullS };
TYPELIB delay_key_write_typelib=
{
  array_elements(delay_key_write_type_names)-1, "", delay_key_write_type_names
};

76
static int sys_check_charset(THD *thd, set_var *var);
77 78
static bool sys_update_charset(THD *thd, set_var *var);
static void sys_set_default_charset(THD *thd, enum_var_type type);
79 80 81
static int sys_check_ftb_syntax(THD *thd,  set_var *var);
static bool sys_update_ftb_syntax(THD *thd, set_var * var);
static void sys_default_ftb_syntax(THD *thd, enum_var_type type);
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
82 83 84 85
static bool sys_update_init_connect(THD*, set_var*);
static void sys_default_init_connect(THD*, enum_var_type type);
static bool sys_update_init_slave(THD*, set_var*);
static void sys_default_init_slave(THD*, enum_var_type type);
86 87 88 89 90 91 92
static bool set_option_bit(THD *thd, set_var *var);
static bool set_option_autocommit(THD *thd, set_var *var);
static bool set_log_update(THD *thd, set_var *var);
static void fix_low_priority_updates(THD *thd, enum_var_type type);
static void fix_tx_isolation(THD *thd, enum_var_type type);
static void fix_net_read_timeout(THD *thd, enum_var_type type);
static void fix_net_write_timeout(THD *thd, enum_var_type type);
93
static void fix_net_retry_count(THD *thd, enum_var_type type);
94 95
static void fix_max_join_size(THD *thd, enum_var_type type);
static void fix_query_cache_size(THD *thd, enum_var_type type);
96
static void fix_query_cache_min_res_unit(THD *thd, enum_var_type type);
97 98
static void fix_myisam_max_extra_sort_file_size(THD *thd, enum_var_type type);
static void fix_myisam_max_sort_file_size(THD *thd, enum_var_type type);
99 100
static void fix_max_binlog_size(THD *thd, enum_var_type type);
static void fix_max_relay_log_size(THD *thd, enum_var_type type);
101
static void fix_max_connections(THD *thd, enum_var_type type);
102 103
static void fix_thd_mem_root(THD *thd, enum_var_type type);
static void fix_trans_mem_root(THD *thd, enum_var_type type);
104
static KEY_CACHE *create_key_cache(const char *name, uint length);
105
void fix_sql_mode_var(THD *thd, enum_var_type type);
106 107
static byte *get_error_count(THD *thd);
static byte *get_warning_count(THD *thd);
108 109 110 111 112 113 114 115 116 117 118 119

/*
  Variable definition list

  These are variables that can be set from the command line, in
  alphabetic order
*/

sys_var_long_ptr	sys_binlog_cache_size("binlog_cache_size",
					      &binlog_cache_size);
sys_var_thd_ulong	sys_bulk_insert_buff_size("bulk_insert_buffer_size",
						  &SV::bulk_insert_buff_size);
120 121
sys_var_character_set_server	sys_character_set_server("character_set_server");
sys_var_str			sys_charset_system("character_set_system",
122 123 124
				    sys_check_charset,
				    sys_update_charset,
				    sys_set_default_charset);
125
sys_var_character_set_database	sys_character_set_database("character_set_database");
126
sys_var_character_set_client  sys_character_set_client("character_set_client");
127
sys_var_character_set_connection  sys_character_set_connection("character_set_connection");
128
sys_var_character_set_results sys_character_set_results("character_set_results");
129
sys_var_collation_connection sys_collation_connection("collation_connection");
130 131
sys_var_collation_database sys_collation_database("collation_database");
sys_var_collation_server sys_collation_server("collation_server");
132 133 134 135
sys_var_bool_ptr	sys_concurrent_insert("concurrent_insert",
					      &myisam_concurrent_insert);
sys_var_long_ptr	sys_connect_timeout("connect_timeout",
					    &connect_timeout);
136 137 138 139
sys_var_enum		sys_delay_key_write("delay_key_write",
					    &delay_key_write_options,
					    &delay_key_write_typelib,
					    fix_delay_key_write);
140 141 142 143 144 145
sys_var_long_ptr	sys_delayed_insert_limit("delayed_insert_limit",
						 &delayed_insert_limit);
sys_var_long_ptr	sys_delayed_insert_timeout("delayed_insert_timeout",
						   &delayed_insert_timeout);
sys_var_long_ptr	sys_delayed_queue_size("delayed_queue_size",
					       &delayed_queue_size);
146 147
sys_var_long_ptr	sys_expire_logs_days("expire_logs_days",
					     &expire_logs_days);
148 149
sys_var_bool_ptr	sys_flush("flush", &myisam_flush);
sys_var_long_ptr	sys_flush_time("flush_time", &flush_time);
150 151 152 153 154 155 156 157 158 159
sys_var_str             sys_ft_boolean_syntax("ft_boolean_syntax",
                                         sys_check_ftb_syntax,
                                         sys_update_ftb_syntax,
                                         sys_default_ftb_syntax);
sys_var_str             sys_init_connect("init_connect", 0,
                                         sys_update_init_connect,
                                         sys_default_init_connect);
sys_var_str             sys_init_slave("init_slave", 0,
                                       sys_update_init_slave,
                                       sys_default_init_slave);
160 161 162 163
sys_var_thd_ulong	sys_interactive_timeout("interactive_timeout",
						&SV::net_interactive_timeout);
sys_var_thd_ulong	sys_join_buffer_size("join_buffer_size",
					     &SV::join_buff_size);
164
sys_var_key_buffer_size	sys_key_buffer_size("key_buffer_size");
165
sys_var_key_cache_long  sys_key_cache_block_size("key_cache_block_size",
166 167
						 offsetof(KEY_CACHE,
							  param_block_size));
168
sys_var_key_cache_long	sys_key_cache_division_limit("key_cache_division_limit",
169 170
						     offsetof(KEY_CACHE,
							      param_division_limit));
171
sys_var_key_cache_long  sys_key_cache_age_threshold("key_cache_age_threshold",
172 173
						     offsetof(KEY_CACHE,
							      param_age_threshold));
174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191
sys_var_bool_ptr	sys_local_infile("local_infile",
					 &opt_local_infile);
sys_var_thd_bool	sys_log_warnings("log_warnings", &SV::log_warnings);
sys_var_thd_ulong	sys_long_query_time("long_query_time",
					     &SV::long_query_time);
sys_var_thd_bool	sys_low_priority_updates("low_priority_updates",
						 &SV::low_priority_updates,
						 fix_low_priority_updates);
#ifndef TO_BE_DELETED	/* Alias for the low_priority_updates */
sys_var_thd_bool	sys_sql_low_priority_updates("sql_low_priority_updates",
						     &SV::low_priority_updates,
						     fix_low_priority_updates);
#endif
sys_var_thd_ulong	sys_max_allowed_packet("max_allowed_packet",
					       &SV::max_allowed_packet);
sys_var_long_ptr	sys_max_binlog_cache_size("max_binlog_cache_size",
						  &max_binlog_cache_size);
sys_var_long_ptr	sys_max_binlog_size("max_binlog_size",
192 193
					    &max_binlog_size,
                                            fix_max_binlog_size);
194
sys_var_long_ptr	sys_max_connections("max_connections",
195 196
					    &max_connections,
                                            fix_max_connections);
197 198
sys_var_long_ptr	sys_max_connect_errors("max_connect_errors",
					       &max_connect_errors);
199 200 201 202
sys_var_thd_ulong       sys_max_insert_delayed_threads("max_insert_delayed_threads",
						       &SV::max_insert_delayed_threads);
sys_var_thd_ulong	sys_max_delayed_threads("max_delayed_threads",
						&SV::max_insert_delayed_threads,
203
						fix_max_connections);
204 205
sys_var_thd_ulong	sys_max_error_count("max_error_count",
					    &SV::max_error_count);
206 207
sys_var_thd_ulong	sys_max_heap_table_size("max_heap_table_size",
						&SV::max_heap_table_size);
208 209 210 211 212
/* 
   sys_pseudo_thread_id has its own class (instead of sys_var_thd_ulong) because
   we want a check() function.
*/
sys_var_pseudo_thread_id sys_pseudo_thread_id("pseudo_thread_id",
213
					     &SV::pseudo_thread_id);
214
sys_var_thd_ha_rows	sys_max_join_size("max_join_size",
215 216
					  &SV::max_join_size,
					  fix_max_join_size);
217 218
sys_var_thd_ulong	sys_max_seeks_for_key("max_seeks_for_key",
					      &SV::max_seeks_for_key);
igor@hundin.mysql.fi's avatar
igor@hundin.mysql.fi committed
219 220
sys_var_thd_ulong   sys_max_length_for_sort_data("max_length_for_sort_data",
                        &SV::max_length_for_sort_data);
221
#ifndef TO_BE_DELETED	/* Alias for max_join_size */
222
sys_var_thd_ha_rows	sys_sql_max_join_size("sql_max_join_size",
223 224 225
					      &SV::max_join_size,
					      fix_max_join_size);
#endif
226 227 228
sys_var_long_ptr	sys_max_relay_log_size("max_relay_log_size",
                                               &max_relay_log_size,
                                               fix_max_relay_log_size);
229 230 231 232 233 234 235 236
sys_var_thd_ulong	sys_max_sort_length("max_sort_length",
					    &SV::max_sort_length);
sys_var_long_ptr	sys_max_user_connections("max_user_connections",
						 &max_user_connections);
sys_var_thd_ulong	sys_max_tmp_tables("max_tmp_tables",
					   &SV::max_tmp_tables);
sys_var_long_ptr	sys_max_write_lock_count("max_write_lock_count",
						 &max_write_lock_count);
237 238
sys_var_thd_ulonglong	sys_myisam_max_extra_sort_file_size("myisam_max_extra_sort_file_size", &SV::myisam_max_extra_sort_file_size, fix_myisam_max_extra_sort_file_size, 1);
sys_var_thd_ulonglong	sys_myisam_max_sort_file_size("myisam_max_sort_file_size", &SV::myisam_max_sort_file_size, fix_myisam_max_sort_file_size, 1);
239
sys_var_thd_ulong       sys_myisam_repair_threads("myisam_repair_threads", &SV::myisam_repair_threads);
240 241 242 243 244 245 246 247 248
sys_var_thd_ulong	sys_myisam_sort_buffer_size("myisam_sort_buffer_size", &SV::myisam_sort_buff_size);
sys_var_thd_ulong	sys_net_buffer_length("net_buffer_length",
					      &SV::net_buffer_length);
sys_var_thd_ulong	sys_net_read_timeout("net_read_timeout",
					     &SV::net_read_timeout,
					     fix_net_read_timeout);
sys_var_thd_ulong	sys_net_write_timeout("net_write_timeout",
					      &SV::net_write_timeout,
					      fix_net_write_timeout);
249 250 251
sys_var_thd_ulong	sys_net_retry_count("net_retry_count",
					    &SV::net_retry_count,
					    fix_net_retry_count);
252
sys_var_thd_bool	sys_new_mode("new", &SV::new_mode);
253
sys_var_thd_bool	sys_old_passwords("old_passwords", &SV::old_passwords);
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
254 255
sys_var_thd_ulong       sys_preload_buff_size("preload_buffer_size",
                                              &SV::preload_buff_size);
256 257
sys_var_thd_ulong	sys_read_buff_size("read_buffer_size",
					   &SV::read_buff_size);
258
sys_var_bool_ptr	sys_readonly("read_only", &opt_readonly);
259 260
sys_var_thd_ulong	sys_read_rnd_buff_size("read_rnd_buffer_size",
					       &SV::read_rnd_buff_size);
261 262 263 264
#ifdef HAVE_REPLICATION
sys_var_bool_ptr	sys_relay_log_purge("relay_log_purge",
                                            &relay_log_purge);
#endif
265 266 267 268 269
sys_var_long_ptr	sys_rpl_recovery_rank("rpl_recovery_rank",
					      &rpl_recovery_rank);
sys_var_long_ptr	sys_query_cache_size("query_cache_size",
					     &query_cache_size,
					     fix_query_cache_size);
270 271 272 273

sys_var_thd_ulong	sys_range_alloc_block_size("range_alloc_block_size",
						   &SV::range_alloc_block_size);
sys_var_thd_ulong	sys_query_alloc_block_size("query_alloc_block_size",
274 275
						   &SV::query_alloc_block_size,
						   fix_thd_mem_root);
276
sys_var_thd_ulong	sys_query_prealloc_size("query_prealloc_size",
277 278
						&SV::query_prealloc_size,
						fix_thd_mem_root);
279
sys_var_thd_ulong	sys_trans_alloc_block_size("transaction_alloc_block_size",
280 281
						   &SV::trans_alloc_block_size,
						   fix_trans_mem_root);
282
sys_var_thd_ulong	sys_trans_prealloc_size("transaction_prealloc_size",
283 284
						&SV::trans_prealloc_size,
						fix_trans_mem_root);
285

286 287 288
#ifdef HAVE_QUERY_CACHE
sys_var_long_ptr	sys_query_cache_limit("query_cache_limit",
					      &query_cache.query_cache_limit);
289 290 291
sys_var_long_ptr        sys_query_cache_min_res_unit("query_cache_min_res_unit",
						     &query_cache_min_res_unit,
						     fix_query_cache_min_res_unit);
292 293 294
sys_var_thd_enum	sys_query_cache_type("query_cache_type",
					     &SV::query_cache_type,
					     &query_cache_type_typelib);
295 296 297
sys_var_thd_bool
sys_query_cache_wlock_invalidate("query_cache_wlock_invalidate",
				 &SV::query_cache_wlock_invalidate);
298
#endif /* HAVE_QUERY_CACHE */
299
sys_var_bool_ptr	sys_secure_auth("secure_auth", &opt_secure_auth);
300
sys_var_long_ptr	sys_server_id("server_id",&server_id);
301 302
sys_var_bool_ptr	sys_slave_compressed_protocol("slave_compressed_protocol",
						      &opt_slave_compressed_protocol);
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
303
#ifdef HAVE_REPLICATION
304 305
sys_var_long_ptr	sys_slave_net_timeout("slave_net_timeout",
					      &slave_net_timeout);
306
#endif
307 308 309 310
sys_var_long_ptr	sys_slow_launch_time("slow_launch_time",
					     &slow_launch_time);
sys_var_thd_ulong	sys_sort_buffer("sort_buffer_size",
					&SV::sortbuff_size);
311 312
sys_var_thd_sql_mode    sys_sql_mode("sql_mode",
                                     &SV::sql_mode);
313 314
sys_var_thd_table_type  sys_table_type("table_type",
				       &SV::table_type);
315 316
sys_var_thd_storage_engine sys_storage_engine("storage_engine",
				       &SV::table_type);
317 318 319 320 321 322 323 324 325 326 327 328
sys_var_long_ptr	sys_table_cache_size("table_cache",
					     &table_cache_size);
sys_var_long_ptr	sys_thread_cache_size("thread_cache_size",
					      &thread_cache_size);
sys_var_thd_enum	sys_tx_isolation("tx_isolation",
					 &SV::tx_isolation,
					 &tx_isolation_typelib,
					 fix_tx_isolation);
sys_var_thd_ulong	sys_tmp_table_size("tmp_table_size",
					   &SV::tmp_table_size);
sys_var_thd_ulong	sys_net_wait_timeout("wait_timeout",
					     &SV::net_wait_timeout);
329

330 331 332
#ifdef HAVE_INNOBASE_DB
sys_var_long_ptr        sys_innodb_max_dirty_pages_pct("innodb_max_dirty_pages_pct",
                                                        &srv_max_buf_pool_modified_pct);
333
#endif
334 335 336 337 338 339 340 341 342 343 344 345 346 347

/* Time/date/datetime formats */

sys_var_thd_date_time_format sys_time_format("time_format",
					     &SV::time_format,
					     TIMESTAMP_TIME);
sys_var_thd_date_time_format sys_date_format("date_format",
					     &SV::date_format,
					     TIMESTAMP_DATE);
sys_var_thd_date_time_format sys_datetime_format("datetime_format",
						 &SV::datetime_format,
						 TIMESTAMP_DATETIME);

/* Variables that are bits in THD */
348 349 350 351 352 353 354 355 356 357 358 359 360 361 362

static sys_var_thd_bit	sys_autocommit("autocommit",
				       set_option_autocommit,
				       OPTION_NOT_AUTOCOMMIT,
				       1);
static sys_var_thd_bit	sys_big_tables("big_tables",
				       set_option_bit,
				       OPTION_BIG_TABLES);
#ifndef TO_BE_DELETED	/* Alias for big_tables */
static sys_var_thd_bit	sys_sql_big_tables("sql_big_tables",
					   set_option_bit,
					   OPTION_BIG_TABLES);
#endif
static sys_var_thd_bit	sys_big_selects("sql_big_selects",
					set_option_bit,
363
					OPTION_BIG_SELECTS);
364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386 387
static sys_var_thd_bit	sys_log_off("sql_log_off",
				    set_option_bit,
				    OPTION_LOG_OFF);
static sys_var_thd_bit	sys_log_update("sql_log_update",
				       set_log_update,
				       OPTION_UPDATE_LOG);
static sys_var_thd_bit	sys_log_binlog("sql_log_bin",
					set_log_update,
					OPTION_BIN_LOG);
static sys_var_thd_bit	sys_sql_warnings("sql_warnings",
					 set_option_bit,
					 OPTION_WARNINGS);
static sys_var_thd_bit	sys_auto_is_null("sql_auto_is_null",
					 set_option_bit,
					 OPTION_AUTO_IS_NULL);
static sys_var_thd_bit	sys_safe_updates("sql_safe_updates",
					 set_option_bit,
					 OPTION_SAFE_UPDATES);
static sys_var_thd_bit	sys_buffer_results("sql_buffer_result",
					   set_option_bit,
					   OPTION_BUFFER_RESULT);
static sys_var_thd_bit	sys_quote_show_create("sql_quote_show_create",
					      set_option_bit,
					      OPTION_QUOTE_SHOW_CREATE);
388 389 390 391 392 393 394 395 396
static sys_var_thd_bit	sys_foreign_key_checks("foreign_key_checks",
					       set_option_bit,
					       OPTION_NO_FOREIGN_KEY_CHECKS,
					       1);
static sys_var_thd_bit	sys_unique_checks("unique_checks",
					  set_option_bit,
					  OPTION_RELAXED_UNIQUE_CHECKS,
					  1);

397 398
/* Local state variables */

399
static sys_var_thd_ha_rows	sys_select_limit("sql_select_limit",
400 401 402 403 404
						 &SV::select_limit);
static sys_var_timestamp	sys_timestamp("timestamp");
static sys_var_last_insert_id	sys_last_insert_id("last_insert_id");
static sys_var_last_insert_id	sys_identity("identity");
static sys_var_insert_id	sys_insert_id("insert_id");
405 406 407 408 409 410 411 412 413
static sys_var_readonly		sys_error_count("error_count",
						OPT_SESSION,
						SHOW_LONG,
						get_error_count);
static sys_var_readonly		sys_warning_count("warning_count",
						  OPT_SESSION,
						  SHOW_LONG,
						  get_warning_count);

414
/* alias for last_insert_id() to be compatible with Sybase */
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
415
#ifdef HAVE_REPLICATION
416
static sys_var_slave_skip_counter sys_slave_skip_counter("sql_slave_skip_counter");
417
#endif
418 419
static sys_var_rand_seed1	sys_rand_seed1("rand_seed1");
static sys_var_rand_seed2	sys_rand_seed2("rand_seed2");
420

421 422
static sys_var_thd_ulong        sys_default_week_format("default_week_format",
					                &SV::default_week_format);
423

424 425 426
sys_var_thd_ulong               sys_group_concat_max_len("group_concat_max_len",
                                                         &SV::group_concat_max_len);

427 428 429 430

/* Read only variables */

sys_var_const_str		sys_os("version_compile_os", SYSTEM_TYPE);
431
/* Global read-only variable describing server license */
432
sys_var_const_str		sys_license("license", LICENSE);
433

434

435 436


437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453
/*
  List of all variables for initialisation and storage in hash
  This is sorted in alphabetical order to make it easy to add new variables

  If the variable is not in this list, it can't be changed with
  SET variable_name=
*/

sys_var *sys_variables[]=
{
  &sys_auto_is_null,
  &sys_autocommit,
  &sys_big_tables,
  &sys_big_selects,
  &sys_binlog_cache_size,
  &sys_buffer_results,
  &sys_bulk_insert_buff_size,
454 455
  &sys_character_set_server,
  &sys_character_set_database,
456
  &sys_character_set_client,
457
  &sys_character_set_connection,
458
  &sys_character_set_results,
459
  &sys_collation_connection,
460 461
  &sys_collation_database,
  &sys_collation_server,
462 463
  &sys_concurrent_insert,
  &sys_connect_timeout,
464 465
  &sys_date_format,
  &sys_datetime_format,
466
  &sys_default_week_format,
467 468 469 470
  &sys_delay_key_write,
  &sys_delayed_insert_limit,
  &sys_delayed_insert_timeout,
  &sys_delayed_queue_size,
471
  &sys_error_count,
472
  &sys_expire_logs_days,
473 474
  &sys_flush,
  &sys_flush_time,
475
  &sys_ft_boolean_syntax,
476
  &sys_foreign_key_checks,
477
  &sys_group_concat_max_len,
478
  &sys_identity,
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
479 480
  &sys_init_connect,
  &sys_init_slave,
481 482 483 484
  &sys_insert_id,
  &sys_interactive_timeout,
  &sys_join_buffer_size,
  &sys_key_buffer_size,
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
485
  &sys_key_cache_block_size,
486 487
  &sys_key_cache_division_limit,
  &sys_key_cache_age_threshold,
488
  &sys_last_insert_id,
489
  &sys_license,
490 491 492 493 494 495 496 497 498 499 500 501 502
  &sys_local_infile,
  &sys_log_binlog,
  &sys_log_off,
  &sys_log_update,
  &sys_log_warnings,
  &sys_long_query_time,
  &sys_low_priority_updates,
  &sys_max_allowed_packet,
  &sys_max_binlog_cache_size,
  &sys_max_binlog_size,
  &sys_max_connect_errors,
  &sys_max_connections,
  &sys_max_delayed_threads,
503
  &sys_max_error_count,
504
  &sys_max_insert_delayed_threads,
505 506
  &sys_max_heap_table_size,
  &sys_max_join_size,
igor@hundin.mysql.fi's avatar
igor@hundin.mysql.fi committed
507
  &sys_max_length_for_sort_data,
508
  &sys_max_relay_log_size,
509
  &sys_max_seeks_for_key,
510 511 512 513 514 515
  &sys_max_sort_length,
  &sys_max_tmp_tables,
  &sys_max_user_connections,
  &sys_max_write_lock_count,
  &sys_myisam_max_extra_sort_file_size,
  &sys_myisam_max_sort_file_size,
516
  &sys_myisam_repair_threads,
517 518 519
  &sys_myisam_sort_buffer_size,
  &sys_net_buffer_length,
  &sys_net_read_timeout,
520
  &sys_net_retry_count,
521 522
  &sys_net_wait_timeout,
  &sys_net_write_timeout,
523
  &sys_new_mode,
524
  &sys_old_passwords,
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
525
  &sys_preload_buff_size,
526
  &sys_pseudo_thread_id,
527
  &sys_query_alloc_block_size,
528
  &sys_query_cache_size,
529
  &sys_query_prealloc_size,
530 531
#ifdef HAVE_QUERY_CACHE
  &sys_query_cache_limit,
532
  &sys_query_cache_min_res_unit,
533
  &sys_query_cache_type,
534
  &sys_query_cache_wlock_invalidate,
535
#endif /* HAVE_QUERY_CACHE */
536
  &sys_quote_show_create,
537 538
  &sys_rand_seed1,
  &sys_rand_seed2,
539
  &sys_range_alloc_block_size,
540
  &sys_readonly,
541 542
  &sys_read_buff_size,
  &sys_read_rnd_buff_size,
543 544 545
#ifdef HAVE_REPLICATION
  &sys_relay_log_purge,
#endif
546 547
  &sys_rpl_recovery_rank,
  &sys_safe_updates,
548
  &sys_secure_auth,
549 550
  &sys_select_limit,
  &sys_server_id,
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
551
#ifdef HAVE_REPLICATION
552
  &sys_slave_compressed_protocol,
553 554
  &sys_slave_net_timeout,
  &sys_slave_skip_counter,
555
#endif
556 557 558 559 560
  &sys_slow_launch_time,
  &sys_sort_buffer,
  &sys_sql_big_tables,
  &sys_sql_low_priority_updates,
  &sys_sql_max_join_size,
561
  &sys_sql_mode,
562
  &sys_sql_warnings,
563
  &sys_storage_engine,
564 565 566
  &sys_table_cache_size,
  &sys_table_type,
  &sys_thread_cache_size,
567
  &sys_time_format,
568 569
  &sys_timestamp,
  &sys_tmp_table_size,
570 571
  &sys_trans_alloc_block_size,
  &sys_trans_prealloc_size,
572
  &sys_tx_isolation,
573
  &sys_os,
574 575 576
#ifdef HAVE_INNOBASE_DB
  &sys_innodb_max_dirty_pages_pct,
#endif    
577 578
  &sys_unique_checks,
  &sys_warning_count
579 580 581 582 583 584 585 586 587 588 589 590 591 592
};


/*
  Variables shown by SHOW variables in alphabetical order
*/

struct show_var_st init_vars[]= {
  {"back_log",                (char*) &back_log,                    SHOW_LONG},
  {"basedir",                 mysql_home,                           SHOW_CHAR},
#ifdef HAVE_BERKELEY_DB
  {"bdb_cache_size",          (char*) &berkeley_cache_size,         SHOW_LONG},
  {"bdb_home",                (char*) &berkeley_home,               SHOW_CHAR_PTR},
  {"bdb_logdir",              (char*) &berkeley_logdir,             SHOW_CHAR_PTR},
593 594
  {"bdb_log_buffer_size",     (char*) &berkeley_log_buffer_size,    SHOW_LONG},
  {"bdb_max_lock",            (char*) &berkeley_max_lock,	    SHOW_LONG},
595 596 597 598 599
  {"bdb_shared_data",	      (char*) &berkeley_shared_data,	    SHOW_BOOL},
  {"bdb_tmpdir",              (char*) &berkeley_tmpdir,             SHOW_CHAR_PTR},
#endif
  {sys_binlog_cache_size.name,(char*) &sys_binlog_cache_size,	    SHOW_SYS},
  {sys_bulk_insert_buff_size.name,(char*) &sys_bulk_insert_buff_size,SHOW_SYS},
600
  {"character_sets_dir",      mysql_charsets_dir,                   SHOW_CHAR},
601
  {sys_character_set_client.name,(char*) &sys_character_set_client, SHOW_SYS},
602
  {sys_character_set_connection.name,(char*) &sys_character_set_connection,SHOW_SYS},
603
  {sys_character_set_database.name, (char*) &sys_character_set_database,SHOW_SYS},
604
  {sys_character_set_results.name,(char*) &sys_character_set_results, SHOW_SYS},
605 606
  {sys_character_set_server.name, (char*) &sys_character_set_server,SHOW_SYS},
  {sys_charset_system.name,   (char*) &sys_charset_system,          SHOW_SYS},
607
  {sys_collation_connection.name,(char*) &sys_collation_connection, SHOW_SYS},
608 609
  {sys_collation_database.name,(char*) &sys_collation_database,     SHOW_SYS},
  {sys_collation_server.name,(char*) &sys_collation_server,         SHOW_SYS},
610 611 612
  {sys_concurrent_insert.name,(char*) &sys_concurrent_insert,       SHOW_SYS},
  {sys_connect_timeout.name,  (char*) &sys_connect_timeout,         SHOW_SYS},
  {"datadir",                 mysql_real_data_home,                 SHOW_CHAR},
613 614 615
  {sys_date_format.name,      (char*) &sys_date_format,		    SHOW_SYS},
  {sys_datetime_format.name,  (char*) &sys_datetime_format,	    SHOW_SYS},
  {sys_default_week_format.name, (char*) &sys_default_week_format,  SHOW_SYS},
616 617 618 619
  {sys_delay_key_write.name,  (char*) &sys_delay_key_write,         SHOW_SYS},
  {sys_delayed_insert_limit.name, (char*) &sys_delayed_insert_limit,SHOW_SYS},
  {sys_delayed_insert_timeout.name, (char*) &sys_delayed_insert_timeout, SHOW_SYS},
  {sys_delayed_queue_size.name,(char*) &sys_delayed_queue_size,     SHOW_SYS},
620
  {sys_expire_logs_days.name, (char*) &sys_expire_logs_days,        SHOW_SYS},
621 622
  {sys_flush.name,             (char*) &sys_flush,                  SHOW_SYS},
  {sys_flush_time.name,        (char*) &sys_flush_time,             SHOW_SYS},
623
  {sys_ft_boolean_syntax.name,(char*) &ft_boolean_syntax,	    SHOW_CHAR},
624
  {"ft_max_word_len",         (char*) &ft_max_word_len,             SHOW_LONG},
625
  {"ft_min_word_len",         (char*) &ft_min_word_len,             SHOW_LONG},
626
  {"ft_query_expansion_limit",(char*) &ft_query_expansion_limit,    SHOW_LONG},
627
  {"ft_stopword_file",        (char*) &ft_stopword_file,            SHOW_CHAR_PTR},
628
  {"have_bdb",		      (char*) &have_berkeley_db,	    SHOW_HAVE},
629
  {"have_compress",	      (char*) &have_compress,		    SHOW_HAVE},
630
  {"have_crypt",	      (char*) &have_crypt,		    SHOW_HAVE},
631
  {"have_innodb",	      (char*) &have_innodb,		    SHOW_HAVE},
632
  {"have_isam",		      (char*) &have_isam,		    SHOW_HAVE},
633 634
  {"have_openssl",	      (char*) &have_openssl,		    SHOW_HAVE},
  {"have_query_cache",        (char*) &have_query_cache,            SHOW_HAVE},
635 636
  {"have_raid",		      (char*) &have_raid,		    SHOW_HAVE},
  {"have_symlink",            (char*) &have_symlink,                SHOW_HAVE},
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
637
  {"init_connect",            (char*) &sys_init_connect,            SHOW_SYS},
638
  {"init_file",               (char*) &opt_init_file,               SHOW_CHAR_PTR},
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
639
  {"init_slave",              (char*) &sys_init_slave,              SHOW_SYS},
640 641
#ifdef HAVE_INNOBASE_DB
  {"innodb_additional_mem_pool_size", (char*) &innobase_additional_mem_pool_size, SHOW_LONG },
642
  {"innodb_buffer_pool_awe_mem_mb", (char*) &innobase_buffer_pool_awe_mem_mb, SHOW_LONG },
643
  {"innodb_buffer_pool_size", (char*) &innobase_buffer_pool_size, SHOW_LONG },
644 645 646
  {"innodb_data_file_path", (char*) &innobase_data_file_path,	    SHOW_CHAR_PTR},
  {"innodb_data_home_dir",  (char*) &innobase_data_home_dir,	    SHOW_CHAR_PTR},
  {"innodb_fast_shutdown", (char*) &innobase_fast_shutdown, SHOW_MY_BOOL},
647
  {"innodb_file_io_threads", (char*) &innobase_file_io_threads, SHOW_LONG },
heikki@hundin.mysql.fi's avatar
heikki@hundin.mysql.fi committed
648
  {"innodb_file_per_table", (char*) &innobase_file_per_table, SHOW_MY_BOOL},
649
  {"innodb_flush_log_at_trx_commit", (char*) &innobase_flush_log_at_trx_commit, SHOW_INT},
650
  {"innodb_flush_method",    (char*) &innobase_unix_file_flush_method, SHOW_CHAR_PTR},
651
  {"innodb_force_recovery", (char*) &innobase_force_recovery, SHOW_LONG },
652 653 654 655 656 657 658
  {"innodb_lock_wait_timeout", (char*) &innobase_lock_wait_timeout, SHOW_LONG },
  {"innodb_log_arch_dir",   (char*) &innobase_log_arch_dir, 	    SHOW_CHAR_PTR},
  {"innodb_log_archive",    (char*) &innobase_log_archive, 	    SHOW_MY_BOOL},
  {"innodb_log_buffer_size", (char*) &innobase_log_buffer_size, SHOW_LONG },
  {"innodb_log_file_size", (char*) &innobase_log_file_size, SHOW_LONG},
  {"innodb_log_files_in_group", (char*) &innobase_log_files_in_group,	SHOW_LONG},
  {"innodb_log_group_home_dir", (char*) &innobase_log_group_home_dir, SHOW_CHAR_PTR},
659
  {sys_innodb_max_dirty_pages_pct.name, (char*) &sys_innodb_max_dirty_pages_pct, SHOW_SYS},
660 661 662
  {"innodb_mirrored_log_groups", (char*) &innobase_mirrored_log_groups, SHOW_LONG},
  {"innodb_open_files", (char*) &innobase_open_files, SHOW_LONG },
  {"innodb_thread_concurrency", (char*) &innobase_thread_concurrency, SHOW_LONG },
663 664 665 666
#endif
  {sys_interactive_timeout.name,(char*) &sys_interactive_timeout,   SHOW_SYS},
  {sys_join_buffer_size.name,   (char*) &sys_join_buffer_size,	    SHOW_SYS},
  {sys_key_buffer_size.name,	(char*) &sys_key_buffer_size,	    SHOW_SYS},
667 668
  {sys_key_cache_age_threshold.name,   (char*) &sys_key_cache_age_threshold,
                                                         	    SHOW_SYS},
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
669 670
  {sys_key_cache_block_size.name,   (char*) &sys_key_cache_block_size,
                                                         	    SHOW_SYS},
671 672
  {sys_key_cache_division_limit.name,   (char*) &sys_key_cache_division_limit,
                                                         	    SHOW_SYS},
673
  {"language",                language,                             SHOW_CHAR},
674 675
  {"large_files_support",     (char*) &opt_large_files,             SHOW_BOOL},
  {sys_license.name,	      (char*) &sys_license,                 SHOW_SYS},
676 677 678 679 680 681
  {sys_local_infile.name,     (char*) &sys_local_infile,	    SHOW_SYS},
#ifdef HAVE_MLOCKALL
  {"locked_in_memory",	      (char*) &locked_in_memory,	    SHOW_BOOL},
#endif
  {"log",                     (char*) &opt_log,                     SHOW_BOOL},
  {"log_bin",                 (char*) &opt_bin_log,                 SHOW_BOOL},
682
  {"log_error",               (char*) log_error_file,               SHOW_CHAR},
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
683
#ifdef HAVE_REPLICATION
684
  {"log_slave_updates",       (char*) &opt_log_slave_updates,       SHOW_MY_BOOL},
685
#endif
686
  {"log_slow_queries",        (char*) &opt_slow_log,                SHOW_BOOL},
687
  {"log_update",              (char*) &opt_update_log,              SHOW_BOOL},
688 689 690
  {sys_log_warnings.name,     (char*) &sys_log_warnings,	    SHOW_SYS},
  {sys_long_query_time.name,  (char*) &sys_long_query_time, 	    SHOW_SYS},
  {sys_low_priority_updates.name, (char*) &sys_low_priority_updates, SHOW_SYS},
691
  {"lower_case_file_system",  (char*) &lower_case_file_system,      SHOW_BOOL},
692
  {"lower_case_table_names",  (char*) &lower_case_table_names,      SHOW_INT},
693 694 695 696
  {sys_max_allowed_packet.name,(char*) &sys_max_allowed_packet,	    SHOW_SYS},
  {sys_max_binlog_cache_size.name,(char*) &sys_max_binlog_cache_size, SHOW_SYS},
  {sys_max_binlog_size.name,    (char*) &sys_max_binlog_size,	    SHOW_SYS},
  {sys_max_connect_errors.name, (char*) &sys_max_connect_errors,    SHOW_SYS},
697
  {sys_max_connections.name,    (char*) &sys_max_connections,	    SHOW_SYS},
698
  {sys_max_delayed_threads.name,(char*) &sys_max_delayed_threads,   SHOW_SYS},
699 700
  {sys_max_insert_delayed_threads.name,
   (char*) &sys_max_insert_delayed_threads,   SHOW_SYS},
701
  {sys_max_error_count.name,	(char*) &sys_max_error_count,	    SHOW_SYS},
702 703
  {sys_max_heap_table_size.name,(char*) &sys_max_heap_table_size,   SHOW_SYS},
  {sys_max_join_size.name,	(char*) &sys_max_join_size,	    SHOW_SYS},
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
704
  {sys_max_length_for_sort_data.name, (char*) &sys_max_length_for_sort_data,
igor@hundin.mysql.fi's avatar
igor@hundin.mysql.fi committed
705
   SHOW_SYS},
706 707
  {sys_max_relay_log_size.name, (char*) &sys_max_relay_log_size,    SHOW_SYS},
  {sys_max_seeks_for_key.name,  (char*) &sys_max_seeks_for_key,	    SHOW_SYS},
708
  {sys_max_sort_length.name,	(char*) &sys_max_sort_length,	    SHOW_SYS},
709
  {sys_max_tmp_tables.name,	(char*) &sys_max_tmp_tables,	    SHOW_SYS},
710
  {sys_max_user_connections.name,(char*) &sys_max_user_connections, SHOW_SYS},
711 712 713 714
  {sys_max_write_lock_count.name, (char*) &sys_max_write_lock_count,SHOW_SYS},
  {sys_myisam_max_extra_sort_file_size.name,
   (char*) &sys_myisam_max_extra_sort_file_size,
   SHOW_SYS},
715 716
  {sys_myisam_max_sort_file_size.name, (char*) &sys_myisam_max_sort_file_size,
   SHOW_SYS},
717
  {"myisam_recover_options",  (char*) &myisam_recover_options_str,  SHOW_CHAR_PTR},
718
  {sys_myisam_repair_threads.name, (char*) &sys_myisam_repair_threads,
719 720 721
   SHOW_SYS},
  {sys_myisam_sort_buffer_size.name, (char*) &sys_myisam_sort_buffer_size, SHOW_SYS},
#ifdef __NT__
722
  {"named_pipe",	      (char*) &opt_enable_named_pipe,       SHOW_MY_BOOL},
723 724 725
#endif
  {sys_net_buffer_length.name,(char*) &sys_net_buffer_length,       SHOW_SYS},
  {sys_net_read_timeout.name, (char*) &sys_net_read_timeout,        SHOW_SYS},
726
  {sys_net_retry_count.name,  (char*) &sys_net_retry_count,	    SHOW_SYS},
727
  {sys_net_write_timeout.name,(char*) &sys_net_write_timeout,       SHOW_SYS},
728
  {sys_new_mode.name,         (char*) &sys_new_mode,                SHOW_SYS},
729
  {sys_old_passwords.name,    (char*) &sys_old_passwords,           SHOW_SYS},
730 731
  {"open_files_limit",	      (char*) &open_files_limit,	    SHOW_LONG},
  {"pid_file",                (char*) pidfile_name,                 SHOW_CHAR},
732
  {"port",                    (char*) &mysqld_port,                  SHOW_INT},
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
733
  {sys_preload_buff_size.name, (char*) &sys_preload_buff_size,      SHOW_SYS},
734
  {"protocol_version",        (char*) &protocol_version,            SHOW_INT},
735 736
  {sys_query_alloc_block_size.name, (char*) &sys_query_alloc_block_size,
   SHOW_SYS},
737
#ifdef HAVE_QUERY_CACHE
738
  {sys_query_cache_limit.name,(char*) &sys_query_cache_limit,	    SHOW_SYS},
739 740
  {sys_query_cache_min_res_unit.name, (char*) &sys_query_cache_min_res_unit,
   SHOW_SYS},
741 742 743
  {sys_query_cache_size.name, (char*) &sys_query_cache_size,	    SHOW_SYS},
  {sys_query_cache_type.name, (char*) &sys_query_cache_type,        SHOW_SYS},
#endif /* HAVE_QUERY_CACHE */
744
  {sys_query_prealloc_size.name, (char*) &sys_query_prealloc_size,  SHOW_SYS},
745 746
  {sys_range_alloc_block_size.name, (char*) &sys_range_alloc_block_size,
   SHOW_SYS},
serg@serg.mylan's avatar
serg@serg.mylan committed
747 748 749
  {sys_read_buff_size.name,   (char*) &sys_read_buff_size,	    SHOW_SYS},
  {sys_readonly.name,         (char*) &sys_readonly,                SHOW_SYS},
  {sys_read_rnd_buff_size.name,(char*) &sys_read_rnd_buff_size,	    SHOW_SYS},
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
750 751 752
#ifdef HAVE_REPLICATION
  {sys_relay_log_purge.name,  (char*) &sys_relay_log_purge,         SHOW_SYS},
#endif
serg@serg.mylan's avatar
serg@serg.mylan committed
753
  {sys_rpl_recovery_rank.name,(char*) &sys_rpl_recovery_rank,       SHOW_SYS},
754
  {"secure_auth",             (char*) &sys_secure_auth,             SHOW_SYS},
755 756 757 758
#ifdef HAVE_SMEM
  {"shared_memory",           (char*) &opt_enable_shared_memory,    SHOW_MY_BOOL},
  {"shared_memory_base_name", (char*) &shared_memory_base_name,     SHOW_CHAR_PTR},
#endif
759
  {sys_server_id.name,	      (char*) &sys_server_id,		    SHOW_SYS},
760
  {"skip_external_locking",   (char*) &my_disable_locking,          SHOW_MY_BOOL},
761 762
  {"skip_networking",         (char*) &opt_disable_networking,      SHOW_BOOL},
  {"skip_show_database",      (char*) &opt_skip_show_db,            SHOW_BOOL},
763 764 765
#ifdef HAVE_REPLICATION
  {sys_slave_net_timeout.name,(char*) &sys_slave_net_timeout,	    SHOW_SYS},
#endif
766
  {sys_slow_launch_time.name, (char*) &sys_slow_launch_time,        SHOW_SYS},
767
#ifdef HAVE_SYS_UN_H
768
  {"socket",                  (char*) &mysqld_unix_port,             SHOW_CHAR_PTR},
769
#endif
770
  {sys_sort_buffer.name,      (char*) &sys_sort_buffer, 	    SHOW_SYS},
771
  {sys_sql_mode.name,         (char*) &sys_sql_mode,                SHOW_SYS},
772
  {sys_storage_engine.name,   (char*) &sys_storage_engine,          SHOW_SYS},
773 774 775 776 777 778 779
  {"table_cache",             (char*) &table_cache_size,            SHOW_LONG},
  {sys_table_type.name,	      (char*) &sys_table_type,	            SHOW_SYS},
  {sys_thread_cache_size.name,(char*) &sys_thread_cache_size,       SHOW_SYS},
#ifdef HAVE_THR_SETCONCURRENCY
  {"thread_concurrency",      (char*) &concurrency,                 SHOW_LONG},
#endif
  {"thread_stack",            (char*) &thread_stack,                SHOW_LONG},
780
  {sys_time_format.name,      (char*) &sys_time_format,		    SHOW_SYS},
781 782 783 784
#ifdef HAVE_TZNAME
  {"timezone",                time_zone,                            SHOW_CHAR},
#endif
  {sys_tmp_table_size.name,   (char*) &sys_tmp_table_size,	    SHOW_SYS},
785
  {"tmpdir",                  (char*) &opt_mysql_tmpdir,            SHOW_CHAR_PTR},
786 787 788
  {sys_trans_alloc_block_size.name, (char*) &sys_trans_alloc_block_size,
   SHOW_SYS},
  {sys_trans_prealloc_size.name, (char*) &sys_trans_prealloc_size,  SHOW_SYS},
789
  {sys_tx_isolation.name,     (char*) &sys_tx_isolation,	    SHOW_SYS},
790
  {"version",                 server_version,                       SHOW_CHAR},
791 792 793
#ifdef HAVE_BERKELEY_DB
  {"version_bdb",             (char*) DB_VERSION_STRING,            SHOW_CHAR},
#endif
794
  {"version_comment",         (char*) MYSQL_COMPILATION_COMMENT,    SHOW_CHAR},
795
  {"version_compile_machine", (char*) MACHINE_TYPE,		    SHOW_CHAR},
796
  {sys_os.name,		      (char*) &sys_os,			    SHOW_SYS},
797 798 799 800
  {sys_net_wait_timeout.name, (char*) &sys_net_wait_timeout,	    SHOW_SYS},
  {NullS, NullS, SHOW_LONG}
};

801

802 803 804 805 806 807
bool sys_var::check(THD *thd, set_var *var)
{
  var->save_result.ulonglong_value= var->value->val_int();
  return 0;
}

808 809 810 811 812 813 814 815 816 817 818 819
bool sys_var_str::check(THD *thd, set_var *var)
{
  int res;
  if (!check_func)
    return 0;

  if ((res=(*check_func)(thd, var)) < 0)
    my_error(ER_WRONG_VALUE_FOR_VAR, MYF(0), name,
             var->value->str_value.ptr());
  return res;
}

820 821 822 823
/*
  Functions to check and update variables
*/

gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
824

825 826 827 828 829 830 831 832 833 834
/*
  Update variables 'init_connect, init_slave'.

  In case of 'DEFAULT' value
  (for example: 'set GLOBAL init_connect=DEFAULT')
  'var' parameter is NULL pointer.
*/

bool update_sys_var_str(sys_var_str *var_str, rw_lock_t *var_mutex,
			set_var *var)
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
835 836
{
  char *res= 0, *old_value;
837
  uint new_length= 0;
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
838
  /* If the string is "", delete old init command */
839
  if (var && (new_length= var->value->str_value.length()))
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
840
  {
monty@mysql.com's avatar
monty@mysql.com committed
841 842
    if (!(res= my_strdup_with_length((byte*) var->value->str_value.ptr(),
				     new_length, MYF(0))))
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
843 844 845 846 847 848
      return 1;
  }
  /*
    Replace the old value in such a way that the any thread using
    the value will work.
  */
849 850 851 852 853
  rw_wrlock(var_mutex);
  old_value= var_str->value;
  var_str->value= res;
  var_str->value_length= new_length;
  rw_unlock(var_mutex);
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
854 855 856 857 858
  my_free(old_value, MYF(MY_ALLOW_ZERO_PTR));
  return 0;
}


859 860 861 862 863 864
static bool sys_update_init_connect(THD *thd, set_var *var)
{
  return update_sys_var_str(&sys_init_connect, &LOCK_sys_init_connect, var);
}


gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
865 866
static void sys_default_init_connect(THD* thd, enum_var_type type)
{
867
  update_sys_var_str(&sys_init_connect, &LOCK_sys_init_connect, 0);
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
868 869 870 871 872
}


static bool sys_update_init_slave(THD *thd, set_var *var)
{
873
  return update_sys_var_str(&sys_init_slave, &LOCK_sys_init_slave, var);
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
874 875 876 877 878
}


static void sys_default_init_slave(THD* thd, enum_var_type type)
{
879
  update_sys_var_str(&sys_init_slave, &LOCK_sys_init_slave, 0);
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
880 881
}

882 883 884
static int sys_check_ftb_syntax(THD *thd,  set_var *var)
{
  if (thd->master_access & SUPER_ACL)
885
    return ft_boolean_check_syntax_string((byte*) var->value->str_value.c_ptr()) ?
886
      -1 : 0;
887 888 889 890 891 892 893 894 895
  else
  {
    my_error(ER_SPECIFIC_ACCESS_DENIED_ERROR, MYF(0), "SUPER");
    return 1;
  }
}

static bool sys_update_ftb_syntax(THD *thd, set_var * var)
{
896 897
  strmake(ft_boolean_syntax, var->value->str_value.c_ptr(),
	  sizeof(ft_boolean_syntax)-1);
898 899 900 901 902
  return 0;
}

static void sys_default_ftb_syntax(THD *thd, enum_var_type type)
{
903 904
  strmake(ft_boolean_syntax, opt_ft_boolean_syntax,
	  sizeof(ft_boolean_syntax)-1);
905
}
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
906

907 908 909 910 911
/*
  The following 3 functions need to be changed in 4.1 when we allow
  one to change character sets
*/

912
static int sys_check_charset(THD *thd, set_var *var)
913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938 939 940 941
{
  return 0;
}


static bool sys_update_charset(THD *thd, set_var *var)
{
  return 0;
}


static void sys_set_default_charset(THD *thd, enum_var_type type)
{
}


/*
  If one sets the LOW_PRIORIY UPDATES flag, we also must change the
  used lock type
*/

static void fix_low_priority_updates(THD *thd, enum_var_type type)
{
  if (type != OPT_GLOBAL)
    thd->update_lock_default= (thd->variables.low_priority_updates ?
			       TL_WRITE_LOW_PRIORITY : TL_WRITE);
}


942 943 944 945
static void
fix_myisam_max_extra_sort_file_size(THD *thd, enum_var_type type)
{
  myisam_max_extra_temp_length=
946
    (my_off_t) global_system_variables.myisam_max_extra_sort_file_size;
947 948 949 950 951 952 953 954 955 956
}


static void
fix_myisam_max_sort_file_size(THD *thd, enum_var_type type)
{
  myisam_max_temp_length=
    (my_off_t) global_system_variables.myisam_max_sort_file_size;
}

957 958 959 960 961 962 963 964
/*
  Set the OPTION_BIG_SELECTS flag if max_join_size == HA_POS_ERROR
*/

static void fix_max_join_size(THD *thd, enum_var_type type)
{
  if (type != OPT_GLOBAL)
  {
965
    if (thd->variables.max_join_size == HA_POS_ERROR)
966 967 968 969 970
      thd->options|= OPTION_BIG_SELECTS;
    else
      thd->options&= ~OPTION_BIG_SELECTS;
  }
}
971

972 973 974 975 976 977 978 979 980 981 982 983 984 985 986 987 988 989

/*
  If one doesn't use the SESSION modifier, the isolation level
  is only active for the next command
*/

static void fix_tx_isolation(THD *thd, enum_var_type type)
{
  if (type == OPT_SESSION)
    thd->session_tx_isolation= ((enum_tx_isolation)
				thd->variables.tx_isolation);
}


/*
  If we are changing the thread variable, we have to copy it to NET too
*/

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
990
#ifdef HAVE_REPLICATION
991 992 993 994 995 996 997 998 999 1000 1001 1002 1003
static void fix_net_read_timeout(THD *thd, enum_var_type type)
{
  if (type != OPT_GLOBAL)
    thd->net.read_timeout=thd->variables.net_read_timeout;
}


static void fix_net_write_timeout(THD *thd, enum_var_type type)
{
  if (type != OPT_GLOBAL)
    thd->net.write_timeout=thd->variables.net_write_timeout;
}

1004 1005 1006 1007 1008
static void fix_net_retry_count(THD *thd, enum_var_type type)
{
  if (type != OPT_GLOBAL)
    thd->net.retry_count=thd->variables.net_retry_count;
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
1009 1010 1011
#else /* HAVE_REPLICATION */
static void fix_net_read_timeout(THD *thd __attribute__(unused),
				 enum_var_type type __attribute__(unused))
1012
{}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
1013 1014
static void fix_net_write_timeout(THD *thd __attribute__(unused),
				  enum_var_type type __attribute__(unused))
1015
{}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
1016 1017
static void fix_net_retry_count(THD *thd __attribute__(unused),
				enum_var_type type __attribute__(unused))
1018
{}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
1019
#endif /* HAVE_REPLICATION */
1020

1021 1022 1023 1024

static void fix_query_cache_size(THD *thd, enum_var_type type)
{
#ifdef HAVE_QUERY_CACHE
1025
  ulong requested= query_cache_size;
1026
  query_cache.resize(query_cache_size);
1027 1028 1029 1030
  if (requested != query_cache_size)
    push_warning_printf(current_thd, MYSQL_ERROR::WARN_LEVEL_WARN,
			ER_WARN_QC_RESIZE, ER(ER_WARN_QC_RESIZE),
			requested, query_cache_size);
1031 1032 1033 1034
#endif
}


1035 1036 1037 1038 1039 1040 1041 1042 1043
#ifdef HAVE_QUERY_CACHE
static void fix_query_cache_min_res_unit(THD *thd, enum_var_type type)
{
  query_cache_min_res_unit= 
    query_cache.set_min_res_unit(query_cache_min_res_unit);
}
#endif


1044
extern void fix_delay_key_write(THD *thd, enum_var_type type)
1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1056 1057 1058 1059
{
  switch ((enum_delay_key_write) delay_key_write_options) {
  case DELAY_KEY_WRITE_NONE:
    myisam_delay_key_write=0;
    break;
  case DELAY_KEY_WRITE_ON:
    myisam_delay_key_write=1;
    break;
  case DELAY_KEY_WRITE_ALL:
    myisam_delay_key_write=1;
    ha_open_options|= HA_OPEN_DELAY_KEY_WRITE;
    break;
  }
}

1060
static void fix_max_binlog_size(THD *thd, enum_var_type type)
1061 1062 1063 1064 1065
{
  DBUG_ENTER("fix_max_binlog_size");
  DBUG_PRINT("info",("max_binlog_size=%lu max_relay_log_size=%lu",
                     max_binlog_size, max_relay_log_size));
  mysql_bin_log.set_max_size(max_binlog_size);
1066
#ifdef HAVE_REPLICATION
1067 1068
  if (!max_relay_log_size)
    active_mi->rli.relay_log.set_max_size(max_binlog_size);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1069
#endif
1070 1071 1072
  DBUG_VOID_RETURN;
}

1073
static void fix_max_relay_log_size(THD *thd, enum_var_type type)
1074 1075 1076 1077
{
  DBUG_ENTER("fix_max_relay_log_size");
  DBUG_PRINT("info",("max_binlog_size=%lu max_relay_log_size=%lu",
                     max_binlog_size, max_relay_log_size));
1078
#ifdef HAVE_REPLICATION
1079 1080
  active_mi->rli.relay_log.set_max_size(max_relay_log_size ?
                                        max_relay_log_size: max_binlog_size);
1081
#endif
1082 1083
  DBUG_VOID_RETURN;
}
1084

1085 1086

static void fix_max_connections(THD *thd, enum_var_type type)
1087
{
1088 1089
  resize_thr_alarm(max_connections + 
		   global_system_variables.max_insert_delayed_threads + 10);
1090 1091
}

1092

1093 1094 1095 1096 1097 1098 1099 1100 1101 1102 1103 1104 1105 1106 1107 1108 1109
static void fix_thd_mem_root(THD *thd, enum_var_type type)
{
  if (type != OPT_GLOBAL)
    reset_root_defaults(&thd->mem_root,
                        thd->variables.query_alloc_block_size,
                        thd->variables.query_prealloc_size);
}


static void fix_trans_mem_root(THD *thd, enum_var_type type)
{
  if (type != OPT_GLOBAL)
    reset_root_defaults(&thd->transaction.mem_root,
                        thd->variables.trans_alloc_block_size,
                        thd->variables.trans_prealloc_size);
}

1110 1111
bool sys_var_long_ptr::update(THD *thd, set_var *var)
{
1112
  ulonglong tmp= var->save_result.ulonglong_value;
1113
  pthread_mutex_lock(&LOCK_global_system_variables);
1114 1115 1116 1117
  if (option_limits)
    *value= (ulong) getopt_ull_limit_value(tmp, option_limits);
  else
    *value= (ulong) tmp;
1118
  pthread_mutex_unlock(&LOCK_global_system_variables);
1119 1120 1121 1122 1123 1124 1125 1126 1127 1128
  return 0;
}


void sys_var_long_ptr::set_default(THD *thd, enum_var_type type)
{
  *value= (ulong) option_limits->def_value;
}


1129 1130
bool sys_var_ulonglong_ptr::update(THD *thd, set_var *var)
{
1131
  ulonglong tmp= var->save_result.ulonglong_value;
1132
  pthread_mutex_lock(&LOCK_global_system_variables);
1133 1134 1135 1136
  if (option_limits)
    *value= (ulonglong) getopt_ull_limit_value(tmp, option_limits);
  else
    *value= (ulonglong) tmp;
1137
  pthread_mutex_unlock(&LOCK_global_system_variables);
1138 1139 1140 1141 1142 1143
  return 0;
}


void sys_var_ulonglong_ptr::set_default(THD *thd, enum_var_type type)
{
1144
  pthread_mutex_lock(&LOCK_global_system_variables);
1145
  *value= (ulonglong) option_limits->def_value;
1146
  pthread_mutex_unlock(&LOCK_global_system_variables);
1147 1148 1149
}


1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162
bool sys_var_bool_ptr::update(THD *thd, set_var *var)
{
  *value= (my_bool) var->save_result.ulong_value;
  return 0;
}


void sys_var_bool_ptr::set_default(THD *thd, enum_var_type type)
{
  *value= (my_bool) option_limits->def_value;
}


1163 1164 1165 1166 1167 1168 1169
bool sys_var_enum::update(THD *thd, set_var *var)
{
  *value= (uint) var->save_result.ulong_value;
  return 0;
}


1170
byte *sys_var_enum::value_ptr(THD *thd, enum_var_type type, LEX_STRING *base)
1171 1172 1173 1174 1175
{
  return (byte*) enum_names->type_names[*value];
}


1176 1177
bool sys_var_thd_ulong::update(THD *thd, set_var *var)
{
1178
  ulonglong tmp= var->save_result.ulonglong_value;
1179 1180 1181 1182 1183 1184 1185 1186

  /* Don't use bigger value than given with --maximum-variable-name=.. */
  if ((ulong) tmp > max_system_variables.*offset)
    tmp= max_system_variables.*offset;

  if (option_limits)
    tmp= (ulong) getopt_ull_limit_value(tmp, option_limits);
  if (var->type == OPT_GLOBAL)
1187
    global_system_variables.*offset= (ulong) tmp;
1188 1189 1190 1191 1192 1193 1194 1195 1196 1197 1198 1199 1200 1201 1202 1203 1204 1205
  else
    thd->variables.*offset= (ulong) tmp;
  return 0;
}


void sys_var_thd_ulong::set_default(THD *thd, enum_var_type type)
{
  if (type == OPT_GLOBAL)
  {
    /* We will not come here if option_limits is not set */
    global_system_variables.*offset= (ulong) option_limits->def_value;
  }
  else
    thd->variables.*offset= global_system_variables.*offset;
}


1206 1207
byte *sys_var_thd_ulong::value_ptr(THD *thd, enum_var_type type,
				   LEX_STRING *base)
1208 1209 1210 1211 1212 1213 1214
{
  if (type == OPT_GLOBAL)
    return (byte*) &(global_system_variables.*offset);
  return (byte*) &(thd->variables.*offset);
}


1215 1216
bool sys_var_thd_ha_rows::update(THD *thd, set_var *var)
{
1217
  ulonglong tmp= var->save_result.ulonglong_value;
1218 1219 1220 1221 1222 1223 1224 1225 1226 1227 1228 1229 1230 1231 1232 1233 1234 1235 1236 1237 1238 1239 1240 1241 1242 1243 1244 1245 1246 1247 1248 1249 1250 1251

  /* Don't use bigger value than given with --maximum-variable-name=.. */
  if ((ha_rows) tmp > max_system_variables.*offset)
    tmp= max_system_variables.*offset;

  if (option_limits)
    tmp= (ha_rows) getopt_ull_limit_value(tmp, option_limits);
  if (var->type == OPT_GLOBAL)
  {
    /* Lock is needed to make things safe on 32 bit systems */
    pthread_mutex_lock(&LOCK_global_system_variables);    
    global_system_variables.*offset= (ha_rows) tmp;
    pthread_mutex_unlock(&LOCK_global_system_variables);
  }
  else
    thd->variables.*offset= (ha_rows) tmp;
  return 0;
}


void sys_var_thd_ha_rows::set_default(THD *thd, enum_var_type type)
{
  if (type == OPT_GLOBAL)
  {
    /* We will not come here if option_limits is not set */
    pthread_mutex_lock(&LOCK_global_system_variables);
    global_system_variables.*offset= (ha_rows) option_limits->def_value;
    pthread_mutex_unlock(&LOCK_global_system_variables);
  }
  else
    thd->variables.*offset= global_system_variables.*offset;
}


1252 1253
byte *sys_var_thd_ha_rows::value_ptr(THD *thd, enum_var_type type,
				     LEX_STRING *base)
1254 1255 1256 1257 1258 1259
{
  if (type == OPT_GLOBAL)
    return (byte*) &(global_system_variables.*offset);
  return (byte*) &(thd->variables.*offset);
}

1260 1261
bool sys_var_thd_ulonglong::update(THD *thd,  set_var *var)
{
1262
  ulonglong tmp= var->save_result.ulonglong_value;
1263 1264 1265 1266 1267 1268

  if ((ulonglong) tmp > max_system_variables.*offset)
    tmp= max_system_variables.*offset;

  if (option_limits)
    tmp= (ulong) getopt_ull_limit_value(tmp, option_limits);
1269
  if (var->type == OPT_GLOBAL)
1270 1271 1272
  {
    /* Lock is needed to make things safe on 32 bit systems */
    pthread_mutex_lock(&LOCK_global_system_variables);
1273
    global_system_variables.*offset= (ulonglong) tmp;
1274 1275
    pthread_mutex_unlock(&LOCK_global_system_variables);
  }
1276
  else
1277
    thd->variables.*offset= (ulonglong) tmp;
1278 1279 1280 1281 1282 1283 1284
  return 0;
}


void sys_var_thd_ulonglong::set_default(THD *thd, enum_var_type type)
{
  if (type == OPT_GLOBAL)
1285 1286
  {
    pthread_mutex_lock(&LOCK_global_system_variables);
1287
    global_system_variables.*offset= (ulonglong) option_limits->def_value;
1288 1289
    pthread_mutex_unlock(&LOCK_global_system_variables);
  }
1290 1291 1292 1293 1294
  else
    thd->variables.*offset= global_system_variables.*offset;
}


1295 1296
byte *sys_var_thd_ulonglong::value_ptr(THD *thd, enum_var_type type,
				       LEX_STRING *base)
1297 1298 1299 1300 1301 1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312 1313 1314 1315 1316 1317 1318 1319 1320 1321 1322
{
  if (type == OPT_GLOBAL)
    return (byte*) &(global_system_variables.*offset);
  return (byte*) &(thd->variables.*offset);
}


bool sys_var_thd_bool::update(THD *thd,  set_var *var)
{
  if (var->type == OPT_GLOBAL)
    global_system_variables.*offset= (my_bool) var->save_result.ulong_value;
  else
    thd->variables.*offset= (my_bool) var->save_result.ulong_value;
  return 0;
}


void sys_var_thd_bool::set_default(THD *thd,  enum_var_type type)
{
  if (type == OPT_GLOBAL)
    global_system_variables.*offset= (my_bool) option_limits->def_value;
  else
    thd->variables.*offset= global_system_variables.*offset;
}


1323 1324
byte *sys_var_thd_bool::value_ptr(THD *thd, enum_var_type type,
				  LEX_STRING *base)
1325 1326 1327 1328 1329 1330 1331 1332 1333
{
  if (type == OPT_GLOBAL)
    return (byte*) &(global_system_variables.*offset);
  return (byte*) &(thd->variables.*offset);
}


bool sys_var::check_enum(THD *thd, set_var *var, TYPELIB *enum_names)
{
1334 1335
  char buff[80];
  const char *value;
1336
  String str(buff, sizeof(buff), system_charset_info), *res;
1337 1338 1339 1340 1341

  if (var->value->result_type() == STRING_RESULT)
  {
    if (!(res=var->value->val_str(&str)) ||
	((long) (var->save_result.ulong_value=
1342 1343
		 (ulong) find_type(enum_names, res->ptr(),
				   res->length(),1)-1)) < 0)
1344
    {
1345
      value= res ? res->c_ptr() : "NULL";
1346 1347 1348 1349 1350 1351 1352 1353 1354 1355 1356 1357 1358 1359 1360 1361 1362 1363 1364 1365 1366
      goto err;
    }
  }
  else
  {
    ulonglong tmp=var->value->val_int();
    if (tmp >= enum_names->count)
    {
      llstr(tmp,buff);
      value=buff;				// Wrong value is here
      goto err;
    }
    var->save_result.ulong_value= (ulong) tmp;	// Save for update
  }
  return 0;

err:
  my_error(ER_WRONG_VALUE_FOR_VAR, MYF(0), name, value);
  return 1;
}

1367 1368 1369

bool sys_var::check_set(THD *thd, set_var *var, TYPELIB *enum_names)
{
1370
  bool not_used;
1371
  char buff[80], *error= 0;
1372 1373 1374 1375 1376 1377 1378
  uint error_len= 0;
  String str(buff, sizeof(buff), system_charset_info), *res;

  if (var->value->result_type() == STRING_RESULT)
  {
    if (!(res= var->value->val_str(&str)))
      goto err;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1379 1380 1381 1382
    var->save_result.ulong_value= ((ulong)
				   find_set(enum_names, res->c_ptr(),
					    res->length(), &error, &error_len,
					    &not_used));
1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 1405 1406
    if (error_len)
    {
      strmake(buff, error, min(sizeof(buff), error_len));
      goto err;
    }
  }
  else
  {
    ulonglong tmp= var->value->val_int();
    if (tmp >= enum_names->count)
    {
      llstr(tmp, buff);
      goto err;
    }
    var->save_result.ulong_value= (ulong) tmp;  // Save for update
  }
  return 0;

err:
  my_error(ER_WRONG_VALUE_FOR_VAR, MYF(0), name, buff);
  return 1;
}


1407 1408 1409 1410 1411 1412 1413
/*
  Return an Item for a variable.  Used with @@[global.]variable_name

  If type is not given, return local value if exists, else global

  We have to use netprintf() instead of my_error() here as this is
  called on the parsing stage.
1414 1415 1416 1417

  TODO:
    With prepared statements/stored procedures this has to be fixed
    to create an item that gets the current value at fix_fields() stage.
1418 1419
*/

1420
Item *sys_var::item(THD *thd, enum_var_type var_type, LEX_STRING *base)
1421 1422 1423 1424 1425
{
  if (check_type(var_type))
  {
    if (var_type != OPT_DEFAULT)
    {
monty@mysql.com's avatar
monty@mysql.com committed
1426
      net_printf(thd, ER_INCORRECT_GLOBAL_LOCAL_VAR,
1427
		 name, var_type == OPT_GLOBAL ? "SESSION" : "GLOBAL");
1428 1429 1430 1431 1432 1433 1434
      return 0;
    }
    /* As there was no local variable, return the global value */
    var_type= OPT_GLOBAL;
  }
  switch (type()) {
  case SHOW_LONG:
1435 1436 1437 1438 1439 1440 1441
  {
    ulong value;
    pthread_mutex_lock(&LOCK_global_system_variables);
    value= *(ulong*) value_ptr(thd, var_type, base);
    pthread_mutex_unlock(&LOCK_global_system_variables);
    return new Item_uint((int32) value);
  }
1442
  case SHOW_LONGLONG:
1443 1444 1445
  {
    longlong value;
    pthread_mutex_lock(&LOCK_global_system_variables);
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1446
    value= *(longlong*) value_ptr(thd, var_type, base);
1447 1448 1449
    pthread_mutex_unlock(&LOCK_global_system_variables);
    return new Item_int(value);
  }
1450
  case SHOW_HA_ROWS:
1451 1452 1453
  {
    ha_rows value;
    pthread_mutex_lock(&LOCK_global_system_variables);
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1454
    value= *(ha_rows*) value_ptr(thd, var_type, base);
1455 1456 1457
    pthread_mutex_unlock(&LOCK_global_system_variables);
    return new Item_int((longlong) value);
  }
1458
  case SHOW_MY_BOOL:
1459
    return new Item_int((int32) *(my_bool*) value_ptr(thd, var_type, base),1);
1460 1461
  case SHOW_CHAR:
  {
1462 1463
    Item_string *tmp;
    pthread_mutex_lock(&LOCK_global_system_variables);
1464
    char *str= (char*) value_ptr(thd, var_type, base);
1465 1466 1467
    tmp= new Item_string(str, strlen(str), system_charset_info);
    pthread_mutex_unlock(&LOCK_global_system_variables);
    return tmp;
1468 1469
  }
  default:
1470
    net_printf(thd, ER_VAR_CANT_BE_READ, name);
1471 1472 1473 1474 1475 1476 1477 1478 1479 1480 1481 1482 1483 1484 1485 1486 1487 1488 1489 1490 1491 1492 1493 1494
  }
  return 0;
}


bool sys_var_thd_enum::update(THD *thd, set_var *var)
{
  if (var->type == OPT_GLOBAL)
    global_system_variables.*offset= var->save_result.ulong_value;
  else
    thd->variables.*offset= var->save_result.ulong_value;
  return 0;
}


void sys_var_thd_enum::set_default(THD *thd, enum_var_type type)
{
  if (type == OPT_GLOBAL)
    global_system_variables.*offset= (ulong) option_limits->def_value;
  else
    thd->variables.*offset= global_system_variables.*offset;
}


1495 1496
byte *sys_var_thd_enum::value_ptr(THD *thd, enum_var_type type,
				  LEX_STRING *base)
1497 1498 1499 1500 1501 1502 1503 1504 1505 1506
{
  ulong tmp= ((type == OPT_GLOBAL) ?
	      global_system_variables.*offset :
	      thd->variables.*offset);
  return (byte*) enum_names->type_names[tmp];
}


bool sys_var_thd_bit::update(THD *thd, set_var *var)
{
1507
  int res= (*update_func)(thd, var);
1508 1509 1510 1511
  return res;
}


1512 1513
byte *sys_var_thd_bit::value_ptr(THD *thd, enum_var_type type,
				 LEX_STRING *base)
1514 1515 1516 1517 1518 1519 1520 1521 1522 1523 1524
{
  /*
    If reverse is 0 (default) return 1 if bit is set.
    If reverse is 1, return 0 if bit is set
  */
  thd->sys_var_tmp.my_bool_value= ((thd->options & bit_flag) ?
				   !reverse : reverse);
  return (byte*) &thd->sys_var_tmp.my_bool_value;
}


1525 1526 1527 1528 1529 1530 1531 1532 1533 1534 1535 1536 1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570 1571 1572 1573 1574 1575 1576 1577 1578 1579 1580 1581 1582 1583 1584 1585 1586 1587 1588 1589 1590 1591 1592 1593 1594 1595 1596 1597 1598 1599 1600 1601 1602 1603 1604 1605 1606 1607 1608 1609 1610 1611 1612 1613 1614 1615 1616 1617 1618 1619 1620 1621 1622 1623 1624 1625 1626 1627 1628 1629 1630
/* Update a date_time format variable based on given value */

void sys_var_thd_date_time_format::update2(THD *thd, enum_var_type type,
					   DATE_TIME_FORMAT *new_value)
{
  DATE_TIME_FORMAT *old;
  DBUG_ENTER("sys_var_date_time_format::update2");
  DBUG_DUMP("positions",(char*) new_value->positions,
	    sizeof(new_value->positions));

  if (type == OPT_GLOBAL)
  {
    pthread_mutex_lock(&LOCK_global_system_variables);
    old= (global_system_variables.*offset);
    (global_system_variables.*offset)= new_value;
    pthread_mutex_unlock(&LOCK_global_system_variables);
  }
  else
  {
    old= (thd->variables.*offset);
    (thd->variables.*offset)= new_value;
  }
  my_free((char*) old, MYF(MY_ALLOW_ZERO_PTR));
  DBUG_VOID_RETURN;
}


bool sys_var_thd_date_time_format::update(THD *thd, set_var *var)
{
  DATE_TIME_FORMAT *new_value;
  /* We must make a copy of the last value to get it into normal memory */
  new_value= date_time_format_copy((THD*) 0,
				   var->save_result.date_time_format);
  if (!new_value)
    return 1;					// Out of memory
  update2(thd, var->type, new_value);		// Can't fail
  return 0;
}


bool sys_var_thd_date_time_format::check(THD *thd, set_var *var)
{
  char buff[80];
  String str(buff,sizeof(buff), system_charset_info), *res;
  DATE_TIME_FORMAT *format;

  if (!(res=var->value->val_str(&str)))
    res= &my_empty_string;

  if (!(format= date_time_format_make(date_time_type,
				      res->ptr(), res->length())))
  {
    my_error(ER_WRONG_VALUE_FOR_VAR, MYF(0), name, res->c_ptr());
    return 1;
  }
  
  /*
    We must copy result to thread space to not get a memory leak if
    update is aborted
  */
  var->save_result.date_time_format= date_time_format_copy(thd, format);
  my_free((char*) format, MYF(0));
  return var->save_result.date_time_format == 0;
}


void sys_var_thd_date_time_format::set_default(THD *thd, enum_var_type type)
{
  DATE_TIME_FORMAT *res= 0;

  if (type == OPT_GLOBAL)
  {
    const char *format;
    if ((format= opt_date_time_formats[date_time_type]))
      res= date_time_format_make(date_time_type, format, strlen(format));
  }
  else
  {
    /* Make copy with malloc */
    res= date_time_format_copy((THD *) 0, global_system_variables.*offset);
  }

  if (res)					// Should always be true
    update2(thd, type, res);
}


byte *sys_var_thd_date_time_format::value_ptr(THD *thd, enum_var_type type,
					      LEX_STRING *base)
{
  if (type == OPT_GLOBAL)
  {
    char *res;
    /*
      We do a copy here just to be sure things will work even if someone
      is modifying the original string while the copy is accessed
      (Can't happen now in SQL SHOW, but this is a good safety for the future)
    */
    res= thd->strmake((global_system_variables.*offset)->format.str,
		      (global_system_variables.*offset)->format.length);
    return (byte*) res;
  }
  return (byte*) (thd->variables.*offset)->format.str;
}


1631 1632
typedef struct old_names_map_st
{
1633 1634 1635
  const char *old_name;
  const char *new_name;
} my_old_conv;
1636

1637 1638
static my_old_conv old_conv[]= 
{
1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649
  {	"cp1251_koi8"		,	"cp1251"	},
  {	"cp1250_latin2"		,	"cp1250"	},
  {	"kam_latin2"		,	"keybcs2"	},
  {	"mac_latin2"		,	"MacRoman"	},
  {	"macce_latin2"		,	"MacCE"		},
  {	"pc2_latin2"		,	"pclatin2"	},
  {	"vga_latin2"		,	"pclatin1"	},
  {	"koi8_cp1251"		,	"koi8r"		},
  {	"win1251ukr_koi8_ukr"	,	"win1251ukr"	},
  {	"koi8_ukr_win1251ukr"	,	"koi8u"		},
  {	NULL			,	NULL		}
1650
};
1651

1652
CHARSET_INFO *get_old_charset_by_name(const char *name)
1653
{
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1654
  my_old_conv *conv;
1655
 
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1656
  for (conv= old_conv; conv->old_name; conv++)
1657
  {
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1658 1659
    if (!my_strcasecmp(&my_charset_latin1, name, conv->old_name))
      return get_charset_by_csname(conv->new_name, MY_CS_PRIMARY, MYF(0));
1660
  }
1661
  return NULL;
1662 1663
}

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1664

1665
bool sys_var_collation::check(THD *thd, set_var *var)
1666 1667 1668 1669 1670 1671
{
  CHARSET_INFO *tmp;
  char buff[80];
  String str(buff,sizeof(buff), system_charset_info), *res;

  if (!(res=var->value->val_str(&str)))
hf@deer.(none)'s avatar
SCRUM  
hf@deer.(none) committed
1672
    res= &my_empty_string;
1673

1674 1675
  if (!(tmp=get_charset_by_name(res->c_ptr(),MYF(0))))
  {
1676
    my_error(ER_UNKNOWN_COLLATION, MYF(0), res->c_ptr());
1677 1678 1679 1680 1681 1682
    return 1;
  }
  var->save_result.charset= tmp;	// Save for update
  return 0;
}

1683

1684 1685 1686 1687 1688 1689 1690
bool sys_var_character_set::check(THD *thd, set_var *var)
{
  CHARSET_INFO *tmp;
  char buff[80];
  String str(buff,sizeof(buff), system_charset_info), *res;

  if (!(res=var->value->val_str(&str)))
1691 1692 1693 1694 1695 1696 1697 1698 1699
  { 
    if (!nullable)
    {
      my_error(ER_UNKNOWN_CHARACTER_SET, MYF(0), "NULL");
      return 1;
    }
    tmp= NULL;
  }
  else if (!(tmp=get_charset_by_csname(res->c_ptr(),MY_CS_PRIMARY,MYF(0))) &&
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1700
	   !(tmp=get_old_charset_by_name(res->c_ptr())))
1701 1702 1703 1704 1705 1706 1707 1708
  {
    my_error(ER_UNKNOWN_CHARACTER_SET, MYF(0), res->c_ptr());
    return 1;
  }
  var->save_result.charset= tmp;	// Save for update
  return 0;
}

1709

1710
bool sys_var_character_set::update(THD *thd, set_var *var)
1711
{
1712
  ci_ptr(thd,var->type)[0]= var->save_result.charset;
bar@bar.mysql.r18.ru's avatar
bar@bar.mysql.r18.ru committed
1713
  thd->update_charset();
1714 1715 1716
  return 0;
}

1717 1718 1719

byte *sys_var_character_set::value_ptr(THD *thd, enum_var_type type,
				       LEX_STRING *base)
1720
{
1721
  CHARSET_INFO *cs= ci_ptr(thd,type)[0];
1722
  return cs ? (byte*) cs->csname : (byte*) "NULL";
1723 1724
}

1725

1726 1727
CHARSET_INFO ** sys_var_character_set_connection::ci_ptr(THD *thd,
							 enum_var_type type)
1728 1729 1730 1731 1732 1733 1734
{
  if (type == OPT_GLOBAL)
    return &global_system_variables.collation_connection;
  else
    return &thd->variables.collation_connection;
}

1735 1736 1737

void sys_var_character_set_connection::set_default(THD *thd,
						   enum_var_type type)
1738 1739 1740 1741
{
 if (type == OPT_GLOBAL)
   global_system_variables.collation_connection= default_charset_info;
 else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1742
 {
1743
   thd->variables.collation_connection= global_system_variables.collation_connection;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1744 1745
   thd->update_charset();
 }
1746 1747
}

1748

1749 1750
CHARSET_INFO ** sys_var_character_set_client::ci_ptr(THD *thd,
						     enum_var_type type)
1751 1752 1753 1754 1755 1756 1757
{
  if (type == OPT_GLOBAL)
    return &global_system_variables.character_set_client;
  else
    return &thd->variables.character_set_client;
}

1758

1759
void sys_var_character_set_client::set_default(THD *thd, enum_var_type type)
1760 1761
{
 if (type == OPT_GLOBAL)
1762
   global_system_variables.character_set_client= default_charset_info;
1763
 else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1764 1765 1766 1767 1768
 {
   thd->variables.character_set_client= (global_system_variables.
					 character_set_client);
   thd->update_charset();
 }
1769
}
1770

1771

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1772 1773
CHARSET_INFO **
sys_var_character_set_results::ci_ptr(THD *thd, enum_var_type type)
1774
{
1775 1776
  if (type == OPT_GLOBAL)
    return &global_system_variables.character_set_results;
1777
  else
1778
    return &thd->variables.character_set_results;
1779 1780
}

1781

1782
void sys_var_character_set_results::set_default(THD *thd, enum_var_type type)
1783
{
1784
 if (type == OPT_GLOBAL)
1785
   global_system_variables.character_set_results= default_charset_info;
1786
 else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1787 1788 1789 1790 1791
 {
   thd->variables.character_set_results= (global_system_variables.
					  character_set_results);
   thd->update_charset();
 }
1792 1793
}

1794

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1795 1796
CHARSET_INFO **
sys_var_character_set_server::ci_ptr(THD *thd, enum_var_type type)
1797 1798
{
  if (type == OPT_GLOBAL)
1799
    return &global_system_variables.collation_server;
1800
  else
1801
    return &thd->variables.collation_server;
1802 1803
}

1804

1805
void sys_var_character_set_server::set_default(THD *thd, enum_var_type type)
1806 1807
{
 if (type == OPT_GLOBAL)
1808
   global_system_variables.collation_server= default_charset_info;
1809
 else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1810
 {
1811
   thd->variables.collation_server= global_system_variables.collation_server;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1812 1813
   thd->update_charset();
 }
1814 1815
}

1816 1817 1818

CHARSET_INFO ** sys_var_character_set_database::ci_ptr(THD *thd,
						       enum_var_type type)
1819 1820
{
  if (type == OPT_GLOBAL)
1821
    return &global_system_variables.collation_database;
1822
  else
1823
    return &thd->variables.collation_database;
1824 1825
}

1826

1827 1828 1829
void sys_var_character_set_database::set_default(THD *thd, enum_var_type type)
{
 if (type == OPT_GLOBAL)
1830
    global_system_variables.collation_database= default_charset_info;
1831
  else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1832
  {
1833
    thd->variables.collation_database= thd->db_charset;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1834 1835
    thd->update_charset();
  }
1836 1837
}

1838

1839
bool sys_var_collation_connection::update(THD *thd, set_var *var)
1840 1841
{
  if (var->type == OPT_GLOBAL)
1842
    global_system_variables.collation_connection= var->save_result.charset;
1843
  else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1844
  {
1845
    thd->variables.collation_connection= var->save_result.charset;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1846 1847
    thd->update_charset();
  }
1848 1849 1850
  return 0;
}

1851 1852 1853

byte *sys_var_collation_connection::value_ptr(THD *thd, enum_var_type type,
					      LEX_STRING *base)
1854 1855
{
  CHARSET_INFO *cs= ((type == OPT_GLOBAL) ?
1856 1857 1858
		  global_system_variables.collation_connection :
		  thd->variables.collation_connection);
  return cs ? (byte*) cs->name : (byte*) "NULL";
1859 1860
}

1861

1862
void sys_var_collation_connection::set_default(THD *thd, enum_var_type type)
1863 1864
{
 if (type == OPT_GLOBAL)
1865
   global_system_variables.collation_connection= default_charset_info;
1866
 else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1867 1868 1869 1870 1871
 {
   thd->variables.collation_connection= (global_system_variables.
					 collation_connection);
   thd->update_charset();
 }
1872 1873
}

1874 1875 1876 1877 1878 1879 1880 1881 1882 1883 1884 1885 1886 1887 1888 1889 1890 1891 1892 1893 1894 1895 1896 1897 1898 1899 1900 1901 1902 1903 1904 1905 1906 1907 1908 1909 1910 1911 1912 1913 1914 1915 1916 1917 1918 1919 1920 1921 1922 1923 1924 1925 1926 1927 1928 1929 1930 1931 1932 1933 1934 1935 1936 1937 1938 1939 1940 1941 1942 1943 1944
bool sys_var_collation_database::update(THD *thd, set_var *var)
{
  if (var->type == OPT_GLOBAL)
    global_system_variables.collation_database= var->save_result.charset;
  else
  {
    thd->variables.collation_database= var->save_result.charset;
    thd->update_charset();
  }
  return 0;
}


byte *sys_var_collation_database::value_ptr(THD *thd, enum_var_type type,
					      LEX_STRING *base)
{
  CHARSET_INFO *cs= ((type == OPT_GLOBAL) ?
		  global_system_variables.collation_database :
		  thd->variables.collation_database);
  return cs ? (byte*) cs->name : (byte*) "NULL";
}


void sys_var_collation_database::set_default(THD *thd, enum_var_type type)
{
 if (type == OPT_GLOBAL)
   global_system_variables.collation_database= default_charset_info;
 else
 {
   thd->variables.collation_database= (global_system_variables.
					 collation_database);
   thd->update_charset();
 }
}


bool sys_var_collation_server::update(THD *thd, set_var *var)
{
  if (var->type == OPT_GLOBAL)
    global_system_variables.collation_server= var->save_result.charset;
  else
  {
    thd->variables.collation_server= var->save_result.charset;
    thd->update_charset();
  }
  return 0;
}


byte *sys_var_collation_server::value_ptr(THD *thd, enum_var_type type,
					      LEX_STRING *base)
{
  CHARSET_INFO *cs= ((type == OPT_GLOBAL) ?
		  global_system_variables.collation_server :
		  thd->variables.collation_server);
  return cs ? (byte*) cs->name : (byte*) "NULL";
}


void sys_var_collation_server::set_default(THD *thd, enum_var_type type)
{
 if (type == OPT_GLOBAL)
   global_system_variables.collation_server= default_charset_info;
 else
 {
   thd->variables.collation_server= (global_system_variables.
					 collation_server);
   thd->update_charset();
 }
}

1945

1946
LEX_STRING default_key_cache_base= {(char *) "default", 7 };
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
1947

1948
static KEY_CACHE zero_key_cache;
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
1949

1950
KEY_CACHE *get_key_cache(LEX_STRING *cache_name)
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
1951
{
1952 1953
  safe_mutex_assert_owner(&LOCK_global_system_variables);
  if (!cache_name || ! cache_name->length)
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
1954
    cache_name= &default_key_cache_base;
1955
  return ((KEY_CACHE*) find_named(&key_caches,
1956
                                      cache_name->str, cache_name->length, 0));
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
1957 1958
}

1959

igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
1960 1961
byte *sys_var_key_cache_param::value_ptr(THD *thd, enum_var_type type,
					 LEX_STRING *base)
1962
{
1963
  KEY_CACHE *key_cache= get_key_cache(base);
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
1964 1965 1966 1967
  if (!key_cache)
    key_cache= &zero_key_cache;
  return (byte*) key_cache + offset ;
}
1968

1969

1970 1971
bool sys_var_key_buffer_size::update(THD *thd, set_var *var)
{
1972
  ulonglong tmp= var->save_result.ulonglong_value;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1973
  LEX_STRING *base_name= &var->base;
1974
  KEY_CACHE *key_cache;
1975 1976 1977
  bool error= 0;

  /* If no basename, assume it's for the key cache named 'default' */
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1978
  if (!base_name->length)
1979
    base_name= &default_key_cache_base;
1980 1981 1982

  pthread_mutex_lock(&LOCK_global_system_variables);
  key_cache= get_key_cache(base_name);
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
1983
                            
1984 1985
  if (!key_cache)
  {
1986
    /* Key cache didn't exists */
1987
    if (!tmp)					// Tried to delete cache
1988 1989 1990 1991 1992 1993
      goto end;					// Ok, nothing to do
    if (!(key_cache= create_key_cache(base_name->str, base_name->length)))
    {
      error= 1;
      goto end;
    }
1994
  }
1995 1996 1997 1998 1999 2000 2001 2002 2003

  /*
    Abort if some other thread is changing the key cache
    TODO: This should be changed so that we wait until the previous
    assignment is done and then do the new assign
  */
  if (key_cache->in_init)
    goto end;

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2004
  if (!tmp)					// Zero size means delete
2005
  {
2006 2007 2008
    if (key_cache == sql_key_cache)
      goto end;					// Ignore default key cache

2009
    if (key_cache->key_cache_inited)		// If initied
2010 2011
    {
      /*
2012 2013
	Move tables using this key cache to the default key cache
	and clear the old key cache.
2014
      */
2015
      NAMED_LIST *list; 
2016
      key_cache= (KEY_CACHE *) find_named(&key_caches, base_name->str,
2017
					      base_name->length, &list);
2018 2019 2020 2021 2022
      key_cache->in_init= 1;
      pthread_mutex_unlock(&LOCK_global_system_variables);
      error= reassign_keycache_tables(thd, key_cache, sql_key_cache);
      pthread_mutex_lock(&LOCK_global_system_variables);
      key_cache->in_init= 0;
2023
    }
2024 2025 2026 2027 2028
    /*
      We don't delete the key cache as some running threads my still be
      in the key cache code with a pointer to the deleted (empty) key cache
    */
    goto end;
2029 2030
  }

2031 2032
  key_cache->param_buff_size=
    (ulonglong) getopt_ull_limit_value(tmp, option_limits);
2033

2034 2035 2036 2037
  /* If key cache didn't existed initialize it, else resize it */
  key_cache->in_init= 1;
  pthread_mutex_unlock(&LOCK_global_system_variables);

2038
  if (!key_cache->key_cache_inited)
2039
    error= (bool) (ha_init_key_cache("", key_cache));
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2040
  else
2041
    error= (bool)(ha_resize_key_cache(key_cache));
2042

2043 2044
  pthread_mutex_lock(&LOCK_global_system_variables);
  key_cache->in_init= 0;  
2045

2046 2047 2048
end:
  pthread_mutex_unlock(&LOCK_global_system_variables);
  return error;
2049 2050
}

2051 2052

bool sys_var_key_cache_long::update(THD *thd, set_var *var)
2053
{
monty@mysql.com's avatar
monty@mysql.com committed
2054
  ulong tmp= (ulong) var->value->val_int();
2055
  LEX_STRING *base_name= &var->base;
2056 2057
  bool error= 0;

2058
  if (!base_name->length)
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2059
    base_name= &default_key_cache_base;
2060 2061

  pthread_mutex_lock(&LOCK_global_system_variables);
2062
  KEY_CACHE *key_cache= get_key_cache(base_name);
2063

igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2064 2065
  if (!key_cache && !(key_cache= create_key_cache(base_name->str,
				                  base_name->length)))
2066 2067 2068 2069
  {
    error= 1;
    goto end;
  }
2070

2071 2072 2073 2074 2075 2076 2077 2078 2079
  /*
    Abort if some other thread is changing the key cache
    TODO: This should be changed so that we wait until the previous
    assignment is done and then do the new assign
  */
  if (key_cache->in_init)
    goto end;

  *((ulong*) (((char*) key_cache) + offset))=
2080
    (ulong) getopt_ull_limit_value(tmp, option_limits);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2081

2082 2083 2084 2085 2086
  /*
    Don't create a new key cache if it didn't exist
    (key_caches are created only when the user sets block_size)
  */
  key_cache->in_init= 1;
2087

2088
  pthread_mutex_unlock(&LOCK_global_system_variables);
2089

2090 2091 2092 2093 2094 2095 2096 2097
  error= (bool) (ha_resize_key_cache(key_cache));

  pthread_mutex_lock(&LOCK_global_system_variables);
  key_cache->in_init= 0;  

end:
  pthread_mutex_unlock(&LOCK_global_system_variables);
  return error;
2098 2099
}

2100

2101 2102 2103 2104
/*****************************************************************************
  Functions to handle SET NAMES and SET CHARACTER SET
*****************************************************************************/

2105
int set_var_collation_client::check(THD *thd)
2106 2107 2108 2109
{
  return 0;
}

2110
int set_var_collation_client::update(THD *thd)
2111
{
2112 2113
  thd->variables.character_set_client= character_set_client;
  thd->variables.character_set_results= character_set_results;
2114
  thd->variables.collation_connection= collation_connection;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2115
  thd->update_charset();
2116 2117 2118 2119 2120 2121 2122
  thd->protocol_simple.init(thd);
  thd->protocol_prep.init(thd);
  return 0;
}

/****************************************************************************/

2123 2124
bool sys_var_timestamp::update(THD *thd,  set_var *var)
{
2125
  thd->set_time((time_t) var->save_result.ulonglong_value);
2126 2127 2128 2129 2130 2131 2132 2133 2134 2135
  return 0;
}


void sys_var_timestamp::set_default(THD *thd, enum_var_type type)
{
  thd->user_time=0;
}


2136 2137
byte *sys_var_timestamp::value_ptr(THD *thd, enum_var_type type,
				   LEX_STRING *base)
2138 2139 2140 2141 2142 2143 2144 2145
{
  thd->sys_var_tmp.long_value= (long) thd->start_time;
  return (byte*) &thd->sys_var_tmp.long_value;
}


bool sys_var_last_insert_id::update(THD *thd, set_var *var)
{
2146
  thd->insert_id(var->save_result.ulonglong_value);
2147 2148 2149 2150
  return 0;
}


2151 2152
byte *sys_var_last_insert_id::value_ptr(THD *thd, enum_var_type type,
					LEX_STRING *base)
2153 2154 2155 2156 2157 2158 2159 2160
{
  thd->sys_var_tmp.long_value= (long) thd->insert_id();
  return (byte*) &thd->last_insert_id;
}


bool sys_var_insert_id::update(THD *thd, set_var *var)
{
2161
  thd->next_insert_id= var->save_result.ulonglong_value;
2162 2163 2164 2165
  return 0;
}


2166 2167
byte *sys_var_insert_id::value_ptr(THD *thd, enum_var_type type,
				   LEX_STRING *base)
2168 2169 2170 2171
{
  return (byte*) &thd->current_insert_id;
}

2172 2173
bool sys_var_pseudo_thread_id::check(THD *thd, set_var *var)
{
2174
  var->save_result.ulonglong_value= var->value->val_int();
hf@deer.(none)'s avatar
hf@deer.(none) committed
2175
#ifndef NO_EMBEDDED_ACCESS_CHECKS
2176 2177 2178 2179 2180 2181 2182
  if (thd->master_access & SUPER_ACL)
    return 0;
  else
  {
    my_error(ER_SPECIFIC_ACCESS_DENIED_ERROR, MYF(0), "SUPER");
    return 1;
  }
hf@deer.(none)'s avatar
hf@deer.(none) committed
2183 2184 2185
#else
  return 0;
#endif
2186 2187
}

2188

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
2189
#ifdef HAVE_REPLICATION
2190 2191
bool sys_var_slave_skip_counter::check(THD *thd, set_var *var)
{
2192
  int result= 0;
monty@mysql.com's avatar
monty@mysql.com committed
2193
  pthread_mutex_lock(&LOCK_active_mi);
2194 2195 2196 2197 2198 2199 2200
  pthread_mutex_lock(&active_mi->rli.run_lock);
  if (active_mi->rli.slave_running)
  {
    my_error(ER_SLAVE_MUST_STOP, MYF(0));
    result=1;
  }
  pthread_mutex_unlock(&active_mi->rli.run_lock);
monty@mysql.com's avatar
monty@mysql.com committed
2201
  pthread_mutex_unlock(&LOCK_active_mi);
2202
  var->save_result.ulong_value= (ulong) var->value->val_int();
2203 2204 2205 2206 2207 2208
  return result;
}


bool sys_var_slave_skip_counter::update(THD *thd, set_var *var)
{
monty@mysql.com's avatar
monty@mysql.com committed
2209
  pthread_mutex_lock(&LOCK_active_mi);
2210 2211 2212 2213 2214 2215 2216 2217 2218
  pthread_mutex_lock(&active_mi->rli.run_lock);
  /*
    The following test should normally never be true as we test this
    in the check function;  To be safe against multiple
    SQL_SLAVE_SKIP_COUNTER request, we do the check anyway
  */
  if (!active_mi->rli.slave_running)
  {
    pthread_mutex_lock(&active_mi->rli.data_lock);
2219
    active_mi->rli.slave_skip_counter= var->save_result.ulong_value;
2220 2221 2222
    pthread_mutex_unlock(&active_mi->rli.data_lock);
  }
  pthread_mutex_unlock(&active_mi->rli.run_lock);
monty@mysql.com's avatar
monty@mysql.com committed
2223
  pthread_mutex_unlock(&LOCK_active_mi);
2224 2225
  return 0;
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
2226
#endif /* HAVE_REPLICATION */
2227

2228 2229
bool sys_var_rand_seed1::update(THD *thd, set_var *var)
{
2230
  thd->rand.seed1= (ulong) var->save_result.ulonglong_value;
2231 2232 2233 2234 2235
  return 0;
}

bool sys_var_rand_seed2::update(THD *thd, set_var *var)
{
2236
  thd->rand.seed2= (ulong) var->save_result.ulonglong_value;
2237 2238 2239 2240
  return 0;
}


2241 2242 2243 2244 2245 2246
/*
  Functions to update thd->options bits
*/

static bool set_option_bit(THD *thd, set_var *var)
{
2247 2248 2249
  sys_var_thd_bit *sys_var= ((sys_var_thd_bit*) var->var);
  if ((var->save_result.ulong_value != 0) == sys_var->reverse)
    thd->options&= ~sys_var->bit_flag;
2250
  else
2251
    thd->options|= sys_var->bit_flag;
2252 2253 2254 2255 2256 2257 2258 2259 2260 2261 2262 2263 2264 2265 2266 2267 2268 2269 2270 2271 2272 2273 2274 2275 2276 2277 2278 2279 2280 2281 2282 2283 2284 2285 2286 2287 2288 2289 2290 2291 2292 2293 2294 2295
  return 0;
}


static bool set_option_autocommit(THD *thd, set_var *var)
{
  /* The test is negative as the flag we use is NOT autocommit */

  ulong org_options=thd->options;

  if (var->save_result.ulong_value != 0)
    thd->options&= ~((sys_var_thd_bit*) var->var)->bit_flag;
  else
    thd->options|= ((sys_var_thd_bit*) var->var)->bit_flag;

  if ((org_options ^ thd->options) & OPTION_NOT_AUTOCOMMIT)
  {
    if ((org_options & OPTION_NOT_AUTOCOMMIT))
    {
      /* We changed to auto_commit mode */
      thd->options&= ~(ulong) (OPTION_BEGIN | OPTION_STATUS_NO_TRANS_UPDATE);
      thd->server_status|= SERVER_STATUS_AUTOCOMMIT;
      if (ha_commit(thd))
	return 1;
    }
    else
    {
      thd->options&= ~(ulong) (OPTION_STATUS_NO_TRANS_UPDATE);
      thd->server_status&= ~SERVER_STATUS_AUTOCOMMIT;
    }
  }
  return 0;
}


static bool set_log_update(THD *thd, set_var *var)
{
  if (opt_sql_bin_update)
    ((sys_var_thd_bit*) var->var)->bit_flag|= (OPTION_BIN_LOG |
					       OPTION_UPDATE_LOG);
  set_option_bit(thd, var);
  return 0;
}

2296 2297 2298 2299 2300 2301 2302 2303 2304 2305 2306 2307 2308 2309 2310
static byte *get_warning_count(THD *thd)
{
  thd->sys_var_tmp.long_value=
    (thd->warn_count[(uint) MYSQL_ERROR::WARN_LEVEL_NOTE] +
     thd->warn_count[(uint) MYSQL_ERROR::WARN_LEVEL_WARN]);
  return (byte*) &thd->sys_var_tmp.long_value;
}

static byte *get_error_count(THD *thd)
{
  thd->sys_var_tmp.long_value= 
    thd->warn_count[(uint) MYSQL_ERROR::WARN_LEVEL_ERROR];
  return (byte*) &thd->sys_var_tmp.long_value;
}

2311 2312 2313 2314 2315 2316 2317 2318 2319 2320 2321 2322 2323 2324 2325 2326 2327 2328 2329 2330 2331 2332 2333 2334 2335 2336 2337 2338 2339 2340 2341 2342 2343 2344 2345 2346 2347 2348 2349 2350 2351 2352 2353 2354 2355 2356 2357 2358 2359 2360 2361 2362 2363 2364 2365 2366 2367 2368 2369

/****************************************************************************
  Main handling of variables:
  - Initialisation
  - Searching during parsing
  - Update loop
****************************************************************************/

/*
  Find variable name in option my_getopt structure used for command line args

  SYNOPSIS
    find_option()
    opt		option structure array to search in
    name	variable name

  RETURN VALUES
    0		Error
    ptr		pointer to option structure
*/

static struct my_option *find_option(struct my_option *opt, const char *name) 
{
  uint length=strlen(name);
  for (; opt->name; opt++)
  {
    if (!getopt_compare_strings(opt->name, name, length) &&
	!opt->name[length])
    {
      /*
	Only accept the option if one can set values through it.
	If not, there is no default value or limits in the option.
      */
      return (opt->value) ? opt : 0;
    }
  }
  return 0;
}


/*
  Return variable name and length for hashing of variables
*/

static byte *get_sys_var_length(const sys_var *var, uint *length,
				my_bool first)
{
  *length= var->name_length;
  return (byte*) var->name;
}


/*
  Initialises sys variables and put them in system_variable_hash
*/


void set_var_init()
{
2370 2371
  hash_init(&system_variable_hash, system_charset_info,
	    array_elements(sys_variables),0,0,
2372
	    (hash_get_key) get_sys_var_length,0,0);
2373 2374 2375 2376 2377 2378 2379
  sys_var **var, **end;
  for (var= sys_variables, end= sys_variables+array_elements(sys_variables) ;
       var < end;
       var++)
  {
    (*var)->name_length= strlen((*var)->name);
    (*var)->option_limits= find_option(my_long_options, (*var)->name);
hf@deer.(none)'s avatar
SCRUM  
hf@deer.(none) committed
2380
    my_hash_insert(&system_variable_hash, (byte*) *var);
2381 2382 2383 2384 2385 2386 2387 2388 2389 2390 2391 2392 2393 2394 2395 2396 2397 2398 2399 2400 2401 2402 2403 2404 2405 2406 2407 2408 2409 2410 2411 2412 2413 2414
  }
  /*
    Special cases
    Needed because MySQL can't find the limits for a variable it it has
    a different name than the command line option.
    As these variables are deprecated, this code will disappear soon...
  */
  sys_sql_max_join_size.option_limits= sys_max_join_size.option_limits;
}


void set_var_free()
{
  hash_free(&system_variable_hash);
}


/*
  Find a user set-table variable

  SYNOPSIS
    find_sys_var()
    str		Name of system variable to find
    length	Length of variable.  zero means that we should use strlen()
		on the variable

  NOTE
    We have to use net_printf() as this is called during the parsing stage

  RETURN VALUES
    pointer	pointer to variable definitions
    0		Unknown variable (error message is given)
*/

2415
sys_var *find_sys_var(const char *str, uint length)
2416
{
2417 2418
  sys_var *var= (sys_var*) hash_search(&system_variable_hash,
				       (byte*) str,
2419 2420 2421
				       length ? length :
				       strlen(str));
  if (!var)
2422
    net_printf(current_thd, ER_UNKNOWN_SYSTEM_VARIABLE, (char*) str);
2423 2424 2425 2426 2427 2428 2429 2430 2431 2432 2433 2434 2435 2436 2437 2438 2439 2440 2441 2442 2443 2444
  return var;
}


/*
  Execute update of all variables

  SYNOPSIS

  sql_set
    THD		Thread id
    set_var	List of variables to update

  DESCRIPTION
    First run a check of all variables that all updates will go ok.
    If yes, then execute all updates, returning an error if any one failed.

    This should ensure that in all normal cases none all or variables are
    updated

    RETURN VALUE
    0	ok
2445 2446
    1	ERROR, message sent (normally no variables was updated)
    -1  ERROR, message not sent
2447 2448
*/

2449
int sql_set_variables(THD *thd, List<set_var_base> *var_list)
2450
{
2451
  int error= 0;
2452
  List_iterator_fast<set_var_base> it(*var_list);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2453
  DBUG_ENTER("sql_set_variables");
2454 2455 2456 2457

  set_var_base *var;
  while ((var=it++))
  {
2458
    if ((error=var->check(thd)))
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2459
      DBUG_RETURN(error);
2460
  }
2461 2462
  if (thd->net.report_error)
    DBUG_RETURN(1);
2463 2464
  it.rewind();
  while ((var=it++))
2465
    error|= var->update(thd);			// Returns 0, -1 or 1
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2466
  DBUG_RETURN(error);
2467 2468 2469 2470 2471 2472 2473
}


/*****************************************************************************
  Functions to handle SET mysql_internal_variable=const_expr
*****************************************************************************/

2474
int set_var::check(THD *thd)
2475 2476 2477 2478 2479 2480
{
  if (var->check_type(type))
  {
    my_error(type == OPT_GLOBAL ? ER_LOCAL_VARIABLE : ER_GLOBAL_VARIABLE,
	     MYF(0),
	     var->name);
2481
    return -1;
2482 2483 2484 2485 2486 2487 2488 2489 2490
  }
  if ((type == OPT_GLOBAL && check_global_access(thd, SUPER_ACL)))
    return 1;
  /* value is a NULL pointer if we are using SET ... = DEFAULT */
  if (!value)
  {
    if (var->check_default(type))
    {
      my_error(ER_NO_DEFAULT, MYF(0), var->name);
2491
      return -1;
2492 2493 2494 2495
    }
    return 0;
  }

2496
  if (value->fix_fields(thd, 0, &value) || value->check_cols(1))
2497
    return -1;
2498 2499 2500
  if (var->check_update_type(value->result_type()))
  {
    my_error(ER_WRONG_TYPE_FOR_VAR, MYF(0), var->name);
2501
    return -1;
2502
  }
2503
  return var->check(thd, this) ? -1 : 0;
2504 2505 2506
}


2507
int set_var::update(THD *thd)
2508 2509 2510 2511
{
  if (!value)
    var->set_default(thd, type);
  else if (var->update(thd, this))
2512
    return -1;				// should never happen
2513 2514 2515 2516 2517 2518 2519 2520 2521 2522
  if (var->after_update)
    (*var->after_update)(thd, type);
  return 0;
}


/*****************************************************************************
  Functions to handle SET @user_variable=const_expr
*****************************************************************************/

2523
int set_var_user::check(THD *thd)
2524
{
bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
2525 2526
  /*
    Item_func_set_user_var can't substitute something else on its place =>
2527
    0 can be passed as last argument (reference on item)
bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
2528 2529
  */
  return (user_var_item->fix_fields(thd, 0, (Item**) 0) ||
2530
	  user_var_item->check()) ? -1 : 0;
2531 2532 2533
}


2534
int set_var_user::update(THD *thd)
2535 2536 2537 2538
{
  if (user_var_item->update())
  {
    /* Give an error if it's not given already */
2539 2540
    my_error(ER_SET_CONSTANTS_ONLY, MYF(0));
    return -1;
2541 2542 2543 2544 2545 2546 2547 2548 2549
  }
  return 0;
}


/*****************************************************************************
  Functions to handle SET PASSWORD
*****************************************************************************/

2550
int set_var_password::check(THD *thd)
2551
{
hf@deer.(none)'s avatar
hf@deer.(none) committed
2552
#ifndef NO_EMBEDDED_ACCESS_CHECKS
2553 2554
  if (!user->host.str)
    user->host.str= (char*) thd->host_or_ip;
2555 2556
  /* Returns 1 as the function sends error to client */
  return check_change_password(thd, user->host.str, user->user.str) ? 1 : 0;
hf@deer.(none)'s avatar
hf@deer.(none) committed
2557 2558 2559
#else 
  return 0;
#endif
2560 2561
}

2562
int set_var_password::update(THD *thd)
2563
{
hf@deer.(none)'s avatar
hf@deer.(none) committed
2564
#ifndef NO_EMBEDDED_ACCESS_CHECKS
2565 2566 2567
  /* Returns 1 as the function sends error to client */
  return (change_password(thd, user->host.str, user->user.str, password) ?
	  1 : 0);
hf@deer.(none)'s avatar
hf@deer.(none) committed
2568 2569 2570
#else
  return 0;
#endif
2571 2572
}

2573 2574 2575 2576
/****************************************************************************
 Functions to handle table_type
****************************************************************************/

2577 2578
/* Based upon sys_var::check_enum() */

2579
bool sys_var_thd_storage_engine::check(THD *thd, set_var *var)
2580 2581 2582 2583 2584 2585 2586 2587 2588 2589 2590 2591 2592 2593 2594 2595
{
  char buff[80];
  const char *value;
  String str(buff, sizeof(buff), &my_charset_latin1), *res;

  if (var->value->result_type() == STRING_RESULT)
  {
    if (!(res=var->value->val_str(&str)) ||
	!(var->save_result.ulong_value=
	 (ulong) ha_resolve_by_name(res->ptr(), res->length())))
    {
      value= res ? res->c_ptr() : "NULL";
      goto err;
    }
    return 0;
  }
monty@mysql.com's avatar
monty@mysql.com committed
2596
  value= "unknown";
2597 2598

err:
2599
  my_error(ER_UNKNOWN_STORAGE_ENGINE, MYF(0), value);
2600 2601 2602
  return 1;    
}

2603

2604 2605
byte *sys_var_thd_storage_engine::value_ptr(THD *thd, enum_var_type type,
					    LEX_STRING *base)
2606 2607 2608 2609
{
  ulong val;
  val= ((type == OPT_GLOBAL) ? global_system_variables.*offset :
        thd->variables.*offset);
2610
  const char *table_type= ha_get_storage_engine((enum db_type)val);
2611
  return (byte *) table_type;
2612 2613
}

2614

2615
void sys_var_thd_storage_engine::set_default(THD *thd, enum_var_type type)
2616 2617 2618 2619 2620 2621 2622
{
  if (type == OPT_GLOBAL)
    global_system_variables.*offset= (ulong) DB_TYPE_MYISAM;
  else
    thd->variables.*offset= (ulong) (global_system_variables.*offset);
}

2623

2624
bool sys_var_thd_storage_engine::update(THD *thd, set_var *var)
2625 2626 2627 2628 2629 2630 2631 2632
{
  if (var->type == OPT_GLOBAL)
    global_system_variables.*offset= var->save_result.ulong_value;
  else
    thd->variables.*offset= var->save_result.ulong_value;
  return 0;
}

2633 2634 2635 2636 2637 2638 2639 2640 2641 2642 2643 2644 2645 2646 2647 2648 2649 2650 2651
void sys_var_thd_table_type::warn_deprecated(THD *thd)
{
  push_warning_printf(thd, MYSQL_ERROR::WARN_LEVEL_WARN,
		      ER_WARN_DEPRECATED_SYNTAX,
		      ER(ER_WARN_DEPRECATED_SYNTAX), "table_type", "storage_engine"); 
}

void sys_var_thd_table_type::set_default(THD *thd, enum_var_type type)
{
  warn_deprecated(thd);
  sys_var_thd_storage_engine::set_default(thd, type);
}

bool sys_var_thd_table_type::update(THD *thd, set_var *var)
{
  warn_deprecated(thd);
  return sys_var_thd_storage_engine::update(thd, var);
}

2652

2653 2654 2655
/****************************************************************************
 Functions to handle sql_mode
****************************************************************************/
2656

2657 2658
byte *sys_var_thd_sql_mode::value_ptr(THD *thd, enum_var_type type,
				      LEX_STRING *base)
2659 2660 2661 2662 2663 2664 2665 2666 2667 2668 2669 2670 2671 2672 2673 2674 2675 2676 2677 2678 2679 2680 2681 2682 2683 2684 2685 2686 2687 2688 2689 2690 2691 2692 2693 2694 2695 2696 2697 2698
{
  ulong val;
  char buff[256];
  String tmp(buff, sizeof(buff), &my_charset_latin1);

  tmp.length(0);
  val= ((type == OPT_GLOBAL) ? global_system_variables.*offset :
        thd->variables.*offset);
  for (uint i= 0; val; val>>= 1, i++)
  {
    if (val & 1)
    {
      tmp.append(enum_names->type_names[i]);
      tmp.append(',');
    }
  }
  if (tmp.length())
    tmp.length(tmp.length() - 1);
  return (byte*) thd->strmake(tmp.ptr(), tmp.length());
}


void sys_var_thd_sql_mode::set_default(THD *thd, enum_var_type type)
{
  if (type == OPT_GLOBAL)
    global_system_variables.*offset= 0;
  else
    thd->variables.*offset= global_system_variables.*offset;
}

void fix_sql_mode_var(THD *thd, enum_var_type type)
{
  if (type == OPT_GLOBAL)
    global_system_variables.sql_mode=
      fix_sql_mode(global_system_variables.sql_mode);
  else
    thd->variables.sql_mode= fix_sql_mode(thd->variables.sql_mode);
}

/* Map database specific bits to function bits */
2699

2700 2701 2702 2703 2704 2705 2706 2707 2708 2709 2710 2711 2712 2713 2714 2715 2716 2717 2718 2719 2720 2721 2722 2723 2724 2725 2726 2727 2728 2729 2730
ulong fix_sql_mode(ulong sql_mode)
{
  /*
    Note that we dont set 
    MODE_NO_KEY_OPTIONS | MODE_NO_TABLE_OPTIONS | MODE_NO_FIELD_OPTIONS
    to allow one to get full use of MySQL in this mode.
  */

  if (sql_mode & MODE_ANSI)
    sql_mode|= (MODE_REAL_AS_FLOAT | MODE_PIPES_AS_CONCAT | MODE_ANSI_QUOTES |
		MODE_IGNORE_SPACE | MODE_ONLY_FULL_GROUP_BY);
  if (sql_mode & MODE_ORACLE)
    sql_mode|= (MODE_PIPES_AS_CONCAT | MODE_ANSI_QUOTES |
		MODE_IGNORE_SPACE |
		MODE_NO_KEY_OPTIONS | MODE_NO_TABLE_OPTIONS |
		MODE_NO_FIELD_OPTIONS);
  if (sql_mode & MODE_MSSQL)
    sql_mode|= (MODE_PIPES_AS_CONCAT | MODE_ANSI_QUOTES |
		MODE_IGNORE_SPACE |
		MODE_NO_KEY_OPTIONS | MODE_NO_TABLE_OPTIONS |
		MODE_NO_FIELD_OPTIONS);
  if (sql_mode & MODE_POSTGRESQL)
    sql_mode|= (MODE_PIPES_AS_CONCAT | MODE_ANSI_QUOTES |
		MODE_IGNORE_SPACE |
		MODE_NO_KEY_OPTIONS | MODE_NO_TABLE_OPTIONS |
		MODE_NO_FIELD_OPTIONS);
  if (sql_mode & MODE_DB2)
    sql_mode|= (MODE_PIPES_AS_CONCAT | MODE_ANSI_QUOTES |
		MODE_IGNORE_SPACE |
		MODE_NO_KEY_OPTIONS | MODE_NO_TABLE_OPTIONS |
		MODE_NO_FIELD_OPTIONS);
2731
  if (sql_mode & MODE_MAXDB)
2732 2733 2734 2735 2736 2737 2738 2739 2740 2741
    sql_mode|= (MODE_PIPES_AS_CONCAT | MODE_ANSI_QUOTES |
		MODE_IGNORE_SPACE |
		MODE_NO_KEY_OPTIONS | MODE_NO_TABLE_OPTIONS |
		MODE_NO_FIELD_OPTIONS);
  if (sql_mode & MODE_MYSQL40)
    sql_mode|= MODE_NO_FIELD_OPTIONS;
  if (sql_mode & MODE_MYSQL323)
    sql_mode|= MODE_NO_FIELD_OPTIONS;
  return sql_mode;
}
2742 2743


2744 2745 2746 2747
/****************************************************************************
  Named list handling
****************************************************************************/

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2748 2749
gptr find_named(I_List<NAMED_LIST> *list, const char *name, uint length,
		NAMED_LIST **found)
2750 2751 2752 2753 2754 2755
{
  I_List_iterator<NAMED_LIST> it(*list);
  NAMED_LIST *element;
  while ((element= it++))
  {
    if (element->cmp(name, length))
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2756
    {
2757 2758
      if (found)
        *found= element;
2759
      return element->data;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2760
    }
2761 2762 2763 2764 2765
  }
  return 0;
}


2766 2767
void delete_elements(I_List<NAMED_LIST> *list,
		     void (*free_element)(const char *name, gptr))
2768 2769
{
  NAMED_LIST *element;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2770
  DBUG_ENTER("delete_elements");
2771 2772
  while ((element= list->get()))
  {
2773
    (*free_element)(element->name, element->data);
2774 2775
    delete element;
  }
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2776
  DBUG_VOID_RETURN;
2777 2778 2779 2780 2781
}


/* Key cache functions */

2782
static KEY_CACHE *create_key_cache(const char *name, uint length)
2783
{
2784
  KEY_CACHE *key_cache;
2785 2786 2787
  DBUG_ENTER("create_key_cache");
  DBUG_PRINT("enter",("name: %.*s", length, name));
  
2788
  if ((key_cache= (KEY_CACHE*) my_malloc(sizeof(KEY_CACHE),
2789
					     MYF(MY_ZEROFILL | MY_WME))))
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2790 2791
  {
    if (!new NAMED_LIST(&key_caches, name, length, (gptr) key_cache))
2792 2793
    {
      my_free((char*) key_cache, MYF(0));
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2794
      key_cache= 0;
2795 2796 2797 2798 2799 2800 2801 2802 2803
    }
    else
    {
      /*
	Set default values for a key cache
	The values in dflt_key_cache_var is set by my_getopt() at startup

	We don't set 'buff_size' as this is used to enable the key cache
      */
2804 2805 2806
      key_cache->param_block_size=     dflt_key_cache_var.param_block_size;
      key_cache->param_division_limit= dflt_key_cache_var.param_division_limit;
      key_cache->param_age_threshold=  dflt_key_cache_var.param_age_threshold;
2807
    }
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2808
  }
2809
  DBUG_RETURN(key_cache);
2810 2811 2812
}


2813
KEY_CACHE *get_or_create_key_cache(const char *name, uint length)
2814
{
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2815
  LEX_STRING key_cache_name;
2816
  KEY_CACHE *key_cache;
2817

igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2818 2819
  key_cache_name.str= (char *) name;
  key_cache_name.length= length;
2820 2821
  pthread_mutex_lock(&LOCK_global_system_variables);
  if (!(key_cache= get_key_cache(&key_cache_name)))
2822
    key_cache= create_key_cache(name, length);
2823
  pthread_mutex_unlock(&LOCK_global_system_variables);
2824 2825 2826 2827
  return key_cache;
}


2828
void free_key_cache(const char *name, KEY_CACHE *key_cache)
2829
{
2830 2831
  ha_end_key_cache(key_cache);
  my_free((char*) key_cache, MYF(0));
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2832 2833 2834
}


2835
bool process_key_caches(int (* func) (const char *name, KEY_CACHE *))
2836
{
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2837 2838
  I_List_iterator<NAMED_LIST> it(key_caches);
  NAMED_LIST *element;
2839

igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2840 2841
  while ((element= it++))
  {
2842
    KEY_CACHE *key_cache= (KEY_CACHE *) element->data;
2843
    func(element->name, key_cache);
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2844 2845
  }
  return 0;
2846 2847
}

2848

2849 2850 2851 2852 2853 2854
/****************************************************************************
  Used templates
****************************************************************************/

#ifdef __GNUC__
template class List<set_var_base>;
2855
template class List_iterator_fast<set_var_base>;
2856
template class I_List_iterator<NAMED_LIST>;
2857
#endif