guc.c 146.2 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-2005, 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.292 2005/10/14 20:53:56 tgl Exp $
14
 *
15 16 17 18
 *--------------------------------------------------------------------
 */
#include "postgres.h"

19
#include <ctype.h>
20 21 22
#include <float.h>
#include <limits.h>
#include <unistd.h>
23
#include <sys/stat.h>
24 25 26
#ifdef HAVE_SYSLOG
#include <syslog.h>
#endif
27 28

#include "utils/guc.h"
29
#include "utils/guc_tables.h"
30

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


68 69 70
#ifndef PG_KRB_SRVTAB
#define PG_KRB_SRVTAB ""
#endif
B
 
Bruce Momjian 已提交
71 72 73
#ifndef PG_KRB_SRVNAM
#define PG_KRB_SRVNAM ""
#endif
74

75 76 77
#define CONFIG_FILENAME	"postgresql.conf"
#define HBA_FILENAME	"pg_hba.conf"
#define IDENT_FILENAME	"pg_ident.conf"
78

B
Bruce Momjian 已提交
79 80
#ifdef EXEC_BACKEND
#define CONFIG_EXEC_PARAMS "global/config_exec_params"
81
#define CONFIG_EXEC_PARAMS_NEW "global/config_exec_params.new"
B
Bruce Momjian 已提交
82
#endif
83

84 85 86 87 88 89 90
/* upper limit for GUC variables measured in kilobytes of memory */
#if SIZEOF_SIZE_T > 4
#define MAX_KILOBYTES	INT_MAX
#else
#define MAX_KILOBYTES	(INT_MAX / 1024)
#endif

91
/* XXX these should appear in other modules' header files */
92
extern bool Log_disconnections;
93
extern DLLIMPORT bool check_function_bodies;
B
Bruce Momjian 已提交
94 95
extern int	CommitDelay;
extern int	CommitSiblings;
96
extern char *default_tablespace;
97
extern bool	fullPageWrites;
98 99 100
#ifdef TRACE_SORT
extern bool	trace_sort;
#endif
101

102
static const char *assign_log_destination(const char *value,
B
Bruce Momjian 已提交
103
					   bool doit, GucSource source);
104

T
Tatsuo Ishii 已提交
105
#ifdef HAVE_SYSLOG
106
static int	syslog_facility = LOG_LOCAL0;
107

108 109 110
static const char *assign_syslog_facility(const char *facility,
				bool doit, GucSource source);
static const char *assign_syslog_ident(const char *ident,
111
				bool doit, GucSource source);
112
#endif
113

114 115 116
static const char *assign_defaultxactisolevel(const char *newval, bool doit,
						   GucSource source);
static const char *assign_log_min_messages(const char *newval, bool doit,
B
Bruce Momjian 已提交
117
						GucSource source);
118
static const char *assign_client_min_messages(const char *newval,
119
						   bool doit, GucSource source);
120
static const char *assign_min_error_statement(const char *newval, bool doit,
121
						   GucSource source);
122
static const char *assign_msglvl(int *var, const char *newval, bool doit,
B
Bruce Momjian 已提交
123
			  GucSource source);
124
static const char *assign_log_error_verbosity(const char *newval, bool doit,
125
						   GucSource source);
126
static const char *assign_log_statement(const char *newval, bool doit,
B
Bruce Momjian 已提交
127
					 GucSource source);
128
static const char *show_num_temp_buffers(void);
129
static bool assign_phony_autocommit(bool newval, bool doit, GucSource source);
130
static const char *assign_custom_variable_classes(const char *newval, bool doit,
B
Bruce Momjian 已提交
131
							   GucSource source);
132 133
static bool assign_stage_log_stats(bool newval, bool doit, GucSource source);
static bool assign_log_stats(bool newval, bool doit, GucSource source);
134
static bool assign_transaction_read_only(bool newval, bool doit, GucSource source);
135
static const char *assign_canonical_path(const char *newval, bool doit, GucSource source);
136

137 138 139 140 141 142
static bool assign_tcp_keepalives_idle(int newval, bool doit, GucSource source);
static bool assign_tcp_keepalives_interval(int newval, bool doit, GucSource source);
static bool assign_tcp_keepalives_count(int newval, bool doit, GucSource source);
static const char *show_tcp_keepalives_idle(void);
static const char *show_tcp_keepalives_interval(void);
static const char *show_tcp_keepalives_count(void);
143

144 145
/*
 * GUC option variables that are exported from this module
146
 */
147
#ifdef USE_ASSERT_CHECKING
B
Bruce Momjian 已提交
148
bool		assert_enabled = true;
149
#endif
B
Rename:  
Bruce Momjian 已提交
150
bool		log_duration = false;
B
Bruce Momjian 已提交
151 152 153 154
bool		Debug_print_plan = false;
bool		Debug_print_parse = false;
bool		Debug_print_rewritten = false;
bool		Debug_pretty_print = false;
155
bool		Explain_pretty_print = true;
156

B
Rename:  
Bruce Momjian 已提交
157 158 159 160
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 已提交
161
												 * three above together */
162
bool		log_btree_build_stats = false;
163

B
Bruce Momjian 已提交
164
bool		SQL_inheritance = true;
165

166 167
bool		Australian_timezones = false;

168
bool		Password_encryption = true;
169

170
bool		default_with_oids = false;
171

172
int			log_min_error_statement = PANIC;
173
int			log_min_messages = NOTICE;
174
int			client_min_messages = NOTICE;
175
int			log_min_duration_statement = -1;
176

177 178
int			num_temp_buffers = 1000;

179 180 181 182
char	   *ConfigFileName;
char	   *HbaFileName;
char	   *IdentFileName;
char	   *external_pid_file;
183

184 185 186
int         tcp_keepalives_idle;
int         tcp_keepalives_interval;
int         tcp_keepalives_count;
187

188 189 190 191 192
/*
 * 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.
 */
193
static char *client_min_messages_str;
194 195
static char *log_min_messages_str;
static char *log_error_verbosity_str;
196
static char *log_statement_str;
197
static char *log_min_error_statement_str;
198
static char *log_destination_string;
199 200
static char *syslog_facility_str;
static char *syslog_ident_str;
201
static bool phony_autocommit;
202
static bool session_auth_is_superuser;
203 204 205 206
static double phony_random_seed;
static char *client_encoding_string;
static char *datestyle_string;
static char *default_iso_level_string;
207 208
static char *locale_collate;
static char *locale_ctype;
209
static char *regex_flavor_string;
210
static char *server_encoding_string;
211
static char *server_version_string;
212 213
static char *timezone_string;
static char *XactIsoLevel_string;
214
static char *data_directory;
215
static char *custom_variable_classes;
216 217 218 219
static int	max_function_args;
static int	max_index_keys;
static int	max_identifier_length;
static int	block_size;
220
static bool	integer_datetimes;
221
static bool	standard_conforming_strings;
B
Bruce Momjian 已提交
222

223 224
/* should be static, but commands/variable.c needs to get at these */
char	   *role_string;
B
Bruce Momjian 已提交
225
char	   *session_authorization_string;
226

227

228
/*
229 230 231
 * Displayable names for context types (enum GucContext)
 *
 * Note: these strings are deliberately not localized.
232
 */
B
Bruce Momjian 已提交
233
const char *const GucContext_Names[] =
234
{
B
Bruce Momjian 已提交
235 236 237 238 239 240
	 /* PGC_INTERNAL */ "internal",
	 /* PGC_POSTMASTER */ "postmaster",
	 /* PGC_SIGHUP */ "sighup",
	 /* PGC_BACKEND */ "backend",
	 /* PGC_SUSET */ "superuser",
	 /* PGC_USERSET */ "user"
241 242 243 244 245 246
};

/*
 * Displayable names for source types (enum GucSource)
 *
 * Note: these strings are deliberately not localized.
B
Bruce Momjian 已提交
247 248
 */
const char *const GucSource_Names[] =
249
{
B
Bruce Momjian 已提交
250 251 252 253 254 255 256 257 258 259 260
	 /* PGC_S_DEFAULT */ "default",
	 /* PGC_S_ENV_VAR */ "environment variable",
	 /* PGC_S_FILE */ "configuration file",
	 /* PGC_S_ARGV */ "command line",
	 /* 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"
261 262 263 264 265 266 267 268
};

/*
 * Displayable names for the groupings defined in enum config_group
 */
const char *const config_group_names[] =
{
	/* UNGROUPED */
269
	gettext_noop("Ungrouped"),
270 271
	/* FILE_LOCATIONS */
	gettext_noop("File Locations"),
272
	/* CONN_AUTH */
273
	gettext_noop("Connections and Authentication"),
274
	/* CONN_AUTH_SETTINGS */
275
	gettext_noop("Connections and Authentication / Connection Settings"),
276
	/* CONN_AUTH_SECURITY */
277
	gettext_noop("Connections and Authentication / Security and Authentication"),
278
	/* RESOURCES */
279
	gettext_noop("Resource Usage"),
280
	/* RESOURCES_MEM */
281
	gettext_noop("Resource Usage / Memory"),
282
	/* RESOURCES_FSM */
283
	gettext_noop("Resource Usage / Free Space Map"),
284
	/* RESOURCES_KERNEL */
285
	gettext_noop("Resource Usage / Kernel Resources"),
286
	/* WAL */
287
	gettext_noop("Write-Ahead Log"),
288
	/* WAL_SETTINGS */
289
	gettext_noop("Write-Ahead Log / Settings"),
290
	/* WAL_CHECKPOINTS */
291
	gettext_noop("Write-Ahead Log / Checkpoints"),
292
	/* QUERY_TUNING */
293
	gettext_noop("Query Tuning"),
294
	/* QUERY_TUNING_METHOD */
295
	gettext_noop("Query Tuning / Planner Method Configuration"),
296
	/* QUERY_TUNING_COST */
297
	gettext_noop("Query Tuning / Planner Cost Constants"),
298
	/* QUERY_TUNING_GEQO */
299
	gettext_noop("Query Tuning / Genetic Query Optimizer"),
300
	/* QUERY_TUNING_OTHER */
301
	gettext_noop("Query Tuning / Other Planner Options"),
302
	/* LOGGING */
303
	gettext_noop("Reporting and Logging"),
304 305
	/* LOGGING_WHERE */
	gettext_noop("Reporting and Logging / Where to Log"),
306
	/* LOGGING_WHEN */
307
	gettext_noop("Reporting and Logging / When to Log"),
308
	/* LOGGING_WHAT */
309
	gettext_noop("Reporting and Logging / What to Log"),
310
	/* STATS */
311
	gettext_noop("Statistics"),
312
	/* STATS_MONITORING */
313
	gettext_noop("Statistics / Monitoring"),
314
	/* STATS_COLLECTOR */
315
	gettext_noop("Statistics / Query and Index Statistics Collector"),
316 317
	/* AUTOVACUUM */
	gettext_noop("Auto Vacuum"),
318
	/* CLIENT_CONN */
319
	gettext_noop("Client Connection Defaults"),
320
	/* CLIENT_CONN_STATEMENT */
321
	gettext_noop("Client Connection Defaults / Statement Behavior"),
322
	/* CLIENT_CONN_LOCALE */
323
	gettext_noop("Client Connection Defaults / Locale and Formatting"),
324
	/* CLIENT_CONN_OTHER */
325
	gettext_noop("Client Connection Defaults / Other Defaults"),
326
	/* LOCK_MANAGEMENT */
327
	gettext_noop("Lock Management"),
328
	/* COMPAT_OPTIONS */
329
	gettext_noop("Version and Platform Compatibility"),
330
	/* COMPAT_OPTIONS_PREVIOUS */
331
	gettext_noop("Version and Platform Compatibility / Previous PostgreSQL Versions"),
332
	/* COMPAT_OPTIONS_CLIENT */
333
	gettext_noop("Version and Platform Compatibility / Other Platforms and Clients"),
334 335 336 337
	/* PRESET_OPTIONS */
	gettext_noop("Preset Options"),
	/* CUSTOM_OPTIONS */
	gettext_noop("Customized Options"),
338
	/* DEVELOPER_OPTIONS */
339
	gettext_noop("Developer Options"),
340
	/* help_config wants this array to be null-terminated */
341 342 343
	NULL
};

344 345 346 347 348
/*
 * Displayable names for GUC variable types (enum config_type)
 *
 * Note: these strings are deliberately not localized.
 */
B
Bruce Momjian 已提交
349
const char *const config_type_names[] =
350
{
B
Bruce Momjian 已提交
351 352 353 354
	 /* PGC_BOOL */ "bool",
	 /* PGC_INT */ "integer",
	 /* PGC_REAL */ "real",
	 /* PGC_STRING */ "string"
355 356
};

357

358
/*
359 360 361 362
 * Contents of GUC tables
 *
 * See src/backend/utils/misc/README for design notes.
 *
363 364 365
 * TO ADD AN OPTION:
 *
 * 1. Declare a global variable of type bool, int, double, or char*
B
Bruce Momjian 已提交
366
 *	  and make use of it.
367 368
 *
 * 2. Decide at what times it's safe to set the option. See guc.h for
B
Bruce Momjian 已提交
369
 *	  details.
370 371
 *
 * 3. Decide on a name, a default value, upper and lower bounds (if
B
Bruce Momjian 已提交
372
 *	  applicable), etc.
373 374 375
 *
 * 4. Add a record below.
 *
376
 * 5. Add it to src/backend/utils/misc/postgresql.conf.sample, if
B
Bruce Momjian 已提交
377
 *	  appropriate
378
 *
379
 * 6. Add it to src/bin/psql/tab-complete.c, if it's a USERSET option.
380
 *
381
 * 7. Don't forget to document the option.
382 383
 *
 * 8. If it's a new GUC_LIST option you must edit pg_dumpall.c to ensure
B
Bruce Momjian 已提交
384
 *	  it is not single quoted at dump time.
385 386
 */

387

388
/******** option records follow ********/
389

390
static struct config_bool ConfigureNamesBool[] =
391
{
392
	{
393
		{"enable_seqscan", PGC_USERSET, QUERY_TUNING_METHOD,
394
			gettext_noop("Enables the planner's use of sequential-scan plans."),
395 396 397
			NULL
		},
		&enable_seqscan,
398
		true, NULL, NULL
399
	},
400
	{
401
		{"enable_indexscan", PGC_USERSET, QUERY_TUNING_METHOD,
402
			gettext_noop("Enables the planner's use of index-scan plans."),
403 404 405
			NULL
		},
		&enable_indexscan,
406
		true, NULL, NULL
407
	},
408 409 410 411 412 413 414 415
	{
		{"enable_bitmapscan", PGC_USERSET, QUERY_TUNING_METHOD,
			gettext_noop("Enables the planner's use of bitmap-scan plans."),
			NULL
		},
		&enable_bitmapscan,
		true, NULL, NULL
	},
416
	{
417
		{"enable_tidscan", PGC_USERSET, QUERY_TUNING_METHOD,
418
			gettext_noop("Enables the planner's use of TID scan plans."),
419 420 421
			NULL
		},
		&enable_tidscan,
422
		true, NULL, NULL
423 424
	},
	{
425
		{"enable_sort", PGC_USERSET, QUERY_TUNING_METHOD,
426
			gettext_noop("Enables the planner's use of explicit sort steps."),
427 428 429
			NULL
		},
		&enable_sort,
430
		true, NULL, NULL
431
	},
432
	{
433
		{"enable_hashagg", PGC_USERSET, QUERY_TUNING_METHOD,
434
			gettext_noop("Enables the planner's use of hashed aggregation plans."),
435 436 437
			NULL
		},
		&enable_hashagg,
438 439
		true, NULL, NULL
	},
440
	{
441
		{"enable_nestloop", PGC_USERSET, QUERY_TUNING_METHOD,
442
			gettext_noop("Enables the planner's use of nested-loop join plans."),
443 444 445
			NULL
		},
		&enable_nestloop,
446
		true, NULL, NULL
447 448
	},
	{
449
		{"enable_mergejoin", PGC_USERSET, QUERY_TUNING_METHOD,
450
			gettext_noop("Enables the planner's use of merge join plans."),
451 452 453
			NULL
		},
		&enable_mergejoin,
454
		true, NULL, NULL
455 456
	},
	{
457
		{"enable_hashjoin", PGC_USERSET, QUERY_TUNING_METHOD,
458
			gettext_noop("Enables the planner's use of hash join plans."),
459 460 461
			NULL
		},
		&enable_hashjoin,
462
		true, NULL, NULL
463
	},
464
	{
465 466 467 468
		{"constraint_exclusion", PGC_USERSET, QUERY_TUNING_OTHER,
			gettext_noop("Enables the planner to use constraints to limit table access."),
			gettext_noop("This prevents table access if the table constraints "
						 "guarantee that table access is necessary.")
469
		},
470
		&constraint_exclusion,
471 472
		false, NULL, NULL
	},
473
	{
474
		{"geqo", PGC_USERSET, QUERY_TUNING_GEQO,
475
			gettext_noop("Enables genetic query optimization."),
476
			gettext_noop("This algorithm attempts to do planning without "
477
						 "exhaustive searching.")
478 479
		},
		&enable_geqo,
480
		true, NULL, NULL
481
	},
482
	{
483 484
		/* Not for general use --- used by SET SESSION AUTHORIZATION */
		{"is_superuser", PGC_INTERNAL, UNGROUPED,
485
			gettext_noop("Shows whether the current user is a superuser."),
486 487 488
			NULL,
			GUC_REPORT | GUC_NO_SHOW_ALL | GUC_NO_RESET_ALL | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
489 490 491
		&session_auth_is_superuser,
		false, NULL, NULL
	},
492
	{
493
		{"ssl", PGC_POSTMASTER, CONN_AUTH_SECURITY,
494
			gettext_noop("Enables SSL connections."),
495 496 497
			NULL
		},
		&EnableSSL,
498
		false, NULL, NULL
499 500
	},
	{
501
		{"fsync", PGC_SIGHUP, WAL_SETTINGS,
502
			gettext_noop("Forces synchronization of updates to disk."),
503
			gettext_noop("The server will use the fsync() system call in several places to make "
504 505
						 "sure that updates are physically written to disk. This insures "
						 "that a database cluster will recover to a consistent state after "
506
						 "an operating system or hardware crash.")
507 508
		},
		&enableFsync,
509
		true, NULL, NULL
510
	},
511
	{
512
		{"zero_damaged_pages", PGC_SUSET, DEVELOPER_OPTIONS,
513
			gettext_noop("Continues processing past damaged page headers."),
514 515 516 517
			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 "
518
						 "behavior will destroy data, namely all the rows on the damaged page."),
519
			GUC_NOT_IN_SAMPLE
520 521
		},
		&zero_damaged_pages,
522 523
		false, NULL, NULL
	},
524 525 526 527 528 529 530 531 532 533 534 535
	{
		{"full_page_writes", PGC_SIGHUP, WAL_SETTINGS,
			gettext_noop("Writes full pages to WAL when first modified after a checkpoint."),
			gettext_noop("A page write in process during an operating system crash might be "
						 "only partially written to disk.  During recovery, the row changes"
						 "stored in WAL are not enough to recover.  This option writes "
						 "pages when first modified after a checkpoint to WAL so full recovery "
						 "is possible.")
		},
		&fullPageWrites,
		true, NULL, NULL
	},
536
	{
537
		{"silent_mode", PGC_POSTMASTER, LOGGING_WHEN,
538
			gettext_noop("Runs the server silently."),
539
			gettext_noop("If this parameter is set, the server will automatically run in the "
B
Bruce Momjian 已提交
540
			 "background and any controlling terminals are dissociated.")
541 542
		},
		&SilentMode,
543
		false, NULL, NULL
544 545
	},
	{
546
		{"log_connections", PGC_BACKEND, LOGGING_WHAT,
547
			gettext_noop("Logs each successful connection."),
548 549 550
			NULL
		},
		&Log_connections,
551
		false, NULL, NULL
552
	},
553 554
	{
		{"log_disconnections", PGC_BACKEND, LOGGING_WHAT,
P
Peter Eisentraut 已提交
555
			gettext_noop("Logs end of a session, including duration."),
B
Bruce Momjian 已提交
556
			NULL
557 558 559 560
		},
		&Log_disconnections,
		false, NULL, NULL
	},
561

562
#ifdef USE_ASSERT_CHECKING
563
	{
564
		{"debug_assertions", PGC_USERSET, DEVELOPER_OPTIONS,
565
			gettext_noop("Turns on various assertion checks."),
566
			gettext_noop("This is a debugging aid."),
567 568 569
			GUC_NOT_IN_SAMPLE
		},
		&assert_enabled,
570
		true, NULL, NULL
571
	},
572 573
#endif

574 575
	{
		/* currently undocumented, so don't show in SHOW ALL */
576
		{"exit_on_error", PGC_USERSET, UNGROUPED,
577
			gettext_noop("no description available"),
578 579 580 581
			NULL,
			GUC_NO_SHOW_ALL | GUC_NOT_IN_SAMPLE
		},
		&ExitOnAnyError,
582 583
		false, NULL, NULL
	},
584
	{
585 586
		{"log_duration", PGC_SUSET, LOGGING_WHAT,
			gettext_noop("Logs the duration of each completed SQL statement."),
587 588 589
			NULL
		},
		&log_duration,
590
		false, NULL, NULL
591 592
	},
	{
593
		{"debug_print_parse", PGC_USERSET, LOGGING_WHAT,
594
			gettext_noop("Prints the parse tree to the server log."),
595
			NULL
596 597
		},
		&Debug_print_parse,
598
		false, NULL, NULL
599 600
	},
	{
601
		{"debug_print_rewritten", PGC_USERSET, LOGGING_WHAT,
602
			gettext_noop("Prints the parse tree after rewriting to server log."),
603 604 605
			NULL
		},
		&Debug_print_rewritten,
606
		false, NULL, NULL
607 608
	},
	{
609
		{"debug_print_plan", PGC_USERSET, LOGGING_WHAT,
610
			gettext_noop("Prints the execution plan to server log."),
611 612 613
			NULL
		},
		&Debug_print_plan,
614
		false, NULL, NULL
615 616
	},
	{
617
		{"debug_pretty_print", PGC_USERSET, LOGGING_WHAT,
618
			gettext_noop("Indents parse and plan tree displays."),
619 620 621
			NULL
		},
		&Debug_pretty_print,
622
		false, NULL, NULL
623 624
	},
	{
625
		{"log_parser_stats", PGC_SUSET, STATS_MONITORING,
626
			gettext_noop("Writes parser performance statistics to the server log."),
627 628 629
			NULL
		},
		&log_parser_stats,
630
		false, assign_stage_log_stats, NULL
631 632
	},
	{
633
		{"log_planner_stats", PGC_SUSET, STATS_MONITORING,
634
			gettext_noop("Writes planner performance statistics to the server log."),
635 636 637
			NULL
		},
		&log_planner_stats,
638
		false, assign_stage_log_stats, NULL
639 640
	},
	{
641
		{"log_executor_stats", PGC_SUSET, STATS_MONITORING,
642
			gettext_noop("Writes executor performance statistics to the server log."),
643 644 645
			NULL
		},
		&log_executor_stats,
646
		false, assign_stage_log_stats, NULL
647 648
	},
	{
649
		{"log_statement_stats", PGC_SUSET, STATS_MONITORING,
650
			gettext_noop("Writes cumulative performance statistics to the server log."),
651 652 653
			NULL
		},
		&log_statement_stats,
654
		false, assign_log_stats, NULL
655
	},
656
#ifdef BTREE_BUILD_STATS
657
	{
658
		{"log_btree_build_stats", PGC_SUSET, DEVELOPER_OPTIONS,
659
			gettext_noop("no description available"),
660 661 662 663
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&log_btree_build_stats,
664
		false, NULL, NULL
665
	},
666 667
#endif

668
	{
669
		{"explain_pretty_print", PGC_USERSET, CLIENT_CONN_OTHER,
670
			gettext_noop("Uses the indented output format for EXPLAIN VERBOSE."),
671 672 673
			NULL
		},
		&Explain_pretty_print,
674
		true, NULL, NULL
675
	},
676
	{
677
		{"stats_start_collector", PGC_POSTMASTER, STATS_COLLECTOR,
678
			gettext_noop("Starts the server statistics-collection subprocess."),
679 680 681
			NULL
		},
		&pgstat_collect_startcollector,
682
		true, NULL, NULL
683 684
	},
	{
685
		{"stats_reset_on_server_start", PGC_POSTMASTER, STATS_COLLECTOR,
686
			gettext_noop("Zeroes collected statistics on server restart."),
687 688 689
			NULL
		},
		&pgstat_collect_resetonpmstart,
690
		false, NULL, NULL
691 692
	},
	{
693
		{"stats_command_string", PGC_SUSET, STATS_COLLECTOR,
694
			gettext_noop("Collects statistics about executing commands."),
695 696 697 698 699
			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,
700
		false, NULL, NULL
701 702
	},
	{
703
		{"stats_row_level", PGC_SUSET, STATS_COLLECTOR,
704
			gettext_noop("Collects row-level statistics on database activity."),
705 706 707
			NULL
		},
		&pgstat_collect_tuplelevel,
708
		false, NULL, NULL
709 710
	},
	{
711
		{"stats_block_level", PGC_SUSET, STATS_COLLECTOR,
712
			gettext_noop("Collects block-level statistics on database activity."),
713 714 715
			NULL
		},
		&pgstat_collect_blocklevel,
716
		false, NULL, NULL
717
	},
718

719 720 721 722 723 724 725 726 727
	{
		{"autovacuum", PGC_SIGHUP, AUTOVACUUM,
			gettext_noop("Starts the auto vacuum subprocess."),
			NULL
		},
		&autovacuum_start_daemon,
		false, NULL, NULL	 
	},

728
	{
729
		{"trace_notify", PGC_USERSET, DEVELOPER_OPTIONS,
730
			gettext_noop("Generates debugging output for LISTEN and NOTIFY."),
731 732 733 734
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&Trace_notify,
735
		false, NULL, NULL
736
	},
737 738

#ifdef LOCK_DEBUG
739
	{
740
		{"trace_locks", PGC_SUSET, DEVELOPER_OPTIONS,
741
			gettext_noop("no description available"),
742 743 744 745
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&Trace_locks,
746
		false, NULL, NULL
747 748
	},
	{
749
		{"trace_userlocks", PGC_SUSET, DEVELOPER_OPTIONS,
750
			gettext_noop("no description available"),
751 752 753 754
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&Trace_userlocks,
755
		false, NULL, NULL
756 757
	},
	{
758
		{"trace_lwlocks", PGC_SUSET, DEVELOPER_OPTIONS,
759
			gettext_noop("no description available"),
760 761 762 763
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&Trace_lwlocks,
764
		false, NULL, NULL
765 766
	},
	{
767
		{"debug_deadlocks", PGC_SUSET, DEVELOPER_OPTIONS,
768
			gettext_noop("no description available"),
769 770 771 772
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&Debug_deadlocks,
773
		false, NULL, NULL
774
	},
775 776
#endif

777
	{
778
		{"log_hostname", PGC_SIGHUP, LOGGING_WHAT,
779
			gettext_noop("Logs the host name in the connection logs."),
780 781 782
			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 "
783
			"setup it might impose a non-negligible performance penalty.")
784 785
		},
		&log_hostname,
786
		false, NULL, NULL
787 788
	},
	{
789
		{"sql_inheritance", PGC_USERSET, COMPAT_OPTIONS_PREVIOUS,
790
			gettext_noop("Causes subtables to be included by default in various commands."),
791
			NULL
792 793
		},
		&SQL_inheritance,
794
		true, NULL, NULL
795 796
	},
	{
797
		{"australian_timezones", PGC_USERSET, CLIENT_CONN_LOCALE,
798
			gettext_noop("Interprets ACST, CST, EST, and SAT as Australian time zones."),
799
			gettext_noop("Otherwise they are interpreted as North/South American "
800
						 "time zones and Saturday.")
801 802
		},
		&Australian_timezones,
803
		false, ClearDateCache, NULL
804 805
	},
	{
806
		{"password_encryption", PGC_USERSET, CONN_AUTH_SECURITY,
807
			gettext_noop("Encrypt passwords."),
808 809
			gettext_noop("When a password is specified in CREATE USER or "
			"ALTER USER without writing either ENCRYPTED or UNENCRYPTED, "
810
						 "this parameter determines whether the password is to be encrypted.")
811 812
		},
		&Password_encryption,
813
		true, NULL, NULL
814 815
	},
	{
816
		{"transform_null_equals", PGC_USERSET, COMPAT_OPTIONS_CLIENT,
817
			gettext_noop("Treats \"expr=NULL\" as \"expr IS NULL\"."),
818 819 820 821
			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 "
822
						 "return null (unknown).")
823 824
		},
		&Transform_null_equals,
825
		false, NULL, NULL
826
	},
827
	{
828
		{"db_user_namespace", PGC_SIGHUP, CONN_AUTH_SECURITY,
829
			gettext_noop("Enables per-database user names."),
830 831 832
			NULL
		},
		&Db_user_namespace,
833 834
		false, NULL, NULL
	},
835
	{
836 837
		/* only here for backwards compatibility */
		{"autocommit", PGC_USERSET, CLIENT_CONN_STATEMENT,
838 839
			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."),
840 841 842
			GUC_NO_SHOW_ALL | GUC_NOT_IN_SAMPLE
		},
		&phony_autocommit,
843
		true, assign_phony_autocommit, NULL
844
	},
845
	{
846
		{"default_transaction_read_only", PGC_USERSET, CLIENT_CONN_STATEMENT,
847
			gettext_noop("Sets the default read-only status of new transactions."),
848 849 850
			NULL
		},
		&DefaultXactReadOnly,
851 852 853
		false, NULL, NULL
	},
	{
854
		{"transaction_read_only", PGC_USERSET, CLIENT_CONN_STATEMENT,
855
			gettext_noop("Sets the current transaction's read-only status."),
856 857 858 859
			NULL,
			GUC_NO_RESET_ALL | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&XactReadOnly,
860
		false, assign_transaction_read_only, NULL
861
	},
862
	{
863
		{"add_missing_from", PGC_USERSET, COMPAT_OPTIONS_PREVIOUS,
864
			gettext_noop("Automatically adds missing table references to FROM clauses."),
865 866 867
			NULL
		},
		&add_missing_from,
868
		false, NULL, NULL
869
	},
870 871
	{
		{"check_function_bodies", PGC_USERSET, CLIENT_CONN_STATEMENT,
872
			gettext_noop("Check function bodies during CREATE FUNCTION."),
873 874 875 876 877
			NULL
		},
		&check_function_bodies,
		true, NULL, NULL
	},
878 879
	{
		{"default_with_oids", PGC_USERSET, COMPAT_OPTIONS_PREVIOUS,
880
			gettext_noop("Create new tables with OIDs by default."),
B
Bruce Momjian 已提交
881
			NULL
882 883
		},
		&default_with_oids,
884
		false, NULL, NULL
885
	},
886
	{
887
		{"redirect_stderr", PGC_POSTMASTER, LOGGING_WHERE,
P
Peter Eisentraut 已提交
888
			gettext_noop("Start a subprocess to capture stderr output into log files."),
B
Bruce Momjian 已提交
889
			NULL
890
		},
891
		&Redirect_stderr,
892 893
		false, NULL, NULL
	},
894 895
	{
		{"log_truncate_on_rotation", PGC_SIGHUP, LOGGING_WHERE,
P
Peter Eisentraut 已提交
896
			gettext_noop("Truncate existing log files of same name during log rotation."),
897 898 899 900 901
			NULL
		},
		&Log_truncate_on_rotation,
		false, NULL, NULL
	},
902

903 904 905 906 907 908 909 910 911 912 913 914
#ifdef TRACE_SORT
	{
		{"trace_sort", PGC_USERSET, DEVELOPER_OPTIONS,
			gettext_noop("Emit information about resource usage in sorting."),
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&trace_sort,
		false, NULL, NULL
	},
#endif

915 916 917 918 919 920 921 922 923 924 925 926
#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

927
	{
928
		{"integer_datetimes", PGC_INTERNAL, PRESET_OPTIONS,
929
			gettext_noop("Datetimes are integer based."),
930
			NULL,
931
			GUC_REPORT | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
932 933 934 935 936 937 938 939 940
		},
		&integer_datetimes,
#ifdef HAVE_INT64_TIMESTAMP
		true, NULL, NULL
#else
		false, NULL, NULL
#endif
	},

B
 
Bruce Momjian 已提交
941 942
	{
		{"krb_caseins_users", PGC_POSTMASTER, CONN_AUTH_SECURITY,
943
			gettext_noop("Sets whether Kerberos user names should be treated as case-insensitive."),
B
 
Bruce Momjian 已提交
944 945 946 947 948 949
			NULL
		},
		&pg_krb_caseins_users,
		false, NULL, NULL
	},

950 951
	{
		{"escape_string_warning", PGC_USERSET, COMPAT_OPTIONS_PREVIOUS,
952
			gettext_noop("Warn about backslash escapes in ordinary string literals."),
953 954 955 956 957 958 959
			NULL
		},
		&escape_string_warning,
		false, NULL, NULL
	},

	{
960
		{"standard_conforming_strings", PGC_INTERNAL, PRESET_OPTIONS,
961
			gettext_noop("'...' strings treat backslashes literally."),
962 963 964
			NULL,
			GUC_REPORT | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
965
		&standard_conforming_strings,
966 967 968
		false, NULL, NULL
	},

969
	/* End-of-list marker */
970
	{
971 972
		{NULL, 0, 0, NULL, NULL}, NULL, false, NULL, NULL
	}
973 974 975
};


976
static struct config_int ConfigureNamesInt[] =
977
{
978
	{
979
		{"default_statistics_target", PGC_USERSET, QUERY_TUNING_OTHER,
980
			gettext_noop("Sets the default statistics target."),
981
			gettext_noop("This applies to table columns that have not had a "
B
Bruce Momjian 已提交
982
			"column-specific target set via ALTER TABLE SET STATISTICS.")
983 984
		},
		&default_statistics_target,
985 986
		10, 1, 1000, NULL, NULL
	},
987
	{
988
		{"from_collapse_limit", PGC_USERSET, QUERY_TUNING_OTHER,
989 990
			gettext_noop("Sets the FROM-list size beyond which subqueries are not "
						 "collapsed."),
991
			gettext_noop("The planner will merge subqueries into upper "
992
			"queries if the resulting FROM list would have no more than "
993
						 "this many items.")
994 995
		},
		&from_collapse_limit,
996 997 998
		8, 1, INT_MAX, NULL, NULL
	},
	{
999
		{"join_collapse_limit", PGC_USERSET, QUERY_TUNING_OTHER,
1000 1001
			gettext_noop("Sets the FROM-list size beyond which JOIN constructs are not "
						 "flattened."),
1002 1003
			gettext_noop("The planner will flatten explicit inner JOIN "
						 "constructs into lists of FROM items whenever a list of no more "
1004
						 "than this many items would result.")
1005 1006
		},
		&join_collapse_limit,
1007 1008 1009
		8, 1, INT_MAX, NULL, NULL
	},
	{
1010
		{"geqo_threshold", PGC_USERSET, QUERY_TUNING_GEQO,
1011
			gettext_noop("Sets the threshold of FROM items beyond which GEQO is used."),
1012 1013 1014
			NULL
		},
		&geqo_threshold,
1015
		12, 2, INT_MAX, NULL, NULL
1016
	},
1017
	{
1018 1019
		{"geqo_effort", PGC_USERSET, QUERY_TUNING_GEQO,
			gettext_noop("GEQO: effort is used to set the default for other GEQO parameters."),
1020 1021
			NULL
		},
1022 1023 1024 1025 1026 1027 1028 1029
		&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.")
		},
1030
		&Geqo_pool_size,
1031
		0, 0, INT_MAX, NULL, NULL
1032 1033
	},
	{
1034
		{"geqo_generations", PGC_USERSET, QUERY_TUNING_GEQO,
1035
			gettext_noop("GEQO: number of iterations of the algorithm."),
1036
			gettext_noop("Zero selects a suitable default value.")
1037 1038
		},
		&Geqo_generations,
1039
		0, 0, INT_MAX, NULL, NULL
1040 1041 1042
	},

	{
1043
		{"deadlock_timeout", PGC_SIGHUP, LOCK_MANAGEMENT,
1044
			gettext_noop("The time in milliseconds to wait on lock before checking for deadlock."),
1045 1046 1047
			NULL
		},
		&DeadlockTimeout,
1048
		1000, 0, INT_MAX, NULL, NULL
1049
	},
1050 1051

	/*
B
Bruce Momjian 已提交
1052 1053
	 * Note: There is some postprocessing done in PostmasterMain() to make
	 * sure the buffers are at least twice the number of backends, so the
1054 1055 1056
	 * constraints here are partially unused. Similarly, the superuser
	 * reserved number is checked to ensure it is less than the max
	 * backends number.
1057 1058 1059 1060
	 *
	 * MaxBackends is limited to INT_MAX/4 because some places compute
	 * 4*MaxBackends without any overflow check.  Likewise we have to
	 * limit NBuffers to INT_MAX/2.
1061
	 */
1062
	{
1063
		{"max_connections", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
1064
			gettext_noop("Sets the maximum number of concurrent connections."),
1065 1066 1067
			NULL
		},
		&MaxBackends,
1068
		100, 1, INT_MAX / 4, NULL, NULL
1069
	},
1070

1071
	{
1072
		{"superuser_reserved_connections", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
1073
			gettext_noop("Sets the number of connection slots reserved for superusers."),
1074 1075 1076
			NULL
		},
		&ReservedBackends,
1077
		2, 0, INT_MAX / 4, NULL, NULL
1078 1079
	},

1080
	{
1081
		{"shared_buffers", PGC_POSTMASTER, RESOURCES_MEM,
1082
			gettext_noop("Sets the number of shared memory buffers used by the server."),
1083 1084 1085
			NULL
		},
		&NBuffers,
1086
		1000, 16, INT_MAX / 2, NULL, NULL
1087
	},
1088

1089 1090 1091 1092 1093 1094
	{
		{"temp_buffers", PGC_USERSET, RESOURCES_MEM,
			gettext_noop("Sets the maximum number of temporary buffers used by each session."),
			NULL
		},
		&num_temp_buffers,
1095
		1000, 100, INT_MAX / 2, NULL, show_num_temp_buffers
1096 1097
	},

1098
	{
1099
		{"port", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
1100
			gettext_noop("Sets the TCP port the server listens on."),
1101 1102 1103
			NULL
		},
		&PostPortNumber,
1104
		DEF_PGPORT, 1, 65535, NULL, NULL
1105
	},
1106

1107
	{
1108
		{"unix_socket_permissions", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
1109
			gettext_noop("Sets the access permissions of the Unix-domain socket."),
1110
			gettext_noop("Unix-domain sockets use the usual Unix file system "
1111
						 "permission set. The parameter value is expected to be an numeric mode "
1112
						 "specification in the form accepted by the chmod and umask system "
1113 1114 1115 1116
						 "calls. (To use the customary octal format the number must start with "
						 "a 0 (zero).)")
		},
		&Unix_socket_permissions,
1117
		0777, 0000, 0777, NULL, NULL
1118
	},
1119

1120
	{
1121 1122 1123
		{"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 "
B
Bruce Momjian 已提交
1124
					 "sort operation and hash table before switching to "
1125
						 "temporary disk files.")
1126
		},
1127
		&work_mem,
1128
		1024, 8 * BLCKSZ / 1024, MAX_KILOBYTES, NULL, NULL
1129
	},
1130

1131
	{
1132 1133 1134
		{"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.")
1135
		},
1136
		&maintenance_work_mem,
1137
		16384, 1024, MAX_KILOBYTES, NULL, NULL
1138
	},
1139

1140 1141 1142 1143 1144 1145
	{
		{"max_stack_depth", PGC_SUSET, RESOURCES_MEM,
			gettext_noop("Sets the maximum stack depth, in kilobytes."),
			NULL
		},
		&max_stack_depth,
1146
		2048, 100, MAX_KILOBYTES, assign_max_stack_depth, NULL
1147 1148
	},

J
Jan Wieck 已提交
1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182 1183 1184 1185
	{
		{"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
	},

	{
1186 1187
		{"vacuum_cost_delay", PGC_USERSET, RESOURCES,
			gettext_noop("Vacuum cost delay in milliseconds."),
J
Jan Wieck 已提交
1188 1189
			NULL
		},
1190
		&VacuumCostDelay,
1191
		0, 0, 1000, NULL, NULL
J
Jan Wieck 已提交
1192 1193
	},

1194 1195 1196 1197 1198 1199 1200 1201 1202 1203 1204 1205 1206 1207 1208 1209 1210 1211
	{
		{"autovacuum_vacuum_cost_delay", PGC_SIGHUP, AUTOVACUUM,
			gettext_noop("Vacuum cost delay in milliseconds, for autovacuum."),
			NULL
		},
		&autovacuum_vac_cost_delay,
		-1, -1, 1000, NULL, NULL
	},

	{
		{"autovacuum_vacuum_cost_limit", PGC_SIGHUP, AUTOVACUUM,
			gettext_noop("Vacuum cost amount available before napping, for autovacuum."),
			NULL
		},
		&autovacuum_vac_cost_limit,
		-1, -1, 10000, NULL, NULL
	},

1212
	{
1213
		{"max_files_per_process", PGC_POSTMASTER, RESOURCES_KERNEL,
1214
			gettext_noop("Sets the maximum number of simultaneously open files for each server process."),
1215 1216 1217
			NULL
		},
		&max_files_per_process,
1218
		1000, 25, INT_MAX, NULL, NULL
1219
	},
1220

1221 1222 1223 1224 1225 1226
	{
		{"max_prepared_transactions", PGC_POSTMASTER, RESOURCES,
			gettext_noop("Sets the maximum number of simultaneously prepared transactions."),
			NULL
		},
		&max_prepared_xacts,
1227
		5, 0, INT_MAX, NULL, NULL
1228 1229
	},

1230
#ifdef LOCK_DEBUG
1231
	{
1232
		{"trace_lock_oidmin", PGC_SUSET, DEVELOPER_OPTIONS,
1233
			gettext_noop("no description available"),
1234 1235 1236 1237
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&Trace_lock_oidmin,
1238
		FirstNormalObjectId, 0, INT_MAX, NULL, NULL
1239 1240
	},
	{
1241
		{"trace_lock_table", PGC_SUSET, DEVELOPER_OPTIONS,
1242
			gettext_noop("no description available"),
1243 1244 1245 1246
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&Trace_lock_table,
1247
		0, 0, INT_MAX, NULL, NULL
1248
	},
1249 1250
#endif

1251
	{
1252
		{"statement_timeout", PGC_USERSET, CLIENT_CONN_STATEMENT,
1253
			gettext_noop("Sets the maximum allowed duration (in milliseconds) of any statement."),
1254
			gettext_noop("A value of 0 turns off the timeout.")
1255 1256
		},
		&StatementTimeout,
1257 1258 1259
		0, 0, INT_MAX, NULL, NULL
	},

1260
	{
1261
		{"max_fsm_relations", PGC_POSTMASTER, RESOURCES_FSM,
1262
			gettext_noop("Sets the maximum number of tables and indexes for which free space is tracked."),
1263 1264 1265
			NULL
		},
		&MaxFSMRelations,
1266
		1000, 100, INT_MAX, NULL, NULL
1267 1268
	},
	{
1269
		{"max_fsm_pages", PGC_POSTMASTER, RESOURCES_FSM,
1270
			gettext_noop("Sets the maximum number of disk pages for which free space is tracked."),
1271 1272 1273
			NULL
		},
		&MaxFSMPages,
1274
		20000, 1000, INT_MAX, NULL, NULL
1275
	},
1276

1277
	{
1278
		{"max_locks_per_transaction", PGC_POSTMASTER, LOCK_MANAGEMENT,
1279
			gettext_noop("Sets the maximum number of locks per transaction."),
1280 1281
			gettext_noop("The shared lock table is sized on the assumption that "
						 "at most max_locks_per_transaction * max_connections distinct "
1282
						 "objects will need to be locked at any one time.")
1283 1284
		},
		&max_locks_per_xact,
1285
		64, 10, INT_MAX, NULL, NULL
1286
	},
1287

1288
	{
1289
		{"authentication_timeout", PGC_SIGHUP, CONN_AUTH_SECURITY,
1290
			gettext_noop("Sets the maximum time in seconds to complete client authentication."),
1291 1292 1293
			NULL
		},
		&AuthenticationTimeout,
1294
		60, 1, 600, NULL, NULL
1295
	},
1296

1297
	{
1298 1299
		/* Not for general use */
		{"pre_auth_delay", PGC_SIGHUP, DEVELOPER_OPTIONS,
1300
			gettext_noop("no description available"),
1301 1302 1303 1304
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&PreAuthDelay,
1305
		0, 0, 60, NULL, NULL
1306
	},
1307

1308
	{
1309
		{"checkpoint_segments", PGC_SIGHUP, WAL_CHECKPOINTS,
1310
			gettext_noop("Sets the maximum distance in log segments between automatic WAL checkpoints."),
1311 1312 1313
			NULL
		},
		&CheckPointSegments,
1314
		3, 1, INT_MAX, NULL, NULL
1315
	},
T
Tom Lane 已提交
1316

1317
	{
1318
		{"checkpoint_timeout", PGC_SIGHUP, WAL_CHECKPOINTS,
1319
			gettext_noop("Sets the maximum time in seconds between automatic WAL checkpoints."),
1320 1321 1322
			NULL
		},
		&CheckPointTimeout,
1323
		300, 30, 3600, NULL, NULL
1324
	},
V
Vadim B. Mikheev 已提交
1325

1326
	{
1327
		{"checkpoint_warning", PGC_SIGHUP, WAL_CHECKPOINTS,
1328 1329
			gettext_noop("Logs if filling of checkpoint segments happens more "
						 "frequently than this (in seconds)."),
1330
			gettext_noop("Write a message to the server log if checkpoints "
1331 1332 1333 1334
						 "caused by the filling of checkpoint segment files happens more "
						 "frequently than this number of seconds. Zero turns off the warning.")
		},
		&CheckPointWarning,
1335 1336 1337
		30, 0, INT_MAX, NULL, NULL
	},

1338
	{
1339
		{"wal_buffers", PGC_POSTMASTER, WAL_SETTINGS,
1340
			gettext_noop("Sets the number of disk-page buffers in shared memory for WAL."),
1341 1342 1343
			NULL
		},
		&XLOGbuffers,
1344
		8, 4, INT_MAX, NULL, NULL
1345
	},
V
Vadim B. Mikheev 已提交
1346

1347
	{
1348
		{"commit_delay", PGC_USERSET, WAL_CHECKPOINTS,
1349 1350
			gettext_noop("Sets the delay in microseconds between transaction commit and "
						 "flushing WAL to disk."),
1351 1352 1353
			NULL
		},
		&CommitDelay,
1354
		0, 0, 100000, NULL, NULL
1355
	},
V
Vadim B. Mikheev 已提交
1356

1357
	{
1358
		{"commit_siblings", PGC_USERSET, WAL_CHECKPOINTS,
1359 1360
			gettext_noop("Sets the minimum concurrent open transactions before performing "
						 "commit_delay."),
1361 1362 1363
			NULL
		},
		&CommitSiblings,
1364
		5, 1, 1000, NULL, NULL
1365
	},
1366

1367
	{
1368
		{"extra_float_digits", PGC_USERSET, CLIENT_CONN_LOCALE,
1369
			gettext_noop("Sets the number of digits displayed for floating-point values."),
1370
			gettext_noop("This affects real, double precision, and geometric data types. "
1371
						 "The parameter value is added to the standard number of digits "
1372
						 "(FLT_DIG or DBL_DIG as appropriate).")
1373 1374
		},
		&extra_float_digits,
1375 1376 1377
		0, -15, 2, NULL, NULL
	},

B
Bruce Momjian 已提交
1378
	{
1379
		{"log_min_duration_statement", PGC_SUSET, LOGGING_WHEN,
1380 1381 1382
			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).")
1383 1384
		},
		&log_min_duration_statement,
1385
		-1, -1, INT_MAX / 1000, NULL, NULL
B
Bruce Momjian 已提交
1386 1387
	},

J
Jan Wieck 已提交
1388 1389 1390 1391 1392 1393
	{
		{"bgwriter_delay", PGC_SIGHUP, RESOURCES,
			gettext_noop("Background writer sleep time between rounds in milliseconds"),
			NULL
		},
		&BgWriterDelay,
1394
		200, 10, 10000, NULL, NULL
J
Jan Wieck 已提交
1395 1396 1397
	},

	{
1398
		{"bgwriter_lru_maxpages", PGC_SIGHUP, RESOURCES,
1399
			gettext_noop("Background writer maximum number of LRU pages to flush per round"),
J
Jan Wieck 已提交
1400 1401
			NULL
		},
1402 1403
		&bgwriter_lru_maxpages,
		5, 0, 1000, NULL, NULL
J
Jan Wieck 已提交
1404 1405 1406
	},

	{
1407
		{"bgwriter_all_maxpages", PGC_SIGHUP, RESOURCES,
1408
			gettext_noop("Background writer maximum number of all pages to flush per round"),
J
Jan Wieck 已提交
1409 1410
			NULL
		},
1411 1412
		&bgwriter_all_maxpages,
		5, 0, 1000, NULL, NULL
J
Jan Wieck 已提交
1413 1414
	},

1415 1416
	{
		{"log_rotation_age", PGC_SIGHUP, LOGGING_WHERE,
P
Peter Eisentraut 已提交
1417
			gettext_noop("Automatic log file rotation will occur after N minutes"),
B
Bruce Momjian 已提交
1418
			NULL
1419 1420
		},
		&Log_RotationAge,
B
Bruce Momjian 已提交
1421
		HOURS_PER_DAY * MINS_PER_HOUR, 0, INT_MAX / MINS_PER_HOUR, NULL, NULL
1422 1423 1424 1425
	},

	{
		{"log_rotation_size", PGC_SIGHUP, LOGGING_WHERE,
P
Peter Eisentraut 已提交
1426
			gettext_noop("Automatic log file rotation will occur after N kilobytes"),
B
Bruce Momjian 已提交
1427
			NULL
1428 1429
		},
		&Log_RotationSize,
1430
		10 * 1024, 0, INT_MAX / 1024, NULL, NULL
1431 1432
	},

1433
	{
1434
		{"max_function_args", PGC_INTERNAL, PRESET_OPTIONS,
P
Peter Eisentraut 已提交
1435
			gettext_noop("Shows the maximum number of function arguments."),
1436 1437 1438 1439 1440 1441 1442 1443
			NULL,
			GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&max_function_args,
		FUNC_MAX_ARGS, FUNC_MAX_ARGS, FUNC_MAX_ARGS, NULL, NULL
	},

	{
1444
		{"max_index_keys", PGC_INTERNAL, PRESET_OPTIONS,
P
Peter Eisentraut 已提交
1445
			gettext_noop("Shows the maximum number of index keys."),
1446 1447 1448 1449 1450 1451 1452 1453
			NULL,
			GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&max_index_keys,
		INDEX_MAX_KEYS, INDEX_MAX_KEYS, INDEX_MAX_KEYS, NULL, NULL
	},

	{
1454
		{"max_identifier_length", PGC_INTERNAL, PRESET_OPTIONS,
1455 1456 1457 1458 1459 1460 1461 1462 1463
			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
	},

	{
1464
		{"block_size", PGC_INTERNAL, PRESET_OPTIONS,
1465 1466 1467 1468 1469 1470 1471 1472
			gettext_noop("Shows size of a disk block"),
			NULL,
			GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&block_size,
		BLCKSZ, BLCKSZ, BLCKSZ, NULL, NULL
	},

1473 1474 1475 1476 1477 1478
	{
		{"autovacuum_naptime", PGC_SIGHUP, AUTOVACUUM,
			gettext_noop("Time to sleep between autovacuum runs, in seconds."),
			NULL
		},
		&autovacuum_naptime,
1479
		60, 1, INT_MAX, NULL, NULL
1480 1481 1482 1483 1484 1485 1486 1487 1488 1489 1490 1491 1492 1493 1494 1495 1496 1497
	},
	{
		{"autovacuum_vacuum_threshold", PGC_SIGHUP, AUTOVACUUM,
			gettext_noop("Minimum number of tuple updates or deletes prior to vacuum."),
			NULL
		},
		&autovacuum_vac_thresh,
		1000, 0, INT_MAX, NULL, NULL
	},
	{
		{"autovacuum_analyze_threshold", PGC_SIGHUP, AUTOVACUUM,
			gettext_noop("Minimum number of tuple inserts, updates or deletes prior to analyze."),
			NULL
		},
		&autovacuum_anl_thresh,
		500, 0, INT_MAX, NULL, NULL
	},

1498 1499 1500 1501 1502 1503 1504 1505 1506 1507 1508 1509 1510 1511 1512 1513 1514 1515 1516 1517 1518 1519 1520 1521 1522 1523 1524 1525 1526
	{
		{"tcp_keepalives_idle", PGC_USERSET, CLIENT_CONN_OTHER,
		     gettext_noop("Seconds between issuing TCP keepalives."),
		     gettext_noop("A value of 0 uses the system default."),
		},		
		&tcp_keepalives_idle,
		0, 0, INT_MAX, assign_tcp_keepalives_idle, show_tcp_keepalives_idle
	},

	{
		{"tcp_keepalives_interval", PGC_USERSET, CLIENT_CONN_OTHER,
		     gettext_noop("Seconds between TCP keepalive retransmits."),
		     gettext_noop("A value of 0 uses the system default."),
		},		
		&tcp_keepalives_interval,
		0, 0, INT_MAX, assign_tcp_keepalives_interval, show_tcp_keepalives_interval
	},

	{
		{"tcp_keepalives_count", PGC_USERSET, CLIENT_CONN_OTHER,
		     gettext_noop("Maximum number of TCP keepalive retransmits."),
		     gettext_noop("This controls the number of consecutive keepalive retransmits that can be "
						  "lost before a connection is considered dead. A value of 0 uses the "
						  "system default."),
		},		
		&tcp_keepalives_count,
		0, 0, INT_MAX, assign_tcp_keepalives_count, show_tcp_keepalives_count
	},

1527
	/* End-of-list marker */
1528
	{
1529
		{NULL, 0, 0, NULL, NULL}, NULL, 0, 0, 0, NULL, NULL
1530
	}
1531 1532 1533
};


1534
static struct config_real ConfigureNamesReal[] =
1535
{
1536
	{
1537
		{"effective_cache_size", PGC_USERSET, QUERY_TUNING_COST,
1538
			gettext_noop("Sets the planner's assumption about size of the disk cache."),
1539 1540 1541 1542 1543
			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,
1544
		DEFAULT_EFFECTIVE_CACHE_SIZE, 1, DBL_MAX, NULL, NULL
1545
	},
1546
	{
1547
		{"random_page_cost", PGC_USERSET, QUERY_TUNING_COST,
1548 1549
			gettext_noop("Sets the planner's estimate of the cost of a nonsequentially "
						 "fetched disk page."),
1550 1551 1552 1553 1554 1555
			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,
1556
		DEFAULT_RANDOM_PAGE_COST, 0, DBL_MAX, NULL, NULL
1557 1558
	},
	{
1559
		{"cpu_tuple_cost", PGC_USERSET, QUERY_TUNING_COST,
1560
			gettext_noop("Sets the planner's estimate of the cost of processing each tuple (row)."),
1561 1562 1563 1564
			gettext_noop("This is measured as a fraction of the cost of a "
						 "sequential page fetch.")
		},
		&cpu_tuple_cost,
1565
		DEFAULT_CPU_TUPLE_COST, 0, DBL_MAX, NULL, NULL
1566 1567
	},
	{
1568
		{"cpu_index_tuple_cost", PGC_USERSET, QUERY_TUNING_COST,
1569 1570
			gettext_noop("Sets the planner's estimate of processing cost for each "
						 "index tuple (row) during index scan."),
1571 1572 1573 1574
			gettext_noop("This is measured as a fraction of the cost of a "
						 "sequential page fetch.")
		},
		&cpu_index_tuple_cost,
1575
		DEFAULT_CPU_INDEX_TUPLE_COST, 0, DBL_MAX, NULL, NULL
1576 1577
	},
	{
1578
		{"cpu_operator_cost", PGC_USERSET, QUERY_TUNING_COST,
1579
			gettext_noop("Sets the planner's estimate of processing cost of each operator in WHERE."),
1580 1581 1582 1583
			gettext_noop("This is measured as a fraction of the cost of a sequential "
						 "page fetch.")
		},
		&cpu_operator_cost,
1584
		DEFAULT_CPU_OPERATOR_COST, 0, DBL_MAX, NULL, NULL
1585 1586 1587
	},

	{
1588
		{"geqo_selection_bias", PGC_USERSET, QUERY_TUNING_GEQO,
1589
			gettext_noop("GEQO: selective pressure within the population."),
1590 1591 1592
			NULL
		},
		&Geqo_selection_bias,
1593 1594
		DEFAULT_GEQO_SELECTION_BIAS, MIN_GEQO_SELECTION_BIAS,
		MAX_GEQO_SELECTION_BIAS, NULL, NULL
1595 1596
	},

1597 1598 1599 1600 1601 1602 1603 1604 1605 1606 1607 1608 1609 1610 1611 1612 1613 1614
	{
		{"bgwriter_lru_percent", PGC_SIGHUP, RESOURCES,
			gettext_noop("Background writer percentage of LRU buffers to flush per round"),
			NULL
		},
		&bgwriter_lru_percent,
		1.0, 0.0, 100.0, NULL, NULL
	},

	{
		{"bgwriter_all_percent", PGC_SIGHUP, RESOURCES,
			gettext_noop("Background writer percentage of all buffers to flush per round"),
			NULL
		},
		&bgwriter_all_percent,
		0.333, 0.0, 100.0, NULL, NULL
	},

1615
	{
1616
		{"seed", PGC_USERSET, UNGROUPED,
1617
			gettext_noop("Sets the seed for random-number generation."),
1618 1619 1620
			NULL,
			GUC_NO_SHOW_ALL | GUC_NO_RESET_ALL | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
1621 1622 1623 1624
		&phony_random_seed,
		0.5, 0.0, 1.0, assign_random_seed, show_random_seed
	},

1625 1626 1627 1628 1629 1630 1631 1632 1633 1634 1635 1636 1637 1638 1639 1640 1641
	{
		{"autovacuum_vacuum_scale_factor", PGC_SIGHUP, AUTOVACUUM,
			gettext_noop("Number of tuple updates or deletes prior to vacuum as a fraction of reltuples."),
			NULL
		},
		&autovacuum_vac_scale,
		0.4, 0.0, 100.0, NULL, NULL
	},
	{
		{"autovacuum_analyze_scale_factor", PGC_SIGHUP, AUTOVACUUM,
			gettext_noop("Number of tuple inserts, updates or deletes prior to analyze as a fraction of reltuples."),
			NULL
		},
		&autovacuum_anl_scale,
		0.2, 0.0, 100.0, NULL, NULL
	},

1642
	/* End-of-list marker */
1643
	{
1644
		{NULL, 0, 0, NULL, NULL}, NULL, 0.0, 0.0, 0.0, NULL, NULL
1645
	}
1646 1647 1648
};


1649
static struct config_string ConfigureNamesString[] =
1650
{
B
Bruce Momjian 已提交
1651 1652 1653 1654 1655 1656 1657 1658
	{
		{"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
	},
1659

1660
	{
1661
		{"client_encoding", PGC_USERSET, CLIENT_CONN_LOCALE,
1662
			gettext_noop("Sets the client's character set encoding."),
1663 1664 1665
			NULL,
			GUC_REPORT
		},
1666
		&client_encoding_string,
1667
		"SQL_ASCII", assign_client_encoding, NULL
1668 1669
	},

1670
	{
1671
		{"client_min_messages", PGC_USERSET, LOGGING_WHEN,
1672
			gettext_noop("Sets the message levels that are sent to the client."),
1673 1674 1675 1676 1677 1678
			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,
1679
		"notice", assign_client_min_messages, NULL
1680
	},
1681

1682
	{
1683
		{"log_min_messages", PGC_SUSET, LOGGING_WHEN,
1684
			gettext_noop("Sets the message levels that are logged."),
1685 1686
			gettext_noop("Valid values are DEBUG5, DEBUG4, DEBUG3, DEBUG2, DEBUG1, "
						 "INFO, NOTICE, WARNING, ERROR, LOG, FATAL, and PANIC. Each level "
1687
						 "includes all the levels that follow it.")
1688 1689
		},
		&log_min_messages_str,
1690 1691 1692 1693
		"notice", assign_log_min_messages, NULL
	},

	{
1694
		{"log_error_verbosity", PGC_SUSET, LOGGING_WHEN,
1695
			gettext_noop("Sets the verbosity of logged messages."),
1696
			gettext_noop("Valid values are \"terse\", \"default\", and \"verbose\".")
1697 1698
		},
		&log_error_verbosity_str,
1699 1700
		"default", assign_log_error_verbosity, NULL
	},
1701
	{
1702
		{"log_statement", PGC_SUSET, LOGGING_WHAT,
1703
			gettext_noop("Sets the type of statements logged."),
1704
			gettext_noop("Valid values are \"none\", \"ddl\", \"mod\", and \"all\".")
1705 1706 1707 1708
		},
		&log_statement_str,
		"none", assign_log_statement, NULL
	},
1709

1710
	{
1711
		{"log_min_error_statement", PGC_SUSET, LOGGING_WHEN,
1712
			gettext_noop("Causes all statements generating error at or above this level to be logged."),
1713
			gettext_noop("All SQL statements that cause an error of the "
1714
						 "specified level or a higher level are logged.")
1715 1716
		},
		&log_min_error_statement_str,
1717
		"panic", assign_min_error_statement, NULL
1718 1719
	},

B
Add:  
Bruce Momjian 已提交
1720 1721
	{
		{"log_line_prefix", PGC_SIGHUP, LOGGING_WHAT,
B
Bruce Momjian 已提交
1722 1723
			gettext_noop("Controls information prefixed to each log line"),
			gettext_noop("if blank no prefix is used")
B
Add:  
Bruce Momjian 已提交
1724 1725 1726 1727 1728 1729
		},
		&Log_line_prefix,
		"", NULL, NULL
	},


1730
	{
1731
		{"DateStyle", PGC_USERSET, CLIENT_CONN_LOCALE,
1732
			gettext_noop("Sets the display format for date and time values."),
1733
			gettext_noop("Also controls interpretation of ambiguous "
1734
						 "date inputs."),
1735 1736
			GUC_LIST_INPUT | GUC_REPORT
		},
1737
		&datestyle_string,
1738
		"ISO, MDY", assign_datestyle, NULL
1739
	},
1740

1741 1742 1743 1744 1745 1746 1747 1748 1749
	{
		{"default_tablespace", PGC_USERSET, CLIENT_CONN_STATEMENT,
			gettext_noop("Sets the default tablespace to create tables and indexes in."),
			gettext_noop("An empty string selects the database's default tablespace.")
		},
		&default_tablespace,
		"", assign_default_tablespace, NULL
	},

1750
	{
1751
		{"default_transaction_isolation", PGC_USERSET, CLIENT_CONN_STATEMENT,
1752
			gettext_noop("Sets the transaction isolation level of each new transaction."),
1753
			gettext_noop("Each SQL transaction has an isolation level, which "
B
Bruce Momjian 已提交
1754
						 "can be either \"read uncommitted\", \"read committed\", \"repeatable read\", or \"serializable\".")
1755 1756
		},
		&default_iso_level_string,
1757
		"read committed", assign_defaultxactisolevel, NULL
1758 1759
	},

1760
	{
1761
		{"dynamic_library_path", PGC_SUSET, CLIENT_CONN_OTHER,
1762
			gettext_noop("Sets the path for dynamically loadable modules."),
1763
			gettext_noop("If a dynamically loadable module needs to be opened and "
1764
						 "the specified name does not have a directory component (i.e., the "
1765
						 "name does not contain a slash), the system will search this path for "
1766 1767
						 "the specified file."),
			GUC_SUPERUSER_ONLY
1768 1769
		},
		&Dynamic_library_path,
1770
		"$libdir", NULL, NULL
1771 1772 1773
	},

	{
1774
		{"krb_server_keyfile", PGC_POSTMASTER, CONN_AUTH_SECURITY,
1775
			gettext_noop("Sets the location of the Kerberos server key file."),
1776 1777
			NULL,
			GUC_SUPERUSER_ONLY
1778 1779
		},
		&pg_krb_server_keyfile,
1780
		PG_KRB_SRVTAB, NULL, NULL
1781
	},
1782

B
 
Bruce Momjian 已提交
1783 1784 1785 1786 1787 1788 1789 1790 1791
	{
		{"krb_srvname", PGC_POSTMASTER, CONN_AUTH_SECURITY,
			gettext_noop("Sets the name of the Kerberos service."),
			NULL
		},
		&pg_krb_srvnam,
		PG_KRB_SRVNAM, NULL, NULL
	},

1792 1793 1794 1795 1796 1797 1798 1799 1800
	{
		{"krb_server_hostname", PGC_POSTMASTER, CONN_AUTH_SECURITY,
			gettext_noop("Sets the hostname of the Kerberos server."),
			NULL
		},
		&pg_krb_server_hostname,
		NULL, NULL, NULL
	},

1801
	{
1802 1803
		{"bonjour_name", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
			gettext_noop("Sets the Bonjour broadcast service name."),
1804 1805
			NULL
		},
1806
		&bonjour_name,
1807 1808 1809
		"", NULL, NULL
	},

1810 1811
	/* See main.c about why defaults for LC_foo are not all alike */

1812
	{
1813
		{"lc_collate", PGC_INTERNAL, CLIENT_CONN_LOCALE,
1814
			gettext_noop("Shows the collation order locale."),
1815 1816 1817 1818
			NULL,
			GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&locale_collate,
1819 1820 1821 1822
		"C", NULL, NULL
	},

	{
1823
		{"lc_ctype", PGC_INTERNAL, CLIENT_CONN_LOCALE,
1824
			gettext_noop("Shows the character classification and case conversion locale."),
1825 1826 1827 1828
			NULL,
			GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&locale_ctype,
1829 1830 1831
		"C", NULL, NULL
	},

1832
	{
1833
		{"lc_messages", PGC_SUSET, CLIENT_CONN_LOCALE,
1834
			gettext_noop("Sets the language in which messages are displayed."),
1835 1836 1837
			NULL
		},
		&locale_messages,
1838 1839 1840 1841
		"", locale_messages_assign, NULL
	},

	{
1842
		{"lc_monetary", PGC_USERSET, CLIENT_CONN_LOCALE,
1843
			gettext_noop("Sets the locale for formatting monetary amounts."),
1844 1845 1846
			NULL
		},
		&locale_monetary,
1847
		"C", locale_monetary_assign, NULL
1848 1849 1850
	},

	{
1851
		{"lc_numeric", PGC_USERSET, CLIENT_CONN_LOCALE,
1852
			gettext_noop("Sets the locale for formatting numbers."),
1853 1854 1855
			NULL
		},
		&locale_numeric,
1856
		"C", locale_numeric_assign, NULL
1857 1858 1859
	},

	{
1860
		{"lc_time", PGC_USERSET, CLIENT_CONN_LOCALE,
1861
			gettext_noop("Sets the locale for formatting date and time values."),
1862 1863 1864
			NULL
		},
		&locale_time,
1865
		"C", locale_time_assign, NULL
1866 1867
	},

1868
	{
1869
		{"preload_libraries", PGC_POSTMASTER, RESOURCES_KERNEL,
1870
			gettext_noop("Lists shared libraries to preload into server."),
1871
			NULL,
1872
			GUC_LIST_INPUT | GUC_LIST_QUOTE | GUC_SUPERUSER_ONLY
1873
		},
1874
		&preload_libraries_string,
1875
		"", NULL, NULL
1876 1877
	},

1878
	{
1879
		{"regex_flavor", PGC_USERSET, COMPAT_OPTIONS_PREVIOUS,
1880
			gettext_noop("Sets the regular expression \"flavor\"."),
1881
			gettext_noop("This can be set to advanced, extended, or basic.")
1882 1883
		},
		&regex_flavor_string,
1884 1885 1886
		"advanced", assign_regex_flavor, NULL
	},

1887
	{
1888
		{"search_path", PGC_USERSET, CLIENT_CONN_STATEMENT,
1889
			gettext_noop("Sets the schema search order for names that are not schema-qualified."),
1890 1891 1892
			NULL,
			GUC_LIST_INPUT | GUC_LIST_QUOTE
		},
1893 1894
		&namespace_search_path,
		"$user,public", assign_search_path, NULL
1895 1896 1897
	},

	{
1898 1899
		/* Can't be set in postgresql.conf */
		{"server_encoding", PGC_INTERNAL, CLIENT_CONN_LOCALE,
1900
			gettext_noop("Sets the server (database) character set encoding."),
1901
			NULL,
1902
			GUC_REPORT | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
1903
		},
1904 1905 1906 1907 1908
		&server_encoding_string,
		"SQL_ASCII", NULL, NULL
	},

	{
1909
		/* Can't be set in postgresql.conf */
1910
		{"server_version", PGC_INTERNAL, PRESET_OPTIONS,
1911
			gettext_noop("Shows the server version."),
1912 1913 1914
			NULL,
			GUC_REPORT | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
1915 1916
		&server_version_string,
		PG_VERSION, NULL, NULL
1917 1918
	},

1919 1920 1921 1922 1923 1924 1925 1926 1927 1928 1929
	{
		/* Not for general use --- used by SET ROLE */
		{"role", PGC_USERSET, UNGROUPED,
			gettext_noop("Sets the current role."),
			NULL,
			GUC_NO_SHOW_ALL | GUC_NO_RESET_ALL | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&role_string,
		"none", assign_role, show_role
	},

1930
	{
1931 1932
		/* Not for general use --- used by SET SESSION AUTHORIZATION */
		{"session_authorization", PGC_USERSET, UNGROUPED,
1933
			gettext_noop("Sets the session user name."),
1934
			NULL,
1935
			GUC_REPORT | GUC_NO_SHOW_ALL | GUC_NO_RESET_ALL | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
1936
		},
1937 1938
		&session_authorization_string,
		NULL, assign_session_authorization, show_session_authorization
1939 1940
	},

1941
	{
1942
		{"log_destination", PGC_SIGHUP, LOGGING_WHERE,
B
Bruce Momjian 已提交
1943
			gettext_noop("Sets the destination for server log output."),
P
Peter Eisentraut 已提交
1944 1945
			gettext_noop("Valid values are combinations of \"stderr\", \"syslog\", "
						 "and \"eventlog\", depending on the platform."),
B
Bruce Momjian 已提交
1946
			GUC_LIST_INPUT
1947 1948 1949 1950
		},
		&log_destination_string,
		"stderr", assign_log_destination, NULL
	},
1951 1952
	{
		{"log_directory", PGC_SIGHUP, LOGGING_WHERE,
1953
			gettext_noop("Sets the destination directory for log files."),
1954
			gettext_noop("May be specified as relative to the data directory "
1955 1956
						 "or as absolute path."),
			GUC_SUPERUSER_ONLY
1957 1958
		},
		&Log_directory,
1959
		"pg_log", assign_canonical_path, NULL
1960 1961
	},
	{
1962 1963
		{"log_filename", PGC_SIGHUP, LOGGING_WHERE,
			gettext_noop("Sets the file name pattern for log files."),
1964 1965
			NULL,
			GUC_SUPERUSER_ONLY
1966
		},
1967 1968
		&Log_filename,
		"postgresql-%Y-%m-%d_%H%M%S.log", NULL, NULL
1969
	},
1970

T
Tatsuo Ishii 已提交
1971
#ifdef HAVE_SYSLOG
1972
	{
1973
		{"syslog_facility", PGC_SIGHUP, LOGGING_WHERE,
1974
			gettext_noop("Sets the syslog \"facility\" to be used when syslog enabled."),
1975 1976
			gettext_noop("Valid values are LOCAL0, LOCAL1, LOCAL2, LOCAL3, "
						 "LOCAL4, LOCAL5, LOCAL6, LOCAL7.")
1977
		},
1978 1979
		&syslog_facility_str,
		"LOCAL0", assign_syslog_facility, NULL
1980 1981
	},
	{
1982 1983 1984
		{"syslog_ident", PGC_SIGHUP, LOGGING_WHERE,
			gettext_noop("Sets the program name used to identify PostgreSQL "
						 "messages in syslog."),
1985 1986
			NULL
		},
1987 1988
		&syslog_ident_str,
		"postgres", assign_syslog_ident, NULL
1989
	},
1990
#endif
1991

1992
	{
1993
		{"TimeZone", PGC_USERSET, CLIENT_CONN_LOCALE,
1994
			gettext_noop("Sets the time zone for displaying and interpreting time stamps."),
1995 1996
			NULL,
			GUC_REPORT
1997 1998
		},
		&timezone_string,
1999 2000 2001 2002
		"UNKNOWN", assign_timezone, show_timezone
	},

	{
2003
		{"transaction_isolation", PGC_USERSET, CLIENT_CONN_STATEMENT,
2004
			gettext_noop("Sets the current transaction's isolation level."),
2005 2006 2007
			NULL,
			GUC_NO_RESET_ALL | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
2008 2009 2010 2011 2012
		&XactIsoLevel_string,
		NULL, assign_XactIsoLevel, show_XactIsoLevel
	},

	{
2013
		{"unix_socket_group", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
2014
			gettext_noop("Sets the owning group of the Unix-domain socket."),
2015 2016 2017 2018
			gettext_noop("(The owning user of the socket is always the user "
						 "that starts the server.)")
		},
		&Unix_socket_group,
2019
		"", NULL, NULL
2020
	},
2021

2022
	{
2023
		{"unix_socket_directory", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
2024
			gettext_noop("Sets the directory where the Unix-domain socket will be created."),
2025 2026
			NULL,
			GUC_SUPERUSER_ONLY
2027 2028
		},
		&UnixSocketDir,
2029
		"", assign_canonical_path, NULL
2030
	},
2031

2032
	{
2033
		{"listen_addresses", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
2034 2035 2036
			gettext_noop("Sets the host name or IP address(es) to listen to."),
			NULL,
			GUC_LIST_INPUT
2037
		},
2038 2039
		&ListenAddresses,
		"localhost", NULL, NULL
2040
	},
2041

2042
	{
2043
		{"wal_sync_method", PGC_SIGHUP, WAL_SETTINGS,
2044
			gettext_noop("Selects the method used for forcing WAL updates out to disk."),
2045 2046 2047
			NULL
		},
		&XLOG_sync_method,
2048
		XLOG_sync_method_default, assign_xlog_sync_method, NULL
2049
	},
2050

2051
	{
2052
		{"custom_variable_classes", PGC_SIGHUP, CUSTOM_OPTIONS,
2053
			gettext_noop("Sets the list of known custom variable classes."),
2054 2055 2056 2057 2058 2059 2060
			NULL,
			GUC_LIST_INPUT | GUC_LIST_QUOTE
		},
		&custom_variable_classes,
		NULL, assign_custom_variable_classes, NULL
	},

2061
	{
2062
		{"data_directory", PGC_POSTMASTER, FILE_LOCATIONS,
P
Peter Eisentraut 已提交
2063
		 gettext_noop("Sets the server's data directory."),
2064 2065
		 NULL,
		 GUC_SUPERUSER_ONLY
2066
		},
2067 2068
		&data_directory,
		NULL, NULL, NULL
2069 2070 2071
	},

	{
2072
		{"config_file", PGC_POSTMASTER, FILE_LOCATIONS,
P
Peter Eisentraut 已提交
2073
		 gettext_noop("Sets the server's main configuration file."),
2074
		 NULL,
2075
		 GUC_DISALLOW_IN_FILE | GUC_SUPERUSER_ONLY
2076 2077 2078 2079 2080 2081 2082 2083
		},
		&ConfigFileName,
		NULL, NULL, NULL
	},

	{
		{"hba_file", PGC_POSTMASTER, FILE_LOCATIONS,
		 gettext_noop("Sets the server's \"hba\" configuration file"),
2084 2085
		 NULL,
		 GUC_SUPERUSER_ONLY
2086
		},
2087 2088
		&HbaFileName,
		NULL, NULL, NULL
2089 2090 2091
	},

	{
2092 2093
		{"ident_file", PGC_POSTMASTER, FILE_LOCATIONS,
		 gettext_noop("Sets the server's \"ident\" configuration file"),
2094 2095
		 NULL,
		 GUC_SUPERUSER_ONLY
2096
		},
2097 2098
		&IdentFileName,
		NULL, NULL, NULL
2099 2100 2101
	},

	{
2102
		{"external_pid_file", PGC_POSTMASTER, FILE_LOCATIONS,
P
Peter Eisentraut 已提交
2103
		 gettext_noop("Writes the postmaster PID to the specified file."),
2104 2105
		 NULL,
		 GUC_SUPERUSER_ONLY
2106
		},
2107
		&external_pid_file,
2108
		NULL, assign_canonical_path, NULL
2109 2110
	},

2111
	/* End-of-list marker */
2112
	{
2113
		{NULL, 0, 0, NULL, NULL}, NULL, NULL, NULL, NULL
2114
	}
2115 2116 2117
};


2118
/******** end of options list ********/
2119

B
Bruce Momjian 已提交
2120

2121 2122 2123 2124 2125 2126
/*
 * 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.
 */
B
Bruce Momjian 已提交
2127
static const char *const map_old_guc_names[] = {
2128 2129 2130 2131 2132 2133
	"sort_mem", "work_mem",
	"vacuum_mem", "maintenance_work_mem",
	NULL
};


2134
/*
2135
 * Actual lookup of variables is done through this single, sorted array.
2136
 */
2137 2138
static struct config_generic **guc_variables;

2139
/* Current number of variables contained in the vector */
B
Bruce Momjian 已提交
2140
static int	num_guc_variables;
2141

2142
/* Vector capacity */
B
Bruce Momjian 已提交
2143
static int	size_guc_variables;
2144

2145

2146
static bool guc_dirty;			/* TRUE if need to do commit/abort work */
2147

2148 2149
static bool reporting_enabled;	/* TRUE to enable GUC_REPORT */

2150

B
Bruce Momjian 已提交
2151
static int	guc_var_compare(const void *a, const void *b);
2152
static int	guc_name_compare(const char *namea, const char *nameb);
B
Bruce Momjian 已提交
2153
static void push_old_value(struct config_generic * gconf);
2154
static void ReportGUCOption(struct config_generic * record);
2155 2156
static void ShowGUCConfigOption(const char *name, DestReceiver *dest);
static void ShowAllGUCConfig(DestReceiver *dest);
B
Bruce Momjian 已提交
2157
static char *_ShowOption(struct config_generic * record);
2158

2159

2160 2161 2162 2163 2164 2165
/*
 * Some infrastructure for checking malloc/strdup/realloc calls
 */
static void *
guc_malloc(int elevel, size_t size)
{
B
Bruce Momjian 已提交
2166
	void	   *data;
2167 2168 2169 2170 2171 2172 2173 2174 2175 2176 2177 2178

	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)
{
B
Bruce Momjian 已提交
2179
	void	   *data;
2180 2181 2182 2183 2184 2185 2186 2187 2188 2189 2190 2191

	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)
{
B
Bruce Momjian 已提交
2192
	char	   *data;
2193 2194 2195 2196 2197 2198 2199 2200 2201 2202

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


2203 2204 2205 2206 2207 2208
/*
 * 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
B
Bruce Momjian 已提交
2209
set_string_field(struct config_string * conf, char **field, char *newval)
2210
{
B
Bruce Momjian 已提交
2211 2212
	char	   *oldval = *field;
	GucStack   *stack;
2213 2214 2215 2216 2217 2218 2219 2220 2221 2222 2223 2224 2225 2226 2227 2228 2229 2230 2231 2232 2233 2234 2235 2236 2237

	/* 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
B
Bruce Momjian 已提交
2238
string_field_used(struct config_string * conf, char *strval)
2239
{
B
Bruce Momjian 已提交
2240
	GucStack   *stack;
2241 2242 2243 2244 2245 2246 2247 2248 2249 2250 2251 2252 2253 2254 2255 2256 2257

	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)
2258 2259 2260
{
	return guc_variables;
}
2261

2262

2263
/*
B
Bruce Momjian 已提交
2264
 * Build the sorted array.	This is split out so that it could be
2265 2266
 * re-executed after startup (eg, we could allow loadable modules to
 * add vars, and then we'd need to re-sort).
2267
 */
2268
void
2269
build_guc_variables(void)
2270
{
B
Bruce Momjian 已提交
2271
	int			size_vars;
2272 2273
	int			num_vars = 0;
	struct config_generic **guc_vars;
B
Bruce Momjian 已提交
2274
	int			i;
2275

2276
	for (i = 0; ConfigureNamesBool[i].gen.name; i++)
2277 2278 2279
	{
		struct config_bool *conf = &ConfigureNamesBool[i];

2280 2281 2282
		/* Rather than requiring vartype to be filled in by hand, do this: */
		conf->gen.vartype = PGC_BOOL;
		num_vars++;
2283
	}
2284

2285
	for (i = 0; ConfigureNamesInt[i].gen.name; i++)
2286 2287 2288
	{
		struct config_int *conf = &ConfigureNamesInt[i];

2289 2290
		conf->gen.vartype = PGC_INT;
		num_vars++;
2291
	}
2292

2293
	for (i = 0; ConfigureNamesReal[i].gen.name; i++)
2294 2295 2296
	{
		struct config_real *conf = &ConfigureNamesReal[i];

2297 2298
		conf->gen.vartype = PGC_REAL;
		num_vars++;
2299
	}
2300

2301
	for (i = 0; ConfigureNamesString[i].gen.name; i++)
2302
	{
2303
		struct config_string *conf = &ConfigureNamesString[i];
2304

2305 2306
		conf->gen.vartype = PGC_STRING;
		num_vars++;
2307 2308
	}

B
Bruce Momjian 已提交
2309 2310
	/*
	 * Create table with 20% slack
2311 2312 2313
	 */
	size_vars = num_vars + num_vars / 4;

2314
	guc_vars = (struct config_generic **)
2315
		guc_malloc(FATAL, size_vars * sizeof(struct config_generic *));
2316

2317
	num_vars = 0;
2318

2319
	for (i = 0; ConfigureNamesBool[i].gen.name; i++)
B
Bruce Momjian 已提交
2320
		guc_vars[num_vars++] = &ConfigureNamesBool[i].gen;
2321

2322
	for (i = 0; ConfigureNamesInt[i].gen.name; i++)
B
Bruce Momjian 已提交
2323
		guc_vars[num_vars++] = &ConfigureNamesInt[i].gen;
2324

2325
	for (i = 0; ConfigureNamesReal[i].gen.name; i++)
B
Bruce Momjian 已提交
2326
		guc_vars[num_vars++] = &ConfigureNamesReal[i].gen;
2327

2328
	for (i = 0; ConfigureNamesString[i].gen.name; i++)
B
Bruce Momjian 已提交
2329
		guc_vars[num_vars++] = &ConfigureNamesString[i].gen;
2330

2331 2332 2333 2334
	if (guc_variables)
		free(guc_variables);
	guc_variables = guc_vars;
	num_guc_variables = num_vars;
2335
	size_guc_variables = size_vars;
B
Bruce Momjian 已提交
2336 2337
	qsort((void *) guc_variables, num_guc_variables,
		  sizeof(struct config_generic *), guc_var_compare);
2338 2339
}

2340 2341 2342
static bool
is_custom_class(const char *name, int dotPos)
{
B
Bruce Momjian 已提交
2343
	/*
2344
	 * assign_custom_variable_classes() has made sure no empty
2345 2346
	 * identifiers or whitespace exists in the variable
	 */
B
Bruce Momjian 已提交
2347
	bool		result = false;
2348
	const char *ccs = GetConfigOption("custom_variable_classes");
B
Bruce Momjian 已提交
2349 2350

	if (ccs != NULL)
2351 2352
	{
		const char *start = ccs;
B
Bruce Momjian 已提交
2353 2354

		for (;; ++ccs)
2355
		{
B
Bruce Momjian 已提交
2356 2357 2358
			int			c = *ccs;

			if (c == 0 || c == ',')
2359
			{
B
Bruce Momjian 已提交
2360
				if (dotPos == ccs - start && strncmp(start, name, dotPos) == 0)
2361 2362 2363 2364
				{
					result = true;
					break;
				}
B
Bruce Momjian 已提交
2365
				if (c == 0)
2366 2367 2368 2369 2370 2371 2372 2373 2374 2375 2376 2377
					break;
				start = ccs + 1;
			}
		}
	}
	return result;
}

/*
 * Add a new GUC variable to the list of known variables. The
 * list is expanded if needed.
 */
2378
static bool
B
Bruce Momjian 已提交
2379
add_guc_variable(struct config_generic * var, int elevel)
2380
{
B
Bruce Momjian 已提交
2381
	if (num_guc_variables + 1 >= size_guc_variables)
2382
	{
B
Bruce Momjian 已提交
2383 2384
		/*
		 * Increase the vector by 25%
2385
		 */
B
Bruce Momjian 已提交
2386 2387
		int			size_vars = size_guc_variables + size_guc_variables / 4;
		struct config_generic **guc_vars;
2388

B
Bruce Momjian 已提交
2389
		if (size_vars == 0)
2390
		{
2391
			size_vars = 100;
B
Bruce Momjian 已提交
2392 2393
			guc_vars = (struct config_generic **)
				guc_malloc(elevel, size_vars * sizeof(struct config_generic *));
2394 2395
		}
		else
2396
		{
B
Bruce Momjian 已提交
2397 2398
			guc_vars = (struct config_generic **)
				guc_realloc(elevel, guc_variables, size_vars * sizeof(struct config_generic *));
2399 2400
		}

B
Bruce Momjian 已提交
2401
		if (guc_vars == NULL)
2402 2403
			return false;		/* out of memory */

2404 2405 2406 2407
		guc_variables = guc_vars;
		size_guc_variables = size_vars;
	}
	guc_variables[num_guc_variables++] = var;
B
Bruce Momjian 已提交
2408 2409
	qsort((void *) guc_variables, num_guc_variables,
		  sizeof(struct config_generic *), guc_var_compare);
2410
	return true;
2411 2412 2413
}

/*
2414
 * Create and add a placeholder variable. It's presumed to belong
2415 2416
 * to a valid custom variable class at this point.
 */
B
Bruce Momjian 已提交
2417
static struct config_string *
2418
add_placeholder_variable(const char *name, int elevel)
2419
{
B
Bruce Momjian 已提交
2420 2421 2422
	size_t		sz = sizeof(struct config_string) + sizeof(char *);
	struct config_string *var;
	struct config_generic *gen;
2423

B
Bruce Momjian 已提交
2424 2425
	var = (struct config_string *) guc_malloc(elevel, sz);
	if (var == NULL)
2426 2427 2428
		return NULL;

	gen = &var->gen;
2429 2430
	memset(var, 0, sz);

2431
	gen->name = guc_strdup(elevel, name);
B
Bruce Momjian 已提交
2432
	if (gen->name == NULL)
2433 2434 2435 2436 2437
	{
		free(var);
		return NULL;
	}

B
Bruce Momjian 已提交
2438 2439
	gen->context = PGC_USERSET;
	gen->group = CUSTOM_OPTIONS;
2440
	gen->short_desc = "GUC placeholder variable";
B
Bruce Momjian 已提交
2441 2442
	gen->flags = GUC_NO_SHOW_ALL | GUC_NOT_IN_SAMPLE | GUC_CUSTOM_PLACEHOLDER;
	gen->vartype = PGC_STRING;
2443

B
Bruce Momjian 已提交
2444 2445 2446 2447 2448
	/*
	 * The char* is allocated at the end of the struct since we have no
	 * 'static' place to point to.
	 */
	var->variable = (char **) (var + 1);
2449

B
Bruce Momjian 已提交
2450
	if (!add_guc_variable((struct config_generic *) var, elevel))
2451 2452 2453 2454 2455 2456
	{
		free((void *) gen->name);
		free(var);
		return NULL;
	}

2457 2458
	return var;
}
2459 2460

/*
2461 2462
 * Look up option NAME. If it exists, return a pointer to its record,
 * else return NULL.
2463
 */
2464
static struct config_generic *
2465
find_option(const char *name, int elevel)
2466
{
2467
	const char *dot;
2468 2469
	const char **key = &name;
	struct config_generic **res;
2470
	int			i;
2471

2472
	Assert(name);
2473

2474
	/*
2475
	 * By equating const char ** with struct config_generic *, we are
2476 2477
	 * assuming the name field is first in config_generic.
	 */
B
Bruce Momjian 已提交
2478 2479 2480 2481 2482
	res = (struct config_generic **) bsearch((void *) &key,
											 (void *) guc_variables,
											 num_guc_variables,
										 sizeof(struct config_generic *),
											 guc_var_compare);
2483 2484
	if (res)
		return *res;
2485 2486

	/*
B
Bruce Momjian 已提交
2487
	 * See if the name is an obsolete name for a variable.	We assume that
2488 2489 2490 2491 2492 2493
	 * 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)
B
Bruce Momjian 已提交
2494
			return find_option(map_old_guc_names[i + 1], elevel);
2495 2496
	}

2497 2498
	/*
	 * Check if the name is qualified, and if so, check if the qualifier
2499 2500 2501
	 * maps to a custom variable class.
	 */
	dot = strchr(name, GUC_QUALIFIER_SEPARATOR);
B
Bruce Momjian 已提交
2502
	if (dot != NULL && is_custom_class(name, dot - name))
2503
		/* Add a placeholder variable for this name */
B
Bruce Momjian 已提交
2504
		return (struct config_generic *) add_placeholder_variable(name, elevel);
2505

2506
	/* Unknown name */
2507 2508
	return NULL;
}
2509 2510 2511


/*
2512
 * comparator for qsorting and bsearching guc_variables array
2513
 */
2514 2515
static int
guc_var_compare(const void *a, const void *b)
2516
{
2517 2518
	struct config_generic *confa = *(struct config_generic **) a;
	struct config_generic *confb = *(struct config_generic **) b;
2519

2520 2521 2522 2523 2524 2525 2526
	return guc_name_compare(confa->name, confb->name);
}


static int
guc_name_compare(const char *namea, const char *nameb)
{
2527 2528 2529
	/*
	 * The temptation to use strcasecmp() here must be resisted, because
	 * the array ordering has to remain stable across setlocale() calls.
2530
	 * So, build our own with a simple ASCII-only downcasing.
2531
	 */
2532 2533 2534 2535 2536 2537 2538 2539 2540 2541 2542
	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;
2543
	}
2544 2545 2546 2547 2548
	if (*namea)
		return 1;				/* a is longer */
	if (*nameb)
		return -1;				/* b is longer */
	return 0;
2549
}
2550 2551 2552


/*
2553
 * Initialize GUC options during program startup.
2554 2555 2556
 *
 * Note that we cannot read the config file yet, since we have not yet
 * processed command-line switches.
2557
 */
2558 2559
void
InitializeGUCOptions(void)
2560
{
2561 2562
	int			i;
	char	   *env;
2563

2564 2565 2566 2567
	/*
	 * Build sorted array of all GUC variables.
	 */
	build_guc_variables();
2568

2569
	/*
2570 2571
	 * Load all variables with their compiled-in defaults, and initialize
	 * status fields as needed.
2572
	 */
2573
	for (i = 0; i < num_guc_variables; i++)
2574
	{
2575
		struct config_generic *gconf = guc_variables[i];
2576

2577 2578 2579 2580
		gconf->status = 0;
		gconf->reset_source = PGC_S_DEFAULT;
		gconf->tentative_source = PGC_S_DEFAULT;
		gconf->source = PGC_S_DEFAULT;
2581
		gconf->stack = NULL;
2582 2583 2584 2585

		switch (gconf->vartype)
		{
			case PGC_BOOL:
B
Bruce Momjian 已提交
2586 2587
				{
					struct config_bool *conf = (struct config_bool *) gconf;
2588

B
Bruce Momjian 已提交
2589
					if (conf->assign_hook)
2590 2591
						if (!(*conf->assign_hook) (conf->reset_val, true,
												   PGC_S_DEFAULT))
2592 2593
							elog(FATAL, "failed to initialize %s to %d",
								 conf->gen.name, (int) conf->reset_val);
B
Bruce Momjian 已提交
2594 2595 2596
					*conf->variable = conf->reset_val;
					break;
				}
2597
			case PGC_INT:
B
Bruce Momjian 已提交
2598 2599
				{
					struct config_int *conf = (struct config_int *) gconf;
2600

B
Bruce Momjian 已提交
2601 2602 2603
					Assert(conf->reset_val >= conf->min);
					Assert(conf->reset_val <= conf->max);
					if (conf->assign_hook)
2604 2605
						if (!(*conf->assign_hook) (conf->reset_val, true,
												   PGC_S_DEFAULT))
2606 2607
							elog(FATAL, "failed to initialize %s to %d",
								 conf->gen.name, conf->reset_val);
B
Bruce Momjian 已提交
2608 2609 2610
					*conf->variable = conf->reset_val;
					break;
				}
2611 2612
			case PGC_REAL:
				{
B
Bruce Momjian 已提交
2613 2614 2615 2616 2617
					struct config_real *conf = (struct config_real *) gconf;

					Assert(conf->reset_val >= conf->min);
					Assert(conf->reset_val <= conf->max);
					if (conf->assign_hook)
2618 2619
						if (!(*conf->assign_hook) (conf->reset_val, true,
												   PGC_S_DEFAULT))
2620 2621
							elog(FATAL, "failed to initialize %s to %g",
								 conf->gen.name, conf->reset_val);
B
Bruce Momjian 已提交
2622
					*conf->variable = conf->reset_val;
2623 2624
					break;
				}
B
Bruce Momjian 已提交
2625
			case PGC_STRING:
2626
				{
B
Bruce Momjian 已提交
2627 2628 2629 2630 2631 2632
					struct config_string *conf = (struct config_string *) gconf;
					char	   *str;

					*conf->variable = NULL;
					conf->reset_val = NULL;
					conf->tentative_val = NULL;
2633

B
Bruce Momjian 已提交
2634
					if (conf->boot_val == NULL)
2635
					{
B
Bruce Momjian 已提交
2636 2637
						/* Cannot set value yet */
						break;
2638
					}
B
Bruce Momjian 已提交
2639

2640
					str = guc_strdup(FATAL, conf->boot_val);
B
Bruce Momjian 已提交
2641 2642 2643
					conf->reset_val = str;

					if (conf->assign_hook)
2644
					{
B
Bruce Momjian 已提交
2645 2646
						const char *newstr;

2647 2648
						newstr = (*conf->assign_hook) (str, true,
													   PGC_S_DEFAULT);
B
Bruce Momjian 已提交
2649 2650
						if (newstr == NULL)
						{
2651 2652
							elog(FATAL, "failed to initialize %s to \"%s\"",
								 conf->gen.name, str);
B
Bruce Momjian 已提交
2653 2654 2655 2656 2657 2658 2659 2660 2661 2662 2663 2664
						}
						else if (newstr != str)
						{
							free(str);

							/*
							 * See notes in set_config_option about
							 * casting
							 */
							str = (char *) newstr;
							conf->reset_val = str;
						}
2665
					}
B
Bruce Momjian 已提交
2666 2667
					*conf->variable = str;
					break;
2668 2669 2670 2671 2672 2673
				}
		}
	}

	guc_dirty = false;

2674 2675
	reporting_enabled = false;

2676
	/*
2677
	 * Prevent any attempt to override the transaction modes from
2678 2679
	 * non-interactive sources.
	 */
2680 2681 2682
	SetConfigOption("transaction_isolation", "default",
					PGC_POSTMASTER, PGC_S_OVERRIDE);
	SetConfigOption("transaction_read_only", "no",
2683 2684 2685 2686
					PGC_POSTMASTER, PGC_S_OVERRIDE);

	/*
	 * For historical reasons, some GUC parameters can receive defaults
B
Bruce Momjian 已提交
2687
	 * from environment variables.	Process those settings.
2688 2689 2690 2691 2692 2693 2694 2695 2696 2697 2698 2699 2700 2701 2702 2703
	 */

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


2704 2705 2706 2707 2708 2709 2710 2711 2712 2713 2714 2715 2716 2717
/*
 * Select the configuration files and data directory to be used, and
 * do the initial read of postgresql.conf.
 *
 * This is called after processing command-line switches.
 *		userDoption is the -D switch value if any (NULL if unspecified).
 *		progname is just for use in error messages.
 *
 * Returns true on success; on failure, prints a suitable error message
 * to stderr and returns false.
 */
bool
SelectConfigFiles(const char *userDoption, const char *progname)
{
2718 2719
	char	   *configdir;
	char	   *fname;
2720 2721
	struct stat stat_buf;

2722 2723 2724 2725 2726
	/* configdir is -D option, or $PGDATA if no -D */
	if (userDoption)
		configdir = make_absolute_path(userDoption);
	else
		configdir = make_absolute_path(getenv("PGDATA"));
2727 2728

	/*
2729 2730 2731 2732
	 * Find the configuration file: if config_file was specified on the
	 * command line, use it, else use configdir/postgresql.conf.  In any
	 * case ensure the result is an absolute path, so that it will be
	 * interpreted the same way by future backends.
2733
	 */
2734 2735
	if (ConfigFileName)
		fname = make_absolute_path(ConfigFileName);
2736 2737 2738 2739 2740 2741 2742
	else if (configdir)
	{
		fname = guc_malloc(FATAL,
						   strlen(configdir) + strlen(CONFIG_FILENAME) + 2);
		sprintf(fname, "%s/%s", configdir, CONFIG_FILENAME);
	}
	else
2743
	{
2744
		write_stderr("%s does not know where to find the server configuration file.\n"
P
Peter Eisentraut 已提交
2745
					 "You must specify the --config-file or -D invocation "
2746 2747 2748
					 "option or set the PGDATA environment variable.\n",
					 progname);
		return false;
2749 2750
	}

2751 2752 2753 2754 2755 2756 2757 2758 2759 2760
	/*
	 * Set the ConfigFileName GUC variable to its final value, ensuring
	 * that it can't be overridden later.
	 */
	SetConfigOption("config_file", fname, PGC_POSTMASTER, PGC_S_OVERRIDE);
	free(fname);

	/*
	 * Now read the config file for the first time.
	 */
2761 2762
	if (stat(ConfigFileName, &stat_buf) != 0)
	{
2763
		write_stderr("%s cannot access the server configuration file \"%s\": %s\n",
2764 2765 2766 2767 2768 2769 2770
					 progname, ConfigFileName, strerror(errno));
		return false;
	}

	ProcessConfigFile(PGC_POSTMASTER);

	/*
2771 2772
	 * If the data_directory GUC variable has been set, use that as DataDir;
	 * otherwise use configdir if set; else punt.
2773
	 *
2774
	 * Note: SetDataDir will copy and absolute-ize its argument,
2775 2776
	 * so we don't have to.
	 */
2777 2778 2779 2780
	if (data_directory)
		SetDataDir(data_directory);
	else if (configdir)
		SetDataDir(configdir);
2781 2782 2783
	else
	{
		write_stderr("%s does not know where to find the database system data.\n"
2784 2785 2786 2787 2788 2789 2790 2791 2792 2793 2794
					 "This can be specified as \"data_directory\" in \"%s\", "
					 "or by the -D invocation option, or by the "
					 "PGDATA environment variable.\n",
					 progname, ConfigFileName);
		return false;
	}

	/*
	 * Reflect the final DataDir value back into the data_directory GUC var.
	 * (If you are wondering why we don't just make them a single variable,
	 * it's because the EXEC_BACKEND case needs DataDir to be transmitted to
2795 2796 2797
	 * child backends specially.  XXX is that still true?  Given that we
	 * now chdir to DataDir, EXEC_BACKEND can read the config file without
	 * knowing DataDir in advance.)
2798 2799 2800 2801 2802 2803 2804 2805
	 */
	SetConfigOption("data_directory", DataDir, PGC_POSTMASTER, PGC_S_OVERRIDE);

	/*
	 * Figure out where pg_hba.conf is, and make sure the path is absolute.
	 */
	if (HbaFileName)
		fname = make_absolute_path(HbaFileName);
2806 2807 2808 2809 2810 2811 2812
	else if (configdir)
	{
		fname = guc_malloc(FATAL,
						   strlen(configdir) + strlen(HBA_FILENAME) + 2);
		sprintf(fname, "%s/%s", configdir, HBA_FILENAME);
	}
	else
2813 2814 2815 2816 2817
	{
		write_stderr("%s does not know where to find the \"hba\" configuration file.\n"
					 "This can be specified as \"hba_file\" in \"%s\", "
					 "or by the -D invocation option, or by the "
					 "PGDATA environment variable.\n",
2818 2819 2820
					 progname, ConfigFileName);
		return false;
	}
2821 2822
	SetConfigOption("hba_file", fname, PGC_POSTMASTER, PGC_S_OVERRIDE);
	free(fname);
2823 2824

	/*
2825
	 * Likewise for pg_ident.conf.
2826
	 */
2827 2828
	if (IdentFileName)
		fname = make_absolute_path(IdentFileName);
2829 2830 2831 2832 2833 2834 2835
	else if (configdir)
	{
		fname = guc_malloc(FATAL,
						   strlen(configdir) + strlen(IDENT_FILENAME) + 2);
		sprintf(fname, "%s/%s", configdir, IDENT_FILENAME);
	}
	else
2836 2837 2838 2839 2840 2841 2842 2843 2844 2845 2846 2847
	{
		write_stderr("%s does not know where to find the \"ident\" configuration file.\n"
					 "This can be specified as \"ident_file\" in \"%s\", "
					 "or by the -D invocation option, or by the "
					 "PGDATA environment variable.\n",
					 progname, ConfigFileName);
		return false;
	}
	SetConfigOption("ident_file", fname, PGC_POSTMASTER, PGC_S_OVERRIDE);
	free(fname);

	free(configdir);
2848 2849 2850 2851 2852 2853 2854 2855

	/* If timezone is not set, determine what the OS uses */
	pg_timezone_initialize();

	return true;
}


2856 2857 2858 2859 2860 2861 2862 2863 2864 2865 2866 2867 2868
/*
 * 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 */
2869 2870
		if (gconf->context != PGC_SUSET &&
			gconf->context != PGC_USERSET)
2871 2872 2873 2874 2875 2876 2877 2878
			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;

2879 2880 2881
		/* Save old value to support transaction abort */
		push_old_value(gconf);

2882 2883 2884
		switch (gconf->vartype)
		{
			case PGC_BOOL:
B
Bruce Momjian 已提交
2885 2886
				{
					struct config_bool *conf = (struct config_bool *) gconf;
2887

B
Bruce Momjian 已提交
2888
					if (conf->assign_hook)
2889 2890
						if (!(*conf->assign_hook) (conf->reset_val, true,
												   PGC_S_SESSION))
2891
							elog(ERROR, "failed to reset %s", conf->gen.name);
B
Bruce Momjian 已提交
2892 2893 2894 2895 2896 2897 2898 2899
					*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;
				}
2900
			case PGC_INT:
B
Bruce Momjian 已提交
2901 2902
				{
					struct config_int *conf = (struct config_int *) gconf;
2903

B
Bruce Momjian 已提交
2904
					if (conf->assign_hook)
2905 2906
						if (!(*conf->assign_hook) (conf->reset_val, true,
												   PGC_S_SESSION))
2907
							elog(ERROR, "failed to reset %s", conf->gen.name);
B
Bruce Momjian 已提交
2908 2909 2910 2911 2912 2913 2914 2915
					*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;
				}
2916 2917
			case PGC_REAL:
				{
B
Bruce Momjian 已提交
2918 2919 2920
					struct config_real *conf = (struct config_real *) gconf;

					if (conf->assign_hook)
2921 2922
						if (!(*conf->assign_hook) (conf->reset_val, true,
												   PGC_S_SESSION))
2923
							elog(ERROR, "failed to reset %s", conf->gen.name);
B
Bruce Momjian 已提交
2924 2925 2926 2927 2928 2929
					*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;
2930 2931
					break;
				}
B
Bruce Momjian 已提交
2932 2933 2934 2935
			case PGC_STRING:
				{
					struct config_string *conf = (struct config_string *) gconf;
					char	   *str;
2936

B
Bruce Momjian 已提交
2937 2938 2939 2940 2941
					if (conf->reset_val == NULL)
					{
						/* Nothing to reset to, as yet; so do nothing */
						break;
					}
2942

B
Bruce Momjian 已提交
2943 2944
					/* We need not strdup here */
					str = conf->reset_val;
2945

B
Bruce Momjian 已提交
2946
					if (conf->assign_hook)
2947
					{
B
Bruce Momjian 已提交
2948 2949
						const char *newstr;

2950 2951
						newstr = (*conf->assign_hook) (str, true,
													   PGC_S_SESSION);
B
Bruce Momjian 已提交
2952
						if (newstr == NULL)
2953
							elog(ERROR, "failed to reset %s", conf->gen.name);
B
Bruce Momjian 已提交
2954 2955 2956 2957 2958 2959 2960 2961
						else if (newstr != str)
						{
							/*
							 * See notes in set_config_option about
							 * casting
							 */
							str = (char *) newstr;
						}
2962 2963
					}

2964 2965
					set_string_field(conf, conf->variable, str);
					set_string_field(conf, &conf->tentative_val, str);
B
Bruce Momjian 已提交
2966 2967 2968 2969 2970 2971
					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;
				}
2972
		}
2973 2974 2975

		if (gconf->flags & GUC_REPORT)
			ReportGUCOption(gconf);
2976 2977 2978 2979 2980
	}
}


/*
2981 2982 2983 2984 2985 2986 2987 2988 2989 2990
 * 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
B
Bruce Momjian 已提交
2991
push_old_value(struct config_generic * gconf)
2992 2993 2994 2995 2996 2997 2998 2999 3000 3001 3002 3003 3004 3005 3006 3007
{
	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
B
Bruce Momjian 已提交
3008 3009
		 * avoid allocation problems when a subtransaction back-fills
		 * stack entries for upper transaction levels.
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 3036 3037 3038 3039 3040 3041 3042 3043 3044 3045 3046 3047 3048 3049 3050 3051 3052 3053 3054 3055 3056 3057 3058 3059 3060 3061 3062
		 */
		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.
3063 3064
 */
void
3065
AtEOXact_GUC(bool isCommit, bool isSubXact)
3066
{
3067
	int			my_level;
3068 3069 3070 3071 3072 3073
	int			i;

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

3074 3075 3076
	my_level = GetCurrentTransactionNestLevel();
	Assert(isSubXact ? (my_level > 1) : (my_level == 1));

3077 3078 3079
	for (i = 0; i < num_guc_variables; i++)
	{
		struct config_generic *gconf = guc_variables[i];
3080 3081 3082
		int			my_status = gconf->status;
		GucStack   *stack = gconf->stack;
		bool		useTentative;
3083
		bool		changed;
3084

3085 3086 3087 3088 3089 3090 3091 3092 3093 3094 3095 3096
		/*
		 * 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)
3097
			continue;
3098 3099 3100
		Assert(stack->nest_level == my_level);

		/*
B
Bruce Momjian 已提交
3101 3102 3103 3104
		 * 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...
3105 3106 3107 3108 3109 3110
		 */
		gconf->status = stack->status;

		/*
		 * We have two cases:
		 *
B
Bruce Momjian 已提交
3111 3112 3113 3114 3115
		 * 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
3116 3117
		 * HAVE_TENTATIVE bit below.)
		 *
B
Bruce Momjian 已提交
3118 3119 3120 3121
		 * 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.
3122
		 */
3123

3124
		useTentative = isCommit && (my_status & GUC_HAVE_TENTATIVE) != 0;
3125 3126
		changed = false;

3127 3128 3129 3130
		switch (gconf->vartype)
		{
			case PGC_BOOL:
				{
B
Bruce Momjian 已提交
3131
					struct config_bool *conf = (struct config_bool *) gconf;
3132 3133
					bool		newval;
					GucSource	newsource;
3134

3135 3136 3137 3138 3139 3140 3141
					if (useTentative)
					{
						newval = conf->tentative_val;
						newsource = conf->gen.tentative_source;
						conf->gen.status |= GUC_HAVE_TENTATIVE;
					}
					else
B
Bruce Momjian 已提交
3142
					{
3143 3144 3145 3146
						newval = stack->value.boolval;
						newsource = stack->source;
						conf->tentative_val = stack->tentative_val.boolval;
						conf->gen.tentative_source = stack->tentative_source;
B
Bruce Momjian 已提交
3147 3148
					}

3149
					if (*conf->variable != newval)
B
Bruce Momjian 已提交
3150 3151
					{
						if (conf->assign_hook)
3152
							if (!(*conf->assign_hook) (newval,
B
Bruce Momjian 已提交
3153
												   true, PGC_S_OVERRIDE))
3154 3155
								elog(LOG, "failed to commit %s",
									 conf->gen.name);
3156
						*conf->variable = newval;
3157
						changed = true;
B
Bruce Momjian 已提交
3158
					}
3159
					conf->gen.source = newsource;
B
Bruce Momjian 已提交
3160
					break;
3161 3162 3163
				}
			case PGC_INT:
				{
B
Bruce Momjian 已提交
3164
					struct config_int *conf = (struct config_int *) gconf;
3165 3166
					int			newval;
					GucSource	newsource;
3167

3168 3169 3170 3171 3172 3173 3174
					if (useTentative)
					{
						newval = conf->tentative_val;
						newsource = conf->gen.tentative_source;
						conf->gen.status |= GUC_HAVE_TENTATIVE;
					}
					else
B
Bruce Momjian 已提交
3175
					{
3176 3177 3178 3179
						newval = stack->value.intval;
						newsource = stack->source;
						conf->tentative_val = stack->tentative_val.intval;
						conf->gen.tentative_source = stack->tentative_source;
B
Bruce Momjian 已提交
3180 3181
					}

3182
					if (*conf->variable != newval)
B
Bruce Momjian 已提交
3183 3184
					{
						if (conf->assign_hook)
3185
							if (!(*conf->assign_hook) (newval,
B
Bruce Momjian 已提交
3186
												   true, PGC_S_OVERRIDE))
3187 3188
								elog(LOG, "failed to commit %s",
									 conf->gen.name);
3189
						*conf->variable = newval;
3190
						changed = true;
B
Bruce Momjian 已提交
3191
					}
3192
					conf->gen.source = newsource;
B
Bruce Momjian 已提交
3193
					break;
3194 3195 3196
				}
			case PGC_REAL:
				{
B
Bruce Momjian 已提交
3197
					struct config_real *conf = (struct config_real *) gconf;
3198 3199
					double		newval;
					GucSource	newsource;
3200

3201
					if (useTentative)
B
Bruce Momjian 已提交
3202
					{
3203 3204 3205 3206 3207 3208 3209 3210 3211 3212
						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 已提交
3213
					}
3214

3215
					if (*conf->variable != newval)
B
Bruce Momjian 已提交
3216 3217
					{
						if (conf->assign_hook)
3218
							if (!(*conf->assign_hook) (newval,
B
Bruce Momjian 已提交
3219
												   true, PGC_S_OVERRIDE))
3220 3221
								elog(LOG, "failed to commit %s",
									 conf->gen.name);
3222
						*conf->variable = newval;
3223
						changed = true;
B
Bruce Momjian 已提交
3224
					}
3225
					conf->gen.source = newsource;
B
Bruce Momjian 已提交
3226
					break;
3227
				}
B
Bruce Momjian 已提交
3228
			case PGC_STRING:
3229
				{
B
Bruce Momjian 已提交
3230
					struct config_string *conf = (struct config_string *) gconf;
3231 3232
					char	   *newval;
					GucSource	newsource;
3233

3234
					if (useTentative)
B
Bruce Momjian 已提交
3235
					{
3236 3237 3238
						newval = conf->tentative_val;
						newsource = conf->gen.tentative_source;
						conf->gen.status |= GUC_HAVE_TENTATIVE;
B
Bruce Momjian 已提交
3239 3240
					}
					else
3241
					{
3242 3243 3244 3245 3246 3247
						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;
					}
3248

3249 3250
					if (*conf->variable != newval)
					{
B
Bruce Momjian 已提交
3251
						if (conf->assign_hook)
3252
						{
B
Bruce Momjian 已提交
3253 3254
							const char *newstr;

3255
							newstr = (*conf->assign_hook) (newval, true,
B
Bruce Momjian 已提交
3256
														 PGC_S_OVERRIDE);
B
Bruce Momjian 已提交
3257
							if (newstr == NULL)
3258 3259
								elog(LOG, "failed to commit %s",
									 conf->gen.name);
3260
							else if (newstr != newval)
B
Bruce Momjian 已提交
3261 3262
							{
								/*
3263 3264 3265
								 * If newval should now be freed, it'll be
								 * taken care of below.
								 *
B
Bruce Momjian 已提交
3266 3267 3268
								 * See notes in set_config_option about
								 * casting
								 */
3269
								newval = (char *) newstr;
B
Bruce Momjian 已提交
3270
							}
3271 3272
						}

3273
						set_string_field(conf, conf->variable, newval);
3274
						changed = true;
B
Bruce Momjian 已提交
3275
					}
3276 3277 3278 3279 3280 3281 3282 3283 3284
					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 已提交
3285
					break;
3286 3287
				}
		}
3288

3289 3290 3291 3292 3293
		/* Finish popping the state stack */
		gconf->stack = stack->prev;
		pfree(stack);

		/*
B
Bruce Momjian 已提交
3294 3295
		 * If we're now out of all xact levels, forget TENTATIVE status
		 * bit; there's nothing tentative about the value anymore.
3296 3297 3298 3299 3300 3301 3302 3303
		 */
		if (!isSubXact)
		{
			Assert(gconf->stack == NULL);
			gconf->status = 0;
		}

		/* Report new value if we changed it */
3304 3305
		if (changed && (gconf->flags & GUC_REPORT))
			ReportGUCOption(gconf);
3306 3307
	}

3308
	/*
B
Bruce Momjian 已提交
3309 3310 3311 3312
	 * 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.)
3313 3314 3315
	 */
	if (!isSubXact)
		guc_dirty = false;
3316 3317 3318
}


3319 3320 3321 3322 3323 3324 3325 3326 3327 3328 3329 3330 3331 3332 3333 3334 3335 3336 3337 3338 3339 3340 3341 3342 3343 3344 3345 3346 3347 3348 3349 3350 3351
/*
 * 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
3352
ReportGUCOption(struct config_generic * record)
3353 3354 3355
{
	if (reporting_enabled && (record->flags & GUC_REPORT))
	{
3356
		char	   *val = _ShowOption(record);
3357 3358 3359 3360 3361 3362 3363 3364 3365 3366 3367 3368
		StringInfoData msgbuf;

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

		pfree(val);
	}
}


3369 3370 3371 3372 3373 3374 3375 3376 3377 3378 3379
/*
 * 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);

3380
	if (pg_strncasecmp(value, "true", len) == 0)
3381 3382 3383 3384
	{
		if (result)
			*result = true;
	}
3385
	else if (pg_strncasecmp(value, "false", len) == 0)
3386 3387 3388 3389 3390
	{
		if (result)
			*result = false;
	}

3391
	else if (pg_strncasecmp(value, "yes", len) == 0)
3392 3393 3394 3395
	{
		if (result)
			*result = true;
	}
3396
	else if (pg_strncasecmp(value, "no", len) == 0)
3397 3398 3399 3400 3401
	{
		if (result)
			*result = false;
	}

3402
	else if (pg_strcasecmp(value, "on") == 0)
3403 3404 3405 3406
	{
		if (result)
			*result = true;
	}
3407
	else if (pg_strcasecmp(value, "off") == 0)
3408 3409 3410 3411 3412
	{
		if (result)
			*result = false;
	}

3413
	else if (pg_strcasecmp(value, "1") == 0)
3414 3415 3416 3417
	{
		if (result)
			*result = true;
	}
3418
	else if (pg_strcasecmp(value, "0") == 0)
3419 3420 3421 3422 3423 3424
	{
		if (result)
			*result = false;
	}

	else
3425 3426 3427
	{
		if (result)
			*result = false;	/* suppress compiler warning */
3428
		return false;
3429
	}
3430 3431 3432 3433 3434 3435 3436 3437 3438 3439 3440 3441 3442 3443 3444 3445 3446 3447 3448 3449 3450 3451 3452 3453 3454
	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
		)
3455 3456 3457
	{
		if (result)
			*result = 0;		/* suppress compiler warning */
3458
		return false;
3459
	}
3460 3461 3462 3463 3464 3465 3466 3467 3468 3469 3470 3471 3472 3473 3474 3475 3476 3477 3478 3479 3480
	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)
3481 3482 3483
	{
		if (result)
			*result = 0;		/* suppress compiler warning */
3484
		return false;
3485
	}
3486 3487 3488 3489 3490 3491
	if (result)
		*result = val;
	return true;
}


3492 3493 3494 3495 3496 3497 3498 3499 3500 3501 3502 3503 3504 3505 3506 3507 3508 3509 3510 3511 3512 3513 3514 3515 3516 3517 3518
/*
 * Call a GucStringAssignHook function, being careful to free the
 * "newval" string if the hook ereports.
 *
 * This is split out of set_config_option just to avoid the "volatile"
 * qualifiers that would otherwise have to be plastered all over.
 */
static const char *
call_string_assign_hook(GucStringAssignHook assign_hook,
						char *newval, bool doit, GucSource source)
{
	const char *result;

	PG_TRY();
	{
		result = (*assign_hook) (newval, doit, source);
	}
	PG_CATCH();
	{
		free(newval);
		PG_RE_THROW();
	}
	PG_END_TRY();

	return result;
}

3519 3520 3521 3522 3523 3524 3525 3526 3527

/*
 * 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
3528
 * parameter changeVal is false then don't really set the option but do all
3529 3530 3531
 * the checks to see if it would work.
 *
 * If there is an error (non-existing option, invalid value) then an
3532 3533 3534 3535
 * 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
3536 3537 3538 3539 3540 3541 3542 3543 3544
 * 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,
3545
				  bool isLocal, bool changeVal)
3546 3547 3548
{
	struct config_generic *record;
	int			elevel;
3549
	bool		makeDefault;
3550 3551

	if (context == PGC_SIGHUP || source == PGC_S_DEFAULT)
3552 3553 3554 3555 3556 3557 3558
	{
		/*
		 * To avoid cluttering the log, only the postmaster bleats loudly
		 * about problems with the config file.
		 */
		elevel = IsUnderPostmaster ? DEBUG2 : LOG;
	}
3559 3560 3561 3562 3563
	else if (source == PGC_S_DATABASE || source == PGC_S_USER)
		elevel = INFO;
	else
		elevel = ERROR;

3564
	record = find_option(name, elevel);
3565 3566
	if (record == NULL)
	{
3567 3568
		ereport(elevel,
				(errcode(ERRCODE_UNDEFINED_OBJECT),
B
Bruce Momjian 已提交
3569
		   errmsg("unrecognized configuration parameter \"%s\"", name)));
3570 3571 3572 3573 3574 3575 3576 3577 3578 3579 3580
		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)
	{
3581 3582 3583 3584 3585
		case PGC_INTERNAL:
			if (context == PGC_SIGHUP)
				return true;
			if (context != PGC_INTERNAL)
			{
3586 3587
				ereport(elevel,
						(errcode(ERRCODE_CANT_CHANGE_RUNTIME_PARAM),
3588
						 errmsg("parameter \"%s\" cannot be changed",
3589
								name)));
3590 3591 3592
				return false;
			}
			break;
3593 3594 3595 3596 3597
		case PGC_POSTMASTER:
			if (context == PGC_SIGHUP)
				return true;
			if (context != PGC_POSTMASTER)
			{
3598 3599
				ereport(elevel,
						(errcode(ERRCODE_CANT_CHANGE_RUNTIME_PARAM),
B
Bruce Momjian 已提交
3600 3601
						 errmsg("parameter \"%s\" cannot be changed after server start",
								name)));
3602 3603 3604 3605 3606 3607
				return false;
			}
			break;
		case PGC_SIGHUP:
			if (context != PGC_SIGHUP && context != PGC_POSTMASTER)
			{
3608 3609
				ereport(elevel,
						(errcode(ERRCODE_CANT_CHANGE_RUNTIME_PARAM),
3610
						 errmsg("parameter \"%s\" cannot be changed now",
3611
								name)));
3612 3613 3614 3615 3616 3617 3618 3619 3620 3621 3622 3623 3624 3625 3626 3627 3628 3629 3630 3631 3632 3633 3634 3635 3636 3637
				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)
			{
3638 3639
				ereport(elevel,
						(errcode(ERRCODE_CANT_CHANGE_RUNTIME_PARAM),
B
Bruce Momjian 已提交
3640 3641
						 errmsg("parameter \"%s\" cannot be set after connection start",
								name)));
3642 3643 3644 3645 3646 3647
				return false;
			}
			break;
		case PGC_SUSET:
			if (context == PGC_USERSET || context == PGC_BACKEND)
			{
3648 3649
				ereport(elevel,
						(errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
B
Bruce Momjian 已提交
3650 3651
					  errmsg("permission denied to set parameter \"%s\"",
							 name)));
3652
				return false;
3653 3654 3655 3656 3657
			}
			break;
		case PGC_USERSET:
			/* always okay */
			break;
3658
	}
3659

3660
	/*
3661
	 * Should we set reset/stacked values?	(If so, the behavior is not
3662 3663
	 * transactional.)
	 */
3664
	makeDefault = changeVal && (source <= PGC_S_OVERRIDE) && (value != NULL);
3665 3666 3667

	/*
	 * Ignore attempted set if overridden by previously processed setting.
3668
	 * However, if changeVal is false then plow ahead anyway since we are
B
Bruce Momjian 已提交
3669 3670
	 * 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
3671
	 * to set the reset/stacked values even if we can't set the variable
B
Bruce Momjian 已提交
3672
	 * itself.
3673 3674 3675
	 */
	if (record->source > source)
	{
3676
		if (changeVal && !makeDefault)
3677
		{
3678
			elog(DEBUG3, "\"%s\": setting ignored because previous source is higher priority",
3679 3680 3681
				 name);
			return true;
		}
3682
		changeVal = false;
3683 3684
	}

3685
	/*
3686
	 * Evaluate value and set variable.
3687
	 */
3688
	switch (record->vartype)
3689 3690 3691
	{
		case PGC_BOOL:
			{
B
Bruce Momjian 已提交
3692
				struct config_bool *conf = (struct config_bool *) record;
3693
				bool		newval;
B
Bruce Momjian 已提交
3694 3695

				if (value)
3696
				{
3697 3698
					if (!parse_bool(value, &newval))
					{
3699 3700
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
3701
								 errmsg("parameter \"%s\" requires a Boolean value",
3702
										name)));
3703 3704 3705 3706 3707 3708 3709 3710
						return false;
					}
				}
				else
				{
					newval = conf->reset_val;
					source = conf->gen.reset_source;
				}
B
Bruce Momjian 已提交
3711

3712
				if (conf->assign_hook)
3713
					if (!(*conf->assign_hook) (newval, changeVal, source))
B
Bruce Momjian 已提交
3714
					{
3715 3716
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
B
Bruce Momjian 已提交
3717 3718
						 errmsg("invalid value for parameter \"%s\": %d",
								name, (int) newval)));
B
Bruce Momjian 已提交
3719 3720
						return false;
					}
3721

3722
				if (changeVal || makeDefault)
3723
				{
3724 3725 3726
					/* Save old value to support transaction abort */
					if (!makeDefault)
						push_old_value(&conf->gen);
3727
					if (changeVal)
3728
					{
3729 3730 3731 3732 3733
						*conf->variable = newval;
						conf->gen.source = source;
					}
					if (makeDefault)
					{
B
Bruce Momjian 已提交
3734
						GucStack   *stack;
3735

3736 3737 3738 3739 3740
						if (conf->gen.reset_source <= source)
						{
							conf->reset_val = newval;
							conf->gen.reset_source = source;
						}
3741
						for (stack = conf->gen.stack; stack; stack = stack->prev)
3742
						{
3743 3744 3745 3746 3747
							if (stack->source <= source)
							{
								stack->value.boolval = newval;
								stack->source = source;
							}
3748 3749 3750 3751 3752 3753 3754 3755 3756 3757 3758 3759 3760
						}
					}
					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;
3761
					}
3762
				}
B
Bruce Momjian 已提交
3763
				break;
3764
			}
3765 3766

		case PGC_INT:
3767
			{
B
Bruce Momjian 已提交
3768
				struct config_int *conf = (struct config_int *) record;
3769
				int			newval;
3770

B
Bruce Momjian 已提交
3771
				if (value)
3772
				{
3773
					if (!parse_int(value, &newval))
B
Bruce Momjian 已提交
3774
					{
3775 3776
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
B
Bruce Momjian 已提交
3777 3778
								 errmsg("parameter \"%s\" requires an integer value",
										name)));
B
Bruce Momjian 已提交
3779 3780
						return false;
					}
3781
					if (newval < conf->min || newval > conf->max)
B
Bruce Momjian 已提交
3782
					{
3783 3784
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
3785
								 errmsg("%d is outside the valid range for parameter \"%s\" (%d .. %d)",
B
Bruce Momjian 已提交
3786
								   newval, name, conf->min, conf->max)));
B
Bruce Momjian 已提交
3787 3788
						return false;
					}
3789 3790 3791 3792 3793 3794 3795 3796
				}
				else
				{
					newval = conf->reset_val;
					source = conf->gen.reset_source;
				}

				if (conf->assign_hook)
3797
					if (!(*conf->assign_hook) (newval, changeVal, source))
3798
					{
3799 3800
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
B
Bruce Momjian 已提交
3801 3802
						 errmsg("invalid value for parameter \"%s\": %d",
								name, newval)));
3803 3804
						return false;
					}
3805

3806
				if (changeVal || makeDefault)
3807
				{
3808 3809 3810
					/* Save old value to support transaction abort */
					if (!makeDefault)
						push_old_value(&conf->gen);
3811
					if (changeVal)
3812
					{
3813 3814 3815 3816 3817
						*conf->variable = newval;
						conf->gen.source = source;
					}
					if (makeDefault)
					{
B
Bruce Momjian 已提交
3818
						GucStack   *stack;
3819

3820 3821 3822 3823 3824
						if (conf->gen.reset_source <= source)
						{
							conf->reset_val = newval;
							conf->gen.reset_source = source;
						}
3825
						for (stack = conf->gen.stack; stack; stack = stack->prev)
3826
						{
3827 3828 3829 3830 3831
							if (stack->source <= source)
							{
								stack->value.intval = newval;
								stack->source = source;
							}
3832 3833 3834 3835 3836 3837 3838 3839 3840 3841 3842 3843 3844
						}
					}
					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;
3845
					}
3846
				}
B
Bruce Momjian 已提交
3847
				break;
3848
			}
3849 3850

		case PGC_REAL:
3851
			{
B
Bruce Momjian 已提交
3852
				struct config_real *conf = (struct config_real *) record;
3853
				double		newval;
3854

B
Bruce Momjian 已提交
3855
				if (value)
3856
				{
3857
					if (!parse_real(value, &newval))
B
Bruce Momjian 已提交
3858
					{
3859 3860
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
3861
								 errmsg("parameter \"%s\" requires a numeric value",
3862
										name)));
B
Bruce Momjian 已提交
3863 3864
						return false;
					}
3865
					if (newval < conf->min || newval > conf->max)
B
Bruce Momjian 已提交
3866
					{
3867 3868
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
3869
								 errmsg("%g is outside the valid range for parameter \"%s\" (%g .. %g)",
B
Bruce Momjian 已提交
3870
								   newval, name, conf->min, conf->max)));
B
Bruce Momjian 已提交
3871 3872
						return false;
					}
3873 3874 3875 3876 3877 3878 3879 3880
				}
				else
				{
					newval = conf->reset_val;
					source = conf->gen.reset_source;
				}

				if (conf->assign_hook)
3881
					if (!(*conf->assign_hook) (newval, changeVal, source))
3882
					{
3883 3884
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
B
Bruce Momjian 已提交
3885 3886
						 errmsg("invalid value for parameter \"%s\": %g",
								name, newval)));
3887 3888
						return false;
					}
3889

3890
				if (changeVal || makeDefault)
3891
				{
3892 3893 3894
					/* Save old value to support transaction abort */
					if (!makeDefault)
						push_old_value(&conf->gen);
3895
					if (changeVal)
3896
					{
3897 3898 3899 3900 3901
						*conf->variable = newval;
						conf->gen.source = source;
					}
					if (makeDefault)
					{
B
Bruce Momjian 已提交
3902
						GucStack   *stack;
3903

3904 3905 3906 3907 3908
						if (conf->gen.reset_source <= source)
						{
							conf->reset_val = newval;
							conf->gen.reset_source = source;
						}
3909
						for (stack = conf->gen.stack; stack; stack = stack->prev)
3910
						{
3911 3912 3913 3914 3915
							if (stack->source <= source)
							{
								stack->value.realval = newval;
								stack->source = source;
							}
3916 3917 3918 3919 3920 3921 3922 3923 3924 3925 3926 3927 3928
						}
					}
					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;
3929
					}
3930
				}
B
Bruce Momjian 已提交
3931
				break;
3932
			}
3933 3934 3935

		case PGC_STRING:
			{
B
Bruce Momjian 已提交
3936
				struct config_string *conf = (struct config_string *) record;
3937
				char	   *newval;
B
Bruce Momjian 已提交
3938 3939

				if (value)
3940
				{
3941
					newval = guc_strdup(elevel, value);
3942 3943 3944 3945 3946
					if (newval == NULL)
						return false;
				}
				else if (conf->reset_val)
				{
3947 3948
					/*
					 * We could possibly avoid strdup here, but easier to
B
Bruce Momjian 已提交
3949 3950
					 * make this case work the same as the normal
					 * assignment case.
3951
					 */
3952
					newval = guc_strdup(elevel, conf->reset_val);
3953 3954 3955 3956 3957 3958 3959 3960 3961 3962 3963 3964
					if (newval == NULL)
						return false;
					source = conf->gen.reset_source;
				}
				else
				{
					/* Nothing to reset to, as yet; so do nothing */
					break;
				}

				if (conf->assign_hook)
				{
B
Bruce Momjian 已提交
3965
					const char *hookresult;
3966

3967 3968 3969 3970 3971 3972 3973 3974
					/*
					 * If the hook ereports, we have to make sure we free
					 * newval, else it will be a permanent memory leak.
					 */
					hookresult = call_string_assign_hook(conf->assign_hook,
														 newval,
														 changeVal,
														 source);
3975
					if (hookresult == NULL)
B
Bruce Momjian 已提交
3976
					{
3977
						free(newval);
3978 3979
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
B
Bruce Momjian 已提交
3980 3981
								 errmsg("invalid value for parameter \"%s\": \"%s\"",
										name, value ? value : "")));
B
Bruce Momjian 已提交
3982 3983
						return false;
					}
3984
					else if (hookresult != newval)
B
Bruce Momjian 已提交
3985
					{
3986
						free(newval);
B
Bruce Momjian 已提交
3987

3988
						/*
B
Bruce Momjian 已提交
3989 3990 3991 3992 3993 3994 3995
						 * 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.
3996 3997 3998 3999 4000
						 */
						newval = (char *) hookresult;
					}
				}

4001
				if (changeVal || makeDefault)
4002
				{
4003 4004 4005
					/* Save old value to support transaction abort */
					if (!makeDefault)
						push_old_value(&conf->gen);
4006
					if (changeVal)
4007
					{
4008
						set_string_field(conf, conf->variable, newval);
4009 4010 4011 4012
						conf->gen.source = source;
					}
					if (makeDefault)
					{
B
Bruce Momjian 已提交
4013
						GucStack   *stack;
4014

4015
						if (conf->gen.reset_source <= source)
B
Bruce Momjian 已提交
4016
						{
4017
							set_string_field(conf, &conf->reset_val, newval);
4018
							conf->gen.reset_source = source;
B
Bruce Momjian 已提交
4019
						}
4020
						for (stack = conf->gen.stack; stack; stack = stack->prev)
4021
						{
4022 4023 4024 4025 4026 4027
							if (stack->source <= source)
							{
								set_string_field(conf, &stack->value.stringval,
												 newval);
								stack->source = source;
							}
4028
						}
4029
						/* Perhaps we didn't install newval anywhere */
4030
						if (!string_field_used(conf, newval))
4031
							free(newval);
B
Bruce Momjian 已提交
4032
					}
4033
					else if (isLocal)
4034
					{
4035 4036
						conf->gen.status |= GUC_HAVE_LOCAL;
						guc_dirty = true;
4037
					}
4038
					else
4039
					{
4040
						set_string_field(conf, &conf->tentative_val, newval);
4041 4042 4043
						conf->gen.tentative_source = source;
						conf->gen.status |= GUC_HAVE_TENTATIVE;
						guc_dirty = true;
4044
					}
4045 4046 4047
				}
				else
					free(newval);
B
Bruce Momjian 已提交
4048
				break;
4049
			}
4050
	}
4051

4052
	if (changeVal && (record->flags & GUC_REPORT))
4053
		ReportGUCOption(record);
4054

4055 4056 4057 4058 4059 4060
	return true;
}


/*
 * Set a config option to the given value. See also set_config_option,
B
Bruce Momjian 已提交
4061
 * this is just the wrapper to be called from outside GUC.	NB: this
4062
 * is used only for non-transactional operations.
4063 4064
 */
void
4065
SetConfigOption(const char *name, const char *value,
4066
				GucContext context, GucSource source)
4067
{
4068
	(void) set_config_option(name, value, context, source, false, true);
4069 4070 4071 4072 4073
}



/*
4074
 * Fetch the current value of the option `name'. If the option doesn't exist,
4075
 * throw an ereport and don't return.
4076 4077 4078 4079 4080
 *
 * 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 已提交
4081
GetConfigOption(const char *name)
4082
{
B
Bruce Momjian 已提交
4083
	struct config_generic *record;
4084 4085
	static char buffer[256];

4086
	record = find_option(name, ERROR);
4087
	if (record == NULL)
4088 4089
		ereport(ERROR,
				(errcode(ERRCODE_UNDEFINED_OBJECT),
B
Bruce Momjian 已提交
4090
		   errmsg("unrecognized configuration parameter \"%s\"", name)));
4091 4092 4093 4094
	if ((record->flags & GUC_SUPERUSER_ONLY) && !superuser())
		ereport(ERROR,
				(errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
				 errmsg("must be superuser to examine \"%s\"", name)));
4095

4096
	switch (record->vartype)
4097 4098
	{
		case PGC_BOOL:
B
Bruce Momjian 已提交
4099
			return *((struct config_bool *) record)->variable ? "on" : "off";
4100

4101
		case PGC_INT:
4102 4103
			snprintf(buffer, sizeof(buffer), "%d",
					 *((struct config_int *) record)->variable);
4104 4105
			return buffer;

4106
		case PGC_REAL:
4107 4108
			snprintf(buffer, sizeof(buffer), "%g",
					 *((struct config_real *) record)->variable);
4109 4110 4111
			return buffer;

		case PGC_STRING:
B
Bruce Momjian 已提交
4112
			return *((struct config_string *) record)->variable;
4113 4114 4115
	}
	return NULL;
}
4116

4117 4118 4119 4120 4121
/*
 * Get the RESET value associated with the given option.
 */
const char *
GetConfigOptionResetString(const char *name)
4122
{
4123 4124
	struct config_generic *record;
	static char buffer[256];
4125

4126
	record = find_option(name, ERROR);
4127
	if (record == NULL)
4128 4129
		ereport(ERROR,
				(errcode(ERRCODE_UNDEFINED_OBJECT),
B
Bruce Momjian 已提交
4130
		   errmsg("unrecognized configuration parameter \"%s\"", name)));
4131 4132 4133 4134
	if ((record->flags & GUC_SUPERUSER_ONLY) && !superuser())
		ereport(ERROR,
				(errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
				 errmsg("must be superuser to examine \"%s\"", name)));
4135 4136

	switch (record->vartype)
4137 4138
	{
		case PGC_BOOL:
4139
			return ((struct config_bool *) record)->reset_val ? "on" : "off";
4140

4141
		case PGC_INT:
4142
			snprintf(buffer, sizeof(buffer), "%d",
4143 4144
					 ((struct config_int *) record)->reset_val);
			return buffer;
4145 4146

		case PGC_REAL:
4147
			snprintf(buffer, sizeof(buffer), "%g",
4148 4149
					 ((struct config_real *) record)->reset_val);
			return buffer;
4150 4151

		case PGC_STRING:
4152 4153 4154 4155
			return ((struct config_string *) record)->reset_val;
	}
	return NULL;
}
4156

4157 4158 4159 4160 4161 4162 4163 4164 4165 4166 4167 4168 4169 4170 4171
/*
 * Detect whether the given configuration option can only be set by
 * a superuser.
 */
bool
IsSuperuserConfigOption(const char *name)
{
	struct config_generic *record;

	record = find_option(name, ERROR);
	/* On an unrecognized name, don't error, just return false. */
	if (record == NULL)
		return false;
	return (record->context == PGC_SUSET);
}
4172 4173 4174 4175 4176 4177 4178 4179 4180 4181 4182 4183 4184 4185 4186 4187 4188 4189 4190


/*
 * 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;
4191
	ListCell   *l;
4192

4193 4194 4195 4196
	/*
	 * Fast path if just DEFAULT.  We do not check the variable name in
	 * this case --- necessary for RESET ALL to work correctly.
	 */
4197 4198 4199
	if (args == NIL)
		return NULL;

4200
	/* Else get flags for the variable */
4201
	record = find_option(name, ERROR);
4202
	if (record == NULL)
4203 4204
		ereport(ERROR,
				(errcode(ERRCODE_UNDEFINED_OBJECT),
B
Bruce Momjian 已提交
4205
		   errmsg("unrecognized configuration parameter \"%s\"", name)));
4206 4207

	flags = record->flags;
4208 4209 4210

	/* Complain if list input and non-list variable */
	if ((flags & GUC_LIST_INPUT) == 0 &&
4211
		list_length(args) != 1)
4212 4213 4214
		ereport(ERROR,
				(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
				 errmsg("SET %s takes only one argument", name)));
4215 4216 4217 4218 4219 4220 4221 4222

	initStringInfo(&buf);

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

4223
		if (l != list_head(args))
4224 4225 4226
			appendStringInfo(&buf, ", ");

		if (!IsA(arg, A_Const))
4227
			elog(ERROR, "unrecognized node type: %d", (int) nodeTag(arg));
4228 4229 4230 4231 4232 4233 4234 4235

		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 已提交
4236
				appendStringInfoString(&buf, strVal(&arg->val));
4237 4238 4239 4240 4241 4242 4243 4244 4245 4246
				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.
					 */
4247
					Datum interval;
B
Bruce Momjian 已提交
4248
					char	   *intervalout;
4249 4250

					interval =
4251 4252 4253
					DirectFunctionCall3(interval_in,
										CStringGetDatum(val),
										ObjectIdGetDatum(InvalidOid),
B
Bruce Momjian 已提交
4254
								   Int32GetDatum(arg->typename->typmod));
4255 4256

					intervalout =
4257 4258
						DatumGetCString(DirectFunctionCall1(interval_out,
															interval));
4259 4260 4261 4262 4263
					appendStringInfo(&buf, "INTERVAL '%s'", intervalout);
				}
				else
				{
					/*
B
Bruce Momjian 已提交
4264 4265
					 * Plain string literal or identifier.	For quote
					 * mode, quote it if it's not a vanilla identifier.
4266 4267
					 */
					if (flags & GUC_LIST_QUOTE)
N
Neil Conway 已提交
4268
						appendStringInfoString(&buf, quote_identifier(val));
4269
					else
N
Neil Conway 已提交
4270
						appendStringInfoString(&buf, val);
4271 4272 4273
				}
				break;
			default:
4274 4275
				elog(ERROR, "unrecognized node type: %d",
					 (int) nodeTag(&arg->val));
4276 4277
				break;
		}
4278
	}
4279 4280 4281 4282 4283 4284 4285 4286 4287 4288 4289 4290 4291 4292 4293 4294 4295 4296 4297 4298 4299 4300

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

4301 4302 4303 4304 4305 4306
/*
 * SET command wrapped as a SQL callable function.
 */
Datum
set_config_by_name(PG_FUNCTION_ARGS)
{
B
Bruce Momjian 已提交
4307 4308 4309 4310 4311
	char	   *name;
	char	   *value;
	char	   *new_value;
	bool		is_local;
	text	   *result_text;
4312 4313

	if (PG_ARGISNULL(0))
4314 4315
		ereport(ERROR,
				(errcode(ERRCODE_NULL_VALUE_NOT_ALLOWED),
4316
				 errmsg("SET requires parameter name")));
4317 4318

	/* Get the GUC variable name */
4319
	name = DatumGetCString(DirectFunctionCall1(textout, PG_GETARG_DATUM(0)));
4320 4321 4322 4323 4324

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

	/*
B
Bruce Momjian 已提交
4328 4329
	 * Get the desired state of is_local. Default to false if provided
	 * value is NULL
4330 4331 4332 4333 4334 4335 4336 4337 4338 4339 4340 4341 4342 4343 4344
	 */
	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 */
4345
	new_value = GetConfigOptionByName(name, NULL);
4346 4347 4348 4349 4350 4351 4352 4353

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

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

4354
static void
B
Bruce Momjian 已提交
4355
define_custom_variable(struct config_generic * variable)
4356
{
B
Bruce Momjian 已提交
4357 4358 4359 4360 4361 4362 4363 4364 4365 4366 4367 4368
	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)
4369
	{
4370
		add_guc_variable(variable, ERROR);
4371 4372 4373
		return;
	}

B
Bruce Momjian 已提交
4374 4375
	/*
	 * This better be a placeholder
4376
	 */
B
Bruce Momjian 已提交
4377
	if (((*res)->flags & GUC_CUSTOM_PLACEHOLDER) == 0)
4378 4379 4380
		ereport(ERROR,
				(errcode(ERRCODE_INTERNAL_ERROR),
				 errmsg("attempt to redefine parameter \"%s\"", name)));
4381 4382

	Assert((*res)->vartype == PGC_STRING);
B
Bruce Momjian 已提交
4383 4384
	pHolder = (struct config_string *) * res;

4385
	/* We have the same name, no sorting is necessary */
4386 4387 4388 4389
	*res = variable;

	value = *pHolder->variable;

4390
	/*
B
Bruce Momjian 已提交
4391 4392
	 * Assign the string value stored in the placeholder to the real
	 * variable.
4393 4394 4395 4396
	 *
	 * 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.
4397 4398
	 */
	set_config_option(name, value,
B
Bruce Momjian 已提交
4399 4400
					  pHolder->gen.context, pHolder->gen.source,
					  false, true);
4401

4402 4403 4404
	/*
	 * Free up as much as we conveniently can of the placeholder structure
	 * (this neglects any stack items...)
4405
	 */
4406 4407 4408
	set_string_field(pHolder, pHolder->variable, NULL);
	set_string_field(pHolder, &pHolder->reset_val, NULL);
	set_string_field(pHolder, &pHolder->tentative_val, NULL);
4409 4410 4411 4412

	free(pHolder);
}

B
Bruce Momjian 已提交
4413
static void
4414
init_custom_variable(struct config_generic * gen,
B
Bruce Momjian 已提交
4415 4416 4417 4418 4419
					 const char *name,
					 const char *short_desc,
					 const char *long_desc,
					 GucContext context,
					 enum config_type type)
4420
{
B
Bruce Momjian 已提交
4421 4422 4423
	gen->name = guc_strdup(ERROR, name);
	gen->context = context;
	gen->group = CUSTOM_OPTIONS;
4424
	gen->short_desc = short_desc;
B
Bruce Momjian 已提交
4425 4426
	gen->long_desc = long_desc;
	gen->vartype = type;
4427 4428
}

B
Bruce Momjian 已提交
4429
void
4430
DefineCustomBoolVariable(const char *name,
B
Bruce Momjian 已提交
4431 4432 4433 4434 4435 4436
						 const char *short_desc,
						 const char *long_desc,
						 bool *valueAddr,
						 GucContext context,
						 GucBoolAssignHook assign_hook,
						 GucShowHook show_hook)
4437
{
B
Bruce Momjian 已提交
4438 4439
	size_t		sz = sizeof(struct config_bool);
	struct config_bool *var = (struct config_bool *) guc_malloc(ERROR, sz);
4440 4441 4442 4443

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

B
Bruce Momjian 已提交
4444 4445
	var->variable = valueAddr;
	var->reset_val = *valueAddr;
4446
	var->assign_hook = assign_hook;
B
Bruce Momjian 已提交
4447
	var->show_hook = show_hook;
4448 4449 4450
	define_custom_variable(&var->gen);
}

B
Bruce Momjian 已提交
4451
void
4452
DefineCustomIntVariable(const char *name,
B
Bruce Momjian 已提交
4453 4454 4455
						const char *short_desc,
						const char *long_desc,
						int *valueAddr,
4456 4457
						int minValue,
						int maxValue,
B
Bruce Momjian 已提交
4458 4459 4460
						GucContext context,
						GucIntAssignHook assign_hook,
						GucShowHook show_hook)
4461
{
B
Bruce Momjian 已提交
4462 4463
	size_t		sz = sizeof(struct config_int);
	struct config_int *var = (struct config_int *) guc_malloc(ERROR, sz);
4464 4465 4466 4467

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

B
Bruce Momjian 已提交
4468 4469
	var->variable = valueAddr;
	var->reset_val = *valueAddr;
4470 4471
	var->min = minValue;
	var->max = maxValue;
4472
	var->assign_hook = assign_hook;
B
Bruce Momjian 已提交
4473
	var->show_hook = show_hook;
4474 4475 4476
	define_custom_variable(&var->gen);
}

B
Bruce Momjian 已提交
4477
void
4478
DefineCustomRealVariable(const char *name,
B
Bruce Momjian 已提交
4479 4480 4481
						 const char *short_desc,
						 const char *long_desc,
						 double *valueAddr,
4482 4483
						 double minValue,
						 double maxValue,
B
Bruce Momjian 已提交
4484 4485 4486
						 GucContext context,
						 GucRealAssignHook assign_hook,
						 GucShowHook show_hook)
4487
{
B
Bruce Momjian 已提交
4488 4489
	size_t		sz = sizeof(struct config_real);
	struct config_real *var = (struct config_real *) guc_malloc(ERROR, sz);
4490 4491 4492 4493

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

B
Bruce Momjian 已提交
4494 4495
	var->variable = valueAddr;
	var->reset_val = *valueAddr;
4496 4497
	var->min = minValue;
	var->max = maxValue;
4498
	var->assign_hook = assign_hook;
B
Bruce Momjian 已提交
4499
	var->show_hook = show_hook;
4500 4501 4502
	define_custom_variable(&var->gen);
}

B
Bruce Momjian 已提交
4503
void
4504
DefineCustomStringVariable(const char *name,
B
Bruce Momjian 已提交
4505 4506 4507 4508 4509 4510
						   const char *short_desc,
						   const char *long_desc,
						   char **valueAddr,
						   GucContext context,
						   GucStringAssignHook assign_hook,
						   GucShowHook show_hook)
4511
{
B
Bruce Momjian 已提交
4512 4513
	size_t		sz = sizeof(struct config_string);
	struct config_string *var = (struct config_string *) guc_malloc(ERROR, sz);
4514 4515 4516 4517

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

B
Bruce Momjian 已提交
4518 4519
	var->variable = valueAddr;
	var->reset_val = *valueAddr;
4520
	var->assign_hook = assign_hook;
B
Bruce Momjian 已提交
4521
	var->show_hook = show_hook;
4522 4523 4524
	define_custom_variable(&var->gen);
}

N
Neil Conway 已提交
4525
void
B
Bruce Momjian 已提交
4526
EmitWarningsOnPlaceholders(const char *className)
4527
{
B
Bruce Momjian 已提交
4528 4529 4530 4531
	struct config_generic **vars = guc_variables;
	struct config_generic **last = vars + num_guc_variables;

	int			nameLen = strlen(className);
4532

B
Bruce Momjian 已提交
4533
	while (vars < last)
4534
	{
B
Bruce Momjian 已提交
4535 4536 4537 4538 4539
		struct config_generic *var = *vars++;

		if ((var->flags & GUC_CUSTOM_PLACEHOLDER) != 0 &&
			strncmp(className, var->name, nameLen) == 0 &&
			var->name[nameLen] == GUC_QUALIFIER_SEPARATOR)
4540 4541
		{
			ereport(INFO,
B
Bruce Momjian 已提交
4542 4543
					(errcode(ERRCODE_UNDEFINED_OBJECT),
					 errmsg("unrecognized configuration parameter \"%s\"", var->name)));
4544 4545 4546 4547 4548
		}
	}
}


4549 4550 4551 4552
/*
 * SHOW command
 */
void
4553
GetPGVariable(const char *name, DestReceiver *dest)
4554
{
4555
	if (pg_strcasecmp(name, "all") == 0)
4556
		ShowAllGUCConfig(dest);
4557
	else
4558 4559 4560 4561 4562 4563 4564 4565
		ShowGUCConfigOption(name, dest);
}

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

4566
	if (pg_strcasecmp(name, "all") == 0)
4567
	{
4568 4569
		/* need a tuple descriptor representing three TEXT columns */
		tupdesc = CreateTemplateTupleDesc(3, false);
4570
		TupleDescInitEntry(tupdesc, (AttrNumber) 1, "name",
4571
						   TEXTOID, -1, 0);
4572
		TupleDescInitEntry(tupdesc, (AttrNumber) 2, "setting",
4573
						   TEXTOID, -1, 0);
4574 4575 4576
		TupleDescInitEntry(tupdesc, (AttrNumber) 3, "description",
						   TEXTOID, -1, 0);

4577 4578 4579 4580 4581 4582 4583 4584 4585 4586
	}
	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);
4587
		TupleDescInitEntry(tupdesc, (AttrNumber) 1, varname,
4588
						   TEXTOID, -1, 0);
4589 4590
	}
	return tupdesc;
4591 4592 4593 4594 4595 4596 4597 4598
}

/*
 * RESET command
 */
void
ResetPGVariable(const char *name)
{
4599
	if (pg_strcasecmp(name, "all") == 0)
4600 4601 4602 4603 4604 4605 4606 4607 4608 4609 4610 4611 4612 4613
		ResetAllOptions();
	else
		set_config_option(name,
						  NULL,
						  (superuser() ? PGC_SUSET : PGC_USERSET),
						  PGC_S_SESSION,
						  false,
						  true);
}


/*
 * SHOW command
 */
4614
static void
4615
ShowGUCConfigOption(const char *name, DestReceiver *dest)
4616
{
4617
	TupOutputState *tstate;
B
Bruce Momjian 已提交
4618 4619 4620
	TupleDesc	tupdesc;
	const char *varname;
	char	   *value;
4621

4622 4623 4624
	/* Get the value and canonical spelling of name */
	value = GetConfigOptionByName(name, &varname);

4625
	/* need a tuple descriptor representing a single TEXT column */
4626
	tupdesc = CreateTemplateTupleDesc(1, false);
4627
	TupleDescInitEntry(tupdesc, (AttrNumber) 1, varname,
4628
					   TEXTOID, -1, 0);
4629

4630 4631 4632 4633
	/* prepare for projection of tuples */
	tstate = begin_tup_output_tupdesc(dest, tupdesc);

	/* Send it */
4634
	do_text_output_oneline(tstate, value);
4635 4636

	end_tup_output(tstate);
4637 4638
}

4639 4640 4641
/*
 * SHOW ALL command
 */
4642
static void
4643
ShowAllGUCConfig(DestReceiver *dest)
4644
{
4645
	bool		am_superuser = superuser();
4646
	int			i;
4647
	TupOutputState *tstate;
B
Bruce Momjian 已提交
4648
	TupleDesc	tupdesc;
4649
	char	   *values[3];
4650

4651 4652
	/* need a tuple descriptor representing three TEXT columns */
	tupdesc = CreateTemplateTupleDesc(3, false);
4653
	TupleDescInitEntry(tupdesc, (AttrNumber) 1, "name",
4654
					   TEXTOID, -1, 0);
4655
	TupleDescInitEntry(tupdesc, (AttrNumber) 2, "setting",
4656
					   TEXTOID, -1, 0);
4657 4658 4659
	TupleDescInitEntry(tupdesc, (AttrNumber) 3, "description",
					   TEXTOID, -1, 0);
					   
4660 4661 4662

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

4664 4665
	for (i = 0; i < num_guc_variables; i++)
	{
4666 4667
		struct config_generic *conf = guc_variables[i];

4668 4669
		if ((conf->flags & GUC_NO_SHOW_ALL) ||
			((conf->flags & GUC_SUPERUSER_ONLY) && !am_superuser))
4670
			continue;
4671 4672

		/* assign to the values array */
4673 4674
		values[0] = (char *) conf->name;
		values[1] = _ShowOption(conf);
4675
		values[2] = (char *) conf->short_desc;
4676 4677 4678

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

4680 4681 4682
		/* clean up */
		if (values[1] != NULL)
			pfree(values[1]);
4683
	}
4684 4685

	end_tup_output(tstate);
4686
}
4687

4688
/*
4689 4690
 * Return GUC variable value by name; optionally return canonical
 * form of name.  Return value is palloc'd.
4691 4692
 */
char *
4693
GetConfigOptionByName(const char *name, const char **varname)
4694 4695 4696
{
	struct config_generic *record;

4697
	record = find_option(name, ERROR);
4698
	if (record == NULL)
4699 4700
		ereport(ERROR,
				(errcode(ERRCODE_UNDEFINED_OBJECT),
B
Bruce Momjian 已提交
4701
		   errmsg("unrecognized configuration parameter \"%s\"", name)));
4702 4703 4704 4705
	if ((record->flags & GUC_SUPERUSER_ONLY) && !superuser())
		ereport(ERROR,
				(errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
				 errmsg("must be superuser to examine \"%s\"", name)));
4706

4707 4708 4709
	if (varname)
		*varname = record->name;

4710 4711 4712 4713
	return _ShowOption(record);
}

/*
4714 4715
 * Return GUC variable value by variable number; optionally return canonical
 * form of name.  Return value is palloc'd.
4716
 */
4717 4718
void
GetConfigOptionByNum(int varnum, const char **values, bool *noshow)
4719
{
B
Bruce Momjian 已提交
4720 4721
	char		buffer[256];
	struct config_generic *conf;
4722 4723 4724 4725 4726

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

	conf = guc_variables[varnum];
4727

4728
	if (noshow)
4729 4730 4731 4732 4733 4734 4735
	{
		if ((conf->flags & GUC_NO_SHOW_ALL) ||
			((conf->flags & GUC_SUPERUSER_ONLY) && !superuser()))
			*noshow = true;
		else
			*noshow = false;
	}
4736

4737 4738 4739 4740 4741 4742 4743 4744
	/* first get the generic attributes */

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

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

4745 4746 4747 4748 4749 4750 4751 4752 4753
	/* group */
	values[2] = config_group_names[conf->group];

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

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

4754
	/* context */
4755
	values[5] = GucContext_Names[conf->context];
4756 4757

	/* vartype */
4758
	values[6] = config_type_names[conf->vartype];
4759 4760

	/* source */
4761
	values[7] = GucSource_Names[conf->source];
4762 4763 4764 4765 4766 4767 4768

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

				/* max_val */
4772
				values[9] = NULL;
4773 4774 4775 4776 4777 4778 4779 4780 4781
			}
			break;

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

				/* min_val */
				snprintf(buffer, sizeof(buffer), "%d", lconf->min);
4782
				values[8] = pstrdup(buffer);
4783 4784 4785

				/* max_val */
				snprintf(buffer, sizeof(buffer), "%d", lconf->max);
4786
				values[9] = pstrdup(buffer);
4787 4788 4789 4790 4791 4792 4793 4794 4795
			}
			break;

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

				/* min_val */
				snprintf(buffer, sizeof(buffer), "%g", lconf->min);
4796
				values[8] = pstrdup(buffer);
4797 4798 4799

				/* max_val */
				snprintf(buffer, sizeof(buffer), "%g", lconf->max);
4800
				values[9] = pstrdup(buffer);
4801 4802 4803 4804 4805 4806
			}
			break;

		case PGC_STRING:
			{
				/* min_val */
4807
				values[8] = NULL;
4808 4809

				/* max_val */
4810
				values[9] = NULL;
4811 4812 4813 4814 4815 4816
			}
			break;

		default:
			{
				/*
B
Bruce Momjian 已提交
4817 4818
				 * should never get here, but in case we do, set 'em to
				 * NULL
4819 4820 4821
				 */

				/* min_val */
4822
				values[8] = NULL;
4823 4824

				/* max_val */
4825
				values[9] = NULL;
4826 4827 4828
			}
			break;
	}
4829 4830 4831 4832 4833 4834 4835 4836 4837 4838 4839 4840 4841 4842 4843 4844 4845 4846
}

/*
 * 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 已提交
4847 4848 4849
	char	   *varname;
	char	   *varval;
	text	   *result_text;
4850 4851

	/* Get the GUC variable name */
4852
	varname = DatumGetCString(DirectFunctionCall1(textout, PG_GETARG_DATUM(0)));
4853 4854

	/* Get the value */
4855
	varval = GetConfigOptionByName(varname, NULL);
4856 4857 4858 4859 4860 4861 4862 4863

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

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

4864 4865 4866 4867
/*
 * show_all_settings - equiv to SHOW ALL command but implemented as
 * a Table Function.
 */
4868
#define NUM_PG_SETTINGS_ATTS	10
4869

4870 4871 4872
Datum
show_all_settings(PG_FUNCTION_ARGS)
{
B
Bruce Momjian 已提交
4873 4874 4875 4876 4877 4878
	FuncCallContext *funcctx;
	TupleDesc	tupdesc;
	int			call_cntr;
	int			max_calls;
	AttInMetadata *attinmeta;
	MemoryContext oldcontext;
4879 4880

	/* stuff done only on the first call of the function */
B
Bruce Momjian 已提交
4881 4882
	if (SRF_IS_FIRSTCALL())
	{
4883
		/* create a function context for cross-call persistence */
B
Bruce Momjian 已提交
4884
		funcctx = SRF_FIRSTCALL_INIT();
4885

B
Bruce Momjian 已提交
4886 4887 4888 4889
		/*
		 * switch to memory context appropriate for multiple function
		 * calls
		 */
4890 4891
		oldcontext = MemoryContextSwitchTo(funcctx->multi_call_memory_ctx);

4892
		/*
B
Bruce Momjian 已提交
4893 4894
		 * need a tuple descriptor representing NUM_PG_SETTINGS_ATTS
		 * columns of the appropriate types
4895 4896
		 */
		tupdesc = CreateTemplateTupleDesc(NUM_PG_SETTINGS_ATTS, false);
4897
		TupleDescInitEntry(tupdesc, (AttrNumber) 1, "name",
4898
						   TEXTOID, -1, 0);
4899
		TupleDescInitEntry(tupdesc, (AttrNumber) 2, "setting",
4900
						   TEXTOID, -1, 0);
4901
		TupleDescInitEntry(tupdesc, (AttrNumber) 3, "category",
4902
						   TEXTOID, -1, 0);
4903
		TupleDescInitEntry(tupdesc, (AttrNumber) 4, "short_desc",
4904
						   TEXTOID, -1, 0);
4905
		TupleDescInitEntry(tupdesc, (AttrNumber) 5, "extra_desc",
4906
						   TEXTOID, -1, 0);
4907
		TupleDescInitEntry(tupdesc, (AttrNumber) 6, "context",
4908
						   TEXTOID, -1, 0);
4909
		TupleDescInitEntry(tupdesc, (AttrNumber) 7, "vartype",
4910
						   TEXTOID, -1, 0);
4911
		TupleDescInitEntry(tupdesc, (AttrNumber) 8, "source",
4912
						   TEXTOID, -1, 0);
4913
		TupleDescInitEntry(tupdesc, (AttrNumber) 9, "min_val",
4914
						   TEXTOID, -1, 0);
4915
		TupleDescInitEntry(tupdesc, (AttrNumber) 10, "max_val",
4916
						   TEXTOID, -1, 0);
4917 4918

		/*
B
Bruce Momjian 已提交
4919 4920
		 * Generate attribute metadata needed later to produce tuples from
		 * raw C strings
4921 4922 4923 4924 4925 4926
		 */
		attinmeta = TupleDescGetAttInMetadata(tupdesc);
		funcctx->attinmeta = attinmeta;

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

		MemoryContextSwitchTo(oldcontext);
B
Bruce Momjian 已提交
4929
	}
4930 4931

	/* stuff done on every call of the function */
B
Bruce Momjian 已提交
4932
	funcctx = SRF_PERCALL_SETUP();
4933 4934 4935 4936 4937

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

B
Bruce Momjian 已提交
4938 4939
	if (call_cntr < max_calls)	/* do when there is more left to send */
	{
4940
		char	   *values[NUM_PG_SETTINGS_ATTS];
4941 4942 4943 4944 4945 4946 4947 4948 4949
		bool		noshow;
		HeapTuple	tuple;
		Datum		result;

		/*
		 * Get the next visible GUC variable name and value
		 */
		do
		{
4950
			GetConfigOptionByNum(call_cntr, (const char **) values, &noshow);
4951 4952 4953 4954 4955 4956 4957
			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 已提交
4958
					SRF_RETURN_DONE(funcctx);
4959 4960 4961 4962 4963 4964 4965
			}
		} while (noshow);

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

		/* make the tuple into a datum */
4966
		result = HeapTupleGetDatum(tuple);
4967

B
Bruce Momjian 已提交
4968 4969 4970
		SRF_RETURN_NEXT(funcctx, result);
	}
	else
4971 4972
	{
		/* do when there is no more left */
B
Bruce Momjian 已提交
4973
		SRF_RETURN_DONE(funcctx);
4974
	}
4975 4976
}

4977
static char *
B
Bruce Momjian 已提交
4978
_ShowOption(struct config_generic * record)
4979 4980 4981
{
	char		buffer[256];
	const char *val;
4982

4983 4984 4985 4986 4987
	switch (record->vartype)
	{
		case PGC_BOOL:
			{
				struct config_bool *conf = (struct config_bool *) record;
4988

4989 4990 4991 4992 4993 4994 4995 4996 4997 4998 4999 5000 5001 5002 5003 5004 5005 5006 5007 5008 5009 5010 5011 5012 5013 5014 5015 5016 5017 5018 5019 5020 5021 5022 5023 5024 5025 5026 5027 5028
				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;
5029

5030 5031 5032 5033 5034 5035 5036 5037
				if (conf->show_hook)
					val = (*conf->show_hook) ();
				else if (*conf->variable && **conf->variable)
					val = *conf->variable;
				else
					val = "unset";
			}
			break;
5038

5039 5040 5041 5042 5043
		default:
			/* just to keep compiler quiet */
			val = "???";
			break;
	}
5044

5045
	return pstrdup(val);
5046
}
5047 5048


B
Bruce Momjian 已提交
5049
#ifdef EXEC_BACKEND
5050

B
Bruce Momjian 已提交
5051 5052 5053 5054 5055 5056 5057 5058 5059 5060 5061
/*
 *	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)
{
5062 5063 5064
	int			i;
	int			elevel;
	FILE	   *fp;
B
Bruce Momjian 已提交
5065 5066

	Assert(context == PGC_POSTMASTER || context == PGC_SIGHUP);
5067 5068

	elevel = (context == PGC_SIGHUP) ? LOG : ERROR;
B
Bruce Momjian 已提交
5069 5070 5071 5072

	/*
	 * Open file
	 */
5073
	fp = AllocateFile(CONFIG_EXEC_PARAMS_NEW, "w");
5074 5075
	if (!fp)
	{
5076 5077
		ereport(elevel,
				(errcode_for_file_access(),
5078 5079
				 errmsg("could not write to file \"%s\": %m",
						CONFIG_EXEC_PARAMS_NEW)));
B
Bruce Momjian 已提交
5080 5081 5082 5083 5084 5085 5086 5087 5088 5089 5090 5091 5092 5093 5094 5095 5096 5097 5098 5099 5100 5101 5102 5103 5104 5105 5106 5107 5108 5109 5110 5111 5112 5113 5114 5115 5116 5117 5118 5119 5120 5121 5122 5123 5124 5125 5126 5127 5128 5129 5130 5131 5132 5133 5134 5135 5136
		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);
		}
	}

5137 5138 5139 5140
	if (FreeFile(fp))
	{
		ereport(elevel,
				(errcode_for_file_access(),
5141 5142
				 errmsg("could not write to file \"%s\": %m",
						CONFIG_EXEC_PARAMS_NEW)));
5143 5144 5145
		return;
	}

5146
	/*
B
Bruce Momjian 已提交
5147 5148
	 * Put new file in place.  This could delay on Win32, but we don't
	 * hold any exclusive locks.
5149
	 */
5150
	rename(CONFIG_EXEC_PARAMS_NEW, CONFIG_EXEC_PARAMS);
B
Bruce Momjian 已提交
5151 5152 5153 5154 5155 5156 5157 5158 5159 5160 5161
}


/*
 *	Read string, including null byte from file
 *
 *	Return NULL on EOF and nothing read
 */
static char *
read_string_with_null(FILE *fp)
{
5162 5163 5164 5165
	int			i = 0,
				ch,
				maxlen = 256;
	char	   *str = NULL;
B
Bruce Momjian 已提交
5166 5167 5168 5169 5170 5171 5172 5173

	do
	{
		if ((ch = fgetc(fp)) == EOF)
		{
			if (i == 0)
				return NULL;
			else
5174
				elog(FATAL, "invalid format of exec config params file");
B
Bruce Momjian 已提交
5175 5176
		}
		if (i == 0)
5177
			str = guc_malloc(FATAL, maxlen);
B
Bruce Momjian 已提交
5178
		else if (i == maxlen)
5179
			str = guc_realloc(FATAL, str, maxlen *= 2);
B
Bruce Momjian 已提交
5180 5181 5182 5183 5184 5185 5186 5187 5188 5189 5190 5191 5192 5193
		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)
{
5194 5195 5196 5197
	FILE	   *fp;
	char	   *varname,
			   *varvalue;
	int			varsource;
B
Bruce Momjian 已提交
5198 5199 5200 5201

	/*
	 * Open file
	 */
5202
	fp = AllocateFile(CONFIG_EXEC_PARAMS, "r");
5203 5204 5205 5206
	if (!fp)
	{
		/* File not found is fine */
		if (errno != ENOENT)
5207 5208
			ereport(FATAL,
					(errcode_for_file_access(),
5209 5210
					 errmsg("could not read from file \"%s\": %m",
							CONFIG_EXEC_PARAMS)));
B
Bruce Momjian 已提交
5211
		return;
5212
	}
B
Bruce Momjian 已提交
5213

5214
	for (;;)
B
Bruce Momjian 已提交
5215
	{
5216 5217
		struct config_generic *record;

B
Bruce Momjian 已提交
5218 5219 5220
		if ((varname = read_string_with_null(fp)) == NULL)
			break;

5221
		if ((record = find_option(varname, FATAL)) == NULL)
B
Bruce Momjian 已提交
5222
			elog(FATAL, "failed to locate variable %s in exec config params file", varname);
B
Bruce Momjian 已提交
5223
		if ((varvalue = read_string_with_null(fp)) == NULL)
5224
			elog(FATAL, "invalid format of exec config params file");
5225
		if (fread(&varsource, sizeof(varsource), 1, fp) == 0)
5226
			elog(FATAL, "invalid format of exec config params file");
B
Bruce Momjian 已提交
5227

5228
		(void) set_config_option(varname, varvalue, record->context,
5229
								 varsource, false, true);
B
Bruce Momjian 已提交
5230 5231 5232 5233 5234 5235
		free(varname);
		free(varvalue);
	}

	FreeFile(fp);
}
5236 5237

#endif /* EXEC_BACKEND */
B
Bruce Momjian 已提交
5238 5239


5240 5241 5242 5243 5244 5245 5246 5247
/*
 * 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 已提交
5248
ParseLongOption(const char *string, char **name, char **value)
5249
{
B
Bruce Momjian 已提交
5250 5251
	size_t		equal_pos;
	char	   *cp;
5252 5253 5254 5255 5256 5257 5258 5259 5260

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

	equal_pos = strcspn(string, "=");

	if (string[equal_pos] == '=')
	{
5261
		*name = guc_malloc(FATAL, equal_pos + 1);
5262 5263 5264
		strncpy(*name, string, equal_pos);
		(*name)[equal_pos] = '\0';

5265
		*value = guc_strdup(FATAL, &string[equal_pos + 1]);
5266
	}
B
Bruce Momjian 已提交
5267
	else
5268
	{
5269
		/* no equal sign in string */
5270
		*name = guc_strdup(FATAL, string);
5271 5272 5273
		*value = NULL;
	}

B
Bruce Momjian 已提交
5274
	for (cp = *name; *cp; cp++)
5275 5276 5277
		if (*cp == '-')
			*cp = '_';
}
5278 5279


5280
/*
5281
 * Handle options fetched from pg_database.datconfig or pg_authid.rolconfig.
5282
 * The array parameter must be an array of TEXT (it must not be NULL).
5283
 */
5284 5285 5286
void
ProcessGUCArray(ArrayType *array, GucSource source)
{
B
Bruce Momjian 已提交
5287
	int			i;
5288

5289
	Assert(array != NULL);
5290 5291 5292
	Assert(ARR_ELEMTYPE(array) == TEXTOID);
	Assert(ARR_NDIM(array) == 1);
	Assert(ARR_LBOUND(array)[0] == 1);
5293
	Assert(source == PGC_S_DATABASE || source == PGC_S_USER);
5294 5295 5296 5297 5298 5299 5300 5301 5302 5303

	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 已提交
5304 5305 5306 5307
					  -1 /* varlenarray */ ,
					  -1 /* TEXT's typlen */ ,
					  false /* TEXT's typbyval */ ,
					  'i' /* TEXT's typalign */ ,
5308 5309 5310 5311 5312 5313
					  &isnull);

		if (isnull)
			continue;

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

5315 5316 5317
		ParseLongOption(s, &name, &value);
		if (!value)
		{
5318 5319
			ereport(WARNING,
					(errcode(ERRCODE_SYNTAX_ERROR),
5320
					 errmsg("could not parse setting for parameter \"%s\"", name)));
5321
			free(name);
B
Bruce Momjian 已提交
5322
			continue;
5323 5324
		}

5325
		/*
B
Bruce Momjian 已提交
5326
		 * We process all these options at SUSET level.  We assume that
5327
		 * the right to insert an option into pg_database or pg_authid was
5328 5329
		 * checked when it was inserted.
		 */
5330
		SetConfigOption(name, value, PGC_SUSET, source);
5331 5332 5333 5334

		free(name);
		if (value)
			free(value);
5335 5336 5337 5338
	}
}


5339 5340 5341 5342
/*
 * Add an entry to an option array.  The array parameter may be NULL
 * to indicate the current table entry is NULL.
 */
5343 5344 5345
ArrayType *
GUCArrayAdd(ArrayType *array, const char *name, const char *value)
{
5346
	const char *varname;
5347 5348 5349 5350 5351 5352 5353 5354 5355 5356
	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,
5357
					  PGC_S_TEST, false, false);
5358

5359 5360 5361 5362
	/* convert name to canonical spelling, so we can use plain strcmp */
	(void) GetConfigOptionByName(name, &varname);
	name = varname;

5363 5364 5365
	newval = palloc(strlen(name) + 1 + strlen(value) + 1);
	sprintf(newval, "%s=%s", name, value);
	datum = DirectFunctionCall1(textin, CStringGetDatum(newval));
B
Bruce Momjian 已提交
5366

5367 5368
	if (array)
	{
B
Bruce Momjian 已提交
5369 5370 5371
		int			index;
		bool		isnull;
		int			i;
5372

5373 5374 5375 5376
		Assert(ARR_ELEMTYPE(array) == TEXTOID);
		Assert(ARR_NDIM(array) == 1);
		Assert(ARR_LBOUND(array)[0] == 1);

B
Bruce Momjian 已提交
5377
		index = ARR_DIMS(array)[0] + 1; /* add after end */
5378 5379 5380 5381 5382 5383 5384

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

			d = array_ref(array, 1, &i,
B
Bruce Momjian 已提交
5385 5386 5387 5388
						  -1 /* varlenarray */ ,
						  -1 /* TEXT's typlen */ ,
						  false /* TEXT's typbyval */ ,
						  'i' /* TEXT's typalign */ ,
5389
						  &isnull);
5390 5391
			if (isnull)
				continue;
5392
			current = DatumGetCString(DirectFunctionCall1(textout, d));
B
Bruce Momjian 已提交
5393
			if (strncmp(current, newval, strlen(name) + 1) == 0)
5394 5395 5396 5397 5398 5399 5400
			{
				index = i;
				break;
			}
		}

		isnull = false;
5401 5402
		a = array_set(array, 1, &index,
					  datum,
B
Bruce Momjian 已提交
5403 5404 5405 5406
					  -1 /* varlenarray */ ,
					  -1 /* TEXT's typlen */ ,
					  false /* TEXT's typbyval */ ,
					  'i' /* TEXT's typalign */ ,
5407
					  &isnull);
5408 5409
	}
	else
5410 5411 5412
		a = construct_array(&datum, 1,
							TEXTOID,
							-1, false, 'i');
5413 5414 5415 5416 5417

	return a;
}


5418 5419 5420 5421 5422
/*
 * 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.
 */
5423 5424 5425
ArrayType *
GUCArrayDelete(ArrayType *array, const char *name)
{
5426
	const char *varname;
B
Bruce Momjian 已提交
5427 5428 5429
	ArrayType  *newarray;
	int			i;
	int			index;
5430 5431 5432 5433 5434 5435

	Assert(name);

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

5438 5439 5440 5441
	/* convert name to canonical spelling, so we can use plain strcmp */
	(void) GetConfigOptionByName(name, &varname);
	name = varname;

5442 5443 5444 5445 5446
	/* if array is currently null, then surely nothing to delete */
	if (!array)
		return NULL;

	newarray = NULL;
5447 5448 5449 5450 5451 5452 5453 5454 5455
	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 已提交
5456 5457 5458 5459
					  -1 /* varlenarray */ ,
					  -1 /* TEXT's typlen */ ,
					  false /* TEXT's typbyval */ ,
					  'i' /* TEXT's typalign */ ,
5460
					  &isnull);
5461 5462
		if (isnull)
			continue;
5463 5464
		val = DatumGetCString(DirectFunctionCall1(textout, d));

5465
		/* ignore entry if it's what we want to delete */
B
Bruce Momjian 已提交
5466
		if (strncmp(val, name, strlen(name)) == 0
5467 5468 5469
			&& val[strlen(name)] == '=')
			continue;

5470 5471 5472 5473 5474 5475 5476 5477 5478 5479 5480 5481 5482 5483 5484 5485 5486
		/* 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');

5487 5488 5489 5490 5491
		index++;
	}

	return newarray;
}
5492

5493 5494 5495 5496 5497

/*
 * assign_hook subroutines
 */

5498 5499 5500
static const char *
assign_log_destination(const char *value, bool doit, GucSource source)
{
B
Bruce Momjian 已提交
5501 5502 5503 5504 5505
	char	   *rawstring;
	List	   *elemlist;
	ListCell   *l;
	int			newlogdest = 0;

5506 5507 5508 5509
	/* Need a modifiable copy of string */
	rawstring = pstrdup(value);

	/* Parse string into list of identifiers */
B
Bruce Momjian 已提交
5510
	if (!SplitIdentifierString(rawstring, ',', &elemlist))
5511 5512 5513
	{
		/* syntax error in list */
		pfree(rawstring);
5514
		list_free(elemlist);
5515 5516 5517 5518 5519 5520 5521 5522 5523
		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)
	{
B
Bruce Momjian 已提交
5524 5525 5526
		char	   *tok = (char *) lfirst(l);

		if (pg_strcasecmp(tok, "stderr") == 0)
5527 5528
			newlogdest |= LOG_DESTINATION_STDERR;
#ifdef HAVE_SYSLOG
B
Bruce Momjian 已提交
5529
		else if (pg_strcasecmp(tok, "syslog") == 0)
5530 5531 5532
			newlogdest |= LOG_DESTINATION_SYSLOG;
#endif
#ifdef WIN32
B
Bruce Momjian 已提交
5533
		else if (pg_strcasecmp(tok, "eventlog") == 0)
5534 5535
			newlogdest |= LOG_DESTINATION_EVENTLOG;
#endif
B
Bruce Momjian 已提交
5536 5537
		else
		{
5538 5539 5540
			if (source >= PGC_S_INTERACTIVE)
				ereport(ERROR,
						(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
P
Peter Eisentraut 已提交
5541
						 errmsg("unrecognized \"log_destination\" key word: \"%s\"",
5542 5543
								tok)));
			pfree(rawstring);
5544
			list_free(elemlist);
5545 5546 5547 5548
			return NULL;
		}
	}

5549 5550 5551
	if (doit)
		Log_destination = newlogdest;

5552
	pfree(rawstring);
5553
	list_free(elemlist);
5554 5555 5556 5557

	return value;
}

5558 5559 5560
#ifdef HAVE_SYSLOG

static const char *
5561
assign_syslog_facility(const char *facility, bool doit, GucSource source)
5562
{
5563 5564
	int		syslog_fac;

5565
	if (pg_strcasecmp(facility, "LOCAL0") == 0)
5566 5567 5568 5569 5570 5571 5572 5573 5574 5575 5576 5577 5578 5579 5580 5581 5582 5583 5584 5585 5586 5587 5588 5589 5590 5591
		syslog_fac = LOG_LOCAL0;
	else if (pg_strcasecmp(facility, "LOCAL1") == 0)
		syslog_fac = LOG_LOCAL1;
	else if (pg_strcasecmp(facility, "LOCAL2") == 0)
		syslog_fac = LOG_LOCAL2;
	else if (pg_strcasecmp(facility, "LOCAL3") == 0)
		syslog_fac = LOG_LOCAL3;
	else if (pg_strcasecmp(facility, "LOCAL4") == 0)
		syslog_fac = LOG_LOCAL4;
	else if (pg_strcasecmp(facility, "LOCAL5") == 0)
		syslog_fac = LOG_LOCAL5;
	else if (pg_strcasecmp(facility, "LOCAL6") == 0)
		syslog_fac = LOG_LOCAL6;
	else if (pg_strcasecmp(facility, "LOCAL7") == 0)
		syslog_fac = LOG_LOCAL7;
	else
		return NULL;			/* reject */

	if (doit)
	{
		syslog_facility = syslog_fac;
		set_syslog_parameters(syslog_ident_str ? syslog_ident_str : "postgres",
							  syslog_facility);
	}

	return facility;
5592
}
5593 5594 5595 5596 5597 5598 5599 5600 5601 5602 5603

static const char *
assign_syslog_ident(const char *ident, bool doit, GucSource source)
{
	if (doit)
		set_syslog_parameters(ident, syslog_facility);

	return ident;
}

#endif /* HAVE_SYSLOG */
5604 5605 5606


static const char *
5607
assign_defaultxactisolevel(const char *newval, bool doit, GucSource source)
5608
{
5609
	if (pg_strcasecmp(newval, "serializable") == 0)
5610 5611 5612 5613
	{
		if (doit)
			DefaultXactIsoLevel = XACT_SERIALIZABLE;
	}
5614
	else if (pg_strcasecmp(newval, "repeatable read") == 0)
5615 5616 5617 5618
	{
		if (doit)
			DefaultXactIsoLevel = XACT_REPEATABLE_READ;
	}
5619
	else if (pg_strcasecmp(newval, "read committed") == 0)
5620 5621 5622 5623
	{
		if (doit)
			DefaultXactIsoLevel = XACT_READ_COMMITTED;
	}
5624
	else if (pg_strcasecmp(newval, "read uncommitted") == 0)
5625 5626 5627 5628
	{
		if (doit)
			DefaultXactIsoLevel = XACT_READ_UNCOMMITTED;
	}
5629 5630 5631 5632 5633 5634
	else
		return NULL;
	return newval;
}

static const char *
5635
assign_log_min_messages(const char *newval,
5636
						bool doit, GucSource source)
5637
{
5638
	return (assign_msglvl(&log_min_messages, newval, doit, source));
5639 5640
}

5641
static const char *
5642
assign_client_min_messages(const char *newval, bool doit, GucSource source)
5643
{
5644
	return (assign_msglvl(&client_min_messages, newval, doit, source));
5645 5646
}

5647
static const char *
5648
assign_min_error_statement(const char *newval, bool doit, GucSource source)
5649
{
5650
	return (assign_msglvl(&log_min_error_statement, newval, doit, source));
5651 5652 5653
}

static const char *
5654
assign_msglvl(int *var, const char *newval, bool doit, GucSource source)
5655
{
5656
	if (pg_strcasecmp(newval, "debug") == 0)
B
Bruce Momjian 已提交
5657 5658
	{
		if (doit)
5659
			(*var) = DEBUG2;
B
Bruce Momjian 已提交
5660
	}
5661
	else if (pg_strcasecmp(newval, "debug5") == 0)
B
Bruce Momjian 已提交
5662 5663 5664 5665
	{
		if (doit)
			(*var) = DEBUG5;
	}
5666
	else if (pg_strcasecmp(newval, "debug4") == 0)
B
Bruce Momjian 已提交
5667 5668 5669 5670
	{
		if (doit)
			(*var) = DEBUG4;
	}
5671
	else if (pg_strcasecmp(newval, "debug3") == 0)
B
Bruce Momjian 已提交
5672 5673 5674 5675
	{
		if (doit)
			(*var) = DEBUG3;
	}
5676
	else if (pg_strcasecmp(newval, "debug2") == 0)
B
Bruce Momjian 已提交
5677 5678 5679 5680
	{
		if (doit)
			(*var) = DEBUG2;
	}
5681
	else if (pg_strcasecmp(newval, "debug1") == 0)
B
Bruce Momjian 已提交
5682 5683 5684 5685
	{
		if (doit)
			(*var) = DEBUG1;
	}
5686
	else if (pg_strcasecmp(newval, "log") == 0)
B
Bruce Momjian 已提交
5687 5688 5689 5690
	{
		if (doit)
			(*var) = LOG;
	}
B
Bruce Momjian 已提交
5691

5692
	/*
B
Bruce Momjian 已提交
5693 5694
	 * Client_min_messages always prints 'info', but we allow it as a
	 * value anyway.
5695
	 */
5696
	else if (pg_strcasecmp(newval, "info") == 0)
B
Bruce Momjian 已提交
5697 5698 5699 5700
	{
		if (doit)
			(*var) = INFO;
	}
5701
	else if (pg_strcasecmp(newval, "notice") == 0)
B
Bruce Momjian 已提交
5702 5703 5704 5705
	{
		if (doit)
			(*var) = NOTICE;
	}
5706
	else if (pg_strcasecmp(newval, "warning") == 0)
B
Bruce Momjian 已提交
5707 5708 5709 5710
	{
		if (doit)
			(*var) = WARNING;
	}
5711
	else if (pg_strcasecmp(newval, "error") == 0)
B
Bruce Momjian 已提交
5712 5713 5714 5715
	{
		if (doit)
			(*var) = ERROR;
	}
5716
	/* We allow FATAL/PANIC for client-side messages too. */
5717
	else if (pg_strcasecmp(newval, "fatal") == 0)
5718 5719 5720 5721
	{
		if (doit)
			(*var) = FATAL;
	}
5722
	else if (pg_strcasecmp(newval, "panic") == 0)
5723 5724 5725 5726
	{
		if (doit)
			(*var) = PANIC;
	}
5727 5728 5729 5730
	else
		return NULL;			/* fail */
	return newval;				/* OK */
}
5731

5732
static const char *
5733
assign_log_error_verbosity(const char *newval, bool doit, GucSource source)
5734
{
5735
	if (pg_strcasecmp(newval, "terse") == 0)
5736 5737 5738 5739
	{
		if (doit)
			Log_error_verbosity = PGERROR_TERSE;
	}
5740
	else if (pg_strcasecmp(newval, "default") == 0)
5741 5742 5743 5744
	{
		if (doit)
			Log_error_verbosity = PGERROR_DEFAULT;
	}
5745
	else if (pg_strcasecmp(newval, "verbose") == 0)
5746 5747 5748 5749 5750 5751 5752 5753 5754
	{
		if (doit)
			Log_error_verbosity = PGERROR_VERBOSE;
	}
	else
		return NULL;			/* fail */
	return newval;				/* OK */
}

5755 5756 5757
static const char *
assign_log_statement(const char *newval, bool doit, GucSource source)
{
5758
	if (pg_strcasecmp(newval, "none") == 0)
5759 5760
	{
		if (doit)
5761
			log_statement = LOGSTMT_NONE;
5762
	}
5763
	else if (pg_strcasecmp(newval, "ddl") == 0)
5764 5765
	{
		if (doit)
5766
			log_statement = LOGSTMT_DDL;
5767
	}
5768
	else if (pg_strcasecmp(newval, "mod") == 0)
5769 5770
	{
		if (doit)
5771
			log_statement = LOGSTMT_MOD;
5772
	}
5773
	else if (pg_strcasecmp(newval, "all") == 0)
5774 5775
	{
		if (doit)
5776
			log_statement = LOGSTMT_ALL;
5777 5778 5779 5780 5781 5782
	}
	else
		return NULL;			/* fail */
	return newval;				/* OK */
}

5783 5784 5785 5786 5787 5788 5789 5790 5791 5792 5793 5794 5795
static const char *
show_num_temp_buffers(void)
{
	/*
	 * We show the GUC var until local buffers have been initialized,
	 * and NLocBuffer afterwards.
	 */
	static char nbuf[32];

	sprintf(nbuf, "%d", NLocBuffer ? NLocBuffer : num_temp_buffers);
	return nbuf;
}

5796
static bool
5797
assign_phony_autocommit(bool newval, bool doit, GucSource source)
5798 5799 5800
{
	if (!newval)
	{
5801
		if (doit && source >= PGC_S_INTERACTIVE)
5802 5803
			ereport(ERROR,
					(errcode(ERRCODE_FEATURE_NOT_SUPPORTED),
B
Bruce Momjian 已提交
5804
				errmsg("SET AUTOCOMMIT TO OFF is no longer supported")));
5805 5806 5807 5808 5809
		return false;
	}
	return true;
}

5810 5811 5812
static const char *
assign_custom_variable_classes(const char *newval, bool doit, GucSource source)
{
B
Bruce Momjian 已提交
5813 5814
	/*
	 * Check syntax. newval must be a comma separated list of identifiers.
5815 5816
	 * Whitespace is allowed but skipped.
	 */
B
Bruce Momjian 已提交
5817
	bool		hasSpaceAfterToken = false;
5818
	const char *cp = newval;
B
Bruce Momjian 已提交
5819 5820
	int			symLen = 0;
	int			c;
5821 5822 5823
	StringInfoData buf;

	initStringInfo(&buf);
B
Bruce Momjian 已提交
5824
	while ((c = *cp++) != 0)
5825
	{
B
Bruce Momjian 已提交
5826
		if (isspace(c))
5827
		{
B
Bruce Momjian 已提交
5828
			if (symLen > 0)
5829 5830 5831 5832
				hasSpaceAfterToken = true;
			continue;
		}

B
Bruce Momjian 已提交
5833
		if (c == ',')
5834 5835
		{
			hasSpaceAfterToken = false;
B
Bruce Momjian 已提交
5836
			if (symLen > 0)
5837 5838 5839 5840 5841 5842 5843
			{
				symLen = 0;
				appendStringInfoChar(&buf, ',');
			}
			continue;
		}

B
Bruce Momjian 已提交
5844
		if (hasSpaceAfterToken || !isalnum(c))
5845
		{
B
Bruce Momjian 已提交
5846 5847 5848
			/*
			 * Syntax error due to token following space after token or
			 * non alpha numeric character
5849
			 */
5850
			ereport(LOG,
5851
					(errcode(ERRCODE_SYNTAX_ERROR),
P
Peter Eisentraut 已提交
5852
					 errmsg("invalid syntax for \"custom_variable_classes\": \"%s\"", newval)));
5853
			pfree(buf.data);
5854 5855 5856
			return NULL;
		}
		symLen++;
B
Bruce Momjian 已提交
5857
		appendStringInfoChar(&buf, (char) c);
5858 5859
	}

5860
	/* Remove stray ',' at end */
B
Bruce Momjian 已提交
5861
	if (symLen == 0 && buf.len > 0)
5862
		buf.data[--buf.len] = '\0';
5863

B
Bruce Momjian 已提交
5864
	if (buf.len == 0)
5865
		newval = NULL;
B
Bruce Momjian 已提交
5866
	else if (doit)
5867 5868 5869 5870 5871
		newval = strdup(buf.data);

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

5873 5874 5875
static bool
assign_stage_log_stats(bool newval, bool doit, GucSource source)
{
5876
	if (newval && log_statement_stats)
5877
	{
5878 5879 5880 5881
		if (source >= PGC_S_INTERACTIVE)
			ereport(ERROR,
					(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
					 errmsg("cannot enable parameter when \"log_statement_stats\" is true")));
5882 5883
		/* source == PGC_S_OVERRIDE means do it anyway, eg at xact abort */
		else if (source != PGC_S_OVERRIDE)
5884
			return false;
5885 5886 5887 5888 5889 5890 5891
	}
	return true;
}

static bool
assign_log_stats(bool newval, bool doit, GucSource source)
{
5892 5893
	if (newval &&
		(log_parser_stats || log_planner_stats || log_executor_stats))
5894
	{
5895 5896 5897 5898 5899 5900
		if (source >= PGC_S_INTERACTIVE)
			ereport(ERROR,
					(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
					 errmsg("cannot enable \"log_statement_stats\" when "
							"\"log_parser_stats\", \"log_planner_stats\", "
							"or \"log_executor_stats\" is true")));
5901 5902
		/* source == PGC_S_OVERRIDE means do it anyway, eg at xact abort */
		else if (source != PGC_S_OVERRIDE)
5903
			return false;
5904 5905 5906 5907
	}
	return true;
}

5908 5909 5910
static bool
assign_transaction_read_only(bool newval, bool doit, GucSource source)
{
5911 5912 5913 5914 5915 5916 5917
	/* Can't go to r/w mode inside a r/o transaction */
	if (newval == false && XactReadOnly && IsSubTransaction())
	{
		if (source >= PGC_S_INTERACTIVE)
			ereport(ERROR,
					(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
					 errmsg("cannot set transaction read-write mode inside a read-only transaction")));
5918 5919 5920
		/* source == PGC_S_OVERRIDE means do it anyway, eg at xact abort */
		else if (source != PGC_S_OVERRIDE)
			return false;
5921
	}
5922 5923
	return true;
}
5924

5925 5926 5927 5928 5929
static const char *
assign_canonical_path(const char *newval, bool doit, GucSource source)
{
	if (doit)
	{
B
Bruce Momjian 已提交
5930 5931
		char	   *canon_val = guc_strdup(ERROR, newval);

5932 5933 5934 5935 5936 5937 5938
		canonicalize_path(canon_val);
		return canon_val;
	}
	else
		return newval;
}

5939 5940 5941
static bool
assign_tcp_keepalives_idle(int newval, bool doit, GucSource source)
{
5942
	if (doit)
5943 5944 5945 5946 5947 5948 5949 5950
		return (pq_setkeepalivesidle(newval, MyProcPort) == STATUS_OK);

	return true;
}

static const char *
show_tcp_keepalives_idle(void)
{
5951 5952 5953
	static char nbuf[16];

	snprintf(nbuf, sizeof(nbuf), "%d", pq_getkeepalivesidle(MyProcPort));
5954 5955 5956 5957 5958 5959
	return nbuf;
}

static bool
assign_tcp_keepalives_interval(int newval, bool doit, GucSource source)
{
5960
	if (doit)
5961 5962 5963 5964 5965 5966 5967 5968
		return (pq_setkeepalivesinterval(newval, MyProcPort) == STATUS_OK);

	return true;
}

static const char *
show_tcp_keepalives_interval(void)
{
5969 5970 5971
	static char nbuf[16];

	snprintf(nbuf, sizeof(nbuf), "%d", pq_getkeepalivesinterval(MyProcPort));
5972 5973 5974 5975 5976 5977
	return nbuf;
}

static bool
assign_tcp_keepalives_count(int newval, bool doit, GucSource source)
{
5978
	if (doit)
5979 5980 5981 5982 5983 5984 5985 5986
		return (pq_setkeepalivescount(newval, MyProcPort) == STATUS_OK);

	return true;
}

static const char *
show_tcp_keepalives_count(void)
{
5987 5988 5989
	static char nbuf[16];

	snprintf(nbuf, sizeof(nbuf), "%d", pq_getkeepalivescount(MyProcPort));
5990 5991
	return nbuf;
}
5992

5993

5994
#include "guc-file.c"