PostgreSQL Source Code  git master
misc.c
Go to the documentation of this file.
1 /*-------------------------------------------------------------------------
2  *
3  * misc.c
4  *
5  *
6  * Portions Copyright (c) 1996-2020, PostgreSQL Global Development Group
7  * Portions Copyright (c) 1994, Regents of the University of California
8  *
9  *
10  * IDENTIFICATION
11  * src/backend/utils/adt/misc.c
12  *
13  *-------------------------------------------------------------------------
14  */
15 #include "postgres.h"
16 
17 #include <sys/file.h>
18 #include <dirent.h>
19 #include <math.h>
20 #include <unistd.h>
21 
22 #include "access/sysattr.h"
23 #include "access/table.h"
24 #include "catalog/catalog.h"
25 #include "catalog/pg_tablespace.h"
26 #include "catalog/pg_type.h"
27 #include "commands/dbcommands.h"
28 #include "commands/tablespace.h"
29 #include "common/keywords.h"
30 #include "funcapi.h"
31 #include "miscadmin.h"
32 #include "parser/scansup.h"
33 #include "pgstat.h"
34 #include "postmaster/syslogger.h"
35 #include "rewrite/rewriteHandler.h"
36 #include "storage/fd.h"
37 #include "tcop/tcopprot.h"
38 #include "utils/builtins.h"
39 #include "utils/lsyscache.h"
40 #include "utils/ruleutils.h"
41 #include "utils/timestamp.h"
42 
43 /*
44  * Common subroutine for num_nulls() and num_nonnulls().
45  * Returns true if successful, false if function should return NULL.
46  * If successful, total argument count and number of nulls are
47  * returned into *nargs and *nulls.
48  */
49 static bool
51  int32 *nargs, int32 *nulls)
52 {
53  int32 count = 0;
54  int i;
55 
56  /* Did we get a VARIADIC array argument, or separate arguments? */
57  if (get_fn_expr_variadic(fcinfo->flinfo))
58  {
59  ArrayType *arr;
60  int ndims,
61  nitems,
62  *dims;
63  bits8 *bitmap;
64 
65  Assert(PG_NARGS() == 1);
66 
67  /*
68  * If we get a null as VARIADIC array argument, we can't say anything
69  * useful about the number of elements, so return NULL. This behavior
70  * is consistent with other variadic functions - see concat_internal.
71  */
72  if (PG_ARGISNULL(0))
73  return false;
74 
75  /*
76  * Non-null argument had better be an array. We assume that any call
77  * context that could let get_fn_expr_variadic return true will have
78  * checked that a VARIADIC-labeled parameter actually is an array. So
79  * it should be okay to just Assert that it's an array rather than
80  * doing a full-fledged error check.
81  */
83 
84  /* OK, safe to fetch the array value */
85  arr = PG_GETARG_ARRAYTYPE_P(0);
86 
87  /* Count the array elements */
88  ndims = ARR_NDIM(arr);
89  dims = ARR_DIMS(arr);
90  nitems = ArrayGetNItems(ndims, dims);
91 
92  /* Count those that are NULL */
93  bitmap = ARR_NULLBITMAP(arr);
94  if (bitmap)
95  {
96  int bitmask = 1;
97 
98  for (i = 0; i < nitems; i++)
99  {
100  if ((*bitmap & bitmask) == 0)
101  count++;
102 
103  bitmask <<= 1;
104  if (bitmask == 0x100)
105  {
106  bitmap++;
107  bitmask = 1;
108  }
109  }
110  }
111 
112  *nargs = nitems;
113  *nulls = count;
114  }
115  else
116  {
117  /* Separate arguments, so just count 'em */
118  for (i = 0; i < PG_NARGS(); i++)
119  {
120  if (PG_ARGISNULL(i))
121  count++;
122  }
123 
124  *nargs = PG_NARGS();
125  *nulls = count;
126  }
127 
128  return true;
129 }
130 
131 /*
132  * num_nulls()
133  * Count the number of NULL arguments
134  */
135 Datum
137 {
138  int32 nargs,
139  nulls;
140 
141  if (!count_nulls(fcinfo, &nargs, &nulls))
142  PG_RETURN_NULL();
143 
144  PG_RETURN_INT32(nulls);
145 }
146 
147 /*
148  * num_nonnulls()
149  * Count the number of non-NULL arguments
150  */
151 Datum
153 {
154  int32 nargs,
155  nulls;
156 
157  if (!count_nulls(fcinfo, &nargs, &nulls))
158  PG_RETURN_NULL();
159 
160  PG_RETURN_INT32(nargs - nulls);
161 }
162 
163 
164 /*
165  * current_database()
166  * Expose the current database to the user
167  */
168 Datum
170 {
171  Name db;
172 
173  db = (Name) palloc(NAMEDATALEN);
174 
176  PG_RETURN_NAME(db);
177 }
178 
179 
180 /*
181  * current_query()
182  * Expose the current query to the user (useful in stored procedures)
183  * We might want to use ActivePortal->sourceText someday.
184  */
185 Datum
187 {
188  /* there is no easy way to access the more concise 'query_string' */
189  if (debug_query_string)
191  else
192  PG_RETURN_NULL();
193 }
194 
195 /* Function to find out which databases make use of a tablespace */
196 
197 Datum
199 {
200  Oid tablespaceOid = PG_GETARG_OID(0);
201  ReturnSetInfo *rsinfo = (ReturnSetInfo *) fcinfo->resultinfo;
202  bool randomAccess;
203  TupleDesc tupdesc;
204  Tuplestorestate *tupstore;
205  char *location;
206  DIR *dirdesc;
207  struct dirent *de;
208  MemoryContext oldcontext;
209 
210  /* check to see if caller supports us returning a tuplestore */
211  if (rsinfo == NULL || !IsA(rsinfo, ReturnSetInfo))
212  ereport(ERROR,
213  (errcode(ERRCODE_FEATURE_NOT_SUPPORTED),
214  errmsg("set-valued function called in context that cannot accept a set")));
215  if (!(rsinfo->allowedModes & SFRM_Materialize))
216  ereport(ERROR,
217  (errcode(ERRCODE_SYNTAX_ERROR),
218  errmsg("materialize mode required, but it is not allowed in this context")));
219 
220  /* The tupdesc and tuplestore must be created in ecxt_per_query_memory */
222 
223  tupdesc = CreateTemplateTupleDesc(1);
224  TupleDescInitEntry(tupdesc, (AttrNumber) 1, "pg_tablespace_databases",
225  OIDOID, -1, 0);
226 
227  randomAccess = (rsinfo->allowedModes & SFRM_Materialize_Random) != 0;
228  tupstore = tuplestore_begin_heap(randomAccess, false, work_mem);
229 
230  rsinfo->returnMode = SFRM_Materialize;
231  rsinfo->setResult = tupstore;
232  rsinfo->setDesc = tupdesc;
233 
234  MemoryContextSwitchTo(oldcontext);
235 
236  if (tablespaceOid == GLOBALTABLESPACE_OID)
237  {
239  (errmsg("global tablespace never has databases")));
240  /* return empty tuplestore */
241  return (Datum) 0;
242  }
243 
244  if (tablespaceOid == DEFAULTTABLESPACE_OID)
245  location = psprintf("base");
246  else
247  location = psprintf("pg_tblspc/%u/%s", tablespaceOid,
249 
250  dirdesc = AllocateDir(location);
251 
252  if (!dirdesc)
253  {
254  /* the only expected error is ENOENT */
255  if (errno != ENOENT)
256  ereport(ERROR,
258  errmsg("could not open directory \"%s\": %m",
259  location)));
261  (errmsg("%u is not a tablespace OID", tablespaceOid)));
262  /* return empty tuplestore */
263  return (Datum) 0;
264  }
265 
266  while ((de = ReadDir(dirdesc, location)) != NULL)
267  {
268  Oid datOid = atooid(de->d_name);
269  char *subdir;
270  bool isempty;
271  Datum values[1];
272  bool nulls[1];
273 
274  /* this test skips . and .., but is awfully weak */
275  if (!datOid)
276  continue;
277 
278  /* if database subdir is empty, don't report tablespace as used */
279 
280  subdir = psprintf("%s/%s", location, de->d_name);
281  isempty = directory_is_empty(subdir);
282  pfree(subdir);
283 
284  if (isempty)
285  continue; /* indeed, nothing in it */
286 
287  values[0] = ObjectIdGetDatum(datOid);
288  nulls[0] = false;
289 
290  tuplestore_putvalues(tupstore, tupdesc, values, nulls);
291  }
292 
293  FreeDir(dirdesc);
294  return (Datum) 0;
295 }
296 
297 
298 /*
299  * pg_tablespace_location - get location for a tablespace
300  */
301 Datum
303 {
304  Oid tablespaceOid = PG_GETARG_OID(0);
305  char sourcepath[MAXPGPATH];
306  char targetpath[MAXPGPATH];
307  int rllen;
308 
309  /*
310  * It's useful to apply this function to pg_class.reltablespace, wherein
311  * zero means "the database's default tablespace". So, rather than
312  * throwing an error for zero, we choose to assume that's what is meant.
313  */
314  if (tablespaceOid == InvalidOid)
315  tablespaceOid = MyDatabaseTableSpace;
316 
317  /*
318  * Return empty string for the cluster's default tablespaces
319  */
320  if (tablespaceOid == DEFAULTTABLESPACE_OID ||
321  tablespaceOid == GLOBALTABLESPACE_OID)
323 
324 #if defined(HAVE_READLINK) || defined(WIN32)
325 
326  /*
327  * Find the location of the tablespace by reading the symbolic link that
328  * is in pg_tblspc/<oid>.
329  */
330  snprintf(sourcepath, sizeof(sourcepath), "pg_tblspc/%u", tablespaceOid);
331 
332  rllen = readlink(sourcepath, targetpath, sizeof(targetpath));
333  if (rllen < 0)
334  ereport(ERROR,
336  errmsg("could not read symbolic link \"%s\": %m",
337  sourcepath)));
338  if (rllen >= sizeof(targetpath))
339  ereport(ERROR,
340  (errcode(ERRCODE_PROGRAM_LIMIT_EXCEEDED),
341  errmsg("symbolic link \"%s\" target is too long",
342  sourcepath)));
343  targetpath[rllen] = '\0';
344 
345  PG_RETURN_TEXT_P(cstring_to_text(targetpath));
346 #else
347  ereport(ERROR,
348  (errcode(ERRCODE_FEATURE_NOT_SUPPORTED),
349  errmsg("tablespaces are not supported on this platform")));
350  PG_RETURN_NULL();
351 #endif
352 }
353 
354 /*
355  * pg_sleep - delay for N seconds
356  */
357 Datum
359 {
360  float8 secs = PG_GETARG_FLOAT8(0);
361  float8 endtime;
362 
363  /*
364  * We sleep using WaitLatch, to ensure that we'll wake up promptly if an
365  * important signal (such as SIGALRM or SIGINT) arrives. Because
366  * WaitLatch's upper limit of delay is INT_MAX milliseconds, and the user
367  * might ask for more than that, we sleep for at most 10 minutes and then
368  * loop.
369  *
370  * By computing the intended stop time initially, we avoid accumulation of
371  * extra delay across multiple sleeps. This also ensures we won't delay
372  * less than the specified time when WaitLatch is terminated early by a
373  * non-query-canceling signal such as SIGHUP.
374  */
375 #define GetNowFloat() ((float8) GetCurrentTimestamp() / 1000000.0)
376 
377  endtime = GetNowFloat() + secs;
378 
379  for (;;)
380  {
381  float8 delay;
382  long delay_ms;
383 
385 
386  delay = endtime - GetNowFloat();
387  if (delay >= 600.0)
388  delay_ms = 600000;
389  else if (delay > 0.0)
390  delay_ms = (long) ceil(delay * 1000.0);
391  else
392  break;
393 
394  (void) WaitLatch(MyLatch,
396  delay_ms,
399  }
400 
401  PG_RETURN_VOID();
402 }
403 
404 /* Function to return the list of grammar keywords */
405 Datum
407 {
408  FuncCallContext *funcctx;
409 
410  if (SRF_IS_FIRSTCALL())
411  {
412  MemoryContext oldcontext;
413  TupleDesc tupdesc;
414 
415  funcctx = SRF_FIRSTCALL_INIT();
416  oldcontext = MemoryContextSwitchTo(funcctx->multi_call_memory_ctx);
417 
418  tupdesc = CreateTemplateTupleDesc(3);
419  TupleDescInitEntry(tupdesc, (AttrNumber) 1, "word",
420  TEXTOID, -1, 0);
421  TupleDescInitEntry(tupdesc, (AttrNumber) 2, "catcode",
422  CHAROID, -1, 0);
423  TupleDescInitEntry(tupdesc, (AttrNumber) 3, "catdesc",
424  TEXTOID, -1, 0);
425 
426  funcctx->attinmeta = TupleDescGetAttInMetadata(tupdesc);
427 
428  MemoryContextSwitchTo(oldcontext);
429  }
430 
431  funcctx = SRF_PERCALL_SETUP();
432 
433  if (funcctx->call_cntr < ScanKeywords.num_keywords)
434  {
435  char *values[3];
436  HeapTuple tuple;
437 
438  /* cast-away-const is ugly but alternatives aren't much better */
439  values[0] = unconstify(char *,
440  GetScanKeyword(funcctx->call_cntr,
441  &ScanKeywords));
442 
443  switch (ScanKeywordCategories[funcctx->call_cntr])
444  {
445  case UNRESERVED_KEYWORD:
446  values[1] = "U";
447  values[2] = _("unreserved");
448  break;
449  case COL_NAME_KEYWORD:
450  values[1] = "C";
451  values[2] = _("unreserved (cannot be function or type name)");
452  break;
454  values[1] = "T";
455  values[2] = _("reserved (can be function or type name)");
456  break;
457  case RESERVED_KEYWORD:
458  values[1] = "R";
459  values[2] = _("reserved");
460  break;
461  default: /* shouldn't be possible */
462  values[1] = NULL;
463  values[2] = NULL;
464  break;
465  }
466 
467  tuple = BuildTupleFromCStrings(funcctx->attinmeta, values);
468 
469  SRF_RETURN_NEXT(funcctx, HeapTupleGetDatum(tuple));
470  }
471 
472  SRF_RETURN_DONE(funcctx);
473 }
474 
475 
476 /*
477  * Return the type of the argument.
478  */
479 Datum
481 {
482  PG_RETURN_OID(get_fn_expr_argtype(fcinfo->flinfo, 0));
483 }
484 
485 
486 /*
487  * Implementation of the COLLATE FOR expression; returns the collation
488  * of the argument.
489  */
490 Datum
492 {
493  Oid typeid;
494  Oid collid;
495 
496  typeid = get_fn_expr_argtype(fcinfo->flinfo, 0);
497  if (!typeid)
498  PG_RETURN_NULL();
499  if (!type_is_collatable(typeid) && typeid != UNKNOWNOID)
500  ereport(ERROR,
501  (errcode(ERRCODE_DATATYPE_MISMATCH),
502  errmsg("collations are not supported by type %s",
503  format_type_be(typeid))));
504 
505  collid = PG_GET_COLLATION();
506  if (!collid)
507  PG_RETURN_NULL();
509 }
510 
511 
512 /*
513  * pg_relation_is_updatable - determine which update events the specified
514  * relation supports.
515  *
516  * This relies on relation_is_updatable() in rewriteHandler.c, which see
517  * for additional information.
518  */
519 Datum
521 {
522  Oid reloid = PG_GETARG_OID(0);
523  bool include_triggers = PG_GETARG_BOOL(1);
524 
525  PG_RETURN_INT32(relation_is_updatable(reloid, NIL, include_triggers, NULL));
526 }
527 
528 /*
529  * pg_column_is_updatable - determine whether a column is updatable
530  *
531  * This function encapsulates the decision about just what
532  * information_schema.columns.is_updatable actually means. It's not clear
533  * whether deletability of the column's relation should be required, so
534  * we want that decision in C code where we could change it without initdb.
535  */
536 Datum
538 {
539  Oid reloid = PG_GETARG_OID(0);
542  bool include_triggers = PG_GETARG_BOOL(2);
543  int events;
544 
545  /* System columns are never updatable */
546  if (attnum <= 0)
547  PG_RETURN_BOOL(false);
548 
549  events = relation_is_updatable(reloid, NIL, include_triggers,
550  bms_make_singleton(col));
551 
552  /* We require both updatability and deletability of the relation */
553 #define REQ_EVENTS ((1 << CMD_UPDATE) | (1 << CMD_DELETE))
554 
555  PG_RETURN_BOOL((events & REQ_EVENTS) == REQ_EVENTS);
556 }
557 
558 
559 /*
560  * Is character a valid identifier start?
561  * Must match scan.l's {ident_start} character class.
562  */
563 static bool
564 is_ident_start(unsigned char c)
565 {
566  /* Underscores and ASCII letters are OK */
567  if (c == '_')
568  return true;
569  if ((c >= 'a' && c <= 'z') || (c >= 'A' && c <= 'Z'))
570  return true;
571  /* Any high-bit-set character is OK (might be part of a multibyte char) */
572  if (IS_HIGHBIT_SET(c))
573  return true;
574  return false;
575 }
576 
577 /*
578  * Is character a valid identifier continuation?
579  * Must match scan.l's {ident_cont} character class.
580  */
581 static bool
582 is_ident_cont(unsigned char c)
583 {
584  /* Can be digit or dollar sign ... */
585  if ((c >= '0' && c <= '9') || c == '$')
586  return true;
587  /* ... or an identifier start character */
588  return is_ident_start(c);
589 }
590 
591 /*
592  * parse_ident - parse a SQL qualified identifier into separate identifiers.
593  * When strict mode is active (second parameter), then any chars after
594  * the last identifier are disallowed.
595  */
596 Datum
598 {
599  text *qualname = PG_GETARG_TEXT_PP(0);
600  bool strict = PG_GETARG_BOOL(1);
601  char *qualname_str = text_to_cstring(qualname);
602  ArrayBuildState *astate = NULL;
603  char *nextp;
604  bool after_dot = false;
605 
606  /*
607  * The code below scribbles on qualname_str in some cases, so we should
608  * reconvert qualname if we need to show the original string in error
609  * messages.
610  */
611  nextp = qualname_str;
612 
613  /* skip leading whitespace */
614  while (scanner_isspace(*nextp))
615  nextp++;
616 
617  for (;;)
618  {
619  char *curname;
620  bool missing_ident = true;
621 
622  if (*nextp == '"')
623  {
624  char *endp;
625 
626  curname = nextp + 1;
627  for (;;)
628  {
629  endp = strchr(nextp + 1, '"');
630  if (endp == NULL)
631  ereport(ERROR,
632  (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
633  errmsg("string is not a valid identifier: \"%s\"",
634  text_to_cstring(qualname)),
635  errdetail("String has unclosed double quotes.")));
636  if (endp[1] != '"')
637  break;
638  memmove(endp, endp + 1, strlen(endp));
639  nextp = endp;
640  }
641  nextp = endp + 1;
642  *endp = '\0';
643 
644  if (endp - curname == 0)
645  ereport(ERROR,
646  (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
647  errmsg("string is not a valid identifier: \"%s\"",
648  text_to_cstring(qualname)),
649  errdetail("Quoted identifier must not be empty.")));
650 
651  astate = accumArrayResult(astate, CStringGetTextDatum(curname),
652  false, TEXTOID, CurrentMemoryContext);
653  missing_ident = false;
654  }
655  else if (is_ident_start((unsigned char) *nextp))
656  {
657  char *downname;
658  int len;
659  text *part;
660 
661  curname = nextp++;
662  while (is_ident_cont((unsigned char) *nextp))
663  nextp++;
664 
665  len = nextp - curname;
666 
667  /*
668  * We don't implicitly truncate identifiers. This is useful for
669  * allowing the user to check for specific parts of the identifier
670  * being too long. It's easy enough for the user to get the
671  * truncated names by casting our output to name[].
672  */
673  downname = downcase_identifier(curname, len, false, false);
674  part = cstring_to_text_with_len(downname, len);
675  astate = accumArrayResult(astate, PointerGetDatum(part), false,
676  TEXTOID, CurrentMemoryContext);
677  missing_ident = false;
678  }
679 
680  if (missing_ident)
681  {
682  /* Different error messages based on where we failed. */
683  if (*nextp == '.')
684  ereport(ERROR,
685  (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
686  errmsg("string is not a valid identifier: \"%s\"",
687  text_to_cstring(qualname)),
688  errdetail("No valid identifier before \".\".")));
689  else if (after_dot)
690  ereport(ERROR,
691  (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
692  errmsg("string is not a valid identifier: \"%s\"",
693  text_to_cstring(qualname)),
694  errdetail("No valid identifier after \".\".")));
695  else
696  ereport(ERROR,
697  (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
698  errmsg("string is not a valid identifier: \"%s\"",
699  text_to_cstring(qualname))));
700  }
701 
702  while (scanner_isspace(*nextp))
703  nextp++;
704 
705  if (*nextp == '.')
706  {
707  after_dot = true;
708  nextp++;
709  while (scanner_isspace(*nextp))
710  nextp++;
711  }
712  else if (*nextp == '\0')
713  {
714  break;
715  }
716  else
717  {
718  if (strict)
719  ereport(ERROR,
720  (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
721  errmsg("string is not a valid identifier: \"%s\"",
722  text_to_cstring(qualname))));
723  break;
724  }
725  }
726 
728 }
729 
730 /*
731  * pg_current_logfile
732  *
733  * Report current log file used by log collector by scanning current_logfiles.
734  */
735 Datum
737 {
738  FILE *fd;
739  char lbuffer[MAXPGPATH];
740  char *logfmt;
741  char *log_filepath;
742  char *log_format = lbuffer;
743  char *nlpos;
744 
745  /* The log format parameter is optional */
746  if (PG_NARGS() == 0 || PG_ARGISNULL(0))
747  logfmt = NULL;
748  else
749  {
750  logfmt = text_to_cstring(PG_GETARG_TEXT_PP(0));
751 
752  if (strcmp(logfmt, "stderr") != 0 && strcmp(logfmt, "csvlog") != 0)
753  ereport(ERROR,
754  (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
755  errmsg("log format \"%s\" is not supported", logfmt),
756  errhint("The supported log formats are \"stderr\" and \"csvlog\".")));
757  }
758 
760  if (fd == NULL)
761  {
762  if (errno != ENOENT)
763  ereport(ERROR,
765  errmsg("could not read file \"%s\": %m",
767  PG_RETURN_NULL();
768  }
769 
770  /*
771  * Read the file to gather current log filename(s) registered by the
772  * syslogger.
773  */
774  while (fgets(lbuffer, sizeof(lbuffer), fd) != NULL)
775  {
776  /*
777  * Extract log format and log file path from the line; lbuffer ==
778  * log_format, they share storage.
779  */
780  log_filepath = strchr(lbuffer, ' ');
781  if (log_filepath == NULL)
782  {
783  /* Uh oh. No space found, so file content is corrupted. */
784  elog(ERROR,
785  "missing space character in \"%s\"", LOG_METAINFO_DATAFILE);
786  break;
787  }
788 
789  *log_filepath = '\0';
790  log_filepath++;
791  nlpos = strchr(log_filepath, '\n');
792  if (nlpos == NULL)
793  {
794  /* Uh oh. No newline found, so file content is corrupted. */
795  elog(ERROR,
796  "missing newline character in \"%s\"", LOG_METAINFO_DATAFILE);
797  break;
798  }
799  *nlpos = '\0';
800 
801  if (logfmt == NULL || strcmp(logfmt, log_format) == 0)
802  {
803  FreeFile(fd);
804  PG_RETURN_TEXT_P(cstring_to_text(log_filepath));
805  }
806  }
807 
808  /* Close the current log filename file. */
809  FreeFile(fd);
810 
811  PG_RETURN_NULL();
812 }
813 
814 /*
815  * Report current log file used by log collector (1 argument version)
816  *
817  * note: this wrapper is necessary to pass the sanity check in opr_sanity,
818  * which checks that all built-in functions that share the implementing C
819  * function take the same number of arguments
820  */
821 Datum
823 {
824  return pg_current_logfile(fcinfo);
825 }
826 
827 /*
828  * SQL wrapper around RelationGetReplicaIndex().
829  */
830 Datum
832 {
833  Oid reloid = PG_GETARG_OID(0);
834  Oid idxoid;
835  Relation rel;
836 
837  rel = table_open(reloid, AccessShareLock);
838  idxoid = RelationGetReplicaIndex(rel);
840 
841  if (OidIsValid(idxoid))
842  PG_RETURN_OID(idxoid);
843  else
844  PG_RETURN_NULL();
845 }
void tuplestore_putvalues(Tuplestorestate *state, TupleDesc tdesc, Datum *values, bool *isnull)
Definition: tuplestore.c:750
#define PG_GETARG_FLOAT8(n)
Definition: fmgr.h:281
uint64 call_cntr
Definition: funcapi.h:65
#define NIL
Definition: pg_list.h:65
static bool is_ident_start(unsigned char c)
Definition: misc.c:564
#define IsA(nodeptr, _type_)
Definition: nodes.h:580
Datum pg_get_replica_identity_index(PG_FUNCTION_ARGS)
Definition: misc.c:831
void table_close(Relation relation, LOCKMODE lockmode)
Definition: table.c:133
int errhint(const char *fmt,...)
Definition: elog.c:1071
Datum pg_relation_is_updatable(PG_FUNCTION_ARGS)
Definition: misc.c:520
Datum parse_ident(PG_FUNCTION_ARGS)
Definition: misc.c:597
Oid RelationGetReplicaIndex(Relation relation)
Definition: relcache.c:4715
#define WL_TIMEOUT
Definition: latch.h:127
static bool count_nulls(FunctionCallInfo fcinfo, int32 *nargs, int32 *nulls)
Definition: misc.c:50
TupleDesc CreateTemplateTupleDesc(int natts)
Definition: tupdesc.c:44
#define SRF_IS_FIRSTCALL()
Definition: funcapi.h:293
#define PointerGetDatum(X)
Definition: postgres.h:556
char * psprintf(const char *fmt,...)
Definition: psprintf.c:46
int ArrayGetNItems(int ndim, const int *dims)
Definition: arrayutils.c:75
static MemoryContext MemoryContextSwitchTo(MemoryContext context)
Definition: palloc.h:109
#define PG_RETURN_INT32(x)
Definition: fmgr.h:353
#define AccessShareLock
Definition: lockdefs.h:36
Datum pg_collation_for(PG_FUNCTION_ARGS)
Definition: misc.c:491
bool get_fn_expr_variadic(FmgrInfo *flinfo)
Definition: fmgr.c:1938
int errcode(int sqlerrcode)
Definition: elog.c:610
#define LOG_METAINFO_DATAFILE
Definition: syslogger.h:95
char * format_type_be(Oid type_oid)
Definition: format_type.c:327
bool directory_is_empty(const char *path)
Definition: tablespace.c:846
#define FirstLowInvalidHeapAttributeNumber
Definition: sysattr.h:27
const uint8 ScanKeywordCategories[SCANKEYWORDS_NUM_KEYWORDS]
Definition: keywords.c:29
#define UNRESERVED_KEYWORD
Definition: keywords.h:20
#define PG_GETARG_BOOL(n)
Definition: fmgr.h:274
unsigned int Oid
Definition: postgres_ext.h:31
int namestrcpy(Name name, const char *str)
Definition: name.c:250
Definition: dirent.h:9
#define OidIsValid(objectId)
Definition: c.h:644
#define SRF_PERCALL_SETUP()
Definition: funcapi.h:297
static int fd(const char *x, int i)
Definition: preproc-init.c:105
#define PG_GET_COLLATION()
Definition: fmgr.h:198
void ResetLatch(Latch *latch)
Definition: latch.c:540
Datum pg_typeof(PG_FUNCTION_ARGS)
Definition: misc.c:480
char * generate_collation_name(Oid collid)
Definition: ruleutils.c:11253
static const char * GetScanKeyword(int n, const ScanKeywordList *keywords)
Definition: kwlookup.h:39
signed int int32
Definition: c.h:355
Oid MyDatabaseTableSpace
Definition: globals.c:87
int WaitLatch(Latch *latch, int wakeEvents, long timeout, uint32 wait_event_info)
Definition: latch.c:365
HeapTuple BuildTupleFromCStrings(AttInMetadata *attinmeta, char **values)
Definition: execTuples.c:2116
Datum current_database(PG_FUNCTION_ARGS)
Definition: misc.c:169
#define PG_GETARG_TEXT_PP(n)
Definition: fmgr.h:308
PGDLLIMPORT const ScanKeywordList ScanKeywords
Datum current_query(PG_FUNCTION_ARGS)
Definition: misc.c:186
#define NAMEDATALEN
#define SRF_RETURN_NEXT(_funcctx, _result)
Definition: funcapi.h:299
#define PG_GETARG_ARRAYTYPE_P(n)
Definition: array.h:251
#define GetNowFloat()
void pfree(void *pointer)
Definition: mcxt.c:1056
Datum pg_current_logfile(PG_FUNCTION_ARGS)
Definition: misc.c:736
#define IS_HIGHBIT_SET(ch)
Definition: c.h:1119
Datum pg_tablespace_location(PG_FUNCTION_ARGS)
Definition: misc.c:302
Definition: dirent.c:25
#define ObjectIdGetDatum(X)
Definition: postgres.h:507
#define ERROR
Definition: elog.h:43
double float8
Definition: c.h:491
Datum pg_num_nulls(PG_FUNCTION_ARGS)
Definition: misc.c:136
Oid get_fn_expr_argtype(FmgrInfo *flinfo, int argnum)
Definition: fmgr.c:1804
#define ARR_DIMS(a)
Definition: array.h:282
#define MAXPGPATH
char * get_database_name(Oid dbid)
Definition: dbcommands.c:2155
Definition: c.h:609
#define TYPE_FUNC_NAME_KEYWORD
Definition: keywords.h:22
#define TABLESPACE_VERSION_DIRECTORY
Definition: relpath.h:26
char * c
Bitmapset * bms_make_singleton(int x)
Definition: bitmapset.c:186
text * cstring_to_text_with_len(const char *s, int len)
Definition: varlena.c:184
#define PG_GETARG_OID(n)
Definition: fmgr.h:275
#define readlink(path, buf, size)
Definition: win32_port.h:222
AttInMetadata * attinmeta
Definition: funcapi.h:91
int errdetail(const char *fmt,...)
Definition: elog.c:957
int errcode_for_file_access(void)
Definition: elog.c:633
FILE * AllocateFile(const char *name, const char *mode)
Definition: fd.c:2320
Datum pg_current_logfile_1arg(PG_FUNCTION_ARGS)
Definition: misc.c:822
DIR * AllocateDir(const char *dirname)
Definition: fd.c:2581
Datum pg_sleep(PG_FUNCTION_ARGS)
Definition: misc.c:358
MemoryContext CurrentMemoryContext
Definition: mcxt.c:38
void TupleDescInitEntry(TupleDesc desc, AttrNumber attributeNumber, const char *attributeName, Oid oidtypeid, int32 typmod, int attdim)
Definition: tupdesc.c:603
#define atooid(x)
Definition: postgres_ext.h:42
Datum pg_tablespace_databases(PG_FUNCTION_ARGS)
Definition: misc.c:198
Datum makeArrayResult(ArrayBuildState *astate, MemoryContext rcontext)
Definition: arrayfuncs.c:5123
int relation_is_updatable(Oid reloid, List *outer_reloids, bool include_triggers, Bitmapset *include_cols)
#define WARNING
Definition: elog.h:40
const char * debug_query_string
Definition: postgres.c:88
#define unconstify(underlying_type, expr)
Definition: c.h:1206
Datum pg_num_nonnulls(PG_FUNCTION_ARGS)
Definition: misc.c:152
Tuplestorestate * tuplestore_begin_heap(bool randomAccess, bool interXact, int maxKBytes)
Definition: tuplestore.c:318
uint8 bits8
Definition: c.h:374
int num_keywords
Definition: kwlookup.h:30
#define PG_RETURN_BOOL(x)
Definition: fmgr.h:358
uintptr_t Datum
Definition: postgres.h:367
#define PG_RETURN_DATUM(x)
Definition: fmgr.h:352
FmgrInfo * flinfo
Definition: fmgr.h:87
Oid MyDatabaseId
Definition: globals.c:85
AttInMetadata * TupleDescGetAttInMetadata(TupleDesc tupdesc)
Definition: execTuples.c:2067
bool scanner_isspace(char ch)
Definition: scansup.c:220
#define PG_GETARG_INT16(n)
Definition: fmgr.h:271
int work_mem
Definition: globals.c:121
#define REQ_EVENTS
#define RESERVED_KEYWORD
Definition: keywords.h:23
#define InvalidOid
Definition: postgres_ext.h:36
char * downcase_identifier(const char *ident, int len, bool warn, bool truncate)
Definition: scansup.c:139
int16 attnum
Definition: pg_attribute.h:79
#define ereport(elevel,...)
Definition: elog.h:144
int allowedModes
Definition: execnodes.h:305
#define PG_RETURN_VOID()
Definition: fmgr.h:348
#define PG_RETURN_TEXT_P(x)
Definition: fmgr.h:370
SetFunctionReturnMode returnMode
Definition: execnodes.h:307
text * cstring_to_text(const char *s)
Definition: varlena.c:172
#define PG_ARGISNULL(n)
Definition: fmgr.h:209
#define Assert(condition)
Definition: c.h:738
struct dirent * ReadDir(DIR *dir, const char *dirname)
Definition: fd.c:2647
MemoryContext multi_call_memory_ctx
Definition: funcapi.h:101
static bool is_ident_cont(unsigned char c)
Definition: misc.c:582
#define PG_NARGS()
Definition: fmgr.h:203
#define HeapTupleGetDatum(tuple)
Definition: funcapi.h:220
MemoryContext ecxt_per_query_memory
Definition: execnodes.h:233
#define ARR_NDIM(a)
Definition: array.h:278
#define COL_NAME_KEYWORD
Definition: keywords.h:21
Tuplestorestate * setResult
Definition: execnodes.h:310
int FreeFile(FILE *file)
Definition: fd.c:2519
static Datum values[MAXATTR]
Definition: bootstrap.c:167
char * text_to_cstring(const text *t)
Definition: varlena.c:205
ArrayBuildState * accumArrayResult(ArrayBuildState *astate, Datum dvalue, bool disnull, Oid element_type, MemoryContext rcontext)
Definition: arrayfuncs.c:5059
Oid get_base_element_type(Oid typid)
Definition: lsyscache.c:2660
ExprContext * econtext
Definition: execnodes.h:303
TupleDesc setDesc
Definition: execnodes.h:311
void * palloc(Size size)
Definition: mcxt.c:949
int errmsg(const char *fmt,...)
Definition: elog.c:824
#define elog(elevel,...)
Definition: elog.h:214
int i
#define CStringGetTextDatum(s)
Definition: builtins.h:87
struct Latch * MyLatch
Definition: globals.c:54
Definition: c.h:555
#define PG_FUNCTION_ARGS
Definition: fmgr.h:193
#define CHECK_FOR_INTERRUPTS()
Definition: miscadmin.h:99
Datum pg_get_keywords(PG_FUNCTION_ARGS)
Definition: misc.c:406
Relation table_open(Oid relationId, LOCKMODE lockmode)
Definition: table.c:39
NameData * Name
Definition: c.h:613
bool type_is_collatable(Oid typid)
Definition: lsyscache.c:2909
#define PG_RETURN_OID(x)
Definition: fmgr.h:359
#define snprintf
Definition: port.h:193
#define WL_LATCH_SET
Definition: latch.h:124
int16 AttrNumber
Definition: attnum.h:21
#define _(x)
Definition: elog.c:88
#define ARR_NULLBITMAP(a)
Definition: array.h:288
#define PG_RETURN_NULL()
Definition: fmgr.h:344
#define PG_RETURN_NAME(x)
Definition: fmgr.h:362
int FreeDir(DIR *dir)
Definition: fd.c:2699
#define WL_EXIT_ON_PM_DEATH
Definition: latch.h:129
Datum pg_column_is_updatable(PG_FUNCTION_ARGS)
Definition: misc.c:537
#define SRF_RETURN_DONE(_funcctx)
Definition: funcapi.h:317
#define SRF_FIRSTCALL_INIT()
Definition: funcapi.h:295