set_var.cc 103 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
#include "slave.h"
#include <my_getopt.h>
59
#include <thr_alarm.h>
60 61 62 63 64 65 66
#include <myisam.h>
#ifdef HAVE_BERKELEY_DB
#include "ha_berkeley.h"
#endif
#ifdef HAVE_INNOBASE_DB
#include "ha_innodb.h"
#endif
67 68 69
#ifdef HAVE_NDBCLUSTER_DB
#include "ha_ndbcluster.h"
#endif
70 71 72 73 74

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

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

85
static int sys_check_charset(THD *thd, set_var *var);
86 87
static bool sys_update_charset(THD *thd, set_var *var);
static void sys_set_default_charset(THD *thd, enum_var_type type);
88 89 90
static int  sys_check_ftb_syntax(THD *thd,  set_var *var);
static bool sys_update_ftb_syntax(THD *thd, set_var * var);
static void sys_default_ftb_syntax(THD *thd, enum_var_type type);
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
91 92 93 94
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);
95 96
static bool set_option_bit(THD *thd, set_var *var);
static bool set_option_autocommit(THD *thd, set_var *var);
97
static int  check_log_update(THD *thd, set_var *var);
98
static bool set_log_update(THD *thd, set_var *var);
99
static int  check_pseudo_thread_id(THD *thd, set_var *var);
100
static bool set_log_bin(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

/*
  Variable definition list

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

130 131 132 133 134
sys_var_thd_ulong	sys_auto_increment_increment("auto_increment_increment",
                                                     &SV::auto_increment_increment);
sys_var_thd_ulong	sys_auto_increment_offset("auto_increment_offset",
                                                  &SV::auto_increment_offset);

135 136 137
sys_var_bool_ptr	sys_automatic_sp_privileges("automatic_sp_privileges",
					      &sp_automatic_privileges);

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

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",
305 306
						   &SV::query_alloc_block_size,
						   0, fix_thd_mem_root);
307
sys_var_thd_ulong	sys_query_prealloc_size("query_prealloc_size",
308 309
						&SV::query_prealloc_size,
						0, fix_thd_mem_root);
310
sys_var_thd_ulong	sys_trans_alloc_block_size("transaction_alloc_block_size",
311 312
						   &SV::trans_alloc_block_size,
						   0, fix_trans_mem_root);
313
sys_var_thd_ulong	sys_trans_prealloc_size("transaction_prealloc_size",
314 315
						&SV::trans_prealloc_size,
						0, fix_trans_mem_root);
316

317 318 319
#ifdef HAVE_QUERY_CACHE
sys_var_long_ptr	sys_query_cache_limit("query_cache_limit",
					      &query_cache.query_cache_limit);
320 321 322
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);
323 324 325
sys_var_thd_enum	sys_query_cache_type("query_cache_type",
					     &SV::query_cache_type,
					     &query_cache_type_typelib);
326 327 328
sys_var_thd_bool
sys_query_cache_wlock_invalidate("query_cache_wlock_invalidate",
				 &SV::query_cache_wlock_invalidate);
329
#endif /* HAVE_QUERY_CACHE */
330
sys_var_bool_ptr	sys_secure_auth("secure_auth", &opt_secure_auth);
331
sys_var_long_ptr	sys_server_id("server_id", &server_id, fix_server_id);
332 333
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
334
#ifdef HAVE_REPLICATION
335 336
sys_var_long_ptr	sys_slave_net_timeout("slave_net_timeout",
					      &slave_net_timeout);
337
#endif
338 339 340 341
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);
342 343
sys_var_thd_sql_mode    sys_sql_mode("sql_mode",
                                     &SV::sql_mode);
344 345 346 347
sys_var_thd_enum
sys_updatable_views_with_limit("updatable_views_with_limit",
                               &SV::updatable_views_with_limit,
                               &updatable_views_with_limit_typelib);
bell@sanja.is.com.ua's avatar
VIEW  
bell@sanja.is.com.ua committed
348

349 350
sys_var_thd_table_type  sys_table_type("table_type",
				       &SV::table_type);
351 352
sys_var_thd_storage_engine sys_storage_engine("storage_engine",
				       &SV::table_type);
353 354 355 356
#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);
357 358 359 360 361 362 363 364 365 366
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);
vtkachenko@intelp4d.mysql.com's avatar
vtkachenko@intelp4d.mysql.com committed
367 368
sys_var_bool_ptr  sys_timed_mutexes("timed_mutexes",
                                    &timed_mutexes);
369 370
sys_var_thd_ulong	sys_net_wait_timeout("wait_timeout",
					     &SV::net_wait_timeout);
371

372 373 374
#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);
375 376
sys_var_long_ptr	sys_innodb_max_purge_lag("innodb_max_purge_lag",
							&srv_max_purge_lag);
377 378
sys_var_thd_bool	sys_innodb_table_locks("innodb_table_locks",
                                               &SV::innodb_table_locks);
379 380
sys_var_long_ptr	sys_innodb_autoextend_increment("innodb_autoextend_increment",
							&srv_auto_extend_increment);
381
#endif
382

383
#ifdef HAVE_NDBCLUSTER_DB
384
/* ndb thread specific variable settings */
385 386 387 388
sys_var_thd_ulong 
sys_ndb_autoincrement_prefetch_sz("ndb_autoincrement_prefetch_sz",
				  &SV::ndb_autoincrement_prefetch_sz);
sys_var_thd_bool
389
sys_ndb_force_send("ndb_force_send", &SV::ndb_force_send);
390
sys_var_thd_bool
391
sys_ndb_use_exact_count("ndb_use_exact_count", &SV::ndb_use_exact_count);
392
sys_var_thd_bool
393
sys_ndb_use_transactions("ndb_use_transactions", &SV::ndb_use_transactions);
394
#endif
395 396 397 398 399

/* Time/date/datetime formats */

sys_var_thd_date_time_format sys_time_format("time_format",
					     &SV::time_format,
400
					     MYSQL_TIMESTAMP_TIME);
401 402
sys_var_thd_date_time_format sys_date_format("date_format",
					     &SV::date_format,
403
					     MYSQL_TIMESTAMP_DATE);
404 405
sys_var_thd_date_time_format sys_datetime_format("datetime_format",
						 &SV::datetime_format,
406
						 MYSQL_TIMESTAMP_DATETIME);
407 408

/* Variables that are bits in THD */
409

410
static sys_var_thd_bit	sys_autocommit("autocommit", 0,
411 412 413
				       set_option_autocommit,
				       OPTION_NOT_AUTOCOMMIT,
				       1);
414
static sys_var_thd_bit	sys_big_tables("big_tables", 0,
415 416 417
				       set_option_bit,
				       OPTION_BIG_TABLES);
#ifndef TO_BE_DELETED	/* Alias for big_tables */
418
static sys_var_thd_bit	sys_sql_big_tables("sql_big_tables", 0,
419 420 421
					   set_option_bit,
					   OPTION_BIG_TABLES);
#endif
422
static sys_var_thd_bit	sys_big_selects("sql_big_selects", 0,
423
					set_option_bit,
424
					OPTION_BIG_SELECTS);
425
static sys_var_thd_bit	sys_log_off("sql_log_off", 0,
426 427 428
				    set_option_bit,
				    OPTION_LOG_OFF);
static sys_var_thd_bit	sys_log_update("sql_log_update",
429
                                       check_log_update,
430 431 432
				       set_log_update,
				       OPTION_UPDATE_LOG);
static sys_var_thd_bit	sys_log_binlog("sql_log_bin",
433 434 435 436
                                       check_log_update,
				       set_log_bin,
				       OPTION_BIN_LOG);
static sys_var_thd_bit	sys_sql_warnings("sql_warnings", 0,
437 438
					 set_option_bit,
					 OPTION_WARNINGS);
439
static sys_var_thd_bit	sys_auto_is_null("sql_auto_is_null", 0,
440 441
					 set_option_bit,
					 OPTION_AUTO_IS_NULL);
442
static sys_var_thd_bit	sys_safe_updates("sql_safe_updates", 0,
443 444
					 set_option_bit,
					 OPTION_SAFE_UPDATES);
445
static sys_var_thd_bit	sys_buffer_results("sql_buffer_result", 0,
446 447
					   set_option_bit,
					   OPTION_BUFFER_RESULT);
448
static sys_var_thd_bit	sys_quote_show_create("sql_quote_show_create", 0,
449 450
					      set_option_bit,
					      OPTION_QUOTE_SHOW_CREATE);
451
static sys_var_thd_bit	sys_foreign_key_checks("foreign_key_checks", 0,
452 453 454
					       set_option_bit,
					       OPTION_NO_FOREIGN_KEY_CHECKS,
					       1);
455
static sys_var_thd_bit	sys_unique_checks("unique_checks", 0,
456 457 458 459
					  set_option_bit,
					  OPTION_RELAXED_UNIQUE_CHECKS,
					  1);

460 461
/* Local state variables */

462
static sys_var_thd_ha_rows	sys_select_limit("sql_select_limit",
463 464 465 466 467
						 &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");
468 469 470 471 472 473 474 475 476
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);

477
/* alias for last_insert_id() to be compatible with Sybase */
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
478
#ifdef HAVE_REPLICATION
479
static sys_var_slave_skip_counter sys_slave_skip_counter("sql_slave_skip_counter");
480
#endif
481 482
static sys_var_rand_seed1	sys_rand_seed1("rand_seed1");
static sys_var_rand_seed2	sys_rand_seed2("rand_seed2");
483

484 485
static sys_var_thd_ulong        sys_default_week_format("default_week_format",
					                &SV::default_week_format);
486

487 488 489
sys_var_thd_ulong               sys_group_concat_max_len("group_concat_max_len",
                                                         &SV::group_concat_max_len);

490
sys_var_thd_time_zone            sys_time_zone("time_zone");
491 492 493 494 495

/* Read only variables */

sys_var_const_str		sys_os("version_compile_os", SYSTEM_TYPE);
/* Global read-only variable describing server license */
496
sys_var_const_str		sys_license("license", STRINGIFY_ARG(LICENSE));
497 498


499 500 501 502 503 504 505 506 507 508 509
/*
  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,
510 511
  &sys_auto_increment_increment,
  &sys_auto_increment_offset,
512
  &sys_autocommit,
513
  &sys_automatic_sp_privileges,
514 515 516 517 518
  &sys_big_tables,
  &sys_big_selects,
  &sys_binlog_cache_size,
  &sys_buffer_results,
  &sys_bulk_insert_buff_size,
519 520
  &sys_character_set_server,
  &sys_character_set_database,
521
  &sys_character_set_client,
522
  &sys_character_set_connection,
523
  &sys_character_set_results,
524
  &sys_collation_connection,
525 526
  &sys_collation_database,
  &sys_collation_server,
527 528
  &sys_concurrent_insert,
  &sys_connect_timeout,
529 530
  &sys_date_format,
  &sys_datetime_format,
531
  &sys_default_week_format,
532 533 534 535
  &sys_delay_key_write,
  &sys_delayed_insert_limit,
  &sys_delayed_insert_timeout,
  &sys_delayed_queue_size,
536
  &sys_error_count,
537
  &sys_expire_logs_days,
538 539
  &sys_flush,
  &sys_flush_time,
540
  &sys_ft_boolean_syntax,
541
  &sys_foreign_key_checks,
542
  &sys_group_concat_max_len,
543
  &sys_identity,
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
544 545
  &sys_init_connect,
  &sys_init_slave,
546 547 548 549
  &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
550
  &sys_key_cache_block_size,
551 552
  &sys_key_cache_division_limit,
  &sys_key_cache_age_threshold,
553
  &sys_last_insert_id,
554
  &sys_license,
555 556 557 558 559 560 561 562 563 564 565 566 567
  &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,
568
  &sys_max_error_count,
569
  &sys_max_insert_delayed_threads,
570 571
  &sys_max_heap_table_size,
  &sys_max_join_size,
igor@hundin.mysql.fi's avatar
igor@hundin.mysql.fi committed
572
  &sys_max_length_for_sort_data,
573
  &sys_max_relay_log_size,
574
  &sys_max_seeks_for_key,
575 576 577 578
  &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
579
  &sys_myisam_data_pointer_size,
580 581
  &sys_myisam_max_extra_sort_file_size,
  &sys_myisam_max_sort_file_size,
582
  &sys_myisam_repair_threads,
583 584 585
  &sys_myisam_sort_buffer_size,
  &sys_net_buffer_length,
  &sys_net_read_timeout,
586
  &sys_net_retry_count,
587 588
  &sys_net_wait_timeout,
  &sys_net_write_timeout,
589
  &sys_new_mode,
590
  &sys_old_passwords,
591 592
  &sys_optimizer_prune_level,
  &sys_optimizer_search_depth,
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
593
  &sys_preload_buff_size,
594
  &sys_pseudo_thread_id,
595
  &sys_query_alloc_block_size,
596
  &sys_query_cache_size,
597
  &sys_query_prealloc_size,
598 599
#ifdef HAVE_QUERY_CACHE
  &sys_query_cache_limit,
600
  &sys_query_cache_min_res_unit,
601
  &sys_query_cache_type,
602
  &sys_query_cache_wlock_invalidate,
603
#endif /* HAVE_QUERY_CACHE */
604
  &sys_quote_show_create,
605 606
  &sys_rand_seed1,
  &sys_rand_seed2,
607
  &sys_range_alloc_block_size,
608
  &sys_readonly,
609 610
  &sys_read_buff_size,
  &sys_read_rnd_buff_size,
611 612 613
#ifdef HAVE_REPLICATION
  &sys_relay_log_purge,
#endif
614 615
  &sys_rpl_recovery_rank,
  &sys_safe_updates,
616
  &sys_secure_auth,
617 618
  &sys_select_limit,
  &sys_server_id,
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
619
#ifdef HAVE_REPLICATION
620
  &sys_slave_compressed_protocol,
621 622
  &sys_slave_net_timeout,
  &sys_slave_skip_counter,
623
#endif
624 625 626 627 628
  &sys_slow_launch_time,
  &sys_sort_buffer,
  &sys_sql_big_tables,
  &sys_sql_low_priority_updates,
  &sys_sql_max_join_size,
629
  &sys_sql_mode,
630
  &sys_sql_warnings,
631
  &sys_storage_engine,
632 633 634 635
#ifdef HAVE_REPLICATION
  &sys_sync_binlog_period,
#endif
  &sys_sync_frm,
636 637 638
  &sys_table_cache_size,
  &sys_table_type,
  &sys_thread_cache_size,
639
  &sys_time_format,
vtkachenko@intelp4d.mysql.com's avatar
vtkachenko@intelp4d.mysql.com committed
640
  &sys_timed_mutexes,
641
  &sys_timestamp,
642
  &sys_time_zone,
643
  &sys_tmp_table_size,
644 645
  &sys_trans_alloc_block_size,
  &sys_trans_prealloc_size,
646
  &sys_tx_isolation,
647
  &sys_os,
648 649
#ifdef HAVE_INNOBASE_DB
  &sys_innodb_max_dirty_pages_pct,
650
  &sys_innodb_max_purge_lag,
651
  &sys_innodb_table_locks,
652
  &sys_innodb_max_purge_lag,
653
  &sys_innodb_autoextend_increment,
654 655 656 657 658 659
#endif  
#ifdef HAVE_NDBCLUSTER_DB
  &sys_ndb_autoincrement_prefetch_sz,
  &sys_ndb_force_send,
  &sys_ndb_use_exact_count,
  &sys_ndb_use_transactions,
660
#endif
661
  &sys_unique_checks,
662
  &sys_updatable_views_with_limit,
663
  &sys_warning_count
664 665 666 667 668 669 670 671
};


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

struct show_var_st init_vars[]= {
672
  {"auto_increment_increment", (char*) &sys_auto_increment_increment, SHOW_SYS},
673
  {"auto_increment_offset",   (char*) &sys_auto_increment_offset, SHOW_SYS},
674
  {sys_automatic_sp_privileges.name,(char*) &sys_automatic_sp_privileges,       SHOW_SYS},
675 676 677 678 679
  {"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},
680
  {"bdb_log_buffer_size",     (char*) &berkeley_log_buffer_size,    SHOW_LONG},
681
  {"bdb_logdir",              (char*) &berkeley_logdir,             SHOW_CHAR_PTR},
682
  {"bdb_max_lock",            (char*) &berkeley_max_lock,	    SHOW_LONG},
683 684 685 686 687
  {"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},
688
  {sys_character_set_client.name,(char*) &sys_character_set_client, SHOW_SYS},
689
  {sys_character_set_connection.name,(char*) &sys_character_set_connection,SHOW_SYS},
690
  {sys_character_set_database.name, (char*) &sys_character_set_database,SHOW_SYS},
691
  {sys_character_set_results.name,(char*) &sys_character_set_results, SHOW_SYS},
692 693 694
  {sys_character_set_server.name, (char*) &sys_character_set_server,SHOW_SYS},
  {sys_charset_system.name,   (char*) &sys_charset_system,          SHOW_SYS},
  {"character_sets_dir",      mysql_charsets_dir,                   SHOW_CHAR},
695
  {sys_collation_connection.name,(char*) &sys_collation_connection, SHOW_SYS},
696 697
  {sys_collation_database.name,(char*) &sys_collation_database,     SHOW_SYS},
  {sys_collation_server.name,(char*) &sys_collation_server,         SHOW_SYS},
698 699 700
  {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},
701 702 703
  {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},
704 705 706 707
  {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},
708
  {sys_expire_logs_days.name, (char*) &sys_expire_logs_days,        SHOW_SYS},
709 710
  {sys_flush.name,             (char*) &sys_flush,                  SHOW_SYS},
  {sys_flush_time.name,        (char*) &sys_flush_time,             SHOW_SYS},
711
  {sys_ft_boolean_syntax.name,(char*) &ft_boolean_syntax,	    SHOW_CHAR},
712
  {"ft_max_word_len",         (char*) &ft_max_word_len,             SHOW_LONG},
713
  {"ft_min_word_len",         (char*) &ft_min_word_len,             SHOW_LONG},
714
  {"ft_query_expansion_limit",(char*) &ft_query_expansion_limit,    SHOW_LONG},
715
  {"ft_stopword_file",        (char*) &ft_stopword_file,            SHOW_CHAR_PTR},
716
  {sys_group_concat_max_len.name, (char*) &sys_group_concat_max_len,  SHOW_SYS},
717
  {"have_archive",	      (char*) &have_archive_db,	            SHOW_HAVE},
718
  {"have_bdb",		      (char*) &have_berkeley_db,	    SHOW_HAVE},
719
  {"have_compress",	      (char*) &have_compress,		    SHOW_HAVE},
720
  {"have_crypt",	      (char*) &have_crypt,		    SHOW_HAVE},
721
  {"have_csv",	              (char*) &have_csv_db,	            SHOW_HAVE},
722 723
  {"have_example_engine",     (char*) &have_example_db,	            SHOW_HAVE},
  {"have_federated_db",       (char*) &have_federated_db,           SHOW_HAVE},
724
  {"have_geometry",           (char*) &have_geometry,               SHOW_HAVE},
725
  {"have_innodb",	      (char*) &have_innodb,		    SHOW_HAVE},
726
  {"have_isam",		      (char*) &have_isam,		    SHOW_HAVE},
727
  {"have_ndbcluster",         (char*) &have_ndbcluster,             SHOW_HAVE},
728 729
  {"have_openssl",	      (char*) &have_openssl,		    SHOW_HAVE},
  {"have_query_cache",        (char*) &have_query_cache,            SHOW_HAVE},
730
  {"have_raid",		      (char*) &have_raid,		    SHOW_HAVE},
731
  {"have_rtree_keys",         (char*) &have_rtree_keys,             SHOW_HAVE},
732
  {"have_symlink",            (char*) &have_symlink,                SHOW_HAVE},
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
733
  {"init_connect",            (char*) &sys_init_connect,            SHOW_SYS},
734
  {"init_file",               (char*) &opt_init_file,               SHOW_CHAR_PTR},
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
735
  {"init_slave",              (char*) &sys_init_slave,              SHOW_SYS},
736 737
#ifdef HAVE_INNOBASE_DB
  {"innodb_additional_mem_pool_size", (char*) &innobase_additional_mem_pool_size, SHOW_LONG },
738
  {sys_innodb_autoextend_increment.name, (char*) &sys_innodb_autoextend_increment, SHOW_SYS},
739
  {"innodb_buffer_pool_awe_mem_mb", (char*) &innobase_buffer_pool_awe_mem_mb, SHOW_LONG },
740
  {"innodb_buffer_pool_size", (char*) &innobase_buffer_pool_size, SHOW_LONG },
741 742
  {"innodb_data_file_path", (char*) &innobase_data_file_path,	    SHOW_CHAR_PTR},
  {"innodb_data_home_dir",  (char*) &innobase_data_home_dir,	    SHOW_CHAR_PTR},
743 744
  {"innodb_doublewrite", (char*) &innobase_use_doublewrite, SHOW_MY_BOOL},
  {"innodb_checksums", (char*) &innobase_use_checksums, SHOW_MY_BOOL},
745
  {"innodb_fast_shutdown", (char*) &innobase_fast_shutdown, SHOW_MY_BOOL},
746
  {"innodb_file_io_threads", (char*) &innobase_file_io_threads, SHOW_LONG },
heikki@hundin.mysql.fi's avatar
heikki@hundin.mysql.fi committed
747
  {"innodb_file_per_table", (char*) &innobase_file_per_table, SHOW_MY_BOOL},
748
  {"innodb_flush_log_at_trx_commit", (char*) &innobase_flush_log_at_trx_commit, SHOW_INT},
749
  {"innodb_flush_method",    (char*) &innobase_unix_file_flush_method, SHOW_CHAR_PTR},
750
  {"innodb_force_recovery", (char*) &innobase_force_recovery, SHOW_LONG },
751
  {"innodb_lock_wait_timeout", (char*) &innobase_lock_wait_timeout, SHOW_LONG },
paul@kite-hub.kitebird.com's avatar
paul@kite-hub.kitebird.com committed
752
  {"innodb_locks_unsafe_for_binlog", (char*) &innobase_locks_unsafe_for_binlog, SHOW_MY_BOOL},
753 754 755 756 757 758
  {"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},
759
  {sys_innodb_max_dirty_pages_pct.name, (char*) &sys_innodb_max_dirty_pages_pct, SHOW_SYS},
760
  {sys_innodb_max_purge_lag.name, (char*) &sys_innodb_max_purge_lag, SHOW_SYS},
761
  {sys_innodb_max_purge_lag.name, (char*) &sys_innodb_max_purge_lag, SHOW_SYS},
762 763
  {"innodb_mirrored_log_groups", (char*) &innobase_mirrored_log_groups, SHOW_LONG},
  {"innodb_open_files", (char*) &innobase_open_files, SHOW_LONG },
paul@kite-hub.kitebird.com's avatar
paul@kite-hub.kitebird.com committed
764
  {sys_innodb_table_locks.name, (char*) &sys_innodb_table_locks, SHOW_SYS},
765
  {"innodb_thread_concurrency", (char*) &innobase_thread_concurrency, SHOW_LONG },
766 767 768 769
#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},
770 771
  {sys_key_cache_age_threshold.name,   (char*) &sys_key_cache_age_threshold,
                                                                    SHOW_SYS},
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
772
  {sys_key_cache_block_size.name,   (char*) &sys_key_cache_block_size,
773
                                                                    SHOW_SYS},
774
  {sys_key_cache_division_limit.name,   (char*) &sys_key_cache_division_limit,
775
                                                                    SHOW_SYS},
776
  {"language",                language,                             SHOW_CHAR},
777
  {"large_files_support",     (char*) &opt_large_files,             SHOW_BOOL},
778 779
  {"large_pages",             (char*) &opt_large_pages,             SHOW_MY_BOOL},
  {"large_page_size",         (char*) &opt_large_page_size,         SHOW_INT},
780
  {sys_license.name,	      (char*) &sys_license,                 SHOW_SYS},
781 782 783 784 785 786
  {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},
787
  {"log_error",               (char*) log_error_file,               SHOW_CHAR},
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
788
#ifdef HAVE_REPLICATION
789
  {"log_slave_updates",       (char*) &opt_log_slave_updates,       SHOW_MY_BOOL},
790
#endif
791
  {"log_slow_queries",        (char*) &opt_slow_log,                SHOW_BOOL},
792
  {"log_update",              (char*) &opt_update_log,              SHOW_BOOL},
793 794 795
  {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},
796
  {"lower_case_file_system",  (char*) &lower_case_file_system,      SHOW_MY_BOOL},
797
  {"lower_case_table_names",  (char*) &lower_case_table_names,      SHOW_INT},
798 799 800 801
  {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},
802
  {sys_max_connections.name,    (char*) &sys_max_connections,	    SHOW_SYS},
803
  {sys_max_delayed_threads.name,(char*) &sys_max_delayed_threads,   SHOW_SYS},
804
  {sys_max_error_count.name,	(char*) &sys_max_error_count,	    SHOW_SYS},
805
  {sys_max_heap_table_size.name,(char*) &sys_max_heap_table_size,   SHOW_SYS},
806 807
  {sys_max_insert_delayed_threads.name,
   (char*) &sys_max_insert_delayed_threads,   SHOW_SYS},
808
  {sys_max_join_size.name,	(char*) &sys_max_join_size,	    SHOW_SYS},
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
809
  {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
810
   SHOW_SYS},
811 812
  {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},
813
  {sys_max_sort_length.name,	(char*) &sys_max_sort_length,	    SHOW_SYS},
814
  {sys_max_tmp_tables.name,	(char*) &sys_max_tmp_tables,	    SHOW_SYS},
815
  {sys_max_user_connections.name,(char*) &sys_max_user_connections, SHOW_SYS},
816
  {sys_max_write_lock_count.name, (char*) &sys_max_write_lock_count,SHOW_SYS},
serg@serg.mylan's avatar
serg@serg.mylan committed
817
  {sys_myisam_data_pointer_size.name, (char*) &sys_myisam_data_pointer_size, SHOW_SYS},
818 819 820
  {sys_myisam_max_extra_sort_file_size.name,
   (char*) &sys_myisam_max_extra_sort_file_size,
   SHOW_SYS},
821 822
  {sys_myisam_max_sort_file_size.name, (char*) &sys_myisam_max_sort_file_size,
   SHOW_SYS},
823
  {"myisam_recover_options",  (char*) &myisam_recover_options_str,  SHOW_CHAR_PTR},
824
  {sys_myisam_repair_threads.name, (char*) &sys_myisam_repair_threads,
825 826 827
   SHOW_SYS},
  {sys_myisam_sort_buffer_size.name, (char*) &sys_myisam_sort_buffer_size, SHOW_SYS},
#ifdef __NT__
828
  {"named_pipe",	      (char*) &opt_enable_named_pipe,       SHOW_MY_BOOL},
829 830 831 832 833 834 835
#endif
#ifdef HAVE_NDBCLUSTER_DB
  {sys_ndb_autoincrement_prefetch_sz.name,
   (char*) &sys_ndb_autoincrement_prefetch_sz,                      SHOW_SYS},
  {sys_ndb_force_send.name,   (char*) &sys_ndb_force_send,          SHOW_SYS},
  {sys_ndb_use_exact_count.name,(char*) &sys_ndb_use_exact_count,   SHOW_SYS},
  {sys_ndb_use_transactions.name,(char*) &sys_ndb_use_transactions, SHOW_SYS},
836 837 838
#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},
839
  {sys_net_retry_count.name,  (char*) &sys_net_retry_count,	    SHOW_SYS},
840
  {sys_net_write_timeout.name,(char*) &sys_net_write_timeout,       SHOW_SYS},
841
  {sys_new_mode.name,         (char*) &sys_new_mode,                SHOW_SYS},
842
  {sys_old_passwords.name,    (char*) &sys_old_passwords,           SHOW_SYS},
843
  {"open_files_limit",	      (char*) &open_files_limit,	    SHOW_LONG},
844 845 846 847
  {sys_optimizer_prune_level.name, (char*) &sys_optimizer_prune_level,
   SHOW_SYS},
  {sys_optimizer_search_depth.name,(char*) &sys_optimizer_search_depth,
   SHOW_SYS},
848
  {"pid_file",                (char*) pidfile_name,                 SHOW_CHAR},
849
  {"port",                    (char*) &mysqld_port,                  SHOW_INT},
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
850
  {sys_preload_buff_size.name, (char*) &sys_preload_buff_size,      SHOW_SYS},
851
  {"protocol_version",        (char*) &protocol_version,            SHOW_INT},
852 853
  {sys_query_alloc_block_size.name, (char*) &sys_query_alloc_block_size,
   SHOW_SYS},
854
#ifdef HAVE_QUERY_CACHE
855
  {sys_query_cache_limit.name,(char*) &sys_query_cache_limit,	    SHOW_SYS},
856 857
  {sys_query_cache_min_res_unit.name, (char*) &sys_query_cache_min_res_unit,
   SHOW_SYS},
858 859
  {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
860 861
  {sys_query_cache_wlock_invalidate.name,
   (char *) &sys_query_cache_wlock_invalidate, SHOW_SYS},
862
#endif /* HAVE_QUERY_CACHE */
863
  {sys_query_prealloc_size.name, (char*) &sys_query_prealloc_size,  SHOW_SYS},
864 865
  {sys_range_alloc_block_size.name, (char*) &sys_range_alloc_block_size,
   SHOW_SYS},
serg@serg.mylan's avatar
serg@serg.mylan committed
866 867 868
  {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
869 870 871
#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
872
  {sys_rpl_recovery_rank.name,(char*) &sys_rpl_recovery_rank,       SHOW_SYS},
873
  {"secure_auth",             (char*) &sys_secure_auth,             SHOW_SYS},
874 875 876 877
#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
878
  {sys_server_id.name,	      (char*) &sys_server_id,		    SHOW_SYS},
879
  {"skip_external_locking",   (char*) &my_disable_locking,          SHOW_MY_BOOL},
880 881
  {"skip_networking",         (char*) &opt_disable_networking,      SHOW_BOOL},
  {"skip_show_database",      (char*) &opt_skip_show_db,            SHOW_BOOL},
882 883 884
#ifdef HAVE_REPLICATION
  {sys_slave_net_timeout.name,(char*) &sys_slave_net_timeout,	    SHOW_SYS},
#endif
885
  {sys_slow_launch_time.name, (char*) &sys_slow_launch_time,        SHOW_SYS},
886
#ifdef HAVE_SYS_UN_H
887
  {"socket",                  (char*) &mysqld_unix_port,             SHOW_CHAR_PTR},
888
#endif
889
  {sys_sort_buffer.name,      (char*) &sys_sort_buffer, 	    SHOW_SYS},
890
  {sys_sql_mode.name,         (char*) &sys_sql_mode,                SHOW_SYS},
891
  {sys_storage_engine.name,   (char*) &sys_storage_engine,          SHOW_SYS},
892 893 894 895
#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},
896 897 898
#ifdef HAVE_TZNAME
  {"system_time_zone",        system_time_zone,                     SHOW_CHAR},
#endif
899 900 901 902 903 904 905
  {"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},
906
  {sys_time_format.name,      (char*) &sys_time_format,		    SHOW_SYS},
907
  {"time_zone",               (char*) &sys_time_zone,               SHOW_SYS},
vtkachenko@intelp4d.mysql.com's avatar
vtkachenko@intelp4d.mysql.com committed
908
  {sys_timed_mutexes.name,    (char*) &sys_timed_mutexes,       SHOW_SYS},
909
  {sys_tmp_table_size.name,   (char*) &sys_tmp_table_size,	    SHOW_SYS},
910
  {"tmpdir",                  (char*) &opt_mysql_tmpdir,            SHOW_CHAR_PTR},
911 912 913
  {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},
914
  {sys_tx_isolation.name,     (char*) &sys_tx_isolation,	    SHOW_SYS},
915 916
  {sys_updatable_views_with_limit.name,
                              (char*) &sys_updatable_views_with_limit,SHOW_SYS},
917
  {"version",                 server_version,                       SHOW_CHAR},
918 919 920
#ifdef HAVE_BERKELEY_DB
  {"version_bdb",             (char*) DB_VERSION_STRING,            SHOW_CHAR},
#endif
921
  {"version_comment",         (char*) MYSQL_COMPILATION_COMMENT,    SHOW_CHAR},
922
  {"version_compile_machine", (char*) MACHINE_TYPE,		    SHOW_CHAR},
923
  {sys_os.name,		      (char*) &sys_os,			    SHOW_SYS},
924 925 926 927
  {sys_net_wait_timeout.name, (char*) &sys_net_wait_timeout,	    SHOW_SYS},
  {NullS, NullS, SHOW_LONG}
};

928

929 930 931 932 933 934
bool sys_var::check(THD *thd, set_var *var)
{
  var->save_result.ulonglong_value= var->value->val_int();
  return 0;
}

935 936 937 938 939 940 941
bool sys_var_str::check(THD *thd, set_var *var)
{
  int res;
  if (!check_func)
    return 0;

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

947 948 949 950
/*
  Functions to check and update variables
*/

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

952 953 954 955 956 957 958 959 960 961
/*
  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
962
{
963 964 965 966
  char *res= 0, *old_value=(char *)(var ? var->value->str_value.ptr() : 0);
  uint new_length= (var ? var->value->str_value.length() : 0);
  if (!old_value)
    old_value= (char*) "";
967
  if (!(res= my_strdup_with_length((byte*)old_value, new_length, MYF(0))))
968
    return 1;
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
969 970 971 972
  /*
    Replace the old value in such a way that the any thread using
    the value will work.
  */
973 974 975 976 977
  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
978 979 980 981 982
  my_free(old_value, MYF(MY_ALLOW_ZERO_PTR));
  return 0;
}


983 984 985 986 987 988
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
989 990
static void sys_default_init_connect(THD* thd, enum_var_type type)
{
991
  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
992 993 994 995 996
}


static bool sys_update_init_slave(THD *thd, set_var *var)
{
997
  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
998 999 1000 1001 1002
}


static void sys_default_init_slave(THD* thd, enum_var_type type)
{
1003
  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
1004 1005
}

1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026
static int sys_check_ftb_syntax(THD *thd,  set_var *var)
{
  if (thd->master_access & SUPER_ACL)
    return ft_boolean_check_syntax_string((byte*) var->value->str_value.c_ptr()) ?
      -1 : 0;
  else
  {
    my_error(ER_SPECIFIC_ACCESS_DENIED_ERROR, MYF(0), "SUPER");
    return 1;
  }
}

static bool sys_update_ftb_syntax(THD *thd, set_var * var)
{
  strmake(ft_boolean_syntax, var->value->str_value.c_ptr(),
	  sizeof(ft_boolean_syntax)-1);
  return 0;
}

static void sys_default_ftb_syntax(THD *thd, enum_var_type type)
{
1027
  strmake(ft_boolean_syntax, def_ft_boolean_syntax,
1028 1029
	  sizeof(ft_boolean_syntax)-1);
}
gluh@gluh.mysql.r18.ru's avatar
gluh@gluh.mysql.r18.ru committed
1030

1031 1032 1033 1034 1035
/*
  The following 3 functions need to be changed in 4.1 when we allow
  one to change character sets
*/

1036
static int sys_check_charset(THD *thd, set_var *var)
1037 1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1056 1057 1058 1059 1060 1061 1062 1063 1064 1065
{
  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);
}


1066 1067 1068 1069
static void
fix_myisam_max_extra_sort_file_size(THD *thd, enum_var_type type)
{
  myisam_max_extra_temp_length=
1070
    (my_off_t) global_system_variables.myisam_max_extra_sort_file_size;
1071 1072 1073 1074 1075 1076 1077 1078 1079 1080
}


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

1081 1082 1083 1084 1085 1086 1087 1088
/*
  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)
  {
1089
    if (thd->variables.max_join_size == HA_POS_ERROR)
1090 1091 1092 1093 1094
      thd->options|= OPTION_BIG_SELECTS;
    else
      thd->options&= ~OPTION_BIG_SELECTS;
  }
}
1095

1096 1097 1098 1099 1100 1101 1102 1103 1104 1105 1106 1107 1108 1109 1110 1111 1112 1113

/*
  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
1114
#ifdef HAVE_REPLICATION
1115 1116 1117 1118 1119 1120 1121 1122 1123 1124 1125 1126 1127
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;
}

1128 1129 1130 1131 1132
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
1133 1134 1135
#else /* HAVE_REPLICATION */
static void fix_net_read_timeout(THD *thd __attribute__(unused),
				 enum_var_type type __attribute__(unused))
1136
{}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
1137 1138
static void fix_net_write_timeout(THD *thd __attribute__(unused),
				  enum_var_type type __attribute__(unused))
1139
{}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
1140 1141
static void fix_net_retry_count(THD *thd __attribute__(unused),
				enum_var_type type __attribute__(unused))
1142
{}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
1143
#endif /* HAVE_REPLICATION */
1144

1145 1146 1147 1148

static void fix_query_cache_size(THD *thd, enum_var_type type)
{
#ifdef HAVE_QUERY_CACHE
1149
  ulong requested= query_cache_size;
1150
  query_cache.resize(query_cache_size);
1151 1152 1153 1154
  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);
1155 1156 1157 1158
#endif
}


1159 1160 1161 1162 1163 1164 1165 1166 1167
#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


1168
extern void fix_delay_key_write(THD *thd, enum_var_type type)
1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182 1183
{
  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;
  }
}

1184
static void fix_max_binlog_size(THD *thd, enum_var_type type)
1185 1186 1187 1188 1189
{
  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);
1190
#ifdef HAVE_REPLICATION
1191 1192
  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
1193
#endif
1194 1195 1196
  DBUG_VOID_RETURN;
}

1197
static void fix_max_relay_log_size(THD *thd, enum_var_type type)
1198 1199 1200 1201
{
  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));
1202
#ifdef HAVE_REPLICATION
1203 1204
  active_mi->rli.relay_log.set_max_size(max_relay_log_size ?
                                        max_relay_log_size: max_binlog_size);
1205
#endif
1206 1207
  DBUG_VOID_RETURN;
}
1208

1209

1210 1211
static int check_max_delayed_threads(THD *thd, set_var *var)
{
monty@mishka.local's avatar
monty@mishka.local committed
1212
  longlong val= var->value->val_int();
1213
  if (var->type != OPT_GLOBAL && val != 0 &&
monty@mishka.local's avatar
monty@mishka.local committed
1214
      val != (longlong) global_system_variables.max_insert_delayed_threads)
1215 1216
  {
    char buf[64];
1217
    my_error(ER_WRONG_VALUE_FOR_VAR, MYF(0), var->var->name, llstr(val, buf));
1218 1219 1220 1221 1222
    return 1;
  }
  return 0;
}

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

1224
static void fix_max_connections(THD *thd, enum_var_type type)
1225
{
1226
#ifndef EMBEDDED_LIBRARY
1227 1228
  resize_thr_alarm(max_connections + 
		   global_system_variables.max_insert_delayed_threads + 10);
1229
#endif
1230 1231 1232 1233 1234 1235
}


static void fix_thd_mem_root(THD *thd, enum_var_type type)
{
  if (type != OPT_GLOBAL)
1236
    reset_root_defaults(thd->mem_root,
1237 1238 1239 1240 1241 1242 1243 1244 1245 1246 1247
                        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);
1248 1249
}

1250

1251 1252 1253 1254
static void fix_server_id(THD *thd, enum_var_type type)
{
  server_id_supplied = 1;
}
1255

1256

1257 1258
bool sys_var_long_ptr::update(THD *thd, set_var *var)
{
1259
  ulonglong tmp= var->save_result.ulonglong_value;
1260
  pthread_mutex_lock(&LOCK_global_system_variables);
1261 1262 1263 1264
  if (option_limits)
    *value= (ulong) getopt_ull_limit_value(tmp, option_limits);
  else
    *value= (ulong) tmp;
1265
  pthread_mutex_unlock(&LOCK_global_system_variables);
1266 1267 1268 1269 1270 1271 1272 1273 1274 1275
  return 0;
}


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


1276 1277
bool sys_var_ulonglong_ptr::update(THD *thd, set_var *var)
{
1278
  ulonglong tmp= var->save_result.ulonglong_value;
1279
  pthread_mutex_lock(&LOCK_global_system_variables);
1280 1281 1282 1283
  if (option_limits)
    *value= (ulonglong) getopt_ull_limit_value(tmp, option_limits);
  else
    *value= (ulonglong) tmp;
1284
  pthread_mutex_unlock(&LOCK_global_system_variables);
1285 1286 1287 1288 1289 1290
  return 0;
}


void sys_var_ulonglong_ptr::set_default(THD *thd, enum_var_type type)
{
1291
  pthread_mutex_lock(&LOCK_global_system_variables);
1292
  *value= (ulonglong) option_limits->def_value;
1293
  pthread_mutex_unlock(&LOCK_global_system_variables);
1294 1295 1296
}


1297 1298 1299 1300 1301 1302 1303 1304 1305 1306 1307 1308 1309
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;
}


1310 1311 1312 1313 1314 1315 1316
bool sys_var_enum::update(THD *thd, set_var *var)
{
  *value= (uint) var->save_result.ulong_value;
  return 0;
}


1317
byte *sys_var_enum::value_ptr(THD *thd, enum_var_type type, LEX_STRING *base)
1318 1319 1320 1321
{
  return (byte*) enum_names->type_names[*value];
}

1322 1323 1324 1325 1326
bool sys_var_thd_ulong::check(THD *thd, set_var *var)
{
  return (sys_var_thd::check(thd, var) ||
          (check_func && (*check_func)(thd, var)));
}
1327

1328 1329
bool sys_var_thd_ulong::update(THD *thd, set_var *var)
{
1330
  ulonglong tmp= var->save_result.ulonglong_value;
1331 1332 1333 1334 1335 1336 1337 1338

  /* 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)
1339
    global_system_variables.*offset= (ulong) tmp;
1340 1341 1342 1343 1344 1345 1346 1347 1348 1349 1350 1351 1352 1353 1354 1355 1356 1357
  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;
}


1358 1359
byte *sys_var_thd_ulong::value_ptr(THD *thd, enum_var_type type,
				   LEX_STRING *base)
1360 1361 1362 1363 1364 1365 1366
{
  if (type == OPT_GLOBAL)
    return (byte*) &(global_system_variables.*offset);
  return (byte*) &(thd->variables.*offset);
}


1367 1368
bool sys_var_thd_ha_rows::update(THD *thd, set_var *var)
{
1369
  ulonglong tmp= var->save_result.ulonglong_value;
1370 1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403

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


1404 1405
byte *sys_var_thd_ha_rows::value_ptr(THD *thd, enum_var_type type,
				     LEX_STRING *base)
1406 1407 1408 1409 1410 1411
{
  if (type == OPT_GLOBAL)
    return (byte*) &(global_system_variables.*offset);
  return (byte*) &(thd->variables.*offset);
}

1412 1413
bool sys_var_thd_ulonglong::update(THD *thd,  set_var *var)
{
1414
  ulonglong tmp= var->save_result.ulonglong_value;
1415

1416
  if (tmp > max_system_variables.*offset)
1417 1418 1419
    tmp= max_system_variables.*offset;

  if (option_limits)
1420
    tmp= getopt_ull_limit_value(tmp, option_limits);
1421
  if (var->type == OPT_GLOBAL)
1422 1423 1424
  {
    /* Lock is needed to make things safe on 32 bit systems */
    pthread_mutex_lock(&LOCK_global_system_variables);
1425
    global_system_variables.*offset= (ulonglong) tmp;
1426 1427
    pthread_mutex_unlock(&LOCK_global_system_variables);
  }
1428
  else
1429
    thd->variables.*offset= (ulonglong) tmp;
1430 1431 1432 1433 1434 1435 1436
  return 0;
}


void sys_var_thd_ulonglong::set_default(THD *thd, enum_var_type type)
{
  if (type == OPT_GLOBAL)
1437 1438
  {
    pthread_mutex_lock(&LOCK_global_system_variables);
1439
    global_system_variables.*offset= (ulonglong) option_limits->def_value;
1440 1441
    pthread_mutex_unlock(&LOCK_global_system_variables);
  }
1442 1443 1444 1445 1446
  else
    thd->variables.*offset= global_system_variables.*offset;
}


1447 1448
byte *sys_var_thd_ulonglong::value_ptr(THD *thd, enum_var_type type,
				       LEX_STRING *base)
1449 1450 1451 1452 1453 1454 1455 1456 1457 1458 1459 1460 1461 1462 1463 1464 1465 1466 1467 1468 1469 1470 1471 1472 1473 1474
{
  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;
}


1475 1476
byte *sys_var_thd_bool::value_ptr(THD *thd, enum_var_type type,
				  LEX_STRING *base)
1477 1478 1479 1480 1481 1482 1483 1484 1485
{
  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)
{
1486 1487
  char buff[80];
  const char *value;
1488
  String str(buff, sizeof(buff), system_charset_info), *res;
1489 1490 1491 1492 1493

  if (var->value->result_type() == STRING_RESULT)
  {
    if (!(res=var->value->val_str(&str)) ||
	((long) (var->save_result.ulong_value=
1494 1495
		 (ulong) find_type(enum_names, res->ptr(),
				   res->length(),1)-1)) < 0)
1496
    {
1497
      value= res ? res->c_ptr() : "NULL";
1498 1499 1500 1501 1502 1503 1504 1505 1506 1507 1508 1509 1510 1511 1512 1513 1514
      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:
1515
  my_error(ER_WRONG_VALUE_FOR_VAR, MYF(0), name, value);
1516 1517 1518
  return 1;
}

1519 1520 1521

bool sys_var::check_set(THD *thd, set_var *var, TYPELIB *enum_names)
{
1522
  bool not_used;
1523
  char buff[80], *error= 0;
1524 1525 1526 1527 1528 1529 1530
  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
1531 1532
    var->save_result.ulong_value= ((ulong)
				   find_set(enum_names, res->c_ptr(),
1533 1534 1535
					    res->length(),
                                            NULL,
                                            &error, &error_len,
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1536
					    &not_used));
1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555
    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:
1556
  my_error(ER_WRONG_VALUE_FOR_VAR, MYF(0), name, buff);
1557 1558 1559 1560
  return 1;
}


1561 1562 1563 1564 1565 1566 1567
/*
  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.
1568 1569 1570 1571

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

1574
Item *sys_var::item(THD *thd, enum_var_type var_type, LEX_STRING *base)
1575 1576 1577 1578 1579
{
  if (check_type(var_type))
  {
    if (var_type != OPT_DEFAULT)
    {
1580 1581
      my_error(ER_INCORRECT_GLOBAL_LOCAL_VAR, MYF(0),
               name, var_type == OPT_GLOBAL ? "SESSION" : "GLOBAL");
1582 1583 1584 1585 1586 1587 1588
      return 0;
    }
    /* As there was no local variable, return the global value */
    var_type= OPT_GLOBAL;
  }
  switch (type()) {
  case SHOW_LONG:
1589 1590 1591 1592 1593 1594 1595
  {
    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);
  }
1596
  case SHOW_LONGLONG:
1597 1598 1599
  {
    longlong value;
    pthread_mutex_lock(&LOCK_global_system_variables);
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1600
    value= *(longlong*) value_ptr(thd, var_type, base);
1601 1602 1603
    pthread_mutex_unlock(&LOCK_global_system_variables);
    return new Item_int(value);
  }
1604
  case SHOW_HA_ROWS:
1605 1606 1607
  {
    ha_rows value;
    pthread_mutex_lock(&LOCK_global_system_variables);
monty@narttu.mysql.fi's avatar
monty@narttu.mysql.fi committed
1608
    value= *(ha_rows*) value_ptr(thd, var_type, base);
1609 1610 1611
    pthread_mutex_unlock(&LOCK_global_system_variables);
    return new Item_int((longlong) value);
  }
1612
  case SHOW_MY_BOOL:
1613
    return new Item_int((int32) *(my_bool*) value_ptr(thd, var_type, base),1);
1614 1615
  case SHOW_CHAR:
  {
1616 1617
    Item_string *tmp;
    pthread_mutex_lock(&LOCK_global_system_variables);
1618
    char *str= (char*) value_ptr(thd, var_type, base);
1619 1620 1621
    tmp= new Item_string(str, strlen(str), system_charset_info);
    pthread_mutex_unlock(&LOCK_global_system_variables);
    return tmp;
1622 1623
  }
  default:
1624
    my_error(ER_VAR_CANT_BE_READ, MYF(0), name);
1625 1626 1627 1628 1629 1630 1631 1632 1633 1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648
  }
  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;
}


1649 1650
byte *sys_var_thd_enum::value_ptr(THD *thd, enum_var_type type,
				  LEX_STRING *base)
1651 1652 1653 1654 1655 1656 1657
{
  ulong tmp= ((type == OPT_GLOBAL) ?
	      global_system_variables.*offset :
	      thd->variables.*offset);
  return (byte*) enum_names->type_names[tmp];
}

1658 1659 1660 1661 1662
bool sys_var_thd_bit::check(THD *thd, set_var *var)
{
  return (check_enum(thd, var, &bool_typelib) ||
          (check_func && (*check_func)(thd, var)));
}
1663 1664 1665

bool sys_var_thd_bit::update(THD *thd, set_var *var)
{
1666
  int res= (*update_func)(thd, var);
1667 1668 1669 1670
  return res;
}


1671 1672
byte *sys_var_thd_bit::value_ptr(THD *thd, enum_var_type type,
				 LEX_STRING *base)
1673 1674 1675 1676 1677 1678 1679 1680 1681 1682 1683
{
  /*
    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;
}


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 1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733 1734 1735
/* 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())))
  {
1736
    my_error(ER_WRONG_VALUE_FOR_VAR, MYF(0), name, res->c_ptr());
1737 1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749 1750 1751 1752 1753 1754 1755 1756 1757 1758 1759 1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789
    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;
}


1790 1791
typedef struct old_names_map_st
{
1792 1793 1794
  const char *old_name;
  const char *new_name;
} my_old_conv;
1795

1796 1797
static my_old_conv old_conv[]= 
{
1798 1799 1800 1801 1802 1803 1804 1805 1806 1807 1808
  {	"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		}
1809
};
1810

1811
CHARSET_INFO *get_old_charset_by_name(const char *name)
1812
{
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1813
  my_old_conv *conv;
1814
 
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1815
  for (conv= old_conv; conv->old_name; conv++)
1816
  {
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1817 1818
    if (!my_strcasecmp(&my_charset_latin1, name, conv->old_name))
      return get_charset_by_csname(conv->new_name, MY_CS_PRIMARY, MYF(0));
1819
  }
1820
  return NULL;
1821 1822
}

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

1824
bool sys_var_collation::check(THD *thd, set_var *var)
1825 1826 1827
{
  CHARSET_INFO *tmp;

1828
  if (var->value->result_type() == STRING_RESULT)
1829
  {
1830 1831 1832 1833
    char buff[80];
    String str(buff,sizeof(buff), system_charset_info), *res;
    if (!(res=var->value->val_str(&str)))
    {
1834
      my_error(ER_WRONG_VALUE_FOR_VAR, MYF(0), name, "NULL");
1835 1836 1837 1838
      return 1;
    }
    if (!(tmp=get_charset_by_name(res->c_ptr(),MYF(0))))
    {
1839
      my_error(ER_UNKNOWN_COLLATION, MYF(0), res->c_ptr());
1840 1841
      return 1;
    }
1842
  }
1843
  else // INT_RESULT
1844
  {
1845
    if (!(tmp=get_charset((int) var->value->val_int(),MYF(0))))
1846 1847
    {
      char buf[20];
1848
      int10_to_str((int) var->value->val_int(), buf, -10);
1849
      my_error(ER_UNKNOWN_COLLATION, MYF(0), buf);
1850 1851
      return 1;
    }
1852 1853 1854 1855 1856
  }
  var->save_result.charset= tmp;	// Save for update
  return 0;
}

1857

1858 1859 1860 1861
bool sys_var_character_set::check(THD *thd, set_var *var)
{
  CHARSET_INFO *tmp;

1862 1863 1864 1865 1866
  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)))
1867
    {
1868 1869
      if (!nullable)
      {
1870
        my_error(ER_WRONG_VALUE_FOR_VAR, MYF(0), name, "NULL");
1871 1872 1873 1874 1875 1876 1877
        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())))
    {
1878
      my_error(ER_UNKNOWN_CHARACTER_SET, MYF(0), res->c_ptr());
1879 1880 1881
      return 1;
    }
  }
1882
  else // INT_RESULT
1883
  {
1884
    if (!(tmp=get_charset((int) var->value->val_int(),MYF(0))))
1885 1886
    {
      char buf[20];
1887
      int10_to_str((int) var->value->val_int(), buf, -10);
1888 1889 1890
      my_error(ER_UNKNOWN_CHARACTER_SET, MYF(0), buf);
      return 1;
    }
1891 1892 1893 1894 1895
  }
  var->save_result.charset= tmp;	// Save for update
  return 0;
}

1896

1897
bool sys_var_character_set::update(THD *thd, set_var *var)
1898
{
1899
  ci_ptr(thd,var->type)[0]= var->save_result.charset;
bar@bar.mysql.r18.ru's avatar
bar@bar.mysql.r18.ru committed
1900
  thd->update_charset();
1901 1902 1903
  return 0;
}

1904 1905 1906

byte *sys_var_character_set::value_ptr(THD *thd, enum_var_type type,
				       LEX_STRING *base)
1907
{
1908
  CHARSET_INFO *cs= ci_ptr(thd,type)[0];
1909
  return cs ? (byte*) cs->csname : (byte*) "NULL";
1910 1911
}

1912

1913 1914
CHARSET_INFO ** sys_var_character_set_connection::ci_ptr(THD *thd,
							 enum_var_type type)
1915 1916 1917 1918 1919 1920 1921
{
  if (type == OPT_GLOBAL)
    return &global_system_variables.collation_connection;
  else
    return &thd->variables.collation_connection;
}

1922 1923 1924

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

1935

1936 1937
CHARSET_INFO ** sys_var_character_set_client::ci_ptr(THD *thd,
						     enum_var_type type)
1938 1939 1940 1941 1942 1943 1944
{
  if (type == OPT_GLOBAL)
    return &global_system_variables.character_set_client;
  else
    return &thd->variables.character_set_client;
}

1945

1946
void sys_var_character_set_client::set_default(THD *thd, enum_var_type type)
1947 1948
{
 if (type == OPT_GLOBAL)
1949
   global_system_variables.character_set_client= default_charset_info;
1950
 else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1951 1952 1953 1954 1955
 {
   thd->variables.character_set_client= (global_system_variables.
					 character_set_client);
   thd->update_charset();
 }
1956
}
1957

1958

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1959 1960
CHARSET_INFO **
sys_var_character_set_results::ci_ptr(THD *thd, enum_var_type type)
1961
{
1962 1963
  if (type == OPT_GLOBAL)
    return &global_system_variables.character_set_results;
1964
  else
1965
    return &thd->variables.character_set_results;
1966 1967
}

1968

1969
void sys_var_character_set_results::set_default(THD *thd, enum_var_type type)
1970
{
1971
 if (type == OPT_GLOBAL)
1972
   global_system_variables.character_set_results= default_charset_info;
1973
 else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1974 1975 1976 1977 1978
 {
   thd->variables.character_set_results= (global_system_variables.
					  character_set_results);
   thd->update_charset();
 }
1979 1980
}

1981

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1982 1983
CHARSET_INFO **
sys_var_character_set_server::ci_ptr(THD *thd, enum_var_type type)
1984 1985
{
  if (type == OPT_GLOBAL)
1986
    return &global_system_variables.collation_server;
1987
  else
1988
    return &thd->variables.collation_server;
1989 1990
}

1991

1992
void sys_var_character_set_server::set_default(THD *thd, enum_var_type type)
1993 1994
{
 if (type == OPT_GLOBAL)
1995
   global_system_variables.collation_server= default_charset_info;
1996
 else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1997
 {
1998
   thd->variables.collation_server= global_system_variables.collation_server;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
1999 2000
   thd->update_charset();
 }
2001 2002
}

2003
#if defined(HAVE_REPLICATION)
2004 2005 2006 2007 2008 2009
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))
  {
2010 2011
    my_error(ER_LOGING_PROHIBIT_CHANGING_OF, MYF(0),
	     "character set, collation");
2012 2013 2014 2015 2016
    return 1;
  }
  return sys_var_character_set::check(thd,var);
}
#endif
2017 2018 2019

CHARSET_INFO ** sys_var_character_set_database::ci_ptr(THD *thd,
						       enum_var_type type)
2020 2021
{
  if (type == OPT_GLOBAL)
2022
    return &global_system_variables.collation_database;
2023
  else
2024
    return &thd->variables.collation_database;
2025 2026
}

2027

2028 2029 2030
void sys_var_character_set_database::set_default(THD *thd, enum_var_type type)
{
 if (type == OPT_GLOBAL)
2031
    global_system_variables.collation_database= default_charset_info;
2032
  else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2033
  {
2034
    thd->variables.collation_database= thd->db_charset;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2035 2036
    thd->update_charset();
  }
2037 2038
}

2039

2040
bool sys_var_collation_connection::update(THD *thd, set_var *var)
2041 2042
{
  if (var->type == OPT_GLOBAL)
2043
    global_system_variables.collation_connection= var->save_result.charset;
2044
  else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2045
  {
2046
    thd->variables.collation_connection= var->save_result.charset;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2047 2048
    thd->update_charset();
  }
2049 2050 2051
  return 0;
}

2052 2053 2054

byte *sys_var_collation_connection::value_ptr(THD *thd, enum_var_type type,
					      LEX_STRING *base)
2055 2056
{
  CHARSET_INFO *cs= ((type == OPT_GLOBAL) ?
2057 2058 2059
		  global_system_variables.collation_connection :
		  thd->variables.collation_connection);
  return cs ? (byte*) cs->name : (byte*) "NULL";
2060 2061
}

2062

2063
void sys_var_collation_connection::set_default(THD *thd, enum_var_type type)
2064 2065
{
 if (type == OPT_GLOBAL)
2066
   global_system_variables.collation_connection= default_charset_info;
2067
 else
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2068 2069 2070 2071 2072
 {
   thd->variables.collation_connection= (global_system_variables.
					 collation_connection);
   thd->update_charset();
 }
2073 2074
}

2075 2076 2077 2078 2079 2080 2081 2082 2083 2084 2085 2086 2087 2088 2089 2090 2091 2092 2093 2094 2095 2096 2097 2098 2099 2100 2101 2102 2103 2104 2105 2106 2107 2108 2109
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();
 }
}

2110
#if defined(HAVE_REPLICATION)
2111 2112 2113 2114 2115 2116
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))
  {
2117 2118
    my_error(ER_LOGING_PROHIBIT_CHANGING_OF, MYF(0),
	     "character set, collation");
2119 2120 2121 2122 2123
    return 1;
  }
  return sys_var_collation::check(thd,var);
}
#endif
2124 2125 2126 2127 2128 2129 2130 2131 2132 2133 2134 2135 2136 2137 2138 2139 2140 2141 2142 2143 2144 2145 2146 2147 2148 2149 2150 2151 2152 2153 2154 2155 2156 2157 2158 2159

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

2160

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

2163
static KEY_CACHE zero_key_cache;
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2164

2165
KEY_CACHE *get_key_cache(LEX_STRING *cache_name)
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2166
{
2167 2168
  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
2169
    cache_name= &default_key_cache_base;
2170
  return ((KEY_CACHE*) find_named(&key_caches,
2171
                                      cache_name->str, cache_name->length, 0));
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2172 2173
}

2174

igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2175 2176
byte *sys_var_key_cache_param::value_ptr(THD *thd, enum_var_type type,
					 LEX_STRING *base)
2177
{
2178
  KEY_CACHE *key_cache= get_key_cache(base);
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2179 2180 2181 2182
  if (!key_cache)
    key_cache= &zero_key_cache;
  return (byte*) key_cache + offset ;
}
2183

2184

2185 2186
bool sys_var_key_buffer_size::update(THD *thd, set_var *var)
{
2187
  ulonglong tmp= var->save_result.ulonglong_value;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2188
  LEX_STRING *base_name= &var->base;
2189
  KEY_CACHE *key_cache;
2190 2191 2192
  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
2193
  if (!base_name->length)
2194
    base_name= &default_key_cache_base;
2195 2196 2197

  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
2198
                            
2199 2200
  if (!key_cache)
  {
2201
    /* Key cache didn't exists */
2202
    if (!tmp)					// Tried to delete cache
2203 2204 2205 2206 2207 2208
      goto end;					// Ok, nothing to do
    if (!(key_cache= create_key_cache(base_name->str, base_name->length)))
    {
      error= 1;
      goto end;
    }
2209
  }
2210 2211 2212 2213 2214 2215 2216 2217 2218

  /*
    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
2219
  if (!tmp)					// Zero size means delete
2220
  {
2221 2222 2223
    if (key_cache == sql_key_cache)
      goto end;					// Ignore default key cache

2224
    if (key_cache->key_cache_inited)		// If initied
2225 2226
    {
      /*
2227 2228
	Move tables using this key cache to the default key cache
	and clear the old key cache.
2229
      */
2230
      NAMED_LIST *list; 
2231
      key_cache= (KEY_CACHE *) find_named(&key_caches, base_name->str,
2232
					      base_name->length, &list);
2233 2234 2235 2236 2237
      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;
2238
    }
2239 2240 2241 2242 2243
    /*
      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;
2244 2245
  }

2246 2247
  key_cache->param_buff_size=
    (ulonglong) getopt_ull_limit_value(tmp, option_limits);
2248

2249 2250 2251 2252
  /* If key cache didn't existed initialize it, else resize it */
  key_cache->in_init= 1;
  pthread_mutex_unlock(&LOCK_global_system_variables);

2253
  if (!key_cache->key_cache_inited)
2254
    error= (bool) (ha_init_key_cache("", key_cache));
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2255
  else
2256
    error= (bool)(ha_resize_key_cache(key_cache));
2257

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

2261 2262 2263
end:
  pthread_mutex_unlock(&LOCK_global_system_variables);
  return error;
2264 2265
}

2266 2267

bool sys_var_key_cache_long::update(THD *thd, set_var *var)
2268
{
monty@mysql.com's avatar
monty@mysql.com committed
2269
  ulong tmp= (ulong) var->value->val_int();
2270
  LEX_STRING *base_name= &var->base;
2271 2272
  bool error= 0;

2273
  if (!base_name->length)
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2274
    base_name= &default_key_cache_base;
2275 2276

  pthread_mutex_lock(&LOCK_global_system_variables);
2277
  KEY_CACHE *key_cache= get_key_cache(base_name);
2278

igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
2279 2280
  if (!key_cache && !(key_cache= create_key_cache(base_name->str,
				                  base_name->length)))
2281 2282 2283 2284
  {
    error= 1;
    goto end;
  }
2285

2286 2287 2288 2289 2290 2291 2292 2293 2294
  /*
    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))=
2295
    (ulong) getopt_ull_limit_value(tmp, option_limits);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2296

2297 2298 2299 2300 2301
  /*
    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;
2302

2303
  pthread_mutex_unlock(&LOCK_global_system_variables);
2304

2305 2306 2307 2308 2309 2310 2311 2312
  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;
2313 2314
}

2315

2316 2317 2318 2319
/*****************************************************************************
  Functions to handle SET NAMES and SET CHARACTER SET
*****************************************************************************/

2320
int set_var_collation_client::check(THD *thd)
2321 2322 2323 2324
{
  return 0;
}

2325
int set_var_collation_client::update(THD *thd)
2326
{
2327 2328
  thd->variables.character_set_client= character_set_client;
  thd->variables.character_set_results= character_set_results;
2329
  thd->variables.collation_connection= collation_connection;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2330
  thd->update_charset();
2331 2332 2333 2334 2335 2336 2337
  thd->protocol_simple.init(thd);
  thd->protocol_prep.init(thd);
  return 0;
}

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

2338 2339
bool sys_var_timestamp::update(THD *thd,  set_var *var)
{
2340
  thd->set_time((time_t) var->save_result.ulonglong_value);
2341 2342 2343 2344 2345 2346 2347 2348 2349 2350
  return 0;
}


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


2351 2352
byte *sys_var_timestamp::value_ptr(THD *thd, enum_var_type type,
				   LEX_STRING *base)
2353 2354 2355 2356 2357 2358 2359 2360
{
  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)
{
2361
  thd->insert_id(var->save_result.ulonglong_value);
2362 2363 2364 2365
  return 0;
}


2366 2367
byte *sys_var_last_insert_id::value_ptr(THD *thd, enum_var_type type,
					LEX_STRING *base)
2368 2369 2370 2371 2372 2373 2374 2375
{
  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)
{
2376
  thd->next_insert_id= var->save_result.ulonglong_value;
2377 2378 2379 2380
  return 0;
}


2381 2382
byte *sys_var_insert_id::value_ptr(THD *thd, enum_var_type type,
				   LEX_STRING *base)
2383 2384 2385 2386 2387
{
  return (byte*) &thd->current_insert_id;
}


hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
2388
#ifdef HAVE_REPLICATION
2389 2390
bool sys_var_slave_skip_counter::check(THD *thd, set_var *var)
{
2391
  int result= 0;
2392
  pthread_mutex_lock(&LOCK_active_mi);
2393 2394 2395
  pthread_mutex_lock(&active_mi->rli.run_lock);
  if (active_mi->rli.slave_running)
  {
bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
2396
    my_message(ER_SLAVE_MUST_STOP, ER(ER_SLAVE_MUST_STOP), MYF(0));
2397 2398 2399
    result=1;
  }
  pthread_mutex_unlock(&active_mi->rli.run_lock);
2400
  pthread_mutex_unlock(&LOCK_active_mi);
2401
  var->save_result.ulong_value= (ulong) var->value->val_int();
2402 2403 2404 2405 2406 2407
  return result;
}


bool sys_var_slave_skip_counter::update(THD *thd, set_var *var)
{
2408
  pthread_mutex_lock(&LOCK_active_mi);
2409 2410 2411 2412 2413 2414 2415 2416 2417
  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);
2418
    active_mi->rli.slave_skip_counter= var->save_result.ulong_value;
2419 2420 2421
    pthread_mutex_unlock(&active_mi->rli.data_lock);
  }
  pthread_mutex_unlock(&active_mi->rli.run_lock);
2422
  pthread_mutex_unlock(&LOCK_active_mi);
2423 2424
  return 0;
}
2425 2426 2427 2428 2429


bool sys_var_sync_binlog_period::update(THD *thd, set_var *var)
{
  pthread_mutex_t *lock_log= mysql_bin_log.get_log_lock();
2430
  sync_binlog_period= (ulong) var->save_result.ulonglong_value;
2431 2432 2433 2434 2435 2436 2437 2438 2439
  /*
    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;
2440
}
hf@deer.mysql.r18.ru's avatar
SCRUM  
hf@deer.mysql.r18.ru committed
2441
#endif /* HAVE_REPLICATION */
2442

2443 2444
bool sys_var_rand_seed1::update(THD *thd, set_var *var)
{
2445
  thd->rand.seed1= (ulong) var->save_result.ulonglong_value;
2446 2447 2448 2449 2450
  return 0;
}

bool sys_var_rand_seed2::update(THD *thd, set_var *var)
{
2451
  thd->rand.seed2= (ulong) var->save_result.ulonglong_value;
2452 2453 2454 2455
  return 0;
}


2456 2457 2458 2459 2460 2461
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);

2462
#if defined(HAVE_REPLICATION)
2463 2464 2465 2466
  if ((var->type == OPT_GLOBAL) &&
      (mysql_bin_log.is_open() ||
       active_mi->slave_running || active_mi->rli.slave_running))
  {
2467
    my_error(ER_LOGING_PROHIBIT_CHANGING_OF, MYF(0), "time zone");
2468 2469 2470
    return 1;
  }
#endif
2471 2472

  if (!(var->save_result.time_zone=
2473
        my_tz_find(res, thd->lex->time_zone_tables_used)))
2474
  {
2475
    my_error(ER_UNKNOWN_TIME_ZONE, MYF(0), res ? res->c_ptr() : "NULL");
2476 2477 2478 2479 2480 2481 2482 2483
    return 1;
  }
  return 0;
}


bool sys_var_thd_time_zone::update(THD *thd, set_var *var)
{
2484
  /* We are using Time_zone object found during check() phase */
2485 2486 2487 2488 2489 2490 2491 2492 2493 2494 2495 2496 2497 2498 2499 2500 2501 2502 2503 2504 2505 2506 2507 2508 2509 2510 2511 2512 2513 2514 2515 2516 2517
  *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);
2518 2519
     global_system_variables.time_zone=
       my_tz_find(&str, thd->lex->time_zone_tables_used);
2520 2521 2522 2523 2524 2525 2526 2527
   }
   else
     global_system_variables.time_zone= my_tz_SYSTEM;
 }
 else
   thd->variables.time_zone= global_system_variables.time_zone;
}

2528 2529 2530 2531 2532 2533 2534 2535 2536 2537 2538 2539 2540 2541 2542 2543 2544 2545 2546 2547 2548 2549 2550 2551 2552 2553 2554 2555 2556 2557 2558 2559 2560 2561 2562 2563 2564 2565 2566 2567 2568 2569 2570 2571 2572

bool sys_var_max_user_conn::check(THD *thd, set_var *var)
{
  if (var->type == OPT_GLOBAL)
    return sys_var_thd::check(thd, var);
  else
  {
    /*
      Per-session values of max_user_connections can't be set directly.
      QQ: May be we should have a separate error message for this?
    */
    my_error(ER_GLOBAL_VARIABLE, MYF(0), name);
    return TRUE;
  }
}

bool sys_var_max_user_conn::update(THD *thd, set_var *var)
{
  DBUG_ASSERT(var->type == OPT_GLOBAL);
  pthread_mutex_lock(&LOCK_global_system_variables);
  max_user_connections= var->save_result.ulonglong_value;
  pthread_mutex_unlock(&LOCK_global_system_variables);
  return 0;
}


void sys_var_max_user_conn::set_default(THD *thd, enum_var_type type)
{
  DBUG_ASSERT(type == OPT_GLOBAL);
  pthread_mutex_lock(&LOCK_global_system_variables);
  max_user_connections= (ulong) option_limits->def_value;
  pthread_mutex_unlock(&LOCK_global_system_variables);
}


byte *sys_var_max_user_conn::value_ptr(THD *thd, enum_var_type type,
                                       LEX_STRING *base)
{
  if (type != OPT_GLOBAL &&
      thd->user_connect && thd->user_connect->user_resources.user_conn)
    return (byte*) &(thd->user_connect->user_resources.user_conn);
  return (byte*) &(max_user_connections);
}


2573 2574 2575 2576 2577 2578
/*
  Functions to update thd->options bits
*/

static bool set_option_bit(THD *thd, set_var *var)
{
2579 2580 2581
  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;
2582
  else
2583
    thd->options|= sys_var->bit_flag;
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 2617
  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;
}

2618 2619 2620 2621 2622 2623 2624 2625 2626 2627 2628
static int check_log_update(THD *thd, set_var *var)
{
#ifndef NO_EMBEDDED_ACCESS_CHECKS
  if (!(thd->master_access & SUPER_ACL))
  {
    my_error(ER_SPECIFIC_ACCESS_DENIED_ERROR, MYF(0), "SUPER");
    return 1;
  }
#endif
  return 0;
}
2629 2630 2631

static bool set_log_update(THD *thd, set_var *var)
{
2632 2633 2634 2635 2636 2637
  /*
    The update log is not supported anymore since 5.0.
    See sql/mysqld.cc/, comments in function init_server_components() for an
    explaination of the different warnings we send below
  */
    
2638
  if (opt_sql_bin_update)
2639
  {
2640 2641
    ((sys_var_thd_bit*) var->var)->bit_flag|= (OPTION_BIN_LOG |
					       OPTION_UPDATE_LOG);
2642 2643 2644 2645 2646 2647 2648 2649
    push_warning(thd, MYSQL_ERROR::WARN_LEVEL_NOTE,
                 ER_UPDATE_LOG_DEPRECATED_TRANSLATED,
                 ER(ER_UPDATE_LOG_DEPRECATED_TRANSLATED));
  }
  else
    push_warning(thd, MYSQL_ERROR::WARN_LEVEL_NOTE,
                 ER_UPDATE_LOG_DEPRECATED_IGNORED,
                 ER(ER_UPDATE_LOG_DEPRECATED_IGNORED));
2650 2651 2652 2653
  set_option_bit(thd, var);
  return 0;
}

2654
static bool set_log_bin(THD *thd, set_var *var)
2655 2656 2657 2658 2659 2660 2661 2662
{
  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;
}

2663 2664 2665 2666 2667 2668 2669 2670 2671 2672 2673 2674 2675 2676 2677
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
}
2678

2679 2680 2681 2682 2683 2684 2685 2686 2687 2688 2689 2690 2691 2692 2693
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;
}

2694 2695 2696 2697 2698 2699 2700 2701 2702 2703 2704 2705 2706 2707 2708 2709 2710 2711 2712 2713 2714 2715 2716 2717 2718 2719 2720 2721 2722 2723 2724 2725 2726 2727 2728 2729 2730 2731 2732 2733 2734 2735 2736 2737 2738 2739 2740 2741 2742 2743 2744 2745 2746 2747 2748 2749 2750 2751 2752

/****************************************************************************
  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()
{
2753 2754
  hash_init(&system_variable_hash, system_charset_info,
	    array_elements(sys_variables),0,0,
2755
	    (hash_get_key) get_sys_var_length,0,0);
2756 2757 2758 2759 2760 2761 2762
  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
2763
    my_hash_insert(&system_variable_hash, (byte*) *var);
2764 2765 2766 2767 2768 2769 2770 2771 2772 2773 2774 2775 2776 2777 2778 2779 2780 2781 2782 2783 2784 2785 2786 2787 2788 2789 2790 2791 2792 2793 2794
  }
  /*
    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

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

2795
sys_var *find_sys_var(const char *str, uint length)
2796
{
2797 2798
  sys_var *var= (sys_var*) hash_search(&system_variable_hash,
				       (byte*) str,
2799 2800 2801
				       length ? length :
				       strlen(str));
  if (!var)
2802
    my_error(ER_UNKNOWN_SYSTEM_VARIABLE, MYF(0), (char*) str);
2803 2804 2805 2806 2807 2808 2809 2810 2811 2812 2813 2814 2815 2816 2817 2818 2819 2820 2821 2822 2823 2824
  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
2825 2826
    1	ERROR, message sent (normally no variables was updated)
    -1  ERROR, message not sent
2827 2828
*/

2829
int sql_set_variables(THD *thd, List<set_var_base> *var_list)
2830
{
2831
  int error;
2832
  List_iterator_fast<set_var_base> it(*var_list);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2833
  DBUG_ENTER("sql_set_variables");
2834 2835 2836 2837

  set_var_base *var;
  while ((var=it++))
  {
2838
    if ((error= var->check(thd)))
2839
      goto err;
2840
  }
2841
  if (!(error= test(thd->net.report_error)))
2842 2843 2844 2845 2846
  {
    it.rewind();
    while ((var= it++))
      error|= var->update(thd);         // Returns 0, -1 or 1
  }
2847

2848 2849
err:
  free_underlaid_joins(thd, &thd->lex->select_lex);
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
2850
  DBUG_RETURN(error);
2851 2852 2853
}


2854 2855 2856 2857 2858 2859 2860 2861 2862 2863 2864 2865 2866 2867 2868 2869 2870 2871 2872 2873 2874 2875 2876 2877 2878 2879 2880 2881 2882 2883
/*
  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;
}


2884 2885 2886 2887
/*****************************************************************************
  Functions to handle SET mysql_internal_variable=const_expr
*****************************************************************************/

2888
int set_var::check(THD *thd)
2889 2890 2891
{
  if (var->check_type(type))
  {
bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
2892
    int err= type == OPT_GLOBAL ? ER_LOCAL_VARIABLE : ER_GLOBAL_VARIABLE;
2893
    my_error(err, MYF(0), var->name);
2894
    return -1;
2895 2896 2897 2898 2899 2900 2901 2902
  }
  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))
    {
2903
      my_error(ER_NO_DEFAULT, MYF(0), var->name);
2904
      return -1;
2905 2906 2907 2908
    }
    return 0;
  }

2909 2910
  if ((!value->fixed && 
       value->fix_fields(thd, 0, &value)) || value->check_cols(1))
2911
    return -1;
2912 2913
  if (var->check_update_type(value->result_type()))
  {
2914
    my_error(ER_WRONG_TYPE_FOR_VAR, MYF(0), var->name);
2915
    return -1;
2916
  }
2917
  return var->check(thd, this) ? -1 : 0;
2918 2919 2920
}


bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
2921 2922 2923 2924 2925 2926 2927 2928 2929 2930 2931 2932
/*
  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
*/
2933 2934 2935 2936
int set_var::light_check(THD *thd)
{
  if (var->check_type(type))
  {
bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
2937
    int err= type == OPT_GLOBAL ? ER_LOCAL_VARIABLE : ER_GLOBAL_VARIABLE;
2938
    my_error(err, MYF(0), var->name);
2939 2940
    return -1;
  }
bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
2941
  if (type == OPT_GLOBAL && check_global_access(thd, SUPER_ACL))
2942 2943
    return 1;

2944 2945
  if (value && ((!value->fixed && value->fix_fields(thd, 0, &value)) ||
                value->check_cols(1)))
2946 2947 2948 2949 2950
    return -1;
  return 0;
}


2951
int set_var::update(THD *thd)
2952 2953 2954 2955
{
  if (!value)
    var->set_default(thd, type);
  else if (var->update(thd, this))
2956
    return -1;				// should never happen
2957 2958 2959 2960 2961 2962 2963 2964 2965 2966
  if (var->after_update)
    (*var->after_update)(thd, type);
  return 0;
}


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

2967
int set_var_user::check(THD *thd)
2968
{
bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
2969 2970
  /*
    Item_func_set_user_var can't substitute something else on its place =>
2971
    0 can be passed as last argument (reference on item)
bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
2972 2973
  */
  return (user_var_item->fix_fields(thd, 0, (Item**) 0) ||
2974
	  user_var_item->check()) ? -1 : 0;
2975 2976 2977
}


bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
2978 2979 2980 2981 2982 2983 2984 2985 2986 2987 2988 2989
/*
  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
*/
2990 2991 2992 2993 2994 2995 2996 2997 2998 2999
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));
}


3000
int set_var_user::update(THD *thd)
3001 3002 3003 3004
{
  if (user_var_item->update())
  {
    /* Give an error if it's not given already */
bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
3005
    my_message(ER_SET_CONSTANTS_ONLY, ER(ER_SET_CONSTANTS_ONLY), MYF(0));
3006
    return -1;
3007 3008 3009 3010 3011 3012 3013 3014 3015
  }
  return 0;
}


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

3016
int set_var_password::check(THD *thd)
3017
{
hf@deer.(none)'s avatar
hf@deer.(none) committed
3018
#ifndef NO_EMBEDDED_ACCESS_CHECKS
3019 3020
  if (!user->host.str)
    user->host.str= (char*) thd->host_or_ip;
3021
  /* Returns 1 as the function sends error to client */
3022 3023 3024
  return check_change_password(thd, user->host.str, user->user.str, password) ?
         1 : 0;
#else
hf@deer.(none)'s avatar
hf@deer.(none) committed
3025 3026
  return 0;
#endif
3027 3028
}

3029
int set_var_password::update(THD *thd)
3030
{
hf@deer.(none)'s avatar
hf@deer.(none) committed
3031
#ifndef NO_EMBEDDED_ACCESS_CHECKS
3032
  /* Returns 1 as the function sends error to client */
3033 3034
  return change_password(thd, user->host.str, user->user.str, password) ?
	  1 : 0;
hf@deer.(none)'s avatar
hf@deer.(none) committed
3035 3036 3037
#else
  return 0;
#endif
3038 3039
}

3040 3041 3042 3043
/****************************************************************************
 Functions to handle table_type
****************************************************************************/

3044 3045
/* Based upon sys_var::check_enum() */

3046
bool sys_var_thd_storage_engine::check(THD *thd, set_var *var)
3047 3048 3049 3050 3051 3052 3053
{
  char buff[80];
  const char *value;
  String str(buff, sizeof(buff), &my_charset_latin1), *res;

  if (var->value->result_type() == STRING_RESULT)
  {
3054
    enum db_type db_type;
3055 3056
    if (!(res=var->value->val_str(&str)) ||
	!(var->save_result.ulong_value=
paul@snake-hub.snake.net's avatar
paul@snake-hub.snake.net committed
3057
	 (ulong) (db_type= ha_resolve_by_name(res->ptr(), res->length()))) ||
3058
	ha_checktype(db_type) != db_type) 
3059 3060 3061 3062 3063 3064
    {
      value= res ? res->c_ptr() : "NULL";
      goto err;
    }
    return 0;
  }
monty@mysql.com's avatar
monty@mysql.com committed
3065
  value= "unknown";
3066 3067

err:
3068
  my_error(ER_UNKNOWN_STORAGE_ENGINE, MYF(0), value);
bell@sanja.is.com.ua's avatar
bell@sanja.is.com.ua committed
3069
  return 1;
3070 3071
}

3072

3073 3074
byte *sys_var_thd_storage_engine::value_ptr(THD *thd, enum_var_type type,
					    LEX_STRING *base)
3075 3076 3077 3078
{
  ulong val;
  val= ((type == OPT_GLOBAL) ? global_system_variables.*offset :
        thd->variables.*offset);
3079
  const char *table_type= ha_get_storage_engine((enum db_type)val);
3080
  return (byte *) table_type;
3081 3082
}

3083

3084
void sys_var_thd_storage_engine::set_default(THD *thd, enum_var_type type)
3085 3086 3087 3088 3089 3090 3091
{
  if (type == OPT_GLOBAL)
    global_system_variables.*offset= (ulong) DB_TYPE_MYISAM;
  else
    thd->variables.*offset= (ulong) (global_system_variables.*offset);
}

3092

3093
bool sys_var_thd_storage_engine::update(THD *thd, set_var *var)
3094 3095 3096 3097 3098 3099 3100 3101
{
  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;
}

3102 3103 3104 3105
void sys_var_thd_table_type::warn_deprecated(THD *thd)
{
  push_warning_printf(thd, MYSQL_ERROR::WARN_LEVEL_WARN,
		      ER_WARN_DEPRECATED_SYNTAX,
3106 3107
		      ER(ER_WARN_DEPRECATED_SYNTAX), "table_type",
                      "storage_engine"); 
3108 3109 3110 3111 3112 3113 3114 3115 3116 3117 3118 3119 3120 3121
}

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

3122

3123 3124 3125
/****************************************************************************
 Functions to handle sql_mode
****************************************************************************/
3126

3127 3128
byte *sys_var_thd_sql_mode::value_ptr(THD *thd, enum_var_type type,
				      LEX_STRING *base)
3129 3130 3131 3132 3133 3134 3135 3136 3137 3138 3139 3140 3141 3142 3143 3144 3145 3146 3147 3148 3149 3150 3151 3152 3153 3154 3155 3156 3157 3158 3159 3160 3161 3162 3163 3164 3165 3166 3167 3168
{
  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 */
3169

3170 3171 3172 3173 3174 3175 3176 3177 3178 3179 3180 3181 3182 3183 3184
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 |
3185
		MODE_NO_FIELD_OPTIONS | MODE_NO_AUTO_CREATE_USER);
3186 3187 3188 3189 3190 3191 3192 3193 3194 3195 3196 3197 3198 3199 3200
  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);
3201
  if (sql_mode & MODE_MAXDB)
3202 3203 3204
    sql_mode|= (MODE_PIPES_AS_CONCAT | MODE_ANSI_QUOTES |
		MODE_IGNORE_SPACE |
		MODE_NO_KEY_OPTIONS | MODE_NO_TABLE_OPTIONS |
3205
		MODE_NO_FIELD_OPTIONS | MODE_NO_AUTO_CREATE_USER);
3206
  if (sql_mode & MODE_MYSQL40)
3207
    sql_mode|= MODE_NO_FIELD_OPTIONS | MODE_HIGH_NOT_PRECEDENCE;
3208
  if (sql_mode & MODE_MYSQL323)
3209
    sql_mode|= MODE_NO_FIELD_OPTIONS | MODE_HIGH_NOT_PRECEDENCE;
3210 3211 3212
  if (sql_mode & MODE_TRADITIONAL)
    sql_mode|= (MODE_STRICT_TRANS_TABLES | MODE_STRICT_ALL_TABLES |
                MODE_NO_ZERO_IN_DATE | MODE_NO_ZERO_DATE |
3213
                MODE_ERROR_FOR_DIVISION_BY_ZERO | MODE_NO_AUTO_CREATE_USER);
3214 3215
  return sql_mode;
}
3216 3217


3218 3219 3220 3221
/****************************************************************************
  Named list handling
****************************************************************************/

monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3222 3223
gptr find_named(I_List<NAMED_LIST> *list, const char *name, uint length,
		NAMED_LIST **found)
3224 3225 3226 3227 3228 3229
{
  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
3230
    {
3231 3232
      if (found)
        *found= element;
3233
      return element->data;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3234
    }
3235 3236 3237 3238 3239
  }
  return 0;
}


3240 3241
void delete_elements(I_List<NAMED_LIST> *list,
		     void (*free_element)(const char *name, gptr))
3242 3243
{
  NAMED_LIST *element;
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3244
  DBUG_ENTER("delete_elements");
3245 3246
  while ((element= list->get()))
  {
3247
    (*free_element)(element->name, element->data);
3248 3249
    delete element;
  }
monty@mashka.mysql.fi's avatar
monty@mashka.mysql.fi committed
3250
  DBUG_VOID_RETURN;
3251 3252 3253 3254 3255
}


/* Key cache functions */

3256
static KEY_CACHE *create_key_cache(const char *name, uint length)
3257
{
3258
  KEY_CACHE *key_cache;
3259 3260 3261
  DBUG_ENTER("create_key_cache");
  DBUG_PRINT("enter",("name: %.*s", length, name));
  
3262
  if ((key_cache= (KEY_CACHE*) my_malloc(sizeof(KEY_CACHE),
3263
					     MYF(MY_ZEROFILL | MY_WME))))
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
3264 3265
  {
    if (!new NAMED_LIST(&key_caches, name, length, (gptr) key_cache))
3266 3267
    {
      my_free((char*) key_cache, MYF(0));
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
3268
      key_cache= 0;
3269 3270 3271 3272 3273 3274 3275 3276 3277
    }
    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
      */
3278 3279 3280
      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;
3281
    }
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
3282
  }
3283
  DBUG_RETURN(key_cache);
3284 3285 3286
}


3287
KEY_CACHE *get_or_create_key_cache(const char *name, uint length)
3288
{
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
3289
  LEX_STRING key_cache_name;
3290
  KEY_CACHE *key_cache;
3291

igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
3292 3293
  key_cache_name.str= (char *) name;
  key_cache_name.length= length;
3294 3295
  pthread_mutex_lock(&LOCK_global_system_variables);
  if (!(key_cache= get_key_cache(&key_cache_name)))
3296
    key_cache= create_key_cache(name, length);
3297
  pthread_mutex_unlock(&LOCK_global_system_variables);
3298 3299 3300 3301
  return key_cache;
}


3302
void free_key_cache(const char *name, KEY_CACHE *key_cache)
3303
{
3304 3305
  ha_end_key_cache(key_cache);
  my_free((char*) key_cache, MYF(0));
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
3306 3307 3308
}


3309
bool process_key_caches(int (* func) (const char *name, KEY_CACHE *))
3310
{
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
3311 3312
  I_List_iterator<NAMED_LIST> it(key_caches);
  NAMED_LIST *element;
3313

igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
3314 3315
  while ((element= it++))
  {
3316
    KEY_CACHE *key_cache= (KEY_CACHE *) element->data;
3317
    func(element->name, key_cache);
igor@rurik.mysql.com's avatar
igor@rurik.mysql.com committed
3318 3319
  }
  return 0;
3320 3321
}

3322

3323 3324 3325 3326 3327 3328
/****************************************************************************
  Used templates
****************************************************************************/

#ifdef __GNUC__
template class List<set_var_base>;
3329
template class List_iterator_fast<set_var_base>;
3330
template class I_List_iterator<NAMED_LIST>;
3331
#endif