set_var.cc 85.9 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 199
sys_var_long_ptr	sys_max_connect_errors("max_connect_errors",
					       &max_connect_errors);
sys_var_long_ptr	sys_max_delayed_threads("max_delayed_threads",
200 201
						&max_insert_delayed_threads,
						fix_max_connections);
202 203
sys_var_thd_ulong	sys_max_error_count("max_error_count",
					    &SV::max_error_count);
204 205
sys_var_thd_ulong	sys_max_heap_table_size("max_heap_table_size",
						&SV::max_heap_table_size);
206 207 208 209 210
/* 
   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",
211
					     &SV::pseudo_thread_id);
212
sys_var_thd_ha_rows	sys_max_join_size("max_join_size",
213 214
					  &SV::max_join_size,
					  fix_max_join_size);
215 216
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
217 218
sys_var_thd_ulong   sys_max_length_for_sort_data("max_length_for_sort_data",
                        &SV::max_length_for_sort_data);
219
#ifndef TO_BE_DELETED	/* Alias for max_join_size */
220
sys_var_thd_ha_rows	sys_sql_max_join_size("sql_max_join_size",
221 222 223
					      &SV::max_join_size,
					      fix_max_join_size);
#endif
224 225 226
sys_var_long_ptr	sys_max_relay_log_size("max_relay_log_size",
                                               &max_relay_log_size,
                                               fix_max_relay_log_size);
227 228 229 230 231 232 233 234
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);
235 236
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);
237
sys_var_thd_ulong       sys_myisam_repair_threads("myisam_repair_threads", &SV::myisam_repair_threads);
238 239 240 241 242 243 244 245 246
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);
247 248 249
sys_var_thd_ulong	sys_net_retry_count("net_retry_count",
					    &SV::net_retry_count,
					    fix_net_retry_count);
250
sys_var_thd_bool	sys_new_mode("new", &SV::new_mode);
251
sys_var_thd_bool	sys_old_passwords("old_passwords", &SV::old_passwords);
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
252 253
sys_var_thd_ulong       sys_preload_buff_size("preload_buffer_size",
                                              &SV::preload_buff_size);
254 255
sys_var_thd_ulong	sys_read_buff_size("read_buffer_size",
					   &SV::read_buff_size);
256
sys_var_bool_ptr	sys_readonly("read_only", &opt_readonly);
257 258
sys_var_thd_ulong	sys_read_rnd_buff_size("read_rnd_buffer_size",
					       &SV::read_rnd_buff_size);
259 260 261 262
#ifdef HAVE_REPLICATION
sys_var_bool_ptr	sys_relay_log_purge("relay_log_purge",
                                            &relay_log_purge);
#endif
263 264 265 266 267
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);
268 269 270 271

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",
272 273
						   &SV::query_alloc_block_size,
						   fix_thd_mem_root);
274
sys_var_thd_ulong	sys_query_prealloc_size("query_prealloc_size",
275 276
						&SV::query_prealloc_size,
						fix_thd_mem_root);
277
sys_var_thd_ulong	sys_trans_alloc_block_size("transaction_alloc_block_size",
278 279
						   &SV::trans_alloc_block_size,
						   fix_trans_mem_root);
280
sys_var_thd_ulong	sys_trans_prealloc_size("transaction_prealloc_size",
281 282
						&SV::trans_prealloc_size,
						fix_trans_mem_root);
283

284 285 286
#ifdef HAVE_QUERY_CACHE
sys_var_long_ptr	sys_query_cache_limit("query_cache_limit",
					      &query_cache.query_cache_limit);
287 288 289
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);
290 291 292 293
sys_var_thd_enum	sys_query_cache_type("query_cache_type",
					     &SV::query_cache_type,
					     &query_cache_type_typelib);
#endif /* HAVE_QUERY_CACHE */
294
sys_var_bool_ptr	sys_secure_auth("secure_auth", &opt_secure_auth);
295
sys_var_long_ptr	sys_server_id("server_id",&server_id);
296 297
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
298
#ifdef HAVE_REPLICATION
299 300
sys_var_long_ptr	sys_slave_net_timeout("slave_net_timeout",
					      &slave_net_timeout);
301
#endif
302 303 304 305
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);
306 307
sys_var_thd_sql_mode    sys_sql_mode("sql_mode",
                                     &SV::sql_mode);
308 309
sys_var_thd_table_type  sys_table_type("table_type",
				       &SV::table_type);
310 311
sys_var_thd_storage_engine sys_storage_engine("storage_engine",
				       &SV::table_type);
312 313 314 315 316 317 318 319 320 321 322 323
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);
324

325 326 327
#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);
328
#endif
329 330 331 332 333 334 335 336 337 338 339 340 341 342

/* 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 */
343 344 345 346 347 348 349 350 351 352 353 354 355 356 357

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,
358
					OPTION_BIG_SELECTS);
359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382
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);
383 384 385 386 387 388 389 390 391
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);

392 393
/* Local state variables */

394
static sys_var_thd_ha_rows	sys_select_limit("sql_select_limit",
395 396 397 398 399
						 &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");
400 401 402 403 404 405 406 407 408
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);

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

416 417
static sys_var_thd_ulong        sys_default_week_format("default_week_format",
					                &SV::default_week_format);
418

419 420 421
sys_var_thd_ulong               sys_group_concat_max_len("group_concat_max_len",
                                                         &SV::group_concat_max_len);

422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438
/*
  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,
439 440
  &sys_character_set_server,
  &sys_character_set_database,
441
  &sys_character_set_client,
442
  &sys_character_set_connection,
443
  &sys_character_set_results,
444
  &sys_collation_connection,
445 446
  &sys_collation_database,
  &sys_collation_server,
447 448
  &sys_concurrent_insert,
  &sys_connect_timeout,
449 450
  &sys_date_format,
  &sys_datetime_format,
451
  &sys_default_week_format,
452 453 454 455
  &sys_delay_key_write,
  &sys_delayed_insert_limit,
  &sys_delayed_insert_timeout,
  &sys_delayed_queue_size,
456
  &sys_error_count,
457
  &sys_expire_logs_days,
458 459
  &sys_flush,
  &sys_flush_time,
460
  &sys_ft_boolean_syntax,
461
  &sys_foreign_key_checks,
462
  &sys_group_concat_max_len,
463
  &sys_identity,
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
464 465
  &sys_init_connect,
  &sys_init_slave,
466 467 468 469
  &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
470
  &sys_key_cache_block_size,
471 472
  &sys_key_cache_division_limit,
  &sys_key_cache_age_threshold,
473 474 475 476 477 478 479 480 481 482 483 484 485 486
  &sys_last_insert_id,
  &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,
487
  &sys_max_error_count,
488 489
  &sys_max_heap_table_size,
  &sys_max_join_size,
igor@hundin.mysql.fi's avatar
igor@hundin.mysql.fi committed
490
  &sys_max_length_for_sort_data,
491
  &sys_max_relay_log_size,
492
  &sys_max_seeks_for_key,
493 494 495 496 497 498
  &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,
499
  &sys_myisam_repair_threads,
500 501 502
  &sys_myisam_sort_buffer_size,
  &sys_net_buffer_length,
  &sys_net_read_timeout,
503
  &sys_net_retry_count,
504 505
  &sys_net_wait_timeout,
  &sys_net_write_timeout,
506
  &sys_new_mode,
507
  &sys_old_passwords,
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
508
  &sys_preload_buff_size,
509
  &sys_pseudo_thread_id,
510
  &sys_query_alloc_block_size,
511
  &sys_query_cache_size,
512
  &sys_query_prealloc_size,
513 514
#ifdef HAVE_QUERY_CACHE
  &sys_query_cache_limit,
515
  &sys_query_cache_min_res_unit,
516
  &sys_query_cache_type,
517
#endif /* HAVE_QUERY_CACHE */
518
  &sys_quote_show_create,
519 520
  &sys_rand_seed1,
  &sys_rand_seed2,
521
  &sys_range_alloc_block_size,
522
  &sys_readonly,
523 524
  &sys_read_buff_size,
  &sys_read_rnd_buff_size,
525 526 527
#ifdef HAVE_REPLICATION
  &sys_relay_log_purge,
#endif
528 529
  &sys_rpl_recovery_rank,
  &sys_safe_updates,
530
  &sys_secure_auth,
531 532
  &sys_select_limit,
  &sys_server_id,
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
533
#ifdef HAVE_REPLICATION
534
  &sys_slave_compressed_protocol,
535 536
  &sys_slave_net_timeout,
  &sys_slave_skip_counter,
537
#endif
538 539 540 541 542
  &sys_slow_launch_time,
  &sys_sort_buffer,
  &sys_sql_big_tables,
  &sys_sql_low_priority_updates,
  &sys_sql_max_join_size,
543
  &sys_sql_mode,
544
  &sys_sql_warnings,
545
  &sys_storage_engine,
546 547 548
  &sys_table_cache_size,
  &sys_table_type,
  &sys_thread_cache_size,
549
  &sys_time_format,
550 551
  &sys_timestamp,
  &sys_tmp_table_size,
552 553
  &sys_trans_alloc_block_size,
  &sys_trans_prealloc_size,
554
  &sys_tx_isolation,
555 556 557
#ifdef HAVE_INNOBASE_DB
  &sys_innodb_max_dirty_pages_pct,
#endif    
558 559
  &sys_unique_checks,
  &sys_warning_count
560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580
};


/*
  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_log_buffer_size",     (char*) &berkeley_log_buffer_size,    SHOW_LONG},
  {"bdb_home",                (char*) &berkeley_home,               SHOW_CHAR_PTR},
  {"bdb_max_lock",            (char*) &berkeley_max_lock,	    SHOW_LONG},
  {"bdb_logdir",              (char*) &berkeley_logdir,             SHOW_CHAR_PTR},
  {"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},
581
  {sys_character_set_server.name, (char*) &sys_character_set_server,SHOW_SYS},
582
  {sys_charset_system.name,   (char*) &sys_charset_system,          SHOW_SYS},
583
  {sys_character_set_database.name, (char*) &sys_character_set_database,SHOW_SYS},
584
  {sys_character_set_client.name,(char*) &sys_character_set_client, SHOW_SYS},
585
  {sys_character_set_connection.name,(char*) &sys_character_set_connection,SHOW_SYS},
586
  {"character-sets-dir",      mysql_charsets_dir,                   SHOW_CHAR},
587
  {sys_character_set_results.name,(char*) &sys_character_set_results, SHOW_SYS},
588
  {sys_collation_connection.name,(char*) &sys_collation_connection, SHOW_SYS},
589 590
  {sys_collation_database.name,(char*) &sys_collation_database,     SHOW_SYS},
  {sys_collation_server.name,(char*) &sys_collation_server,         SHOW_SYS},
591 592 593
  {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},
594 595 596
  {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},
597 598 599 600
  {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},
601
  {sys_expire_logs_days.name, (char*) &sys_expire_logs_days,        SHOW_SYS},
602 603
  {sys_flush.name,             (char*) &sys_flush,                  SHOW_SYS},
  {sys_flush_time.name,        (char*) &sys_flush_time,             SHOW_SYS},
604
  {sys_ft_boolean_syntax.name,(char*) &ft_boolean_syntax,	    SHOW_CHAR},
605 606
  {"ft_min_word_len",         (char*) &ft_min_word_len,             SHOW_LONG},
  {"ft_max_word_len",         (char*) &ft_max_word_len,             SHOW_LONG},
607
  {"ft_query_expansion_limit",(char*) &ft_query_expansion_limit,    SHOW_LONG},
608
  {"ft_stopword_file",        (char*) &ft_stopword_file,            SHOW_CHAR_PTR},
609
  {"have_bdb",		      (char*) &have_berkeley_db,	    SHOW_HAVE},
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
610
  {"have_crypt",	      (char*) &have_crypt,		    SHOW_HAVE},
611
  {"have_compress",	      (char*) &have_compress,		    SHOW_HAVE},
612
  {"have_innodb",	      (char*) &have_innodb,		    SHOW_HAVE},
613
  {"have_isam",		      (char*) &have_isam,		    SHOW_HAVE},
614
  {"have_raid",		      (char*) &have_raid,		    SHOW_HAVE},
615
  {"have_symlink",            (char*) &have_symlink,                SHOW_HAVE},
616 617 618
  {"have_openssl",	      (char*) &have_openssl,		    SHOW_HAVE},
  {"have_query_cache",        (char*) &have_query_cache,            SHOW_HAVE},
  {"init_file",               (char*) &opt_init_file,               SHOW_CHAR_PTR},
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
619 620
  {"init_connect",            (char*) &sys_init_connect,            SHOW_SYS},
  {"init_slave",              (char*) &sys_init_slave,              SHOW_SYS},
621 622 623
#ifdef HAVE_INNOBASE_DB
  {"innodb_additional_mem_pool_size", (char*) &innobase_additional_mem_pool_size, SHOW_LONG },
  {"innodb_buffer_pool_size", (char*) &innobase_buffer_pool_size, SHOW_LONG },
624
  {"innodb_buffer_pool_awe_mem_mb", (char*) &innobase_buffer_pool_awe_mem_mb, SHOW_LONG },
625 626 627
  {"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_file_io_threads", (char*) &innobase_file_io_threads, SHOW_LONG },
heikki@hundin.mysql.fi's avatar
heikki@hundin.mysql.fi committed
628
  {"innodb_open_files", (char*) &innobase_open_files, SHOW_LONG },
629 630
  {"innodb_force_recovery", (char*) &innobase_force_recovery, SHOW_LONG },
  {"innodb_thread_concurrency", (char*) &innobase_thread_concurrency, SHOW_LONG },
heikki@hundin.mysql.fi's avatar
heikki@hundin.mysql.fi committed
631
  {"innodb_flush_log_at_trx_commit", (char*) &innobase_flush_log_at_trx_commit, SHOW_INT},
632
  {"innodb_fast_shutdown", (char*) &innobase_fast_shutdown, SHOW_MY_BOOL},
heikki@hundin.mysql.fi's avatar
heikki@hundin.mysql.fi committed
633
  {"innodb_file_per_table", (char*) &innobase_file_per_table, SHOW_MY_BOOL},
634 635 636 637 638 639 640 641 642
  {"innodb_flush_method",    (char*) &innobase_unix_file_flush_method, SHOW_CHAR_PTR},
  {"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},
  {"innodb_mirrored_log_groups", (char*) &innobase_mirrored_log_groups, SHOW_LONG},
643
  {sys_innodb_max_dirty_pages_pct.name, (char*) &sys_innodb_max_dirty_pages_pct, SHOW_SYS},
644 645 646 647
#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},
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
648 649
  {sys_key_cache_block_size.name,   (char*) &sys_key_cache_block_size,
                                                         	    SHOW_SYS},
650 651 652 653
  {sys_key_cache_division_limit.name,   (char*) &sys_key_cache_division_limit,
                                                         	    SHOW_SYS},
  {sys_key_cache_age_threshold.name,   (char*) &sys_key_cache_age_threshold,
                                                         	    SHOW_SYS},
654 655 656 657 658 659 660 661 662
  {"language",                language,                             SHOW_CHAR},
  {"large_files_support",     (char*) &opt_large_files,             SHOW_BOOL},	
  {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_update",              (char*) &opt_update_log,              SHOW_BOOL},
  {"log_bin",                 (char*) &opt_bin_log,                 SHOW_BOOL},
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
663
#ifdef HAVE_REPLICATION
664
  {"log_slave_updates",       (char*) &opt_log_slave_updates,       SHOW_MY_BOOL},
665
#endif
666 667 668 669
  {"log_slow_queries",        (char*) &opt_slow_log,                SHOW_BOOL},
  {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},
670
  {"lower_case_table_names",  (char*) &lower_case_table_names,      SHOW_INT},
671 672 673 674 675
  {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_connections.name,    (char*) &sys_max_connections,	    SHOW_SYS},
  {sys_max_connect_errors.name, (char*) &sys_max_connect_errors,    SHOW_SYS},
676
  {sys_max_error_count.name,	(char*) &sys_max_error_count,	    SHOW_SYS},
677 678 679
  {sys_max_delayed_threads.name,(char*) &sys_max_delayed_threads,   SHOW_SYS},
  {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},
680
  {sys_max_relay_log_size.name, (char*) &sys_max_relay_log_size,    SHOW_SYS},
681
  {sys_max_seeks_for_key.name,  (char*) &sys_max_seeks_for_key,	    SHOW_SYS},
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
682
  {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
683
   SHOW_SYS},
684 685
  {sys_max_sort_length.name,	(char*) &sys_max_sort_length,	    SHOW_SYS},
  {sys_max_user_connections.name,(char*) &sys_max_user_connections, SHOW_SYS},
686
  {sys_max_tmp_tables.name,	(char*) &sys_max_tmp_tables,	    SHOW_SYS},
687 688 689 690
  {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},
691 692 693
  {sys_myisam_max_sort_file_size.name, (char*) &sys_myisam_max_sort_file_size,
   SHOW_SYS},
  {sys_myisam_repair_threads.name, (char*) &sys_myisam_repair_threads,
694 695 696 697
   SHOW_SYS},
  {"myisam_recover_options",  (char*) &myisam_recover_options_str,  SHOW_CHAR_PTR},
  {sys_myisam_sort_buffer_size.name, (char*) &sys_myisam_sort_buffer_size, SHOW_SYS},
#ifdef __NT__
698
  {"named_pipe",	      (char*) &opt_enable_named_pipe,       SHOW_MY_BOOL},
699 700 701
#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},
702
  {sys_net_retry_count.name,  (char*) &sys_net_retry_count,	    SHOW_SYS},
703
  {sys_net_write_timeout.name,(char*) &sys_net_write_timeout,       SHOW_SYS},
704
  {sys_new_mode.name,         (char*) &sys_new_mode,                SHOW_SYS},
705
  {sys_old_passwords.name,    (char*) &sys_old_passwords,           SHOW_SYS},
706 707
  {"open_files_limit",	      (char*) &open_files_limit,	    SHOW_LONG},
  {"pid_file",                (char*) pidfile_name,                 SHOW_CHAR},
708
  {"log_error",               (char*) log_error_file,               SHOW_CHAR},
709
  {"port",                    (char*) &mysqld_port,                  SHOW_INT},
710
  {"protocol_version",        (char*) &protocol_version,            SHOW_INT},
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
711
  {sys_preload_buff_size.name, (char*) &sys_preload_buff_size,      SHOW_SYS},
712 713
  {sys_query_alloc_block_size.name, (char*) &sys_query_alloc_block_size,
   SHOW_SYS},
714
#ifdef HAVE_QUERY_CACHE
715
  {sys_query_cache_limit.name,(char*) &sys_query_cache_limit,	    SHOW_SYS},
716 717
  {sys_query_cache_min_res_unit.name, (char*) &sys_query_cache_min_res_unit,
   SHOW_SYS},
718 719
  {sys_query_cache_size.name, (char*) &sys_query_cache_size,	    SHOW_SYS},
  {sys_query_cache_type.name, (char*) &sys_query_cache_type,        SHOW_SYS},
720
  {"secure_auth",             (char*) &sys_secure_auth,             SHOW_SYS},
721
#endif /* HAVE_QUERY_CACHE */
722
  {sys_query_prealloc_size.name, (char*) &sys_query_prealloc_size,  SHOW_SYS},
723 724
  {sys_range_alloc_block_size.name, (char*) &sys_range_alloc_block_size,
   SHOW_SYS},
serg@serg.mylan's avatar
serg@serg.mylan committed
725 726 727
  {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
728 729 730
#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
731
  {sys_rpl_recovery_rank.name,(char*) &sys_rpl_recovery_rank,       SHOW_SYS},
732 733 734 735
#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
736
  {sys_server_id.name,	      (char*) &sys_server_id,		    SHOW_SYS},
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
737
#ifdef HAVE_REPLICATION
738
  {sys_slave_net_timeout.name,(char*) &sys_slave_net_timeout,	    SHOW_SYS},
739
#endif
740
  {sys_readonly.name,         (char*) &sys_readonly,                SHOW_SYS},
741
  {"skip_external_locking",   (char*) &my_disable_locking,          SHOW_MY_BOOL},
742 743 744
  {"skip_networking",         (char*) &opt_disable_networking,      SHOW_BOOL},
  {"skip_show_database",      (char*) &opt_skip_show_db,            SHOW_BOOL},
  {sys_slow_launch_time.name, (char*) &sys_slow_launch_time,        SHOW_SYS},
745
#ifdef HAVE_SYS_UN_H
746
  {"socket",                  (char*) &mysqld_unix_port,             SHOW_CHAR_PTR},
747
#endif
748
  {sys_sort_buffer.name,      (char*) &sys_sort_buffer, 	    SHOW_SYS},
749
  {sys_sql_mode.name,         (char*) &sys_sql_mode,                SHOW_SYS},
750
  {sys_storage_engine.name,   (char*) &sys_storage_engine,          SHOW_SYS},
751 752 753 754 755 756 757 758
  {"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},
  {sys_tx_isolation.name,     (char*) &sys_tx_isolation,	    SHOW_SYS},
759
  {sys_time_format.name,      (char*) &sys_time_format,		    SHOW_SYS},
760 761 762 763
#ifdef HAVE_TZNAME
  {"timezone",                time_zone,                            SHOW_CHAR},
#endif
  {sys_tmp_table_size.name,   (char*) &sys_tmp_table_size,	    SHOW_SYS},
764
  {"tmpdir",                  (char*) &opt_mysql_tmpdir,            SHOW_CHAR_PTR},
765 766 767
  {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},
768
  {"version",                 server_version,                       SHOW_CHAR},
769 770 771
#ifdef HAVE_BERKELEY_DB
  {"version_bdb",             (char*) DB_VERSION_STRING,            SHOW_CHAR},
#endif
772
  {"version_comment",         (char*) MYSQL_COMPILATION_COMMENT,    SHOW_CHAR},
773 774
  {"version_compile_machine", (char*) MACHINE_TYPE,		    SHOW_CHAR},
  {"version_compile_os",      (char*) SYSTEM_TYPE,		    SHOW_CHAR},
775 776 777 778
  {sys_net_wait_timeout.name, (char*) &sys_net_wait_timeout,	    SHOW_SYS},
  {NullS, NullS, SHOW_LONG}
};

779

780 781 782 783 784 785
bool sys_var::check(THD *thd, set_var *var)
{
  var->save_result.ulonglong_value= var->value->val_int();
  return 0;
}

786 787 788 789 790 791 792 793 794 795 796 797
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;
}

798 799 800 801
/*
  Functions to check and update variables
*/

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

803 804 805 806 807 808 809 810 811 812
/*
  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
813 814
{
  char *res= 0, *old_value;
815
  uint new_length= 0;
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
816
  /* If the string is "", delete old init command */
817
  if (var && (new_length= var->value->str_value.length()))
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
818
  {
monty@mysql.com's avatar
monty@mysql.com committed
819 820
    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
821 822 823 824 825 826
      return 1;
  }
  /*
    Replace the old value in such a way that the any thread using
    the value will work.
  */
827 828 829 830 831
  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
832 833 834 835 836
  my_free(old_value, MYF(MY_ALLOW_ZERO_PTR));
  return 0;
}


837 838 839 840 841 842
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
843 844
static void sys_default_init_connect(THD* thd, enum_var_type type)
{
845
  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
846 847 848 849 850
}


static bool sys_update_init_slave(THD *thd, set_var *var)
{
851
  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
852 853 854 855 856
}


static void sys_default_init_slave(THD* thd, enum_var_type type)
{
857
  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
858 859
}

860 861 862
static int sys_check_ftb_syntax(THD *thd,  set_var *var)
{
  if (thd->master_access & SUPER_ACL)
863 864
    return ft_boolean_check_syntax_string(var->value->str_value.c_ptr()) ?
      -1 : 0;
865 866 867 868 869 870 871 872 873
  else
  {
    my_error(ER_SPECIFIC_ACCESS_DENIED_ERROR, MYF(0), "SUPER");
    return 1;
  }
}

static bool sys_update_ftb_syntax(THD *thd, set_var * var)
{
874 875
  strmake(ft_boolean_syntax, var->value->str_value.c_ptr(),
	  sizeof(ft_boolean_syntax)-1);
876 877 878 879 880
  return 0;
}

static void sys_default_ftb_syntax(THD *thd, enum_var_type type)
{
881 882
  strmake(ft_boolean_syntax, opt_ft_boolean_syntax,
	  sizeof(ft_boolean_syntax)-1);
883
}
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
884

885 886 887 888 889
/*
  The following 3 functions need to be changed in 4.1 when we allow
  one to change character sets
*/

890
static int sys_check_charset(THD *thd, set_var *var)
891 892 893 894 895 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 911 912 913 914 915 916 917 918 919
{
  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);
}


920 921 922 923
static void
fix_myisam_max_extra_sort_file_size(THD *thd, enum_var_type type)
{
  myisam_max_extra_temp_length=
924
    (my_off_t) global_system_variables.myisam_max_extra_sort_file_size;
925 926 927 928 929 930 931 932 933 934
}


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;
}

935 936 937 938 939 940 941 942
/*
  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)
  {
943
    if (thd->variables.max_join_size == HA_POS_ERROR)
944 945 946 947 948
      thd->options|= OPTION_BIG_SELECTS;
    else
      thd->options&= ~OPTION_BIG_SELECTS;
  }
}
949

950 951 952 953 954 955 956 957 958 959 960 961 962 963 964 965 966 967

/*
  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
968
#ifdef HAVE_REPLICATION
969 970 971 972 973 974 975 976 977 978 979 980 981
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;
}

982 983 984 985 986
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
987 988 989
#else /* HAVE_REPLICATION */
static void fix_net_read_timeout(THD *thd __attribute__(unused),
				 enum_var_type type __attribute__(unused))
990
{}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
991 992
static void fix_net_write_timeout(THD *thd __attribute__(unused),
				  enum_var_type type __attribute__(unused))
993
{}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
994 995
static void fix_net_retry_count(THD *thd __attribute__(unused),
				enum_var_type type __attribute__(unused))
996
{}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
997
#endif /* HAVE_REPLICATION */
998

999 1000 1001 1002

static void fix_query_cache_size(THD *thd, enum_var_type type)
{
#ifdef HAVE_QUERY_CACHE
1003
  ulong requested= query_cache_size;
1004
  query_cache.resize(query_cache_size);
1005 1006 1007 1008
  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);
1009 1010 1011 1012
#endif
}


1013 1014 1015 1016 1017 1018 1019 1020 1021
#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


1022
extern void fix_delay_key_write(THD *thd, enum_var_type type)
1023 1024 1025 1026 1027 1028 1029 1030 1031 1032 1033 1034 1035 1036 1037
{
  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;
  }
}

1038
static void fix_max_binlog_size(THD *thd, enum_var_type type)
1039 1040 1041 1042 1043
{
  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);
1044
#ifdef HAVE_REPLICATION
1045 1046
  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
1047
#endif
1048 1049 1050
  DBUG_VOID_RETURN;
}

1051
static void fix_max_relay_log_size(THD *thd, enum_var_type type)
1052 1053 1054 1055
{
  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));
1056
#ifdef HAVE_REPLICATION
1057 1058
  active_mi->rli.relay_log.set_max_size(max_relay_log_size ?
                                        max_relay_log_size: max_binlog_size);
1059
#endif
1060 1061
  DBUG_VOID_RETURN;
}
1062

1063 1064

static void fix_max_connections(THD *thd, enum_var_type type)
1065
{
1066
  resize_thr_alarm(max_connections + max_insert_delayed_threads + 10);
1067 1068
}

1069

1070 1071 1072 1073 1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086
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);
}

1087 1088
bool sys_var_long_ptr::update(THD *thd, set_var *var)
{
1089
  ulonglong tmp= var->save_result.ulonglong_value;
1090
  pthread_mutex_lock(&LOCK_global_system_variables);
1091 1092 1093 1094
  if (option_limits)
    *value= (ulong) getopt_ull_limit_value(tmp, option_limits);
  else
    *value= (ulong) tmp;
1095
  pthread_mutex_unlock(&LOCK_global_system_variables);
1096 1097 1098 1099 1100 1101 1102 1103 1104 1105
  return 0;
}


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


1106 1107
bool sys_var_ulonglong_ptr::update(THD *thd, set_var *var)
{
1108
  ulonglong tmp= var->save_result.ulonglong_value;
1109
  pthread_mutex_lock(&LOCK_global_system_variables);
1110 1111 1112 1113
  if (option_limits)
    *value= (ulonglong) getopt_ull_limit_value(tmp, option_limits);
  else
    *value= (ulonglong) tmp;
1114
  pthread_mutex_unlock(&LOCK_global_system_variables);
1115 1116 1117 1118 1119 1120
  return 0;
}


void sys_var_ulonglong_ptr::set_default(THD *thd, enum_var_type type)
{
1121
  pthread_mutex_lock(&LOCK_global_system_variables);
1122
  *value= (ulonglong) option_limits->def_value;
1123
  pthread_mutex_unlock(&LOCK_global_system_variables);
1124 1125 1126
}


1127 1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139
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;
}


1140 1141 1142 1143 1144 1145 1146
bool sys_var_enum::update(THD *thd, set_var *var)
{
  *value= (uint) var->save_result.ulong_value;
  return 0;
}


1147
byte *sys_var_enum::value_ptr(THD *thd, enum_var_type type, LEX_STRING *base)
1148 1149 1150 1151 1152
{
  return (byte*) enum_names->type_names[*value];
}


1153 1154
bool sys_var_thd_ulong::update(THD *thd, set_var *var)
{
1155
  ulonglong tmp= var->save_result.ulonglong_value;
1156 1157 1158 1159 1160 1161 1162 1163

  /* 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)
1164
    global_system_variables.*offset= (ulong) tmp;
1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182
  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;
}


1183 1184
byte *sys_var_thd_ulong::value_ptr(THD *thd, enum_var_type type,
				   LEX_STRING *base)
1185 1186 1187 1188 1189 1190 1191
{
  if (type == OPT_GLOBAL)
    return (byte*) &(global_system_variables.*offset);
  return (byte*) &(thd->variables.*offset);
}


1192 1193
bool sys_var_thd_ha_rows::update(THD *thd, set_var *var)
{
1194
  ulonglong tmp= var->save_result.ulonglong_value;
1195 1196 1197 1198 1199 1200 1201 1202 1203 1204 1205 1206 1207 1208 1209 1210 1211 1212 1213 1214 1215 1216 1217 1218 1219 1220 1221 1222 1223 1224 1225 1226 1227 1228

  /* 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;
}


1229 1230
byte *sys_var_thd_ha_rows::value_ptr(THD *thd, enum_var_type type,
				     LEX_STRING *base)
1231 1232 1233 1234 1235 1236
{
  if (type == OPT_GLOBAL)
    return (byte*) &(global_system_variables.*offset);
  return (byte*) &(thd->variables.*offset);
}

1237 1238
bool sys_var_thd_ulonglong::update(THD *thd,  set_var *var)
{
1239
  ulonglong tmp= var->save_result.ulonglong_value;
1240 1241 1242 1243 1244 1245

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

  if (option_limits)
    tmp= (ulong) getopt_ull_limit_value(tmp, option_limits);
1246
  if (var->type == OPT_GLOBAL)
1247 1248 1249
  {
    /* Lock is needed to make things safe on 32 bit systems */
    pthread_mutex_lock(&LOCK_global_system_variables);
1250
    global_system_variables.*offset= (ulonglong) tmp;
1251 1252
    pthread_mutex_unlock(&LOCK_global_system_variables);
  }
1253
  else
1254
    thd->variables.*offset= (ulonglong) tmp;
1255 1256 1257 1258 1259 1260 1261
  return 0;
}


void sys_var_thd_ulonglong::set_default(THD *thd, enum_var_type type)
{
  if (type == OPT_GLOBAL)
1262 1263
  {
    pthread_mutex_lock(&LOCK_global_system_variables);
1264
    global_system_variables.*offset= (ulonglong) option_limits->def_value;
1265 1266
    pthread_mutex_unlock(&LOCK_global_system_variables);
  }
1267 1268 1269 1270 1271
  else
    thd->variables.*offset= global_system_variables.*offset;
}


1272 1273
byte *sys_var_thd_ulonglong::value_ptr(THD *thd, enum_var_type type,
				       LEX_STRING *base)
1274 1275 1276 1277 1278 1279 1280 1281 1282 1283 1284 1285 1286 1287 1288 1289 1290 1291 1292 1293 1294 1295 1296 1297 1298 1299
{
  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;
}


1300 1301
byte *sys_var_thd_bool::value_ptr(THD *thd, enum_var_type type,
				  LEX_STRING *base)
1302 1303 1304 1305 1306 1307 1308 1309 1310
{
  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)
{
1311 1312
  char buff[80];
  const char *value;
1313
  String str(buff, sizeof(buff), system_charset_info), *res;
1314 1315 1316 1317 1318

  if (var->value->result_type() == STRING_RESULT)
  {
    if (!(res=var->value->val_str(&str)) ||
	((long) (var->save_result.ulong_value=
1319 1320
		 (ulong) find_type(enum_names, res->ptr(),
				   res->length(),1)-1)) < 0)
1321
    {
1322
      value= res ? res->c_ptr() : "NULL";
1323 1324 1325 1326 1327 1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338 1339 1340 1341 1342 1343
      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;
}

1344 1345 1346

bool sys_var::check_set(THD *thd, set_var *var, TYPELIB *enum_names)
{
1347
  bool not_used;
1348
  char buff[80], *error= 0;
1349 1350 1351 1352 1353 1354 1355
  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
1356 1357 1358 1359
    var->save_result.ulong_value= ((ulong)
				   find_set(enum_names, res->c_ptr(),
					    res->length(), &error, &error_len,
					    &not_used));
1360 1361 1362 1363 1364 1365 1366 1367 1368 1369 1370 1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383
    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;
}


1384 1385 1386 1387 1388 1389 1390
/*
  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.
1391 1392 1393 1394

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

1397
Item *sys_var::item(THD *thd, enum_var_type var_type, LEX_STRING *base)
1398 1399 1400 1401 1402
{
  if (check_type(var_type))
  {
    if (var_type != OPT_DEFAULT)
    {
monty@mysql.com's avatar
monty@mysql.com committed
1403
      net_printf(thd, ER_INCORRECT_GLOBAL_LOCAL_VAR,
1404
		 name, var_type == OPT_GLOBAL ? "LOCAL" : "GLOBAL");
1405 1406 1407 1408 1409 1410 1411
      return 0;
    }
    /* As there was no local variable, return the global value */
    var_type= OPT_GLOBAL;
  }
  switch (type()) {
  case SHOW_LONG:
1412 1413 1414 1415 1416 1417 1418
  {
    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);
  }
1419
  case SHOW_LONGLONG:
1420 1421 1422
  {
    longlong value;
    pthread_mutex_lock(&LOCK_global_system_variables);
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1423
    value= *(longlong*) value_ptr(thd, var_type, base);
1424 1425 1426
    pthread_mutex_unlock(&LOCK_global_system_variables);
    return new Item_int(value);
  }
1427
  case SHOW_HA_ROWS:
1428 1429 1430
  {
    ha_rows value;
    pthread_mutex_lock(&LOCK_global_system_variables);
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1431
    value= *(ha_rows*) value_ptr(thd, var_type, base);
1432 1433 1434
    pthread_mutex_unlock(&LOCK_global_system_variables);
    return new Item_int((longlong) value);
  }
1435
  case SHOW_MY_BOOL:
1436
    return new Item_int((int32) *(my_bool*) value_ptr(thd, var_type, base),1);
1437 1438
  case SHOW_CHAR:
  {
1439 1440
    Item_string *tmp;
    pthread_mutex_lock(&LOCK_global_system_variables);
1441
    char *str= (char*) value_ptr(thd, var_type, base);
1442 1443 1444
    tmp= new Item_string(str, strlen(str), system_charset_info);
    pthread_mutex_unlock(&LOCK_global_system_variables);
    return tmp;
1445 1446
  }
  default:
1447
    net_printf(thd, ER_VAR_CANT_BE_READ, name);
1448 1449 1450 1451 1452 1453 1454 1455 1456 1457 1458 1459 1460 1461 1462 1463 1464 1465 1466 1467 1468 1469 1470 1471
  }
  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;
}


1472 1473
byte *sys_var_thd_enum::value_ptr(THD *thd, enum_var_type type,
				  LEX_STRING *base)
1474 1475 1476 1477 1478 1479 1480 1481 1482 1483
{
  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)
{
1484
  int res= (*update_func)(thd, var);
1485 1486 1487 1488
  return res;
}


1489 1490
byte *sys_var_thd_bit::value_ptr(THD *thd, enum_var_type type,
				 LEX_STRING *base)
1491 1492 1493 1494 1495 1496 1497 1498 1499 1500 1501
{
  /*
    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;
}


1502 1503 1504 1505 1506 1507 1508 1509 1510 1511 1512 1513 1514 1515 1516 1517 1518 1519 1520 1521 1522 1523 1524 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
/* 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;
}


1608 1609
typedef struct old_names_map_st
{
1610 1611 1612
  const char *old_name;
  const char *new_name;
} my_old_conv;
1613

1614 1615
static my_old_conv old_conv[]= 
{
1616 1617 1618 1619 1620 1621 1622 1623 1624 1625 1626
  {	"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		}
1627
};
1628

1629
CHARSET_INFO *get_old_charset_by_name(const char *name)
1630
{
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1631
  my_old_conv *conv;
1632
 
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1633
  for (conv= old_conv; conv->old_name; conv++)
1634
  {
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1635 1636
    if (!my_strcasecmp(&my_charset_latin1, name, conv->old_name))
      return get_charset_by_csname(conv->new_name, MY_CS_PRIMARY, MYF(0));
1637
  }
1638
  return NULL;
1639 1640
}

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

1642
bool sys_var_collation::check(THD *thd, set_var *var)
1643 1644 1645 1646 1647 1648
{
  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
1649
    res= &my_empty_string;
1650

1651 1652
  if (!(tmp=get_charset_by_name(res->c_ptr(),MYF(0))))
  {
1653
    my_error(ER_UNKNOWN_COLLATION, MYF(0), res->c_ptr());
1654 1655 1656 1657 1658 1659
    return 1;
  }
  var->save_result.charset= tmp;	// Save for update
  return 0;
}

1660

1661 1662 1663 1664 1665 1666 1667
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)))
1668 1669 1670 1671 1672 1673 1674 1675 1676
  { 
    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
1677
	   !(tmp=get_old_charset_by_name(res->c_ptr())))
1678 1679 1680 1681 1682 1683 1684 1685
  {
    my_error(ER_UNKNOWN_CHARACTER_SET, MYF(0), res->c_ptr());
    return 1;
  }
  var->save_result.charset= tmp;	// Save for update
  return 0;
}

1686

1687
bool sys_var_character_set::update(THD *thd, set_var *var)
1688
{
1689
  ci_ptr(thd,var->type)[0]= var->save_result.charset;
bar@bar.mysql.r18.ru's avatar
bar@bar.mysql.r18.ru committed
1690
  thd->update_charset();
1691 1692 1693
  return 0;
}

1694 1695 1696

byte *sys_var_character_set::value_ptr(THD *thd, enum_var_type type,
				       LEX_STRING *base)
1697
{
1698
  CHARSET_INFO *cs= ci_ptr(thd,type)[0];
1699
  return cs ? (byte*) cs->csname : (byte*) "NULL";
1700 1701
}

1702

1703 1704
CHARSET_INFO ** sys_var_character_set_connection::ci_ptr(THD *thd,
							 enum_var_type type)
1705 1706 1707 1708 1709 1710 1711
{
  if (type == OPT_GLOBAL)
    return &global_system_variables.collation_connection;
  else
    return &thd->variables.collation_connection;
}

1712 1713 1714

void sys_var_character_set_connection::set_default(THD *thd,
						   enum_var_type type)
1715 1716 1717 1718
{
 if (type == OPT_GLOBAL)
   global_system_variables.collation_connection= default_charset_info;
 else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1719
 {
1720
   thd->variables.collation_connection= global_system_variables.collation_connection;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1721 1722
   thd->update_charset();
 }
1723 1724
}

1725

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

1735

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

1748

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1749 1750
CHARSET_INFO **
sys_var_character_set_results::ci_ptr(THD *thd, enum_var_type type)
1751
{
1752 1753
  if (type == OPT_GLOBAL)
    return &global_system_variables.character_set_results;
1754
  else
1755
    return &thd->variables.character_set_results;
1756 1757
}

1758

1759
void sys_var_character_set_results::set_default(THD *thd, enum_var_type type)
1760
{
1761
 if (type == OPT_GLOBAL)
1762
   global_system_variables.character_set_results= 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_results= (global_system_variables.
					  character_set_results);
   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_server::ci_ptr(THD *thd, enum_var_type type)
1774 1775
{
  if (type == OPT_GLOBAL)
1776
    return &global_system_variables.collation_server;
1777
  else
1778
    return &thd->variables.collation_server;
1779 1780
}

1781

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

1793 1794 1795

CHARSET_INFO ** sys_var_character_set_database::ci_ptr(THD *thd,
						       enum_var_type type)
1796 1797
{
  if (type == OPT_GLOBAL)
1798
    return &global_system_variables.collation_database;
1799
  else
1800
    return &thd->variables.collation_database;
1801 1802
}

1803

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

1815

1816
bool sys_var_collation_connection::update(THD *thd, set_var *var)
1817 1818
{
  if (var->type == OPT_GLOBAL)
1819
    global_system_variables.collation_connection= var->save_result.charset;
1820
  else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1821
  {
1822
    thd->variables.collation_connection= var->save_result.charset;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1823 1824
    thd->update_charset();
  }
1825 1826 1827
  return 0;
}

1828 1829 1830

byte *sys_var_collation_connection::value_ptr(THD *thd, enum_var_type type,
					      LEX_STRING *base)
1831 1832
{
  CHARSET_INFO *cs= ((type == OPT_GLOBAL) ?
1833 1834 1835
		  global_system_variables.collation_connection :
		  thd->variables.collation_connection);
  return cs ? (byte*) cs->name : (byte*) "NULL";
1836 1837
}

1838

1839
void sys_var_collation_connection::set_default(THD *thd, enum_var_type type)
1840 1841
{
 if (type == OPT_GLOBAL)
1842
   global_system_variables.collation_connection= default_charset_info;
1843
 else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1844 1845 1846 1847 1848
 {
   thd->variables.collation_connection= (global_system_variables.
					 collation_connection);
   thd->update_charset();
 }
1849 1850
}

1851 1852 1853 1854 1855 1856 1857 1858 1859 1860 1861 1862 1863 1864 1865 1866 1867 1868 1869 1870 1871 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
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();
 }
}

1922

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

1925
static KEY_CACHE zero_key_cache;
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
1926

1927
KEY_CACHE *get_key_cache(LEX_STRING *cache_name)
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
1928
{
1929 1930
  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
1931
    cache_name= &default_key_cache_base;
1932
  return ((KEY_CACHE*) find_named(&key_caches,
1933
                                      cache_name->str, cache_name->length, 0));
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
1934 1935
}

1936

igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
1937 1938
byte *sys_var_key_cache_param::value_ptr(THD *thd, enum_var_type type,
					 LEX_STRING *base)
1939
{
1940
  KEY_CACHE *key_cache= get_key_cache(base);
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
1941 1942 1943 1944
  if (!key_cache)
    key_cache= &zero_key_cache;
  return (byte*) key_cache + offset ;
}
1945

1946

1947 1948
bool sys_var_key_buffer_size::update(THD *thd, set_var *var)
{
1949
  ulonglong tmp= var->save_result.ulonglong_value;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1950
  LEX_STRING *base_name= &var->base;
1951
  KEY_CACHE *key_cache;
1952 1953 1954
  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
1955
  if (!base_name->length)
1956
    base_name= &default_key_cache_base;
1957 1958 1959

  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
1960
                            
1961 1962
  if (!key_cache)
  {
1963
    /* Key cache didn't exists */
1964
    if (!tmp)					// Tried to delete cache
1965 1966 1967 1968 1969 1970
      goto end;					// Ok, nothing to do
    if (!(key_cache= create_key_cache(base_name->str, base_name->length)))
    {
      error= 1;
      goto end;
    }
1971
  }
1972 1973 1974 1975 1976 1977 1978 1979 1980

  /*
    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
1981
  if (!tmp)					// Zero size means delete
1982
  {
1983 1984 1985
    if (key_cache == sql_key_cache)
      goto end;					// Ignore default key cache

1986
    if (key_cache->key_cache_inited)		// If initied
1987 1988
    {
      /*
1989 1990
	Move tables using this key cache to the default key cache
	and clear the old key cache.
1991
      */
1992
      NAMED_LIST *list; 
1993
      key_cache= (KEY_CACHE *) find_named(&key_caches, base_name->str,
1994
					      base_name->length, &list);
1995 1996 1997 1998 1999
      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;
2000
    }
2001 2002 2003 2004 2005
    /*
      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;
2006 2007
  }

2008 2009
  key_cache->param_buff_size=
    (ulonglong) getopt_ull_limit_value(tmp, option_limits);
2010

2011 2012 2013 2014
  /* If key cache didn't existed initialize it, else resize it */
  key_cache->in_init= 1;
  pthread_mutex_unlock(&LOCK_global_system_variables);

2015
  if (!key_cache->key_cache_inited)
2016
    error= (bool) (ha_init_key_cache("", key_cache));
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2017
  else
2018
    error= (bool)(ha_resize_key_cache(key_cache));
2019

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

2023 2024 2025
end:
  pthread_mutex_unlock(&LOCK_global_system_variables);
  return error;
2026 2027
}

2028 2029

bool sys_var_key_cache_long::update(THD *thd, set_var *var)
2030
{
monty@mysql.com's avatar
monty@mysql.com committed
2031
  ulong tmp= (ulong) var->value->val_int();
2032
  LEX_STRING *base_name= &var->base;
2033 2034
  bool error= 0;

2035
  if (!base_name->length)
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2036
    base_name= &default_key_cache_base;
2037 2038

  pthread_mutex_lock(&LOCK_global_system_variables);
2039
  KEY_CACHE *key_cache= get_key_cache(base_name);
2040

igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2041 2042
  if (!key_cache && !(key_cache= create_key_cache(base_name->str,
				                  base_name->length)))
2043 2044 2045 2046
  {
    error= 1;
    goto end;
  }
2047

2048 2049 2050 2051 2052 2053 2054 2055 2056
  /*
    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))=
2057
    (ulong) getopt_ull_limit_value(tmp, option_limits);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2058

2059 2060 2061 2062 2063
  /*
    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;
2064

2065
  pthread_mutex_unlock(&LOCK_global_system_variables);
2066

2067 2068 2069 2070 2071 2072 2073 2074
  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;
2075 2076
}

2077

2078 2079 2080 2081
/*****************************************************************************
  Functions to handle SET NAMES and SET CHARACTER SET
*****************************************************************************/

2082
int set_var_collation_client::check(THD *thd)
2083 2084 2085 2086
{
  return 0;
}

2087
int set_var_collation_client::update(THD *thd)
2088
{
2089 2090
  thd->variables.character_set_client= character_set_client;
  thd->variables.character_set_results= character_set_results;
2091
  thd->variables.collation_connection= collation_connection;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2092
  thd->update_charset();
2093 2094 2095 2096 2097 2098 2099
  thd->protocol_simple.init(thd);
  thd->protocol_prep.init(thd);
  return 0;
}

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

2100 2101
bool sys_var_timestamp::update(THD *thd,  set_var *var)
{
2102
  thd->set_time((time_t) var->save_result.ulonglong_value);
2103 2104 2105 2106 2107 2108 2109 2110 2111 2112
  return 0;
}


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


2113 2114
byte *sys_var_timestamp::value_ptr(THD *thd, enum_var_type type,
				   LEX_STRING *base)
2115 2116 2117 2118 2119 2120 2121 2122
{
  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)
{
2123
  thd->insert_id(var->save_result.ulonglong_value);
2124 2125 2126 2127
  return 0;
}


2128 2129
byte *sys_var_last_insert_id::value_ptr(THD *thd, enum_var_type type,
					LEX_STRING *base)
2130 2131 2132 2133 2134 2135 2136 2137
{
  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)
{
2138
  thd->next_insert_id= var->save_result.ulonglong_value;
2139 2140 2141 2142
  return 0;
}


2143 2144
byte *sys_var_insert_id::value_ptr(THD *thd, enum_var_type type,
				   LEX_STRING *base)
2145 2146 2147 2148
{
  return (byte*) &thd->current_insert_id;
}

2149 2150
bool sys_var_pseudo_thread_id::check(THD *thd, set_var *var)
{
2151
  var->save_result.ulonglong_value= var->value->val_int();
hf@deer.(none)'s avatar
hf@deer.(none) committed
2152
#ifndef NO_EMBEDDED_ACCESS_CHECKS
2153 2154 2155 2156 2157 2158 2159
  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
2160 2161 2162
#else
  return 0;
#endif
2163 2164
}

2165

hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
2166
#ifdef HAVE_REPLICATION
2167 2168
bool sys_var_slave_skip_counter::check(THD *thd, set_var *var)
{
2169
  int result= 0;
2170 2171 2172 2173 2174 2175 2176 2177 2178
  LOCK_ACTIVE_MI;
  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);
  UNLOCK_ACTIVE_MI;
2179
  var->save_result.ulong_value= (ulong) var->value->val_int();
2180 2181 2182 2183 2184 2185 2186 2187 2188 2189 2190 2191 2192 2193 2194 2195
  return result;
}


bool sys_var_slave_skip_counter::update(THD *thd, set_var *var)
{
  LOCK_ACTIVE_MI;
  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);
2196
    active_mi->rli.slave_skip_counter= var->save_result.ulong_value;
2197 2198 2199 2200 2201 2202
    pthread_mutex_unlock(&active_mi->rli.data_lock);
  }
  pthread_mutex_unlock(&active_mi->rli.run_lock);
  UNLOCK_ACTIVE_MI;
  return 0;
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
2203
#endif /* HAVE_REPLICATION */
2204

2205 2206
bool sys_var_rand_seed1::update(THD *thd, set_var *var)
{
2207
  thd->rand.seed1= (ulong) var->save_result.ulonglong_value;
2208 2209 2210 2211 2212
  return 0;
}

bool sys_var_rand_seed2::update(THD *thd, set_var *var)
{
2213
  thd->rand.seed2= (ulong) var->save_result.ulonglong_value;
2214 2215 2216 2217
  return 0;
}


2218 2219 2220 2221 2222 2223
/*
  Functions to update thd->options bits
*/

static bool set_option_bit(THD *thd, set_var *var)
{
2224 2225 2226
  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;
2227
  else
2228
    thd->options|= sys_var->bit_flag;
2229 2230 2231 2232 2233 2234 2235 2236 2237 2238 2239 2240 2241 2242 2243 2244 2245 2246 2247 2248 2249 2250 2251 2252 2253 2254 2255 2256 2257 2258 2259 2260 2261 2262 2263 2264 2265 2266 2267 2268 2269 2270 2271 2272
  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;
}

2273 2274 2275 2276 2277 2278 2279 2280 2281 2282 2283 2284 2285 2286 2287
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;
}

2288 2289 2290 2291 2292 2293 2294 2295 2296 2297 2298 2299 2300 2301 2302 2303 2304 2305 2306 2307 2308 2309 2310 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

/****************************************************************************
  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()
{
2347 2348
  hash_init(&system_variable_hash, system_charset_info,
	    array_elements(sys_variables),0,0,
2349
	    (hash_get_key) get_sys_var_length,0,0);
2350 2351 2352 2353 2354 2355 2356
  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
2357
    my_hash_insert(&system_variable_hash, (byte*) *var);
2358 2359 2360 2361 2362 2363 2364 2365 2366 2367 2368 2369 2370 2371 2372 2373 2374 2375 2376 2377 2378 2379 2380 2381 2382 2383 2384 2385 2386 2387 2388 2389 2390 2391
  }
  /*
    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)
*/

2392
sys_var *find_sys_var(const char *str, uint length)
2393
{
2394 2395
  sys_var *var= (sys_var*) hash_search(&system_variable_hash,
				       (byte*) str,
2396 2397 2398
				       length ? length :
				       strlen(str));
  if (!var)
2399
    net_printf(current_thd, ER_UNKNOWN_SYSTEM_VARIABLE, (char*) str);
2400 2401 2402 2403 2404 2405 2406 2407 2408 2409 2410 2411 2412 2413 2414 2415 2416 2417 2418 2419 2420 2421
  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
2422 2423
    1	ERROR, message sent (normally no variables was updated)
    -1  ERROR, message not sent
2424 2425
*/

2426
int sql_set_variables(THD *thd, List<set_var_base> *var_list)
2427
{
2428
  int error= 0;
2429
  List_iterator_fast<set_var_base> it(*var_list);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2430
  DBUG_ENTER("sql_set_variables");
2431 2432 2433 2434

  set_var_base *var;
  while ((var=it++))
  {
2435
    if ((error=var->check(thd)))
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2436
      DBUG_RETURN(error);
2437
  }
2438 2439
  if (thd->net.report_error)
    DBUG_RETURN(1);
2440 2441
  it.rewind();
  while ((var=it++))
2442
    error|= var->update(thd);			// Returns 0, -1 or 1
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2443
  DBUG_RETURN(error);
2444 2445 2446 2447 2448 2449 2450
}


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

2451
int set_var::check(THD *thd)
2452 2453 2454 2455 2456 2457
{
  if (var->check_type(type))
  {
    my_error(type == OPT_GLOBAL ? ER_LOCAL_VARIABLE : ER_GLOBAL_VARIABLE,
	     MYF(0),
	     var->name);
2458
    return -1;
2459 2460 2461 2462 2463 2464 2465 2466 2467
  }
  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);
2468
      return -1;
2469 2470 2471 2472
    }
    return 0;
  }

2473
  if (value->fix_fields(thd, 0, &value) || value->check_cols(1))
2474
    return -1;
2475 2476 2477
  if (var->check_update_type(value->result_type()))
  {
    my_error(ER_WRONG_TYPE_FOR_VAR, MYF(0), var->name);
2478
    return -1;
2479
  }
2480
  return var->check(thd, this) ? -1 : 0;
2481 2482 2483
}


2484
int set_var::update(THD *thd)
2485 2486 2487 2488
{
  if (!value)
    var->set_default(thd, type);
  else if (var->update(thd, this))
2489
    return -1;				// should never happen
2490 2491 2492 2493 2494 2495 2496 2497 2498 2499
  if (var->after_update)
    (*var->after_update)(thd, type);
  return 0;
}


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

2500
int set_var_user::check(THD *thd)
2501
{
bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
2502 2503 2504 2505 2506
  /*
    Item_func_set_user_var can't substitute something else on its place =>
    0 can be passed as last argument
  */
  return (user_var_item->fix_fields(thd, 0, (Item**) 0) ||
2507
	  user_var_item->check()) ? -1 : 0;
2508 2509 2510
}


2511
int set_var_user::update(THD *thd)
2512 2513 2514 2515
{
  if (user_var_item->update())
  {
    /* Give an error if it's not given already */
2516 2517
    my_error(ER_SET_CONSTANTS_ONLY, MYF(0));
    return -1;
2518 2519 2520 2521 2522 2523 2524 2525 2526
  }
  return 0;
}


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

2527
int set_var_password::check(THD *thd)
2528
{
hf@deer.(none)'s avatar
hf@deer.(none) committed
2529
#ifndef NO_EMBEDDED_ACCESS_CHECKS
2530 2531
  if (!user->host.str)
    user->host.str= (char*) thd->host_or_ip;
2532 2533
  /* 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
2534 2535 2536
#else 
  return 0;
#endif
2537 2538
}

2539
int set_var_password::update(THD *thd)
2540
{
hf@deer.(none)'s avatar
hf@deer.(none) committed
2541
#ifndef NO_EMBEDDED_ACCESS_CHECKS
2542 2543 2544
  /* 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
2545 2546 2547
#else
  return 0;
#endif
2548 2549
}

2550 2551 2552 2553
/****************************************************************************
 Functions to handle table_type
****************************************************************************/

2554 2555
/* Based upon sys_var::check_enum() */

2556
bool sys_var_thd_storage_engine::check(THD *thd, set_var *var)
2557 2558 2559 2560 2561 2562 2563 2564 2565 2566 2567 2568 2569 2570 2571 2572
{
  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
2573
  value= "unknown";
2574 2575

err:
2576
  my_error(ER_UNKNOWN_STORAGE_ENGINE, MYF(0), value);
2577 2578 2579
  return 1;    
}

2580

2581 2582
byte *sys_var_thd_storage_engine::value_ptr(THD *thd, enum_var_type type,
					    LEX_STRING *base)
2583 2584 2585 2586
{
  ulong val;
  val= ((type == OPT_GLOBAL) ? global_system_variables.*offset :
        thd->variables.*offset);
2587
  const char *table_type= ha_get_storage_engine((enum db_type)val);
2588
  return (byte *) table_type;
2589 2590
}

2591

2592
void sys_var_thd_storage_engine::set_default(THD *thd, enum_var_type type)
2593 2594 2595 2596 2597 2598 2599
{
  if (type == OPT_GLOBAL)
    global_system_variables.*offset= (ulong) DB_TYPE_MYISAM;
  else
    thd->variables.*offset= (ulong) (global_system_variables.*offset);
}

2600

2601
bool sys_var_thd_storage_engine::update(THD *thd, set_var *var)
2602 2603 2604 2605 2606 2607 2608 2609
{
  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;
}

2610 2611 2612 2613 2614 2615 2616 2617 2618 2619 2620 2621 2622 2623 2624 2625 2626 2627 2628
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);
}

2629

2630 2631 2632
/****************************************************************************
 Functions to handle sql_mode
****************************************************************************/
2633

2634 2635
byte *sys_var_thd_sql_mode::value_ptr(THD *thd, enum_var_type type,
				      LEX_STRING *base)
2636 2637 2638 2639 2640 2641 2642 2643 2644 2645 2646 2647 2648 2649 2650 2651 2652 2653 2654 2655 2656 2657 2658 2659 2660 2661 2662 2663 2664 2665 2666 2667 2668 2669 2670 2671 2672 2673 2674 2675
{
  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 */
2676

2677 2678 2679 2680 2681 2682 2683 2684 2685 2686 2687 2688 2689 2690 2691 2692 2693 2694 2695 2696 2697 2698 2699 2700 2701 2702 2703 2704 2705 2706 2707
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);
2708
  if (sql_mode & MODE_MAXDB)
2709 2710 2711 2712 2713 2714 2715 2716 2717 2718
    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;
}
2719 2720


2721 2722 2723 2724
/****************************************************************************
  Named list handling
****************************************************************************/

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2725 2726
gptr find_named(I_List<NAMED_LIST> *list, const char *name, uint length,
		NAMED_LIST **found)
2727 2728 2729 2730 2731 2732
{
  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
2733
    {
2734 2735
      if (found)
        *found= element;
2736
      return element->data;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2737
    }
2738 2739 2740 2741 2742
  }
  return 0;
}


2743 2744
void delete_elements(I_List<NAMED_LIST> *list,
		     void (*free_element)(const char *name, gptr))
2745 2746
{
  NAMED_LIST *element;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2747
  DBUG_ENTER("delete_elements");
2748 2749
  while ((element= list->get()))
  {
2750
    (*free_element)(element->name, element->data);
2751 2752
    delete element;
  }
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2753
  DBUG_VOID_RETURN;
2754 2755 2756 2757 2758
}


/* Key cache functions */

2759
static KEY_CACHE *create_key_cache(const char *name, uint length)
2760
{
2761
  KEY_CACHE *key_cache;
2762 2763 2764
  DBUG_ENTER("create_key_cache");
  DBUG_PRINT("enter",("name: %.*s", length, name));
  
2765
  if ((key_cache= (KEY_CACHE*) my_malloc(sizeof(KEY_CACHE),
2766
					     MYF(MY_ZEROFILL | MY_WME))))
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2767 2768
  {
    if (!new NAMED_LIST(&key_caches, name, length, (gptr) key_cache))
2769 2770
    {
      my_free((char*) key_cache, MYF(0));
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2771
      key_cache= 0;
2772 2773 2774 2775 2776 2777 2778 2779 2780
    }
    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
      */
2781 2782 2783
      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;
2784
    }
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2785
  }
2786
  DBUG_RETURN(key_cache);
2787 2788 2789
}


2790
KEY_CACHE *get_or_create_key_cache(const char *name, uint length)
2791
{
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2792
  LEX_STRING key_cache_name;
2793
  KEY_CACHE *key_cache;
2794

igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2795 2796
  key_cache_name.str= (char *) name;
  key_cache_name.length= length;
2797 2798
  pthread_mutex_lock(&LOCK_global_system_variables);
  if (!(key_cache= get_key_cache(&key_cache_name)))
2799
    key_cache= create_key_cache(name, length);
2800
  pthread_mutex_unlock(&LOCK_global_system_variables);
2801 2802 2803 2804
  return key_cache;
}


2805
void free_key_cache(const char *name, KEY_CACHE *key_cache)
2806
{
2807 2808
  ha_end_key_cache(key_cache);
  my_free((char*) key_cache, MYF(0));
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2809 2810 2811
}


2812
bool process_key_caches(int (* func) (const char *name, KEY_CACHE *))
2813
{
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2814 2815
  I_List_iterator<NAMED_LIST> it(key_caches);
  NAMED_LIST *element;
2816

igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2817 2818
  while ((element= it++))
  {
2819
    KEY_CACHE *key_cache= (KEY_CACHE *) element->data;
2820
    func(element->name, key_cache);
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2821 2822
  }
  return 0;
2823 2824
}

2825

2826 2827 2828 2829 2830 2831
/****************************************************************************
  Used templates
****************************************************************************/

#ifdef __GNUC__
template class List<set_var_base>;
2832
template class List_iterator_fast<set_var_base>;
2833
template class I_List_iterator<NAMED_LIST>;
2834
#endif