set_var.cc 97.2 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
  - If the variable should show up in 'show variables' add it to the
    init_vars[] struct in this file

37 38 39 40 41 42
  NOTES:
    - Be careful with var->save_result: sys_var::check() only updates
    ulonglong_value; so other members of the union are garbage then; to use
    them you must first assign a value to them (in specific ::check() for
    example).

43 44 45 46 47 48 49 50 51 52 53 54 55
  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"
56
#include <mysql.h>
57 58 59
#include "slave.h"
#include "sql_acl.h"
#include <my_getopt.h>
60
#include <thr_alarm.h>
61 62 63 64 65 66 67
#include <myisam.h>
#ifdef HAVE_BERKELEY_DB
#include "ha_berkeley.h"
#endif
#ifdef HAVE_INNOBASE_DB
#include "ha_innodb.h"
#endif
68 69 70
#ifdef HAVE_NDBCLUSTER_DB
#include "ha_ndbcluster.h"
#endif
71 72 73 74 75

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

79 80 81
const char *delay_key_write_type_names[]= { "OFF", "ON", "ALL", NullS };
TYPELIB delay_key_write_typelib=
{
82 83
  array_elements(delay_key_write_type_names)-1, "",
  delay_key_write_type_names, NULL
84 85
};

86
static int  sys_check_charset(THD *thd, set_var *var);
87 88
static bool sys_update_charset(THD *thd, set_var *var);
static void sys_set_default_charset(THD *thd, enum_var_type type);
89
static int  sys_check_ftb_syntax(THD *thd,  set_var *var);
90 91
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
92 93 94 95
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);
96 97
static bool set_option_bit(THD *thd, set_var *var);
static bool set_option_autocommit(THD *thd, set_var *var);
98
static int  check_log_update(THD *thd, set_var *var);
99
static bool set_log_update(THD *thd, set_var *var);
100
static int  check_pseudo_thread_id(THD *thd, set_var *var);
101 102 103 104
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);
105
static void fix_net_retry_count(THD *thd, enum_var_type type);
106 107
static void fix_max_join_size(THD *thd, enum_var_type type);
static void fix_query_cache_size(THD *thd, enum_var_type type);
108
static void fix_query_cache_min_res_unit(THD *thd, enum_var_type type);
109 110
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);
111 112
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);
113
static void fix_max_connections(THD *thd, enum_var_type type);
114
static int check_max_delayed_threads(THD *thd, set_var *var);
115 116
static void fix_thd_mem_root(THD *thd, enum_var_type type);
static void fix_trans_mem_root(THD *thd, enum_var_type type);
117
static void fix_server_id(THD *thd, enum_var_type type);
118
static KEY_CACHE *create_key_cache(const char *name, uint length);
119
void fix_sql_mode_var(THD *thd, enum_var_type type);
120 121
static byte *get_error_count(THD *thd);
static byte *get_warning_count(THD *thd);
122 123 124 125 126 127 128 129 130 131 132 133

/*
  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);
134 135
sys_var_character_set_server	sys_character_set_server("character_set_server");
sys_var_str			sys_charset_system("character_set_system",
136 137
				    sys_check_charset,
				    sys_update_charset,
138 139
				    sys_set_default_charset,
                                    (char *)my_charset_utf8_general_ci.name);
140
sys_var_character_set_database	sys_character_set_database("character_set_database");
141
sys_var_character_set_client  sys_character_set_client("character_set_client");
142
sys_var_character_set_connection  sys_character_set_connection("character_set_connection");
143
sys_var_character_set_results sys_character_set_results("character_set_results");
144
sys_var_collation_connection sys_collation_connection("collation_connection");
145 146
sys_var_collation_database sys_collation_database("collation_database");
sys_var_collation_server sys_collation_server("collation_server");
147 148 149 150
sys_var_bool_ptr	sys_concurrent_insert("concurrent_insert",
					      &myisam_concurrent_insert);
sys_var_long_ptr	sys_connect_timeout("connect_timeout",
					    &connect_timeout);
151 152 153 154
sys_var_enum		sys_delay_key_write("delay_key_write",
					    &delay_key_write_options,
					    &delay_key_write_typelib,
					    fix_delay_key_write);
155 156 157 158 159 160
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);
161 162
sys_var_long_ptr	sys_expire_logs_days("expire_logs_days",
					     &expire_logs_days);
163 164
sys_var_bool_ptr	sys_flush("flush", &myisam_flush);
sys_var_long_ptr	sys_flush_time("flush_time", &flush_time);
165 166 167
sys_var_str             sys_ft_boolean_syntax("ft_boolean_syntax",
                                         sys_check_ftb_syntax,
                                         sys_update_ftb_syntax,
168 169
                                         sys_default_ftb_syntax,
                                         ft_boolean_syntax);
170 171
sys_var_str             sys_init_connect("init_connect", 0,
                                         sys_update_init_connect,
172
                                         sys_default_init_connect,0);
173 174
sys_var_str             sys_init_slave("init_slave", 0,
                                       sys_update_init_slave,
175
                                       sys_default_init_slave,0);
176 177 178 179
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);
180
sys_var_key_buffer_size	sys_key_buffer_size("key_buffer_size");
181
sys_var_key_cache_long  sys_key_cache_block_size("key_cache_block_size",
182 183
						 offsetof(KEY_CACHE,
							  param_block_size));
184
sys_var_key_cache_long	sys_key_cache_division_limit("key_cache_division_limit",
185 186
						     offsetof(KEY_CACHE,
							      param_division_limit));
187
sys_var_key_cache_long  sys_key_cache_age_threshold("key_cache_age_threshold",
188 189
						     offsetof(KEY_CACHE,
							      param_age_threshold));
190 191
sys_var_bool_ptr	sys_local_infile("local_infile",
					 &opt_local_infile);
192
sys_var_thd_ulong	sys_log_warnings("log_warnings", &SV::log_warnings);
193 194 195 196 197 198 199 200 201 202 203 204 205 206 207
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",
208 209
					    &max_binlog_size,
                                            fix_max_binlog_size);
210
sys_var_long_ptr	sys_max_connections("max_connections",
211 212
					    &max_connections,
                                            fix_max_connections);
213 214
sys_var_long_ptr	sys_max_connect_errors("max_connect_errors",
					       &max_connect_errors);
215
sys_var_thd_ulong       sys_max_insert_delayed_threads("max_insert_delayed_threads",
216 217 218
						       &SV::max_insert_delayed_threads,
                                                       check_max_delayed_threads,
                                                       fix_max_connections);
219 220
sys_var_thd_ulong	sys_max_delayed_threads("max_delayed_threads",
						&SV::max_insert_delayed_threads,
221 222
                                                check_max_delayed_threads,
                                                fix_max_connections);
223 224
sys_var_thd_ulong	sys_max_error_count("max_error_count",
					    &SV::max_error_count);
225 226
sys_var_thd_ulong	sys_max_heap_table_size("max_heap_table_size",
						&SV::max_heap_table_size);
227 228 229
sys_var_thd_ulong       sys_pseudo_thread_id("pseudo_thread_id",
					     &SV::pseudo_thread_id,
                                             check_pseudo_thread_id, 0);
230
sys_var_thd_ha_rows	sys_max_join_size("max_join_size",
231 232
					  &SV::max_join_size,
					  fix_max_join_size);
233 234
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
235
sys_var_thd_ulong   sys_max_length_for_sort_data("max_length_for_sort_data",
236
                                                 &SV::max_length_for_sort_data);
237
#ifndef TO_BE_DELETED	/* Alias for max_join_size */
238
sys_var_thd_ha_rows	sys_sql_max_join_size("sql_max_join_size",
239 240 241
					      &SV::max_join_size,
					      fix_max_join_size);
#endif
242 243 244
sys_var_long_ptr	sys_max_relay_log_size("max_relay_log_size",
                                               &max_relay_log_size,
                                               fix_max_relay_log_size);
245 246 247 248 249 250 251 252
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);
serg@serg.mylan's avatar
serg@serg.mylan committed
253 254
sys_var_long_ptr	sys_myisam_data_pointer_size("myisam_data_pointer_size",
                                                    &myisam_data_pointer_size);
255 256
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);
257
sys_var_thd_ulong       sys_myisam_repair_threads("myisam_repair_threads", &SV::myisam_repair_threads);
258 259 260 261 262
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,
263
					     0, fix_net_read_timeout);
264 265
sys_var_thd_ulong	sys_net_write_timeout("net_write_timeout",
					      &SV::net_write_timeout,
266
					      0, fix_net_write_timeout);
267 268
sys_var_thd_ulong	sys_net_retry_count("net_retry_count",
					    &SV::net_retry_count,
269
					    0, fix_net_retry_count);
270
sys_var_thd_bool	sys_new_mode("new", &SV::new_mode);
271
sys_var_thd_bool	sys_old_passwords("old_passwords", &SV::old_passwords);
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
272 273
sys_var_thd_ulong       sys_preload_buff_size("preload_buffer_size",
                                              &SV::preload_buff_size);
274 275
sys_var_thd_ulong	sys_read_buff_size("read_buffer_size",
					   &SV::read_buff_size);
276
sys_var_bool_ptr	sys_readonly("read_only", &opt_readonly);
277 278
sys_var_thd_ulong	sys_read_rnd_buff_size("read_rnd_buffer_size",
					       &SV::read_rnd_buff_size);
279 280 281 282
#ifdef HAVE_REPLICATION
sys_var_bool_ptr	sys_relay_log_purge("relay_log_purge",
                                            &relay_log_purge);
#endif
283 284 285 286 287
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);
288 289 290 291

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",
292
						   &SV::query_alloc_block_size,
293
						   0, fix_thd_mem_root);
294
sys_var_thd_ulong	sys_query_prealloc_size("query_prealloc_size",
295
						&SV::query_prealloc_size,
296
						0, fix_thd_mem_root);
297
sys_var_thd_ulong	sys_trans_alloc_block_size("transaction_alloc_block_size",
298
						   &SV::trans_alloc_block_size,
299
						   0, fix_trans_mem_root);
300
sys_var_thd_ulong	sys_trans_prealloc_size("transaction_prealloc_size",
301
						&SV::trans_prealloc_size,
302
						0, fix_trans_mem_root);
303

304 305 306
#ifdef HAVE_QUERY_CACHE
sys_var_long_ptr	sys_query_cache_limit("query_cache_limit",
					      &query_cache.query_cache_limit);
307 308 309
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);
310 311 312
sys_var_thd_enum	sys_query_cache_type("query_cache_type",
					     &SV::query_cache_type,
					     &query_cache_type_typelib);
313 314 315
sys_var_thd_bool
sys_query_cache_wlock_invalidate("query_cache_wlock_invalidate",
				 &SV::query_cache_wlock_invalidate);
316
#endif /* HAVE_QUERY_CACHE */
317
sys_var_bool_ptr	sys_secure_auth("secure_auth", &opt_secure_auth);
318
sys_var_long_ptr	sys_server_id("server_id", &server_id, fix_server_id);
319 320
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
321
#ifdef HAVE_REPLICATION
322 323
sys_var_long_ptr	sys_slave_net_timeout("slave_net_timeout",
					      &slave_net_timeout);
324
#endif
325 326 327 328
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);
329 330
sys_var_thd_sql_mode    sys_sql_mode("sql_mode",
                                     &SV::sql_mode);
331 332
sys_var_thd_table_type  sys_table_type("table_type",
				       &SV::table_type);
333 334
sys_var_thd_storage_engine sys_storage_engine("storage_engine",
				       &SV::table_type);
335 336 337 338
#ifdef HAVE_REPLICATION
sys_var_sync_binlog_period sys_sync_binlog_period("sync_binlog", &sync_binlog_period);
#endif
sys_var_bool_ptr	sys_sync_frm("sync_frm", &opt_sync_frm);
339 340 341 342 343 344 345 346 347 348 349 350
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);
351

352 353 354
#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);
355 356
sys_var_long_ptr	sys_innodb_max_purge_lag("innodb_max_purge_lag",
							&srv_max_purge_lag);
357 358
sys_var_thd_bool	sys_innodb_table_locks("innodb_table_locks",
                                               &SV::innodb_table_locks);
359 360
sys_var_long_ptr	sys_innodb_autoextend_increment("innodb_autoextend_increment",
							&srv_auto_extend_increment);
361
#endif
362 363 364 365 366

/* Time/date/datetime formats */

sys_var_thd_date_time_format sys_time_format("time_format",
					     &SV::time_format,
367
					     MYSQL_TIMESTAMP_TIME);
368 369
sys_var_thd_date_time_format sys_date_format("date_format",
					     &SV::date_format,
370
					     MYSQL_TIMESTAMP_DATE);
371 372
sys_var_thd_date_time_format sys_datetime_format("datetime_format",
						 &SV::datetime_format,
373
						 MYSQL_TIMESTAMP_DATETIME);
374 375

/* Variables that are bits in THD */
376

377
static sys_var_thd_bit	sys_autocommit("autocommit", 0,
378 379 380
				       set_option_autocommit,
				       OPTION_NOT_AUTOCOMMIT,
				       1);
381
static sys_var_thd_bit	sys_big_tables("big_tables", 0,
382 383 384
				       set_option_bit,
				       OPTION_BIG_TABLES);
#ifndef TO_BE_DELETED	/* Alias for big_tables */
385
static sys_var_thd_bit	sys_sql_big_tables("sql_big_tables", 0,
386 387 388
					   set_option_bit,
					   OPTION_BIG_TABLES);
#endif
389
static sys_var_thd_bit	sys_big_selects("sql_big_selects", 0,
390
					set_option_bit,
391
					OPTION_BIG_SELECTS);
392
static sys_var_thd_bit	sys_log_off("sql_log_off", 0,
393 394 395
				    set_option_bit,
				    OPTION_LOG_OFF);
static sys_var_thd_bit	sys_log_update("sql_log_update",
396
                                       check_log_update,
397 398 399
				       set_log_update,
				       OPTION_UPDATE_LOG);
static sys_var_thd_bit	sys_log_binlog("sql_log_bin",
400 401 402 403
                                       check_log_update,
                                       set_log_update,
                                       OPTION_BIN_LOG);
static sys_var_thd_bit	sys_sql_warnings("sql_warnings", 0,
404 405
					 set_option_bit,
					 OPTION_WARNINGS);
406
static sys_var_thd_bit	sys_auto_is_null("sql_auto_is_null", 0,
407 408
					 set_option_bit,
					 OPTION_AUTO_IS_NULL);
409
static sys_var_thd_bit	sys_safe_updates("sql_safe_updates", 0,
410 411
					 set_option_bit,
					 OPTION_SAFE_UPDATES);
412
static sys_var_thd_bit	sys_buffer_results("sql_buffer_result", 0,
413 414
					   set_option_bit,
					   OPTION_BUFFER_RESULT);
415
static sys_var_thd_bit	sys_quote_show_create("sql_quote_show_create", 0,
416 417
					      set_option_bit,
					      OPTION_QUOTE_SHOW_CREATE);
418
static sys_var_thd_bit	sys_foreign_key_checks("foreign_key_checks", 0,
419 420 421
					       set_option_bit,
					       OPTION_NO_FOREIGN_KEY_CHECKS,
					       1);
422
static sys_var_thd_bit	sys_unique_checks("unique_checks", 0,
423 424 425 426
					  set_option_bit,
					  OPTION_RELAXED_UNIQUE_CHECKS,
					  1);

427 428
/* Local state variables */

429
static sys_var_thd_ha_rows	sys_select_limit("sql_select_limit",
430 431 432 433 434
						 &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");
435 436 437 438 439 440 441 442 443
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);

444
/* alias for last_insert_id() to be compatible with Sybase */
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
445
#ifdef HAVE_REPLICATION
446
static sys_var_slave_skip_counter sys_slave_skip_counter("sql_slave_skip_counter");
447
#endif
448 449
static sys_var_rand_seed1	sys_rand_seed1("rand_seed1");
static sys_var_rand_seed2	sys_rand_seed2("rand_seed2");
450

451 452
static sys_var_thd_ulong        sys_default_week_format("default_week_format",
					                &SV::default_week_format);
453

454 455 456
sys_var_thd_ulong               sys_group_concat_max_len("group_concat_max_len",
                                                         &SV::group_concat_max_len);

457
sys_var_thd_time_zone            sys_time_zone("time_zone");
458 459 460 461

/* Read only variables */

sys_var_const_str		sys_os("version_compile_os", SYSTEM_TYPE);
462
/* Global read-only variable describing server license */
463
sys_var_const_str		sys_license("license", STRINGIFY_ARG(LICENSE));
464

465

466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482
/*
  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,
483 484
  &sys_character_set_server,
  &sys_character_set_database,
485
  &sys_character_set_client,
486
  &sys_character_set_connection,
487
  &sys_character_set_results,
488
  &sys_collation_connection,
489 490
  &sys_collation_database,
  &sys_collation_server,
491 492
  &sys_concurrent_insert,
  &sys_connect_timeout,
493 494
  &sys_date_format,
  &sys_datetime_format,
495
  &sys_default_week_format,
496 497 498 499
  &sys_delay_key_write,
  &sys_delayed_insert_limit,
  &sys_delayed_insert_timeout,
  &sys_delayed_queue_size,
500
  &sys_error_count,
501
  &sys_expire_logs_days,
502 503
  &sys_flush,
  &sys_flush_time,
504
  &sys_ft_boolean_syntax,
505
  &sys_foreign_key_checks,
506
  &sys_group_concat_max_len,
507
  &sys_identity,
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
508 509
  &sys_init_connect,
  &sys_init_slave,
510 511 512 513
  &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
514
  &sys_key_cache_block_size,
515 516
  &sys_key_cache_division_limit,
  &sys_key_cache_age_threshold,
517
  &sys_last_insert_id,
518
  &sys_license,
519 520 521 522 523 524 525 526 527 528 529 530 531
  &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,
532
  &sys_max_error_count,
533
  &sys_max_insert_delayed_threads,
534 535
  &sys_max_heap_table_size,
  &sys_max_join_size,
igor@hundin.mysql.fi's avatar
igor@hundin.mysql.fi committed
536
  &sys_max_length_for_sort_data,
537
  &sys_max_relay_log_size,
538
  &sys_max_seeks_for_key,
539 540 541 542
  &sys_max_sort_length,
  &sys_max_tmp_tables,
  &sys_max_user_connections,
  &sys_max_write_lock_count,
serg@serg.mylan's avatar
serg@serg.mylan committed
543
  &sys_myisam_data_pointer_size,
544 545
  &sys_myisam_max_extra_sort_file_size,
  &sys_myisam_max_sort_file_size,
546
  &sys_myisam_repair_threads,
547 548 549
  &sys_myisam_sort_buffer_size,
  &sys_net_buffer_length,
  &sys_net_read_timeout,
550
  &sys_net_retry_count,
551 552
  &sys_net_wait_timeout,
  &sys_net_write_timeout,
553
  &sys_new_mode,
554
  &sys_old_passwords,
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
555
  &sys_preload_buff_size,
556
  &sys_pseudo_thread_id,
557
  &sys_query_alloc_block_size,
558
  &sys_query_cache_size,
559
  &sys_query_prealloc_size,
560 561
#ifdef HAVE_QUERY_CACHE
  &sys_query_cache_limit,
562
  &sys_query_cache_min_res_unit,
563
  &sys_query_cache_type,
564
  &sys_query_cache_wlock_invalidate,
565
#endif /* HAVE_QUERY_CACHE */
566
  &sys_quote_show_create,
567 568
  &sys_rand_seed1,
  &sys_rand_seed2,
569
  &sys_range_alloc_block_size,
570
  &sys_readonly,
571 572
  &sys_read_buff_size,
  &sys_read_rnd_buff_size,
573 574 575
#ifdef HAVE_REPLICATION
  &sys_relay_log_purge,
#endif
576 577
  &sys_rpl_recovery_rank,
  &sys_safe_updates,
578
  &sys_secure_auth,
579 580
  &sys_select_limit,
  &sys_server_id,
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
581
#ifdef HAVE_REPLICATION
582
  &sys_slave_compressed_protocol,
583 584
  &sys_slave_net_timeout,
  &sys_slave_skip_counter,
585
#endif
586 587 588 589 590
  &sys_slow_launch_time,
  &sys_sort_buffer,
  &sys_sql_big_tables,
  &sys_sql_low_priority_updates,
  &sys_sql_max_join_size,
591
  &sys_sql_mode,
592
  &sys_sql_warnings,
593
  &sys_storage_engine,
594 595 596 597
#ifdef HAVE_REPLICATION
  &sys_sync_binlog_period,
#endif
  &sys_sync_frm,
598 599 600
  &sys_table_cache_size,
  &sys_table_type,
  &sys_thread_cache_size,
601
  &sys_time_format,
602
  &sys_timestamp,
603
  &sys_time_zone,
604
  &sys_tmp_table_size,
605 606
  &sys_trans_alloc_block_size,
  &sys_trans_prealloc_size,
607
  &sys_tx_isolation,
608
  &sys_os,
609 610
#ifdef HAVE_INNOBASE_DB
  &sys_innodb_max_dirty_pages_pct,
611
  &sys_innodb_max_purge_lag,
612
  &sys_innodb_table_locks,
613
  &sys_innodb_max_purge_lag,
614
  &sys_innodb_autoextend_increment,
615
#endif    
616 617
  &sys_unique_checks,
  &sys_warning_count
618 619 620 621 622 623 624 625 626 627 628 629 630
};


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

struct show_var_st init_vars[]= {
  {"back_log",                (char*) &back_log,                    SHOW_LONG},
  {"basedir",                 mysql_home,                           SHOW_CHAR},
#ifdef HAVE_BERKELEY_DB
  {"bdb_cache_size",          (char*) &berkeley_cache_size,         SHOW_LONG},
  {"bdb_home",                (char*) &berkeley_home,               SHOW_CHAR_PTR},
631
  {"bdb_log_buffer_size",     (char*) &berkeley_log_buffer_size,    SHOW_LONG},
632
  {"bdb_logdir",              (char*) &berkeley_logdir,             SHOW_CHAR_PTR},
633
  {"bdb_max_lock",            (char*) &berkeley_max_lock,	    SHOW_LONG},
634 635 636 637 638
  {"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},
639
  {sys_character_set_client.name,(char*) &sys_character_set_client, SHOW_SYS},
640
  {sys_character_set_connection.name,(char*) &sys_character_set_connection,SHOW_SYS},
641
  {sys_character_set_database.name, (char*) &sys_character_set_database,SHOW_SYS},
642
  {sys_character_set_results.name,(char*) &sys_character_set_results, SHOW_SYS},
643 644
  {sys_character_set_server.name, (char*) &sys_character_set_server,SHOW_SYS},
  {sys_charset_system.name,   (char*) &sys_charset_system,          SHOW_SYS},
645
  {"character_sets_dir",      mysql_charsets_dir,                   SHOW_CHAR},
646
  {sys_collation_connection.name,(char*) &sys_collation_connection, SHOW_SYS},
647 648
  {sys_collation_database.name,(char*) &sys_collation_database,     SHOW_SYS},
  {sys_collation_server.name,(char*) &sys_collation_server,         SHOW_SYS},
649 650 651
  {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},
652 653 654
  {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},
655 656 657 658
  {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},
659
  {sys_expire_logs_days.name, (char*) &sys_expire_logs_days,        SHOW_SYS},
660 661
  {sys_flush.name,             (char*) &sys_flush,                  SHOW_SYS},
  {sys_flush_time.name,        (char*) &sys_flush_time,             SHOW_SYS},
662
  {sys_ft_boolean_syntax.name,(char*) &ft_boolean_syntax,	    SHOW_CHAR},
663
  {"ft_max_word_len",         (char*) &ft_max_word_len,             SHOW_LONG},
664
  {"ft_min_word_len",         (char*) &ft_min_word_len,             SHOW_LONG},
665
  {"ft_query_expansion_limit",(char*) &ft_query_expansion_limit,    SHOW_LONG},
666
  {"ft_stopword_file",        (char*) &ft_stopword_file,            SHOW_CHAR_PTR},
wax@kishkin.ru's avatar
wax@kishkin.ru committed
667
  {sys_group_concat_max_len.name, (char*) &sys_group_concat_max_len,  SHOW_SYS},
668
  {"have_archive",	      (char*) &have_archive_db,	            SHOW_HAVE},
669
  {"have_bdb",		      (char*) &have_berkeley_db,	    SHOW_HAVE},
670
  {"have_compress",	      (char*) &have_compress,		    SHOW_HAVE},
671
  {"have_crypt",	      (char*) &have_crypt,		    SHOW_HAVE},
672
  {"have_csv",	              (char*) &have_csv_db,	            SHOW_HAVE},
673
  {"have_example_engine",      (char*) &have_example_db,	            SHOW_HAVE},
674
  {"have_geometry",           (char*) &have_geometry,               SHOW_HAVE},
675
  {"have_innodb",	      (char*) &have_innodb,		    SHOW_HAVE},
676
  {"have_isam",		      (char*) &have_isam,		    SHOW_HAVE},
677
  {"have_ndbcluster",         (char*) &have_ndbcluster,             SHOW_HAVE},
678 679
  {"have_openssl",	      (char*) &have_openssl,		    SHOW_HAVE},
  {"have_query_cache",        (char*) &have_query_cache,            SHOW_HAVE},
680
  {"have_raid",		      (char*) &have_raid,		    SHOW_HAVE},
681
  {"have_rtree_keys",         (char*) &have_rtree_keys,             SHOW_HAVE},
682
  {"have_symlink",            (char*) &have_symlink,                SHOW_HAVE},
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
683
  {"init_connect",            (char*) &sys_init_connect,            SHOW_SYS},
684
  {"init_file",               (char*) &opt_init_file,               SHOW_CHAR_PTR},
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
685
  {"init_slave",              (char*) &sys_init_slave,              SHOW_SYS},
686 687
#ifdef HAVE_INNOBASE_DB
  {"innodb_additional_mem_pool_size", (char*) &innobase_additional_mem_pool_size, SHOW_LONG },
688
  {sys_innodb_autoextend_increment.name, (char*) &sys_innodb_autoextend_increment, SHOW_SYS},
689
  {"innodb_buffer_pool_awe_mem_mb", (char*) &innobase_buffer_pool_awe_mem_mb, SHOW_LONG },
690
  {"innodb_buffer_pool_size", (char*) &innobase_buffer_pool_size, SHOW_LONG },
691 692 693
  {"innodb_data_file_path", (char*) &innobase_data_file_path,	    SHOW_CHAR_PTR},
  {"innodb_data_home_dir",  (char*) &innobase_data_home_dir,	    SHOW_CHAR_PTR},
  {"innodb_fast_shutdown", (char*) &innobase_fast_shutdown, SHOW_MY_BOOL},
694
  {"innodb_file_io_threads", (char*) &innobase_file_io_threads, SHOW_LONG },
heikki@hundin.mysql.fi's avatar
heikki@hundin.mysql.fi committed
695
  {"innodb_file_per_table", (char*) &innobase_file_per_table, SHOW_MY_BOOL},
696
  {"innodb_locks_unsafe_for_binlog", (char*) &innobase_locks_unsafe_for_binlog, SHOW_MY_BOOL},
697
  {"innodb_flush_log_at_trx_commit", (char*) &innobase_flush_log_at_trx_commit, SHOW_INT},
698
  {"innodb_flush_method",    (char*) &innobase_unix_file_flush_method, SHOW_CHAR_PTR},
699
  {"innodb_force_recovery", (char*) &innobase_force_recovery, SHOW_LONG },
700 701 702 703 704 705 706
  {"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},
707
  {sys_innodb_max_dirty_pages_pct.name, (char*) &sys_innodb_max_dirty_pages_pct, SHOW_SYS},
708
  {sys_innodb_max_purge_lag.name, (char*) &sys_innodb_max_purge_lag, SHOW_SYS},
709
  {sys_innodb_table_locks.name, (char*) &sys_innodb_table_locks, SHOW_SYS},
710
  {sys_innodb_max_purge_lag.name, (char*) &sys_innodb_max_purge_lag, SHOW_SYS},
711 712 713
  {"innodb_mirrored_log_groups", (char*) &innobase_mirrored_log_groups, SHOW_LONG},
  {"innodb_open_files", (char*) &innobase_open_files, SHOW_LONG },
  {"innodb_thread_concurrency", (char*) &innobase_thread_concurrency, SHOW_LONG },
714 715 716 717
#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},
718
  {sys_key_cache_age_threshold.name,   (char*) &sys_key_cache_age_threshold,
719
                                                                    SHOW_SYS},
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
720
  {sys_key_cache_block_size.name,   (char*) &sys_key_cache_block_size,
721
                                                                    SHOW_SYS},
722
  {sys_key_cache_division_limit.name,   (char*) &sys_key_cache_division_limit,
723
                                                                    SHOW_SYS},
724
  {"language",                language,                             SHOW_CHAR},
725 726
  {"large_files_support",     (char*) &opt_large_files,             SHOW_BOOL},
  {sys_license.name,	      (char*) &sys_license,                 SHOW_SYS},
727 728 729 730 731 732
  {sys_local_infile.name,     (char*) &sys_local_infile,	    SHOW_SYS},
#ifdef HAVE_MLOCKALL
  {"locked_in_memory",	      (char*) &locked_in_memory,	    SHOW_BOOL},
#endif
  {"log",                     (char*) &opt_log,                     SHOW_BOOL},
  {"log_bin",                 (char*) &opt_bin_log,                 SHOW_BOOL},
733
  {"log_error",               (char*) log_error_file,               SHOW_CHAR},
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
734
#ifdef HAVE_REPLICATION
735
  {"log_slave_updates",       (char*) &opt_log_slave_updates,       SHOW_MY_BOOL},
736
#endif
737
  {"log_slow_queries",        (char*) &opt_slow_log,                SHOW_BOOL},
738
  {"log_update",              (char*) &opt_update_log,              SHOW_BOOL},
739 740 741
  {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},
742
  {"lower_case_file_system",  (char*) &lower_case_file_system,      SHOW_MY_BOOL},
743
  {"lower_case_table_names",  (char*) &lower_case_table_names,      SHOW_INT},
744 745 746 747
  {sys_max_allowed_packet.name,(char*) &sys_max_allowed_packet,	    SHOW_SYS},
  {sys_max_binlog_cache_size.name,(char*) &sys_max_binlog_cache_size, SHOW_SYS},
  {sys_max_binlog_size.name,    (char*) &sys_max_binlog_size,	    SHOW_SYS},
  {sys_max_connect_errors.name, (char*) &sys_max_connect_errors,    SHOW_SYS},
748
  {sys_max_connections.name,    (char*) &sys_max_connections,	    SHOW_SYS},
749
  {sys_max_delayed_threads.name,(char*) &sys_max_delayed_threads,   SHOW_SYS},
750
  {sys_max_error_count.name,	(char*) &sys_max_error_count,	    SHOW_SYS},
751
  {sys_max_heap_table_size.name,(char*) &sys_max_heap_table_size,   SHOW_SYS},
752 753
  {sys_max_insert_delayed_threads.name,
   (char*) &sys_max_insert_delayed_threads,   SHOW_SYS},
754
  {sys_max_join_size.name,	(char*) &sys_max_join_size,	    SHOW_SYS},
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
755
  {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
756
   SHOW_SYS},
757 758
  {sys_max_relay_log_size.name, (char*) &sys_max_relay_log_size,    SHOW_SYS},
  {sys_max_seeks_for_key.name,  (char*) &sys_max_seeks_for_key,	    SHOW_SYS},
759
  {sys_max_sort_length.name,	(char*) &sys_max_sort_length,	    SHOW_SYS},
760
  {sys_max_tmp_tables.name,	(char*) &sys_max_tmp_tables,	    SHOW_SYS},
761
  {sys_max_user_connections.name,(char*) &sys_max_user_connections, SHOW_SYS},
762
  {sys_max_write_lock_count.name, (char*) &sys_max_write_lock_count,SHOW_SYS},
serg@serg.mylan's avatar
serg@serg.mylan committed
763
  {sys_myisam_data_pointer_size.name, (char*) &sys_myisam_data_pointer_size, SHOW_SYS},
764 765 766
  {sys_myisam_max_extra_sort_file_size.name,
   (char*) &sys_myisam_max_extra_sort_file_size,
   SHOW_SYS},
767 768
  {sys_myisam_max_sort_file_size.name, (char*) &sys_myisam_max_sort_file_size,
   SHOW_SYS},
769
  {"myisam_recover_options",  (char*) &myisam_recover_options_str,  SHOW_CHAR_PTR},
770
  {sys_myisam_repair_threads.name, (char*) &sys_myisam_repair_threads,
771 772 773
   SHOW_SYS},
  {sys_myisam_sort_buffer_size.name, (char*) &sys_myisam_sort_buffer_size, SHOW_SYS},
#ifdef __NT__
774
  {"named_pipe",	      (char*) &opt_enable_named_pipe,       SHOW_MY_BOOL},
775 776 777
#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},
778
  {sys_net_retry_count.name,  (char*) &sys_net_retry_count,	    SHOW_SYS},
779
  {sys_net_write_timeout.name,(char*) &sys_net_write_timeout,       SHOW_SYS},
780
  {sys_new_mode.name,         (char*) &sys_new_mode,                SHOW_SYS},
781
  {sys_old_passwords.name,    (char*) &sys_old_passwords,           SHOW_SYS},
782 783
  {"open_files_limit",	      (char*) &open_files_limit,	    SHOW_LONG},
  {"pid_file",                (char*) pidfile_name,                 SHOW_CHAR},
784
  {"port",                    (char*) &mysqld_port,                  SHOW_INT},
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
785
  {sys_preload_buff_size.name, (char*) &sys_preload_buff_size,      SHOW_SYS},
786
  {"protocol_version",        (char*) &protocol_version,            SHOW_INT},
787 788
  {sys_query_alloc_block_size.name, (char*) &sys_query_alloc_block_size,
   SHOW_SYS},
789
#ifdef HAVE_QUERY_CACHE
790
  {sys_query_cache_limit.name,(char*) &sys_query_cache_limit,	    SHOW_SYS},
791 792
  {sys_query_cache_min_res_unit.name, (char*) &sys_query_cache_min_res_unit,
   SHOW_SYS},
793 794
  {sys_query_cache_size.name, (char*) &sys_query_cache_size,	    SHOW_SYS},
  {sys_query_cache_type.name, (char*) &sys_query_cache_type,        SHOW_SYS},
paul@ice.snake.net's avatar
paul@ice.snake.net committed
795 796
  {sys_query_cache_wlock_invalidate.name,
   (char *) &sys_query_cache_wlock_invalidate, SHOW_SYS},
797
#endif /* HAVE_QUERY_CACHE */
798
  {sys_query_prealloc_size.name, (char*) &sys_query_prealloc_size,  SHOW_SYS},
799 800
  {sys_range_alloc_block_size.name, (char*) &sys_range_alloc_block_size,
   SHOW_SYS},
serg@serg.mylan's avatar
serg@serg.mylan committed
801 802 803
  {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
804 805 806
#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
807
  {sys_rpl_recovery_rank.name,(char*) &sys_rpl_recovery_rank,       SHOW_SYS},
808
  {"secure_auth",             (char*) &sys_secure_auth,             SHOW_SYS},
809 810 811 812
#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
813
  {sys_server_id.name,	      (char*) &sys_server_id,		    SHOW_SYS},
814
  {"skip_external_locking",   (char*) &my_disable_locking,          SHOW_MY_BOOL},
815 816
  {"skip_networking",         (char*) &opt_disable_networking,      SHOW_BOOL},
  {"skip_show_database",      (char*) &opt_skip_show_db,            SHOW_BOOL},
817 818 819
#ifdef HAVE_REPLICATION
  {sys_slave_net_timeout.name,(char*) &sys_slave_net_timeout,	    SHOW_SYS},
#endif
820
  {sys_slow_launch_time.name, (char*) &sys_slow_launch_time,        SHOW_SYS},
821
#ifdef HAVE_SYS_UN_H
822
  {"socket",                  (char*) &mysqld_unix_port,             SHOW_CHAR_PTR},
823
#endif
824
  {sys_sort_buffer.name,      (char*) &sys_sort_buffer, 	    SHOW_SYS},
825
  {sys_sql_mode.name,         (char*) &sys_sql_mode,                SHOW_SYS},
826
  {sys_storage_engine.name,   (char*) &sys_storage_engine,          SHOW_SYS},
827 828 829 830
#ifdef HAVE_REPLICATION
  {sys_sync_binlog_period.name,(char*) &sys_sync_binlog_period,     SHOW_SYS},
#endif
  {sys_sync_frm.name,         (char*) &sys_sync_frm,               SHOW_SYS},
831 832 833
#ifdef HAVE_TZNAME
  {"system_time_zone",        system_time_zone,                     SHOW_CHAR},
#endif
834 835 836 837 838 839 840
  {"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},
841
  {sys_time_format.name,      (char*) &sys_time_format,		    SHOW_SYS},
842
  {"time_zone",               (char*) &sys_time_zone,               SHOW_SYS},
843
  {sys_tmp_table_size.name,   (char*) &sys_tmp_table_size,	    SHOW_SYS},
844
  {"tmpdir",                  (char*) &opt_mysql_tmpdir,            SHOW_CHAR_PTR},
845 846 847
  {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},
848
  {sys_tx_isolation.name,     (char*) &sys_tx_isolation,	    SHOW_SYS},
849
  {"version",                 server_version,                       SHOW_CHAR},
850 851 852
#ifdef HAVE_BERKELEY_DB
  {"version_bdb",             (char*) DB_VERSION_STRING,            SHOW_CHAR},
#endif
853
  {"version_comment",         (char*) MYSQL_COMPILATION_COMMENT,    SHOW_CHAR},
854
  {"version_compile_machine", (char*) MACHINE_TYPE,		    SHOW_CHAR},
855
  {sys_os.name,		      (char*) &sys_os,			    SHOW_SYS},
856 857 858 859
  {sys_net_wait_timeout.name, (char*) &sys_net_wait_timeout,	    SHOW_SYS},
  {NullS, NullS, SHOW_LONG}
};

860

861 862 863 864 865 866
bool sys_var::check(THD *thd, set_var *var)
{
  var->save_result.ulonglong_value= var->value->val_int();
  return 0;
}

867 868 869 870 871 872 873 874 875 876 877 878
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;
}

879 880 881 882
/*
  Functions to check and update variables
*/

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

884 885 886 887 888 889 890 891 892 893
/*
  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
894
{
serg@serg.mylan's avatar
serg@serg.mylan committed
895 896
  char *res= 0, *old_value=(char *)(var ? var->value->str_value.ptr() : 0);
  uint new_length= (var ? var->value->str_value.length() : 0);
897 898
  if (!old_value)
    old_value= (char*) "";
899
  if (!(res= my_strdup_with_length((byte*)old_value, new_length, MYF(0))))
serg@serg.mylan's avatar
serg@serg.mylan committed
900
    return 1;
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
901 902 903 904
  /*
    Replace the old value in such a way that the any thread using
    the value will work.
  */
905 906 907 908 909
  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
910 911 912 913 914
  my_free(old_value, MYF(MY_ALLOW_ZERO_PTR));
  return 0;
}


915 916 917 918 919 920
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
921 922
static void sys_default_init_connect(THD* thd, enum_var_type type)
{
923
  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
924 925 926 927 928
}


static bool sys_update_init_slave(THD *thd, set_var *var)
{
929
  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
930 931 932 933 934
}


static void sys_default_init_slave(THD* thd, enum_var_type type)
{
935
  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
936 937
}

938 939 940
static int sys_check_ftb_syntax(THD *thd,  set_var *var)
{
  if (thd->master_access & SUPER_ACL)
941
    return ft_boolean_check_syntax_string((byte*) var->value->str_value.c_ptr()) ?
942
      -1 : 0;
943 944 945 946 947 948 949 950 951
  else
  {
    my_error(ER_SPECIFIC_ACCESS_DENIED_ERROR, MYF(0), "SUPER");
    return 1;
  }
}

static bool sys_update_ftb_syntax(THD *thd, set_var * var)
{
952 953
  strmake(ft_boolean_syntax, var->value->str_value.c_ptr(),
	  sizeof(ft_boolean_syntax)-1);
954 955 956 957 958
  return 0;
}

static void sys_default_ftb_syntax(THD *thd, enum_var_type type)
{
959
  strmake(ft_boolean_syntax, def_ft_boolean_syntax,
960
	  sizeof(ft_boolean_syntax)-1);
961
}
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
962

963 964 965 966 967
/*
  The following 3 functions need to be changed in 4.1 when we allow
  one to change character sets
*/

968
static int sys_check_charset(THD *thd, set_var *var)
969 970 971 972 973 974 975 976 977 978 979 980 981 982 983 984 985 986 987 988 989 990 991 992 993 994 995 996 997
{
  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);
}


998 999 1000 1001
static void
fix_myisam_max_extra_sort_file_size(THD *thd, enum_var_type type)
{
  myisam_max_extra_temp_length=
1002
    (my_off_t) global_system_variables.myisam_max_extra_sort_file_size;
1003 1004 1005 1006 1007 1008 1009 1010 1011 1012
}


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

1013 1014 1015 1016 1017 1018 1019 1020
/*
  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)
  {
1021
    if (thd->variables.max_join_size == HA_POS_ERROR)
1022 1023 1024 1025 1026
      thd->options|= OPTION_BIG_SELECTS;
    else
      thd->options&= ~OPTION_BIG_SELECTS;
  }
}
1027

1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038 1039 1040 1041 1042 1043 1044 1045

/*
  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
1046
#ifdef HAVE_REPLICATION
1047 1048 1049 1050 1051 1052 1053 1054 1055 1056 1057 1058 1059
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;
}

1060 1061 1062 1063 1064
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
1065 1066 1067
#else /* HAVE_REPLICATION */
static void fix_net_read_timeout(THD *thd __attribute__(unused),
				 enum_var_type type __attribute__(unused))
1068
{}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
1069 1070
static void fix_net_write_timeout(THD *thd __attribute__(unused),
				  enum_var_type type __attribute__(unused))
1071
{}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
1072 1073
static void fix_net_retry_count(THD *thd __attribute__(unused),
				enum_var_type type __attribute__(unused))
1074
{}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
1075
#endif /* HAVE_REPLICATION */
1076

1077 1078 1079 1080

static void fix_query_cache_size(THD *thd, enum_var_type type)
{
#ifdef HAVE_QUERY_CACHE
1081
  ulong requested= query_cache_size;
1082
  query_cache.resize(query_cache_size);
1083 1084 1085 1086
  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);
1087 1088 1089 1090
#endif
}


1091 1092 1093 1094 1095 1096 1097 1098 1099
#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


1100
extern void fix_delay_key_write(THD *thd, enum_var_type type)
1101 1102 1103 1104 1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115
{
  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;
  }
}

1116
static void fix_max_binlog_size(THD *thd, enum_var_type type)
1117 1118 1119 1120 1121
{
  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);
1122
#ifdef HAVE_REPLICATION
1123 1124
  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
1125
#endif
1126 1127 1128
  DBUG_VOID_RETURN;
}

1129
static void fix_max_relay_log_size(THD *thd, enum_var_type type)
1130 1131 1132 1133
{
  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));
1134
#ifdef HAVE_REPLICATION
1135 1136
  active_mi->rli.relay_log.set_max_size(max_relay_log_size ?
                                        max_relay_log_size: max_binlog_size);
1137
#endif
1138 1139
  DBUG_VOID_RETURN;
}
1140

1141

1142 1143
static int check_max_delayed_threads(THD *thd, set_var *var)
{
monty@mishka.local's avatar
monty@mishka.local committed
1144
  longlong val= var->value->val_int();
1145
  if (var->type != OPT_GLOBAL && val != 0 &&
monty@mishka.local's avatar
monty@mishka.local committed
1146
      val != (longlong) global_system_variables.max_insert_delayed_threads)
1147 1148 1149 1150 1151 1152 1153 1154
  {
    char buf[64];
    my_error(ER_WRONG_VALUE_FOR_VAR, MYF(0), var->var->name, llstr(val, buf));
    return 1;
  }
  return 0;
}

monty@mishka.local's avatar
monty@mishka.local committed
1155

1156
static void fix_max_connections(THD *thd, enum_var_type type)
1157
{
1158
#ifndef EMBEDDED_LIBRARY
1159 1160
  resize_thr_alarm(max_connections + 
		   global_system_variables.max_insert_delayed_threads + 10);
1161
#endif
1162 1163
}

1164

1165 1166 1167
static void fix_thd_mem_root(THD *thd, enum_var_type type)
{
  if (type != OPT_GLOBAL)
1168
    reset_root_defaults(thd->mem_root,
1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181
                        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);
}

1182

1183 1184 1185 1186
static void fix_server_id(THD *thd, enum_var_type type)
{
  server_id_supplied = 1;
}
1187

1188

1189 1190
bool sys_var_long_ptr::update(THD *thd, set_var *var)
{
1191
  ulonglong tmp= var->save_result.ulonglong_value;
1192
  pthread_mutex_lock(&LOCK_global_system_variables);
1193 1194 1195 1196
  if (option_limits)
    *value= (ulong) getopt_ull_limit_value(tmp, option_limits);
  else
    *value= (ulong) tmp;
1197
  pthread_mutex_unlock(&LOCK_global_system_variables);
1198 1199 1200 1201 1202 1203 1204 1205 1206 1207
  return 0;
}


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


1208 1209
bool sys_var_ulonglong_ptr::update(THD *thd, set_var *var)
{
1210
  ulonglong tmp= var->save_result.ulonglong_value;
1211
  pthread_mutex_lock(&LOCK_global_system_variables);
1212 1213 1214 1215
  if (option_limits)
    *value= (ulonglong) getopt_ull_limit_value(tmp, option_limits);
  else
    *value= (ulonglong) tmp;
1216
  pthread_mutex_unlock(&LOCK_global_system_variables);
1217 1218 1219 1220 1221 1222
  return 0;
}


void sys_var_ulonglong_ptr::set_default(THD *thd, enum_var_type type)
{
1223
  pthread_mutex_lock(&LOCK_global_system_variables);
1224
  *value= (ulonglong) option_limits->def_value;
1225
  pthread_mutex_unlock(&LOCK_global_system_variables);
1226 1227 1228
}


1229 1230 1231 1232 1233 1234 1235 1236 1237 1238 1239 1240 1241
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;
}


1242 1243 1244 1245 1246 1247 1248
bool sys_var_enum::update(THD *thd, set_var *var)
{
  *value= (uint) var->save_result.ulong_value;
  return 0;
}


1249
byte *sys_var_enum::value_ptr(THD *thd, enum_var_type type, LEX_STRING *base)
1250 1251 1252 1253
{
  return (byte*) enum_names->type_names[*value];
}

1254 1255 1256 1257 1258
bool sys_var_thd_ulong::check(THD *thd, set_var *var)
{
  return (sys_var_thd::check(thd, var) ||
          (check_func && (*check_func)(thd, var)));
}
1259

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

  /* 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)
1271
    global_system_variables.*offset= (ulong) tmp;
1272 1273 1274 1275 1276 1277 1278 1279 1280 1281 1282 1283 1284 1285 1286 1287 1288 1289
  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;
}


1290 1291
byte *sys_var_thd_ulong::value_ptr(THD *thd, enum_var_type type,
				   LEX_STRING *base)
1292 1293 1294 1295 1296 1297 1298
{
  if (type == OPT_GLOBAL)
    return (byte*) &(global_system_variables.*offset);
  return (byte*) &(thd->variables.*offset);
}


1299 1300
bool sys_var_thd_ha_rows::update(THD *thd, set_var *var)
{
1301
  ulonglong tmp= var->save_result.ulonglong_value;
1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312 1313 1314 1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325 1326 1327 1328 1329 1330 1331 1332 1333 1334 1335

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


1336 1337
byte *sys_var_thd_ha_rows::value_ptr(THD *thd, enum_var_type type,
				     LEX_STRING *base)
1338 1339 1340 1341 1342 1343
{
  if (type == OPT_GLOBAL)
    return (byte*) &(global_system_variables.*offset);
  return (byte*) &(thd->variables.*offset);
}

1344 1345
bool sys_var_thd_ulonglong::update(THD *thd,  set_var *var)
{
1346
  ulonglong tmp= var->save_result.ulonglong_value;
1347

1348
  if (tmp > max_system_variables.*offset)
1349 1350 1351
    tmp= max_system_variables.*offset;

  if (option_limits)
1352
    tmp= getopt_ull_limit_value(tmp, option_limits);
1353
  if (var->type == OPT_GLOBAL)
1354 1355 1356
  {
    /* Lock is needed to make things safe on 32 bit systems */
    pthread_mutex_lock(&LOCK_global_system_variables);
1357
    global_system_variables.*offset= (ulonglong) tmp;
1358 1359
    pthread_mutex_unlock(&LOCK_global_system_variables);
  }
1360
  else
1361
    thd->variables.*offset= (ulonglong) tmp;
1362 1363 1364 1365 1366 1367 1368
  return 0;
}


void sys_var_thd_ulonglong::set_default(THD *thd, enum_var_type type)
{
  if (type == OPT_GLOBAL)
1369 1370
  {
    pthread_mutex_lock(&LOCK_global_system_variables);
1371
    global_system_variables.*offset= (ulonglong) option_limits->def_value;
1372 1373
    pthread_mutex_unlock(&LOCK_global_system_variables);
  }
1374 1375 1376 1377 1378
  else
    thd->variables.*offset= global_system_variables.*offset;
}


1379 1380
byte *sys_var_thd_ulonglong::value_ptr(THD *thd, enum_var_type type,
				       LEX_STRING *base)
1381 1382 1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 1405 1406
{
  if (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;
}


1407 1408
byte *sys_var_thd_bool::value_ptr(THD *thd, enum_var_type type,
				  LEX_STRING *base)
1409 1410 1411 1412 1413 1414 1415 1416 1417
{
  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)
{
1418 1419
  char buff[80];
  const char *value;
1420
  String str(buff, sizeof(buff), system_charset_info), *res;
1421 1422 1423 1424 1425

  if (var->value->result_type() == STRING_RESULT)
  {
    if (!(res=var->value->val_str(&str)) ||
	((long) (var->save_result.ulong_value=
1426 1427
		 (ulong) find_type(enum_names, res->ptr(),
				   res->length(),1)-1)) < 0)
1428
    {
1429
      value= res ? res->c_ptr() : "NULL";
1430 1431 1432 1433 1434 1435 1436 1437 1438 1439 1440 1441 1442 1443 1444 1445 1446 1447 1448 1449 1450
      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;
}

1451 1452 1453

bool sys_var::check_set(THD *thd, set_var *var, TYPELIB *enum_names)
{
1454
  bool not_used;
1455
  char buff[80], *error= 0;
1456 1457 1458 1459 1460 1461 1462
  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
1463 1464
    var->save_result.ulong_value= ((ulong)
				   find_set(enum_names, res->c_ptr(),
1465 1466 1467
					    res->length(),
                                            NULL,
                                            &error, &error_len,
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1468
					    &not_used));
1469 1470 1471 1472 1473 1474 1475 1476 1477 1478 1479 1480 1481 1482 1483 1484 1485 1486 1487 1488 1489 1490 1491 1492
    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;
}


1493 1494 1495 1496 1497 1498 1499
/*
  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.
1500 1501 1502 1503

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

1506
Item *sys_var::item(THD *thd, enum_var_type var_type, LEX_STRING *base)
1507 1508 1509 1510 1511
{
  if (check_type(var_type))
  {
    if (var_type != OPT_DEFAULT)
    {
monty@mysql.com's avatar
monty@mysql.com committed
1512
      net_printf(thd, ER_INCORRECT_GLOBAL_LOCAL_VAR,
1513
		 name, var_type == OPT_GLOBAL ? "SESSION" : "GLOBAL");
1514 1515 1516 1517 1518 1519 1520
      return 0;
    }
    /* As there was no local variable, return the global value */
    var_type= OPT_GLOBAL;
  }
  switch (type()) {
  case SHOW_LONG:
1521 1522 1523 1524 1525 1526 1527
  {
    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);
  }
1528
  case SHOW_LONGLONG:
1529 1530 1531
  {
    longlong value;
    pthread_mutex_lock(&LOCK_global_system_variables);
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1532
    value= *(longlong*) value_ptr(thd, var_type, base);
1533 1534 1535
    pthread_mutex_unlock(&LOCK_global_system_variables);
    return new Item_int(value);
  }
1536
  case SHOW_HA_ROWS:
1537 1538 1539
  {
    ha_rows value;
    pthread_mutex_lock(&LOCK_global_system_variables);
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1540
    value= *(ha_rows*) value_ptr(thd, var_type, base);
1541 1542 1543
    pthread_mutex_unlock(&LOCK_global_system_variables);
    return new Item_int((longlong) value);
  }
1544
  case SHOW_MY_BOOL:
1545
    return new Item_int((int32) *(my_bool*) value_ptr(thd, var_type, base),1);
1546 1547
  case SHOW_CHAR:
  {
1548 1549
    Item_string *tmp;
    pthread_mutex_lock(&LOCK_global_system_variables);
1550
    char *str= (char*) value_ptr(thd, var_type, base);
1551 1552 1553
    tmp= new Item_string(str, strlen(str), system_charset_info);
    pthread_mutex_unlock(&LOCK_global_system_variables);
    return tmp;
1554 1555
  }
  default:
1556
    net_printf(thd, ER_VAR_CANT_BE_READ, name);
1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567 1568 1569 1570 1571 1572 1573 1574 1575 1576 1577 1578 1579 1580
  }
  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;
}


1581 1582
byte *sys_var_thd_enum::value_ptr(THD *thd, enum_var_type type,
				  LEX_STRING *base)
1583 1584 1585 1586 1587 1588 1589
{
  ulong tmp= ((type == OPT_GLOBAL) ?
	      global_system_variables.*offset :
	      thd->variables.*offset);
  return (byte*) enum_names->type_names[tmp];
}

1590 1591 1592 1593 1594
bool sys_var_thd_bit::check(THD *thd, set_var *var)
{
  return (check_enum(thd, var, &bool_typelib) ||
          (check_func && (*check_func)(thd, var)));
}
1595 1596 1597

bool sys_var_thd_bit::update(THD *thd, set_var *var)
{
1598
  int res= (*update_func)(thd, var);
1599 1600 1601 1602
  return res;
}


1603 1604
byte *sys_var_thd_bit::value_ptr(THD *thd, enum_var_type type,
				 LEX_STRING *base)
1605 1606 1607 1608 1609 1610 1611 1612 1613 1614 1615
{
  /*
    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;
}


1616 1617 1618 1619 1620 1621 1622 1623 1624 1625 1626 1627 1628 1629 1630 1631 1632 1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658 1659 1660 1661 1662 1663 1664 1665 1666 1667 1668 1669 1670 1671 1672 1673 1674 1675 1676 1677 1678 1679 1680 1681 1682 1683 1684 1685 1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697 1698 1699 1700 1701 1702 1703 1704 1705 1706 1707 1708 1709 1710 1711 1712 1713 1714 1715 1716 1717 1718 1719 1720 1721
/* 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;
}


1722 1723
typedef struct old_names_map_st
{
1724 1725 1726
  const char *old_name;
  const char *new_name;
} my_old_conv;
1727

1728 1729
static my_old_conv old_conv[]= 
{
1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740
  {	"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		}
1741
};
1742

1743
CHARSET_INFO *get_old_charset_by_name(const char *name)
1744
{
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1745
  my_old_conv *conv;
1746
 
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1747
  for (conv= old_conv; conv->old_name; conv++)
1748
  {
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1749 1750
    if (!my_strcasecmp(&my_charset_latin1, name, conv->old_name))
      return get_charset_by_csname(conv->new_name, MY_CS_PRIMARY, MYF(0));
1751
  }
1752
  return NULL;
1753 1754
}

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

1756
bool sys_var_collation::check(THD *thd, set_var *var)
1757 1758 1759
{
  CHARSET_INFO *tmp;

1760
  if (var->value->result_type() == STRING_RESULT)
1761
  {
1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773
    char buff[80];
    String str(buff,sizeof(buff), system_charset_info), *res;
    if (!(res=var->value->val_str(&str)))
    {
      my_error(ER_WRONG_VALUE_FOR_VAR, MYF(0), name, "NULL");
      return 1;
    }
    if (!(tmp=get_charset_by_name(res->c_ptr(),MYF(0))))
    {
      my_error(ER_UNKNOWN_COLLATION, MYF(0), res->c_ptr());
      return 1;
    }
1774
  }
1775
  else // INT_RESULT
1776
  {
1777
    if (!(tmp=get_charset((int) var->value->val_int(),MYF(0))))
1778 1779
    {
      char buf[20];
1780
      int10_to_str((int) var->value->val_int(), buf, -10);
1781 1782 1783
      my_error(ER_UNKNOWN_COLLATION, MYF(0), buf);
      return 1;
    }
1784 1785 1786 1787 1788
  }
  var->save_result.charset= tmp;	// Save for update
  return 0;
}

1789

1790 1791 1792 1793
bool sys_var_character_set::check(THD *thd, set_var *var)
{
  CHARSET_INFO *tmp;

1794 1795 1796 1797 1798
  if (var->value->result_type() == STRING_RESULT)
  {
    char buff[80];
    String str(buff,sizeof(buff), system_charset_info), *res;
    if (!(res=var->value->val_str(&str)))
1799
    {
1800 1801 1802 1803 1804 1805 1806 1807 1808 1809 1810
      if (!nullable)
      {
        my_error(ER_WRONG_VALUE_FOR_VAR, MYF(0), name, "NULL");
        return 1;
      }
      tmp= NULL;
    }
    else if (!(tmp=get_charset_by_csname(res->c_ptr(),MY_CS_PRIMARY,MYF(0))) &&
             !(tmp=get_old_charset_by_name(res->c_ptr())))
    {
      my_error(ER_UNKNOWN_CHARACTER_SET, MYF(0), res->c_ptr());
1811 1812 1813
      return 1;
    }
  }
1814
  else // INT_RESULT
1815
  {
1816
    if (!(tmp=get_charset((int) var->value->val_int(),MYF(0))))
1817 1818
    {
      char buf[20];
1819
      int10_to_str((int) var->value->val_int(), buf, -10);
1820 1821 1822
      my_error(ER_UNKNOWN_CHARACTER_SET, MYF(0), buf);
      return 1;
    }
1823 1824 1825 1826 1827
  }
  var->save_result.charset= tmp;	// Save for update
  return 0;
}

1828

1829
bool sys_var_character_set::update(THD *thd, set_var *var)
1830
{
1831
  ci_ptr(thd,var->type)[0]= var->save_result.charset;
bar@bar.mysql.r18.ru's avatar
bar@bar.mysql.r18.ru committed
1832
  thd->update_charset();
1833 1834 1835
  return 0;
}

1836 1837 1838

byte *sys_var_character_set::value_ptr(THD *thd, enum_var_type type,
				       LEX_STRING *base)
1839
{
1840
  CHARSET_INFO *cs= ci_ptr(thd,type)[0];
1841
  return cs ? (byte*) cs->csname : (byte*) "NULL";
1842 1843
}

1844

1845 1846
CHARSET_INFO ** sys_var_character_set_connection::ci_ptr(THD *thd,
							 enum_var_type type)
1847 1848 1849 1850 1851 1852 1853
{
  if (type == OPT_GLOBAL)
    return &global_system_variables.collation_connection;
  else
    return &thd->variables.collation_connection;
}

1854 1855 1856

void sys_var_character_set_connection::set_default(THD *thd,
						   enum_var_type type)
1857 1858 1859 1860
{
 if (type == OPT_GLOBAL)
   global_system_variables.collation_connection= default_charset_info;
 else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1861
 {
1862
   thd->variables.collation_connection= global_system_variables.collation_connection;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1863 1864
   thd->update_charset();
 }
1865 1866
}

1867

1868 1869
CHARSET_INFO ** sys_var_character_set_client::ci_ptr(THD *thd,
						     enum_var_type type)
1870 1871 1872 1873 1874 1875 1876
{
  if (type == OPT_GLOBAL)
    return &global_system_variables.character_set_client;
  else
    return &thd->variables.character_set_client;
}

1877

1878
void sys_var_character_set_client::set_default(THD *thd, enum_var_type type)
1879 1880
{
 if (type == OPT_GLOBAL)
1881
   global_system_variables.character_set_client= default_charset_info;
1882
 else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1883 1884 1885 1886 1887
 {
   thd->variables.character_set_client= (global_system_variables.
					 character_set_client);
   thd->update_charset();
 }
1888
}
1889

1890

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1891 1892
CHARSET_INFO **
sys_var_character_set_results::ci_ptr(THD *thd, enum_var_type type)
1893
{
1894 1895
  if (type == OPT_GLOBAL)
    return &global_system_variables.character_set_results;
1896
  else
1897
    return &thd->variables.character_set_results;
1898 1899
}

1900

1901
void sys_var_character_set_results::set_default(THD *thd, enum_var_type type)
1902
{
1903
 if (type == OPT_GLOBAL)
1904
   global_system_variables.character_set_results= default_charset_info;
1905
 else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1906 1907 1908 1909 1910
 {
   thd->variables.character_set_results= (global_system_variables.
					  character_set_results);
   thd->update_charset();
 }
1911 1912
}

1913

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1914 1915
CHARSET_INFO **
sys_var_character_set_server::ci_ptr(THD *thd, enum_var_type type)
1916 1917
{
  if (type == OPT_GLOBAL)
1918
    return &global_system_variables.collation_server;
1919
  else
1920
    return &thd->variables.collation_server;
1921 1922
}

1923

1924
void sys_var_character_set_server::set_default(THD *thd, enum_var_type type)
1925 1926
{
 if (type == OPT_GLOBAL)
1927
   global_system_variables.collation_server= default_charset_info;
1928
 else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1929
 {
1930
   thd->variables.collation_server= global_system_variables.collation_server;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1931 1932
   thd->update_charset();
 }
1933 1934
}

1935 1936 1937 1938 1939 1940 1941 1942 1943 1944 1945 1946 1947 1948
#if defined(HAVE_REPLICATION) && (MYSQL_VERSION_ID < 50000)
bool sys_var_character_set_server::check(THD *thd, set_var *var)
{
  if ((var->type == OPT_GLOBAL) &&
      (mysql_bin_log.is_open() ||
       active_mi->slave_running || active_mi->rli.slave_running))
  {
    my_printf_error(0, "Binary logging and replication forbid changing \
the global server character set or collation", MYF(0));
    return 1;
  }
  return sys_var_character_set::check(thd,var);
}
#endif
1949 1950 1951

CHARSET_INFO ** sys_var_character_set_database::ci_ptr(THD *thd,
						       enum_var_type type)
1952 1953
{
  if (type == OPT_GLOBAL)
1954
    return &global_system_variables.collation_database;
1955
  else
1956
    return &thd->variables.collation_database;
1957 1958
}

1959

1960 1961 1962
void sys_var_character_set_database::set_default(THD *thd, enum_var_type type)
{
 if (type == OPT_GLOBAL)
1963
    global_system_variables.collation_database= default_charset_info;
1964
  else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1965
  {
1966
    thd->variables.collation_database= thd->db_charset;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1967 1968
    thd->update_charset();
  }
1969 1970
}

1971

1972
bool sys_var_collation_connection::update(THD *thd, set_var *var)
1973 1974
{
  if (var->type == OPT_GLOBAL)
1975
    global_system_variables.collation_connection= var->save_result.charset;
1976
  else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1977
  {
1978
    thd->variables.collation_connection= var->save_result.charset;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1979 1980
    thd->update_charset();
  }
1981 1982 1983
  return 0;
}

1984 1985 1986

byte *sys_var_collation_connection::value_ptr(THD *thd, enum_var_type type,
					      LEX_STRING *base)
1987 1988
{
  CHARSET_INFO *cs= ((type == OPT_GLOBAL) ?
1989 1990 1991
		  global_system_variables.collation_connection :
		  thd->variables.collation_connection);
  return cs ? (byte*) cs->name : (byte*) "NULL";
1992 1993
}

1994

1995
void sys_var_collation_connection::set_default(THD *thd, enum_var_type type)
1996 1997
{
 if (type == OPT_GLOBAL)
1998
   global_system_variables.collation_connection= default_charset_info;
1999
 else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2000 2001 2002 2003 2004
 {
   thd->variables.collation_connection= (global_system_variables.
					 collation_connection);
   thd->update_charset();
 }
2005 2006
}

2007 2008 2009 2010 2011 2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022 2023 2024 2025 2026 2027 2028 2029 2030 2031 2032 2033 2034 2035 2036 2037 2038 2039 2040 2041
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();
 }
}

2042 2043 2044 2045 2046 2047 2048 2049 2050 2051 2052 2053 2054 2055
#if defined(HAVE_REPLICATION) && (MYSQL_VERSION_ID < 50000)
bool sys_var_collation_server::check(THD *thd, set_var *var)
{
  if ((var->type == OPT_GLOBAL) &&
      (mysql_bin_log.is_open() ||
       active_mi->slave_running || active_mi->rli.slave_running))
  {
    my_printf_error(0, "Binary logging and replication forbid changing \
the global server character set or collation", MYF(0));
    return 1;
  }
  return sys_var_collation::check(thd,var);
}
#endif
2056 2057 2058 2059 2060 2061 2062 2063 2064 2065 2066 2067 2068 2069 2070 2071 2072 2073 2074 2075 2076 2077 2078 2079 2080 2081 2082 2083 2084 2085 2086 2087 2088 2089 2090 2091

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

2092

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

2095
static KEY_CACHE zero_key_cache;
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2096

2097
KEY_CACHE *get_key_cache(LEX_STRING *cache_name)
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2098
{
2099 2100
  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
2101
    cache_name= &default_key_cache_base;
2102
  return ((KEY_CACHE*) find_named(&key_caches,
2103
                                      cache_name->str, cache_name->length, 0));
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2104 2105
}

2106

igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2107 2108
byte *sys_var_key_cache_param::value_ptr(THD *thd, enum_var_type type,
					 LEX_STRING *base)
2109
{
2110
  KEY_CACHE *key_cache= get_key_cache(base);
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2111 2112 2113 2114
  if (!key_cache)
    key_cache= &zero_key_cache;
  return (byte*) key_cache + offset ;
}
2115

2116

2117 2118
bool sys_var_key_buffer_size::update(THD *thd, set_var *var)
{
2119
  ulonglong tmp= var->save_result.ulonglong_value;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2120
  LEX_STRING *base_name= &var->base;
2121
  KEY_CACHE *key_cache;
2122 2123 2124
  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
2125
  if (!base_name->length)
2126
    base_name= &default_key_cache_base;
2127 2128 2129

  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
2130
                            
2131 2132
  if (!key_cache)
  {
2133
    /* Key cache didn't exists */
2134
    if (!tmp)					// Tried to delete cache
2135 2136 2137 2138 2139 2140
      goto end;					// Ok, nothing to do
    if (!(key_cache= create_key_cache(base_name->str, base_name->length)))
    {
      error= 1;
      goto end;
    }
2141
  }
2142 2143 2144 2145 2146 2147 2148 2149 2150

  /*
    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
2151
  if (!tmp)					// Zero size means delete
2152
  {
2153 2154 2155
    if (key_cache == sql_key_cache)
      goto end;					// Ignore default key cache

2156
    if (key_cache->key_cache_inited)		// If initied
2157 2158
    {
      /*
2159 2160
	Move tables using this key cache to the default key cache
	and clear the old key cache.
2161
      */
2162
      NAMED_LIST *list; 
2163
      key_cache= (KEY_CACHE *) find_named(&key_caches, base_name->str,
2164
					      base_name->length, &list);
2165 2166 2167 2168 2169
      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;
2170
    }
2171 2172 2173 2174 2175
    /*
      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;
2176 2177
  }

2178 2179
  key_cache->param_buff_size=
    (ulonglong) getopt_ull_limit_value(tmp, option_limits);
2180

2181 2182 2183 2184
  /* If key cache didn't existed initialize it, else resize it */
  key_cache->in_init= 1;
  pthread_mutex_unlock(&LOCK_global_system_variables);

2185
  if (!key_cache->key_cache_inited)
2186
    error= (bool) (ha_init_key_cache("", key_cache));
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2187
  else
2188
    error= (bool)(ha_resize_key_cache(key_cache));
2189

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

2193 2194 2195
end:
  pthread_mutex_unlock(&LOCK_global_system_variables);
  return error;
2196 2197
}

2198 2199

bool sys_var_key_cache_long::update(THD *thd, set_var *var)
2200
{
monty@mysql.com's avatar
monty@mysql.com committed
2201
  ulong tmp= (ulong) var->value->val_int();
2202
  LEX_STRING *base_name= &var->base;
2203 2204
  bool error= 0;

2205
  if (!base_name->length)
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2206
    base_name= &default_key_cache_base;
2207 2208

  pthread_mutex_lock(&LOCK_global_system_variables);
2209
  KEY_CACHE *key_cache= get_key_cache(base_name);
2210

igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2211 2212
  if (!key_cache && !(key_cache= create_key_cache(base_name->str,
				                  base_name->length)))
2213 2214 2215 2216
  {
    error= 1;
    goto end;
  }
2217

2218 2219 2220 2221 2222 2223 2224 2225 2226
  /*
    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))=
2227
    (ulong) getopt_ull_limit_value(tmp, option_limits);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2228

2229 2230 2231 2232 2233
  /*
    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;
2234

2235
  pthread_mutex_unlock(&LOCK_global_system_variables);
2236

2237 2238 2239 2240 2241 2242 2243 2244
  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;
2245 2246
}

2247

2248 2249 2250 2251
/*****************************************************************************
  Functions to handle SET NAMES and SET CHARACTER SET
*****************************************************************************/

2252
int set_var_collation_client::check(THD *thd)
2253 2254 2255 2256
{
  return 0;
}

2257
int set_var_collation_client::update(THD *thd)
2258
{
2259 2260
  thd->variables.character_set_client= character_set_client;
  thd->variables.character_set_results= character_set_results;
2261
  thd->variables.collation_connection= collation_connection;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2262
  thd->update_charset();
2263 2264 2265 2266 2267 2268 2269
  thd->protocol_simple.init(thd);
  thd->protocol_prep.init(thd);
  return 0;
}

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

2270 2271
bool sys_var_timestamp::update(THD *thd,  set_var *var)
{
2272
  thd->set_time((time_t) var->save_result.ulonglong_value);
2273 2274 2275 2276 2277 2278 2279 2280 2281 2282
  return 0;
}


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


2283 2284
byte *sys_var_timestamp::value_ptr(THD *thd, enum_var_type type,
				   LEX_STRING *base)
2285 2286 2287 2288 2289 2290 2291 2292
{
  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)
{
2293
  thd->insert_id(var->save_result.ulonglong_value);
2294 2295 2296 2297
  return 0;
}


2298 2299
byte *sys_var_last_insert_id::value_ptr(THD *thd, enum_var_type type,
					LEX_STRING *base)
2300 2301 2302 2303 2304 2305 2306 2307
{
  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)
{
2308
  thd->next_insert_id= var->save_result.ulonglong_value;
2309 2310 2311 2312
  return 0;
}


2313 2314
byte *sys_var_insert_id::value_ptr(THD *thd, enum_var_type type,
				   LEX_STRING *base)
2315 2316 2317 2318 2319
{
  return (byte*) &thd->current_insert_id;
}


hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
2320
#ifdef HAVE_REPLICATION
2321 2322
bool sys_var_slave_skip_counter::check(THD *thd, set_var *var)
{
2323
  int result= 0;
monty@mysql.com's avatar
monty@mysql.com committed
2324
  pthread_mutex_lock(&LOCK_active_mi);
2325 2326 2327 2328 2329 2330 2331
  pthread_mutex_lock(&active_mi->rli.run_lock);
  if (active_mi->rli.slave_running)
  {
    my_error(ER_SLAVE_MUST_STOP, MYF(0));
    result=1;
  }
  pthread_mutex_unlock(&active_mi->rli.run_lock);
monty@mysql.com's avatar
monty@mysql.com committed
2332
  pthread_mutex_unlock(&LOCK_active_mi);
2333
  var->save_result.ulong_value= (ulong) var->value->val_int();
2334 2335 2336 2337 2338 2339
  return result;
}


bool sys_var_slave_skip_counter::update(THD *thd, set_var *var)
{
monty@mysql.com's avatar
monty@mysql.com committed
2340
  pthread_mutex_lock(&LOCK_active_mi);
2341 2342 2343 2344 2345 2346 2347 2348 2349
  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);
2350
    active_mi->rli.slave_skip_counter= var->save_result.ulong_value;
2351 2352 2353
    pthread_mutex_unlock(&active_mi->rli.data_lock);
  }
  pthread_mutex_unlock(&active_mi->rli.run_lock);
monty@mysql.com's avatar
monty@mysql.com committed
2354
  pthread_mutex_unlock(&LOCK_active_mi);
2355
  return 0;
2356 2357 2358 2359 2360 2361
}


bool sys_var_sync_binlog_period::update(THD *thd, set_var *var)
{
  pthread_mutex_t *lock_log= mysql_bin_log.get_log_lock();
2362
  sync_binlog_period= (ulong) var->save_result.ulonglong_value;
2363 2364 2365 2366 2367 2368 2369 2370 2371
  /*
    Must reset the counter otherwise it may already be beyond the new period
    and so the new period will not be taken into account. Need mutex otherwise
    might be cancelled by a simultanate ++ in MYSQL_LOG::write().
  */
  pthread_mutex_lock(lock_log);
  sync_binlog_counter= 0;
  pthread_mutex_unlock(lock_log);
  return 0;
2372
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
2373
#endif /* HAVE_REPLICATION */
2374

2375 2376
bool sys_var_rand_seed1::update(THD *thd, set_var *var)
{
2377
  thd->rand.seed1= (ulong) var->save_result.ulonglong_value;
2378 2379 2380 2381 2382
  return 0;
}

bool sys_var_rand_seed2::update(THD *thd, set_var *var)
{
2383
  thd->rand.seed2= (ulong) var->save_result.ulonglong_value;
2384 2385 2386 2387
  return 0;
}


2388 2389 2390 2391 2392 2393 2394 2395 2396 2397 2398 2399 2400 2401 2402 2403
bool sys_var_thd_time_zone::check(THD *thd, set_var *var)
{
  char buff[MAX_TIME_ZONE_NAME_LENGTH]; 
  String str(buff, sizeof(buff), &my_charset_latin1);
  String *res= var->value->val_str(&str);

#if defined(HAVE_REPLICATION) && (MYSQL_VERSION_ID < 50000)
  if ((var->type == OPT_GLOBAL) &&
      (mysql_bin_log.is_open() ||
       active_mi->slave_running || active_mi->rli.slave_running))
  {
    my_printf_error(0, "Binary logging and replication forbid changing "
                       "of the global server time zone", MYF(0));
    return 1;
  }
#endif
2404 2405 2406

  if (!(var->save_result.time_zone=
          my_tz_find(res, thd->lex->time_zone_tables_used)))
2407 2408 2409 2410 2411 2412 2413 2414 2415 2416 2417 2418 2419 2420 2421 2422 2423 2424 2425 2426 2427 2428 2429 2430 2431 2432 2433 2434 2435 2436 2437 2438 2439 2440 2441 2442 2443 2444 2445 2446 2447 2448 2449 2450
  {
    my_error(ER_UNKNOWN_TIME_ZONE, MYF(0), res ? res->c_ptr() : "NULL");
    return 1;
  }
  return 0;
}


bool sys_var_thd_time_zone::update(THD *thd, set_var *var)
{
  /* We are using Time_zone object found during check() phase */ 
  *get_tz_ptr(thd,var->type)= var->save_result.time_zone;
  return 0;
}


byte *sys_var_thd_time_zone::value_ptr(THD *thd, enum_var_type type,
				       LEX_STRING *base)
{
  /* 
    We can use ptr() instead of c_ptr() here because String contaning
    time zone name is guaranteed to be zero ended.
  */
  return (byte *)((*get_tz_ptr(thd,type))->get_name()->ptr());
}


Time_zone** sys_var_thd_time_zone::get_tz_ptr(THD *thd, 
                                              enum_var_type type)
{
  if (type == OPT_GLOBAL)
    return &global_system_variables.time_zone;
  else
    return &thd->variables.time_zone;
}


void sys_var_thd_time_zone::set_default(THD *thd, enum_var_type type)
{
 if (type == OPT_GLOBAL)
 {
   if (default_tz_name)
   {
     String str(default_tz_name, &my_charset_latin1);
2451 2452
     global_system_variables.time_zone=
       my_tz_find(&str, thd->lex->time_zone_tables_used);
2453 2454 2455 2456 2457 2458 2459 2460
   }
   else
     global_system_variables.time_zone= my_tz_SYSTEM;
 }
 else
   thd->variables.time_zone= global_system_variables.time_zone;
}

2461 2462 2463 2464 2465 2466
/*
  Functions to update thd->options bits
*/

static bool set_option_bit(THD *thd, set_var *var)
{
2467 2468 2469
  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;
2470
  else
2471
    thd->options|= sys_var->bit_flag;
2472 2473 2474 2475 2476 2477 2478 2479 2480 2481 2482 2483 2484 2485 2486 2487 2488 2489 2490 2491 2492 2493 2494 2495 2496 2497 2498 2499 2500 2501 2502 2503 2504 2505
  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;
}

2506
static int check_log_update(THD *thd, set_var *var)
2507
{
2508 2509 2510 2511 2512 2513 2514
#ifndef NO_EMBEDDED_ACCESS_CHECKS
  if (!(thd->master_access & SUPER_ACL))
  {
    my_error(ER_SPECIFIC_ACCESS_DENIED_ERROR, MYF(0), "SUPER");
    return 1;
  }
#endif
2515 2516 2517 2518 2519
  return 0;
}

static bool set_log_update(THD *thd, set_var *var)
{
2520 2521 2522 2523 2524 2525 2526
  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;
}

2527 2528 2529 2530 2531 2532 2533 2534 2535 2536 2537 2538 2539 2540 2541 2542
static int check_pseudo_thread_id(THD *thd, set_var *var)
{
  var->save_result.ulonglong_value= var->value->val_int();
#ifndef NO_EMBEDDED_ACCESS_CHECKS
  if (thd->master_access & SUPER_ACL)
    return 0;
  else
  {
    my_error(ER_SPECIFIC_ACCESS_DENIED_ERROR, MYF(0), "SUPER");
    return 1;
  }
#else
  return 0;
#endif
}

2543 2544 2545 2546 2547 2548 2549 2550 2551 2552 2553 2554 2555 2556 2557
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;
}

2558 2559 2560 2561 2562 2563 2564 2565 2566 2567 2568 2569 2570 2571 2572 2573 2574 2575 2576 2577 2578 2579 2580 2581 2582 2583 2584 2585 2586 2587 2588 2589 2590 2591 2592 2593 2594 2595 2596 2597 2598 2599 2600 2601 2602 2603 2604 2605 2606 2607 2608 2609 2610 2611 2612 2613 2614 2615 2616

/****************************************************************************
  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()
{
2617 2618
  hash_init(&system_variable_hash, system_charset_info,
	    array_elements(sys_variables),0,0,
2619
	    (hash_get_key) get_sys_var_length,0,0);
2620 2621 2622 2623 2624 2625 2626
  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
2627
    my_hash_insert(&system_variable_hash, (byte*) *var);
2628 2629 2630 2631 2632 2633 2634 2635 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
  }
  /*
    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)
*/

2662
sys_var *find_sys_var(const char *str, uint length)
2663
{
2664 2665
  sys_var *var= (sys_var*) hash_search(&system_variable_hash,
				       (byte*) str,
2666 2667 2668
				       length ? length :
				       strlen(str));
  if (!var)
2669
    net_printf(current_thd, ER_UNKNOWN_SYSTEM_VARIABLE, (char*) str);
2670 2671 2672 2673 2674 2675 2676 2677 2678 2679 2680 2681 2682 2683 2684 2685 2686 2687 2688 2689 2690 2691
  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
2692 2693
    1	ERROR, message sent (normally no variables was updated)
    -1  ERROR, message not sent
2694 2695
*/

2696
int sql_set_variables(THD *thd, List<set_var_base> *var_list)
2697
{
2698
  int error= 0;
2699
  List_iterator_fast<set_var_base> it(*var_list);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2700
  DBUG_ENTER("sql_set_variables");
2701 2702 2703 2704

  set_var_base *var;
  while ((var=it++))
  {
2705
    if ((error=var->check(thd)))
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2706
      DBUG_RETURN(error);
2707
  }
2708 2709
  if (thd->net.report_error)
    DBUG_RETURN(1);
2710 2711
  it.rewind();
  while ((var=it++))
2712
    error|= var->update(thd);			// Returns 0, -1 or 1
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2713
  DBUG_RETURN(error);
2714 2715 2716
}


2717 2718 2719 2720 2721 2722 2723 2724 2725 2726 2727 2728 2729 2730 2731 2732 2733 2734 2735 2736 2737 2738 2739 2740 2741 2742 2743 2744 2745 2746
/*
  Say if all variables set by a SET support the ONE_SHOT keyword (currently,
  only character set and collation do; later timezones will).

  SYNOPSIS

  not_all_support_one_shot
    set_var	List of variables to update

  NOTES
    It has a "not_" because it makes faster tests (no need to "!")

    RETURN VALUE
    0	all variables of the list support ONE_SHOT
    1	at least one does not support ONE_SHOT
*/

bool not_all_support_one_shot(List<set_var_base> *var_list)
{
  List_iterator_fast<set_var_base> it(*var_list);
  set_var_base *var;
  while ((var= it++))
  {
    if (var->no_support_one_shot())
      return 1;
  }
  return 0;
}


2747 2748 2749 2750
/*****************************************************************************
  Functions to handle SET mysql_internal_variable=const_expr
*****************************************************************************/

2751
int set_var::check(THD *thd)
2752 2753 2754 2755 2756 2757
{
  if (var->check_type(type))
  {
    my_error(type == OPT_GLOBAL ? ER_LOCAL_VARIABLE : ER_GLOBAL_VARIABLE,
	     MYF(0),
	     var->name);
2758
    return -1;
2759 2760 2761 2762 2763 2764 2765 2766 2767
  }
  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);
2768
      return -1;
2769 2770 2771 2772
    }
    return 0;
  }

2773
  if (value->fix_fields(thd, 0, &value) || value->check_cols(1))
2774
    return -1;
2775 2776 2777
  if (var->check_update_type(value->result_type()))
  {
    my_error(ER_WRONG_TYPE_FOR_VAR, MYF(0), var->name);
2778
    return -1;
2779
  }
2780
  return var->check(thd, this) ? -1 : 0;
2781 2782 2783
}


bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
2784 2785 2786 2787 2788 2789 2790 2791 2792 2793 2794 2795
/*
  Check variable, but without assigning value (used by PS)

  SYNOPSIS
    set_var::light_check()
    thd		thread handler

  RETURN VALUE
    0	ok
    1	ERROR, message sent (normally no variables was updated)
    -1  ERROR, message not sent
*/
2796 2797 2798 2799 2800 2801 2802 2803 2804
int set_var::light_check(THD *thd)
{
  if (var->check_type(type))
  {
    my_error(type == OPT_GLOBAL ? ER_LOCAL_VARIABLE : ER_GLOBAL_VARIABLE,
	     MYF(0),
	     var->name);
    return -1;
  }
bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
2805
  if (type == OPT_GLOBAL && check_global_access(thd, SUPER_ACL))
2806 2807 2808 2809 2810 2811 2812 2813
    return 1;

  if (value && (value->fix_fields(thd, 0, &value) || value->check_cols(1)))
    return -1;
  return 0;
}


2814
int set_var::update(THD *thd)
2815 2816 2817 2818
{
  if (!value)
    var->set_default(thd, type);
  else if (var->update(thd, this))
2819
    return -1;				// should never happen
2820 2821 2822 2823 2824 2825 2826 2827 2828 2829
  if (var->after_update)
    (*var->after_update)(thd, type);
  return 0;
}


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

2830
int set_var_user::check(THD *thd)
2831
{
bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
2832 2833
  /*
    Item_func_set_user_var can't substitute something else on its place =>
2834
    0 can be passed as last argument (reference on item)
bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
2835 2836
  */
  return (user_var_item->fix_fields(thd, 0, (Item**) 0) ||
2837
	  user_var_item->check()) ? -1 : 0;
2838 2839 2840
}


bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
2841 2842 2843 2844 2845 2846 2847 2848 2849 2850 2851 2852
/*
  Check variable, but without assigning value (used by PS)

  SYNOPSIS
    set_var_user::light_check()
    thd		thread handler

  RETURN VALUE
    0	ok
    1	ERROR, message sent (normally no variables was updated)
    -1  ERROR, message not sent
*/
2853 2854 2855 2856 2857 2858 2859 2860 2861 2862
int set_var_user::light_check(THD *thd)
{
  /*
    Item_func_set_user_var can't substitute something else on its place =>
    0 can be passed as last argument (reference on item)
  */
  return (user_var_item->fix_fields(thd, 0, (Item**) 0));
}


2863
int set_var_user::update(THD *thd)
2864 2865 2866 2867
{
  if (user_var_item->update())
  {
    /* Give an error if it's not given already */
2868 2869
    my_error(ER_SET_CONSTANTS_ONLY, MYF(0));
    return -1;
2870 2871 2872 2873 2874 2875 2876 2877 2878
  }
  return 0;
}


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

2879
int set_var_password::check(THD *thd)
2880
{
hf@deer.(none)'s avatar
hf@deer.(none) committed
2881
#ifndef NO_EMBEDDED_ACCESS_CHECKS
2882 2883
  if (!user->host.str)
    user->host.str= (char*) thd->host_or_ip;
2884
  /* Returns 1 as the function sends error to client */
2885 2886 2887
  return check_change_password(thd, user->host.str, user->user.str, password) ?
         1 : 0;
#else
hf@deer.(none)'s avatar
hf@deer.(none) committed
2888 2889
  return 0;
#endif
2890 2891
}

2892
int set_var_password::update(THD *thd)
2893
{
hf@deer.(none)'s avatar
hf@deer.(none) committed
2894
#ifndef NO_EMBEDDED_ACCESS_CHECKS
2895
  /* Returns 1 as the function sends error to client */
2896 2897
  return change_password(thd, user->host.str, user->user.str, password) ?
	  1 : 0;
hf@deer.(none)'s avatar
hf@deer.(none) committed
2898 2899 2900
#else
  return 0;
#endif
2901 2902
}

2903 2904 2905 2906
/****************************************************************************
 Functions to handle table_type
****************************************************************************/

2907 2908
/* Based upon sys_var::check_enum() */

2909
bool sys_var_thd_storage_engine::check(THD *thd, set_var *var)
2910 2911 2912 2913 2914 2915 2916 2917 2918 2919 2920 2921 2922 2923 2924 2925
{
  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
2926
  value= "unknown";
2927 2928

err:
2929
  my_error(ER_UNKNOWN_STORAGE_ENGINE, MYF(0), value);
2930 2931 2932
  return 1;    
}

2933

2934 2935
byte *sys_var_thd_storage_engine::value_ptr(THD *thd, enum_var_type type,
					    LEX_STRING *base)
2936 2937 2938 2939
{
  ulong val;
  val= ((type == OPT_GLOBAL) ? global_system_variables.*offset :
        thd->variables.*offset);
2940
  const char *table_type= ha_get_storage_engine((enum db_type)val);
2941
  return (byte *) table_type;
2942 2943
}

2944

2945
void sys_var_thd_storage_engine::set_default(THD *thd, enum_var_type type)
2946 2947 2948 2949 2950 2951 2952
{
  if (type == OPT_GLOBAL)
    global_system_variables.*offset= (ulong) DB_TYPE_MYISAM;
  else
    thd->variables.*offset= (ulong) (global_system_variables.*offset);
}

2953

2954
bool sys_var_thd_storage_engine::update(THD *thd, set_var *var)
2955 2956 2957 2958 2959 2960 2961 2962
{
  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;
}

2963 2964 2965 2966
void sys_var_thd_table_type::warn_deprecated(THD *thd)
{
  push_warning_printf(thd, MYSQL_ERROR::WARN_LEVEL_WARN,
		      ER_WARN_DEPRECATED_SYNTAX,
2967 2968
		      ER(ER_WARN_DEPRECATED_SYNTAX), "table_type",
                      "storage_engine"); 
2969 2970 2971 2972 2973 2974 2975 2976 2977 2978 2979 2980 2981 2982
}

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

2983

2984 2985 2986
/****************************************************************************
 Functions to handle sql_mode
****************************************************************************/
2987

2988 2989
byte *sys_var_thd_sql_mode::value_ptr(THD *thd, enum_var_type type,
				      LEX_STRING *base)
2990 2991 2992 2993 2994 2995 2996 2997 2998 2999 3000 3001 3002 3003 3004 3005 3006 3007 3008 3009 3010 3011 3012 3013 3014 3015 3016 3017 3018 3019 3020 3021 3022 3023 3024 3025 3026 3027 3028 3029
{
  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 */
3030

3031 3032 3033 3034 3035 3036 3037 3038 3039 3040 3041 3042 3043 3044 3045 3046 3047 3048 3049 3050 3051 3052 3053 3054 3055 3056 3057 3058 3059 3060 3061
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);
3062
  if (sql_mode & MODE_MAXDB)
3063 3064 3065 3066 3067 3068 3069 3070 3071 3072
    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;
}
3073 3074


3075 3076 3077 3078
/****************************************************************************
  Named list handling
****************************************************************************/

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3079 3080
gptr find_named(I_List<NAMED_LIST> *list, const char *name, uint length,
		NAMED_LIST **found)
3081 3082 3083 3084 3085 3086
{
  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
3087
    {
3088 3089
      if (found)
        *found= element;
3090
      return element->data;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3091
    }
3092 3093 3094 3095 3096
  }
  return 0;
}


3097 3098
void delete_elements(I_List<NAMED_LIST> *list,
		     void (*free_element)(const char *name, gptr))
3099 3100
{
  NAMED_LIST *element;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3101
  DBUG_ENTER("delete_elements");
3102 3103
  while ((element= list->get()))
  {
3104
    (*free_element)(element->name, element->data);
3105 3106
    delete element;
  }
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3107
  DBUG_VOID_RETURN;
3108 3109 3110 3111 3112
}


/* Key cache functions */

3113
static KEY_CACHE *create_key_cache(const char *name, uint length)
3114
{
3115
  KEY_CACHE *key_cache;
3116 3117 3118
  DBUG_ENTER("create_key_cache");
  DBUG_PRINT("enter",("name: %.*s", length, name));
  
3119
  if ((key_cache= (KEY_CACHE*) my_malloc(sizeof(KEY_CACHE),
3120
					     MYF(MY_ZEROFILL | MY_WME))))
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
3121 3122
  {
    if (!new NAMED_LIST(&key_caches, name, length, (gptr) key_cache))
3123 3124
    {
      my_free((char*) key_cache, MYF(0));
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
3125
      key_cache= 0;
3126 3127 3128 3129 3130 3131 3132 3133 3134
    }
    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
      */
3135 3136 3137
      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;
3138
    }
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
3139
  }
3140
  DBUG_RETURN(key_cache);
3141 3142 3143
}


3144
KEY_CACHE *get_or_create_key_cache(const char *name, uint length)
3145
{
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
3146
  LEX_STRING key_cache_name;
3147
  KEY_CACHE *key_cache;
3148

igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
3149 3150
  key_cache_name.str= (char *) name;
  key_cache_name.length= length;
3151 3152
  pthread_mutex_lock(&LOCK_global_system_variables);
  if (!(key_cache= get_key_cache(&key_cache_name)))
3153
    key_cache= create_key_cache(name, length);
3154
  pthread_mutex_unlock(&LOCK_global_system_variables);
3155 3156 3157 3158
  return key_cache;
}


3159
void free_key_cache(const char *name, KEY_CACHE *key_cache)
3160
{
3161 3162
  ha_end_key_cache(key_cache);
  my_free((char*) key_cache, MYF(0));
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
3163 3164 3165
}


3166
bool process_key_caches(int (* func) (const char *name, KEY_CACHE *))
3167
{
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
3168 3169
  I_List_iterator<NAMED_LIST> it(key_caches);
  NAMED_LIST *element;
3170

igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
3171 3172
  while ((element= it++))
  {
3173
    KEY_CACHE *key_cache= (KEY_CACHE *) element->data;
3174
    func(element->name, key_cache);
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
3175 3176
  }
  return 0;
3177 3178
}

3179

3180 3181 3182 3183 3184 3185
/****************************************************************************
  Used templates
****************************************************************************/

#ifdef __GNUC__
template class List<set_var_base>;
3186
template class List_iterator_fast<set_var_base>;
3187
template class I_List_iterator<NAMED_LIST>;
3188
#endif