guc.c 146.3 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.300 2005/11/17 22:14:54 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

B
Bruce Momjian 已提交
75
#define CONFIG_FILENAME "postgresql.conf"
76 77
#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;
B
Bruce Momjian 已提交
97 98
extern bool fullPageWrites;

99
#ifdef TRACE_SORT
B
Bruce Momjian 已提交
100
extern bool trace_sort;
101
#endif
102

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

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

109
static const char *assign_syslog_facility(const char *facility,
B
Bruce Momjian 已提交
110
					   bool doit, GucSource source);
111
static const char *assign_syslog_ident(const char *ident,
B
Bruce Momjian 已提交
112
					bool doit, GucSource source);
113
#endif
114

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

138 139 140 141 142 143
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);
144

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

B
Rename:  
Bruce Momjian 已提交
158 159 160
bool		log_parser_stats = false;
bool		log_planner_stats = false;
bool		log_executor_stats = false;
B
Bruce Momjian 已提交
161 162
bool		log_statement_stats = false;		/* this is sort of all three
												 * above together */
163
bool		log_btree_build_stats = false;
164

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

167 168
bool		Australian_timezones = false;

169
bool		Password_encryption = true;
170

171
bool		default_with_oids = false;
172

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

178 179
int			num_temp_buffers = 1000;

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

B
Bruce Momjian 已提交
185 186 187
int			tcp_keepalives_idle;
int			tcp_keepalives_interval;
int			tcp_keepalives_count;
188

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

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

228

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

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

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

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

358

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

388

389
/******** option records follow ********/
390

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

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

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

669
	{
670
		{"explain_pretty_print", PGC_USERSET, CLIENT_CONN_OTHER,
671
			gettext_noop("Uses the indented output format for EXPLAIN VERBOSE."),
672 673 674
			NULL
		},
		&Explain_pretty_print,
675
		true, NULL, NULL
676
	},
677
	{
678
		{"stats_start_collector", PGC_POSTMASTER, STATS_COLLECTOR,
679
			gettext_noop("Starts the server statistics-collection subprocess."),
680 681 682
			NULL
		},
		&pgstat_collect_startcollector,
683
		true, NULL, NULL
684 685
	},
	{
686
		{"stats_reset_on_server_start", PGC_POSTMASTER, STATS_COLLECTOR,
687
			gettext_noop("Zeroes collected statistics on server restart."),
688 689 690
			NULL
		},
		&pgstat_collect_resetonpmstart,
691
		false, NULL, NULL
692 693
	},
	{
694
		{"stats_command_string", PGC_SUSET, STATS_COLLECTOR,
695
			gettext_noop("Collects statistics about executing commands."),
696
			gettext_noop("Enables the collection of statistics on the currently "
B
Bruce Momjian 已提交
697
					"executing command of each session, along with the time "
698 699 700
						 "at which that command began execution.")
		},
		&pgstat_collect_querystring,
701
		false, NULL, NULL
702 703
	},
	{
704
		{"stats_row_level", PGC_SUSET, STATS_COLLECTOR,
705
			gettext_noop("Collects row-level statistics on database activity."),
706 707 708
			NULL
		},
		&pgstat_collect_tuplelevel,
709
		false, NULL, NULL
710 711
	},
	{
712
		{"stats_block_level", PGC_SUSET, STATS_COLLECTOR,
713
			gettext_noop("Collects block-level statistics on database activity."),
714 715 716
			NULL
		},
		&pgstat_collect_blocklevel,
717
		false, NULL, NULL
718
	},
719

720 721
	{
		{"autovacuum", PGC_SIGHUP, AUTOVACUUM,
P
Peter Eisentraut 已提交
722
			gettext_noop("Starts the autovacuum subprocess."),
723 724 725
			NULL
		},
		&autovacuum_start_daemon,
B
Bruce Momjian 已提交
726
		false, NULL, NULL
727 728
	},

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

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

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

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

926 927 928 929 930 931 932 933 934 935 936 937
#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

938
	{
939
		{"integer_datetimes", PGC_INTERNAL, PRESET_OPTIONS,
940
			gettext_noop("Datetimes are integer based."),
941
			NULL,
942
			GUC_REPORT | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
943 944 945 946 947 948 949 950 951
		},
		&integer_datetimes,
#ifdef HAVE_INT64_TIMESTAMP
		true, NULL, NULL
#else
		false, NULL, NULL
#endif
	},

B
 
Bruce Momjian 已提交
952 953
	{
		{"krb_caseins_users", PGC_POSTMASTER, CONN_AUTH_SECURITY,
954
			gettext_noop("Sets whether Kerberos user names should be treated as case-insensitive."),
B
 
Bruce Momjian 已提交
955 956 957 958 959 960
			NULL
		},
		&pg_krb_caseins_users,
		false, NULL, NULL
	},

961 962
	{
		{"escape_string_warning", PGC_USERSET, COMPAT_OPTIONS_PREVIOUS,
963
			gettext_noop("Warn about backslash escapes in ordinary string literals."),
964 965 966 967 968 969 970
			NULL
		},
		&escape_string_warning,
		false, NULL, NULL
	},

	{
971
		{"standard_conforming_strings", PGC_INTERNAL, PRESET_OPTIONS,
972
			gettext_noop("'...' strings treat backslashes literally."),
973 974 975
			NULL,
			GUC_REPORT | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
976
		&standard_conforming_strings,
977 978 979
		false, NULL, NULL
	},

980
	/* End-of-list marker */
981
	{
982 983
		{NULL, 0, 0, NULL, NULL}, NULL, false, NULL, NULL
	}
984 985 986
};


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

	{
1054
		{"deadlock_timeout", PGC_SIGHUP, LOCK_MANAGEMENT,
1055
			gettext_noop("The time in milliseconds to wait on lock before checking for deadlock."),
1056 1057 1058
			NULL
		},
		&DeadlockTimeout,
1059
		1000, 0, INT_MAX, NULL, NULL
1060
	},
1061 1062

	/*
B
Bruce Momjian 已提交
1063 1064
	 * Note: There is some postprocessing done in PostmasterMain() to make
	 * sure the buffers are at least twice the number of backends, so the
1065
	 * constraints here are partially unused. Similarly, the superuser
B
Bruce Momjian 已提交
1066 1067
	 * reserved number is checked to ensure it is less than the max backends
	 * number.
1068 1069
	 *
	 * MaxBackends is limited to INT_MAX/4 because some places compute
B
Bruce Momjian 已提交
1070 1071
	 * 4*MaxBackends without any overflow check.  Likewise we have to limit
	 * NBuffers to INT_MAX/2.
1072
	 */
1073
	{
1074
		{"max_connections", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
1075
			gettext_noop("Sets the maximum number of concurrent connections."),
1076 1077 1078
			NULL
		},
		&MaxBackends,
1079
		100, 1, INT_MAX / 4, NULL, NULL
1080
	},
1081

1082
	{
1083
		{"superuser_reserved_connections", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
1084
			gettext_noop("Sets the number of connection slots reserved for superusers."),
1085 1086 1087
			NULL
		},
		&ReservedBackends,
1088
		2, 0, INT_MAX / 4, NULL, NULL
1089 1090
	},

1091
	{
1092
		{"shared_buffers", PGC_POSTMASTER, RESOURCES_MEM,
1093
			gettext_noop("Sets the number of shared memory buffers used by the server."),
1094 1095 1096
			NULL
		},
		&NBuffers,
1097
		1000, 16, INT_MAX / 2, NULL, NULL
1098
	},
1099

1100 1101 1102 1103 1104 1105
	{
		{"temp_buffers", PGC_USERSET, RESOURCES_MEM,
			gettext_noop("Sets the maximum number of temporary buffers used by each session."),
			NULL
		},
		&num_temp_buffers,
1106
		1000, 100, INT_MAX / 2, NULL, show_num_temp_buffers
1107 1108
	},

1109
	{
1110
		{"port", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
1111
			gettext_noop("Sets the TCP port the server listens on."),
1112 1113 1114
			NULL
		},
		&PostPortNumber,
1115
		DEF_PGPORT, 1, 65535, NULL, NULL
1116
	},
1117

1118
	{
1119
		{"unix_socket_permissions", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
1120
			gettext_noop("Sets the access permissions of the Unix-domain socket."),
1121
			gettext_noop("Unix-domain sockets use the usual Unix file system "
1122
						 "permission set. The parameter value is expected to be an numeric mode "
1123
						 "specification in the form accepted by the chmod and umask system "
1124 1125 1126 1127
						 "calls. (To use the customary octal format the number must start with "
						 "a 0 (zero).)")
		},
		&Unix_socket_permissions,
1128
		0777, 0000, 0777, NULL, NULL
1129
	},
1130

1131
	{
1132 1133 1134
		{"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 已提交
1135
						 "sort operation and hash table before switching to "
1136
						 "temporary disk files.")
1137
		},
1138
		&work_mem,
1139
		1024, 8 * BLCKSZ / 1024, MAX_KILOBYTES, NULL, NULL
1140
	},
1141

1142
	{
1143 1144 1145
		{"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.")
1146
		},
1147
		&maintenance_work_mem,
1148
		16384, 1024, MAX_KILOBYTES, NULL, NULL
1149
	},
1150

1151 1152 1153 1154 1155 1156
	{
		{"max_stack_depth", PGC_SUSET, RESOURCES_MEM,
			gettext_noop("Sets the maximum stack depth, in kilobytes."),
			NULL
		},
		&max_stack_depth,
1157
		2048, 100, MAX_KILOBYTES, assign_max_stack_depth, NULL
1158 1159
	},

J
Jan Wieck 已提交
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 1186 1187 1188 1189 1190 1191 1192 1193 1194 1195 1196
	{
		{"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
	},

	{
1197 1198
		{"vacuum_cost_delay", PGC_USERSET, RESOURCES,
			gettext_noop("Vacuum cost delay in milliseconds."),
J
Jan Wieck 已提交
1199 1200
			NULL
		},
1201
		&VacuumCostDelay,
1202
		0, 0, 1000, NULL, NULL
J
Jan Wieck 已提交
1203 1204
	},

1205 1206 1207 1208 1209 1210 1211 1212 1213 1214 1215 1216 1217 1218 1219 1220 1221 1222
	{
		{"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
	},

1223
	{
1224
		{"max_files_per_process", PGC_POSTMASTER, RESOURCES_KERNEL,
1225
			gettext_noop("Sets the maximum number of simultaneously open files for each server process."),
1226 1227 1228
			NULL
		},
		&max_files_per_process,
1229
		1000, 25, INT_MAX, NULL, NULL
1230
	},
1231

1232 1233 1234 1235 1236 1237
	{
		{"max_prepared_transactions", PGC_POSTMASTER, RESOURCES,
			gettext_noop("Sets the maximum number of simultaneously prepared transactions."),
			NULL
		},
		&max_prepared_xacts,
1238
		5, 0, INT_MAX, NULL, NULL
1239 1240
	},

1241
#ifdef LOCK_DEBUG
1242
	{
1243
		{"trace_lock_oidmin", PGC_SUSET, DEVELOPER_OPTIONS,
1244
			gettext_noop("no description available"),
1245 1246 1247 1248
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&Trace_lock_oidmin,
1249
		FirstNormalObjectId, 0, INT_MAX, NULL, NULL
1250 1251
	},
	{
1252
		{"trace_lock_table", PGC_SUSET, DEVELOPER_OPTIONS,
1253
			gettext_noop("no description available"),
1254 1255 1256 1257
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&Trace_lock_table,
1258
		0, 0, INT_MAX, NULL, NULL
1259
	},
1260 1261
#endif

1262
	{
1263
		{"statement_timeout", PGC_USERSET, CLIENT_CONN_STATEMENT,
1264
			gettext_noop("Sets the maximum allowed duration (in milliseconds) of any statement."),
1265
			gettext_noop("A value of 0 turns off the timeout.")
1266 1267
		},
		&StatementTimeout,
1268 1269 1270
		0, 0, INT_MAX, NULL, NULL
	},

1271
	{
1272
		{"max_fsm_relations", PGC_POSTMASTER, RESOURCES_FSM,
1273
			gettext_noop("Sets the maximum number of tables and indexes for which free space is tracked."),
1274 1275 1276
			NULL
		},
		&MaxFSMRelations,
1277
		1000, 100, INT_MAX, NULL, NULL
1278 1279
	},
	{
1280
		{"max_fsm_pages", PGC_POSTMASTER, RESOURCES_FSM,
1281
			gettext_noop("Sets the maximum number of disk pages for which free space is tracked."),
1282 1283 1284
			NULL
		},
		&MaxFSMPages,
1285
		20000, 1000, INT_MAX, NULL, NULL
1286
	},
1287

1288
	{
1289
		{"max_locks_per_transaction", PGC_POSTMASTER, LOCK_MANAGEMENT,
1290
			gettext_noop("Sets the maximum number of locks per transaction."),
1291
			gettext_noop("The shared lock table is sized on the assumption that "
B
Bruce Momjian 已提交
1292
			  "at most max_locks_per_transaction * max_connections distinct "
1293
						 "objects will need to be locked at any one time.")
1294 1295
		},
		&max_locks_per_xact,
1296
		64, 10, INT_MAX, NULL, NULL
1297
	},
1298

1299
	{
1300
		{"authentication_timeout", PGC_SIGHUP, CONN_AUTH_SECURITY,
1301
			gettext_noop("Sets the maximum time in seconds to complete client authentication."),
1302 1303 1304
			NULL
		},
		&AuthenticationTimeout,
1305
		60, 1, 600, NULL, NULL
1306
	},
1307

1308
	{
1309 1310
		/* Not for general use */
		{"pre_auth_delay", PGC_SIGHUP, DEVELOPER_OPTIONS,
1311
			gettext_noop("no description available"),
1312 1313 1314 1315
			NULL,
			GUC_NOT_IN_SAMPLE
		},
		&PreAuthDelay,
1316
		0, 0, 60, NULL, NULL
1317
	},
1318

1319
	{
1320
		{"checkpoint_segments", PGC_SIGHUP, WAL_CHECKPOINTS,
1321
			gettext_noop("Sets the maximum distance in log segments between automatic WAL checkpoints."),
1322 1323 1324
			NULL
		},
		&CheckPointSegments,
1325
		3, 1, INT_MAX, NULL, NULL
1326
	},
T
Tom Lane 已提交
1327

1328
	{
1329
		{"checkpoint_timeout", PGC_SIGHUP, WAL_CHECKPOINTS,
1330
			gettext_noop("Sets the maximum time in seconds between automatic WAL checkpoints."),
1331 1332 1333
			NULL
		},
		&CheckPointTimeout,
1334
		300, 30, 3600, NULL, NULL
1335
	},
V
Vadim B. Mikheev 已提交
1336

1337
	{
1338
		{"checkpoint_warning", PGC_SIGHUP, WAL_CHECKPOINTS,
1339 1340
			gettext_noop("Logs if filling of checkpoint segments happens more "
						 "frequently than this (in seconds)."),
1341
			gettext_noop("Write a message to the server log if checkpoints "
B
Bruce Momjian 已提交
1342
			"caused by the filling of checkpoint segment files happens more "
1343 1344 1345
						 "frequently than this number of seconds. Zero turns off the warning.")
		},
		&CheckPointWarning,
1346 1347 1348
		30, 0, INT_MAX, NULL, NULL
	},

1349
	{
1350
		{"wal_buffers", PGC_POSTMASTER, WAL_SETTINGS,
1351
			gettext_noop("Sets the number of disk-page buffers in shared memory for WAL."),
1352 1353 1354
			NULL
		},
		&XLOGbuffers,
1355
		8, 4, INT_MAX, NULL, NULL
1356
	},
V
Vadim B. Mikheev 已提交
1357

1358
	{
1359
		{"commit_delay", PGC_USERSET, WAL_CHECKPOINTS,
1360 1361
			gettext_noop("Sets the delay in microseconds between transaction commit and "
						 "flushing WAL to disk."),
1362 1363 1364
			NULL
		},
		&CommitDelay,
1365
		0, 0, 100000, NULL, NULL
1366
	},
V
Vadim B. Mikheev 已提交
1367

1368
	{
1369
		{"commit_siblings", PGC_USERSET, WAL_CHECKPOINTS,
1370 1371
			gettext_noop("Sets the minimum concurrent open transactions before performing "
						 "commit_delay."),
1372 1373 1374
			NULL
		},
		&CommitSiblings,
1375
		5, 1, 1000, NULL, NULL
1376
	},
1377

1378
	{
1379
		{"extra_float_digits", PGC_USERSET, CLIENT_CONN_LOCALE,
1380
			gettext_noop("Sets the number of digits displayed for floating-point values."),
1381
			gettext_noop("This affects real, double precision, and geometric data types. "
B
Bruce Momjian 已提交
1382
			 "The parameter value is added to the standard number of digits "
1383
						 "(FLT_DIG or DBL_DIG as appropriate).")
1384 1385
		},
		&extra_float_digits,
1386 1387 1388
		0, -15, 2, NULL, NULL
	},

B
Bruce Momjian 已提交
1389
	{
1390
		{"log_min_duration_statement", PGC_SUSET, LOGGING_WHEN,
1391 1392 1393
			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).")
1394 1395
		},
		&log_min_duration_statement,
1396
		-1, -1, INT_MAX / 1000, NULL, NULL
B
Bruce Momjian 已提交
1397 1398
	},

J
Jan Wieck 已提交
1399 1400 1401 1402 1403 1404
	{
		{"bgwriter_delay", PGC_SIGHUP, RESOURCES,
			gettext_noop("Background writer sleep time between rounds in milliseconds"),
			NULL
		},
		&BgWriterDelay,
1405
		200, 10, 10000, NULL, NULL
J
Jan Wieck 已提交
1406 1407 1408
	},

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

	{
1418
		{"bgwriter_all_maxpages", PGC_SIGHUP, RESOURCES,
1419
			gettext_noop("Background writer maximum number of all pages to flush per round"),
J
Jan Wieck 已提交
1420 1421
			NULL
		},
1422 1423
		&bgwriter_all_maxpages,
		5, 0, 1000, NULL, NULL
J
Jan Wieck 已提交
1424 1425
	},

1426 1427
	{
		{"log_rotation_age", PGC_SIGHUP, LOGGING_WHERE,
P
Peter Eisentraut 已提交
1428
			gettext_noop("Automatic log file rotation will occur after N minutes"),
B
Bruce Momjian 已提交
1429
			NULL
1430 1431
		},
		&Log_RotationAge,
B
Bruce Momjian 已提交
1432
		HOURS_PER_DAY * MINS_PER_HOUR, 0, INT_MAX / MINS_PER_HOUR, NULL, NULL
1433 1434 1435 1436
	},

	{
		{"log_rotation_size", PGC_SIGHUP, LOGGING_WHERE,
P
Peter Eisentraut 已提交
1437
			gettext_noop("Automatic log file rotation will occur after N kilobytes"),
B
Bruce Momjian 已提交
1438
			NULL
1439 1440
		},
		&Log_RotationSize,
1441
		10 * 1024, 0, INT_MAX / 1024, NULL, NULL
1442 1443
	},

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

	{
1455
		{"max_index_keys", PGC_INTERNAL, PRESET_OPTIONS,
P
Peter Eisentraut 已提交
1456
			gettext_noop("Shows the maximum number of index keys."),
1457 1458 1459 1460 1461 1462 1463 1464
			NULL,
			GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&max_index_keys,
		INDEX_MAX_KEYS, INDEX_MAX_KEYS, INDEX_MAX_KEYS, NULL, NULL
	},

	{
1465
		{"max_identifier_length", PGC_INTERNAL, PRESET_OPTIONS,
1466 1467 1468 1469 1470 1471 1472 1473 1474
			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
	},

	{
1475
		{"block_size", PGC_INTERNAL, PRESET_OPTIONS,
1476 1477 1478 1479 1480 1481 1482 1483
			gettext_noop("Shows size of a disk block"),
			NULL,
			GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&block_size,
		BLCKSZ, BLCKSZ, BLCKSZ, NULL, NULL
	},

1484 1485 1486 1487 1488 1489
	{
		{"autovacuum_naptime", PGC_SIGHUP, AUTOVACUUM,
			gettext_noop("Time to sleep between autovacuum runs, in seconds."),
			NULL
		},
		&autovacuum_naptime,
1490
		60, 1, INT_MAX, NULL, NULL
1491 1492 1493 1494 1495 1496 1497 1498 1499 1500 1501 1502 1503 1504 1505 1506 1507 1508
	},
	{
		{"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
	},

1509 1510
	{
		{"tcp_keepalives_idle", PGC_USERSET, CLIENT_CONN_OTHER,
B
Bruce Momjian 已提交
1511 1512 1513
			gettext_noop("Seconds between issuing TCP keepalives."),
			gettext_noop("A value of 0 uses the system default."),
		},
1514 1515 1516 1517 1518 1519
		&tcp_keepalives_idle,
		0, 0, INT_MAX, assign_tcp_keepalives_idle, show_tcp_keepalives_idle
	},

	{
		{"tcp_keepalives_interval", PGC_USERSET, CLIENT_CONN_OTHER,
B
Bruce Momjian 已提交
1520 1521 1522
			gettext_noop("Seconds between TCP keepalive retransmits."),
			gettext_noop("A value of 0 uses the system default."),
		},
1523 1524 1525 1526 1527 1528
		&tcp_keepalives_interval,
		0, 0, INT_MAX, assign_tcp_keepalives_interval, show_tcp_keepalives_interval
	},

	{
		{"tcp_keepalives_count", PGC_USERSET, CLIENT_CONN_OTHER,
B
Bruce Momjian 已提交
1529 1530 1531 1532 1533
			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."),
		},
1534 1535 1536 1537
		&tcp_keepalives_count,
		0, 0, INT_MAX, assign_tcp_keepalives_count, show_tcp_keepalives_count
	},

1538
	/* End-of-list marker */
1539
	{
1540
		{NULL, 0, 0, NULL, NULL}, NULL, 0, 0, 0, NULL, NULL
1541
	}
1542 1543 1544
};


1545
static struct config_real ConfigureNamesReal[] =
1546
{
1547
	{
1548
		{"effective_cache_size", PGC_USERSET, QUERY_TUNING_COST,
1549
			gettext_noop("Sets the planner's assumption about size of the disk cache."),
1550 1551 1552 1553 1554
			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,
1555
		DEFAULT_EFFECTIVE_CACHE_SIZE, 1, DBL_MAX, NULL, NULL
1556
	},
1557
	{
1558
		{"random_page_cost", PGC_USERSET, QUERY_TUNING_COST,
1559 1560
			gettext_noop("Sets the planner's estimate of the cost of a nonsequentially "
						 "fetched disk page."),
1561
			gettext_noop("This is measured as a multiple of the cost of a "
B
Bruce Momjian 已提交
1562
			  "sequential page fetch. A higher value makes it more likely a "
1563 1564 1565 1566
						 "sequential scan will be used, a lower value makes it more likely an "
						 "index scan will be used.")
		},
		&random_page_cost,
1567
		DEFAULT_RANDOM_PAGE_COST, 0, DBL_MAX, NULL, NULL
1568 1569
	},
	{
1570
		{"cpu_tuple_cost", PGC_USERSET, QUERY_TUNING_COST,
1571
			gettext_noop("Sets the planner's estimate of the cost of processing each tuple (row)."),
1572 1573 1574 1575
			gettext_noop("This is measured as a fraction of the cost of a "
						 "sequential page fetch.")
		},
		&cpu_tuple_cost,
1576
		DEFAULT_CPU_TUPLE_COST, 0, DBL_MAX, NULL, NULL
1577 1578
	},
	{
1579
		{"cpu_index_tuple_cost", PGC_USERSET, QUERY_TUNING_COST,
1580 1581
			gettext_noop("Sets the planner's estimate of processing cost for each "
						 "index tuple (row) during index scan."),
1582 1583 1584 1585
			gettext_noop("This is measured as a fraction of the cost of a "
						 "sequential page fetch.")
		},
		&cpu_index_tuple_cost,
1586
		DEFAULT_CPU_INDEX_TUPLE_COST, 0, DBL_MAX, NULL, NULL
1587 1588
	},
	{
1589
		{"cpu_operator_cost", PGC_USERSET, QUERY_TUNING_COST,
1590
			gettext_noop("Sets the planner's estimate of processing cost of each operator in WHERE."),
1591 1592 1593 1594
			gettext_noop("This is measured as a fraction of the cost of a sequential "
						 "page fetch.")
		},
		&cpu_operator_cost,
1595
		DEFAULT_CPU_OPERATOR_COST, 0, DBL_MAX, NULL, NULL
1596 1597 1598
	},

	{
1599
		{"geqo_selection_bias", PGC_USERSET, QUERY_TUNING_GEQO,
1600
			gettext_noop("GEQO: selective pressure within the population."),
1601 1602 1603
			NULL
		},
		&Geqo_selection_bias,
1604 1605
		DEFAULT_GEQO_SELECTION_BIAS, MIN_GEQO_SELECTION_BIAS,
		MAX_GEQO_SELECTION_BIAS, NULL, NULL
1606 1607
	},

1608 1609 1610 1611 1612 1613 1614 1615 1616 1617 1618 1619 1620 1621 1622 1623 1624 1625
	{
		{"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
	},

1626
	{
1627
		{"seed", PGC_USERSET, UNGROUPED,
1628
			gettext_noop("Sets the seed for random-number generation."),
1629 1630 1631
			NULL,
			GUC_NO_SHOW_ALL | GUC_NO_RESET_ALL | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
1632 1633 1634 1635
		&phony_random_seed,
		0.5, 0.0, 1.0, assign_random_seed, show_random_seed
	},

1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652
	{
		{"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
	},

1653
	/* End-of-list marker */
1654
	{
1655
		{NULL, 0, 0, NULL, NULL}, NULL, 0.0, 0.0, 0.0, NULL, NULL
1656
	}
1657 1658 1659
};


1660
static struct config_string ConfigureNamesString[] =
1661
{
B
Bruce Momjian 已提交
1662 1663 1664 1665 1666 1667 1668 1669
	{
		{"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
	},
1670

1671
	{
1672
		{"client_encoding", PGC_USERSET, CLIENT_CONN_LOCALE,
1673
			gettext_noop("Sets the client's character set encoding."),
1674 1675 1676
			NULL,
			GUC_REPORT
		},
1677
		&client_encoding_string,
1678
		"SQL_ASCII", assign_client_encoding, NULL
1679 1680
	},

1681
	{
1682
		{"client_min_messages", PGC_USERSET, LOGGING_WHEN,
1683
			gettext_noop("Sets the message levels that are sent to the client."),
1684 1685 1686 1687 1688 1689
			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,
1690
		"notice", assign_client_min_messages, NULL
1691
	},
1692

1693
	{
1694
		{"log_min_messages", PGC_SUSET, LOGGING_WHEN,
1695
			gettext_noop("Sets the message levels that are logged."),
1696
			gettext_noop("Valid values are DEBUG5, DEBUG4, DEBUG3, DEBUG2, DEBUG1, "
B
Bruce Momjian 已提交
1697
			"INFO, NOTICE, WARNING, ERROR, LOG, FATAL, and PANIC. Each level "
1698
						 "includes all the levels that follow it.")
1699 1700
		},
		&log_min_messages_str,
1701 1702 1703 1704
		"notice", assign_log_min_messages, NULL
	},

	{
1705
		{"log_error_verbosity", PGC_SUSET, LOGGING_WHEN,
1706
			gettext_noop("Sets the verbosity of logged messages."),
1707
			gettext_noop("Valid values are \"terse\", \"default\", and \"verbose\".")
1708 1709
		},
		&log_error_verbosity_str,
1710 1711
		"default", assign_log_error_verbosity, NULL
	},
1712
	{
1713
		{"log_statement", PGC_SUSET, LOGGING_WHAT,
1714
			gettext_noop("Sets the type of statements logged."),
1715
			gettext_noop("Valid values are \"none\", \"ddl\", \"mod\", and \"all\".")
1716 1717 1718 1719
		},
		&log_statement_str,
		"none", assign_log_statement, NULL
	},
1720

1721
	{
1722
		{"log_min_error_statement", PGC_SUSET, LOGGING_WHEN,
1723
			gettext_noop("Causes all statements generating error at or above this level to be logged."),
1724
			gettext_noop("All SQL statements that cause an error of the "
1725
						 "specified level or a higher level are logged.")
1726 1727
		},
		&log_min_error_statement_str,
1728
		"panic", assign_min_error_statement, NULL
1729 1730
	},

B
Add:  
Bruce Momjian 已提交
1731 1732
	{
		{"log_line_prefix", PGC_SIGHUP, LOGGING_WHAT,
B
Bruce Momjian 已提交
1733 1734
			gettext_noop("Controls information prefixed to each log line"),
			gettext_noop("if blank no prefix is used")
B
Add:  
Bruce Momjian 已提交
1735 1736 1737 1738 1739 1740
		},
		&Log_line_prefix,
		"", NULL, NULL
	},


1741
	{
1742
		{"DateStyle", PGC_USERSET, CLIENT_CONN_LOCALE,
1743
			gettext_noop("Sets the display format for date and time values."),
1744
			gettext_noop("Also controls interpretation of ambiguous "
1745
						 "date inputs."),
1746 1747
			GUC_LIST_INPUT | GUC_REPORT
		},
1748
		&datestyle_string,
1749
		"ISO, MDY", assign_datestyle, NULL
1750
	},
1751

1752 1753 1754 1755 1756 1757 1758 1759 1760
	{
		{"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
	},

1761
	{
1762
		{"default_transaction_isolation", PGC_USERSET, CLIENT_CONN_STATEMENT,
1763
			gettext_noop("Sets the transaction isolation level of each new transaction."),
1764
			gettext_noop("Each SQL transaction has an isolation level, which "
B
Bruce Momjian 已提交
1765
						 "can be either \"read uncommitted\", \"read committed\", \"repeatable read\", or \"serializable\".")
1766 1767
		},
		&default_iso_level_string,
1768
		"read committed", assign_defaultxactisolevel, NULL
1769 1770
	},

1771
	{
1772
		{"dynamic_library_path", PGC_SUSET, CLIENT_CONN_OTHER,
1773
			gettext_noop("Sets the path for dynamically loadable modules."),
1774
			gettext_noop("If a dynamically loadable module needs to be opened and "
1775
						 "the specified name does not have a directory component (i.e., the "
1776
						 "name does not contain a slash), the system will search this path for "
1777 1778
						 "the specified file."),
			GUC_SUPERUSER_ONLY
1779 1780
		},
		&Dynamic_library_path,
1781
		"$libdir", NULL, NULL
1782 1783 1784
	},

	{
1785
		{"krb_server_keyfile", PGC_POSTMASTER, CONN_AUTH_SECURITY,
1786
			gettext_noop("Sets the location of the Kerberos server key file."),
1787 1788
			NULL,
			GUC_SUPERUSER_ONLY
1789 1790
		},
		&pg_krb_server_keyfile,
1791
		PG_KRB_SRVTAB, NULL, NULL
1792
	},
1793

B
 
Bruce Momjian 已提交
1794 1795 1796 1797 1798 1799 1800 1801 1802
	{
		{"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
	},

1803 1804 1805 1806 1807 1808 1809 1810 1811
	{
		{"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
	},

1812
	{
1813 1814
		{"bonjour_name", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
			gettext_noop("Sets the Bonjour broadcast service name."),
1815 1816
			NULL
		},
1817
		&bonjour_name,
1818 1819 1820
		"", NULL, NULL
	},

1821 1822
	/* See main.c about why defaults for LC_foo are not all alike */

1823
	{
1824
		{"lc_collate", PGC_INTERNAL, CLIENT_CONN_LOCALE,
1825
			gettext_noop("Shows the collation order locale."),
1826 1827 1828 1829
			NULL,
			GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&locale_collate,
1830 1831 1832 1833
		"C", NULL, NULL
	},

	{
1834
		{"lc_ctype", PGC_INTERNAL, CLIENT_CONN_LOCALE,
1835
			gettext_noop("Shows the character classification and case conversion locale."),
1836 1837 1838 1839
			NULL,
			GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
		&locale_ctype,
1840 1841 1842
		"C", NULL, NULL
	},

1843
	{
1844
		{"lc_messages", PGC_SUSET, CLIENT_CONN_LOCALE,
1845
			gettext_noop("Sets the language in which messages are displayed."),
1846 1847 1848
			NULL
		},
		&locale_messages,
1849 1850 1851 1852
		"", locale_messages_assign, NULL
	},

	{
1853
		{"lc_monetary", PGC_USERSET, CLIENT_CONN_LOCALE,
1854
			gettext_noop("Sets the locale for formatting monetary amounts."),
1855 1856 1857
			NULL
		},
		&locale_monetary,
1858
		"C", locale_monetary_assign, NULL
1859 1860 1861
	},

	{
1862
		{"lc_numeric", PGC_USERSET, CLIENT_CONN_LOCALE,
1863
			gettext_noop("Sets the locale for formatting numbers."),
1864 1865 1866
			NULL
		},
		&locale_numeric,
1867
		"C", locale_numeric_assign, NULL
1868 1869 1870
	},

	{
1871
		{"lc_time", PGC_USERSET, CLIENT_CONN_LOCALE,
1872
			gettext_noop("Sets the locale for formatting date and time values."),
1873 1874 1875
			NULL
		},
		&locale_time,
1876
		"C", locale_time_assign, NULL
1877 1878
	},

1879
	{
1880
		{"preload_libraries", PGC_POSTMASTER, RESOURCES_KERNEL,
1881
			gettext_noop("Lists shared libraries to preload into server."),
1882
			NULL,
1883
			GUC_LIST_INPUT | GUC_LIST_QUOTE | GUC_SUPERUSER_ONLY
1884
		},
1885
		&preload_libraries_string,
1886
		"", NULL, NULL
1887 1888
	},

1889
	{
1890
		{"regex_flavor", PGC_USERSET, COMPAT_OPTIONS_PREVIOUS,
1891
			gettext_noop("Sets the regular expression \"flavor\"."),
1892
			gettext_noop("This can be set to advanced, extended, or basic.")
1893 1894
		},
		&regex_flavor_string,
1895 1896 1897
		"advanced", assign_regex_flavor, NULL
	},

1898
	{
1899
		{"search_path", PGC_USERSET, CLIENT_CONN_STATEMENT,
1900
			gettext_noop("Sets the schema search order for names that are not schema-qualified."),
1901 1902 1903
			NULL,
			GUC_LIST_INPUT | GUC_LIST_QUOTE
		},
1904 1905
		&namespace_search_path,
		"$user,public", assign_search_path, NULL
1906 1907 1908
	},

	{
1909 1910
		/* Can't be set in postgresql.conf */
		{"server_encoding", PGC_INTERNAL, CLIENT_CONN_LOCALE,
1911
			gettext_noop("Sets the server (database) character set encoding."),
1912
			NULL,
1913
			GUC_REPORT | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
1914
		},
1915 1916 1917 1918 1919
		&server_encoding_string,
		"SQL_ASCII", NULL, NULL
	},

	{
1920
		/* Can't be set in postgresql.conf */
1921
		{"server_version", PGC_INTERNAL, PRESET_OPTIONS,
1922
			gettext_noop("Shows the server version."),
1923 1924 1925
			NULL,
			GUC_REPORT | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
1926 1927
		&server_version_string,
		PG_VERSION, NULL, NULL
1928 1929
	},

1930 1931 1932 1933 1934 1935 1936 1937 1938 1939 1940
	{
		/* 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
	},

1941
	{
1942 1943
		/* Not for general use --- used by SET SESSION AUTHORIZATION */
		{"session_authorization", PGC_USERSET, UNGROUPED,
1944
			gettext_noop("Sets the session user name."),
1945
			NULL,
1946
			GUC_REPORT | GUC_NO_SHOW_ALL | GUC_NO_RESET_ALL | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
1947
		},
1948 1949
		&session_authorization_string,
		NULL, assign_session_authorization, show_session_authorization
1950 1951
	},

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

T
Tatsuo Ishii 已提交
1982
#ifdef HAVE_SYSLOG
1983
	{
1984
		{"syslog_facility", PGC_SIGHUP, LOGGING_WHERE,
1985
			gettext_noop("Sets the syslog \"facility\" to be used when syslog enabled."),
1986 1987
			gettext_noop("Valid values are LOCAL0, LOCAL1, LOCAL2, LOCAL3, "
						 "LOCAL4, LOCAL5, LOCAL6, LOCAL7.")
1988
		},
1989 1990
		&syslog_facility_str,
		"LOCAL0", assign_syslog_facility, NULL
1991 1992
	},
	{
1993 1994 1995
		{"syslog_ident", PGC_SIGHUP, LOGGING_WHERE,
			gettext_noop("Sets the program name used to identify PostgreSQL "
						 "messages in syslog."),
1996 1997
			NULL
		},
1998 1999
		&syslog_ident_str,
		"postgres", assign_syslog_ident, NULL
2000
	},
2001
#endif
2002

2003
	{
2004
		{"TimeZone", PGC_USERSET, CLIENT_CONN_LOCALE,
2005
			gettext_noop("Sets the time zone for displaying and interpreting time stamps."),
2006 2007
			NULL,
			GUC_REPORT
2008 2009
		},
		&timezone_string,
2010 2011 2012 2013
		"UNKNOWN", assign_timezone, show_timezone
	},

	{
2014
		{"transaction_isolation", PGC_USERSET, CLIENT_CONN_STATEMENT,
2015
			gettext_noop("Sets the current transaction's isolation level."),
2016 2017 2018
			NULL,
			GUC_NO_RESET_ALL | GUC_NOT_IN_SAMPLE | GUC_DISALLOW_IN_FILE
		},
2019 2020 2021 2022 2023
		&XactIsoLevel_string,
		NULL, assign_XactIsoLevel, show_XactIsoLevel
	},

	{
2024
		{"unix_socket_group", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
2025
			gettext_noop("Sets the owning group of the Unix-domain socket."),
2026 2027 2028 2029
			gettext_noop("(The owning user of the socket is always the user "
						 "that starts the server.)")
		},
		&Unix_socket_group,
2030
		"", NULL, NULL
2031
	},
2032

2033
	{
2034
		{"unix_socket_directory", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
2035
			gettext_noop("Sets the directory where the Unix-domain socket will be created."),
2036 2037
			NULL,
			GUC_SUPERUSER_ONLY
2038 2039
		},
		&UnixSocketDir,
2040
		"", assign_canonical_path, NULL
2041
	},
2042

2043
	{
2044
		{"listen_addresses", PGC_POSTMASTER, CONN_AUTH_SETTINGS,
2045 2046 2047
			gettext_noop("Sets the host name or IP address(es) to listen to."),
			NULL,
			GUC_LIST_INPUT
2048
		},
2049 2050
		&ListenAddresses,
		"localhost", NULL, NULL
2051
	},
2052

2053
	{
2054
		{"wal_sync_method", PGC_SIGHUP, WAL_SETTINGS,
2055
			gettext_noop("Selects the method used for forcing WAL updates out to disk."),
2056 2057 2058
			NULL
		},
		&XLOG_sync_method,
2059
		XLOG_sync_method_default, assign_xlog_sync_method, NULL
2060
	},
2061

2062
	{
2063
		{"custom_variable_classes", PGC_SIGHUP, CUSTOM_OPTIONS,
2064
			gettext_noop("Sets the list of known custom variable classes."),
2065 2066 2067 2068 2069 2070 2071
			NULL,
			GUC_LIST_INPUT | GUC_LIST_QUOTE
		},
		&custom_variable_classes,
		NULL, assign_custom_variable_classes, NULL
	},

2072
	{
2073
		{"data_directory", PGC_POSTMASTER, FILE_LOCATIONS,
B
Bruce Momjian 已提交
2074 2075 2076
			gettext_noop("Sets the server's data directory."),
			NULL,
			GUC_SUPERUSER_ONLY
2077
		},
2078 2079
		&data_directory,
		NULL, NULL, NULL
2080 2081 2082
	},

	{
2083
		{"config_file", PGC_POSTMASTER, FILE_LOCATIONS,
B
Bruce Momjian 已提交
2084 2085 2086
			gettext_noop("Sets the server's main configuration file."),
			NULL,
			GUC_DISALLOW_IN_FILE | GUC_SUPERUSER_ONLY
2087 2088 2089 2090 2091 2092 2093
		},
		&ConfigFileName,
		NULL, NULL, NULL
	},

	{
		{"hba_file", PGC_POSTMASTER, FILE_LOCATIONS,
B
Bruce Momjian 已提交
2094 2095 2096
			gettext_noop("Sets the server's \"hba\" configuration file"),
			NULL,
			GUC_SUPERUSER_ONLY
2097
		},
2098 2099
		&HbaFileName,
		NULL, NULL, NULL
2100 2101 2102
	},

	{
2103
		{"ident_file", PGC_POSTMASTER, FILE_LOCATIONS,
B
Bruce Momjian 已提交
2104 2105 2106
			gettext_noop("Sets the server's \"ident\" configuration file"),
			NULL,
			GUC_SUPERUSER_ONLY
2107
		},
2108 2109
		&IdentFileName,
		NULL, NULL, NULL
2110 2111 2112
	},

	{
2113
		{"external_pid_file", PGC_POSTMASTER, FILE_LOCATIONS,
B
Bruce Momjian 已提交
2114 2115 2116
			gettext_noop("Writes the postmaster PID to the specified file."),
			NULL,
			GUC_SUPERUSER_ONLY
2117
		},
2118
		&external_pid_file,
2119
		NULL, assign_canonical_path, NULL
2120 2121
	},

2122
	/* End-of-list marker */
2123
	{
2124
		{NULL, 0, 0, NULL, NULL}, NULL, NULL, NULL, NULL
2125
	}
2126 2127 2128
};


2129
/******** end of options list ********/
2130

B
Bruce Momjian 已提交
2131

2132 2133 2134 2135 2136 2137
/*
 * 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 已提交
2138
static const char *const map_old_guc_names[] = {
2139 2140 2141 2142 2143 2144
	"sort_mem", "work_mem",
	"vacuum_mem", "maintenance_work_mem",
	NULL
};


2145
/*
2146
 * Actual lookup of variables is done through this single, sorted array.
2147
 */
2148 2149
static struct config_generic **guc_variables;

2150
/* Current number of variables contained in the vector */
B
Bruce Momjian 已提交
2151
static int	num_guc_variables;
2152

2153
/* Vector capacity */
B
Bruce Momjian 已提交
2154
static int	size_guc_variables;
2155

2156

2157
static bool guc_dirty;			/* TRUE if need to do commit/abort work */
2158

2159 2160
static bool reporting_enabled;	/* TRUE to enable GUC_REPORT */

2161

B
Bruce Momjian 已提交
2162
static int	guc_var_compare(const void *a, const void *b);
2163
static int	guc_name_compare(const char *namea, const char *nameb);
B
Bruce Momjian 已提交
2164
static void push_old_value(struct config_generic * gconf);
2165
static void ReportGUCOption(struct config_generic * record);
2166 2167
static void ShowGUCConfigOption(const char *name, DestReceiver *dest);
static void ShowAllGUCConfig(DestReceiver *dest);
B
Bruce Momjian 已提交
2168
static char *_ShowOption(struct config_generic * record);
2169

2170

2171 2172 2173 2174 2175 2176
/*
 * Some infrastructure for checking malloc/strdup/realloc calls
 */
static void *
guc_malloc(int elevel, size_t size)
{
B
Bruce Momjian 已提交
2177
	void	   *data;
2178 2179 2180 2181 2182 2183 2184 2185 2186 2187 2188 2189

	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 已提交
2190
	void	   *data;
2191 2192 2193 2194 2195 2196 2197 2198 2199 2200 2201 2202

	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 已提交
2203
	char	   *data;
2204 2205 2206 2207 2208 2209 2210 2211 2212 2213

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


2214 2215 2216 2217 2218 2219
/*
 * 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 已提交
2220
set_string_field(struct config_string * conf, char **field, char *newval)
2221
{
B
Bruce Momjian 已提交
2222 2223
	char	   *oldval = *field;
	GucStack   *stack;
2224 2225 2226 2227 2228 2229 2230 2231 2232 2233 2234 2235 2236 2237 2238 2239 2240 2241 2242 2243 2244 2245 2246 2247 2248

	/* 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 已提交
2249
string_field_used(struct config_string * conf, char *strval)
2250
{
B
Bruce Momjian 已提交
2251
	GucStack   *stack;
2252 2253 2254 2255 2256 2257 2258 2259 2260 2261 2262 2263 2264 2265 2266 2267 2268

	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)
2269 2270 2271
{
	return guc_variables;
}
2272

2273

2274
/*
B
Bruce Momjian 已提交
2275
 * Build the sorted array.	This is split out so that it could be
2276 2277
 * re-executed after startup (eg, we could allow loadable modules to
 * add vars, and then we'd need to re-sort).
2278
 */
2279
void
2280
build_guc_variables(void)
2281
{
B
Bruce Momjian 已提交
2282
	int			size_vars;
2283 2284
	int			num_vars = 0;
	struct config_generic **guc_vars;
B
Bruce Momjian 已提交
2285
	int			i;
2286

2287
	for (i = 0; ConfigureNamesBool[i].gen.name; i++)
2288 2289 2290
	{
		struct config_bool *conf = &ConfigureNamesBool[i];

2291 2292 2293
		/* Rather than requiring vartype to be filled in by hand, do this: */
		conf->gen.vartype = PGC_BOOL;
		num_vars++;
2294
	}
2295

2296
	for (i = 0; ConfigureNamesInt[i].gen.name; i++)
2297 2298 2299
	{
		struct config_int *conf = &ConfigureNamesInt[i];

2300 2301
		conf->gen.vartype = PGC_INT;
		num_vars++;
2302
	}
2303

2304
	for (i = 0; ConfigureNamesReal[i].gen.name; i++)
2305 2306 2307
	{
		struct config_real *conf = &ConfigureNamesReal[i];

2308 2309
		conf->gen.vartype = PGC_REAL;
		num_vars++;
2310
	}
2311

2312
	for (i = 0; ConfigureNamesString[i].gen.name; i++)
2313
	{
2314
		struct config_string *conf = &ConfigureNamesString[i];
2315

2316 2317
		conf->gen.vartype = PGC_STRING;
		num_vars++;
2318 2319
	}

B
Bruce Momjian 已提交
2320 2321
	/*
	 * Create table with 20% slack
2322 2323 2324
	 */
	size_vars = num_vars + num_vars / 4;

2325
	guc_vars = (struct config_generic **)
2326
		guc_malloc(FATAL, size_vars * sizeof(struct config_generic *));
2327

2328
	num_vars = 0;
2329

2330
	for (i = 0; ConfigureNamesBool[i].gen.name; i++)
B
Bruce Momjian 已提交
2331
		guc_vars[num_vars++] = &ConfigureNamesBool[i].gen;
2332

2333
	for (i = 0; ConfigureNamesInt[i].gen.name; i++)
B
Bruce Momjian 已提交
2334
		guc_vars[num_vars++] = &ConfigureNamesInt[i].gen;
2335

2336
	for (i = 0; ConfigureNamesReal[i].gen.name; i++)
B
Bruce Momjian 已提交
2337
		guc_vars[num_vars++] = &ConfigureNamesReal[i].gen;
2338

2339
	for (i = 0; ConfigureNamesString[i].gen.name; i++)
B
Bruce Momjian 已提交
2340
		guc_vars[num_vars++] = &ConfigureNamesString[i].gen;
2341

2342 2343 2344 2345
	if (guc_variables)
		free(guc_variables);
	guc_variables = guc_vars;
	num_guc_variables = num_vars;
2346
	size_guc_variables = size_vars;
B
Bruce Momjian 已提交
2347 2348
	qsort((void *) guc_variables, num_guc_variables,
		  sizeof(struct config_generic *), guc_var_compare);
2349 2350
}

2351 2352 2353
static bool
is_custom_class(const char *name, int dotPos)
{
B
Bruce Momjian 已提交
2354
	/*
B
Bruce Momjian 已提交
2355 2356
	 * assign_custom_variable_classes() has made sure no empty identifiers or
	 * whitespace exists in the variable
2357
	 */
B
Bruce Momjian 已提交
2358
	bool		result = false;
2359
	const char *ccs = GetConfigOption("custom_variable_classes");
B
Bruce Momjian 已提交
2360 2361

	if (ccs != NULL)
2362 2363
	{
		const char *start = ccs;
B
Bruce Momjian 已提交
2364 2365

		for (;; ++ccs)
2366
		{
B
Bruce Momjian 已提交
2367 2368 2369
			int			c = *ccs;

			if (c == 0 || c == ',')
2370
			{
B
Bruce Momjian 已提交
2371
				if (dotPos == ccs - start && strncmp(start, name, dotPos) == 0)
2372 2373 2374 2375
				{
					result = true;
					break;
				}
B
Bruce Momjian 已提交
2376
				if (c == 0)
2377 2378 2379 2380 2381 2382 2383 2384 2385 2386 2387 2388
					break;
				start = ccs + 1;
			}
		}
	}
	return result;
}

/*
 * Add a new GUC variable to the list of known variables. The
 * list is expanded if needed.
 */
2389
static bool
B
Bruce Momjian 已提交
2390
add_guc_variable(struct config_generic * var, int elevel)
2391
{
B
Bruce Momjian 已提交
2392
	if (num_guc_variables + 1 >= size_guc_variables)
2393
	{
B
Bruce Momjian 已提交
2394 2395
		/*
		 * Increase the vector by 25%
2396
		 */
B
Bruce Momjian 已提交
2397 2398
		int			size_vars = size_guc_variables + size_guc_variables / 4;
		struct config_generic **guc_vars;
2399

B
Bruce Momjian 已提交
2400
		if (size_vars == 0)
2401
		{
2402
			size_vars = 100;
B
Bruce Momjian 已提交
2403 2404
			guc_vars = (struct config_generic **)
				guc_malloc(elevel, size_vars * sizeof(struct config_generic *));
2405 2406
		}
		else
2407
		{
B
Bruce Momjian 已提交
2408 2409
			guc_vars = (struct config_generic **)
				guc_realloc(elevel, guc_variables, size_vars * sizeof(struct config_generic *));
2410 2411
		}

B
Bruce Momjian 已提交
2412
		if (guc_vars == NULL)
2413 2414
			return false;		/* out of memory */

2415 2416 2417 2418
		guc_variables = guc_vars;
		size_guc_variables = size_vars;
	}
	guc_variables[num_guc_variables++] = var;
B
Bruce Momjian 已提交
2419 2420
	qsort((void *) guc_variables, num_guc_variables,
		  sizeof(struct config_generic *), guc_var_compare);
2421
	return true;
2422 2423 2424
}

/*
2425
 * Create and add a placeholder variable. It's presumed to belong
2426 2427
 * to a valid custom variable class at this point.
 */
B
Bruce Momjian 已提交
2428
static struct config_string *
2429
add_placeholder_variable(const char *name, int elevel)
2430
{
B
Bruce Momjian 已提交
2431 2432 2433
	size_t		sz = sizeof(struct config_string) + sizeof(char *);
	struct config_string *var;
	struct config_generic *gen;
2434

B
Bruce Momjian 已提交
2435 2436
	var = (struct config_string *) guc_malloc(elevel, sz);
	if (var == NULL)
2437 2438 2439
		return NULL;

	gen = &var->gen;
2440 2441
	memset(var, 0, sz);

2442
	gen->name = guc_strdup(elevel, name);
B
Bruce Momjian 已提交
2443
	if (gen->name == NULL)
2444 2445 2446 2447 2448
	{
		free(var);
		return NULL;
	}

B
Bruce Momjian 已提交
2449 2450
	gen->context = PGC_USERSET;
	gen->group = CUSTOM_OPTIONS;
2451
	gen->short_desc = "GUC placeholder variable";
B
Bruce Momjian 已提交
2452 2453
	gen->flags = GUC_NO_SHOW_ALL | GUC_NOT_IN_SAMPLE | GUC_CUSTOM_PLACEHOLDER;
	gen->vartype = PGC_STRING;
2454

B
Bruce Momjian 已提交
2455 2456 2457 2458 2459
	/*
	 * The char* is allocated at the end of the struct since we have no
	 * 'static' place to point to.
	 */
	var->variable = (char **) (var + 1);
2460

B
Bruce Momjian 已提交
2461
	if (!add_guc_variable((struct config_generic *) var, elevel))
2462 2463 2464 2465 2466 2467
	{
		free((void *) gen->name);
		free(var);
		return NULL;
	}

2468 2469
	return var;
}
2470 2471

/*
2472 2473
 * Look up option NAME. If it exists, return a pointer to its record,
 * else return NULL.
2474
 */
2475
static struct config_generic *
2476
find_option(const char *name, int elevel)
2477
{
2478
	const char *dot;
2479 2480
	const char **key = &name;
	struct config_generic **res;
2481
	int			i;
2482

2483
	Assert(name);
2484

2485
	/*
B
Bruce Momjian 已提交
2486 2487
	 * By equating const char ** with struct config_generic *, we are assuming
	 * the name field is first in config_generic.
2488
	 */
B
Bruce Momjian 已提交
2489 2490 2491
	res = (struct config_generic **) bsearch((void *) &key,
											 (void *) guc_variables,
											 num_guc_variables,
B
Bruce Momjian 已提交
2492
											 sizeof(struct config_generic *),
B
Bruce Momjian 已提交
2493
											 guc_var_compare);
2494 2495
	if (res)
		return *res;
2496 2497

	/*
B
Bruce Momjian 已提交
2498 2499 2500
	 * See if the name is an obsolete name for a variable.	We assume that the
	 * set of supported old names is short enough that a brute-force search is
	 * the best way.
2501 2502 2503 2504
	 */
	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 已提交
2505
			return find_option(map_old_guc_names[i + 1], elevel);
2506 2507
	}

2508
	/*
B
Bruce Momjian 已提交
2509 2510
	 * Check if the name is qualified, and if so, check if the qualifier maps
	 * to a custom variable class.
2511 2512
	 */
	dot = strchr(name, GUC_QUALIFIER_SEPARATOR);
B
Bruce Momjian 已提交
2513
	if (dot != NULL && is_custom_class(name, dot - name))
2514
		/* Add a placeholder variable for this name */
B
Bruce Momjian 已提交
2515
		return (struct config_generic *) add_placeholder_variable(name, elevel);
2516

2517
	/* Unknown name */
2518 2519
	return NULL;
}
2520 2521 2522


/*
2523
 * comparator for qsorting and bsearching guc_variables array
2524
 */
2525 2526
static int
guc_var_compare(const void *a, const void *b)
2527
{
2528 2529
	struct config_generic *confa = *(struct config_generic **) a;
	struct config_generic *confb = *(struct config_generic **) b;
2530

2531 2532 2533 2534 2535 2536 2537
	return guc_name_compare(confa->name, confb->name);
}


static int
guc_name_compare(const char *namea, const char *nameb)
{
2538
	/*
B
Bruce Momjian 已提交
2539 2540 2541
	 * The temptation to use strcasecmp() here must be resisted, because the
	 * array ordering has to remain stable across setlocale() calls. So, build
	 * our own with a simple ASCII-only downcasing.
2542
	 */
2543 2544 2545 2546 2547 2548 2549 2550 2551 2552 2553
	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;
2554
	}
2555 2556 2557 2558 2559
	if (*namea)
		return 1;				/* a is longer */
	if (*nameb)
		return -1;				/* b is longer */
	return 0;
2560
}
2561 2562 2563


/*
2564
 * Initialize GUC options during program startup.
2565 2566 2567
 *
 * Note that we cannot read the config file yet, since we have not yet
 * processed command-line switches.
2568
 */
2569 2570
void
InitializeGUCOptions(void)
2571
{
2572 2573
	int			i;
	char	   *env;
2574

2575 2576 2577 2578
	/*
	 * Build sorted array of all GUC variables.
	 */
	build_guc_variables();
2579

2580
	/*
2581 2582
	 * Load all variables with their compiled-in defaults, and initialize
	 * status fields as needed.
2583
	 */
2584
	for (i = 0; i < num_guc_variables; i++)
2585
	{
2586
		struct config_generic *gconf = guc_variables[i];
2587

2588 2589 2590 2591
		gconf->status = 0;
		gconf->reset_source = PGC_S_DEFAULT;
		gconf->tentative_source = PGC_S_DEFAULT;
		gconf->source = PGC_S_DEFAULT;
2592
		gconf->stack = NULL;
2593 2594 2595 2596

		switch (gconf->vartype)
		{
			case PGC_BOOL:
B
Bruce Momjian 已提交
2597 2598
				{
					struct config_bool *conf = (struct config_bool *) gconf;
2599

B
Bruce Momjian 已提交
2600
					if (conf->assign_hook)
2601 2602
						if (!(*conf->assign_hook) (conf->reset_val, true,
												   PGC_S_DEFAULT))
2603 2604
							elog(FATAL, "failed to initialize %s to %d",
								 conf->gen.name, (int) conf->reset_val);
B
Bruce Momjian 已提交
2605 2606 2607
					*conf->variable = conf->reset_val;
					break;
				}
2608
			case PGC_INT:
B
Bruce Momjian 已提交
2609 2610
				{
					struct config_int *conf = (struct config_int *) gconf;
2611

B
Bruce Momjian 已提交
2612 2613 2614
					Assert(conf->reset_val >= conf->min);
					Assert(conf->reset_val <= conf->max);
					if (conf->assign_hook)
2615 2616
						if (!(*conf->assign_hook) (conf->reset_val, true,
												   PGC_S_DEFAULT))
2617 2618
							elog(FATAL, "failed to initialize %s to %d",
								 conf->gen.name, conf->reset_val);
B
Bruce Momjian 已提交
2619 2620 2621
					*conf->variable = conf->reset_val;
					break;
				}
2622 2623
			case PGC_REAL:
				{
B
Bruce Momjian 已提交
2624 2625 2626 2627 2628
					struct config_real *conf = (struct config_real *) gconf;

					Assert(conf->reset_val >= conf->min);
					Assert(conf->reset_val <= conf->max);
					if (conf->assign_hook)
2629 2630
						if (!(*conf->assign_hook) (conf->reset_val, true,
												   PGC_S_DEFAULT))
2631 2632
							elog(FATAL, "failed to initialize %s to %g",
								 conf->gen.name, conf->reset_val);
B
Bruce Momjian 已提交
2633
					*conf->variable = conf->reset_val;
2634 2635
					break;
				}
B
Bruce Momjian 已提交
2636
			case PGC_STRING:
2637
				{
B
Bruce Momjian 已提交
2638 2639 2640 2641 2642 2643
					struct config_string *conf = (struct config_string *) gconf;
					char	   *str;

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

B
Bruce Momjian 已提交
2645
					if (conf->boot_val == NULL)
2646
					{
B
Bruce Momjian 已提交
2647 2648
						/* Cannot set value yet */
						break;
2649
					}
B
Bruce Momjian 已提交
2650

2651
					str = guc_strdup(FATAL, conf->boot_val);
B
Bruce Momjian 已提交
2652 2653 2654
					conf->reset_val = str;

					if (conf->assign_hook)
2655
					{
B
Bruce Momjian 已提交
2656 2657
						const char *newstr;

2658 2659
						newstr = (*conf->assign_hook) (str, true,
													   PGC_S_DEFAULT);
B
Bruce Momjian 已提交
2660 2661
						if (newstr == NULL)
						{
2662 2663
							elog(FATAL, "failed to initialize %s to \"%s\"",
								 conf->gen.name, str);
B
Bruce Momjian 已提交
2664 2665 2666 2667 2668 2669
						}
						else if (newstr != str)
						{
							free(str);

							/*
B
Bruce Momjian 已提交
2670
							 * See notes in set_config_option about casting
B
Bruce Momjian 已提交
2671 2672 2673 2674
							 */
							str = (char *) newstr;
							conf->reset_val = str;
						}
2675
					}
B
Bruce Momjian 已提交
2676 2677
					*conf->variable = str;
					break;
2678 2679 2680 2681 2682 2683
				}
		}
	}

	guc_dirty = false;

2684 2685
	reporting_enabled = false;

2686
	/*
2687
	 * Prevent any attempt to override the transaction modes from
2688 2689
	 * non-interactive sources.
	 */
2690 2691 2692
	SetConfigOption("transaction_isolation", "default",
					PGC_POSTMASTER, PGC_S_OVERRIDE);
	SetConfigOption("transaction_read_only", "no",
2693 2694 2695
					PGC_POSTMASTER, PGC_S_OVERRIDE);

	/*
B
Bruce Momjian 已提交
2696 2697
	 * For historical reasons, some GUC parameters can receive defaults from
	 * environment variables.  Process those settings.
2698 2699 2700 2701 2702 2703 2704 2705 2706 2707 2708 2709 2710 2711 2712 2713
	 */

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


2714 2715 2716 2717 2718 2719 2720 2721 2722 2723 2724 2725 2726 2727
/*
 * 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)
{
2728 2729
	char	   *configdir;
	char	   *fname;
2730 2731
	struct stat stat_buf;

2732 2733 2734 2735 2736
	/* configdir is -D option, or $PGDATA if no -D */
	if (userDoption)
		configdir = make_absolute_path(userDoption);
	else
		configdir = make_absolute_path(getenv("PGDATA"));
2737 2738

	/*
2739
	 * Find the configuration file: if config_file was specified on the
B
Bruce Momjian 已提交
2740 2741 2742
	 * 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.
2743
	 */
2744 2745
	if (ConfigFileName)
		fname = make_absolute_path(ConfigFileName);
2746 2747 2748 2749 2750 2751 2752
	else if (configdir)
	{
		fname = guc_malloc(FATAL,
						   strlen(configdir) + strlen(CONFIG_FILENAME) + 2);
		sprintf(fname, "%s/%s", configdir, CONFIG_FILENAME);
	}
	else
2753
	{
2754
		write_stderr("%s does not know where to find the server configuration file.\n"
P
Peter Eisentraut 已提交
2755
					 "You must specify the --config-file or -D invocation "
2756 2757 2758
					 "option or set the PGDATA environment variable.\n",
					 progname);
		return false;
2759 2760
	}

2761
	/*
B
Bruce Momjian 已提交
2762 2763
	 * Set the ConfigFileName GUC variable to its final value, ensuring that
	 * it can't be overridden later.
2764 2765 2766 2767 2768 2769 2770
	 */
	SetConfigOption("config_file", fname, PGC_POSTMASTER, PGC_S_OVERRIDE);
	free(fname);

	/*
	 * Now read the config file for the first time.
	 */
2771 2772
	if (stat(ConfigFileName, &stat_buf) != 0)
	{
2773
		write_stderr("%s cannot access the server configuration file \"%s\": %s\n",
2774 2775 2776 2777 2778 2779 2780
					 progname, ConfigFileName, strerror(errno));
		return false;
	}

	ProcessConfigFile(PGC_POSTMASTER);

	/*
2781 2782
	 * If the data_directory GUC variable has been set, use that as DataDir;
	 * otherwise use configdir if set; else punt.
2783
	 *
B
Bruce Momjian 已提交
2784 2785
	 * Note: SetDataDir will copy and absolute-ize its argument, so we don't have
	 * to.
2786
	 */
2787 2788 2789 2790
	if (data_directory)
		SetDataDir(data_directory);
	else if (configdir)
		SetDataDir(configdir);
2791 2792 2793
	else
	{
		write_stderr("%s does not know where to find the database system data.\n"
2794 2795 2796 2797 2798 2799 2800 2801 2802 2803 2804
					 "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
B
Bruce Momjian 已提交
2805 2806 2807
	 * 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.)
2808 2809 2810 2811 2812 2813 2814 2815
	 */
	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);
2816 2817 2818 2819 2820 2821 2822
	else if (configdir)
	{
		fname = guc_malloc(FATAL,
						   strlen(configdir) + strlen(HBA_FILENAME) + 2);
		sprintf(fname, "%s/%s", configdir, HBA_FILENAME);
	}
	else
2823 2824 2825 2826 2827
	{
		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",
2828 2829 2830
					 progname, ConfigFileName);
		return false;
	}
2831 2832
	SetConfigOption("hba_file", fname, PGC_POSTMASTER, PGC_S_OVERRIDE);
	free(fname);
2833 2834

	/*
2835
	 * Likewise for pg_ident.conf.
2836
	 */
2837 2838
	if (IdentFileName)
		fname = make_absolute_path(IdentFileName);
2839 2840 2841 2842 2843 2844 2845
	else if (configdir)
	{
		fname = guc_malloc(FATAL,
						   strlen(configdir) + strlen(IDENT_FILENAME) + 2);
		sprintf(fname, "%s/%s", configdir, IDENT_FILENAME);
	}
	else
2846 2847 2848 2849 2850 2851 2852 2853 2854 2855 2856 2857
	{
		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);
2858 2859 2860 2861 2862

	return true;
}


2863 2864 2865 2866 2867 2868 2869 2870 2871 2872 2873 2874 2875
/*
 * 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 */
2876 2877
		if (gconf->context != PGC_SUSET &&
			gconf->context != PGC_USERSET)
2878 2879 2880 2881 2882 2883 2884 2885
			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;

2886 2887 2888
		/* Save old value to support transaction abort */
		push_old_value(gconf);

2889 2890 2891
		switch (gconf->vartype)
		{
			case PGC_BOOL:
B
Bruce Momjian 已提交
2892 2893
				{
					struct config_bool *conf = (struct config_bool *) gconf;
2894

B
Bruce Momjian 已提交
2895
					if (conf->assign_hook)
2896 2897
						if (!(*conf->assign_hook) (conf->reset_val, true,
												   PGC_S_SESSION))
2898
							elog(ERROR, "failed to reset %s", conf->gen.name);
B
Bruce Momjian 已提交
2899 2900 2901 2902 2903 2904 2905 2906
					*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;
				}
2907
			case PGC_INT:
B
Bruce Momjian 已提交
2908 2909
				{
					struct config_int *conf = (struct config_int *) gconf;
2910

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

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

B
Bruce Momjian 已提交
2944 2945 2946 2947 2948
					if (conf->reset_val == NULL)
					{
						/* Nothing to reset to, as yet; so do nothing */
						break;
					}
2949

B
Bruce Momjian 已提交
2950 2951
					/* We need not strdup here */
					str = conf->reset_val;
2952

B
Bruce Momjian 已提交
2953
					if (conf->assign_hook)
2954
					{
B
Bruce Momjian 已提交
2955 2956
						const char *newstr;

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

2970 2971
					set_string_field(conf, conf->variable, str);
					set_string_field(conf, &conf->tentative_val, str);
B
Bruce Momjian 已提交
2972 2973 2974 2975 2976 2977
					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;
				}
2978
		}
2979 2980 2981

		if (gconf->flags & GUC_REPORT)
			ReportGUCOption(gconf);
2982 2983 2984 2985 2986
	}
}


/*
2987 2988 2989 2990 2991 2992 2993 2994 2995 2996
 * 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 已提交
2997
push_old_value(struct config_generic * gconf)
2998 2999 3000 3001 3002 3003 3004 3005 3006 3007 3008 3009 3010 3011 3012 3013
{
	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 已提交
3014 3015
		 * avoid allocation problems when a subtransaction back-fills stack
		 * entries for upper transaction levels.
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 3063 3064 3065 3066 3067 3068
		 */
		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.
3069 3070
 */
void
3071
AtEOXact_GUC(bool isCommit, bool isSubXact)
3072
{
3073
	int			my_level;
3074 3075 3076 3077 3078 3079
	int			i;

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

3080 3081 3082
	my_level = GetCurrentTransactionNestLevel();
	Assert(isSubXact ? (my_level > 1) : (my_level == 1));

3083 3084 3085
	for (i = 0; i < num_guc_variables; i++)
	{
		struct config_generic *gconf = guc_variables[i];
3086 3087 3088
		int			my_status = gconf->status;
		GucStack   *stack = gconf->stack;
		bool		useTentative;
3089
		bool		changed;
3090

3091 3092 3093 3094 3095 3096 3097 3098 3099 3100 3101 3102
		/*
		 * 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)
3103
			continue;
3104 3105 3106
		Assert(stack->nest_level == my_level);

		/*
B
Bruce Momjian 已提交
3107 3108 3109
		 * 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...
3110 3111 3112 3113 3114 3115
		 */
		gconf->status = stack->status;

		/*
		 * We have two cases:
		 *
B
Bruce Momjian 已提交
3116 3117 3118 3119 3120 3121
		 * If commit and HAVE_TENTATIVE, set actual value to tentative (this is
		 * to override a SET LOCAL if one occurred later than SET). We keep
		 * the tentative value and propagate HAVE_TENTATIVE to the parent
		 * status, allowing the SET's effect to percolate up. (But if we're
		 * exiting the outermost transaction, we'll drop the HAVE_TENTATIVE
		 * bit below.)
3122
		 *
B
Bruce Momjian 已提交
3123
		 * Otherwise, we have a transaction that aborted or executed only SET
B
Bruce Momjian 已提交
3124 3125 3126
		 * 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.
3127
		 */
3128

3129
		useTentative = isCommit && (my_status & GUC_HAVE_TENTATIVE) != 0;
3130 3131
		changed = false;

3132 3133 3134 3135
		switch (gconf->vartype)
		{
			case PGC_BOOL:
				{
B
Bruce Momjian 已提交
3136
					struct config_bool *conf = (struct config_bool *) gconf;
3137 3138
					bool		newval;
					GucSource	newsource;
3139

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

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

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

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

3206
					if (useTentative)
B
Bruce Momjian 已提交
3207
					{
3208 3209 3210 3211 3212 3213 3214 3215 3216 3217
						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 已提交
3218
					}
3219

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

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

3254 3255
					if (*conf->variable != newval)
					{
B
Bruce Momjian 已提交
3256
						if (conf->assign_hook)
3257
						{
B
Bruce Momjian 已提交
3258 3259
							const char *newstr;

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

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

3293 3294 3295 3296 3297
		/* Finish popping the state stack */
		gconf->stack = stack->prev;
		pfree(stack);

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

		/* Report new value if we changed it */
3308 3309
		if (changed && (gconf->flags & GUC_REPORT))
			ReportGUCOption(gconf);
3310 3311
	}

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


3323 3324 3325 3326 3327 3328 3329 3330 3331 3332
/*
 * Start up automatic reporting of changes to variables marked GUC_REPORT.
 * This is executed at completion of backend startup.
 */
void
BeginReportingGUCOptions(void)
{
	int			i;

	/*
B
Bruce Momjian 已提交
3333 3334
	 * Don't do anything unless talking to an interactive frontend of protocol
	 * 3.0 or later.
3335
	 */
3336
	if (whereToSendOutput != DestRemote ||
3337 3338 3339 3340 3341 3342 3343 3344 3345 3346 3347 3348 3349 3350 3351 3352 3353 3354 3355
		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
3356
ReportGUCOption(struct config_generic * record)
3357 3358 3359
{
	if (reporting_enabled && (record->flags & GUC_REPORT))
	{
3360
		char	   *val = _ShowOption(record);
3361 3362 3363 3364 3365 3366 3367 3368 3369 3370 3371 3372
		StringInfoData msgbuf;

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

		pfree(val);
	}
}


3373 3374 3375 3376 3377 3378 3379 3380 3381 3382 3383
/*
 * 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);

3384
	if (pg_strncasecmp(value, "true", len) == 0)
3385 3386 3387 3388
	{
		if (result)
			*result = true;
	}
3389
	else if (pg_strncasecmp(value, "false", len) == 0)
3390 3391 3392 3393 3394
	{
		if (result)
			*result = false;
	}

3395
	else if (pg_strncasecmp(value, "yes", len) == 0)
3396 3397 3398 3399
	{
		if (result)
			*result = true;
	}
3400
	else if (pg_strncasecmp(value, "no", len) == 0)
3401 3402 3403 3404 3405
	{
		if (result)
			*result = false;
	}

3406
	else if (pg_strcasecmp(value, "on") == 0)
3407 3408 3409 3410
	{
		if (result)
			*result = true;
	}
3411
	else if (pg_strcasecmp(value, "off") == 0)
3412 3413 3414 3415 3416
	{
		if (result)
			*result = false;
	}

3417
	else if (pg_strcasecmp(value, "1") == 0)
3418 3419 3420 3421
	{
		if (result)
			*result = true;
	}
3422
	else if (pg_strcasecmp(value, "0") == 0)
3423 3424 3425 3426 3427 3428
	{
		if (result)
			*result = false;
	}

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


3496 3497 3498 3499 3500 3501 3502 3503 3504 3505 3506 3507 3508 3509 3510 3511 3512 3513 3514 3515 3516 3517 3518 3519 3520 3521 3522
/*
 * 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;
}

3523 3524 3525 3526 3527 3528 3529 3530 3531

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

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

3568
	record = find_option(name, elevel);
3569 3570
	if (record == NULL)
	{
3571 3572
		ereport(elevel,
				(errcode(ERRCODE_UNDEFINED_OBJECT),
B
Bruce Momjian 已提交
3573
			   errmsg("unrecognized configuration parameter \"%s\"", name)));
3574 3575 3576 3577
		return false;
	}

	/*
B
Bruce Momjian 已提交
3578 3579 3580
	 * 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.
3581 3582 3583
	 */
	switch (record->context)
	{
3584 3585 3586 3587 3588
		case PGC_INTERNAL:
			if (context == PGC_SIGHUP)
				return true;
			if (context != PGC_INTERNAL)
			{
3589 3590
				ereport(elevel,
						(errcode(ERRCODE_CANT_CHANGE_RUNTIME_PARAM),
3591
						 errmsg("parameter \"%s\" cannot be changed",
3592
								name)));
3593 3594 3595
				return false;
			}
			break;
3596 3597 3598 3599 3600
		case PGC_POSTMASTER:
			if (context == PGC_SIGHUP)
				return true;
			if (context != PGC_POSTMASTER)
			{
3601 3602
				ereport(elevel,
						(errcode(ERRCODE_CANT_CHANGE_RUNTIME_PARAM),
B
Bruce Momjian 已提交
3603 3604
						 errmsg("parameter \"%s\" cannot be changed after server start",
								name)));
3605 3606 3607 3608 3609 3610
				return false;
			}
			break;
		case PGC_SIGHUP:
			if (context != PGC_SIGHUP && context != PGC_POSTMASTER)
			{
3611 3612
				ereport(elevel,
						(errcode(ERRCODE_CANT_CHANGE_RUNTIME_PARAM),
3613
						 errmsg("parameter \"%s\" cannot be changed now",
3614
								name)));
3615 3616 3617 3618
				return false;
			}

			/*
B
Bruce Momjian 已提交
3619 3620 3621 3622
			 * 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.
3623 3624 3625 3626 3627 3628
			 */
			break;
		case PGC_BACKEND:
			if (context == PGC_SIGHUP)
			{
				/*
B
Bruce Momjian 已提交
3629 3630 3631 3632 3633 3634
				 * 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.
3635 3636 3637 3638 3639 3640
				 */
				if (IsUnderPostmaster)
					return true;
			}
			else if (context != PGC_BACKEND && context != PGC_POSTMASTER)
			{
3641 3642
				ereport(elevel,
						(errcode(ERRCODE_CANT_CHANGE_RUNTIME_PARAM),
B
Bruce Momjian 已提交
3643 3644
						 errmsg("parameter \"%s\" cannot be set after connection start",
								name)));
3645 3646 3647 3648 3649 3650
				return false;
			}
			break;
		case PGC_SUSET:
			if (context == PGC_USERSET || context == PGC_BACKEND)
			{
3651 3652
				ereport(elevel,
						(errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
B
Bruce Momjian 已提交
3653 3654
						 errmsg("permission denied to set parameter \"%s\"",
								name)));
3655
				return false;
3656 3657 3658 3659 3660
			}
			break;
		case PGC_USERSET:
			/* always okay */
			break;
3661
	}
3662

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

				if (value)
3942
				{
3943
					newval = guc_strdup(elevel, value);
3944 3945 3946 3947 3948
					if (newval == NULL)
						return false;
				}
				else if (conf->reset_val)
				{
3949
					/*
B
Bruce Momjian 已提交
3950 3951
					 * We could possibly avoid strdup here, but easier to make
					 * this case work the same as the normal assignment case.
3952
					 */
3953
					newval = guc_strdup(elevel, conf->reset_val);
3954 3955 3956 3957 3958 3959 3960 3961 3962 3963 3964 3965
					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 已提交
3966
					const char *hookresult;
3967

3968 3969 3970 3971 3972 3973 3974 3975
					/*
					 * 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);
3976
					if (hookresult == NULL)
B
Bruce Momjian 已提交
3977
					{
3978
						free(newval);
3979 3980
						ereport(elevel,
								(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
B
Bruce Momjian 已提交
3981 3982
						 errmsg("invalid value for parameter \"%s\": \"%s\"",
								name, value ? value : "")));
B
Bruce Momjian 已提交
3983 3984
						return false;
					}
3985
					else if (hookresult != newval)
B
Bruce Momjian 已提交
3986
					{
3987
						free(newval);
B
Bruce Momjian 已提交
3988

3989
						/*
B
Bruce Momjian 已提交
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
	/*
B
Bruce Momjian 已提交
4194 4195
	 * Fast path if just DEFAULT.  We do not check the variable name in this
	 * case --- necessary for RESET ALL to work correctly.
4196
	 */
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
				break;
			case T_String:
				val = strVal(&arg->val);
				if (arg->typename != NULL)
				{
					/*
B
Bruce Momjian 已提交
4243 4244 4245
					 * Must be a ConstInterval argument for TIME ZONE. Coerce
					 * to interval and back to normalize the value and account
					 * for any typmod.
4246
					 */
B
Bruce Momjian 已提交
4247
					Datum		interval;
B
Bruce Momjian 已提交
4248
					char	   *intervalout;
4249 4250

					interval =
B
Bruce Momjian 已提交
4251 4252 4253 4254
						DirectFunctionCall3(interval_in,
											CStringGetDatum(val),
											ObjectIdGetDatum(InvalidOid),
									   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
	const char *name = variable->name;
	const char **nameAddr = &name;
	const char *value;
	struct config_string *pHolder;
	struct config_generic **res = (struct config_generic **) bsearch(
B
Bruce Momjian 已提交
4362 4363 4364 4365 4366
														  (void *) &nameAddr,
													  (void *) guc_variables,
														   num_guc_variables,
											 sizeof(struct config_generic *),
															guc_var_compare);
B
Bruce Momjian 已提交
4367 4368

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

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

	free(pHolder);
}

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

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

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

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

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

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

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

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

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

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

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

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

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

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

	int			nameLen = strlen(className);
4531

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

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


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

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

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

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

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


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

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

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

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

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

	end_tup_output(tstate);
4636 4637
}

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

4650 4651
	/* need a tuple descriptor representing three TEXT columns */
	tupdesc = CreateTemplateTupleDesc(3, false);
4652
	TupleDescInitEntry(tupdesc, (AttrNumber) 1, "name",
4653
					   TEXTOID, -1, 0);
4654
	TupleDescInitEntry(tupdesc, (AttrNumber) 2, "setting",
4655
					   TEXTOID, -1, 0);
4656 4657
	TupleDescInitEntry(tupdesc, (AttrNumber) 3, "description",
					   TEXTOID, -1, 0);
B
Bruce Momjian 已提交
4658

4659 4660 4661

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

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

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

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

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

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

	end_tup_output(tstate);
4685
}
4686

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

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

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

4709 4710 4711 4712
	return _ShowOption(record);
}

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

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

	conf = guc_variables[varnum];
4726

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

				/* min_val */
4820
				values[8] = NULL;
4821 4822

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

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

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

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

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

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

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

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

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

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

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

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

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

		MemoryContextSwitchTo(oldcontext);
B
Bruce Momjian 已提交
4926
	}
4927 4928

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

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

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

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

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

		/* make the tuple into a datum */
4963
		result = HeapTupleGetDatum(tuple);
4964

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

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

4980 4981 4982 4983 4984
	switch (record->vartype)
	{
		case PGC_BOOL:
			{
				struct config_bool *conf = (struct config_bool *) record;
4985

4986 4987 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
				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;
5026

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

5036 5037 5038 5039 5040
		default:
			/* just to keep compiler quiet */
			val = "???";
			break;
	}
5041

5042
	return pstrdup(val);
5043
}
5044 5045


B
Bruce Momjian 已提交
5046
#ifdef EXEC_BACKEND
5047

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

	Assert(context == PGC_POSTMASTER || context == PGC_SIGHUP);
5064 5065

	elevel = (context == PGC_SIGHUP) ? LOG : ERROR;
B
Bruce Momjian 已提交
5066 5067 5068 5069

	/*
	 * Open file
	 */
5070
	fp = AllocateFile(CONFIG_EXEC_PARAMS_NEW, "w");
5071 5072
	if (!fp)
	{
5073 5074
		ereport(elevel,
				(errcode_for_file_access(),
5075 5076
				 errmsg("could not write to file \"%s\": %m",
						CONFIG_EXEC_PARAMS_NEW)));
B
Bruce Momjian 已提交
5077 5078 5079 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
		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);
		}
	}

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

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


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

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

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

5211
	for (;;)
B
Bruce Momjian 已提交
5212
	{
5213 5214
		struct config_generic *record;

B
Bruce Momjian 已提交
5215 5216 5217
		if ((varname = read_string_with_null(fp)) == NULL)
			break;

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

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

	FreeFile(fp);
}
B
Bruce Momjian 已提交
5233
#endif   /* EXEC_BACKEND */
B
Bruce Momjian 已提交
5234 5235


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

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

	equal_pos = strcspn(string, "=");

	if (string[equal_pos] == '=')
	{
5257
		*name = guc_malloc(FATAL, equal_pos + 1);
5258 5259 5260
		strncpy(*name, string, equal_pos);
		(*name)[equal_pos] = '\0';

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

B
Bruce Momjian 已提交
5270
	for (cp = *name; *cp; cp++)
5271 5272 5273
		if (*cp == '-')
			*cp = '_';
}
5274 5275


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

5285
	Assert(array != NULL);
5286 5287 5288
	Assert(ARR_ELEMTYPE(array) == TEXTOID);
	Assert(ARR_NDIM(array) == 1);
	Assert(ARR_LBOUND(array)[0] == 1);
5289
	Assert(source == PGC_S_DATABASE || source == PGC_S_USER);
5290 5291 5292 5293 5294 5295 5296 5297 5298 5299

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

		if (isnull)
			continue;

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

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

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

		free(name);
		if (value)
			free(value);
5331 5332 5333 5334
	}
}


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

5355 5356 5357 5358
	/* convert name to canonical spelling, so we can use plain strcmp */
	(void) GetConfigOptionByName(name, &varname);
	name = varname;

5359 5360 5361
	newval = palloc(strlen(name) + 1 + strlen(value) + 1);
	sprintf(newval, "%s=%s", name, value);
	datum = DirectFunctionCall1(textin, CStringGetDatum(newval));
B
Bruce Momjian 已提交
5362

5363 5364
	if (array)
	{
B
Bruce Momjian 已提交
5365 5366 5367
		int			index;
		bool		isnull;
		int			i;
5368

5369 5370 5371 5372
		Assert(ARR_ELEMTYPE(array) == TEXTOID);
		Assert(ARR_NDIM(array) == 1);
		Assert(ARR_LBOUND(array)[0] == 1);

B
Bruce Momjian 已提交
5373
		index = ARR_DIMS(array)[0] + 1; /* add after end */
5374 5375 5376 5377 5378 5379 5380

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

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

5396 5397
		a = array_set(array, 1, &index,
					  datum,
5398 5399
					  false,
					  -1 /* varlena array */ ,
B
Bruce Momjian 已提交
5400 5401
					  -1 /* TEXT's typlen */ ,
					  false /* TEXT's typbyval */ ,
5402
					  'i' /* TEXT's typalign */ );
5403 5404
	}
	else
5405 5406 5407
		a = construct_array(&datum, 1,
							TEXTOID,
							-1, false, 'i');
5408 5409 5410 5411 5412

	return a;
}


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

	Assert(name);

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

5433 5434 5435 5436
	/* convert name to canonical spelling, so we can use plain strcmp */
	(void) GetConfigOptionByName(name, &varname);
	name = varname;

5437 5438 5439 5440 5441
	/* if array is currently null, then surely nothing to delete */
	if (!array)
		return NULL;

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

5460
		/* ignore entry if it's what we want to delete */
B
Bruce Momjian 已提交
5461
		if (strncmp(val, name, strlen(name)) == 0
5462 5463 5464
			&& val[strlen(name)] == '=')
			continue;

5465 5466 5467 5468 5469
		/* else add it to the output array */
		if (newarray)
		{
			newarray = array_set(newarray, 1, &index,
								 d,
5470
								 false,
5471 5472 5473
								 -1 /* varlenarray */ ,
								 -1 /* TEXT's typlen */ ,
								 false /* TEXT's typbyval */ ,
5474
								 'i' /* TEXT's typalign */ );
5475 5476 5477 5478 5479 5480
		}
		else
			newarray = construct_array(&d, 1,
									   TEXTOID,
									   -1, false, 'i');

5481 5482 5483 5484 5485
		index++;
	}

	return newarray;
}
5486

5487 5488 5489 5490 5491

/*
 * assign_hook subroutines
 */

5492 5493 5494
static const char *
assign_log_destination(const char *value, bool doit, GucSource source)
{
B
Bruce Momjian 已提交
5495 5496 5497 5498 5499
	char	   *rawstring;
	List	   *elemlist;
	ListCell   *l;
	int			newlogdest = 0;

5500 5501 5502 5503
	/* Need a modifiable copy of string */
	rawstring = pstrdup(value);

	/* Parse string into list of identifiers */
B
Bruce Momjian 已提交
5504
	if (!SplitIdentifierString(rawstring, ',', &elemlist))
5505 5506 5507
	{
		/* syntax error in list */
		pfree(rawstring);
5508
		list_free(elemlist);
5509 5510 5511
		if (source >= PGC_S_INTERACTIVE)
			ereport(ERROR,
					(errcode(ERRCODE_INVALID_PARAMETER_VALUE),
B
Bruce Momjian 已提交
5512
			errmsg("invalid list syntax for parameter \"log_destination\"")));
5513 5514 5515 5516 5517
		return NULL;
	}

	foreach(l, elemlist)
	{
B
Bruce Momjian 已提交
5518 5519 5520
		char	   *tok = (char *) lfirst(l);

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

5543 5544 5545
	if (doit)
		Log_destination = newlogdest;

5546
	pfree(rawstring);
5547
	list_free(elemlist);
5548 5549 5550 5551

	return value;
}

5552 5553 5554
#ifdef HAVE_SYSLOG

static const char *
5555
assign_syslog_facility(const char *facility, bool doit, GucSource source)
5556
{
B
Bruce Momjian 已提交
5557
	int			syslog_fac;
5558

5559
	if (pg_strcasecmp(facility, "LOCAL0") == 0)
5560 5561 5562 5563 5564 5565 5566 5567 5568 5569 5570 5571 5572 5573 5574 5575 5576 5577 5578 5579 5580 5581 5582 5583 5584 5585
		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;
5586
}
5587 5588 5589 5590 5591 5592 5593 5594 5595

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

	return ident;
}
B
Bruce Momjian 已提交
5596
#endif   /* HAVE_SYSLOG */
5597 5598 5599


static const char *
5600
assign_defaultxactisolevel(const char *newval, bool doit, GucSource source)
5601
{
5602
	if (pg_strcasecmp(newval, "serializable") == 0)
5603 5604 5605 5606
	{
		if (doit)
			DefaultXactIsoLevel = XACT_SERIALIZABLE;
	}
5607
	else if (pg_strcasecmp(newval, "repeatable read") == 0)
5608 5609 5610 5611
	{
		if (doit)
			DefaultXactIsoLevel = XACT_REPEATABLE_READ;
	}
5612
	else if (pg_strcasecmp(newval, "read committed") == 0)
5613 5614 5615 5616
	{
		if (doit)
			DefaultXactIsoLevel = XACT_READ_COMMITTED;
	}
5617
	else if (pg_strcasecmp(newval, "read uncommitted") == 0)
5618 5619 5620 5621
	{
		if (doit)
			DefaultXactIsoLevel = XACT_READ_UNCOMMITTED;
	}
5622 5623 5624 5625 5626 5627
	else
		return NULL;
	return newval;
}

static const char *
5628
assign_log_min_messages(const char *newval,
5629
						bool doit, GucSource source)
5630
{
5631
	return (assign_msglvl(&log_min_messages, newval, doit, source));
5632 5633
}

5634
static const char *
5635
assign_client_min_messages(const char *newval, bool doit, GucSource source)
5636
{
5637
	return (assign_msglvl(&client_min_messages, newval, doit, source));
5638 5639
}

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

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

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

5725
static const char *
5726
assign_log_error_verbosity(const char *newval, bool doit, GucSource source)
5727
{
5728
	if (pg_strcasecmp(newval, "terse") == 0)
5729 5730 5731 5732
	{
		if (doit)
			Log_error_verbosity = PGERROR_TERSE;
	}
5733
	else if (pg_strcasecmp(newval, "default") == 0)
5734 5735 5736 5737
	{
		if (doit)
			Log_error_verbosity = PGERROR_DEFAULT;
	}
5738
	else if (pg_strcasecmp(newval, "verbose") == 0)
5739 5740 5741 5742 5743 5744 5745 5746 5747
	{
		if (doit)
			Log_error_verbosity = PGERROR_VERBOSE;
	}
	else
		return NULL;			/* fail */
	return newval;				/* OK */
}

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

5776 5777 5778 5779
static const char *
show_num_temp_buffers(void)
{
	/*
B
Bruce Momjian 已提交
5780 5781
	 * We show the GUC var until local buffers have been initialized, and
	 * NLocBuffer afterwards.
5782 5783 5784 5785 5786 5787 5788
	 */
	static char nbuf[32];

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

5789
static bool
5790
assign_phony_autocommit(bool newval, bool doit, GucSource source)
5791 5792 5793
{
	if (!newval)
	{
5794
		if (doit && source >= PGC_S_INTERACTIVE)
5795 5796
			ereport(ERROR,
					(errcode(ERRCODE_FEATURE_NOT_SUPPORTED),
B
Bruce Momjian 已提交
5797
					 errmsg("SET AUTOCOMMIT TO OFF is no longer supported")));
5798 5799 5800 5801 5802
		return false;
	}
	return true;
}

5803 5804 5805
static const char *
assign_custom_variable_classes(const char *newval, bool doit, GucSource source)
{
B
Bruce Momjian 已提交
5806 5807
	/*
	 * Check syntax. newval must be a comma separated list of identifiers.
5808 5809
	 * Whitespace is allowed but skipped.
	 */
B
Bruce Momjian 已提交
5810
	bool		hasSpaceAfterToken = false;
5811
	const char *cp = newval;
B
Bruce Momjian 已提交
5812 5813
	int			symLen = 0;
	int			c;
5814 5815 5816
	StringInfoData buf;

	initStringInfo(&buf);
B
Bruce Momjian 已提交
5817
	while ((c = *cp++) != 0)
5818
	{
B
Bruce Momjian 已提交
5819
		if (isspace(c))
5820
		{
B
Bruce Momjian 已提交
5821
			if (symLen > 0)
5822 5823 5824 5825
				hasSpaceAfterToken = true;
			continue;
		}

B
Bruce Momjian 已提交
5826
		if (c == ',')
5827 5828
		{
			hasSpaceAfterToken = false;
B
Bruce Momjian 已提交
5829
			if (symLen > 0)
5830 5831 5832 5833 5834 5835 5836
			{
				symLen = 0;
				appendStringInfoChar(&buf, ',');
			}
			continue;
		}

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

5853
	/* Remove stray ',' at end */
B
Bruce Momjian 已提交
5854
	if (symLen == 0 && buf.len > 0)
5855
		buf.data[--buf.len] = '\0';
5856

B
Bruce Momjian 已提交
5857
	if (buf.len == 0)
5858
		newval = NULL;
B
Bruce Momjian 已提交
5859
	else if (doit)
5860 5861 5862 5863 5864
		newval = strdup(buf.data);

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

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

static bool
assign_log_stats(bool newval, bool doit, GucSource source)
{
5885 5886
	if (newval &&
		(log_parser_stats || log_planner_stats || log_executor_stats))
5887
	{
5888 5889 5890 5891 5892 5893
		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")));
5894 5895
		/* source == PGC_S_OVERRIDE means do it anyway, eg at xact abort */
		else if (source != PGC_S_OVERRIDE)
5896
			return false;
5897 5898 5899 5900
	}
	return true;
}

5901 5902 5903
static bool
assign_transaction_read_only(bool newval, bool doit, GucSource source)
{
5904 5905 5906 5907 5908 5909 5910
	/* 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")));
5911 5912 5913
		/* source == PGC_S_OVERRIDE means do it anyway, eg at xact abort */
		else if (source != PGC_S_OVERRIDE)
			return false;
5914
	}
5915 5916
	return true;
}
5917

5918 5919 5920 5921 5922
static const char *
assign_canonical_path(const char *newval, bool doit, GucSource source)
{
	if (doit)
	{
B
Bruce Momjian 已提交
5923 5924
		char	   *canon_val = guc_strdup(ERROR, newval);

5925 5926 5927 5928 5929 5930 5931
		canonicalize_path(canon_val);
		return canon_val;
	}
	else
		return newval;
}

5932 5933 5934
static bool
assign_tcp_keepalives_idle(int newval, bool doit, GucSource source)
{
5935
	if (doit)
5936 5937 5938 5939 5940 5941 5942 5943
		return (pq_setkeepalivesidle(newval, MyProcPort) == STATUS_OK);

	return true;
}

static const char *
show_tcp_keepalives_idle(void)
{
5944 5945 5946
	static char nbuf[16];

	snprintf(nbuf, sizeof(nbuf), "%d", pq_getkeepalivesidle(MyProcPort));
5947 5948 5949 5950 5951 5952
	return nbuf;
}

static bool
assign_tcp_keepalives_interval(int newval, bool doit, GucSource source)
{
5953
	if (doit)
5954 5955 5956 5957 5958 5959 5960 5961
		return (pq_setkeepalivesinterval(newval, MyProcPort) == STATUS_OK);

	return true;
}

static const char *
show_tcp_keepalives_interval(void)
{
5962 5963 5964
	static char nbuf[16];

	snprintf(nbuf, sizeof(nbuf), "%d", pq_getkeepalivesinterval(MyProcPort));
5965 5966 5967 5968 5969 5970
	return nbuf;
}

static bool
assign_tcp_keepalives_count(int newval, bool doit, GucSource source)
{
5971
	if (doit)
5972 5973 5974 5975 5976 5977 5978 5979
		return (pq_setkeepalivescount(newval, MyProcPort) == STATUS_OK);

	return true;
}

static const char *
show_tcp_keepalives_count(void)
{
5980 5981 5982
	static char nbuf[16];

	snprintf(nbuf, sizeof(nbuf), "%d", pq_getkeepalivescount(MyProcPort));
5983 5984
	return nbuf;
}
5985

5986

5987
#include "guc-file.c"