PostgreSQL Source Code  git master
genfile.c File Reference
#include "postgres.h"
#include <sys/file.h>
#include <sys/stat.h>
#include <unistd.h>
#include <dirent.h>
#include "access/htup_details.h"
#include "access/xlog_internal.h"
#include "catalog/pg_authid.h"
#include "catalog/pg_tablespace_d.h"
#include "catalog/pg_type.h"
#include "funcapi.h"
#include "mb/pg_wchar.h"
#include "miscadmin.h"
#include "postmaster/syslogger.h"
#include "replication/slot.h"
#include "storage/fd.h"
#include "utils/acl.h"
#include "utils/builtins.h"
#include "utils/memutils.h"
#include "utils/syscache.h"
#include "utils/timestamp.h"
Include dependency graph for genfile.c:

Go to the source code of this file.

Macros

#define MIN_READ_SIZE   4096
 

Functions

static char * convert_and_check_filename (text *arg)
 
static bytearead_binary_file (const char *filename, int64 seek_offset, int64 bytes_to_read, bool missing_ok)
 
static textread_text_file (const char *filename, int64 seek_offset, int64 bytes_to_read, bool missing_ok)
 
Datum pg_read_file (PG_FUNCTION_ARGS)
 
Datum pg_read_file_v2 (PG_FUNCTION_ARGS)
 
Datum pg_read_binary_file (PG_FUNCTION_ARGS)
 
Datum pg_read_file_off_len (PG_FUNCTION_ARGS)
 
Datum pg_read_file_all (PG_FUNCTION_ARGS)
 
Datum pg_read_binary_file_off_len (PG_FUNCTION_ARGS)
 
Datum pg_read_binary_file_all (PG_FUNCTION_ARGS)
 
Datum pg_stat_file (PG_FUNCTION_ARGS)
 
Datum pg_stat_file_1arg (PG_FUNCTION_ARGS)
 
Datum pg_ls_dir (PG_FUNCTION_ARGS)
 
Datum pg_ls_dir_1arg (PG_FUNCTION_ARGS)
 
static Datum pg_ls_dir_files (FunctionCallInfo fcinfo, const char *dir, bool missing_ok)
 
Datum pg_ls_logdir (PG_FUNCTION_ARGS)
 
Datum pg_ls_waldir (PG_FUNCTION_ARGS)
 
static Datum pg_ls_tmpdir (FunctionCallInfo fcinfo, Oid tblspc)
 
Datum pg_ls_tmpdir_noargs (PG_FUNCTION_ARGS)
 
Datum pg_ls_tmpdir_1arg (PG_FUNCTION_ARGS)
 
Datum pg_ls_archive_statusdir (PG_FUNCTION_ARGS)
 
Datum pg_ls_logicalsnapdir (PG_FUNCTION_ARGS)
 
Datum pg_ls_logicalmapdir (PG_FUNCTION_ARGS)
 
Datum pg_ls_replslotdir (PG_FUNCTION_ARGS)
 

Macro Definition Documentation

◆ MIN_READ_SIZE

#define MIN_READ_SIZE   4096

Function Documentation

◆ convert_and_check_filename()

static char* convert_and_check_filename ( text arg)
static

Definition at line 54 of file genfile.c.

55 {
56  char *filename;
57 
59  canonicalize_path(filename); /* filename can change length here */
60 
61  /*
62  * Roles with privileges of the 'pg_read_server_files' role are allowed to
63  * access any files on the server as the PG user, so no need to do any
64  * further checks here.
65  */
66  if (has_privs_of_role(GetUserId(), ROLE_PG_READ_SERVER_FILES))
67  return filename;
68 
69  /*
70  * User isn't a member of the pg_read_server_files role, so check if it's
71  * allowable
72  */
74  {
75  /*
76  * Allow absolute paths if within DataDir or Log_directory, even
77  * though Log_directory might be outside DataDir.
78  */
82  ereport(ERROR,
83  (errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
84  errmsg("absolute path not allowed")));
85  }
87  ereport(ERROR,
88  (errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
89  errmsg("path must be in or below the current directory")));
90 
91  return filename;
92 }
bool has_privs_of_role(Oid member, Oid role)
Definition: acl.c:4951
int errcode(int sqlerrcode)
Definition: elog.c:693
int errmsg(const char *fmt,...)
Definition: elog.c:904
#define ERROR
Definition: elog.h:33
#define ereport(elevel,...)
Definition: elog.h:143
char * DataDir
Definition: globals.c:66
Oid GetUserId(void)
Definition: miscinit.c:492
void * arg
static char * filename
Definition: pg_dumpall.c:94
#define is_absolute_path(filename)
Definition: port.h:89
bool path_is_prefix_of_path(const char *path1, const char *path2)
Definition: path.c:559
bool path_is_relative_and_below_cwd(const char *path)
Definition: path.c:526
void canonicalize_path(char *path)
Definition: path.c:264
char * Log_directory
Definition: syslogger.c:74
char * text_to_cstring(const text *t)
Definition: varlena.c:221

References arg, canonicalize_path(), DataDir, ereport, errcode(), errmsg(), ERROR, filename, GetUserId(), has_privs_of_role(), is_absolute_path, Log_directory, path_is_prefix_of_path(), path_is_relative_and_below_cwd(), and text_to_cstring().

Referenced by pg_ls_dir(), pg_read_binary_file(), pg_read_file(), pg_read_file_v2(), and pg_stat_file().

◆ pg_ls_archive_statusdir()

Datum pg_ls_archive_statusdir ( PG_FUNCTION_ARGS  )

Definition at line 663 of file genfile.c.

664 {
665  return pg_ls_dir_files(fcinfo, XLOGDIR "/archive_status", true);
666 }
static Datum pg_ls_dir_files(FunctionCallInfo fcinfo, const char *dir, bool missing_ok)
Definition: genfile.c:546
#define XLOGDIR

References pg_ls_dir_files(), and XLOGDIR.

◆ pg_ls_dir()

Datum pg_ls_dir ( PG_FUNCTION_ARGS  )

Definition at line 474 of file genfile.c.

475 {
476  ReturnSetInfo *rsinfo = (ReturnSetInfo *) fcinfo->resultinfo;
477  char *location;
478  bool missing_ok = false;
479  bool include_dot_dirs = false;
480  DIR *dirdesc;
481  struct dirent *de;
482 
484 
485  /* check the optional arguments */
486  if (PG_NARGS() == 3)
487  {
488  if (!PG_ARGISNULL(1))
489  missing_ok = PG_GETARG_BOOL(1);
490  if (!PG_ARGISNULL(2))
491  include_dot_dirs = PG_GETARG_BOOL(2);
492  }
493 
495 
496  dirdesc = AllocateDir(location);
497  if (!dirdesc)
498  {
499  /* Return empty tuplestore if appropriate */
500  if (missing_ok && errno == ENOENT)
501  return (Datum) 0;
502  /* Otherwise, we can let ReadDir() throw the error */
503  }
504 
505  while ((de = ReadDir(dirdesc, location)) != NULL)
506  {
507  Datum values[1];
508  bool nulls[1];
509 
510  if (!include_dot_dirs &&
511  (strcmp(de->d_name, ".") == 0 ||
512  strcmp(de->d_name, "..") == 0))
513  continue;
514 
515  values[0] = CStringGetTextDatum(de->d_name);
516  nulls[0] = false;
517 
518  tuplestore_putvalues(rsinfo->setResult, rsinfo->setDesc,
519  values, nulls);
520  }
521 
522  FreeDir(dirdesc);
523  return (Datum) 0;
524 }
static Datum values[MAXATTR]
Definition: bootstrap.c:156
#define CStringGetTextDatum(s)
Definition: builtins.h:85
struct dirent * ReadDir(DIR *dir, const char *dirname)
Definition: fd.c:2788
int FreeDir(DIR *dir)
Definition: fd.c:2840
DIR * AllocateDir(const char *dirname)
Definition: fd.c:2722
#define PG_GETARG_TEXT_PP(n)
Definition: fmgr.h:309
#define PG_ARGISNULL(n)
Definition: fmgr.h:209
#define PG_NARGS()
Definition: fmgr.h:203
#define PG_GETARG_BOOL(n)
Definition: fmgr.h:274
void SetSingleFuncCall(FunctionCallInfo fcinfo, bits32 flags)
Definition: funcapi.c:76
#define SRF_SINGLE_USE_EXPECTED
Definition: funcapi.h:291
static char * convert_and_check_filename(text *arg)
Definition: genfile.c:54
uintptr_t Datum
Definition: postgres.h:411
Definition: dirent.c:26
TupleDesc setDesc
Definition: execnodes.h:317
Tuplestorestate * setResult
Definition: execnodes.h:316
Definition: dirent.h:10
void tuplestore_putvalues(Tuplestorestate *state, TupleDesc tdesc, Datum *values, bool *isnull)
Definition: tuplestore.c:750

References AllocateDir(), convert_and_check_filename(), CStringGetTextDatum, FreeDir(), PG_ARGISNULL, PG_GETARG_BOOL, PG_GETARG_TEXT_PP, PG_NARGS, ReadDir(), ReturnSetInfo::setDesc, ReturnSetInfo::setResult, SetSingleFuncCall(), SRF_SINGLE_USE_EXPECTED, tuplestore_putvalues(), and values.

Referenced by pg_ls_dir_1arg().

◆ pg_ls_dir_1arg()

Datum pg_ls_dir_1arg ( PG_FUNCTION_ARGS  )

Definition at line 534 of file genfile.c.

535 {
536  return pg_ls_dir(fcinfo);
537 }
Datum pg_ls_dir(PG_FUNCTION_ARGS)
Definition: genfile.c:474

References pg_ls_dir().

◆ pg_ls_dir_files()

static Datum pg_ls_dir_files ( FunctionCallInfo  fcinfo,
const char *  dir,
bool  missing_ok 
)
static

Definition at line 546 of file genfile.c.

547 {
548  ReturnSetInfo *rsinfo = (ReturnSetInfo *) fcinfo->resultinfo;
549  DIR *dirdesc;
550  struct dirent *de;
551 
552  SetSingleFuncCall(fcinfo, 0);
553 
554  /*
555  * Now walk the directory. Note that we must do this within a single SRF
556  * call, not leave the directory open across multiple calls, since we
557  * can't count on the SRF being run to completion.
558  */
559  dirdesc = AllocateDir(dir);
560  if (!dirdesc)
561  {
562  /* Return empty tuplestore if appropriate */
563  if (missing_ok && errno == ENOENT)
564  return (Datum) 0;
565  /* Otherwise, we can let ReadDir() throw the error */
566  }
567 
568  while ((de = ReadDir(dirdesc, dir)) != NULL)
569  {
570  Datum values[3];
571  bool nulls[3];
572  char path[MAXPGPATH * 2];
573  struct stat attrib;
574 
575  /* Skip hidden files */
576  if (de->d_name[0] == '.')
577  continue;
578 
579  /* Get the file info */
580  snprintf(path, sizeof(path), "%s/%s", dir, de->d_name);
581  if (stat(path, &attrib) < 0)
582  {
583  /* Ignore concurrently-deleted files, else complain */
584  if (errno == ENOENT)
585  continue;
586  ereport(ERROR,
588  errmsg("could not stat file \"%s\": %m", path)));
589  }
590 
591  /* Ignore anything but regular files */
592  if (!S_ISREG(attrib.st_mode))
593  continue;
594 
595  values[0] = CStringGetTextDatum(de->d_name);
596  values[1] = Int64GetDatum((int64) attrib.st_size);
597  values[2] = TimestampTzGetDatum(time_t_to_timestamptz(attrib.st_mtime));
598  memset(nulls, 0, sizeof(nulls));
599 
600  tuplestore_putvalues(rsinfo->setResult, rsinfo->setDesc, values, nulls);
601  }
602 
603  FreeDir(dirdesc);
604  return (Datum) 0;
605 }
TimestampTz time_t_to_timestamptz(pg_time_t tm)
Definition: timestamp.c:1726
int errcode_for_file_access(void)
Definition: elog.c:716
Datum Int64GetDatum(int64 X)
Definition: fmgr.c:1683
#define MAXPGPATH
#define snprintf
Definition: port.h:225
fmNodePtr resultinfo
Definition: fmgr.h:89
#define TimestampTzGetDatum(X)
Definition: timestamp.h:32
#define stat
Definition: win32_port.h:283
#define S_ISREG(m)
Definition: win32_port.h:327

References AllocateDir(), CStringGetTextDatum, ereport, errcode_for_file_access(), errmsg(), ERROR, FreeDir(), Int64GetDatum(), MAXPGPATH, ReadDir(), FunctionCallInfoBaseData::resultinfo, S_ISREG, ReturnSetInfo::setDesc, ReturnSetInfo::setResult, SetSingleFuncCall(), snprintf, stat::st_mode, stat::st_mtime, stat::st_size, stat, time_t_to_timestamptz(), TimestampTzGetDatum, tuplestore_putvalues(), and values.

Referenced by pg_ls_archive_statusdir(), pg_ls_logdir(), pg_ls_logicalmapdir(), pg_ls_logicalsnapdir(), pg_ls_replslotdir(), pg_ls_tmpdir(), and pg_ls_waldir().

◆ pg_ls_logdir()

Datum pg_ls_logdir ( PG_FUNCTION_ARGS  )

Definition at line 609 of file genfile.c.

610 {
611  return pg_ls_dir_files(fcinfo, Log_directory, false);
612 }

References Log_directory, and pg_ls_dir_files().

◆ pg_ls_logicalmapdir()

Datum pg_ls_logicalmapdir ( PG_FUNCTION_ARGS  )

Definition at line 681 of file genfile.c.

682 {
683  return pg_ls_dir_files(fcinfo, "pg_logical/mappings", false);
684 }

References pg_ls_dir_files().

◆ pg_ls_logicalsnapdir()

Datum pg_ls_logicalsnapdir ( PG_FUNCTION_ARGS  )

Definition at line 672 of file genfile.c.

673 {
674  return pg_ls_dir_files(fcinfo, "pg_logical/snapshots", false);
675 }

References pg_ls_dir_files().

◆ pg_ls_replslotdir()

Datum pg_ls_replslotdir ( PG_FUNCTION_ARGS  )

Definition at line 691 of file genfile.c.

692 {
693  text *slotname_t;
694  char path[MAXPGPATH];
695  char *slotname;
696 
697  slotname_t = PG_GETARG_TEXT_PP(0);
698 
699  slotname = text_to_cstring(slotname_t);
700 
701  if (!SearchNamedReplicationSlot(slotname, true))
702  ereport(ERROR,
703  (errcode(ERRCODE_UNDEFINED_OBJECT),
704  errmsg("replication slot \"%s\" does not exist",
705  slotname)));
706 
707  snprintf(path, sizeof(path), "pg_replslot/%s", slotname);
708  return pg_ls_dir_files(fcinfo, path, false);
709 }
ReplicationSlot * SearchNamedReplicationSlot(const char *name, bool need_lock)
Definition: slot.c:377
Definition: c.h:622

References ereport, errcode(), errmsg(), ERROR, MAXPGPATH, PG_GETARG_TEXT_PP, pg_ls_dir_files(), SearchNamedReplicationSlot(), snprintf, and text_to_cstring().

◆ pg_ls_tmpdir()

static Datum pg_ls_tmpdir ( FunctionCallInfo  fcinfo,
Oid  tblspc 
)
static

Definition at line 625 of file genfile.c.

626 {
627  char path[MAXPGPATH];
628 
630  ereport(ERROR,
631  (errcode(ERRCODE_UNDEFINED_OBJECT),
632  errmsg("tablespace with OID %u does not exist",
633  tblspc)));
634 
635  TempTablespacePath(path, tblspc);
636  return pg_ls_dir_files(fcinfo, path, true);
637 }
void TempTablespacePath(char *path, Oid tablespace)
Definition: fd.c:1762
#define ObjectIdGetDatum(X)
Definition: postgres.h:551
@ TABLESPACEOID
Definition: syscache.h:101
#define SearchSysCacheExists1(cacheId, key1)
Definition: syscache.h:188

References ereport, errcode(), errmsg(), ERROR, MAXPGPATH, ObjectIdGetDatum, pg_ls_dir_files(), SearchSysCacheExists1, TABLESPACEOID, and TempTablespacePath().

Referenced by pg_ls_tmpdir_1arg(), and pg_ls_tmpdir_noargs().

◆ pg_ls_tmpdir_1arg()

Datum pg_ls_tmpdir_1arg ( PG_FUNCTION_ARGS  )

Definition at line 654 of file genfile.c.

655 {
656  return pg_ls_tmpdir(fcinfo, PG_GETARG_OID(0));
657 }
#define PG_GETARG_OID(n)
Definition: fmgr.h:275
static Datum pg_ls_tmpdir(FunctionCallInfo fcinfo, Oid tblspc)
Definition: genfile.c:625

References PG_GETARG_OID, and pg_ls_tmpdir().

◆ pg_ls_tmpdir_noargs()

Datum pg_ls_tmpdir_noargs ( PG_FUNCTION_ARGS  )

Definition at line 644 of file genfile.c.

645 {
646  return pg_ls_tmpdir(fcinfo, DEFAULTTABLESPACE_OID);
647 }

References pg_ls_tmpdir().

◆ pg_ls_waldir()

Datum pg_ls_waldir ( PG_FUNCTION_ARGS  )

Definition at line 616 of file genfile.c.

617 {
618  return pg_ls_dir_files(fcinfo, XLOGDIR, false);
619 }

References pg_ls_dir_files(), and XLOGDIR.

◆ pg_read_binary_file()

Datum pg_read_binary_file ( PG_FUNCTION_ARGS  )

Definition at line 319 of file genfile.c.

320 {
321  text *filename_t = PG_GETARG_TEXT_PP(0);
322  int64 seek_offset = 0;
323  int64 bytes_to_read = -1;
324  bool missing_ok = false;
325  char *filename;
326  bytea *result;
327 
328  /* handle optional arguments */
329  if (PG_NARGS() >= 3)
330  {
331  seek_offset = PG_GETARG_INT64(1);
332  bytes_to_read = PG_GETARG_INT64(2);
333 
334  if (bytes_to_read < 0)
335  ereport(ERROR,
336  (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
337  errmsg("requested length cannot be negative")));
338  }
339  if (PG_NARGS() >= 4)
340  missing_ok = PG_GETARG_BOOL(3);
341 
342  filename = convert_and_check_filename(filename_t);
343 
344  result = read_binary_file(filename, seek_offset,
345  bytes_to_read, missing_ok);
346  if (result)
347  PG_RETURN_BYTEA_P(result);
348  else
349  PG_RETURN_NULL();
350 }
#define PG_RETURN_BYTEA_P(x)
Definition: fmgr.h:371
#define PG_RETURN_NULL()
Definition: fmgr.h:345
#define PG_GETARG_INT64(n)
Definition: fmgr.h:283
static bytea * read_binary_file(const char *filename, int64 seek_offset, int64 bytes_to_read, bool missing_ok)
Definition: genfile.c:103

References convert_and_check_filename(), ereport, errcode(), errmsg(), ERROR, filename, PG_GETARG_BOOL, PG_GETARG_INT64, PG_GETARG_TEXT_PP, PG_NARGS, PG_RETURN_BYTEA_P, PG_RETURN_NULL, and read_binary_file().

Referenced by pg_read_binary_file_all(), and pg_read_binary_file_off_len().

◆ pg_read_binary_file_all()

Datum pg_read_binary_file_all ( PG_FUNCTION_ARGS  )

Definition at line 380 of file genfile.c.

381 {
382  return pg_read_binary_file(fcinfo);
383 }
Datum pg_read_binary_file(PG_FUNCTION_ARGS)
Definition: genfile.c:319

References pg_read_binary_file().

◆ pg_read_binary_file_off_len()

Datum pg_read_binary_file_off_len ( PG_FUNCTION_ARGS  )

Definition at line 374 of file genfile.c.

375 {
376  return pg_read_binary_file(fcinfo);
377 }

References pg_read_binary_file().

◆ pg_read_file()

Datum pg_read_file ( PG_FUNCTION_ARGS  )

Definition at line 236 of file genfile.c.

237 {
238  text *filename_t = PG_GETARG_TEXT_PP(0);
239  int64 seek_offset = 0;
240  int64 bytes_to_read = -1;
241  bool missing_ok = false;
242  char *filename;
243  text *result;
244 
245  if (!superuser())
246  ereport(ERROR,
247  (errcode(ERRCODE_INSUFFICIENT_PRIVILEGE),
248  errmsg("must be superuser to read files with adminpack 1.0"),
249  /* translator: %s is a SQL function name */
250  errhint("Consider using %s, which is part of core, instead.",
251  "pg_read_file()")));
252 
253  /* handle optional arguments */
254  if (PG_NARGS() >= 3)
255  {
256  seek_offset = PG_GETARG_INT64(1);
257  bytes_to_read = PG_GETARG_INT64(2);
258 
259  if (bytes_to_read < 0)
260  ereport(ERROR,
261  (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
262  errmsg("requested length cannot be negative")));
263  }
264  if (PG_NARGS() >= 4)
265  missing_ok = PG_GETARG_BOOL(3);
266 
267  filename = convert_and_check_filename(filename_t);
268 
269  result = read_text_file(filename, seek_offset, bytes_to_read, missing_ok);
270  if (result)
271  PG_RETURN_TEXT_P(result);
272  else
273  PG_RETURN_NULL();
274 }
int errhint(const char *fmt,...)
Definition: elog.c:1151
#define PG_RETURN_TEXT_P(x)
Definition: fmgr.h:372
static text * read_text_file(const char *filename, int64 seek_offset, int64 bytes_to_read, bool missing_ok)
Definition: genfile.c:211
bool superuser(void)
Definition: superuser.c:46

References convert_and_check_filename(), ereport, errcode(), errhint(), errmsg(), ERROR, filename, PG_GETARG_BOOL, PG_GETARG_INT64, PG_GETARG_TEXT_PP, PG_NARGS, PG_RETURN_NULL, PG_RETURN_TEXT_P, read_text_file(), and superuser().

◆ pg_read_file_all()

Datum pg_read_file_all ( PG_FUNCTION_ARGS  )

Definition at line 368 of file genfile.c.

369 {
370  return pg_read_file_v2(fcinfo);
371 }
Datum pg_read_file_v2(PG_FUNCTION_ARGS)
Definition: genfile.c:283

References pg_read_file_v2().

◆ pg_read_file_off_len()

Datum pg_read_file_off_len ( PG_FUNCTION_ARGS  )

Definition at line 362 of file genfile.c.

363 {
364  return pg_read_file_v2(fcinfo);
365 }

References pg_read_file_v2().

◆ pg_read_file_v2()

Datum pg_read_file_v2 ( PG_FUNCTION_ARGS  )

Definition at line 283 of file genfile.c.

284 {
285  text *filename_t = PG_GETARG_TEXT_PP(0);
286  int64 seek_offset = 0;
287  int64 bytes_to_read = -1;
288  bool missing_ok = false;
289  char *filename;
290  text *result;
291 
292  /* handle optional arguments */
293  if (PG_NARGS() >= 3)
294  {
295  seek_offset = PG_GETARG_INT64(1);
296  bytes_to_read = PG_GETARG_INT64(2);
297 
298  if (bytes_to_read < 0)
299  ereport(ERROR,
300  (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
301  errmsg("requested length cannot be negative")));
302  }
303  if (PG_NARGS() >= 4)
304  missing_ok = PG_GETARG_BOOL(3);
305 
306  filename = convert_and_check_filename(filename_t);
307 
308  result = read_text_file(filename, seek_offset, bytes_to_read, missing_ok);
309  if (result)
310  PG_RETURN_TEXT_P(result);
311  else
312  PG_RETURN_NULL();
313 }

References convert_and_check_filename(), ereport, errcode(), errmsg(), ERROR, filename, PG_GETARG_BOOL, PG_GETARG_INT64, PG_GETARG_TEXT_PP, PG_NARGS, PG_RETURN_NULL, PG_RETURN_TEXT_P, and read_text_file().

Referenced by pg_read_file_all(), and pg_read_file_off_len().

◆ pg_stat_file()

Datum pg_stat_file ( PG_FUNCTION_ARGS  )

Definition at line 389 of file genfile.c.

390 {
391  text *filename_t = PG_GETARG_TEXT_PP(0);
392  char *filename;
393  struct stat fst;
394  Datum values[6];
395  bool isnull[6];
396  HeapTuple tuple;
397  TupleDesc tupdesc;
398  bool missing_ok = false;
399 
400  /* check the optional argument */
401  if (PG_NARGS() == 2)
402  missing_ok = PG_GETARG_BOOL(1);
403 
404  filename = convert_and_check_filename(filename_t);
405 
406  if (stat(filename, &fst) < 0)
407  {
408  if (missing_ok && errno == ENOENT)
409  PG_RETURN_NULL();
410  else
411  ereport(ERROR,
413  errmsg("could not stat file \"%s\": %m", filename)));
414  }
415 
416  /*
417  * This record type had better match the output parameters declared for me
418  * in pg_proc.h.
419  */
420  tupdesc = CreateTemplateTupleDesc(6);
421  TupleDescInitEntry(tupdesc, (AttrNumber) 1,
422  "size", INT8OID, -1, 0);
423  TupleDescInitEntry(tupdesc, (AttrNumber) 2,
424  "access", TIMESTAMPTZOID, -1, 0);
425  TupleDescInitEntry(tupdesc, (AttrNumber) 3,
426  "modification", TIMESTAMPTZOID, -1, 0);
427  TupleDescInitEntry(tupdesc, (AttrNumber) 4,
428  "change", TIMESTAMPTZOID, -1, 0);
429  TupleDescInitEntry(tupdesc, (AttrNumber) 5,
430  "creation", TIMESTAMPTZOID, -1, 0);
431  TupleDescInitEntry(tupdesc, (AttrNumber) 6,
432  "isdir", BOOLOID, -1, 0);
433  BlessTupleDesc(tupdesc);
434 
435  memset(isnull, false, sizeof(isnull));
436 
437  values[0] = Int64GetDatum((int64) fst.st_size);
440  /* Unix has file status change time, while Win32 has creation time */
441 #if !defined(WIN32) && !defined(__CYGWIN__)
443  isnull[4] = true;
444 #else
445  isnull[3] = true;
447 #endif
448  values[5] = BoolGetDatum(S_ISDIR(fst.st_mode));
449 
450  tuple = heap_form_tuple(tupdesc, values, isnull);
451 
452  pfree(filename);
453 
455 }
int16 AttrNumber
Definition: attnum.h:21
TupleDesc BlessTupleDesc(TupleDesc tupdesc)
Definition: execTuples.c:2071
#define PG_RETURN_DATUM(x)
Definition: fmgr.h:353
#define HeapTupleGetDatum(tuple)
Definition: funcapi.h:220
HeapTuple heap_form_tuple(TupleDesc tupleDescriptor, Datum *values, bool *isnull)
Definition: heaptuple.c:1020
void pfree(void *pointer)
Definition: mcxt.c:1175
#define BoolGetDatum(X)
Definition: postgres.h:446
TupleDesc CreateTemplateTupleDesc(int natts)
Definition: tupdesc.c:45
void TupleDescInitEntry(TupleDesc desc, AttrNumber attributeNumber, const char *attributeName, Oid oidtypeid, int32 typmod, int attdim)
Definition: tupdesc.c:583
#define S_ISDIR(m)
Definition: win32_port.h:324

References BlessTupleDesc(), BoolGetDatum, convert_and_check_filename(), CreateTemplateTupleDesc(), ereport, errcode_for_file_access(), errmsg(), ERROR, filename, heap_form_tuple(), HeapTupleGetDatum, Int64GetDatum(), pfree(), PG_GETARG_BOOL, PG_GETARG_TEXT_PP, PG_NARGS, PG_RETURN_DATUM, PG_RETURN_NULL, S_ISDIR, stat::st_atime, stat::st_ctime, stat::st_mode, stat::st_mtime, stat::st_size, stat, time_t_to_timestamptz(), TimestampTzGetDatum, TupleDescInitEntry(), and values.

Referenced by pg_stat_file_1arg().

◆ pg_stat_file_1arg()

Datum pg_stat_file_1arg ( PG_FUNCTION_ARGS  )

Definition at line 465 of file genfile.c.

466 {
467  return pg_stat_file(fcinfo);
468 }
Datum pg_stat_file(PG_FUNCTION_ARGS)
Definition: genfile.c:389

References pg_stat_file().

◆ read_binary_file()

static bytea* read_binary_file ( const char *  filename,
int64  seek_offset,
int64  bytes_to_read,
bool  missing_ok 
)
static

Definition at line 103 of file genfile.c.

105 {
106  bytea *buf;
107  size_t nbytes = 0;
108  FILE *file;
109 
110  /* clamp request size to what we can actually deliver */
111  if (bytes_to_read > (int64) (MaxAllocSize - VARHDRSZ))
112  ereport(ERROR,
113  (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
114  errmsg("requested length too large")));
115 
116  if ((file = AllocateFile(filename, PG_BINARY_R)) == NULL)
117  {
118  if (missing_ok && errno == ENOENT)
119  return NULL;
120  else
121  ereport(ERROR,
123  errmsg("could not open file \"%s\" for reading: %m",
124  filename)));
125  }
126 
127  if (fseeko(file, (off_t) seek_offset,
128  (seek_offset >= 0) ? SEEK_SET : SEEK_END) != 0)
129  ereport(ERROR,
131  errmsg("could not seek in file \"%s\": %m", filename)));
132 
133  if (bytes_to_read >= 0)
134  {
135  /* If passed explicit read size just do it */
136  buf = (bytea *) palloc((Size) bytes_to_read + VARHDRSZ);
137 
138  nbytes = fread(VARDATA(buf), 1, (size_t) bytes_to_read, file);
139  }
140  else
141  {
142  /* Negative read size, read rest of file */
143  StringInfoData sbuf;
144 
145  initStringInfo(&sbuf);
146  /* Leave room in the buffer for the varlena length word */
147  sbuf.len += VARHDRSZ;
148  Assert(sbuf.len < sbuf.maxlen);
149 
150  while (!(feof(file) || ferror(file)))
151  {
152  size_t rbytes;
153 
154  /* Minimum amount to read at a time */
155 #define MIN_READ_SIZE 4096
156 
157  /*
158  * If not at end of file, and sbuf.len is equal to MaxAllocSize -
159  * 1, then either the file is too large, or there is nothing left
160  * to read. Attempt to read one more byte to see if the end of
161  * file has been reached. If not, the file is too large; we'd
162  * rather give the error message for that ourselves.
163  */
164  if (sbuf.len == MaxAllocSize - 1)
165  {
166  char rbuf[1];
167 
168  if (fread(rbuf, 1, 1, file) != 0 || !feof(file))
169  ereport(ERROR,
170  (errcode(ERRCODE_PROGRAM_LIMIT_EXCEEDED),
171  errmsg("file length too large")));
172  else
173  break;
174  }
175 
176  /* OK, ensure that we can read at least MIN_READ_SIZE */
178 
179  /*
180  * stringinfo.c likes to allocate in powers of 2, so it's likely
181  * that much more space is available than we asked for. Use all
182  * of it, rather than making more fread calls than necessary.
183  */
184  rbytes = fread(sbuf.data + sbuf.len, 1,
185  (size_t) (sbuf.maxlen - sbuf.len - 1), file);
186  sbuf.len += rbytes;
187  nbytes += rbytes;
188  }
189 
190  /* Now we can commandeer the stringinfo's buffer as the result */
191  buf = (bytea *) sbuf.data;
192  }
193 
194  if (ferror(file))
195  ereport(ERROR,
197  errmsg("could not read file \"%s\": %m", filename)));
198 
199  SET_VARSIZE(buf, nbytes + VARHDRSZ);
200 
201  FreeFile(file);
202 
203  return buf;
204 }
#define PG_BINARY_R
Definition: c.h:1270
#define VARHDRSZ
Definition: c.h:627
size_t Size
Definition: c.h:540
FILE * AllocateFile(const char *name, const char *mode)
Definition: fd.c:2461
int FreeFile(FILE *file)
Definition: fd.c:2660
#define MIN_READ_SIZE
Assert(fmt[strlen(fmt) - 1] !='\n')
void * palloc(Size size)
Definition: mcxt.c:1068
#define MaxAllocSize
Definition: memutils.h:40
static char * buf
Definition: pg_test_fsync.c:67
#define VARDATA(PTR)
Definition: postgres.h:315
#define SET_VARSIZE(PTR, len)
Definition: postgres.h:342
void enlargeStringInfo(StringInfo str, int needed)
Definition: stringinfo.c:283
void initStringInfo(StringInfo str)
Definition: stringinfo.c:59
#define fseeko(stream, offset, origin)
Definition: win32_port.h:215

References AllocateFile(), Assert(), buf, StringInfoData::data, enlargeStringInfo(), ereport, errcode(), errcode_for_file_access(), errmsg(), ERROR, filename, FreeFile(), fseeko, initStringInfo(), StringInfoData::len, MaxAllocSize, StringInfoData::maxlen, MIN_READ_SIZE, palloc(), PG_BINARY_R, SET_VARSIZE, VARDATA, and VARHDRSZ.

Referenced by pg_read_binary_file(), and read_text_file().

◆ read_text_file()

static text* read_text_file ( const char *  filename,
int64  seek_offset,
int64  bytes_to_read,
bool  missing_ok 
)
static

Definition at line 211 of file genfile.c.

213 {
214  bytea *buf;
215 
216  buf = read_binary_file(filename, seek_offset, bytes_to_read, missing_ok);
217 
218  if (buf != NULL)
219  {
220  /* Make sure the input is valid */
222 
223  /* OK, we can cast it to text safely */
224  return (text *) buf;
225  }
226  else
227  return NULL;
228 }
bool pg_verifymbstr(const char *mbstr, int len, bool noError)
Definition: mbutils.c:1505
#define VARSIZE(PTR)
Definition: postgres.h:316

References buf, filename, pg_verifymbstr(), read_binary_file(), VARDATA, VARHDRSZ, and VARSIZE.

Referenced by pg_read_file(), and pg_read_file_v2().