guc.c 134.5 KB
Newer Older
1 2 3 4 5
/*--------------------------------------------------------------------
 * guc.c
 *
 * Support for grand unified configuration scheme, including SET
 * command, configuration file, and command line options.
6
 * See src/backend/utils/misc/README for more information.
7 8
 *
 *
9
 * Copyright (c) 2000-2003, PostgreSQL Global Development Group
10
 * Written by Peter Eisentraut <peter_e@gmx.net>.
11 12
 *
 * IDENTIFICATION
13
 *	  $PostgreSQL: pgsql/src/backend/utils/misc/guc.c,v 1.222 2004/07/21 20:23:01 momjian Exp $
14
 *
15 16 17 18
 *--------------------------------------------------------------------
 */
#include "postgres.h"

19
#include <ctype.h>
20 21 22 23 24
#include <float.h>
#include <limits.h>
#include <unistd.h>

#include "utils/guc.h"
25
#include "utils/guc_tables.h"
26

27
#include "catalog/namespace.h"
28
#include "catalog/pg_type.h"
29
#include "commands/async.h"
30
#include "commands/variable.h"
31
#include "commands/vacuum.h"
32
#include "executor/executor.h"
33
#include "fmgr.h"
34
#include "funcapi.h"
35
#include "libpq/auth.h"
36
#include "libpq/pqcomm.h"
37
#include "libpq/pqformat.h"
38
#include "mb/pg_wchar.h"
39 40 41 42
#include "miscadmin.h"
#include "optimizer/cost.h"
#include "optimizer/geqo.h"
#include "optimizer/paths.h"
43
#include "optimizer/prep.h"
44
#include "parser/parse_expr.h"
45
#include "parser/parse_relation.h"
46
#include "pgstat.h"
47
#include "postmaster/bgwriter.h"
48
#include "postmaster/pg_autovacuum.h"
49
#include "postmaster/postmaster.h"
J
Jan Wieck 已提交
50
#include "storage/bufmgr.h"
51
#include "storage/fd.h"
52 53
#include "storage/freespace.h"
#include "storage/lock.h"
54 55
#include "storage/proc.h"
#include "tcop/tcopprot.h"
56 57
#include "utils/array.h"
#include "utils/builtins.h"
58
#include "utils/memutils.h"
59
#include "utils/pg_locale.h"
60

61 62 63 64 65 66 67
char *guc_pgdata;
char *guc_hbafile;
char *guc_identfile;
char *external_pidfile;

char *user_pgconfig = NULL;
bool user_pgconfig_is_dir = false;
68

69 70 71 72
#ifndef PG_KRB_SRVTAB
#define PG_KRB_SRVTAB ""
#endif

B
Bruce Momjian 已提交
73 74 75
#ifdef EXEC_BACKEND
#define CONFIG_EXEC_PARAMS "global/config_exec_params"
#endif
76 77

/* XXX these should appear in other modules' header files */
78
extern bool Log_disconnections;
79
extern DLLIMPORT bool check_function_bodies;
B
Bruce Momjian 已提交
80 81
extern int	CommitDelay;
extern int	CommitSiblings;
82
extern int	DebugSharedBuffers;
83

84 85 86
static const char *assign_log_destination(const char *value,
				bool doit, GucSource source);

T
Tatsuo Ishii 已提交
87
#ifdef HAVE_SYSLOG
88
extern char *Syslog_facility;
89
extern char *Syslog_ident;
90

91
static const char *assign_facility(const char *facility,
92
				bool doit, GucSource source);
93
#endif
94

95 96 97 98
static const char *assign_defaultxactisolevel(const char *newval, bool doit,
						   GucSource source);
static const char *assign_log_min_messages(const char *newval, bool doit,
						   GucSource source);
99
static const char *assign_client_min_messages(const char *newval,
100
						   bool doit, GucSource source);
101
static const char *assign_min_error_statement(const char *newval, bool doit,
102
						   GucSource source);
103 104
static const char *assign_msglvl(int *var, const char *newval, bool doit,
						   GucSource source);
105
static const char *assign_log_error_verbosity(const char *newval, bool doit,
106
						   GucSource source);
107 108 109 110
static const char *assign_log_statement(const char *newval, bool doit,
						   GucSource source);
static const char *assign_log_stmtlvl(int *var, const char *newval,
						   bool doit, GucSource source);
111
static bool assign_phony_autocommit(bool newval, bool doit, GucSource source);
112 113
static const char *assign_custom_variable_classes(const char *newval, bool doit,
						   GucSource source);
114 115
static bool assign_stage_log_stats(bool newval, bool doit, GucSource source);
static bool assign_log_stats(bool newval, bool doit, GucSource source);
116
static bool assign_transaction_read_only(bool newval, bool doit, GucSource source);
117
static const char *assign_canonical_path(const char *newval, bool doit, GucSource source);
118

119
static void ReadConfigFile(char *filename, GucContext context);
120

121 122 123
/*
 * Debugging options
 */
124
#ifdef USE_ASSERT_CHECKING
B
Bruce Momjian 已提交
125
bool		assert_enabled = true;
126
#endif
B
Rename:  
Bruce Momjian 已提交
127
bool		log_duration = false;
B
Bruce Momjian 已提交
128 129 130 131
bool		Debug_print_plan = false;
bool		Debug_print_parse = false;
bool		Debug_print_rewritten = false;
bool		Debug_pretty_print = false;
132
bool		Explain_pretty_print = true;
133

B
Rename:  
Bruce Momjian 已提交
134 135 136 137
bool		log_parser_stats = false;
bool		log_planner_stats = false;
bool		log_executor_stats = false;
bool		log_statement_stats = false;		/* this is sort of all
B
Bruce Momjian 已提交
138
												 * three above together */
139
bool		log_btree_build_stats = false;
140

B
Bruce Momjian 已提交
141
bool		SQL_inheritance = true;
142

143 144
bool		Australian_timezones = false;

145
bool		Password_encryption = true;
146

147 148
bool		default_with_oids = true;

149
int			log_min_error_statement = PANIC;
150
int			log_min_messages = NOTICE;
151
int			client_min_messages = NOTICE;
152

153
int			log_min_duration_statement = -1;
154

155

156 157 158 159 160
/*
 * These variables are all dummies that don't do anything, except in some
 * cases provide the value for SHOW to display.  The real state is elsewhere
 * and is kept in sync by assign_hooks.
 */
161
static char *client_min_messages_str;
162 163
static char *log_min_messages_str;
static char *log_error_verbosity_str;
164
static char *log_statement_str;
165
static char *log_min_error_statement_str;
166
static char *log_destination_string;
167
static bool phony_autocommit;
168
static bool session_auth_is_superuser;
169 170 171 172
static double phony_random_seed;
static char *client_encoding_string;
static char *datestyle_string;
static char *default_iso_level_string;
173 174
static char *locale_collate;
static char *locale_ctype;
175
static char *regex_flavor_string;
176
static char *server_encoding_string;
177
static char *server_version_string;
178 179 180
static char *session_authorization_string;
static char *timezone_string;
static char *XactIsoLevel_string;
181
static char *custom_variable_classes;
182 183 184 185 186
static int	max_function_args;
static int	max_index_keys;
static int	max_identifier_length;
static int	block_size;
static bool integer_datetimes;
187

188

189
/*
190 191 192
 * Displayable names for context types (enum GucContext)
 *
 * Note: these strings are deliberately not localized.
193
 */
B
Bruce Momjian 已提交
194
const char *const GucContext_Names[] =
195
{
B
Bruce Momjian 已提交
196 197 198 199 200 201 202
	 /* PGC_INTERNAL */ "internal",
	 /* PGC_POSTMASTER */ "postmaster",
	 /* PGC_SIGHUP */ "sighup",
	 /* PGC_BACKEND */ "backend",
	 /* PGC_SUSET */ "superuser",
	 /* PGC_USERLIMIT */ "userlimit",
	 /* PGC_USERSET */ "user"
203 204 205 206 207 208
};

/*
 * Displayable names for source types (enum GucSource)
 *
 * Note: these strings are deliberately not localized.
B
Bruce Momjian 已提交
209 210
 */
const char *const GucSource_Names[] =
211
{
212 213 214 215 216 217 218 219 220 221 222 223
	/* PGC_S_DEFAULT */ "default",
	/* PGC_S_ENV_VAR */ "environment variable",
	/* PGC_S_FILE */ "configuration file",
	/* PGC_S_ARGV */ "command line",
	/* PGC_S_UNPRIVILEGED */ "unprivileged",
	/* PGC_S_DATABASE */ "database",
	/* PGC_S_USER */ "user",
	/* PGC_S_CLIENT */ "client",
	/* PGC_S_OVERRIDE */ "override",
	/* PGC_S_INTERACTIVE */ "interactive",
	/* PGC_S_TEST */ "test",
	/* PGC_S_SESSION */ "session"
224 225 226 227 228 229 230 231
};

/*
 * Displayable names for the groupings defined in enum config_group
 */
const char *const config_group_names[] =
{
	/* UNGROUPED */
232
	gettext_noop("Ungrouped"),
233
	/* CONN_AUTH */
234
	gettext_noop("Connections and Authentication"),
235
	/* CONN_AUTH_SETTINGS */
236
	gettext_noop("Connections and Authentication / Connection Settings"),
237
	/* CONN_AUTH_SECURITY */
238
	gettext_noop("Connections and Authentication / Security and Authentication"),
239
	/* RESOURCES */
240
	gettext_noop("Resource Usage"),
241
	/* RESOURCES_MEM */
242
	gettext_noop("Resource Usage / Memory"),
243
	/* RESOURCES_FSM */
244
	gettext_noop("Resource Usage / Free Space Map"),
245
	/* RESOURCES_KERNEL */
246
	gettext_noop("Resource Usage / Kernel Resources"),
247
	/* WAL */
248
	gettext_noop("Write-Ahead Log"),
249
	/* WAL_SETTINGS */
250
	gettext_noop("Write-Ahead Log / Settings"),
251
	/* WAL_CHECKPOINTS */
252
	gettext_noop("Write-Ahead Log / Checkpoints"),
253
	/* QUERY_TUNING */
254
	gettext_noop("Query Tuning"),
255
	/* QUERY_TUNING_METHOD */
256
	gettext_noop("Query Tuning / Planner Method Configuration"),
257
	/* QUERY_TUNING_COST */
258
	gettext_noop("Query Tuning / Planner Cost Constants"),
259
	/* QUERY_TUNING_GEQO */
260
	gettext_noop("Query Tuning / Genetic Query Optimizer"),
261
	/* QUERY_TUNING_OTHER */
262
	gettext_noop("Query Tuning / Other Planner Options"),
263
	/* LOGGING */
264
	gettext_noop("Reporting and Logging"),
265 266
	/* LOGGING_WHERE */
	gettext_noop("Reporting and Logging / Where to Log"),
267
	/* LOGGING_WHEN */
268
	gettext_noop("Reporting and Logging / When to Log"),
269
	/* LOGGING_WHAT */
270
	gettext_noop("Reporting and Logging / What to Log"),
271
	/* STATS */
272
	gettext_noop("Statistics"),
273
	/* STATS_MONITORING */
274
	gettext_noop("Statistics / Monitoring"),
275
	/* STATS_COLLECTOR */
276
	gettext_noop("Statistics / Query and Index Statistics Collector"),
277
	/* CLIENT_CONN */
278
	gettext_noop("Client Connection Defaults"),
279
	/* CLIENT_CONN_STATEMENT */
280
	gettext_noop("Client Connection Defaults / Statement Behavior"),
281
	/* CLIENT_CONN_LOCALE */
282
	gettext_noop("Client Connection Defaults / Locale and Formatting"),
283
	/* CLIENT_CONN_OTHER */
284
	gettext_noop("Client Connection Defaults / Other Defaults"),
285
	/* LOCK_MANAGEMENT */
286
	gettext_noop("Lock Management"),
287
	/* COMPAT_OPTIONS */
288
	gettext_noop("Version and Platform Compatibility"),
289
	/* COMPAT_OPTIONS_PREVIOUS */
290
	gettext_noop("Version and Platform Compatibility / Previous PostgreSQL Versions"),
291
	/* COMPAT_OPTIONS_CLIENT */
292
	gettext_noop("Version and Platform Compatibility / Other Platforms and Clients"),
293
	/* DEVELOPER_OPTIONS */
294
	gettext_noop("Developer Options"),
295 296
	/* COMPILE_OPTIONS */
	gettext_noop("Compiled-in Options"),
297
	/* help_config wants this array to be null-terminated */
298 299 300
	NULL
};

301 302 303 304 305
/*
 * Displayable names for GUC variable types (enum config_type)
 *
 * Note: these strings are deliberately not localized.
 */
B
Bruce Momjian 已提交
306
const char *const config_type_names[] =
307
{
B
Bruce Momjian 已提交
308 309 310 311
	 /* PGC_BOOL */ "bool",
	 /* PGC_INT */ "integer",
	 /* PGC_REAL */ "real",
	 /* PGC_STRING */ "string"
312 313
};

314

315
/*
316 317 318 319
 * Contents of GUC tables
 *
 * See src/backend/utils/misc/README for design notes.
 *
320 321 322
 * TO ADD AN OPTION:
 *
 * 1. Declare a global variable of type bool, int, double, or char*
323
 *    and make use of it.
324 325
 *
 * 2. Decide at what times it's safe to set the option. See guc.h for
326
 *    details.
327 328
 *
 * 3. Decide on a name, a default value, upper and lower bounds (if
329
 *    applicable), etc.
330 331 332
 *
 * 4. Add a record below.
 *
333 334
 * 5. Add it to src/backend/utils/misc/postgresql.conf.sample, if
 *    appropriate
335
 *
336
 * 6. Add it to src/bin/psql/tab-complete.c, if it's a USERSET option.
337
 *
338
 * 7. Don't forget to document the option.
339 340 341
 *
 * 8. If it's a new GUC_LIST option you must edit pg_dumpall.c to ensure
 *    it is not single quoted at dump time.
342 343
 */

344

345
/******** option records follow ********/
346

347
static struct config_bool ConfigureNamesBool[] =
348
{
349
	{
350
		{"enable_seqscan", PGC_USERSET, QUERY_TUNING_METHOD,
351
			gettext_noop("Enables the planner's use of sequential-scan plans."),
352 353 354
			NULL
		},
		&enable_seqscan,
355
		true, NULL, NULL
356
	},
357
	{
358
		{"enable_indexscan", PGC_USERSET, QUERY_TUNING_METHOD,
359
			gettext_noop("Enables the planner's use of index-scan plans."),
360 361 362
			NULL
		},
		&enable_indexscan,
363
		true, NULL, NULL
364 365
	},
	{
366
		{"enable_tidscan", PGC_USERSET, QUERY_TUNING_METHOD,
367
			gettext_noop("Enables the planner's use of TID scan plans."),
368 369 370
			NULL
		},
		&enable_tidscan,
371
		true, NULL, NULL
372 373
	},
	{
374
		{"enable_sort", PGC_USERSET, QUERY_TUNING_METHOD,
375
			gettext_noop("Enables the planner's use of explicit sort steps."),
376 377 378
			NULL
		},
		&enable_sort,
379
		true, NULL, NULL
380
	},
381
	{
382
		{"enable_hashagg", PGC_USERSET, QUERY_TUNING_METHOD,
383
			gettext_noop("Enables the planner's use of hashed aggregation plans."),
384 385 386
			NULL
		},
		&enable_hashagg,
387 388
		true, NULL, NULL
	},
389
	{
390
		{"enable_nestloop", PGC_USERSET, QUERY_TUNING_METHOD,
391
			gettext_noop("Enables the planner's use of nested-loop join plans."),
392 393 394
			NULL
		},
		&enable_nestloop,
395
		true, NULL, NULL
396 397
	},
	{
398
		{"enable_mergejoin", PGC_USERSET, QUERY_TUNING_METHOD,
399
			gettext_noop("Enables the planner's use of merge join plans."),
400 401 402
			NULL
		},
		&enable_mergejoin,
403
		true, NULL, NULL
404 405
	},
	{
406
		{"enable_hashjoin", PGC_USERSET, QUERY_TUNING_METHOD,
407
			gettext_noop("Enables the planner's use of hash join plans."),
408 409 410
			NULL
		},
		&enable_hashjoin,
411
		true, NULL, NULL
412 413
	},
	{
414
		{"geqo", PGC_USERSET, QUERY_TUNING_GEQO,
415
			gettext_noop("Enables genetic query optimization."),
416
			gettext_noop("This algorithm attempts to do planning without "
417
						 "exhaustive searching.")
418 419
		},
		&enable_geqo,
420
		true, NULL, NULL
421
	},
422
	{
423 424
		/* Not for general use --- used by SET SESSION AUTHORIZATION */
		{"is_superuser", PGC_INTERNAL, UNGROUPED,
425
			gettext_noop("Shows whether the current user is a superuser."),
426 427 428
			NULL,
			GUC_REPORT | GUC_NO_SHOW_ALL | GUC_NO_RESET_ALL | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
429 430 431
		&session_auth_is_superuser,
		false, NULL, NULL
	},
432
	{
433
		{"ssl", PGC_POSTMASTER, CONN_AUTH_SECURITY,
434
			gettext_noop("Enables SSL connections."),
435 436 437
			NULL
		},
		&EnableSSL,
438
		false, NULL, NULL
439 440
	},
	{
441
		{"fsync", PGC_SIGHUP, WAL_SETTINGS,
442
			gettext_noop("Forces synchronization of updates to disk."),
443
			gettext_noop("The server will use the fsync() system call in several places to make "
444 445
						 "sure that updates are physically written to disk. This insures "
						 "that a database cluster will recover to a consistent state after "
446
						 "an operating system or hardware crash.")
447 448
		},
		&enableFsync,
449
		true, NULL, NULL
450
	},
451
	{
452
		{"zero_damaged_pages", PGC_SUSET, DEVELOPER_OPTIONS,
453
			gettext_noop("Continues processing past damaged page headers."),
454 455 456 457
			gettext_noop("Detection of a damaged page header normally causes PostgreSQL to "
			"report an error, aborting the current transaction. Setting "
						 "zero_damaged_pages to true causes the system to instead report a "
						 "warning, zero out the damaged page, and continue processing. This "
458
						 "behavior will destroy data, namely all the rows on the damaged page."),
459
			GUC_NOT_IN_SAMPLE
460 461
		},
		&zero_damaged_pages,
462 463
		false, NULL, NULL
	},
464
	{
465
		{"silent_mode", PGC_POSTMASTER, LOGGING_WHEN,
466
			gettext_noop("Runs the server silently."),
467
			gettext_noop("If this parameter is set, the server will automatically run in the "
468
			"background and any controlling terminals are dissociated.")
469 470
		},
		&SilentMode,
471
		false, NULL, NULL
472 473
	},
	{
474
		{"log_connections", PGC_BACKEND, LOGGING_WHAT,
475
			gettext_noop("Logs each successful connection."),
476 477 478
			NULL
		},
		&Log_connections,
479
		false, NULL, NULL
480
	},
481 482 483 484 485 486 487 488
	{
		{"log_disconnections", PGC_BACKEND, LOGGING_WHAT,
		 gettext_noop("Logs end of a session, including duration"),
		 NULL
		},
		&Log_disconnections,
		false, NULL, NULL
	},
489

490
#ifdef USE_ASSERT_CHECKING
491
	{
492
		{"debug_assertions", PGC_USERSET, DEVELOPER_OPTIONS,
493
			gettext_noop("Turns on various assertion checks."),
494
			gettext_noop("This is a debugging aid."),
495 496 497
			GUC_NOT_IN_SAMPLE
		},
		&assert_enabled,
498
		true, NULL, NULL
499
	},
500 501
#endif

502 503
	{
		/* currently undocumented, so don't show in SHOW ALL */
504
		{"exit_on_error", PGC_USERSET, UNGROUPED,
505
			gettext_noop("no description available"),
506 507 508 509
			NULL,
			GUC_NO_SHOW_ALL | GUC_NOT_IN_SAMPLE
		},
		&ExitOnAnyError,
510 511
		false, NULL, NULL
	},
512
	{
513
		{"log_duration", PGC_USERLIMIT, LOGGING_WHAT,
514
			gettext_noop("Logs the duration each completed SQL statement."),
515 516 517
			NULL
		},
		&log_duration,
518
		false, NULL, NULL
519 520
	},
	{
521
		{"debug_print_parse", PGC_USERSET, LOGGING_WHAT,
522
			gettext_noop("Prints the parse tree to the server log."),
523
			NULL
524 525
		},
		&Debug_print_parse,
526
		false, NULL, NULL
527 528
	},
	{
529
		{"debug_print_rewritten", PGC_USERSET, LOGGING_WHAT,
530
			gettext_noop("Prints the parse tree after rewriting to server log."),
531 532 533
			NULL
		},
		&Debug_print_rewritten,
534
		false, NULL, NULL
535 536
	},
	{
537
		{"debug_print_plan", PGC_USERSET, LOGGING_WHAT,
538
			gettext_noop("Prints the execution plan to server log."),
539 540 541
			NULL
		},
		&Debug_print_plan,
542
		false, NULL, NULL
543 544
	},
	{
545
		{"debug_pretty_print", PGC_USERSET, LOGGING_WHAT,
546
			gettext_noop("Indents parse and plan tree displays."),
547 548 549
			NULL
		},
		&Debug_pretty_print,
550
		false, NULL, NULL
551 552
	},
	{
553
		{"log_parser_stats", PGC_USERLIMIT, STATS_MONITORING,
554
			gettext_noop("Writes parser performance statistics to the server log."),
555 556 557
			NULL
		},
		&log_parser_stats,
558
		false, assign_stage_log_stats, NULL
559 560
	},
	{
561
		{"log_planner_stats", PGC_USERLIMIT, STATS_MONITORING,
562
			gettext_noop("Writes planner performance statistics to the server log."),
563 564 565
			NULL
		},
		&log_planner_stats,
566
		false, assign_stage_log_stats, NULL
567 568
	},
	{
569
		{"log_executor_stats", PGC_USERLIMIT, STATS_MONITORING,
570
			gettext_noop("Writes executor performance statistics to the server log."),
571 572 573
			NULL
		},
		&log_executor_stats,
574
		false, assign_stage_log_stats, NULL
575 576
	},
	{
577
		{"log_statement_stats", PGC_USERLIMIT, STATS_MONITORING,
578
			gettext_noop("Writes cumulative performance statistics to the server log."),
579 580 581
			NULL
		},
		&log_statement_stats,
582
		false, assign_log_stats, NULL
583
	},
584
#ifdef BTREE_BUILD_STATS
585
	{
586
		{"log_btree_build_stats", PGC_SUSET, DEVELOPER_OPTIONS,
587
			gettext_noop("no description available"),
588 589 590 591
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&log_btree_build_stats,
592
		false, NULL, NULL
593
	},
594 595
#endif

596
	{
597
		{"explain_pretty_print", PGC_USERSET, CLIENT_CONN_OTHER,
598
			gettext_noop("Uses the indented output format for EXPLAIN VERBOSE."),
599 600 601
			NULL
		},
		&Explain_pretty_print,
602
		true, NULL, NULL
603
	},
604
	{
605
		{"stats_start_collector", PGC_POSTMASTER, STATS_COLLECTOR,
606
			gettext_noop("Starts the server statistics-collection subprocess."),
607 608 609
			NULL
		},
		&pgstat_collect_startcollector,
610
		true, NULL, NULL
611 612
	},
	{
613
		{"stats_reset_on_server_start", PGC_POSTMASTER, STATS_COLLECTOR,
614
			gettext_noop("Zeroes collected statistics on server restart."),
615 616 617
			NULL
		},
		&pgstat_collect_resetonpmstart,
618
		true, NULL, NULL
619 620
	},
	{
621
		{"stats_command_string", PGC_SUSET, STATS_COLLECTOR,
622
			gettext_noop("Collects statistics about executing commands."),
623 624 625 626 627
			gettext_noop("Enables the collection of statistics on the currently "
				"executing command of each session, along with the time "
						 "at which that command began execution.")
		},
		&pgstat_collect_querystring,
628
		false, NULL, NULL
629 630
	},
	{
631
		{"stats_row_level", PGC_SUSET, STATS_COLLECTOR,
632
			gettext_noop("Collects row-level statistics on database activity."),
633 634 635
			NULL
		},
		&pgstat_collect_tuplelevel,
636
		false, NULL, NULL
637 638
	},
	{
639
		{"stats_block_level", PGC_SUSET, STATS_COLLECTOR,
640
			gettext_noop("Collects block-level statistics on database activity."),
641 642 643
			NULL
		},
		&pgstat_collect_blocklevel,
644
		false, NULL, NULL
645
	},
646 647 648 649 650 651 652 653
	{
		{"autovacuum", PGC_SIGHUP, AUTOVACUUM,
			gettext_noop("Starts the auto vacuum subprocess."),
			NULL
		},
		&autovacuum_start_daemon,
		false, NULL, NULL	 
	},
654

655
	{
656
		{"trace_notify", PGC_USERSET, DEVELOPER_OPTIONS,
657
			gettext_noop("Generates debugging output for LISTEN and NOTIFY."),
658 659 660 661
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&Trace_notify,
662
		false, NULL, NULL
663
	},
664 665

#ifdef LOCK_DEBUG
666
	{
667
		{"trace_locks", PGC_SUSET, DEVELOPER_OPTIONS,
668
			gettext_noop("no description available"),
669 670 671 672
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&Trace_locks,
673
		false, NULL, NULL
674 675
	},
	{
676
		{"trace_userlocks", PGC_SUSET, DEVELOPER_OPTIONS,
677
			gettext_noop("no description available"),
678 679 680 681
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&Trace_userlocks,
682
		false, NULL, NULL
683 684
	},
	{
685
		{"trace_lwlocks", PGC_SUSET, DEVELOPER_OPTIONS,
686
			gettext_noop("no description available"),
687 688 689 690
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&Trace_lwlocks,
691
		false, NULL, NULL
692 693
	},
	{
694
		{"debug_deadlocks", PGC_SUSET, DEVELOPER_OPTIONS,
695
			gettext_noop("no description available"),
696 697 698 699
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&Debug_deadlocks,
700
		false, NULL, NULL
701
	},
702 703
#endif

704
	{
705
		{"log_hostname", PGC_SIGHUP, LOGGING_WHAT,
706
			gettext_noop("Logs the host name in the connection logs."),
707 708 709
			gettext_noop("By default, connection logs only show the IP address "
						 "of the connecting host. If you want them to show the host name you "
						 "can turn this on, but depending on your host name resolution "
710
			"setup it might impose a non-negligible performance penalty.")
711 712
		},
		&log_hostname,
713
		false, NULL, NULL
714 715
	},
	{
716
		{"sql_inheritance", PGC_USERSET, COMPAT_OPTIONS_PREVIOUS,
717
			gettext_noop("Causes subtables to be included by default in various commands."),
718
			NULL
719 720
		},
		&SQL_inheritance,
721
		true, NULL, NULL
722 723
	},
	{
724
		{"australian_timezones", PGC_USERSET, CLIENT_CONN_LOCALE,
725
			gettext_noop("Interprets ACST, CST, EST, and SAT as Australian time zones."),
726
			gettext_noop("Otherwise they are interpreted as North/South American "
727
						 "time zones and Saturday.")
728 729
		},
		&Australian_timezones,
730
		false, ClearDateCache, NULL
731 732
	},
	{
733
		{"password_encryption", PGC_USERSET, CONN_AUTH_SECURITY,
734
			gettext_noop("Encrypt passwords."),
735 736
			gettext_noop("When a password is specified in CREATE USER or "
			"ALTER USER without writing either ENCRYPTED or UNENCRYPTED, "
737
						 "this parameter determines whether the password is to be encrypted.")
738 739
		},
		&Password_encryption,
740
		true, NULL, NULL
741 742
	},
	{
743
		{"transform_null_equals", PGC_USERSET, COMPAT_OPTIONS_CLIENT,
744
			gettext_noop("Treats \"expr=NULL\" as \"expr IS NULL\"."),
745 746 747 748
			gettext_noop("When turned on, expressions of the form expr = NULL "
			"(or NULL = expr) are treated as expr IS NULL, that is, they "
			"return true if expr evaluates to the null value, and false "
			"otherwise. The correct behavior of expr = NULL is to always "
749
						 "return null (unknown).")
750 751
		},
		&Transform_null_equals,
752
		false, NULL, NULL
753
	},
754
	{
755
		{"db_user_namespace", PGC_SIGHUP, CONN_AUTH_SECURITY,
756
			gettext_noop("Enables per-database user names."),
757 758 759
			NULL
		},
		&Db_user_namespace,
760 761
		false, NULL, NULL
	},
762
	{
763 764
		/* only here for backwards compatibility */
		{"autocommit", PGC_USERSET, CLIENT_CONN_STATEMENT,
765 766
			gettext_noop("This parameter doesn't do anything."),
			gettext_noop("It's just here so that we won't choke on SET AUTOCOMMIT TO ON from 7.3-vintage clients."),
767 768 769
			GUC_NO_SHOW_ALL | GUC_NOT_IN_SAMPLE
		},
		&phony_autocommit,
770
		true, assign_phony_autocommit, NULL
771
	},
772
	{
773
		{"default_transaction_read_only", PGC_USERSET, CLIENT_CONN_STATEMENT,
774
			gettext_noop("Sets the default read-only status of new transactions."),
775 776 777
			NULL
		},
		&DefaultXactReadOnly,
778 779 780
		false, NULL, NULL
	},
	{
781
		{"transaction_read_only", PGC_USERSET, CLIENT_CONN_STATEMENT,
782
			gettext_noop("Sets the current transaction's read-only status."),
783 784 785 786
			NULL,
			GUC_NO_RESET_ALL | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&XactReadOnly,
787
		false, assign_transaction_read_only, NULL
788
	},
789
	{
790
		{"add_missing_from", PGC_USERSET, COMPAT_OPTIONS_PREVIOUS,
791
			gettext_noop("Automatically adds missing table references to FROM clauses."),
792 793 794
			NULL
		},
		&add_missing_from,
795 796
		true, NULL, NULL
	},
797 798
	{
		{"check_function_bodies", PGC_USERSET, CLIENT_CONN_STATEMENT,
799
			gettext_noop("Check function bodies during CREATE FUNCTION."),
800 801 802 803 804
			NULL
		},
		&check_function_bodies,
		true, NULL, NULL
	},
805 806 807 808 809 810 811 812
	{
		{"default_with_oids", PGC_USERSET, COMPAT_OPTIONS_PREVIOUS,
		 gettext_noop("By default, newly-created tables should have OIDs"),
		 NULL
		},
		&default_with_oids,
		true, NULL, NULL
	},
813

814 815 816 817 818 819 820 821 822 823 824 825 826 827
	{
		{"integer_datetimes", PGC_INTERNAL, COMPILE_OPTIONS,
			gettext_noop("Datetimes are integer based"),
			NULL,
			GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&integer_datetimes,
#ifdef HAVE_INT64_TIMESTAMP
		true, NULL, NULL
#else
		false, NULL, NULL
#endif
	},

828 829 830 831 832 833 834 835 836 837 838 839
#ifdef WAL_DEBUG
	{
		{"wal_debug", PGC_SUSET, DEVELOPER_OPTIONS,
			gettext_noop("Emit WAL-related debugging output."),
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&XLOG_DEBUG,
		false, NULL, NULL
	},
#endif

840
	/* End-of-list marker */
841
	{
842 843
		{NULL, 0, 0, NULL, NULL}, NULL, false, NULL, NULL
	}
844 845 846
};


847
static struct config_int ConfigureNamesInt[] =
848
{
849
	{
850
		{"default_statistics_target", PGC_USERSET, QUERY_TUNING_OTHER,
851
			gettext_noop("Sets the default statistics target."),
852
			gettext_noop("This applies to table columns that have not had a "
853
			 "column-specific target set via ALTER TABLE SET STATISTICS.")
854 855
		},
		&default_statistics_target,
856 857
		10, 1, 1000, NULL, NULL
	},
858
	{
859
		{"from_collapse_limit", PGC_USERSET, QUERY_TUNING_OTHER,
860 861
			gettext_noop("Sets the FROM-list size beyond which subqueries are not "
						 "collapsed."),
862
			gettext_noop("The planner will merge subqueries into upper "
863
			"queries if the resulting FROM list would have no more than "
864
						 "this many items.")
865 866
		},
		&from_collapse_limit,
867 868 869
		8, 1, INT_MAX, NULL, NULL
	},
	{
870
		{"join_collapse_limit", PGC_USERSET, QUERY_TUNING_OTHER,
871 872
			gettext_noop("Sets the FROM-list size beyond which JOIN constructs are not "
						 "flattened."),
873 874
			gettext_noop("The planner will flatten explicit inner JOIN "
						 "constructs into lists of FROM items whenever a list of no more "
875
						 "than this many items would result.")
876 877
		},
		&join_collapse_limit,
878 879 880
		8, 1, INT_MAX, NULL, NULL
	},
	{
881
		{"geqo_threshold", PGC_USERSET, QUERY_TUNING_GEQO,
882
			gettext_noop("Sets the threshold of FROM items beyond which GEQO is used."),
883 884 885
			NULL
		},
		&geqo_threshold,
886
		12, 2, INT_MAX, NULL, NULL
887
	},
888
	{
889 890
		{"geqo_effort", PGC_USERSET, QUERY_TUNING_GEQO,
			gettext_noop("GEQO: effort is used to set the default for other GEQO parameters."),
891 892
			NULL
		},
893 894 895 896 897 898 899 900
		&Geqo_effort,
		DEFAULT_GEQO_EFFORT, MIN_GEQO_EFFORT, MAX_GEQO_EFFORT, NULL, NULL
	},
	{
		{"geqo_pool_size", PGC_USERSET, QUERY_TUNING_GEQO,
			gettext_noop("GEQO: number of individuals in the population."),
			gettext_noop("Zero selects a suitable default value.")
		},
901
		&Geqo_pool_size,
902
		0, 0, INT_MAX, NULL, NULL
903 904
	},
	{
905
		{"geqo_generations", PGC_USERSET, QUERY_TUNING_GEQO,
906
			gettext_noop("GEQO: number of iterations of the algorithm."),
907
			gettext_noop("Zero selects a suitable default value.")
908 909
		},
		&Geqo_generations,
910
		0, 0, INT_MAX, NULL, NULL
911 912 913
	},

	{
914
		{"deadlock_timeout", PGC_SIGHUP, LOCK_MANAGEMENT,
915
			gettext_noop("The time in milliseconds to wait on lock before checking for deadlock."),
916 917 918
			NULL
		},
		&DeadlockTimeout,
919
		1000, 0, INT_MAX, NULL, NULL
920
	},
921 922

	/*
B
Bruce Momjian 已提交
923 924
	 * Note: There is some postprocessing done in PostmasterMain() to make
	 * sure the buffers are at least twice the number of backends, so the
925 926 927
	 * constraints here are partially unused. Similarly, the superuser
	 * reserved number is checked to ensure it is less than the max
	 * backends number.
928
	 */
929
	{
930
		{"max_connections", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
931
			gettext_noop("Sets the maximum number of concurrent connections."),
932 933 934
			NULL
		},
		&MaxBackends,
935
		100, 1, INT_MAX, NULL, NULL
936
	},
937

938
	{
939
		{"superuser_reserved_connections", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
940
			gettext_noop("Sets the number of connection slots reserved for superusers."),
941 942 943
			NULL
		},
		&ReservedBackends,
944 945 946
		2, 0, INT_MAX, NULL, NULL
	},

947
	{
948
		{"shared_buffers", PGC_POSTMASTER, RESOURCES_MEM,
949
			gettext_noop("Sets the number of shared memory buffers used by the server."),
950 951 952
			NULL
		},
		&NBuffers,
953
		1000, 16, INT_MAX, NULL, NULL
954
	},
955

956
	{
957
		{"port", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
958
			gettext_noop("Sets the TCP port the server listens on."),
959 960 961
			NULL
		},
		&PostPortNumber,
962
		DEF_PGPORT, 1, 65535, NULL, NULL
963
	},
964

965
	{
966
		{"unix_socket_permissions", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
967
			gettext_noop("Sets the access permissions of the Unix-domain socket."),
968
			gettext_noop("Unix-domain sockets use the usual Unix file system "
969
						 "permission set. The parameter value is expected to be an numeric mode "
970
						 "specification in the form accepted by the chmod and umask system "
971 972 973 974
						 "calls. (To use the customary octal format the number must start with "
						 "a 0 (zero).)")
		},
		&Unix_socket_permissions,
975
		0777, 0000, 0777, NULL, NULL
976
	},
977

978
	{
979 980 981 982 983
		{"work_mem", PGC_USERSET, RESOURCES_MEM,
			gettext_noop("Sets the maximum memory to be used for query workspaces."),
			gettext_noop("This much memory may be used by each internal "
						 "sort operation and hash table before switching to "
						 "temporary disk files.")
984
		},
985 986
		&work_mem,
		1024, 8 * BLCKSZ / 1024, INT_MAX / 1024, NULL, NULL
987
	},
988

989
	{
990 991 992
		{"maintenance_work_mem", PGC_USERSET, RESOURCES_MEM,
			gettext_noop("Sets the maximum memory to be used for maintenance operations."),
			gettext_noop("This includes operations such as VACUUM and CREATE INDEX.")
993
		},
994 995
		&maintenance_work_mem,
		16384, 1024, INT_MAX / 1024, NULL, NULL
996
	},
997

998 999 1000 1001 1002 1003 1004 1005 1006
	{
		{"max_stack_depth", PGC_SUSET, RESOURCES_MEM,
			gettext_noop("Sets the maximum stack depth, in kilobytes."),
			NULL
		},
		&max_stack_depth,
		2048, 100, INT_MAX / 1024, assign_max_stack_depth, NULL
	},

J
Jan Wieck 已提交
1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021 1022 1023 1024 1025 1026 1027 1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038 1039 1040 1041 1042 1043 1044 1045 1046 1047 1048 1049 1050 1051
	{
		{"vacuum_cost_page_hit", PGC_USERSET, RESOURCES,
			gettext_noop("Vacuum cost for a page found in the buffer cache."),
			NULL
		},
		&VacuumCostPageHit,
		1, 0, 10000, NULL, NULL
	},

	{
		{"vacuum_cost_page_miss", PGC_USERSET, RESOURCES,
			gettext_noop("Vacuum cost for a page not found in the buffer cache."),
			NULL
		},
		&VacuumCostPageMiss,
		10, 0, 10000, NULL, NULL
	},

	{
		{"vacuum_cost_page_dirty", PGC_USERSET, RESOURCES,
			gettext_noop("Vacuum cost for a page dirtied by vacuum."),
			NULL
		},
		&VacuumCostPageDirty,
		20, 0, 10000, NULL, NULL
	},

	{
		{"vacuum_cost_limit", PGC_USERSET, RESOURCES,
			gettext_noop("Vacuum cost amount available before napping."),
			NULL
		},
		&VacuumCostLimit,
		200, 1, 10000, NULL, NULL
	},

	{
		{"vacuum_cost_naptime", PGC_USERSET, RESOURCES,
			gettext_noop("Vacuum cost naptime in milliseconds."),
			NULL
		},
		&VacuumCostNaptime,
		0, 0, 1000, NULL, NULL
	},

1052
	{
1053
		{"max_files_per_process", PGC_POSTMASTER, RESOURCES_KERNEL,
1054
			gettext_noop("Sets the maximum number of simultaneously open files for each server process."),
1055 1056 1057
			NULL
		},
		&max_files_per_process,
1058
		1000, 25, INT_MAX, NULL, NULL
1059
	},
1060

1061
#ifdef LOCK_DEBUG
1062
	{
1063
		{"trace_lock_oidmin", PGC_SUSET, DEVELOPER_OPTIONS,
1064
			gettext_noop("no description available"),
1065 1066 1067 1068
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&Trace_lock_oidmin,
1069
		BootstrapObjectIdData, 1, INT_MAX, NULL, NULL
1070 1071
	},
	{
1072
		{"trace_lock_table", PGC_SUSET, DEVELOPER_OPTIONS,
1073
			gettext_noop("no description available"),
1074 1075 1076 1077
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&Trace_lock_table,
1078
		0, 0, INT_MAX, NULL, NULL
1079
	},
1080 1081
#endif

1082
	{
1083
		{"statement_timeout", PGC_USERSET, CLIENT_CONN_STATEMENT,
1084
			gettext_noop("Sets the maximum allowed duration (in milliseconds) of any statement."),
1085
			gettext_noop("A value of 0 turns off the timeout.")
1086 1087
		},
		&StatementTimeout,
1088 1089 1090
		0, 0, INT_MAX, NULL, NULL
	},

1091
	{
1092
		{"max_fsm_relations", PGC_POSTMASTER, RESOURCES_FSM,
1093 1094
			gettext_noop("Sets the maximum number of tables and indexes for which free space is "
						 "tracked."),
1095 1096 1097
			NULL
		},
		&MaxFSMRelations,
1098
		1000, 100, INT_MAX, NULL, NULL
1099 1100
	},
	{
1101
		{"max_fsm_pages", PGC_POSTMASTER, RESOURCES_FSM,
1102 1103
			gettext_noop("Sets the maximum number of disk pages for which free space is "
						 "tracked."),
1104 1105 1106
			NULL
		},
		&MaxFSMPages,
1107
		20000, 1000, INT_MAX, NULL, NULL
1108
	},
1109

1110
	{
1111
		{"max_locks_per_transaction", PGC_POSTMASTER, LOCK_MANAGEMENT,
1112
			gettext_noop("Sets the maximum number of locks per transaction."),
1113 1114 1115 1116 1117
			gettext_noop("The shared lock table is sized on the assumption that "
						 "at most max_locks_per_transaction * max_connections distinct "
					   "objects will need to be locked at any one time.")
		},
		&max_locks_per_xact,
1118
		64, 10, INT_MAX, NULL, NULL
1119
	},
1120

1121
	{
1122
		{"authentication_timeout", PGC_SIGHUP, CONN_AUTH_SECURITY,
1123
			gettext_noop("Sets the maximum time in seconds to complete client authentication."),
1124 1125 1126
			NULL
		},
		&AuthenticationTimeout,
1127
		60, 1, 600, NULL, NULL
1128
	},
1129

1130
	{
1131 1132
		/* Not for general use */
		{"pre_auth_delay", PGC_SIGHUP, DEVELOPER_OPTIONS,
1133
			gettext_noop("no description available"),
1134 1135 1136 1137
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&PreAuthDelay,
1138
		0, 0, 60, NULL, NULL
1139
	},
1140

1141
	{
1142
		{"checkpoint_segments", PGC_SIGHUP, WAL_CHECKPOINTS,
1143
			gettext_noop("Sets the maximum distance in log segments between automatic WAL checkpoints."),
1144 1145 1146
			NULL
		},
		&CheckPointSegments,
1147
		3, 1, INT_MAX, NULL, NULL
1148
	},
T
Tom Lane 已提交
1149

1150
	{
1151
		{"checkpoint_timeout", PGC_SIGHUP, WAL_CHECKPOINTS,
1152
			gettext_noop("Sets the maximum time in seconds between automatic WAL checkpoints."),
1153 1154 1155
			NULL
		},
		&CheckPointTimeout,
1156
		300, 30, 3600, NULL, NULL
1157
	},
V
Vadim B. Mikheev 已提交
1158

1159
	{
1160
		{"checkpoint_warning", PGC_SIGHUP, WAL_CHECKPOINTS,
1161 1162
			gettext_noop("Logs if filling of checkpoint segments happens more "
						 "frequently than this (in seconds)."),
1163
			gettext_noop("Write a message to the server log if checkpoints "
1164 1165 1166 1167
						 "caused by the filling of checkpoint segment files happens more "
						 "frequently than this number of seconds. Zero turns off the warning.")
		},
		&CheckPointWarning,
1168 1169 1170
		30, 0, INT_MAX, NULL, NULL
	},

1171
	{
1172
		{"wal_buffers", PGC_POSTMASTER, WAL_SETTINGS,
1173
			gettext_noop("Sets the number of disk-page buffers in shared memory for WAL."),
1174 1175 1176
			NULL
		},
		&XLOGbuffers,
1177
		8, 4, INT_MAX, NULL, NULL
1178
	},
V
Vadim B. Mikheev 已提交
1179

1180
	{
1181
		{"commit_delay", PGC_USERSET, WAL_CHECKPOINTS,
1182 1183
			gettext_noop("Sets the delay in microseconds between transaction commit and "
						 "flushing WAL to disk."),
1184 1185 1186
			NULL
		},
		&CommitDelay,
1187
		0, 0, 100000, NULL, NULL
1188
	},
V
Vadim B. Mikheev 已提交
1189

1190
	{
1191
		{"commit_siblings", PGC_USERSET, WAL_CHECKPOINTS,
1192 1193
			gettext_noop("Sets the minimum concurrent open transactions before performing "
						 "commit_delay."),
1194 1195 1196
			NULL
		},
		&CommitSiblings,
1197
		5, 1, 1000, NULL, NULL
1198
	},
1199

1200
	{
1201
		{"extra_float_digits", PGC_USERSET, CLIENT_CONN_LOCALE,
1202
			gettext_noop("Sets the number of digits displayed for floating-point values."),
1203
			gettext_noop("This affects real, double precision, and geometric data types. "
1204
						 "The parameter value is added to the standard number of digits "
1205
						 "(FLT_DIG or DBL_DIG as appropriate).")
1206 1207
		},
		&extra_float_digits,
1208 1209 1210
		0, -15, 2, NULL, NULL
	},

B
Bruce Momjian 已提交
1211
	{
1212
		{"log_min_duration_statement", PGC_USERLIMIT, LOGGING_WHEN,
1213 1214 1215
			gettext_noop("Sets the minimum execution time in milliseconds above which statements will "
						 "be logged."),
			gettext_noop("Zero prints all queries. The default is -1 (turning this feature off).")
1216 1217
		},
		&log_min_duration_statement,
1218
		-1, -1, INT_MAX / 1000, NULL, NULL
B
Bruce Momjian 已提交
1219 1220
	},

J
Jan Wieck 已提交
1221
	{
1222
		{"debug_shared_buffers", PGC_POSTMASTER, STATS_MONITORING,
1223
			gettext_noop("Interval to report shared buffer status in seconds"),
J
Jan Wieck 已提交
1224 1225
			NULL
		},
1226
		&DebugSharedBuffers,
J
Jan Wieck 已提交
1227 1228 1229
		0, 0, 600, NULL, NULL
	},

J
Jan Wieck 已提交
1230 1231 1232 1233 1234 1235 1236 1237 1238 1239 1240 1241 1242 1243 1244
	{
		{"bgwriter_delay", PGC_SIGHUP, RESOURCES,
			gettext_noop("Background writer sleep time between rounds in milliseconds"),
			NULL
		},
		&BgWriterDelay,
		200, 10, 5000, NULL, NULL
	},

	{
		{"bgwriter_percent", PGC_SIGHUP, RESOURCES,
			gettext_noop("Background writer percentage of dirty buffers to flush per round"),
			NULL
		},
		&BgWriterPercent,
1245
		1, 1, 100, NULL, NULL
J
Jan Wieck 已提交
1246 1247 1248 1249 1250 1251 1252
	},

	{
		{"bgwriter_maxpages", PGC_SIGHUP, RESOURCES,
			gettext_noop("Background writer maximum number of pages to flush per round"),
			NULL
		},
1253
		&BgWriterMaxPages,
J
Jan Wieck 已提交
1254 1255 1256
		100, 1, 1000, NULL, NULL
	},

1257 1258 1259 1260 1261 1262 1263 1264 1265 1266 1267 1268 1269 1270 1271 1272 1273 1274 1275 1276 1277 1278 1279 1280 1281 1282 1283 1284 1285 1286 1287 1288 1289 1290 1291 1292 1293 1294 1295
	{
		{"max_function_args", PGC_INTERNAL, COMPILE_OPTIONS,
			gettext_noop("Shows the maximum number of function arguments"),
			NULL,
			GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&max_function_args,
		FUNC_MAX_ARGS, FUNC_MAX_ARGS, FUNC_MAX_ARGS, NULL, NULL
	},

	{
		{"max_index_keys", PGC_INTERNAL, COMPILE_OPTIONS,
			gettext_noop("Shows the maximum number of index keys"),
			NULL,
			GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&max_index_keys,
		INDEX_MAX_KEYS, INDEX_MAX_KEYS, INDEX_MAX_KEYS, NULL, NULL
	},

	{
		{"max_identifier_length", PGC_INTERNAL, COMPILE_OPTIONS,
			gettext_noop("Shows the maximum identifier length"),
			NULL,
			GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&max_identifier_length,
		NAMEDATALEN - 1, NAMEDATALEN - 1, NAMEDATALEN - 1, NULL, NULL
	},

	{
		{"block_size", PGC_INTERNAL, COMPILE_OPTIONS,
			gettext_noop("Shows size of a disk block"),
			NULL,
			GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&block_size,
		BLCKSZ, BLCKSZ, BLCKSZ, NULL, NULL
	},
1296 1297 1298 1299 1300 1301 1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312 1313 1314 1315 1316 1317 1318 1319
	{
		{"autovacuum_vacuum_threshold_base", PGC_SIGHUP, AUTOVACUUM,
			gettext_noop("Minimum number of tuple updates or deletes prior to vacuum."),
			NULL
		},
		&autovacuum_vacuum_base,
		1000, 0, INT_MAX, NULL, NULL
	},
	{
		{"autovacuum_analyze_threshold_base", PGC_SIGHUP, AUTOVACUUM,
			gettext_noop("Minimum number of tuple updates or deletes prior to analyze."),
			NULL
		},
		&autovacuum_analyze_base,
		500, 0, INT_MAX, NULL, NULL
	},
	{
		{"autovacuum_naptime", PGC_SIGHUP, AUTOVACUUM,
			gettext_noop("Minimum number of tuple updates or deletes prior to analyze."),
			NULL
		},
		&autovacuum_analyze_base,
		500, 0, INT_MAX, NULL, NULL
	},
1320

1321
	/* End-of-list marker */
1322
	{
1323
		{NULL, 0, 0, NULL, NULL}, NULL, 0, 0, 0, NULL, NULL
1324
	}
1325 1326 1327
};


1328
static struct config_real ConfigureNamesReal[] =
1329
{
1330
	{
1331
		{"effective_cache_size", PGC_USERSET, QUERY_TUNING_COST,
1332
			gettext_noop("Sets the planner's assumption about size of the disk cache."),
1333 1334 1335 1336 1337
			gettext_noop("That is, the portion of the kernel's disk cache that "
						 "will be used for PostgreSQL data files. This is measured in disk "
						 "pages, which are normally 8 kB each.")
		},
		&effective_cache_size,
1338
		DEFAULT_EFFECTIVE_CACHE_SIZE, 0, DBL_MAX, NULL, NULL
1339
	},
1340
	{
1341
		{"random_page_cost", PGC_USERSET, QUERY_TUNING_COST,
1342 1343
			gettext_noop("Sets the planner's estimate of the cost of a nonsequentially "
						 "fetched disk page."),
1344 1345 1346 1347 1348 1349
			gettext_noop("This is measured as a multiple of the cost of a "
						 "sequential page fetch. A higher value makes it more likely a "
						 "sequential scan will be used, a lower value makes it more likely an "
						 "index scan will be used.")
		},
		&random_page_cost,
1350
		DEFAULT_RANDOM_PAGE_COST, 0, DBL_MAX, NULL, NULL
1351 1352
	},
	{
1353
		{"cpu_tuple_cost", PGC_USERSET, QUERY_TUNING_COST,
1354
			gettext_noop("Sets the planner's estimate of the cost of processing each tuple (row)."),
1355 1356 1357 1358
			gettext_noop("This is measured as a fraction of the cost of a "
						 "sequential page fetch.")
		},
		&cpu_tuple_cost,
1359
		DEFAULT_CPU_TUPLE_COST, 0, DBL_MAX, NULL, NULL
1360 1361
	},
	{
1362
		{"cpu_index_tuple_cost", PGC_USERSET, QUERY_TUNING_COST,
1363 1364
			gettext_noop("Sets the planner's estimate of processing cost for each "
						 "index tuple (row) during index scan."),
1365 1366 1367 1368
			gettext_noop("This is measured as a fraction of the cost of a "
						 "sequential page fetch.")
		},
		&cpu_index_tuple_cost,
1369
		DEFAULT_CPU_INDEX_TUPLE_COST, 0, DBL_MAX, NULL, NULL
1370 1371
	},
	{
1372
		{"cpu_operator_cost", PGC_USERSET, QUERY_TUNING_COST,
1373
			gettext_noop("Sets the planner's estimate of processing cost of each operator in WHERE."),
1374 1375 1376 1377
			gettext_noop("This is measured as a fraction of the cost of a sequential "
						 "page fetch.")
		},
		&cpu_operator_cost,
1378
		DEFAULT_CPU_OPERATOR_COST, 0, DBL_MAX, NULL, NULL
1379 1380 1381
	},

	{
1382
		{"geqo_selection_bias", PGC_USERSET, QUERY_TUNING_GEQO,
1383
			gettext_noop("GEQO: selective pressure within the population."),
1384 1385 1386
			NULL
		},
		&Geqo_selection_bias,
1387 1388
		DEFAULT_GEQO_SELECTION_BIAS, MIN_GEQO_SELECTION_BIAS,
		MAX_GEQO_SELECTION_BIAS, NULL, NULL
1389 1390 1391
	},

	{
1392
		{"seed", PGC_USERSET, UNGROUPED,
1393
			gettext_noop("Sets the seed for random-number generation."),
1394 1395 1396
			NULL,
			GUC_NO_SHOW_ALL | GUC_NO_RESET_ALL | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
1397 1398 1399
		&phony_random_seed,
		0.5, 0.0, 1.0, assign_random_seed, show_random_seed
	},
1400 1401 1402 1403 1404 1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415
	{
		{"autovacuum_vacuum_threshold_sf", PGC_SIGHUP, AUTOVACUUM,
			gettext_noop("Numer of tuple updates or deletes prior to vacuum as a factor of reltuples."),
			NULL
		},
		&autovacuum_vacuum_scaling_factor,
		2, 0, 100, NULL, NULL
	},
	{
		{"autovacuum_analyze_threshold_sf", PGC_SIGHUP, AUTOVACUUM,
			gettext_noop("Numer of tuple updates or deletes prior to analyze as a factor of reltuples."),
			NULL
		},
		&autovacuum_analyze_scaling_factor,
		1, 0, 100, NULL, NULL
	},
1416

1417
	/* End-of-list marker */
1418
	{
1419
		{NULL, 0, 0, NULL, NULL}, NULL, 0.0, 0.0, 0.0, NULL, NULL
1420
	}
1421 1422 1423
};


1424
static struct config_string ConfigureNamesString[] =
1425
{
1426 1427 1428 1429 1430 1431 1432 1433 1434
 	{
 		{"archive_command", PGC_SIGHUP, WAL_SETTINGS,
 			gettext_noop("WAL archiving command."),
 			gettext_noop("The shell command that will be called to archive a WAL file.")
 		},
 		&XLogArchiveCommand,
 		"", NULL, NULL
 	},

1435
	{
1436
		{"client_encoding", PGC_USERSET, CLIENT_CONN_LOCALE,
1437
			gettext_noop("Sets the client's character set encoding."),
1438 1439 1440
			NULL,
			GUC_REPORT
		},
1441
		&client_encoding_string,
1442
		"SQL_ASCII", assign_client_encoding, NULL
1443 1444
	},

1445
	{
1446
		{"client_min_messages", PGC_USERSET, LOGGING_WHEN,
1447
			gettext_noop("Sets the message levels that are sent to the client."),
1448 1449 1450 1451 1452 1453
			gettext_noop("Valid values are DEBUG5, DEBUG4, DEBUG3, DEBUG2, "
						 "DEBUG1, LOG, NOTICE, WARNING, and ERROR. Each level includes all the "
						 "levels that follow it. The later the level, the fewer messages are "
						 "sent.")
		},
		&client_min_messages_str,
1454
		"notice", assign_client_min_messages, NULL
1455
	},
1456

1457
	{
1458
		{"log_min_messages", PGC_USERLIMIT, LOGGING_WHEN,
1459
			gettext_noop("Sets the message levels that are logged."),
1460 1461
			gettext_noop("Valid values are DEBUG5, DEBUG4, DEBUG3, DEBUG2, DEBUG1, "
						 "INFO, NOTICE, WARNING, ERROR, LOG, FATAL, and PANIC. Each level "
1462
						 "includes all the levels that follow it.")
1463 1464
		},
		&log_min_messages_str,
1465 1466 1467 1468
		"notice", assign_log_min_messages, NULL
	},

	{
1469
		{"log_error_verbosity", PGC_SUSET, LOGGING_WHEN,
1470
			gettext_noop("Sets the verbosity of logged messages."),
1471
			gettext_noop("Valid values are \"terse\", \"default\", and \"verbose\".")
1472 1473
		},
		&log_error_verbosity_str,
1474 1475
		"default", assign_log_error_verbosity, NULL
	},
1476 1477 1478 1479 1480 1481 1482 1483
	{
		{"log_statement", PGC_USERLIMIT, LOGGING_WHAT,
			gettext_noop("Sets the type of statements logged."),
			gettext_noop("Valid values are \"none\", \"mod\", \"ddl\", and \"all\".")
		},
		&log_statement_str,
		"none", assign_log_statement, NULL
	},
1484

1485
	{
1486
		{"log_min_error_statement", PGC_USERLIMIT, LOGGING_WHEN,
1487
			gettext_noop("Causes all statements generating error at or above this level to be logged."),
1488
			gettext_noop("All SQL statements that cause an error of the "
1489
						 "specified level or a higher level are logged.")
1490 1491
		},
		&log_min_error_statement_str,
1492
		"panic", assign_min_error_statement, NULL
1493 1494
	},

B
Add:  
Bruce Momjian 已提交
1495 1496 1497 1498 1499 1500 1501 1502 1503 1504
	{
		{"log_line_prefix", PGC_SIGHUP, LOGGING_WHAT,
		 gettext_noop("Controls information prefixed to each log line"),
		 gettext_noop("if blank no prefix is used")
		},
		&Log_line_prefix,
		"", NULL, NULL
	},


1505
	{
1506
		{"DateStyle", PGC_USERSET, CLIENT_CONN_LOCALE,
1507
			gettext_noop("Sets the display format for date and time values."),
1508
			gettext_noop("Also controls interpretation of ambiguous "
1509
						 "date inputs."),
1510 1511
			GUC_LIST_INPUT | GUC_REPORT
		},
1512
		&datestyle_string,
1513
		"ISO, MDY", assign_datestyle, NULL
1514
	},
1515

1516
	{
1517
		{"default_transaction_isolation", PGC_USERSET, CLIENT_CONN_STATEMENT,
1518
			gettext_noop("Sets the transaction isolation level of each new transaction."),
1519
			gettext_noop("Each SQL transaction has an isolation level, which "
1520
				 "can be either \"read uncommitted\", \"read committed\", \"repeatable read\", or \"serializable\".")
1521 1522
		},
		&default_iso_level_string,
1523
		"read committed", assign_defaultxactisolevel, NULL
1524 1525
	},

1526
	{
1527
		{"dynamic_library_path", PGC_SUSET, CLIENT_CONN_OTHER,
1528
			gettext_noop("Sets the path for dynamically loadable modules."),
1529
			gettext_noop("If a dynamically loadable module needs to be opened and "
1530
						 "the specified name does not have a directory component (i.e., the "
1531 1532 1533 1534
						 "name does not contain a slash), the system will search this path for "
						 "the specified file.")
		},
		&Dynamic_library_path,
1535
		"$libdir", NULL, NULL
1536 1537 1538
	},

	{
1539
		{"krb_server_keyfile", PGC_POSTMASTER, CONN_AUTH_SECURITY,
1540
			gettext_noop("Sets the location of the Kerberos server key file."),
1541 1542 1543
			NULL
		},
		&pg_krb_server_keyfile,
1544
		PG_KRB_SRVTAB, NULL, NULL
1545
	},
1546

1547 1548
	{
		{"rendezvous_name", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
1549
			gettext_noop("Sets the Rendezvous broadcast service name."),
1550 1551 1552 1553 1554 1555
			NULL
		},
		&rendezvous_name,
		"", NULL, NULL
	},

1556 1557
	/* See main.c about why defaults for LC_foo are not all alike */

1558
	{
1559
		{"lc_collate", PGC_INTERNAL, CLIENT_CONN_LOCALE,
1560
			gettext_noop("Shows the collation order locale."),
1561 1562 1563 1564
			NULL,
			GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&locale_collate,
1565 1566 1567 1568
		"C", NULL, NULL
	},

	{
1569
		{"lc_ctype", PGC_INTERNAL, CLIENT_CONN_LOCALE,
1570
			gettext_noop("Shows the character classification and case conversion locale."),
1571 1572 1573 1574
			NULL,
			GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&locale_ctype,
1575 1576 1577
		"C", NULL, NULL
	},

1578
	{
1579
		{"lc_messages", PGC_SUSET, CLIENT_CONN_LOCALE,
1580
			gettext_noop("Sets the language in which messages are displayed."),
1581 1582 1583
			NULL
		},
		&locale_messages,
1584 1585 1586 1587
		"", locale_messages_assign, NULL
	},

	{
1588
		{"lc_monetary", PGC_USERSET, CLIENT_CONN_LOCALE,
1589
			gettext_noop("Sets the locale for formatting monetary amounts."),
1590 1591 1592
			NULL
		},
		&locale_monetary,
1593
		"C", locale_monetary_assign, NULL
1594 1595 1596
	},

	{
1597
		{"lc_numeric", PGC_USERSET, CLIENT_CONN_LOCALE,
1598
			gettext_noop("Sets the locale for formatting numbers."),
1599 1600 1601
			NULL
		},
		&locale_numeric,
1602
		"C", locale_numeric_assign, NULL
1603 1604 1605
	},

	{
1606
		{"lc_time", PGC_USERSET, CLIENT_CONN_LOCALE,
1607
			gettext_noop("Sets the locale for formatting date and time values."),
1608 1609 1610
			NULL
		},
		&locale_time,
1611
		"C", locale_time_assign, NULL
1612 1613
	},

1614
	{
1615
		{"preload_libraries", PGC_POSTMASTER, RESOURCES_KERNEL,
1616
			gettext_noop("Lists shared libraries to preload into server."),
1617 1618 1619
			NULL,
			GUC_LIST_INPUT | GUC_LIST_QUOTE
		},
1620
		&preload_libraries_string,
1621
		"", NULL, NULL
1622 1623
	},

1624
	{
1625
		{"regex_flavor", PGC_USERSET, COMPAT_OPTIONS_PREVIOUS,
1626
			gettext_noop("Sets the regular expression \"flavor\"."),
1627
			gettext_noop("This can be set to advanced, extended, or basic.")
1628 1629
		},
		&regex_flavor_string,
1630 1631 1632
		"advanced", assign_regex_flavor, NULL
	},

1633
	{
1634
		{"search_path", PGC_USERSET, CLIENT_CONN_STATEMENT,
1635
			gettext_noop("Sets the schema search order for names that are not schema-qualified."),
1636 1637 1638
			NULL,
			GUC_LIST_INPUT | GUC_LIST_QUOTE
		},
1639 1640
		&namespace_search_path,
		"$user,public", assign_search_path, NULL
1641 1642 1643
	},

	{
1644 1645
		/* Can't be set in postgresql.conf */
		{"server_encoding", PGC_INTERNAL, CLIENT_CONN_LOCALE,
1646
			gettext_noop("Sets the server (database) character set encoding."),
1647
			NULL,
1648
			GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
1649
		},
1650 1651 1652 1653 1654
		&server_encoding_string,
		"SQL_ASCII", NULL, NULL
	},

	{
1655 1656
		/* Can't be set in postgresql.conf */
		{"server_version", PGC_INTERNAL, UNGROUPED,
1657
			gettext_noop("Shows the server version."),
1658 1659 1660
			NULL,
			GUC_REPORT | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
1661 1662
		&server_version_string,
		PG_VERSION, NULL, NULL
1663 1664
	},

1665
	{
1666 1667
		/* Not for general use --- used by SET SESSION AUTHORIZATION */
		{"session_authorization", PGC_USERSET, UNGROUPED,
1668
			gettext_noop("Sets the session user name."),
1669
			NULL,
1670
			GUC_REPORT | GUC_NO_SHOW_ALL | GUC_NO_RESET_ALL | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
1671
		},
1672 1673
		&session_authorization_string,
		NULL, assign_session_authorization, show_session_authorization
1674 1675
	},

1676 1677 1678 1679 1680
	{
		{"log_destination", PGC_POSTMASTER, LOGGING_WHERE,
		 gettext_noop("Sets the target for log output."),
		 gettext_noop("Valid values are combinations of stderr, syslog "
					  "and eventlog, depending on platform."),
1681
		 GUC_LIST_INPUT
1682 1683 1684 1685 1686
		},
		&log_destination_string,
		"stderr", assign_log_destination, NULL
	},

T
Tatsuo Ishii 已提交
1687
#ifdef HAVE_SYSLOG
1688
	{
1689
		{"syslog_facility", PGC_POSTMASTER, LOGGING_WHERE,
1690
			gettext_noop("Sets the syslog \"facility\" to be used when syslog enabled."),
1691 1692
			gettext_noop("Valid values are LOCAL0, LOCAL1, LOCAL2, LOCAL3, "
						 "LOCAL4, LOCAL5, LOCAL6, LOCAL7.")
1693 1694
		},
		&Syslog_facility,
1695
		"LOCAL0", assign_facility, NULL
1696 1697
	},
	{
1698
		{"syslog_ident", PGC_POSTMASTER, LOGGING_WHERE,
1699 1700
			gettext_noop("Sets the program name used to identify PostgreSQL messages "
						 "in syslog."),
1701 1702 1703
			NULL
		},
		&Syslog_ident,
1704
		"postgres", NULL, NULL
1705
	},
1706
#endif
1707

1708
	{
1709
		{"TimeZone", PGC_USERSET, CLIENT_CONN_LOCALE,
1710
			gettext_noop("Sets the time zone for displaying and interpreting time stamps."),
1711 1712 1713
			NULL
		},
		&timezone_string,
1714 1715 1716 1717
		"UNKNOWN", assign_timezone, show_timezone
	},

	{
1718
		{"transaction_isolation", PGC_USERSET, CLIENT_CONN_STATEMENT,
1719
			gettext_noop("Sets the current transaction's isolation level."),
1720 1721 1722
			NULL,
			GUC_NO_RESET_ALL | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
1723 1724 1725 1726 1727
		&XactIsoLevel_string,
		NULL, assign_XactIsoLevel, show_XactIsoLevel
	},

	{
1728
		{"unix_socket_group", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
1729
			gettext_noop("Sets the owning group of the Unix-domain socket."),
1730 1731 1732 1733
			gettext_noop("(The owning user of the socket is always the user "
						 "that starts the server.)")
		},
		&Unix_socket_group,
1734
		"", NULL, NULL
1735
	},
1736

1737
	{
1738
		{"unix_socket_directory", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
1739
			gettext_noop("Sets the directory where the Unix-domain socket will be created."),
1740 1741 1742
			NULL
		},
		&UnixSocketDir,
1743
		"", assign_canonical_path, NULL
1744
	},
1745

1746
	{
1747 1748
		{"listen_addresses", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
			gettext_noop("Sets the host name or IP addresses to listen to."),
1749 1750
			NULL
		},
1751 1752
		&ListenAddresses,
		"localhost", NULL, NULL
1753
	},
1754

1755
	{
1756
		{"wal_sync_method", PGC_SIGHUP, WAL_SETTINGS,
1757
			gettext_noop("Selects the method used for forcing WAL updates out to disk."),
1758 1759 1760
			NULL
		},
		&XLOG_sync_method,
1761
		XLOG_sync_method_default, assign_xlog_sync_method, NULL
1762
	},
1763

1764 1765 1766 1767 1768 1769 1770 1771 1772 1773
	{
		{"custom_variable_classes", PGC_POSTMASTER, RESOURCES_KERNEL,
			gettext_noop("Sets the list of known custom variable classes"),
			NULL,
			GUC_LIST_INPUT | GUC_LIST_QUOTE
		},
		&custom_variable_classes,
		NULL, assign_custom_variable_classes, NULL
	},

1774 1775 1776
	{
		{"pgdata", PGC_POSTMASTER, 0, gettext_noop("Sets the location of the data directory"), NULL}, 
		&guc_pgdata,
1777
		NULL, assign_canonical_path, NULL
1778 1779 1780 1781 1782
	},

	{
		{"hba_conf", PGC_SIGHUP, 0, gettext_noop("Sets the location of the \"hba\" configuration file"), NULL}, 
		&guc_hbafile,
1783
		NULL, assign_canonical_path, NULL
1784 1785 1786 1787 1788
	},

	{
		{"ident_conf", PGC_SIGHUP, 0, gettext_noop("Sets the location of the \"ident\" configuration file"), NULL}, 
		&guc_identfile,
1789
		NULL, assign_canonical_path, NULL
1790 1791 1792 1793 1794
	},

	{
		{"external_pidfile", PGC_POSTMASTER, 0, gettext_noop("Writes the postmaster PID to the specified file"), NULL},
		&external_pidfile,
1795
		NULL, assign_canonical_path, NULL
1796 1797
	},

1798
	/* End-of-list marker */
1799
	{
1800
		{NULL, 0, 0, NULL, NULL}, NULL, NULL, NULL, NULL
1801
	}
1802 1803 1804
};


1805
/******** end of options list ********/
1806

1807
  
1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818 1819 1820
/*
 * To allow continued support of obsolete names for GUC variables, we apply
 * the following mappings to any unrecognized name.  Note that an old name
 * should be mapped to a new one only if the new variable has very similar
 * semantics to the old.
 */
static const char * const map_old_guc_names[] = {
	"sort_mem", "work_mem",
	"vacuum_mem", "maintenance_work_mem",
	NULL
};


1821
/*
1822
 * Actual lookup of variables is done through this single, sorted array.
1823
 */
1824 1825
static struct config_generic **guc_variables;

1826
/* Current number of variables contained in the vector */
1827 1828
static int num_guc_variables;

1829
/* Vector capacity */
1830
static int size_guc_variables;
1831

1832

1833
static bool guc_dirty;			/* TRUE if need to do commit/abort work */
1834

1835 1836
static bool reporting_enabled;	/* TRUE to enable GUC_REPORT */

B
Bruce Momjian 已提交
1837
static char *guc_string_workspace;		/* for avoiding memory leaks */
1838

1839

B
Bruce Momjian 已提交
1840
static int	guc_var_compare(const void *a, const void *b);
1841
static int	guc_name_compare(const char *namea, const char *nameb);
1842
static void push_old_value(struct config_generic *gconf);
1843
static void ReportGUCOption(struct config_generic * record);
B
Bruce Momjian 已提交
1844
static char *_ShowOption(struct config_generic * record);
1845

1846

1847 1848 1849 1850 1851 1852 1853 1854 1855 1856 1857 1858 1859 1860 1861 1862 1863 1864 1865 1866 1867 1868 1869 1870 1871 1872 1873 1874 1875 1876 1877 1878 1879 1880 1881 1882 1883 1884 1885 1886 1887 1888 1889
/*
 * Some infrastructure for checking malloc/strdup/realloc calls
 */
static void *
guc_malloc(int elevel, size_t size)
{
	void	*data;

	data = malloc(size);
	if (data == NULL)
		ereport(elevel,
				(errcode(ERRCODE_OUT_OF_MEMORY),
				 errmsg("out of memory")));
	return data;
}

static void *
guc_realloc(int elevel, void *old, size_t size)
{
	void	*data;

	data = realloc(old, size);
	if (data == NULL)
		ereport(elevel,
				(errcode(ERRCODE_OUT_OF_MEMORY),
				 errmsg("out of memory")));
	return data;
}

static char *
guc_strdup(int elevel, const char *src)
{
	char	*data;

	data = strdup(src);
	if (data == NULL)
		ereport(elevel,
				(errcode(ERRCODE_OUT_OF_MEMORY),
				 errmsg("out of memory")));
	return data;
}


1890 1891 1892 1893 1894 1895 1896 1897 1898 1899 1900 1901 1902 1903 1904 1905 1906 1907 1908 1909 1910 1911 1912 1913 1914 1915 1916 1917 1918 1919 1920 1921 1922 1923 1924 1925 1926 1927 1928 1929 1930 1931 1932 1933 1934 1935 1936 1937 1938 1939 1940 1941 1942 1943 1944
/*
 * Support for assigning to a field of a string GUC item.  Free the prior
 * value if it's not referenced anywhere else in the item (including stacked
 * states).
 */
static void
set_string_field(struct config_string *conf, char **field, char *newval)
{
	char	*oldval = *field;
	GucStack *stack;

	/* Do the assignment */
	*field = newval;

	/* Exit if any duplicate references, or if old value was NULL anyway */
	if (oldval == NULL ||
		oldval == *(conf->variable) ||
		oldval == conf->reset_val ||
		oldval == conf->tentative_val)
		return;
	for (stack = conf->gen.stack; stack; stack = stack->prev)
	{
		if (oldval == stack->tentative_val.stringval ||
			oldval == stack->value.stringval)
			return;
	}

	/* Not used anymore, so free it */
	free(oldval);
}

/*
 * Detect whether strval is referenced anywhere in a GUC string item
 */
static bool
string_field_used(struct config_string *conf, char *strval)
{
	GucStack *stack;

	if (strval == *(conf->variable) ||
		strval == conf->reset_val ||
		strval == conf->tentative_val)
		return true;
	for (stack = conf->gen.stack; stack; stack = stack->prev)
	{
		if (strval == stack->tentative_val.stringval ||
			strval == stack->value.stringval)
			return true;
	}
	return false;
}


struct config_generic **
get_guc_variables(void)
1945 1946 1947
{
	return guc_variables;
}
1948

1949

1950
/*
B
Bruce Momjian 已提交
1951
 * Build the sorted array.	This is split out so that it could be
1952 1953
 * re-executed after startup (eg, we could allow loadable modules to
 * add vars, and then we'd need to re-sort).
1954
 */
1955
void
1956
build_guc_variables(void)
1957
{
1958
	int         size_vars;
1959 1960
	int			num_vars = 0;
	struct config_generic **guc_vars;
B
Bruce Momjian 已提交
1961
	int			i;
1962

1963
	for (i = 0; ConfigureNamesBool[i].gen.name; i++)
1964 1965 1966
	{
		struct config_bool *conf = &ConfigureNamesBool[i];

1967 1968 1969
		/* Rather than requiring vartype to be filled in by hand, do this: */
		conf->gen.vartype = PGC_BOOL;
		num_vars++;
1970
	}
1971

1972
	for (i = 0; ConfigureNamesInt[i].gen.name; i++)
1973 1974 1975
	{
		struct config_int *conf = &ConfigureNamesInt[i];

1976 1977
		conf->gen.vartype = PGC_INT;
		num_vars++;
1978
	}
1979

1980
	for (i = 0; ConfigureNamesReal[i].gen.name; i++)
1981 1982 1983
	{
		struct config_real *conf = &ConfigureNamesReal[i];

1984 1985
		conf->gen.vartype = PGC_REAL;
		num_vars++;
1986
	}
1987

1988
	for (i = 0; ConfigureNamesString[i].gen.name; i++)
1989
	{
1990
		struct config_string *conf = &ConfigureNamesString[i];
1991

1992 1993
		conf->gen.vartype = PGC_STRING;
		num_vars++;
1994 1995
	}

1996 1997 1998 1999
	/* Create table with 20% slack
	 */
	size_vars = num_vars + num_vars / 4;

2000
	guc_vars = (struct config_generic **)
2001
		guc_malloc(FATAL, size_vars * sizeof(struct config_generic *));
2002

2003
	num_vars = 0;
2004

2005
	for (i = 0; ConfigureNamesBool[i].gen.name; i++)
B
Bruce Momjian 已提交
2006
		guc_vars[num_vars++] = &ConfigureNamesBool[i].gen;
2007

2008
	for (i = 0; ConfigureNamesInt[i].gen.name; i++)
B
Bruce Momjian 已提交
2009
		guc_vars[num_vars++] = &ConfigureNamesInt[i].gen;
2010

2011
	for (i = 0; ConfigureNamesReal[i].gen.name; i++)
B
Bruce Momjian 已提交
2012
		guc_vars[num_vars++] = &ConfigureNamesReal[i].gen;
2013

2014
	for (i = 0; ConfigureNamesString[i].gen.name; i++)
B
Bruce Momjian 已提交
2015
		guc_vars[num_vars++] = &ConfigureNamesString[i].gen;
2016

2017 2018 2019 2020
	if (guc_variables)
		free(guc_variables);
	guc_variables = guc_vars;
	num_guc_variables = num_vars;
2021 2022 2023
	size_guc_variables = size_vars;
	qsort((void*) guc_variables, num_guc_variables,
		sizeof(struct config_generic*), guc_var_compare);
2024 2025
}

2026 2027 2028 2029 2030 2031 2032 2033 2034 2035 2036 2037 2038 2039 2040 2041 2042 2043 2044 2045 2046 2047 2048 2049 2050 2051 2052 2053 2054 2055 2056 2057 2058 2059
static bool
is_custom_class(const char *name, int dotPos)
{
	/* The assign_custom_variable_classes has made sure no empty
	 * identifiers or whitespace exists in the variable
	 */
	bool result = false;
	const char *ccs = GetConfigOption("custom_variable_classes");
	if(ccs != NULL)
	{
		const char *start = ccs;
		for(;; ++ccs)
		{
			int c = *ccs;
			if(c == 0 || c == ',')
			{
				if(dotPos == ccs - start && strncmp(start, name, dotPos) == 0)
				{
					result = true;
					break;
				}
				if(c == 0)
					break;
				start = ccs + 1;
			}
		}
	}
	return result;
}

/*
 * Add a new GUC variable to the list of known variables. The
 * list is expanded if needed.
 */
2060 2061
static bool
add_guc_variable(struct config_generic *var, int elevel)
2062 2063 2064
{
	if(num_guc_variables + 1 >= size_guc_variables)
	{
2065
		/* Increase the vector by 25%
2066 2067 2068 2069 2070
		 */
		int size_vars = size_guc_variables + size_guc_variables / 4;
		struct config_generic** guc_vars;

		if(size_vars == 0)
2071
		{
2072
			size_vars = 100;
2073 2074 2075 2076
			guc_vars = (struct config_generic**)
					guc_malloc(elevel, size_vars * sizeof(struct config_generic*));
		}
		else
2077
		{
2078 2079
			guc_vars = (struct config_generic**)
					guc_realloc(elevel, guc_variables, size_vars * sizeof(struct config_generic*));
2080 2081
		}

2082 2083 2084
		if(guc_vars == NULL)
			return false;		/* out of memory */

2085 2086 2087 2088 2089 2090
		guc_variables = guc_vars;
		size_guc_variables = size_vars;
	}
	guc_variables[num_guc_variables++] = var;
	qsort((void*) guc_variables, num_guc_variables,
		sizeof(struct config_generic*), guc_var_compare);
2091
	return true;
2092 2093 2094
}

/*
2095
 * Create and add a placeholder variable. It's presumed to belong
2096 2097 2098
 * to a valid custom variable class at this point.
 */
static struct config_string*
2099
add_placeholder_variable(const char *name, int elevel)
2100 2101
{
	size_t sz = sizeof(struct config_string) + sizeof(char*);
2102 2103
	struct config_string*  var;
	struct config_generic* gen;
2104

2105 2106 2107 2108 2109
	var = (struct config_string*)guc_malloc(elevel, sz);
	if(var == NULL)
		return NULL;

	gen = &var->gen;
2110 2111
	memset(var, 0, sz);

2112 2113 2114 2115 2116 2117 2118
	gen->name = guc_strdup(elevel, name);
	if(gen->name == NULL)
	{
		free(var);
		return NULL;
	}

2119 2120 2121 2122 2123 2124 2125 2126 2127 2128
	gen->context    = PGC_USERSET;
	gen->group      = CUSTOM_OPTIONS;
	gen->short_desc = "GUC placeholder variable";
	gen->flags      = GUC_NO_SHOW_ALL | GUC_NOT_IN_SAMPLE | GUC_CUSTOM_PLACEHOLDER;
	gen->vartype    = PGC_STRING;

	/* The char* is allocated at the end of the struct since we have
	 * no 'static' place to point to.
	 */	
	var->variable = (char**)(var + 1);
2129 2130 2131 2132 2133 2134 2135 2136

	if(!add_guc_variable((struct config_generic*) var, elevel))
	{
		free((void *) gen->name);
		free(var);
		return NULL;
	}

2137 2138
	return var;
}
2139 2140

/*
2141 2142
 * Look up option NAME. If it exists, return a pointer to its record,
 * else return NULL.
2143
 */
2144
static struct config_generic *
2145
find_option(const char *name, int elevel)
2146
{
2147
	const char *dot;
2148 2149
	const char **key = &name;
	struct config_generic **res;
2150
	int			i;
2151

2152
	Assert(name);
2153

2154
	/*
2155
	 * By equating const char ** with struct config_generic *, we are
2156 2157
	 * assuming the name field is first in config_generic.
	 */
B
Bruce Momjian 已提交
2158 2159 2160 2161 2162
	res = (struct config_generic **) bsearch((void *) &key,
											 (void *) guc_variables,
											 num_guc_variables,
										 sizeof(struct config_generic *),
											 guc_var_compare);
2163 2164
	if (res)
		return *res;
2165 2166 2167 2168 2169 2170 2171 2172 2173

	/*
	 * See if the name is an obsolete name for a variable.  We assume that
	 * the set of supported old names is short enough that a brute-force
	 * search is the best way.
	 */
	for (i = 0; map_old_guc_names[i] != NULL; i += 2)
	{
		if (guc_name_compare(name, map_old_guc_names[i]) == 0)
2174
			return find_option(map_old_guc_names[i+1], elevel);
2175 2176
	}

2177 2178
	/*
	 * Check if the name is qualified, and if so, check if the qualifier
2179 2180 2181 2182
	 * maps to a custom variable class.
	 */
	dot = strchr(name, GUC_QUALIFIER_SEPARATOR);
	if(dot != NULL && is_custom_class(name, dot - name))
2183
		/* Add a placeholder variable for this name */
2184
		return (struct config_generic*)add_placeholder_variable(name, elevel);
2185

2186
	/* Unknown name */
2187 2188
	return NULL;
}
2189 2190 2191


/*
2192
 * comparator for qsorting and bsearching guc_variables array
2193
 */
2194 2195
static int
guc_var_compare(const void *a, const void *b)
2196
{
2197 2198
	struct config_generic *confa = *(struct config_generic **) a;
	struct config_generic *confb = *(struct config_generic **) b;
2199

2200 2201 2202 2203 2204 2205 2206
	return guc_name_compare(confa->name, confb->name);
}


static int
guc_name_compare(const char *namea, const char *nameb)
{
2207 2208 2209
	/*
	 * The temptation to use strcasecmp() here must be resisted, because
	 * the array ordering has to remain stable across setlocale() calls.
2210
	 * So, build our own with a simple ASCII-only downcasing.
2211
	 */
2212 2213 2214 2215 2216 2217 2218 2219 2220 2221 2222
	while (*namea && *nameb)
	{
		char		cha = *namea++;
		char		chb = *nameb++;

		if (cha >= 'A' && cha <= 'Z')
			cha += 'a' - 'A';
		if (chb >= 'A' && chb <= 'Z')
			chb += 'a' - 'A';
		if (cha != chb)
			return cha - chb;
2223
	}
2224 2225 2226 2227 2228
	if (*namea)
		return 1;				/* a is longer */
	if (*nameb)
		return -1;				/* b is longer */
	return 0;
2229
}
2230 2231 2232


/*
2233
 * Initialize GUC options during program startup.
2234
 */
2235 2236
void
InitializeGUCOptions(void)
2237
{
2238 2239
	int			i;
	char	   *env;
2240

2241 2242 2243 2244
	/*
	 * Build sorted array of all GUC variables.
	 */
	build_guc_variables();
2245

2246
	/*
2247 2248
	 * Load all variables with their compiled-in defaults, and initialize
	 * status fields as needed.
2249
	 */
2250
	for (i = 0; i < num_guc_variables; i++)
2251
	{
2252
		struct config_generic *gconf = guc_variables[i];
2253

2254 2255 2256 2257
		gconf->status = 0;
		gconf->reset_source = PGC_S_DEFAULT;
		gconf->tentative_source = PGC_S_DEFAULT;
		gconf->source = PGC_S_DEFAULT;
2258
		gconf->stack = NULL;
2259 2260 2261 2262

		switch (gconf->vartype)
		{
			case PGC_BOOL:
B
Bruce Momjian 已提交
2263 2264
				{
					struct config_bool *conf = (struct config_bool *) gconf;
2265

B
Bruce Momjian 已提交
2266
					if (conf->assign_hook)
2267 2268
						if (!(*conf->assign_hook) (conf->reset_val, true,
												   PGC_S_DEFAULT))
2269 2270
							elog(FATAL, "failed to initialize %s to %d",
								 conf->gen.name, (int) conf->reset_val);
B
Bruce Momjian 已提交
2271 2272 2273
					*conf->variable = conf->reset_val;
					break;
				}
2274
			case PGC_INT:
B
Bruce Momjian 已提交
2275 2276
				{
					struct config_int *conf = (struct config_int *) gconf;
2277

B
Bruce Momjian 已提交
2278 2279
					Assert(conf->reset_val >= conf->min);
					Assert(conf->reset_val <= conf->max);
B
Bruce Momjian 已提交
2280 2281 2282 2283 2284

					/*
					 * Check to make sure we only have valid
					 * PGC_USERLIMITs
					 */
2285 2286
					Assert(conf->gen.context != PGC_USERLIMIT ||
						   strcmp(conf->gen.name, "log_min_duration_statement") == 0);
B
Bruce Momjian 已提交
2287
					if (conf->assign_hook)
2288 2289
						if (!(*conf->assign_hook) (conf->reset_val, true,
												   PGC_S_DEFAULT))
2290 2291
							elog(FATAL, "failed to initialize %s to %d",
								 conf->gen.name, conf->reset_val);
B
Bruce Momjian 已提交
2292 2293 2294
					*conf->variable = conf->reset_val;
					break;
				}
2295 2296
			case PGC_REAL:
				{
B
Bruce Momjian 已提交
2297 2298 2299 2300
					struct config_real *conf = (struct config_real *) gconf;

					Assert(conf->reset_val >= conf->min);
					Assert(conf->reset_val <= conf->max);
2301
					Assert(conf->gen.context != PGC_USERLIMIT);
B
Bruce Momjian 已提交
2302
					if (conf->assign_hook)
2303 2304
						if (!(*conf->assign_hook) (conf->reset_val, true,
												   PGC_S_DEFAULT))
2305 2306
							elog(FATAL, "failed to initialize %s to %g",
								 conf->gen.name, conf->reset_val);
B
Bruce Momjian 已提交
2307
					*conf->variable = conf->reset_val;
2308 2309
					break;
				}
B
Bruce Momjian 已提交
2310
			case PGC_STRING:
2311
				{
B
Bruce Momjian 已提交
2312 2313 2314
					struct config_string *conf = (struct config_string *) gconf;
					char	   *str;

2315
					/* Check to make sure we only have valid PGC_USERLIMITs */
2316 2317
					Assert(conf->gen.context != PGC_USERLIMIT ||
						   conf->assign_hook == assign_log_min_messages ||
2318 2319
						   conf->assign_hook == assign_min_error_statement ||
						   conf->assign_hook == assign_log_statement);
B
Bruce Momjian 已提交
2320 2321 2322
					*conf->variable = NULL;
					conf->reset_val = NULL;
					conf->tentative_val = NULL;
2323

B
Bruce Momjian 已提交
2324
					if (conf->boot_val == NULL)
2325
					{
B
Bruce Momjian 已提交
2326 2327
						/* Cannot set value yet */
						break;
2328
					}
B
Bruce Momjian 已提交
2329

2330
					str = guc_strdup(FATAL, conf->boot_val);
B
Bruce Momjian 已提交
2331 2332 2333
					conf->reset_val = str;

					if (conf->assign_hook)
2334
					{
B
Bruce Momjian 已提交
2335 2336
						const char *newstr;

2337 2338
						newstr = (*conf->assign_hook) (str, true,
													   PGC_S_DEFAULT);
B
Bruce Momjian 已提交
2339 2340
						if (newstr == NULL)
						{
2341 2342
							elog(FATAL, "failed to initialize %s to \"%s\"",
								 conf->gen.name, str);
B
Bruce Momjian 已提交
2343 2344 2345 2346 2347 2348 2349 2350 2351 2352 2353 2354
						}
						else if (newstr != str)
						{
							free(str);

							/*
							 * See notes in set_config_option about
							 * casting
							 */
							str = (char *) newstr;
							conf->reset_val = str;
						}
2355
					}
B
Bruce Momjian 已提交
2356 2357
					*conf->variable = str;
					break;
2358 2359 2360 2361 2362 2363
				}
		}
	}

	guc_dirty = false;

2364 2365
	reporting_enabled = false;

2366 2367 2368
	guc_string_workspace = NULL;

	/*
2369
	 * Prevent any attempt to override the transaction modes from
2370 2371
	 * non-interactive sources.
	 */
2372 2373 2374
	SetConfigOption("transaction_isolation", "default",
					PGC_POSTMASTER, PGC_S_OVERRIDE);
	SetConfigOption("transaction_read_only", "no",
2375 2376 2377 2378
					PGC_POSTMASTER, PGC_S_OVERRIDE);

	/*
	 * For historical reasons, some GUC parameters can receive defaults
B
Bruce Momjian 已提交
2379
	 * from environment variables.	Process those settings.
2380 2381 2382 2383 2384 2385 2386 2387 2388 2389 2390 2391 2392 2393 2394 2395 2396 2397 2398 2399 2400 2401 2402 2403 2404 2405 2406 2407 2408
	 */

	env = getenv("PGPORT");
	if (env != NULL)
		SetConfigOption("port", env, PGC_POSTMASTER, PGC_S_ENV_VAR);

	env = getenv("PGDATESTYLE");
	if (env != NULL)
		SetConfigOption("datestyle", env, PGC_POSTMASTER, PGC_S_ENV_VAR);

	env = getenv("PGCLIENTENCODING");
	if (env != NULL)
		SetConfigOption("client_encoding", env, PGC_POSTMASTER, PGC_S_ENV_VAR);
}


/*
 * Reset all options to their saved default values (implements RESET ALL)
 */
void
ResetAllOptions(void)
{
	int			i;

	for (i = 0; i < num_guc_variables; i++)
	{
		struct config_generic *gconf = guc_variables[i];

		/* Don't reset non-SET-able values */
2409 2410 2411
		if (gconf->context != PGC_SUSET &&
			gconf->context != PGC_USERLIMIT &&
			gconf->context != PGC_USERSET)
2412 2413 2414 2415 2416 2417 2418 2419
			continue;
		/* Don't reset if special exclusion from RESET ALL */
		if (gconf->flags & GUC_NO_RESET_ALL)
			continue;
		/* No need to reset if wasn't SET */
		if (gconf->source <= PGC_S_OVERRIDE)
			continue;

2420 2421 2422
		/* Save old value to support transaction abort */
		push_old_value(gconf);

2423 2424 2425
		switch (gconf->vartype)
		{
			case PGC_BOOL:
B
Bruce Momjian 已提交
2426 2427
				{
					struct config_bool *conf = (struct config_bool *) gconf;
2428

B
Bruce Momjian 已提交
2429
					if (conf->assign_hook)
2430 2431
						if (!(*conf->assign_hook) (conf->reset_val, true,
												   PGC_S_SESSION))
2432
							elog(ERROR, "failed to reset %s", conf->gen.name);
B
Bruce Momjian 已提交
2433 2434 2435 2436 2437 2438 2439 2440
					*conf->variable = conf->reset_val;
					conf->tentative_val = conf->reset_val;
					conf->gen.source = conf->gen.reset_source;
					conf->gen.tentative_source = conf->gen.reset_source;
					conf->gen.status |= GUC_HAVE_TENTATIVE;
					guc_dirty = true;
					break;
				}
2441
			case PGC_INT:
B
Bruce Momjian 已提交
2442 2443
				{
					struct config_int *conf = (struct config_int *) gconf;
2444

B
Bruce Momjian 已提交
2445
					if (conf->assign_hook)
2446 2447
						if (!(*conf->assign_hook) (conf->reset_val, true,
												   PGC_S_SESSION))
2448
							elog(ERROR, "failed to reset %s", conf->gen.name);
B
Bruce Momjian 已提交
2449 2450 2451 2452 2453 2454 2455 2456
					*conf->variable = conf->reset_val;
					conf->tentative_val = conf->reset_val;
					conf->gen.source = conf->gen.reset_source;
					conf->gen.tentative_source = conf->gen.reset_source;
					conf->gen.status |= GUC_HAVE_TENTATIVE;
					guc_dirty = true;
					break;
				}
2457 2458
			case PGC_REAL:
				{
B
Bruce Momjian 已提交
2459 2460 2461
					struct config_real *conf = (struct config_real *) gconf;

					if (conf->assign_hook)
2462 2463
						if (!(*conf->assign_hook) (conf->reset_val, true,
												   PGC_S_SESSION))
2464
							elog(ERROR, "failed to reset %s", conf->gen.name);
B
Bruce Momjian 已提交
2465 2466 2467 2468 2469 2470
					*conf->variable = conf->reset_val;
					conf->tentative_val = conf->reset_val;
					conf->gen.source = conf->gen.reset_source;
					conf->gen.tentative_source = conf->gen.reset_source;
					conf->gen.status |= GUC_HAVE_TENTATIVE;
					guc_dirty = true;
2471 2472
					break;
				}
B
Bruce Momjian 已提交
2473 2474 2475 2476
			case PGC_STRING:
				{
					struct config_string *conf = (struct config_string *) gconf;
					char	   *str;
2477

B
Bruce Momjian 已提交
2478 2479 2480 2481 2482
					if (conf->reset_val == NULL)
					{
						/* Nothing to reset to, as yet; so do nothing */
						break;
					}
2483

B
Bruce Momjian 已提交
2484 2485
					/* We need not strdup here */
					str = conf->reset_val;
2486

B
Bruce Momjian 已提交
2487
					if (conf->assign_hook)
2488
					{
B
Bruce Momjian 已提交
2489 2490
						const char *newstr;

2491 2492
						newstr = (*conf->assign_hook) (str, true,
													   PGC_S_SESSION);
B
Bruce Momjian 已提交
2493
						if (newstr == NULL)
2494
							elog(ERROR, "failed to reset %s", conf->gen.name);
B
Bruce Momjian 已提交
2495 2496 2497 2498 2499 2500 2501 2502
						else if (newstr != str)
						{
							/*
							 * See notes in set_config_option about
							 * casting
							 */
							str = (char *) newstr;
						}
2503 2504
					}

2505 2506
					set_string_field(conf, conf->variable, str);
					set_string_field(conf, &conf->tentative_val, str);
B
Bruce Momjian 已提交
2507 2508 2509 2510 2511 2512
					conf->gen.source = conf->gen.reset_source;
					conf->gen.tentative_source = conf->gen.reset_source;
					conf->gen.status |= GUC_HAVE_TENTATIVE;
					guc_dirty = true;
					break;
				}
2513
		}
2514 2515 2516

		if (gconf->flags & GUC_REPORT)
			ReportGUCOption(gconf);
2517 2518 2519 2520 2521
	}
}


/*
2522 2523 2524 2525 2526 2527 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 2573 2574 2575 2576 2577 2578 2579 2580 2581 2582 2583 2584 2585 2586 2587 2588 2589 2590 2591 2592 2593 2594 2595 2596 2597 2598 2599 2600 2601 2602 2603
 * push_old_value
 *		Push previous state during first assignment to a GUC variable
 *		within a particular transaction.
 *
 * We have to be willing to "back-fill" the state stack if the first
 * assignment occurs within a subtransaction nested several levels deep.
 * This ensures that if an intermediate transaction aborts, it will have
 * the proper value available to restore the setting to.
 */
static void
push_old_value(struct config_generic *gconf)
{
	int			my_level = GetCurrentTransactionNestLevel();
	GucStack   *stack;

	/* If we're not inside a transaction, do nothing */
	if (my_level == 0)
		return;

	for (;;)
	{
		/* Done if we already pushed it at this nesting depth */
		if (gconf->stack && gconf->stack->nest_level >= my_level)
			return;

		/*
		 * We keep all the stack entries in TopTransactionContext so as to
		 * avoid allocation problems when a subtransaction back-fills stack
		 * entries for upper transaction levels.
		 */
		stack = (GucStack *) MemoryContextAlloc(TopTransactionContext,
												sizeof(GucStack));

		stack->prev = gconf->stack;
		stack->nest_level = stack->prev ? stack->prev->nest_level + 1 : 1;
		stack->status = gconf->status;
		stack->tentative_source = gconf->tentative_source;
		stack->source = gconf->source;

		switch (gconf->vartype)
		{
			case PGC_BOOL:
				stack->tentative_val.boolval =
					((struct config_bool *) gconf)->tentative_val;
				stack->value.boolval =
					*((struct config_bool *) gconf)->variable;
				break;

			case PGC_INT:
				stack->tentative_val.intval =
					((struct config_int *) gconf)->tentative_val;
				stack->value.intval =
					*((struct config_int *) gconf)->variable;
				break;

			case PGC_REAL:
				stack->tentative_val.realval =
					((struct config_real *) gconf)->tentative_val;
				stack->value.realval =
					*((struct config_real *) gconf)->variable;
				break;

			case PGC_STRING:
				stack->tentative_val.stringval =
					((struct config_string *) gconf)->tentative_val;
				stack->value.stringval =
					*((struct config_string *) gconf)->variable;
				break;
		}

		gconf->stack = stack;

		/* Set state to indicate nothing happened yet within this level */
		gconf->status = GUC_HAVE_STACK;

		/* Ensure we remember to pop at end of xact */
		guc_dirty = true;
	}
}

/*
 * Do GUC processing at transaction or subtransaction commit or abort.
2604 2605
 */
void
2606
AtEOXact_GUC(bool isCommit, bool isSubXact)
2607
{
2608
	int			my_level;
2609 2610 2611 2612 2613 2614
	int			i;

	/* Quick exit if nothing's changed in this transaction */
	if (!guc_dirty)
		return;

2615
	/* Prevent memory leak if ereport during an assign_hook */
2616 2617 2618 2619 2620 2621
	if (guc_string_workspace)
	{
		free(guc_string_workspace);
		guc_string_workspace = NULL;
	}

2622 2623 2624
	my_level = GetCurrentTransactionNestLevel();
	Assert(isSubXact ? (my_level > 1) : (my_level == 1));

2625 2626 2627
	for (i = 0; i < num_guc_variables; i++)
	{
		struct config_generic *gconf = guc_variables[i];
2628 2629 2630
		int			my_status = gconf->status;
		GucStack   *stack = gconf->stack;
		bool		useTentative;
2631
		bool		changed;
2632

2633 2634 2635 2636 2637 2638 2639 2640 2641 2642 2643 2644
		/*
		 * Skip if nothing's happened to this var in this transaction
		 */
		if (my_status == 0)
		{
			Assert(stack == NULL);
			continue;
		}
		/* Assert that we stacked old value before changing it */
		Assert(stack != NULL && (my_status & GUC_HAVE_STACK));
		/* However, the last change may have been at an outer xact level */
		if (stack->nest_level < my_level)
2645
			continue;
2646 2647 2648 2649 2650 2651 2652 2653 2654 2655 2656 2657 2658 2659 2660 2661 2662 2663 2664 2665 2666 2667 2668 2669
		Assert(stack->nest_level == my_level);

		/*
		 * We will pop the stack entry.  Start by restoring outer xact status
		 * (since we may want to modify it below).  Be careful to use
		 * my_status to reference the inner xact status below this point...
		 */
		gconf->status = stack->status;

		/*
		 * We have two cases:
		 *
		 * If commit and HAVE_TENTATIVE, set actual value to tentative
		 * (this is to override a SET LOCAL if one occurred later than SET).
		 * We keep the tentative value and propagate HAVE_TENTATIVE to
		 * the parent status, allowing the SET's effect to percolate up.
		 * (But if we're exiting the outermost transaction, we'll drop the
		 * HAVE_TENTATIVE bit below.)
		 *
		 * Otherwise, we have a transaction that aborted or executed only
		 * SET LOCAL (or no SET at all).  In either case it should have no
		 * further effect, so restore both tentative and actual values from
		 * the stack entry.
		 */
2670

2671
		useTentative = isCommit && (my_status & GUC_HAVE_TENTATIVE) != 0;
2672 2673
		changed = false;

2674 2675 2676 2677
		switch (gconf->vartype)
		{
			case PGC_BOOL:
				{
B
Bruce Momjian 已提交
2678
					struct config_bool *conf = (struct config_bool *) gconf;
2679 2680
					bool		newval;
					GucSource	newsource;
2681

2682 2683 2684 2685 2686 2687 2688
					if (useTentative)
					{
						newval = conf->tentative_val;
						newsource = conf->gen.tentative_source;
						conf->gen.status |= GUC_HAVE_TENTATIVE;
					}
					else
B
Bruce Momjian 已提交
2689
					{
2690 2691 2692 2693
						newval = stack->value.boolval;
						newsource = stack->source;
						conf->tentative_val = stack->tentative_val.boolval;
						conf->gen.tentative_source = stack->tentative_source;
B
Bruce Momjian 已提交
2694 2695
					}

2696
					if (*conf->variable != newval)
B
Bruce Momjian 已提交
2697 2698
					{
						if (conf->assign_hook)
2699
							if (!(*conf->assign_hook) (newval,
2700
													   true, PGC_S_OVERRIDE))
2701 2702
								elog(LOG, "failed to commit %s",
									 conf->gen.name);
2703
						*conf->variable = newval;
2704
						changed = true;
B
Bruce Momjian 已提交
2705
					}
2706
					conf->gen.source = newsource;
B
Bruce Momjian 已提交
2707
					break;
2708 2709 2710
				}
			case PGC_INT:
				{
B
Bruce Momjian 已提交
2711
					struct config_int *conf = (struct config_int *) gconf;
2712 2713
					int			newval;
					GucSource	newsource;
2714

2715 2716 2717 2718 2719 2720 2721
					if (useTentative)
					{
						newval = conf->tentative_val;
						newsource = conf->gen.tentative_source;
						conf->gen.status |= GUC_HAVE_TENTATIVE;
					}
					else
B
Bruce Momjian 已提交
2722
					{
2723 2724 2725 2726
						newval = stack->value.intval;
						newsource = stack->source;
						conf->tentative_val = stack->tentative_val.intval;
						conf->gen.tentative_source = stack->tentative_source;
B
Bruce Momjian 已提交
2727 2728
					}

2729
					if (*conf->variable != newval)
B
Bruce Momjian 已提交
2730 2731
					{
						if (conf->assign_hook)
2732
							if (!(*conf->assign_hook) (newval,
2733
													   true, PGC_S_OVERRIDE))
2734 2735
								elog(LOG, "failed to commit %s",
									 conf->gen.name);
2736
						*conf->variable = newval;
2737
						changed = true;
B
Bruce Momjian 已提交
2738
					}
2739
					conf->gen.source = newsource;
B
Bruce Momjian 已提交
2740
					break;
2741 2742 2743
				}
			case PGC_REAL:
				{
B
Bruce Momjian 已提交
2744
					struct config_real *conf = (struct config_real *) gconf;
2745 2746
					double		newval;
					GucSource	newsource;
2747

2748
					if (useTentative)
B
Bruce Momjian 已提交
2749
					{
2750 2751 2752 2753 2754 2755 2756 2757 2758 2759
						newval = conf->tentative_val;
						newsource = conf->gen.tentative_source;
						conf->gen.status |= GUC_HAVE_TENTATIVE;
					}
					else
					{
						newval = stack->value.realval;
						newsource = stack->source;
						conf->tentative_val = stack->tentative_val.realval;
						conf->gen.tentative_source = stack->tentative_source;
B
Bruce Momjian 已提交
2760
					}
2761

2762
					if (*conf->variable != newval)
B
Bruce Momjian 已提交
2763 2764
					{
						if (conf->assign_hook)
2765
							if (!(*conf->assign_hook) (newval,
2766
													   true, PGC_S_OVERRIDE))
2767 2768
								elog(LOG, "failed to commit %s",
									 conf->gen.name);
2769
						*conf->variable = newval;
2770
						changed = true;
B
Bruce Momjian 已提交
2771
					}
2772
					conf->gen.source = newsource;
B
Bruce Momjian 已提交
2773
					break;
2774
				}
B
Bruce Momjian 已提交
2775
			case PGC_STRING:
2776
				{
B
Bruce Momjian 已提交
2777
					struct config_string *conf = (struct config_string *) gconf;
2778 2779
					char	   *newval;
					GucSource	newsource;
2780

2781
					if (useTentative)
B
Bruce Momjian 已提交
2782
					{
2783 2784 2785
						newval = conf->tentative_val;
						newsource = conf->gen.tentative_source;
						conf->gen.status |= GUC_HAVE_TENTATIVE;
B
Bruce Momjian 已提交
2786 2787
					}
					else
2788
					{
2789 2790 2791 2792 2793 2794
						newval = stack->value.stringval;
						newsource = stack->source;
						set_string_field(conf, &conf->tentative_val,
										 stack->tentative_val.stringval);
						conf->gen.tentative_source = stack->tentative_source;
					}
2795

2796 2797
					if (*conf->variable != newval)
					{
B
Bruce Momjian 已提交
2798
						if (conf->assign_hook)
2799
						{
B
Bruce Momjian 已提交
2800 2801
							const char *newstr;

2802
							newstr = (*conf->assign_hook) (newval, true,
2803
														   PGC_S_OVERRIDE);
B
Bruce Momjian 已提交
2804
							if (newstr == NULL)
2805 2806
								elog(LOG, "failed to commit %s",
									 conf->gen.name);
2807
							else if (newstr != newval)
B
Bruce Momjian 已提交
2808 2809
							{
								/*
2810 2811 2812
								 * If newval should now be freed, it'll be
								 * taken care of below.
								 *
B
Bruce Momjian 已提交
2813 2814 2815
								 * See notes in set_config_option about
								 * casting
								 */
2816
								newval = (char *) newstr;
B
Bruce Momjian 已提交
2817
							}
2818 2819
						}

2820
						set_string_field(conf, conf->variable, newval);
2821
						changed = true;
B
Bruce Momjian 已提交
2822
					}
2823 2824 2825 2826 2827 2828 2829 2830 2831
					conf->gen.source = newsource;
					/* Release stacked values if not used anymore */
					set_string_field(conf, &stack->value.stringval,
									 NULL);
					set_string_field(conf, &stack->tentative_val.stringval,
									 NULL);
					/* Don't store tentative value separately after commit */
					if (!isSubXact)
						set_string_field(conf, &conf->tentative_val, NULL);
B
Bruce Momjian 已提交
2832
					break;
2833 2834
				}
		}
2835

2836 2837 2838 2839 2840 2841 2842 2843 2844 2845 2846 2847 2848 2849 2850
		/* Finish popping the state stack */
		gconf->stack = stack->prev;
		pfree(stack);

		/*
		 * If we're now out of all xact levels, forget TENTATIVE status bit;
		 * there's nothing tentative about the value anymore.
		 */
		if (!isSubXact)
		{
			Assert(gconf->stack == NULL);
			gconf->status = 0;
		}

		/* Report new value if we changed it */
2851 2852
		if (changed && (gconf->flags & GUC_REPORT))
			ReportGUCOption(gconf);
2853 2854
	}

2855 2856 2857 2858 2859 2860 2861 2862
	/*
	 * If we're now out of all xact levels, we can clear guc_dirty.
	 * (Note: we cannot reset guc_dirty when exiting a subtransaction,
	 * because we know that all outer transaction levels will have stacked
	 * values to deal with.)
	 */
	if (!isSubXact)
		guc_dirty = false;
2863 2864 2865
}


2866 2867 2868 2869 2870 2871 2872 2873 2874 2875 2876 2877 2878 2879 2880 2881 2882 2883 2884 2885 2886 2887 2888 2889 2890 2891 2892 2893 2894 2895 2896 2897 2898
/*
 * Start up automatic reporting of changes to variables marked GUC_REPORT.
 * This is executed at completion of backend startup.
 */
void
BeginReportingGUCOptions(void)
{
	int			i;

	/*
	 * Don't do anything unless talking to an interactive frontend of
	 * protocol 3.0 or later.
	 */
	if (whereToSendOutput != Remote ||
		PG_PROTOCOL_MAJOR(FrontendProtocol) < 3)
		return;

	reporting_enabled = true;

	/* Transmit initial values of interesting variables */
	for (i = 0; i < num_guc_variables; i++)
	{
		struct config_generic *conf = guc_variables[i];

		if (conf->flags & GUC_REPORT)
			ReportGUCOption(conf);
	}
}

/*
 * ReportGUCOption: if appropriate, transmit option value to frontend
 */
static void
2899
ReportGUCOption(struct config_generic * record)
2900 2901 2902
{
	if (reporting_enabled && (record->flags & GUC_REPORT))
	{
2903
		char	   *val = _ShowOption(record);
2904 2905 2906 2907 2908 2909 2910 2911 2912 2913 2914 2915
		StringInfoData msgbuf;

		pq_beginmessage(&msgbuf, 'S');
		pq_sendstring(&msgbuf, record->name);
		pq_sendstring(&msgbuf, val);
		pq_endmessage(&msgbuf);

		pfree(val);
	}
}


2916 2917 2918 2919 2920 2921 2922 2923 2924 2925 2926
/*
 * Try to interpret value as boolean value.  Valid values are: true,
 * false, yes, no, on, off, 1, 0.  If the string parses okay, return
 * true, else false.  If result is not NULL, return the parsing result
 * there.
 */
static bool
parse_bool(const char *value, bool *result)
{
	size_t		len = strlen(value);

2927
	if (pg_strncasecmp(value, "true", len) == 0)
2928 2929 2930 2931
	{
		if (result)
			*result = true;
	}
2932
	else if (pg_strncasecmp(value, "false", len) == 0)
2933 2934 2935 2936 2937
	{
		if (result)
			*result = false;
	}

2938
	else if (pg_strncasecmp(value, "yes", len) == 0)
2939 2940 2941 2942
	{
		if (result)
			*result = true;
	}
2943
	else if (pg_strncasecmp(value, "no", len) == 0)
2944 2945 2946 2947 2948
	{
		if (result)
			*result = false;
	}

2949
	else if (pg_strcasecmp(value, "on") == 0)
2950 2951 2952 2953
	{
		if (result)
			*result = true;
	}
2954
	else if (pg_strcasecmp(value, "off") == 0)
2955 2956 2957 2958 2959
	{
		if (result)
			*result = false;
	}

2960
	else if (pg_strcasecmp(value, "1") == 0)
2961 2962 2963 2964
	{
		if (result)
			*result = true;
	}
2965
	else if (pg_strcasecmp(value, "0") == 0)
2966 2967 2968 2969 2970 2971 2972 2973 2974 2975 2976 2977 2978 2979 2980 2981 2982 2983 2984 2985 2986 2987 2988 2989 2990 2991 2992 2993 2994 2995 2996 2997 2998 2999 3000 3001 3002 3003 3004 3005 3006 3007 3008 3009 3010 3011 3012 3013 3014 3015 3016 3017 3018 3019 3020 3021 3022 3023 3024 3025 3026 3027 3028 3029 3030 3031 3032 3033 3034 3035
	{
		if (result)
			*result = false;
	}

	else
		return false;
	return true;
}



/*
 * Try to parse value as an integer.  The accepted formats are the
 * usual decimal, octal, or hexadecimal formats.  If the string parses
 * okay, return true, else false.  If result is not NULL, return the
 * value there.
 */
static bool
parse_int(const char *value, int *result)
{
	long		val;
	char	   *endptr;

	errno = 0;
	val = strtol(value, &endptr, 0);
	if (endptr == value || *endptr != '\0' || errno == ERANGE
#ifdef HAVE_LONG_INT_64
	/* if long > 32 bits, check for overflow of int4 */
		|| val != (long) ((int32) val)
#endif
		)
		return false;
	if (result)
		*result = (int) val;
	return true;
}



/*
 * Try to parse value as a floating point constant in the usual
 * format.	If the value parsed okay return true, else false.  If
 * result is not NULL, return the semantic value there.
 */
static bool
parse_real(const char *value, double *result)
{
	double		val;
	char	   *endptr;

	errno = 0;
	val = strtod(value, &endptr);
	if (endptr == value || *endptr != '\0' || errno == ERANGE)
		return false;
	if (result)
		*result = val;
	return true;
}



/*
 * Sets option `name' to given value. The value should be a string
 * which is going to be parsed and converted to the appropriate data
 * type.  The context and source parameters indicate in which context this
 * function is being called so it can apply the access restrictions
 * properly.
 *
 * If value is NULL, set the option to its default value. If the
3036
 * parameter changeVal is false then don't really set the option but do all
3037 3038 3039
 * the checks to see if it would work.
 *
 * If there is an error (non-existing option, invalid value) then an
3040 3041 3042 3043
 * ereport(ERROR) is thrown *unless* this is called in a context where we
 * don't want to ereport (currently, startup or SIGHUP config file reread).
 * In that case we write a suitable error message via ereport(DEBUG) and
 * return false. This is working around the deficiencies in the ereport
3044 3045 3046 3047 3048 3049 3050 3051 3052
 * mechanism, so don't blame me.  In all other cases, the function
 * returns true, including cases where the input is valid but we chose
 * not to apply it because of context or source-priority considerations.
 *
 * See also SetConfigOption for an external interface.
 */
bool
set_config_option(const char *name, const char *value,
				  GucContext context, GucSource source,
3053
				  bool isLocal, bool changeVal)
3054 3055 3056
{
	struct config_generic *record;
	int			elevel;
3057
	bool		makeDefault, changeValOrig = changeVal;
3058 3059

	if (context == PGC_SIGHUP || source == PGC_S_DEFAULT)
3060
		elevel = DEBUG2;
3061 3062 3063 3064 3065
	else if (source == PGC_S_DATABASE || source == PGC_S_USER)
		elevel = INFO;
	else
		elevel = ERROR;

3066
	record = find_option(name, elevel);
3067 3068
	if (record == NULL)
	{
3069 3070
		ereport(elevel,
				(errcode(ERRCODE_UNDEFINED_OBJECT),
3071
				 errmsg("unrecognized configuration parameter \"%s\"", name)));
3072 3073 3074 3075 3076 3077 3078 3079 3080 3081 3082
		return false;
	}

	/*
	 * Check if the option can be set at this time. See guc.h for the
	 * precise rules. Note that we don't want to throw errors if we're in
	 * the SIGHUP context. In that case we just ignore the attempt and
	 * return true.
	 */
	switch (record->context)
	{
3083 3084 3085 3086 3087
		case PGC_INTERNAL:
			if (context == PGC_SIGHUP)
				return true;
			if (context != PGC_INTERNAL)
			{
3088 3089
				ereport(elevel,
						(errcode(ERRCODE_CANT_CHANGE_RUNTIME_PARAM),
3090
						 errmsg("parameter \"%s\" cannot be changed",
3091
								name)));
3092 3093 3094
				return false;
			}
			break;
3095 3096 3097 3098 3099
		case PGC_POSTMASTER:
			if (context == PGC_SIGHUP)
				return true;
			if (context != PGC_POSTMASTER)
			{
3100 3101
				ereport(elevel,
						(errcode(ERRCODE_CANT_CHANGE_RUNTIME_PARAM),
3102
					errmsg("parameter \"%s\" cannot be changed after server start",
B
Bruce Momjian 已提交
3103
						   name)));
3104 3105 3106 3107 3108 3109
				return false;
			}
			break;
		case PGC_SIGHUP:
			if (context != PGC_SIGHUP && context != PGC_POSTMASTER)
			{
3110 3111
				ereport(elevel,
						(errcode(ERRCODE_CANT_CHANGE_RUNTIME_PARAM),
3112
						 errmsg("parameter \"%s\" cannot be changed now",
3113
								name)));
3114 3115 3116 3117 3118 3119 3120 3121 3122 3123 3124 3125 3126 3127 3128 3129 3130 3131 3132 3133 3134 3135 3136 3137 3138 3139
				return false;
			}

			/*
			 * Hmm, the idea of the SIGHUP context is "ought to be global,
			 * but can be changed after postmaster start". But there's
			 * nothing that prevents a crafty administrator from sending
			 * SIGHUP signals to individual backends only.
			 */
			break;
		case PGC_BACKEND:
			if (context == PGC_SIGHUP)
			{
				/*
				 * If a PGC_BACKEND parameter is changed in the config
				 * file, we want to accept the new value in the postmaster
				 * (whence it will propagate to subsequently-started
				 * backends), but ignore it in existing backends.  This is
				 * a tad klugy, but necessary because we don't re-read the
				 * config file during backend start.
				 */
				if (IsUnderPostmaster)
					return true;
			}
			else if (context != PGC_BACKEND && context != PGC_POSTMASTER)
			{
3140 3141
				ereport(elevel,
						(errcode(ERRCODE_CANT_CHANGE_RUNTIME_PARAM),
3142
					errmsg("parameter \"%s\" cannot be set after connection start",
B
Bruce Momjian 已提交
3143
						   name)));
3144 3145 3146 3147 3148 3149
				return false;
			}
			break;
		case PGC_SUSET:
			if (context == PGC_USERSET || context == PGC_BACKEND)
			{
3150 3151
				ereport(elevel,
						(errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
3152
						 errmsg("permission denied to set parameter \"%s\"",
3153
								name)));
3154
				return false;
3155 3156
			}
			break;
3157 3158 3159
		case PGC_USERLIMIT:
			/* USERLIMIT permissions checked below */
			break;
3160 3161 3162
		case PGC_USERSET:
			/* always okay */
			break;
3163
	}
3164

3165
	/*
3166
	 * Should we set reset/stacked values?	(If so, the behavior is not
3167 3168
	 * transactional.)
	 */
3169
	makeDefault = changeVal && (source <= PGC_S_OVERRIDE) && (value != NULL);
3170 3171 3172

	/*
	 * Ignore attempted set if overridden by previously processed setting.
3173
	 * However, if changeVal is false then plow ahead anyway since we are
B
Bruce Momjian 已提交
3174 3175
	 * trying to find out if the value is potentially good, not actually
	 * use it. Also keep going if makeDefault is true, since we may want
3176
	 * to set the reset/stacked values even if we can't set the variable
B
Bruce Momjian 已提交
3177
	 * itself.
3178 3179 3180
	 */
	if (record->source > source)
	{
3181
		if (changeVal && !makeDefault)
3182
		{
3183
			elog(DEBUG3, "\"%s\": setting ignored because previous source is higher priority",
3184 3185 3186
				 name);
			return true;
		}
3187
		changeVal = false;			/* this might be reset in USERLIMIT */
3188 3189
	}

3190
	/*
3191 3192 3193 3194 3195
	 * Evaluate value and set variable.
	 * USERLIMIT checks two things:  1) is the user making a change
	 * that is blocked by an administrator setting.  2) is the administrator
	 * changing a setting and doing a SIGHUP that requires us to override
	 * a user setting.
3196
	 */
3197
	switch (record->vartype)
3198 3199 3200
	{
		case PGC_BOOL:
			{
B
Bruce Momjian 已提交
3201
				struct config_bool *conf = (struct config_bool *) record;
3202
				bool		newval;
B
Bruce Momjian 已提交
3203 3204

				if (value)
3205
				{
3206 3207
					if (!parse_bool(value, &newval))
					{
3208 3209
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
3210
								 errmsg("parameter \"%s\" requires a Boolean value",
3211
										name)));
3212 3213
						return false;
					}
3214
					if (record->context == PGC_USERLIMIT)
3215
					{
3216 3217 3218
						if (newval < conf->reset_val)
						{
							/* Limit non-superuser changes */
3219
							if (source > PGC_S_UNPRIVILEGED && !superuser())
3220 3221 3222 3223 3224
							{
								ereport(elevel,
										(errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
								 errmsg("permission denied to set parameter \"%s\"",
										name),
3225
										 errhint("must be superuser to change this value to false")));
3226 3227 3228 3229 3230 3231 3232
								return false;
							}
						}
						if (newval > *conf->variable)
						{
							/* Allow change if admin should override */
							if (source < PGC_S_UNPRIVILEGED &&
3233 3234
								record->source > PGC_S_UNPRIVILEGED &&
								!superuser())
3235 3236
								changeVal = changeValOrig;
						}
3237
					}
3238 3239 3240 3241 3242 3243
				}
				else
				{
					newval = conf->reset_val;
					source = conf->gen.reset_source;
				}
B
Bruce Momjian 已提交
3244

3245
				if (conf->assign_hook)
3246
					if (!(*conf->assign_hook) (newval, changeVal, source))
B
Bruce Momjian 已提交
3247
					{
3248 3249
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
3250
								 errmsg("invalid value for parameter \"%s\": %d",
3251
										name, (int) newval)));
B
Bruce Momjian 已提交
3252 3253
						return false;
					}
3254

3255
				if (changeVal || makeDefault)
3256
				{
3257 3258 3259
					/* Save old value to support transaction abort */
					if (!makeDefault)
						push_old_value(&conf->gen);
3260
					if (changeVal)
3261
					{
3262 3263 3264 3265 3266
						*conf->variable = newval;
						conf->gen.source = source;
					}
					if (makeDefault)
					{
3267 3268
						GucStack *stack;

3269 3270 3271 3272 3273
						if (conf->gen.reset_source <= source)
						{
							conf->reset_val = newval;
							conf->gen.reset_source = source;
						}
3274
						for (stack = conf->gen.stack; stack; stack = stack->prev)
3275
						{
3276 3277 3278 3279 3280
							if (stack->source <= source)
							{
								stack->value.boolval = newval;
								stack->source = source;
							}
3281 3282 3283 3284 3285 3286 3287 3288 3289 3290 3291 3292 3293
						}
					}
					else if (isLocal)
					{
						conf->gen.status |= GUC_HAVE_LOCAL;
						guc_dirty = true;
					}
					else
					{
						conf->tentative_val = newval;
						conf->gen.tentative_source = source;
						conf->gen.status |= GUC_HAVE_TENTATIVE;
						guc_dirty = true;
3294
					}
3295
				}
B
Bruce Momjian 已提交
3296
				break;
3297
			}
3298 3299

		case PGC_INT:
3300
			{
B
Bruce Momjian 已提交
3301
				struct config_int *conf = (struct config_int *) record;
3302
				int			newval;
3303

B
Bruce Momjian 已提交
3304
				if (value)
3305
				{
3306
					if (!parse_int(value, &newval))
B
Bruce Momjian 已提交
3307
					{
3308 3309
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
3310
							   errmsg("parameter \"%s\" requires an integer value",
B
Bruce Momjian 已提交
3311
									  name)));
B
Bruce Momjian 已提交
3312 3313
						return false;
					}
3314
					if (newval < conf->min || newval > conf->max)
B
Bruce Momjian 已提交
3315
					{
3316 3317
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
3318
								 errmsg("%d is outside the valid range for parameter \"%s\" (%d .. %d)",
B
Bruce Momjian 已提交
3319
								   newval, name, conf->min, conf->max)));
B
Bruce Momjian 已提交
3320 3321
						return false;
					}
3322
					if (record->context == PGC_USERLIMIT)
3323
					{
3324 3325 3326 3327 3328 3329
						/* handle log_min_duration_statement, -1=disable */
						if ((newval != -1 && conf->reset_val != -1 &&
							 newval > conf->reset_val) || /* increase duration */
						 	(newval == -1 && conf->reset_val != -1)) /* turn off */
						{
							/* Limit non-superuser changes */
3330
							if (source > PGC_S_UNPRIVILEGED && !superuser())
3331 3332 3333 3334 3335 3336 3337 3338 3339 3340 3341 3342 3343 3344 3345
							{
								ereport(elevel,
										(errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
								 errmsg("permission denied to set parameter \"%s\"",
										name),
										 errhint("Must be superuser to increase this value or turn it off.")));
								return false;
							}
						}
						/* Allow change if admin should override */
						if ((newval != -1 && *conf->variable != -1 &&
							 newval < *conf->variable) || /* decrease duration */
							(newval != -1 && *conf->variable == -1)) /* turn on */
						{
							if (source < PGC_S_UNPRIVILEGED &&
3346 3347
								record->source > PGC_S_UNPRIVILEGED &&
								!superuser())
3348 3349
								changeVal = changeValOrig;
						}
3350
					}
3351 3352 3353 3354 3355 3356 3357 3358
				}
				else
				{
					newval = conf->reset_val;
					source = conf->gen.reset_source;
				}

				if (conf->assign_hook)
3359
					if (!(*conf->assign_hook) (newval, changeVal, source))
3360
					{
3361 3362
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
3363
								 errmsg("invalid value for parameter \"%s\": %d",
3364
										name, newval)));
3365 3366
						return false;
					}
3367

3368
				if (changeVal || makeDefault)
3369
				{
3370 3371 3372
					/* Save old value to support transaction abort */
					if (!makeDefault)
						push_old_value(&conf->gen);
3373
					if (changeVal)
3374
					{
3375 3376 3377 3378 3379
						*conf->variable = newval;
						conf->gen.source = source;
					}
					if (makeDefault)
					{
3380 3381
						GucStack *stack;

3382 3383 3384 3385 3386
						if (conf->gen.reset_source <= source)
						{
							conf->reset_val = newval;
							conf->gen.reset_source = source;
						}
3387
						for (stack = conf->gen.stack; stack; stack = stack->prev)
3388
						{
3389 3390 3391 3392 3393
							if (stack->source <= source)
							{
								stack->value.intval = newval;
								stack->source = source;
							}
3394 3395 3396 3397 3398 3399 3400 3401 3402 3403 3404 3405 3406
						}
					}
					else if (isLocal)
					{
						conf->gen.status |= GUC_HAVE_LOCAL;
						guc_dirty = true;
					}
					else
					{
						conf->tentative_val = newval;
						conf->gen.tentative_source = source;
						conf->gen.status |= GUC_HAVE_TENTATIVE;
						guc_dirty = true;
3407
					}
3408
				}
B
Bruce Momjian 已提交
3409
				break;
3410
			}
3411 3412

		case PGC_REAL:
3413
			{
B
Bruce Momjian 已提交
3414
				struct config_real *conf = (struct config_real *) record;
3415
				double		newval;
3416

B
Bruce Momjian 已提交
3417
				if (value)
3418
				{
3419
					if (!parse_real(value, &newval))
B
Bruce Momjian 已提交
3420
					{
3421 3422
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
3423
								 errmsg("parameter \"%s\" requires a numeric value",
3424
										name)));
B
Bruce Momjian 已提交
3425 3426
						return false;
					}
3427
					if (newval < conf->min || newval > conf->max)
B
Bruce Momjian 已提交
3428
					{
3429 3430
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
3431
								 errmsg("%g is outside the valid range for parameter \"%s\" (%g .. %g)",
B
Bruce Momjian 已提交
3432
								   newval, name, conf->min, conf->max)));
B
Bruce Momjian 已提交
3433 3434
						return false;
					}
3435
					if (record->context == PGC_USERLIMIT)
3436
					/* No REAL PGC_USERLIMIT */
3437
					{
3438
						/* Limit non-superuser changes */
3439
						if (source > PGC_S_UNPRIVILEGED && !superuser())
3440 3441 3442 3443 3444 3445 3446 3447 3448 3449
						{
							ereport(elevel,
									(errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
							 errmsg("permission denied to set parameter \"%s\"",
									name),
									 errhint("Must be superuser to increase this value or turn it off.")));
							return false;
						}
						/* Allow change if admin should override */
						if (source < PGC_S_UNPRIVILEGED &&
3450 3451
							record->source > PGC_S_UNPRIVILEGED &&
							!superuser())
3452
							changeVal = false;
3453
					}
3454 3455 3456 3457 3458 3459 3460 3461
				}
				else
				{
					newval = conf->reset_val;
					source = conf->gen.reset_source;
				}

				if (conf->assign_hook)
3462
					if (!(*conf->assign_hook) (newval, changeVal, source))
3463
					{
3464 3465
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
3466
								 errmsg("invalid value for parameter \"%s\": %g",
3467
										name, newval)));
3468 3469
						return false;
					}
3470

3471
				if (changeVal || makeDefault)
3472
				{
3473 3474 3475
					/* Save old value to support transaction abort */
					if (!makeDefault)
						push_old_value(&conf->gen);
3476
					if (changeVal)
3477
					{
3478 3479 3480 3481 3482
						*conf->variable = newval;
						conf->gen.source = source;
					}
					if (makeDefault)
					{
3483 3484
						GucStack *stack;

3485 3486 3487 3488 3489
						if (conf->gen.reset_source <= source)
						{
							conf->reset_val = newval;
							conf->gen.reset_source = source;
						}
3490
						for (stack = conf->gen.stack; stack; stack = stack->prev)
3491
						{
3492 3493 3494 3495 3496
							if (stack->source <= source)
							{
								stack->value.realval = newval;
								stack->source = source;
							}
3497 3498 3499 3500 3501 3502 3503 3504 3505 3506 3507 3508 3509
						}
					}
					else if (isLocal)
					{
						conf->gen.status |= GUC_HAVE_LOCAL;
						guc_dirty = true;
					}
					else
					{
						conf->tentative_val = newval;
						conf->gen.tentative_source = source;
						conf->gen.status |= GUC_HAVE_TENTATIVE;
						guc_dirty = true;
3510
					}
3511
				}
B
Bruce Momjian 已提交
3512
				break;
3513
			}
3514 3515 3516

		case PGC_STRING:
			{
B
Bruce Momjian 已提交
3517
				struct config_string *conf = (struct config_string *) record;
3518
				char	   *newval;
B
Bruce Momjian 已提交
3519 3520

				if (value)
3521
				{
3522
					newval = guc_strdup(elevel, value);
3523 3524
					if (newval == NULL)
						return false;
3525

3526
					if (record->context == PGC_USERLIMIT)
3527
					{
3528 3529 3530 3531 3532 3533 3534 3535 3536 3537 3538 3539 3540 3541 3542 3543 3544
						int		var_value, reset_value, new_value;
						const char * (*var_hook) (int *var, const char *newval,
									bool doit, GucSource source);
    
						if (conf->assign_hook == assign_log_statement)
							var_hook = assign_log_stmtlvl;
						else
							var_hook = assign_msglvl;

						(*var_hook) (&new_value, newval, true, source);
						(*var_hook) (&reset_value, conf->reset_val,	true,
									 source);
						(*var_hook) (&var_value, *conf->variable, true,
									 source);

						/* Limit non-superuser changes */
						if (new_value > reset_value)
3545
						{
3546
							/* Limit non-superuser changes */
3547
							if (source > PGC_S_UNPRIVILEGED && !superuser())
3548 3549 3550
							{
								ereport(elevel,
										(errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
3551
								 errmsg("permission denied to set parameter \"%s\"",
B
Bruce Momjian 已提交
3552
										name),
3553 3554 3555 3556
										 errhint("Must be superuser to increase this value.")));
								return false;
							}
						}
3557 3558 3559

						/* Allow change if admin should override */
						if (new_value < var_value)
3560 3561
						{
							if (source < PGC_S_UNPRIVILEGED &&
3562 3563
								record->source > PGC_S_UNPRIVILEGED &&
								!superuser())
3564
								changeVal = changeValOrig;
3565
						}
3566
					}
3567 3568 3569
				}
				else if (conf->reset_val)
				{
3570 3571
					/*
					 * We could possibly avoid strdup here, but easier to
B
Bruce Momjian 已提交
3572 3573
					 * make this case work the same as the normal
					 * assignment case.
3574
					 */
3575
					newval = guc_strdup(elevel, conf->reset_val);
3576 3577 3578 3579 3580 3581 3582 3583 3584 3585 3586 3587
					if (newval == NULL)
						return false;
					source = conf->gen.reset_source;
				}
				else
				{
					/* Nothing to reset to, as yet; so do nothing */
					break;
				}

				/*
				 * Remember string in workspace, so that we can free it
3588
				 * and avoid a permanent memory leak if hook ereports.
3589 3590 3591 3592 3593 3594 3595
				 */
				if (guc_string_workspace)
					free(guc_string_workspace);
				guc_string_workspace = newval;

				if (conf->assign_hook)
				{
B
Bruce Momjian 已提交
3596
					const char *hookresult;
3597 3598

					hookresult = (*conf->assign_hook) (newval,
3599
													   changeVal, source);
3600 3601
					guc_string_workspace = NULL;
					if (hookresult == NULL)
B
Bruce Momjian 已提交
3602
					{
3603
						free(newval);
3604 3605
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
3606
							   errmsg("invalid value for parameter \"%s\": \"%s\"",
B
Bruce Momjian 已提交
3607
									  name, value ? value : "")));
B
Bruce Momjian 已提交
3608 3609
						return false;
					}
3610
					else if (hookresult != newval)
B
Bruce Momjian 已提交
3611
					{
3612
						free(newval);
B
Bruce Momjian 已提交
3613

3614
						/*
B
Bruce Momjian 已提交
3615 3616 3617 3618 3619 3620 3621
						 * Having to cast away const here is annoying, but
						 * the alternative is to declare assign_hooks as
						 * returning char*, which would mean they'd have
						 * to cast away const, or as both taking and
						 * returning char*, which doesn't seem attractive
						 * either --- we don't want them to scribble on
						 * the passed str.
3622 3623 3624 3625 3626 3627
						 */
						newval = (char *) hookresult;
					}
				}

				guc_string_workspace = NULL;
B
Bruce Momjian 已提交
3628

3629
				if (changeVal || makeDefault)
3630
				{
3631 3632 3633
					/* Save old value to support transaction abort */
					if (!makeDefault)
						push_old_value(&conf->gen);
3634
					if (changeVal)
3635
					{
3636
						set_string_field(conf, conf->variable, newval);
3637 3638 3639 3640
						conf->gen.source = source;
					}
					if (makeDefault)
					{
3641 3642
						GucStack *stack;

3643
						if (conf->gen.reset_source <= source)
B
Bruce Momjian 已提交
3644
						{
3645
							set_string_field(conf, &conf->reset_val, newval);
3646
							conf->gen.reset_source = source;
B
Bruce Momjian 已提交
3647
						}
3648
						for (stack = conf->gen.stack; stack; stack = stack->prev)
3649
						{
3650 3651 3652 3653 3654 3655
							if (stack->source <= source)
							{
								set_string_field(conf, &stack->value.stringval,
												 newval);
								stack->source = source;
							}
3656
						}
3657
						/* Perhaps we didn't install newval anywhere */
3658
						if (!string_field_used(conf, newval))
3659
							free(newval);
B
Bruce Momjian 已提交
3660
					}
3661
					else if (isLocal)
3662
					{
3663 3664
						conf->gen.status |= GUC_HAVE_LOCAL;
						guc_dirty = true;
3665
					}
3666
					else
3667
					{
3668
						set_string_field(conf, &conf->tentative_val, newval);
3669 3670 3671
						conf->gen.tentative_source = source;
						conf->gen.status |= GUC_HAVE_TENTATIVE;
						guc_dirty = true;
3672
					}
3673 3674 3675
				}
				else
					free(newval);
B
Bruce Momjian 已提交
3676
				break;
3677
			}
3678
	}
3679

3680
	if (changeVal && (record->flags & GUC_REPORT))
3681
		ReportGUCOption(record);
3682

3683 3684 3685 3686 3687 3688 3689
	return true;
}



/*
 * Set a config option to the given value. See also set_config_option,
B
Bruce Momjian 已提交
3690
 * this is just the wrapper to be called from outside GUC.	NB: this
3691
 * is used only for non-transactional operations.
3692 3693
 */
void
3694
SetConfigOption(const char *name, const char *value,
3695
				GucContext context, GucSource source)
3696
{
3697
	(void) set_config_option(name, value, context, source, false, true);
3698 3699 3700 3701 3702
}



/*
3703
 * Fetch the current value of the option `name'. If the option doesn't exist,
3704
 * throw an ereport and don't return.
3705 3706 3707 3708 3709
 *
 * The string is *not* allocated for modification and is really only
 * valid until the next call to configuration related functions.
 */
const char *
B
Bruce Momjian 已提交
3710
GetConfigOption(const char *name)
3711
{
B
Bruce Momjian 已提交
3712
	struct config_generic *record;
3713 3714
	static char buffer[256];

3715
	record = find_option(name, ERROR);
3716
	if (record == NULL)
3717 3718
		ereport(ERROR,
				(errcode(ERRCODE_UNDEFINED_OBJECT),
3719
				 errmsg("unrecognized configuration parameter \"%s\"", name)));
3720

3721
	switch (record->vartype)
3722 3723
	{
		case PGC_BOOL:
B
Bruce Momjian 已提交
3724
			return *((struct config_bool *) record)->variable ? "on" : "off";
3725

3726
		case PGC_INT:
3727 3728
			snprintf(buffer, sizeof(buffer), "%d",
					 *((struct config_int *) record)->variable);
3729 3730
			return buffer;

3731
		case PGC_REAL:
3732 3733
			snprintf(buffer, sizeof(buffer), "%g",
					 *((struct config_real *) record)->variable);
3734 3735 3736
			return buffer;

		case PGC_STRING:
B
Bruce Momjian 已提交
3737
			return *((struct config_string *) record)->variable;
3738 3739 3740
	}
	return NULL;
}
3741

3742 3743 3744 3745 3746
/*
 * Get the RESET value associated with the given option.
 */
const char *
GetConfigOptionResetString(const char *name)
3747
{
3748 3749
	struct config_generic *record;
	static char buffer[256];
3750

3751
	record = find_option(name, ERROR);
3752
	if (record == NULL)
3753 3754
		ereport(ERROR,
				(errcode(ERRCODE_UNDEFINED_OBJECT),
3755
				 errmsg("unrecognized configuration parameter \"%s\"", name)));
3756 3757

	switch (record->vartype)
3758 3759
	{
		case PGC_BOOL:
3760
			return ((struct config_bool *) record)->reset_val ? "on" : "off";
3761

3762
		case PGC_INT:
3763
			snprintf(buffer, sizeof(buffer), "%d",
3764 3765
					 ((struct config_int *) record)->reset_val);
			return buffer;
3766 3767

		case PGC_REAL:
3768
			snprintf(buffer, sizeof(buffer), "%g",
3769 3770
					 ((struct config_real *) record)->reset_val);
			return buffer;
3771 3772

		case PGC_STRING:
3773 3774 3775 3776
			return ((struct config_string *) record)->reset_val;
	}
	return NULL;
}
3777

3778 3779 3780 3781 3782 3783 3784 3785 3786 3787 3788 3789 3790 3791 3792 3793 3794 3795 3796


/*
 * flatten_set_variable_args
 *		Given a parsenode List as emitted by the grammar for SET,
 *		convert to the flat string representation used by GUC.
 *
 * We need to be told the name of the variable the args are for, because
 * the flattening rules vary (ugh).
 *
 * The result is NULL if input is NIL (ie, SET ... TO DEFAULT), otherwise
 * a palloc'd string.
 */
char *
flatten_set_variable_args(const char *name, List *args)
{
	struct config_generic *record;
	int			flags;
	StringInfoData buf;
3797
	ListCell   *l;
3798

3799 3800 3801 3802
	/*
	 * Fast path if just DEFAULT.  We do not check the variable name in
	 * this case --- necessary for RESET ALL to work correctly.
	 */
3803 3804 3805
	if (args == NIL)
		return NULL;

3806
	/* Else get flags for the variable */
3807
	record = find_option(name, ERROR);
3808
	if (record == NULL)
3809 3810
		ereport(ERROR,
				(errcode(ERRCODE_UNDEFINED_OBJECT),
3811
				 errmsg("unrecognized configuration parameter \"%s\"", name)));
3812 3813

	flags = record->flags;
3814 3815 3816

	/* Complain if list input and non-list variable */
	if ((flags & GUC_LIST_INPUT) == 0 &&
3817
		list_length(args) != 1)
3818 3819 3820
		ereport(ERROR,
				(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
				 errmsg("SET %s takes only one argument", name)));
3821 3822 3823 3824 3825 3826 3827 3828

	initStringInfo(&buf);

	foreach(l, args)
	{
		A_Const    *arg = (A_Const *) lfirst(l);
		char	   *val;

3829
		if (l != list_head(args))
3830 3831 3832
			appendStringInfo(&buf, ", ");

		if (!IsA(arg, A_Const))
3833
			elog(ERROR, "unrecognized node type: %d", (int) nodeTag(arg));
3834 3835 3836 3837 3838 3839 3840 3841

		switch (nodeTag(&arg->val))
		{
			case T_Integer:
				appendStringInfo(&buf, "%ld", intVal(&arg->val));
				break;
			case T_Float:
				/* represented as a string, so just copy it */
N
Neil Conway 已提交
3842
				appendStringInfoString(&buf, strVal(&arg->val));
3843 3844 3845 3846 3847 3848 3849 3850 3851 3852
				break;
			case T_String:
				val = strVal(&arg->val);
				if (arg->typename != NULL)
				{
					/*
					 * Must be a ConstInterval argument for TIME ZONE.
					 * Coerce to interval and back to normalize the value
					 * and account for any typmod.
					 */
B
Bruce Momjian 已提交
3853 3854
					Datum		interval;
					char	   *intervalout;
3855 3856 3857 3858 3859

					interval =
						DirectFunctionCall3(interval_in,
											CStringGetDatum(val),
											ObjectIdGetDatum(InvalidOid),
B
Bruce Momjian 已提交
3860
								   Int32GetDatum(arg->typename->typmod));
3861 3862 3863 3864

					intervalout =
						DatumGetCString(DirectFunctionCall3(interval_out,
															interval,
B
Bruce Momjian 已提交
3865 3866
											ObjectIdGetDatum(InvalidOid),
													 Int32GetDatum(-1)));
3867 3868 3869 3870 3871
					appendStringInfo(&buf, "INTERVAL '%s'", intervalout);
				}
				else
				{
					/*
B
Bruce Momjian 已提交
3872 3873
					 * Plain string literal or identifier.	For quote
					 * mode, quote it if it's not a vanilla identifier.
3874 3875
					 */
					if (flags & GUC_LIST_QUOTE)
N
Neil Conway 已提交
3876
						appendStringInfoString(&buf, quote_identifier(val));
3877
					else
N
Neil Conway 已提交
3878
						appendStringInfoString(&buf, val);
3879 3880 3881
				}
				break;
			default:
3882 3883
				elog(ERROR, "unrecognized node type: %d",
					 (int) nodeTag(&arg->val));
3884 3885
				break;
		}
3886
	}
3887 3888 3889 3890 3891 3892 3893 3894 3895 3896 3897 3898 3899 3900 3901 3902 3903 3904 3905 3906 3907 3908

	return buf.data;
}


/*
 * SET command
 */
void
SetPGVariable(const char *name, List *args, bool is_local)
{
	char	   *argstring = flatten_set_variable_args(name, args);

	/* Note SET DEFAULT (argstring == NULL) is equivalent to RESET */
	set_config_option(name,
					  argstring,
					  (superuser() ? PGC_SUSET : PGC_USERSET),
					  PGC_S_SESSION,
					  is_local,
					  true);
}

3909 3910 3911 3912 3913 3914
/*
 * SET command wrapped as a SQL callable function.
 */
Datum
set_config_by_name(PG_FUNCTION_ARGS)
{
B
Bruce Momjian 已提交
3915 3916 3917 3918 3919
	char	   *name;
	char	   *value;
	char	   *new_value;
	bool		is_local;
	text	   *result_text;
3920 3921

	if (PG_ARGISNULL(0))
3922 3923
		ereport(ERROR,
				(errcode(ERRCODE_NULL_VALUE_NOT_ALLOWED),
3924
				 errmsg("SET requires parameter name")));
3925 3926

	/* Get the GUC variable name */
3927
	name = DatumGetCString(DirectFunctionCall1(textout, PG_GETARG_DATUM(0)));
3928 3929 3930 3931 3932

	/* Get the desired value or set to NULL for a reset request */
	if (PG_ARGISNULL(1))
		value = NULL;
	else
3933
		value = DatumGetCString(DirectFunctionCall1(textout, PG_GETARG_DATUM(1)));
3934 3935

	/*
B
Bruce Momjian 已提交
3936 3937
	 * Get the desired state of is_local. Default to false if provided
	 * value is NULL
3938 3939 3940 3941 3942 3943 3944 3945 3946 3947 3948 3949 3950 3951 3952
	 */
	if (PG_ARGISNULL(2))
		is_local = false;
	else
		is_local = PG_GETARG_BOOL(2);

	/* Note SET DEFAULT (argstring == NULL) is equivalent to RESET */
	set_config_option(name,
					  value,
					  (superuser() ? PGC_SUSET : PGC_USERSET),
					  PGC_S_SESSION,
					  is_local,
					  true);

	/* get the new current value */
3953
	new_value = GetConfigOptionByName(name, NULL);
3954 3955 3956 3957 3958 3959 3960 3961

	/* Convert return string to text */
	result_text = DatumGetTextP(DirectFunctionCall1(textin, CStringGetDatum(new_value)));

	/* return it */
	PG_RETURN_TEXT_P(result_text);
}

3962 3963 3964 3965 3966 3967 3968 3969 3970 3971 3972 3973 3974 3975 3976 3977
static void
define_custom_variable(struct config_generic* variable)
{
	const char* name = variable->name;
	const char** nameAddr = &name;
	const char* value;
	struct config_string*   pHolder;
	struct config_generic** res = (struct config_generic**)bsearch(
											(void*)&nameAddr,
											(void*)guc_variables,
											num_guc_variables,
											sizeof(struct config_generic*),
											guc_var_compare);

	if(res == NULL)
	{
3978
		add_guc_variable(variable, ERROR);
3979 3980 3981 3982 3983 3984 3985 3986 3987
		return;
	}

	/* This better be a placeholder
	 */
	if(((*res)->flags & GUC_CUSTOM_PLACEHOLDER) == 0)
		ereport(ERROR,
				(errcode(ERRCODE_INTERNAL_ERROR),
				 errmsg("attempt to redefine parameter \"%s\"", name)));
3988 3989 3990

	Assert((*res)->vartype == PGC_STRING);
	pHolder = (struct config_string*) *res;
3991
	
3992
	/* We have the same name, no sorting is necessary */
3993 3994 3995 3996
	*res = variable;

	value = *pHolder->variable;

3997 3998 3999 4000 4001 4002
	/*
	 * Assign the string value stored in the placeholder to the real variable.
	 *
	 * XXX this is not really good enough --- it should be a nontransactional
	 * assignment, since we don't want it to roll back if the current xact
	 * fails later.
4003 4004 4005 4006 4007
	 */
	set_config_option(name, value,
				  pHolder->gen.context, pHolder->gen.source,
				  false, true);

4008 4009 4010
	/*
	 * Free up as much as we conveniently can of the placeholder structure
	 * (this neglects any stack items...)
4011
	 */
4012 4013 4014
	set_string_field(pHolder, pHolder->variable, NULL);
	set_string_field(pHolder, &pHolder->reset_val, NULL);
	set_string_field(pHolder, &pHolder->tentative_val, NULL);
4015 4016 4017 4018 4019 4020 4021 4022 4023 4024 4025 4026

	free(pHolder);
}

static void init_custom_variable(
	struct config_generic* gen,
	const char* name,
	const char* short_desc,
	const char* long_desc,
	GucContext  context,
	enum config_type type)
{
4027
	gen->name       = guc_strdup(ERROR, name);
4028 4029 4030 4031 4032 4033 4034 4035 4036 4037 4038 4039 4040 4041 4042 4043 4044
	gen->context    = context;
	gen->group      = CUSTOM_OPTIONS;
	gen->short_desc = short_desc;
	gen->long_desc  = long_desc;
	gen->vartype    = type;
}

void DefineCustomBoolVariable(
	const char* name,
	const char* short_desc,
	const char* long_desc,
	bool*       valueAddr,
	GucContext  context,
	GucBoolAssignHook assign_hook,
	GucShowHook show_hook)
{
	size_t sz = sizeof(struct config_bool);
4045
	struct config_bool* var = (struct config_bool*)guc_malloc(ERROR, sz);
4046 4047 4048 4049 4050 4051 4052 4053 4054 4055 4056 4057 4058 4059 4060 4061 4062 4063 4064 4065 4066

	memset(var, 0, sz);
	init_custom_variable(&var->gen, name, short_desc, long_desc, context, PGC_BOOL);

	var->variable    = valueAddr;
	var->reset_val   = *valueAddr;
	var->assign_hook = assign_hook;
	var->show_hook   = show_hook;
	define_custom_variable(&var->gen);
}

void DefineCustomIntVariable(
	const char* name,
	const char* short_desc,
	const char* long_desc,
	int*        valueAddr,
	GucContext  context,
	GucIntAssignHook assign_hook,
	GucShowHook show_hook)
{
	size_t sz = sizeof(struct config_int);
4067
	struct config_int*  var = (struct config_int*)guc_malloc(ERROR, sz);
4068 4069 4070 4071 4072 4073 4074 4075 4076 4077 4078 4079 4080 4081 4082 4083 4084 4085 4086 4087 4088

	memset(var, 0, sz);
	init_custom_variable(&var->gen, name, short_desc, long_desc, context, PGC_INT);

	var->variable    = valueAddr;
	var->reset_val   = *valueAddr;
	var->assign_hook = assign_hook;
	var->show_hook   = show_hook;
	define_custom_variable(&var->gen);
}

void DefineCustomRealVariable(
	const char* name,
	const char* short_desc,
	const char* long_desc,
	double*     valueAddr,
	GucContext  context,
	GucRealAssignHook assign_hook,
	GucShowHook show_hook)
{
	size_t sz = sizeof(struct config_real);
4089
	struct config_real*  var = (struct config_real*)guc_malloc(ERROR, sz);
4090 4091 4092 4093 4094 4095 4096 4097 4098 4099 4100 4101 4102 4103 4104 4105 4106 4107 4108 4109 4110

	memset(var, 0, sz);
	init_custom_variable(&var->gen, name, short_desc, long_desc, context, PGC_REAL);

	var->variable    = valueAddr;
	var->reset_val   = *valueAddr;
	var->assign_hook = assign_hook;
	var->show_hook   = show_hook;
	define_custom_variable(&var->gen);
}

void DefineCustomStringVariable(
	const char* name,
	const char* short_desc,
	const char* long_desc,
	char**      valueAddr,
	GucContext  context,
	GucStringAssignHook assign_hook,
	GucShowHook show_hook)
{
	size_t sz = sizeof(struct config_string);
4111
	struct config_string*  var = (struct config_string*)guc_malloc(ERROR, sz);
4112 4113 4114 4115 4116 4117 4118 4119 4120 4121 4122

	memset(var, 0, sz);
	init_custom_variable(&var->gen, name, short_desc, long_desc, context, PGC_STRING);

	var->variable    = valueAddr;
	var->reset_val   = *valueAddr;
	var->assign_hook = assign_hook;
	var->show_hook   = show_hook;
	define_custom_variable(&var->gen);
}

4123
extern void EmitWarningsOnPlaceholders(const char* className)
4124 4125 4126 4127 4128 4129 4130 4131 4132 4133 4134 4135 4136 4137 4138 4139 4140 4141 4142 4143
{
	struct config_generic** vars = guc_variables;
	struct config_generic** last = vars + num_guc_variables;

	int nameLen = strlen(className);
	while(vars < last)
	{
		struct config_generic* var = *vars++;
		if((var->flags & GUC_CUSTOM_PLACEHOLDER) != 0 &&
		   strncmp(className, var->name, nameLen) == 0 &&
		   var->name[nameLen] == GUC_QUALIFIER_SEPARATOR)
		{
			ereport(INFO,
				(errcode(ERRCODE_UNDEFINED_OBJECT),
				 errmsg("unrecognized configuration parameter \"%s\"", var->name)));
		}
	}
}


4144 4145 4146 4147
/*
 * SHOW command
 */
void
4148
GetPGVariable(const char *name, DestReceiver *dest)
4149
{
4150
	if (pg_strcasecmp(name, "all") == 0)
4151
		ShowAllGUCConfig(dest);
4152
	else
4153 4154 4155 4156 4157 4158 4159 4160
		ShowGUCConfigOption(name, dest);
}

TupleDesc
GetPGVariableResultDesc(const char *name)
{
	TupleDesc	tupdesc;

4161
	if (pg_strcasecmp(name, "all") == 0)
4162 4163 4164 4165
	{
		/* need a tuple descriptor representing two TEXT columns */
		tupdesc = CreateTemplateTupleDesc(2, false);
		TupleDescInitEntry(tupdesc, (AttrNumber) 1, "name",
4166
						   TEXTOID, -1, 0);
4167
		TupleDescInitEntry(tupdesc, (AttrNumber) 2, "setting",
4168
						   TEXTOID, -1, 0);
4169 4170 4171 4172 4173 4174 4175 4176 4177 4178
	}
	else
	{
		const char *varname;

		/* Get the canonical spelling of name */
		(void) GetConfigOptionByName(name, &varname);

		/* need a tuple descriptor representing a single TEXT column */
		tupdesc = CreateTemplateTupleDesc(1, false);
4179
		TupleDescInitEntry(tupdesc, (AttrNumber) 1, varname,
4180
						   TEXTOID, -1, 0);
4181 4182
	}
	return tupdesc;
4183 4184 4185 4186 4187 4188 4189 4190
}

/*
 * RESET command
 */
void
ResetPGVariable(const char *name)
{
4191
	if (pg_strcasecmp(name, "all") == 0)
4192 4193 4194 4195 4196 4197 4198 4199 4200 4201 4202 4203 4204 4205 4206
		ResetAllOptions();
	else
		set_config_option(name,
						  NULL,
						  (superuser() ? PGC_SUSET : PGC_USERSET),
						  PGC_S_SESSION,
						  false,
						  true);
}


/*
 * SHOW command
 */
void
4207
ShowGUCConfigOption(const char *name, DestReceiver *dest)
4208
{
4209
	TupOutputState *tstate;
B
Bruce Momjian 已提交
4210 4211 4212
	TupleDesc	tupdesc;
	const char *varname;
	char	   *value;
4213

4214 4215 4216
	/* Get the value and canonical spelling of name */
	value = GetConfigOptionByName(name, &varname);

4217
	/* need a tuple descriptor representing a single TEXT column */
4218
	tupdesc = CreateTemplateTupleDesc(1, false);
4219
	TupleDescInitEntry(tupdesc, (AttrNumber) 1, varname,
4220
					   TEXTOID, -1, 0);
4221

4222 4223 4224 4225
	/* prepare for projection of tuples */
	tstate = begin_tup_output_tupdesc(dest, tupdesc);

	/* Send it */
4226
	do_text_output_oneline(tstate, value);
4227 4228

	end_tup_output(tstate);
4229 4230
}

4231 4232 4233
/*
 * SHOW ALL command
 */
4234
void
4235
ShowAllGUCConfig(DestReceiver *dest)
4236 4237
{
	int			i;
4238
	TupOutputState *tstate;
B
Bruce Momjian 已提交
4239 4240
	TupleDesc	tupdesc;
	char	   *values[2];
4241 4242

	/* need a tuple descriptor representing two TEXT columns */
4243
	tupdesc = CreateTemplateTupleDesc(2, false);
4244
	TupleDescInitEntry(tupdesc, (AttrNumber) 1, "name",
4245
					   TEXTOID, -1, 0);
4246
	TupleDescInitEntry(tupdesc, (AttrNumber) 2, "setting",
4247
					   TEXTOID, -1, 0);
4248 4249 4250

	/* prepare for projection of tuples */
	tstate = begin_tup_output_tupdesc(dest, tupdesc);
4251

4252 4253
	for (i = 0; i < num_guc_variables; i++)
	{
4254 4255 4256 4257
		struct config_generic *conf = guc_variables[i];

		if (conf->flags & GUC_NO_SHOW_ALL)
			continue;
4258 4259

		/* assign to the values array */
4260 4261
		values[0] = (char *) conf->name;
		values[1] = _ShowOption(conf);
4262 4263 4264

		/* send it to dest */
		do_tup_output(tstate, values);
4265

4266 4267 4268
		/* clean up */
		if (values[1] != NULL)
			pfree(values[1]);
4269
	}
4270 4271

	end_tup_output(tstate);
4272
}
4273

4274
/*
4275 4276
 * Return GUC variable value by name; optionally return canonical
 * form of name.  Return value is palloc'd.
4277 4278
 */
char *
4279
GetConfigOptionByName(const char *name, const char **varname)
4280 4281 4282
{
	struct config_generic *record;

4283
	record = find_option(name, ERROR);
4284
	if (record == NULL)
4285 4286
		ereport(ERROR,
				(errcode(ERRCODE_UNDEFINED_OBJECT),
4287
				 errmsg("unrecognized configuration parameter \"%s\"", name)));
4288

4289 4290 4291
	if (varname)
		*varname = record->name;

4292 4293 4294 4295
	return _ShowOption(record);
}

/*
4296 4297
 * Return GUC variable value by variable number; optionally return canonical
 * form of name.  Return value is palloc'd.
4298
 */
4299 4300
void
GetConfigOptionByNum(int varnum, const char **values, bool *noshow)
4301
{
B
Bruce Momjian 已提交
4302 4303
	char		buffer[256];
	struct config_generic *conf;
4304 4305 4306 4307 4308

	/* check requested variable number valid */
	Assert((varnum >= 0) && (varnum < num_guc_variables));

	conf = guc_variables[varnum];
4309

4310 4311 4312
	if (noshow)
		*noshow = (conf->flags & GUC_NO_SHOW_ALL) ? true : false;

4313 4314 4315 4316 4317 4318 4319 4320
	/* first get the generic attributes */

	/* name */
	values[0] = conf->name;

	/* setting : use _ShowOption in order to avoid duplicating the logic */
	values[1] = _ShowOption(conf);

4321 4322 4323 4324 4325 4326 4327 4328 4329
	/* group */
	values[2] = config_group_names[conf->group];

	/* short_desc */
	values[3] = conf->short_desc;

	/* extra_desc */
	values[4] = conf->long_desc;

4330
	/* context */
4331
	values[5] = GucContext_Names[conf->context];
4332 4333

	/* vartype */
4334
	values[6] = config_type_names[conf->vartype];
4335 4336

	/* source */
4337
	values[7] = GucSource_Names[conf->source];
4338 4339 4340 4341 4342 4343 4344

	/* now get the type specifc attributes */
	switch (conf->vartype)
	{
		case PGC_BOOL:
			{
				/* min_val */
4345
				values[8] = NULL;
4346 4347

				/* max_val */
4348
				values[9] = NULL;
4349 4350 4351 4352 4353 4354 4355 4356 4357
			}
			break;

		case PGC_INT:
			{
				struct config_int *lconf = (struct config_int *) conf;

				/* min_val */
				snprintf(buffer, sizeof(buffer), "%d", lconf->min);
4358
				values[8] = pstrdup(buffer);
4359 4360 4361

				/* max_val */
				snprintf(buffer, sizeof(buffer), "%d", lconf->max);
4362
				values[9] = pstrdup(buffer);
4363 4364 4365 4366 4367 4368 4369 4370 4371
			}
			break;

		case PGC_REAL:
			{
				struct config_real *lconf = (struct config_real *) conf;

				/* min_val */
				snprintf(buffer, sizeof(buffer), "%g", lconf->min);
4372
				values[8] = pstrdup(buffer);
4373 4374 4375

				/* max_val */
				snprintf(buffer, sizeof(buffer), "%g", lconf->max);
4376
				values[9] = pstrdup(buffer);
4377 4378 4379 4380 4381 4382
			}
			break;

		case PGC_STRING:
			{
				/* min_val */
4383
				values[8] = NULL;
4384 4385

				/* max_val */
4386
				values[9] = NULL;
4387 4388 4389 4390 4391 4392
			}
			break;

		default:
			{
				/*
B
Bruce Momjian 已提交
4393 4394
				 * should never get here, but in case we do, set 'em to
				 * NULL
4395 4396 4397
				 */

				/* min_val */
4398
				values[8] = NULL;
4399 4400

				/* max_val */
4401
				values[9] = NULL;
4402 4403 4404
			}
			break;
	}
4405 4406 4407 4408 4409 4410 4411 4412 4413 4414 4415 4416 4417 4418 4419 4420 4421 4422
}

/*
 * Return the total number of GUC variables
 */
int
GetNumConfigOptions(void)
{
	return num_guc_variables;
}

/*
 * show_config_by_name - equiv to SHOW X command but implemented as
 * a function.
 */
Datum
show_config_by_name(PG_FUNCTION_ARGS)
{
B
Bruce Momjian 已提交
4423 4424 4425
	char	   *varname;
	char	   *varval;
	text	   *result_text;
4426 4427

	/* Get the GUC variable name */
4428
	varname = DatumGetCString(DirectFunctionCall1(textout, PG_GETARG_DATUM(0)));
4429 4430

	/* Get the value */
4431
	varval = GetConfigOptionByName(varname, NULL);
4432 4433 4434 4435 4436 4437 4438 4439

	/* Convert to text */
	result_text = DatumGetTextP(DirectFunctionCall1(textin, CStringGetDatum(varval)));

	/* return it */
	PG_RETURN_TEXT_P(result_text);
}

4440 4441 4442 4443
/*
 * show_all_settings - equiv to SHOW ALL command but implemented as
 * a Table Function.
 */
4444
#define NUM_PG_SETTINGS_ATTS	10
4445

4446 4447 4448
Datum
show_all_settings(PG_FUNCTION_ARGS)
{
B
Bruce Momjian 已提交
4449 4450 4451 4452 4453 4454
	FuncCallContext *funcctx;
	TupleDesc	tupdesc;
	int			call_cntr;
	int			max_calls;
	AttInMetadata *attinmeta;
	MemoryContext oldcontext;
4455 4456

	/* stuff done only on the first call of the function */
B
Bruce Momjian 已提交
4457 4458
	if (SRF_IS_FIRSTCALL())
	{
4459
		/* create a function context for cross-call persistence */
B
Bruce Momjian 已提交
4460
		funcctx = SRF_FIRSTCALL_INIT();
4461

B
Bruce Momjian 已提交
4462 4463 4464 4465
		/*
		 * switch to memory context appropriate for multiple function
		 * calls
		 */
4466 4467
		oldcontext = MemoryContextSwitchTo(funcctx->multi_call_memory_ctx);

4468
		/*
B
Bruce Momjian 已提交
4469 4470
		 * need a tuple descriptor representing NUM_PG_SETTINGS_ATTS
		 * columns of the appropriate types
4471 4472
		 */
		tupdesc = CreateTemplateTupleDesc(NUM_PG_SETTINGS_ATTS, false);
4473
		TupleDescInitEntry(tupdesc, (AttrNumber) 1, "name",
4474
						   TEXTOID, -1, 0);
4475
		TupleDescInitEntry(tupdesc, (AttrNumber) 2, "setting",
4476
						   TEXTOID, -1, 0);
4477
		TupleDescInitEntry(tupdesc, (AttrNumber) 3, "category",
4478
						   TEXTOID, -1, 0);
4479
		TupleDescInitEntry(tupdesc, (AttrNumber) 4, "short_desc",
4480
						   TEXTOID, -1, 0);
4481
		TupleDescInitEntry(tupdesc, (AttrNumber) 5, "extra_desc",
4482
						   TEXTOID, -1, 0);
4483
		TupleDescInitEntry(tupdesc, (AttrNumber) 6, "context",
4484
						   TEXTOID, -1, 0);
4485
		TupleDescInitEntry(tupdesc, (AttrNumber) 7, "vartype",
4486
						   TEXTOID, -1, 0);
4487
		TupleDescInitEntry(tupdesc, (AttrNumber) 8, "source",
4488
						   TEXTOID, -1, 0);
4489
		TupleDescInitEntry(tupdesc, (AttrNumber) 9, "min_val",
4490
						   TEXTOID, -1, 0);
4491
		TupleDescInitEntry(tupdesc, (AttrNumber) 10, "max_val",
4492
						   TEXTOID, -1, 0);
4493 4494

		/*
B
Bruce Momjian 已提交
4495 4496
		 * Generate attribute metadata needed later to produce tuples from
		 * raw C strings
4497 4498 4499 4500 4501 4502
		 */
		attinmeta = TupleDescGetAttInMetadata(tupdesc);
		funcctx->attinmeta = attinmeta;

		/* total number of tuples to be returned */
		funcctx->max_calls = GetNumConfigOptions();
4503 4504

		MemoryContextSwitchTo(oldcontext);
B
Bruce Momjian 已提交
4505
	}
4506 4507

	/* stuff done on every call of the function */
B
Bruce Momjian 已提交
4508
	funcctx = SRF_PERCALL_SETUP();
4509 4510 4511 4512 4513

	call_cntr = funcctx->call_cntr;
	max_calls = funcctx->max_calls;
	attinmeta = funcctx->attinmeta;

B
Bruce Momjian 已提交
4514 4515
	if (call_cntr < max_calls)	/* do when there is more left to send */
	{
4516
		char	   *values[NUM_PG_SETTINGS_ATTS];
4517 4518 4519 4520 4521 4522 4523 4524 4525
		bool		noshow;
		HeapTuple	tuple;
		Datum		result;

		/*
		 * Get the next visible GUC variable name and value
		 */
		do
		{
4526
			GetConfigOptionByNum(call_cntr, (const char **) values, &noshow);
4527 4528 4529 4530 4531 4532 4533
			if (noshow)
			{
				/* bump the counter and get the next config setting */
				call_cntr = ++funcctx->call_cntr;

				/* make sure we haven't gone too far now */
				if (call_cntr >= max_calls)
B
Bruce Momjian 已提交
4534
					SRF_RETURN_DONE(funcctx);
4535 4536 4537 4538 4539 4540 4541
			}
		} while (noshow);

		/* build a tuple */
		tuple = BuildTupleFromCStrings(attinmeta, values);

		/* make the tuple into a datum */
4542
		result = HeapTupleGetDatum(tuple);
4543

B
Bruce Momjian 已提交
4544 4545 4546
		SRF_RETURN_NEXT(funcctx, result);
	}
	else
4547 4548
	{
		/* do when there is no more left */
B
Bruce Momjian 已提交
4549
		SRF_RETURN_DONE(funcctx);
4550
	}
4551 4552
}

4553
static char *
B
Bruce Momjian 已提交
4554
_ShowOption(struct config_generic * record)
4555 4556 4557
{
	char		buffer[256];
	const char *val;
4558

4559 4560 4561 4562 4563
	switch (record->vartype)
	{
		case PGC_BOOL:
			{
				struct config_bool *conf = (struct config_bool *) record;
4564

4565 4566 4567 4568 4569 4570 4571 4572 4573 4574 4575 4576 4577 4578 4579 4580 4581 4582 4583 4584 4585 4586 4587 4588 4589 4590 4591 4592 4593 4594 4595 4596 4597 4598 4599 4600 4601 4602 4603 4604
				if (conf->show_hook)
					val = (*conf->show_hook) ();
				else
					val = *conf->variable ? "on" : "off";
			}
			break;

		case PGC_INT:
			{
				struct config_int *conf = (struct config_int *) record;

				if (conf->show_hook)
					val = (*conf->show_hook) ();
				else
				{
					snprintf(buffer, sizeof(buffer), "%d",
							 *conf->variable);
					val = buffer;
				}
			}
			break;

		case PGC_REAL:
			{
				struct config_real *conf = (struct config_real *) record;

				if (conf->show_hook)
					val = (*conf->show_hook) ();
				else
				{
					snprintf(buffer, sizeof(buffer), "%g",
							 *conf->variable);
					val = buffer;
				}
			}
			break;

		case PGC_STRING:
			{
				struct config_string *conf = (struct config_string *) record;
4605

4606 4607 4608 4609 4610 4611 4612 4613
				if (conf->show_hook)
					val = (*conf->show_hook) ();
				else if (*conf->variable && **conf->variable)
					val = *conf->variable;
				else
					val = "unset";
			}
			break;
4614

4615 4616 4617 4618 4619
		default:
			/* just to keep compiler quiet */
			val = "???";
			break;
	}
4620

4621
	return pstrdup(val);
4622
}
4623 4624


B
Bruce Momjian 已提交
4625 4626 4627 4628 4629 4630 4631 4632 4633 4634 4635 4636
#ifdef EXEC_BACKEND
/*
 *	This routine dumps out all non-default GUC options into a binary
 *	file that is read by all exec'ed backends.  The format is:
 *
 *		variable name, string, null terminated
 *		variable value, string, null terminated
 *		variable source, integer
 */
void
write_nondefault_variables(GucContext context)
{
4637 4638 4639 4640 4641
	int			i;
	char	   *new_filename,
			   *filename;
	int			elevel;
	FILE	   *fp;
B
Bruce Momjian 已提交
4642 4643 4644

	Assert(context == PGC_POSTMASTER || context == PGC_SIGHUP);
	Assert(DataDir);
4645
	elevel = (context == PGC_SIGHUP) ? DEBUG4 : ERROR;
B
Bruce Momjian 已提交
4646 4647 4648 4649

	/*
	 * Open file
	 */
4650
	new_filename = guc_malloc(elevel, strlen(DataDir) + strlen(CONFIG_EXEC_PARAMS) +
4651
						  strlen(".new") + 2);
4652 4653 4654 4655 4656
	if(new_filename == NULL)
		return;

	filename = guc_malloc(elevel, strlen(DataDir) + strlen(CONFIG_EXEC_PARAMS) + 2);
	if (filename == NULL)
B
Bruce Momjian 已提交
4657
	{
4658
		free(new_filename);
B
Bruce Momjian 已提交
4659 4660
		return;
	}
4661

B
Bruce Momjian 已提交
4662 4663 4664
	sprintf(new_filename, "%s/" CONFIG_EXEC_PARAMS ".new", DataDir);
	sprintf(filename, "%s/" CONFIG_EXEC_PARAMS, DataDir);

4665 4666 4667 4668
	fp = AllocateFile(new_filename, "w");
	if (!fp)
	{
		free(new_filename);
B
Bruce Momjian 已提交
4669
		free(filename);
4670 4671
		ereport(elevel,
				(errcode_for_file_access(),
4672
				 errmsg("could not write to file \"%s\": %m", CONFIG_EXEC_PARAMS)));
B
Bruce Momjian 已提交
4673 4674 4675 4676 4677 4678 4679 4680 4681 4682 4683 4684 4685 4686 4687 4688 4689 4690 4691 4692 4693 4694 4695 4696 4697 4698 4699 4700 4701 4702 4703 4704 4705 4706 4707 4708 4709 4710 4711 4712 4713 4714 4715 4716 4717 4718 4719 4720 4721 4722 4723 4724 4725 4726 4727 4728 4729
		return;
	}

	for (i = 0; i < num_guc_variables; i++)
	{
		struct config_generic *gconf = guc_variables[i];

		if (gconf->source != PGC_S_DEFAULT)
		{
			fprintf(fp, "%s", gconf->name);
			fputc(0, fp);

			switch (gconf->vartype)
			{
				case PGC_BOOL:
					{
						struct config_bool *conf = (struct config_bool *) gconf;

						if (*conf->variable == 0)
							fprintf(fp, "false");
						else
							fprintf(fp, "true");
					}
					break;

				case PGC_INT:
					{
						struct config_int *conf = (struct config_int *) gconf;

						fprintf(fp, "%d", *conf->variable);
					}
					break;

				case PGC_REAL:
					{
						struct config_real *conf = (struct config_real *) gconf;

						/* Could lose precision here? */
						fprintf(fp, "%f", *conf->variable);
					}
					break;

				case PGC_STRING:
					{
						struct config_string *conf = (struct config_string *) gconf;

						fprintf(fp, "%s", *conf->variable);
					}
					break;
			}

			fputc(0, fp);

			fwrite(&gconf->source, sizeof(gconf->source), 1, fp);
		}
	}

4730 4731 4732 4733 4734 4735 4736 4737 4738 4739
	if (FreeFile(fp))
	{
		free(new_filename);
		free(filename);
		ereport(elevel,
				(errcode_for_file_access(),
				 errmsg("could not write to file \"%s\": %m", CONFIG_EXEC_PARAMS)));
		return;
	}

4740 4741 4742 4743
	/*
	 *	Put new file in place.  This could delay on Win32, but we don't hold
	 *	any exclusive locks.
	 */
B
Bruce Momjian 已提交
4744 4745 4746 4747 4748 4749 4750 4751 4752 4753 4754 4755 4756 4757
	rename(new_filename, filename);
	free(new_filename);
	free(filename);
}


/*
 *	Read string, including null byte from file
 *
 *	Return NULL on EOF and nothing read
 */
static char *
read_string_with_null(FILE *fp)
{
4758 4759 4760 4761
	int			i = 0,
				ch,
				maxlen = 256;
	char	   *str = NULL;
B
Bruce Momjian 已提交
4762 4763 4764 4765 4766 4767 4768 4769

	do
	{
		if ((ch = fgetc(fp)) == EOF)
		{
			if (i == 0)
				return NULL;
			else
4770
				elog(FATAL, "invalid format of exec config params file");
B
Bruce Momjian 已提交
4771 4772
		}
		if (i == 0)
4773
			str = guc_malloc(FATAL, maxlen);
B
Bruce Momjian 已提交
4774
		else if (i == maxlen)
4775
			str = guc_realloc(FATAL, str, maxlen *= 2);
B
Bruce Momjian 已提交
4776 4777 4778 4779 4780 4781 4782 4783 4784 4785 4786 4787 4788 4789
		str[i++] = ch;
	} while (ch != 0);

	return str;
}


/*
 *	This routine loads a previous postmaster dump of its non-default
 *	settings.
 */
void
read_nondefault_variables(void)
{
4790 4791 4792 4793 4794
	char	   *filename;
	FILE	   *fp;
	char	   *varname,
			   *varvalue;
	int			varsource;
B
Bruce Momjian 已提交
4795 4796 4797 4798 4799 4800

	Assert(DataDir);

	/*
	 * Open file
	 */
4801
	filename = guc_malloc(FATAL, strlen(DataDir) + strlen(CONFIG_EXEC_PARAMS) + 2);
B
Bruce Momjian 已提交
4802 4803
	sprintf(filename, "%s/" CONFIG_EXEC_PARAMS, DataDir);

4804 4805 4806
	fp = AllocateFile(filename, "r");
	if (!fp)
	{
B
Bruce Momjian 已提交
4807
		free(filename);
4808 4809
		/* File not found is fine */
		if (errno != ENOENT)
4810 4811
			ereport(FATAL,
					(errcode_for_file_access(),
4812
					 errmsg("could not read from file \"%s\": %m", CONFIG_EXEC_PARAMS)));
B
Bruce Momjian 已提交
4813
		return;
4814
	}
B
Bruce Momjian 已提交
4815

4816
	for (;;)
B
Bruce Momjian 已提交
4817
	{
4818 4819
		struct config_generic *record;

B
Bruce Momjian 已提交
4820 4821 4822
		if ((varname = read_string_with_null(fp)) == NULL)
			break;

4823
		if ((record = find_option(varname, FATAL)) == NULL)
4824
			elog(FATAL, "failed to locate variable %s in exec config params file",varname);
B
Bruce Momjian 已提交
4825
		if ((varvalue = read_string_with_null(fp)) == NULL)
4826
			elog(FATAL, "invalid format of exec config params file");
4827
		if (fread(&varsource, sizeof(varsource), 1, fp) == 0)
4828
			elog(FATAL, "invalid format of exec config params file");
B
Bruce Momjian 已提交
4829

4830
		(void) set_config_option(varname, varvalue, record->context,
4831
								 varsource, false, true);
B
Bruce Momjian 已提交
4832 4833 4834 4835 4836 4837 4838 4839 4840 4841 4842
		free(varname);
		free(varvalue);
	}

	FreeFile(fp);
	free(filename);
	return;
}
#endif


4843 4844 4845 4846 4847 4848 4849 4850
/*
 * A little "long argument" simulation, although not quite GNU
 * compliant. Takes a string of the form "some-option=some value" and
 * returns name = "some_option" and value = "some value" in malloc'ed
 * storage. Note that '-' is converted to '_' in the option name. If
 * there is no '=' in the input string then value will be NULL.
 */
void
B
Bruce Momjian 已提交
4851
ParseLongOption(const char *string, char **name, char **value)
4852
{
B
Bruce Momjian 已提交
4853 4854
	size_t		equal_pos;
	char	   *cp;
4855 4856 4857 4858 4859 4860 4861 4862 4863

	AssertArg(string);
	AssertArg(name);
	AssertArg(value);

	equal_pos = strcspn(string, "=");

	if (string[equal_pos] == '=')
	{
4864
		*name = guc_malloc(FATAL, equal_pos + 1);
4865 4866 4867
		strncpy(*name, string, equal_pos);
		(*name)[equal_pos] = '\0';

4868
		*value = guc_strdup(FATAL, &string[equal_pos + 1]);
4869
	}
B
Bruce Momjian 已提交
4870
	else
4871
	{
4872
		/* no equal sign in string */
4873
		*name = guc_strdup(FATAL, string);
4874 4875 4876
		*value = NULL;
	}

B
Bruce Momjian 已提交
4877
	for (cp = *name; *cp; cp++)
4878 4879 4880
		if (*cp == '-')
			*cp = '_';
}
4881 4882


4883 4884
/*
 * Handle options fetched from pg_database.datconfig or pg_shadow.useconfig.
4885
 * The array parameter must be an array of TEXT (it must not be NULL).
4886
 */
4887 4888 4889
void
ProcessGUCArray(ArrayType *array, GucSource source)
{
B
Bruce Momjian 已提交
4890
	int			i;
4891

4892
	Assert(array != NULL);
4893 4894 4895
	Assert(ARR_ELEMTYPE(array) == TEXTOID);
	Assert(ARR_NDIM(array) == 1);
	Assert(ARR_LBOUND(array)[0] == 1);
4896
	Assert(source == PGC_S_DATABASE || source == PGC_S_USER);
4897 4898 4899 4900 4901 4902 4903 4904 4905 4906

	for (i = 1; i <= ARR_DIMS(array)[0]; i++)
	{
		Datum		d;
		bool		isnull;
		char	   *s;
		char	   *name;
		char	   *value;

		d = array_ref(array, 1, &i,
B
Bruce Momjian 已提交
4907 4908 4909 4910
					  -1 /* varlenarray */ ,
					  -1 /* TEXT's typlen */ ,
					  false /* TEXT's typbyval */ ,
					  'i' /* TEXT's typalign */ ,
4911 4912 4913 4914 4915 4916
					  &isnull);

		if (isnull)
			continue;

		s = DatumGetCString(DirectFunctionCall1(textout, d));
4917

4918 4919 4920
		ParseLongOption(s, &name, &value);
		if (!value)
		{
4921 4922
			ereport(WARNING,
					(errcode(ERRCODE_SYNTAX_ERROR),
4923
					 errmsg("could not parse setting for parameter \"%s\"", name)));
4924
			free(name);
B
Bruce Momjian 已提交
4925
			continue;
4926 4927
		}

4928
		/*
B
Bruce Momjian 已提交
4929 4930
		 * We process all these options at SUSET level.  We assume that
		 * the right to insert an option into pg_database or pg_shadow was
4931 4932
		 * checked when it was inserted.
		 */
4933
		SetConfigOption(name, value, PGC_SUSET, source);
4934 4935 4936 4937

		free(name);
		if (value)
			free(value);
4938 4939 4940 4941
	}
}


4942 4943 4944 4945
/*
 * Add an entry to an option array.  The array parameter may be NULL
 * to indicate the current table entry is NULL.
 */
4946 4947 4948
ArrayType *
GUCArrayAdd(ArrayType *array, const char *name, const char *value)
{
4949
	const char *varname;
4950 4951 4952 4953 4954 4955 4956 4957 4958 4959
	Datum		datum;
	char	   *newval;
	ArrayType  *a;

	Assert(name);
	Assert(value);

	/* test if the option is valid */
	set_config_option(name, value,
					  superuser() ? PGC_SUSET : PGC_USERSET,
4960
					  PGC_S_TEST, false, false);
4961

4962 4963 4964 4965
	/* convert name to canonical spelling, so we can use plain strcmp */
	(void) GetConfigOptionByName(name, &varname);
	name = varname;

4966 4967 4968
	newval = palloc(strlen(name) + 1 + strlen(value) + 1);
	sprintf(newval, "%s=%s", name, value);
	datum = DirectFunctionCall1(textin, CStringGetDatum(newval));
B
Bruce Momjian 已提交
4969

4970 4971
	if (array)
	{
B
Bruce Momjian 已提交
4972 4973 4974
		int			index;
		bool		isnull;
		int			i;
4975

4976 4977 4978 4979
		Assert(ARR_ELEMTYPE(array) == TEXTOID);
		Assert(ARR_NDIM(array) == 1);
		Assert(ARR_LBOUND(array)[0] == 1);

B
Bruce Momjian 已提交
4980
		index = ARR_DIMS(array)[0] + 1; /* add after end */
4981 4982 4983 4984 4985 4986 4987

		for (i = 1; i <= ARR_DIMS(array)[0]; i++)
		{
			Datum		d;
			char	   *current;

			d = array_ref(array, 1, &i,
B
Bruce Momjian 已提交
4988 4989 4990 4991
						  -1 /* varlenarray */ ,
						  -1 /* TEXT's typlen */ ,
						  false /* TEXT's typbyval */ ,
						  'i' /* TEXT's typalign */ ,
4992
						  &isnull);
4993 4994
			if (isnull)
				continue;
4995
			current = DatumGetCString(DirectFunctionCall1(textout, d));
B
Bruce Momjian 已提交
4996
			if (strncmp(current, newval, strlen(name) + 1) == 0)
4997 4998 4999 5000 5001 5002 5003
			{
				index = i;
				break;
			}
		}

		isnull = false;
5004 5005
		a = array_set(array, 1, &index,
					  datum,
B
Bruce Momjian 已提交
5006 5007 5008 5009
					  -1 /* varlenarray */ ,
					  -1 /* TEXT's typlen */ ,
					  false /* TEXT's typbyval */ ,
					  'i' /* TEXT's typalign */ ,
5010
					  &isnull);
5011 5012
	}
	else
5013 5014 5015
		a = construct_array(&datum, 1,
							TEXTOID,
							-1, false, 'i');
5016 5017 5018 5019 5020

	return a;
}


5021 5022 5023 5024 5025
/*
 * Delete an entry from an option array.  The array parameter may be NULL
 * to indicate the current table entry is NULL.  Also, if the return value
 * is NULL then a null should be stored.
 */
5026 5027 5028
ArrayType *
GUCArrayDelete(ArrayType *array, const char *name)
{
5029
	const char *varname;
B
Bruce Momjian 已提交
5030 5031 5032
	ArrayType  *newarray;
	int			i;
	int			index;
5033 5034 5035 5036 5037 5038

	Assert(name);

	/* test if the option is valid */
	set_config_option(name, NULL,
					  superuser() ? PGC_SUSET : PGC_USERSET,
5039
					  PGC_S_TEST, false, false);
5040

5041 5042 5043 5044
	/* convert name to canonical spelling, so we can use plain strcmp */
	(void) GetConfigOptionByName(name, &varname);
	name = varname;

5045 5046 5047 5048 5049
	/* if array is currently null, then surely nothing to delete */
	if (!array)
		return NULL;

	newarray = NULL;
5050 5051 5052 5053 5054 5055 5056 5057 5058
	index = 1;

	for (i = 1; i <= ARR_DIMS(array)[0]; i++)
	{
		Datum		d;
		char	   *val;
		bool		isnull;

		d = array_ref(array, 1, &i,
B
Bruce Momjian 已提交
5059 5060 5061 5062
					  -1 /* varlenarray */ ,
					  -1 /* TEXT's typlen */ ,
					  false /* TEXT's typbyval */ ,
					  'i' /* TEXT's typalign */ ,
5063
					  &isnull);
5064 5065
		if (isnull)
			continue;
5066 5067
		val = DatumGetCString(DirectFunctionCall1(textout, d));

5068
		/* ignore entry if it's what we want to delete */
B
Bruce Momjian 已提交
5069
		if (strncmp(val, name, strlen(name)) == 0
5070 5071 5072
			&& val[strlen(name)] == '=')
			continue;

5073 5074 5075 5076 5077 5078 5079 5080 5081 5082 5083 5084 5085 5086 5087 5088 5089
		/* else add it to the output array */
		if (newarray)
		{
			isnull = false;
			newarray = array_set(newarray, 1, &index,
								 d,
								 -1 /* varlenarray */ ,
								 -1 /* TEXT's typlen */ ,
								 false /* TEXT's typbyval */ ,
								 'i' /* TEXT's typalign */ ,
								 &isnull);
		}
		else
			newarray = construct_array(&d, 1,
									   TEXTOID,
									   -1, false, 'i');

5090 5091 5092 5093 5094
		index++;
	}

	return newarray;
}
5095

5096 5097 5098 5099 5100

/*
 * assign_hook subroutines
 */

5101 5102 5103 5104 5105
static const char *
assign_log_destination(const char *value, bool doit, GucSource source)
{
	char *rawstring;
	List *elemlist;
5106
	ListCell *l;
5107 5108 5109 5110 5111 5112 5113 5114 5115 5116
	unsigned int  newlogdest = 0;
 
	/* Need a modifiable copy of string */
	rawstring = pstrdup(value);

	/* Parse string into list of identifiers */
	if (!SplitIdentifierString(rawstring, ',', &elemlist)) 
	{
		/* syntax error in list */
		pfree(rawstring);
5117
		list_free(elemlist);
5118 5119 5120 5121 5122 5123 5124 5125 5126 5127 5128
		if (source >= PGC_S_INTERACTIVE)
			ereport(ERROR,
					(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
					 errmsg("invalid list syntax for parameter \"log_destination\"")));
		return NULL;
	}

	foreach(l, elemlist)
	{
		char *tok = (char *) lfirst(l);
	
5129
		if (pg_strcasecmp(tok,"stderr") == 0)
5130 5131
			newlogdest |= LOG_DESTINATION_STDERR;
#ifdef HAVE_SYSLOG
5132
		else if (pg_strcasecmp(tok,"syslog") == 0)
5133 5134 5135
			newlogdest |= LOG_DESTINATION_SYSLOG;
#endif
#ifdef WIN32
5136
		else if (pg_strcasecmp(tok,"eventlog") == 0)
5137 5138 5139 5140 5141 5142 5143 5144 5145
			newlogdest |= LOG_DESTINATION_EVENTLOG;
#endif
		else {
			if (source >= PGC_S_INTERACTIVE)
				ereport(ERROR,
						(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
						 errmsg("unrecognised \"log_destination\" key word: \"%s\"",
								tok)));
			pfree(rawstring);
5146
			list_free(elemlist);
5147 5148 5149 5150 5151
			return NULL;
		}
	}

	pfree(rawstring);
5152
	list_free(elemlist);
5153 5154 5155 5156 5157 5158 5159 5160 5161 5162

	/* If we aren't going to do the assignment, just return OK indicator. */
	if (!doit)
		return value;

	Log_destination = newlogdest;

	return value;
}

5163 5164 5165
#ifdef HAVE_SYSLOG

static const char *
5166
assign_facility(const char *facility, bool doit, GucSource source)
5167
{
5168
	if (pg_strcasecmp(facility, "LOCAL0") == 0)
5169
		return facility;
5170
	if (pg_strcasecmp(facility, "LOCAL1") == 0)
5171
		return facility;
5172
	if (pg_strcasecmp(facility, "LOCAL2") == 0)
5173
		return facility;
5174
	if (pg_strcasecmp(facility, "LOCAL3") == 0)
5175
		return facility;
5176
	if (pg_strcasecmp(facility, "LOCAL4") == 0)
5177
		return facility;
5178
	if (pg_strcasecmp(facility, "LOCAL5") == 0)
5179
		return facility;
5180
	if (pg_strcasecmp(facility, "LOCAL6") == 0)
5181
		return facility;
5182
	if (pg_strcasecmp(facility, "LOCAL7") == 0)
5183 5184 5185 5186 5187 5188 5189
		return facility;
	return NULL;
}
#endif


static const char *
5190
assign_defaultxactisolevel(const char *newval, bool doit, GucSource source)
5191
{
5192
	if (pg_strcasecmp(newval, "serializable") == 0)
5193 5194 5195 5196
	{
		if (doit)
			DefaultXactIsoLevel = XACT_SERIALIZABLE;
	}
5197
	else if (pg_strcasecmp(newval, "repeatable read") == 0)
5198 5199 5200 5201
	{
		if (doit)
			DefaultXactIsoLevel = XACT_REPEATABLE_READ;
	}
5202
	else if (pg_strcasecmp(newval, "read committed") == 0)
5203 5204 5205 5206
	{
		if (doit)
			DefaultXactIsoLevel = XACT_READ_COMMITTED;
	}
5207
	else if (pg_strcasecmp(newval, "read uncommitted") == 0)
5208 5209 5210 5211
	{
		if (doit)
			DefaultXactIsoLevel = XACT_READ_UNCOMMITTED;
	}
5212 5213 5214 5215 5216 5217
	else
		return NULL;
	return newval;
}

static const char *
5218
assign_log_min_messages(const char *newval,
5219
						bool doit, GucSource source)
5220
{
5221
	return (assign_msglvl(&log_min_messages, newval, doit, source));
5222 5223
}

5224
static const char *
5225
assign_client_min_messages(const char *newval, bool doit, GucSource source)
5226
{
5227
	return (assign_msglvl(&client_min_messages, newval, doit, source));
5228 5229
}

5230
static const char *
5231
assign_min_error_statement(const char *newval, bool doit, GucSource source)
5232
{
5233
	return (assign_msglvl(&log_min_error_statement, newval, doit, source));
5234 5235 5236
}

static const char *
5237
assign_msglvl(int *var, const char *newval, bool doit, GucSource source)
5238
{
5239
	if (pg_strcasecmp(newval, "debug") == 0)
B
Bruce Momjian 已提交
5240 5241
	{
		if (doit)
5242
			(*var) = DEBUG2;
B
Bruce Momjian 已提交
5243
	}
5244
	else if (pg_strcasecmp(newval, "debug5") == 0)
B
Bruce Momjian 已提交
5245 5246 5247 5248
	{
		if (doit)
			(*var) = DEBUG5;
	}
5249
	else if (pg_strcasecmp(newval, "debug4") == 0)
B
Bruce Momjian 已提交
5250 5251 5252 5253
	{
		if (doit)
			(*var) = DEBUG4;
	}
5254
	else if (pg_strcasecmp(newval, "debug3") == 0)
B
Bruce Momjian 已提交
5255 5256 5257 5258
	{
		if (doit)
			(*var) = DEBUG3;
	}
5259
	else if (pg_strcasecmp(newval, "debug2") == 0)
B
Bruce Momjian 已提交
5260 5261 5262 5263
	{
		if (doit)
			(*var) = DEBUG2;
	}
5264
	else if (pg_strcasecmp(newval, "debug1") == 0)
B
Bruce Momjian 已提交
5265 5266 5267 5268
	{
		if (doit)
			(*var) = DEBUG1;
	}
5269
	else if (pg_strcasecmp(newval, "log") == 0)
B
Bruce Momjian 已提交
5270 5271 5272 5273
	{
		if (doit)
			(*var) = LOG;
	}
5274 5275 5276 5277
	/*
	 *	Client_min_messages always prints 'info', but
	 *	we allow it as a value anyway.
	 */
5278
	else if (pg_strcasecmp(newval, "info") == 0)
B
Bruce Momjian 已提交
5279 5280 5281 5282
	{
		if (doit)
			(*var) = INFO;
	}
5283
	else if (pg_strcasecmp(newval, "notice") == 0)
B
Bruce Momjian 已提交
5284 5285 5286 5287
	{
		if (doit)
			(*var) = NOTICE;
	}
5288
	else if (pg_strcasecmp(newval, "warning") == 0)
B
Bruce Momjian 已提交
5289 5290 5291 5292
	{
		if (doit)
			(*var) = WARNING;
	}
5293
	else if (pg_strcasecmp(newval, "error") == 0)
B
Bruce Momjian 已提交
5294 5295 5296 5297
	{
		if (doit)
			(*var) = ERROR;
	}
5298
	/* We allow FATAL/PANIC for client-side messages too. */
5299
	else if (pg_strcasecmp(newval, "fatal") == 0)
5300 5301 5302 5303
	{
		if (doit)
			(*var) = FATAL;
	}
5304
	else if (pg_strcasecmp(newval, "panic") == 0)
5305 5306 5307 5308
	{
		if (doit)
			(*var) = PANIC;
	}
5309 5310 5311 5312
	else
		return NULL;			/* fail */
	return newval;				/* OK */
}
5313

5314
static const char *
5315
assign_log_error_verbosity(const char *newval, bool doit, GucSource source)
5316
{
5317
	if (pg_strcasecmp(newval, "terse") == 0)
5318 5319 5320 5321
	{
		if (doit)
			Log_error_verbosity = PGERROR_TERSE;
	}
5322
	else if (pg_strcasecmp(newval, "default") == 0)
5323 5324 5325 5326
	{
		if (doit)
			Log_error_verbosity = PGERROR_DEFAULT;
	}
5327
	else if (pg_strcasecmp(newval, "verbose") == 0)
5328 5329 5330 5331 5332 5333 5334 5335 5336
	{
		if (doit)
			Log_error_verbosity = PGERROR_VERBOSE;
	}
	else
		return NULL;			/* fail */
	return newval;				/* OK */
}

5337 5338 5339 5340 5341 5342 5343 5344 5345
static const char *
assign_log_statement(const char *newval, bool doit, GucSource source)
{
	return (assign_log_stmtlvl((int *)&log_statement, newval, doit, source));
}

static const char *
assign_log_stmtlvl(int *var, const char *newval, bool doit, GucSource source)
{
5346
	if (pg_strcasecmp(newval, "none") == 0)
5347 5348 5349 5350
	{
		if (doit)
			(*var) = LOGSTMT_NONE;
	}
5351
	else if (pg_strcasecmp(newval, "mod") == 0)
5352 5353 5354 5355
	{
		if (doit)
			(*var) = LOGSTMT_MOD;
	}
5356
	else if (pg_strcasecmp(newval, "ddl") == 0)
5357 5358 5359 5360
	{
		if (doit)
			(*var) = LOGSTMT_DDL;
	}
5361
	else if (pg_strcasecmp(newval, "all") == 0)
5362 5363 5364 5365 5366 5367 5368 5369 5370
	{
		if (doit)
			(*var) = LOGSTMT_ALL;
	}
	else
		return NULL;			/* fail */
	return newval;				/* OK */
}

5371
static bool
5372
assign_phony_autocommit(bool newval, bool doit, GucSource source)
5373 5374 5375
{
	if (!newval)
	{
5376
		if (doit && source >= PGC_S_INTERACTIVE)
5377 5378
			ereport(ERROR,
					(errcode(ERRCODE_FEATURE_NOT_SUPPORTED),
B
Bruce Momjian 已提交
5379
				errmsg("SET AUTOCOMMIT TO OFF is no longer supported")));
5380 5381 5382 5383 5384
		return false;
	}
	return true;
}

5385 5386 5387 5388 5389 5390 5391 5392 5393 5394 5395 5396 5397 5398 5399 5400 5401 5402 5403 5404 5405 5406 5407 5408 5409 5410 5411 5412 5413 5414 5415 5416 5417 5418 5419 5420 5421 5422 5423 5424 5425 5426 5427 5428 5429 5430 5431 5432 5433 5434 5435 5436 5437 5438 5439 5440 5441 5442 5443 5444 5445 5446
static const char *
assign_custom_variable_classes(const char *newval, bool doit, GucSource source)
{
	/* Check syntax. newval must be a comma separated list of identifiers.
	 * Whitespace is allowed but skipped.
	 */
	bool hasSpaceAfterToken = false;
	const char *cp = newval;
	int symLen = 0;
	int c;
	StringInfoData buf;

	initStringInfo(&buf);
	while((c = *cp++) != 0)
	{
		if(isspace(c))
		{
			if(symLen > 0)
				hasSpaceAfterToken = true;
			continue;
		}

		if(c == ',')
		{
			hasSpaceAfterToken = false;
			if(symLen > 0)
			{
				symLen = 0;
				appendStringInfoChar(&buf, ',');
			}
			continue;
		}

		if(hasSpaceAfterToken || !isalnum(c))
		{
			/* Syntax error due to token following space after
			 * token or non alpha numeric character
			 */
			pfree(buf.data);
			ereport(WARNING,
					(errcode(ERRCODE_SYNTAX_ERROR),
					 errmsg("illegal syntax for custom_variable_classes \"%s\"", newval)));
			return NULL;
		}
		symLen++;
		appendStringInfoChar(&buf, (char)c);
	}

	if(symLen == 0 && buf.len > 0)
		/*
		 * Remove stray ',' at end
		 */
		buf.data[--buf.len] = 0;

	if(buf.len == 0)
		newval = NULL;
	else if(doit)
		newval = strdup(buf.data);

	pfree(buf.data);
	return newval;
}
5447

5448 5449 5450 5451 5452 5453 5454 5455 5456
static bool
assign_stage_log_stats(bool newval, bool doit, GucSource source)
{
	if (newval)
	{
		if (log_statement_stats)
		{
			if (doit)
				ereport(ERROR,
5457
						(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
5458
					errmsg("cannot enable parameter when \"log_statement_stats\" is true.")));
5459 5460 5461 5462 5463 5464 5465 5466 5467 5468 5469 5470 5471 5472 5473 5474 5475 5476
			else
				return false;
		}
		return true;
	}
	return true;
}


static bool
assign_log_stats(bool newval, bool doit, GucSource source)
{
	if (newval)
	{
		if (log_parser_stats || log_planner_stats || log_executor_stats)
		{
			if (doit)
				ereport(ERROR,
5477
						(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
5478
					errmsg("cannot enable \"log_statement_stats\" when \"log_parser_stats\",\n"
5479 5480 5481 5482 5483 5484 5485 5486 5487
							"\"log_planner_stats\", or \"log_executor_stats\" is true.")));
			else
				return false;
		}
		return true;
	}
	return true;
}

5488 5489 5490 5491 5492 5493 5494 5495 5496
static bool
assign_transaction_read_only(bool newval, bool doit, GucSource source)
{
	if (doit && source >= PGC_S_INTERACTIVE && IsSubTransaction())
		ereport(ERROR,
				(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
				 errmsg("cannot set transaction read only mode inside a subtransaction")));
	return true;
}
5497

5498 5499 5500 5501 5502 5503 5504
static const char *
assign_canonical_path(const char *newval, bool doit, GucSource source)
{
	
	if (doit)
	{
		/* We have to create a new pointer to force the change */
5505
		char *canon_val = guc_strdup(ERROR, newval);
5506 5507 5508 5509 5510 5511 5512
		canonicalize_path(canon_val);
		return canon_val;
	}
	else
		return newval;
}

5513
#include "guc-file.c"