port.h File Reference

#include <ctype.h>
#include <netdb.h>
#include <pwd.h>
#include <netinet/in.h>
#include <arpa/inet.h>

Include dependency graph for port.h:

This graph shows which files directly or indirectly include this file:

Go to the source code of this file.

Macros
#define	PGINVALID_SOCKET   (-1)
#define	IS_DIR_SEP(ch)   ((ch) == '/')
#define	is_absolute_path(filename)
#define	EXE   ""
#define	DEVNULL   "/dev/null"
#define	TIMEZONE_GLOBAL   timezone
#define	TZNAME_GLOBAL   tzname
#define	closesocket   close
#define	PG_IOLBF   _IOLBF
#define	pgoff_t   off_t
#define	fseeko(a, b, c)   fseek(a, b, c)
#define	ftello(a)   ftell(a)
#define	SSL_get_current_compression(x)   0
#define	qsort(a, b, c, d)   pg_qsort(a,b,c,d)

Typedefs
typedef int	pgsocket
typedef int(*	qsort_arg_comparator )(const void *a, const void *b, void *arg)
typedef void(*	pqsigfunc )(int signo)

Functions
bool	pg_set_noblock (pgsocket sock)
bool	pg_set_block (pgsocket sock)
bool	has_drive_prefix (const char *filename)
char *	first_dir_separator (const char *filename)
char *	last_dir_separator (const char *filename)
char *	first_path_var_separator (const char *pathlist)
void	join_path_components (char *ret_path, const char *head, const char *tail)
void	canonicalize_path (char *path)
void	make_native_path (char *path)
void	cleanup_path (char *path)
bool	path_contains_parent_reference (const char *path)
bool	path_is_relative_and_below_cwd (const char *path)
bool	path_is_prefix_of_path (const char *path1, const char *path2)
char *	make_absolute_path (const char *path)
const char *	get_progname (const char *argv0)
void	get_share_path (const char *my_exec_path, char *ret_path)
void	get_etc_path (const char *my_exec_path, char *ret_path)
void	get_include_path (const char *my_exec_path, char *ret_path)
void	get_pkginclude_path (const char *my_exec_path, char *ret_path)
void	get_includeserver_path (const char *my_exec_path, char *ret_path)
void	get_lib_path (const char *my_exec_path, char *ret_path)
void	get_pkglib_path (const char *my_exec_path, char *ret_path)
void	get_locale_path (const char *my_exec_path, char *ret_path)
void	get_doc_path (const char *my_exec_path, char *ret_path)
void	get_html_path (const char *my_exec_path, char *ret_path)
void	get_man_path (const char *my_exec_path, char *ret_path)
bool	get_home_path (char *ret_path)
void	get_parent_directory (char *path)
char **	pgfnames (const char *path)
void	pgfnames_cleanup (char **filenames)
void	set_pglocale_pgservice (const char *argv0, const char *app)
int	find_my_exec (const char *argv0, char *retpath)
int	find_other_exec (const char *argv0, const char *target, const char *versionstr, char *retpath)
void	pg_usleep (long microsec)
int	pg_strcasecmp (const char *s1, const char *s2)
int	pg_strncasecmp (const char *s1, const char *s2, size_t n)
unsigned char	pg_toupper (unsigned char ch)
unsigned char	pg_tolower (unsigned char ch)
unsigned char	pg_ascii_toupper (unsigned char ch)
unsigned char	pg_ascii_tolower (unsigned char ch)
void	simple_prompt (const char *prompt, char *destination, size_t destlen, bool echo)
int	pclose_check (FILE *stream)
bool	rmtree (const char *path, bool rmtopdir)
char *	crypt (const char *key, const char *setting)
double	pg_erand48 (unsigned short xseed[3])
long	pg_lrand48 (void)
long	pg_jrand48 (unsigned short xseed[3])
void	pg_srand48 (long seed)
int	fls (int mask)
int	getpeereid (int sock, uid_t *uid, gid_t *gid)
int	isinf (double x)
char *	mkdtemp (char *path)
double	rint (double x)
int	inet_aton (const char *cp, struct in_addr *addr)
size_t	strlcat (char *dst, const char *src, size_t siz)
size_t	strlcpy (char *dst, const char *src, size_t siz)
long	random (void)
void	unsetenv (const char *name)
void	srandom (unsigned int seed)
char *	pqStrerror (int errnum, char *strerrbuf, size_t buflen)
int	pqGetpwuid (uid_t uid, struct passwd *resultbuf, char *buffer, size_t buflen, struct passwd **result)
int	pqGethostbyname (const char *name, struct hostent *resultbuf, char *buffer, size_t buflen, struct hostent **result, int *herrno)
void	pg_qsort (void *base, size_t nel, size_t elsize, int(*cmp)(const void *, const void *))
int	pg_qsort_strcmp (const void *a, const void *b)
void	qsort_arg (void *base, size_t nel, size_t elsize, qsort_arg_comparator cmp, void *arg)
int	pg_get_encoding_from_locale (const char *ctype, bool write_message)
char *	inet_net_ntop (int af, const void *src, int bits, char *dst, size_t size)
int	pg_check_dir (const char *dir)
int	pg_mkdir_p (char *path, int omode)
pqsigfunc	pqsignal (int signo, pqsigfunc func)
pqsigfunc	pqsignal_no_restart (int signo, pqsigfunc func)
char *	escape_single_quotes_ascii (const char *src)
char *	wait_result_to_str (int exit_status)

Macro Definition Documentation

#define closesocket   close

Definition at line 328 of file port.h.

Referenced by archive_close_connection(), ident_inet(), internal_cancel(), ParallelBackupEnd(), ParallelBackupStart(), PerformRadiusTransaction(), pgstat_init(), pqDropConnection(), ShutdownWorkersHard(), StreamClose(), and StreamServerPort().

#define DEVNULL   "/dev/null"

Definition at line 116 of file port.h.

Referenced by do_init(), initialize_data_directory(), regression_main(), start_postmaster(), syncTargetDirectory(), SysLoggerMain(), and test_config_settings().

#define EXE   ""

Definition at line 110 of file port.h.

Referenced by find_other_exec(), and get_progname().

#define fseeko	(		a,
			b,
			c
	)		fseek(a, b, c)

Definition at line 372 of file port.h.

#define ftello

(

a

)

ftell(a)

Definition at line 373 of file port.h.

#define is_absolute_path

(

filename

)

Value:

( \
	IS_DIR_SEP((filename)[0]) \
)

Definition at line 77 of file port.h.

Referenced by BeginCopyTo(), connectOptions2(), convert_and_check_filename(), create_xlog_or_symlink(), CreateTableSpace(), do_connect(), exec_command_conninfo(), find_in_dynamic_libpath(), find_my_exec(), get_extension_script_directory(), get_prompt(), main(), make_absolute_path(), passwordFromFile(), path_is_relative_and_below_cwd(), perform_base_backup(), process_file(), setup_bin_paths(), tablespace_list_append(), and tokenize_inc_file().

#define IS_DIR_SEP

(

ch

)

((ch) == '/')

Definition at line 75 of file port.h.

Referenced by dir_strcmp(), do_pg_start_backup(), first_dir_separator(), join_path_components(), last_dir_separator(), make_relative_path(), path_is_prefix_of_path(), path_is_relative_and_below_cwd(), trim_directory(), and trim_trailing_separator().

#define PG_IOLBF   _IOLBF

Definition at line 340 of file port.h.

Referenced by logfile_open(), and main().

#define PGINVALID_SOCKET   (-1)

Definition at line 24 of file port.h.

Referenced by AddWaitEventToSet(), ClosePostmasterPorts(), CloseServerPorts(), ConditionVariablePrepareToSleep(), ConnCreate(), copy_read_data(), CopyStreamPoll(), ident_inet(), initMasks(), internal_cancel(), LogicalRepApplyLoop(), LogStreamerMain(), makeEmptyPGconn(), PerformRadiusTransaction(), pgstat_drop_database(), pgstat_init(), pgstat_initstats(), pgstat_ping(), pgstat_report_analyze(), pgstat_report_autovac(), pgstat_report_deadlock(), pgstat_report_recovery_conflict(), pgstat_report_tempfile(), pgstat_report_vacuum(), pgstat_reset_counters(), pgstat_reset_shared_counters(), pgstat_reset_single_counter(), pgstat_send(), pgstat_send_tabstat(), pgstat_start(), pgstat_vacuum_stat(), PostmasterMain(), PQconnectPoll(), pqDropConnection(), PQfn(), PQgetCancel(), pqGetline2(), pqGetline3(), pqReadData(), PQrequestCancel(), pqSendSome(), PQsocket(), pqSocketCheck(), sendTerminateConn(), ServerLoop(), socket_close(), StreamConnection(), StreamLog(), StreamServerPort(), WaitEventSetWait(), WaitLatch(), WaitLatchOrSocket(), and WalReceiverMain().

#define pgoff_t   off_t

Definition at line 355 of file port.h.

#define qsort	(		a,
			b,
			c,
			d
	)		pg_qsort(a,b,c,d)

Definition at line 440 of file port.h.

Referenced by _ltree_picksplit(), aclitemsort(), aclmembers(), acquire_sample_rows(), add_guc_variable(), AddEnumLabel(), AlterSubscription_refresh(), array_to_tsvector(), associate(), BufferSync(), build_guc_variables(), BuildEventTriggerCache(), buildIndexArray(), calc_word_similarity(), carcsort(), CheckConstraintFetch(), choose_bitmap_and(), compactify_tuples(), compileTheLexeme(), compute_array_stats(), compute_range_stats(), compute_scalar_stats(), compute_tsvector_stats(), CreateStatistics(), dsynonym_init(), eliminate_duplicate_dependencies(), entry_dealloc(), EnumValuesCreate(), expand_grouping_sets(), filemap_finalize(), fill_in_constant_lengths(), find_inheritance_children(), findObjectByCatalogId(), g_int_picksplit(), g_intbig_picksplit(), generate_trgm(), generate_wildcard_trgm(), get_docrep(), get_loadable_libraries(), ghstore_picksplit(), ginGetBAEntry(), gist_box_picksplit(), gseg_picksplit(), gtrgm_picksplit(), gtsquery_picksplit(), gtsvector_picksplit(), hstoreUniquePairs(), IssuePendingWritebacks(), load_domaintype_info(), load_enum_cache_data(), lookupVariable(), ltree_picksplit(), ltsGetFreeBlock(), main(), mcelem_array_contained_selec(), mergeins(), mXactCacheGetBySet(), mXactCachePut(), NIImportOOAffixes(), NISortAffixes(), NISortDictionary(), packGraph(), perform_base_backup(), ProcArrayApplyRecoveryInfo(), process_target_file(), QTNSort(), range_gist_double_sorting_split(), rankSort(), read_dictionary(), readstoplist(), rebuild_database_list(), ReorderBufferCopySnap(), selectColorTrigrams(), SerializeTransactionState(), setExtensionMembership(), setup_pct_info(), SnapBuildBuildSnapshot(), sort_policies_by_name(), sort_pool(), sort_snapshot(), sortDataAndIndexObjectsBySize(), sortDumpableObjectsByTypeName(), sortins(), sortouts(), spg_box_quad_picksplit(), spg_kd_picksplit(), spg_quad_picksplit(), spg_text_picksplit(), spgPageIndexMultiDelete(), SyncRepGetNthLatestSyncRecPtr(), tbm_begin_iterate(), TidListEval(), tsq_mcontains(), tsvector_delete_by_indices(), uniqueint(), uniqueLongPos(), uniquePos(), uniqueWORD(), UpdateLogicalMappings(), and writezone().

#define SSL_get_current_compression

(

x

)

0

Definition at line 419 of file port.h.

Referenced by be_tls_get_compression(), PerformAuthentication(), and PQsslAttribute().

#define TIMEZONE_GLOBAL   timezone

Definition at line 222 of file port.h.

Referenced by abstime2tm(), get_timezone_offset(), and timestamp2tm().

#define TZNAME_GLOBAL   tzname

Definition at line 223 of file port.h.

Referenced by abstime2tm(), and timestamp2tm().

Typedef Documentation

typedef int pgsocket

Definition at line 22 of file port.h.

typedef void(* pqsigfunc)(int signo)

Definition at line 470 of file port.h.

typedef int(* qsort_arg_comparator)(const void *a, const void *b, void *arg)

Definition at line 442 of file port.h.

Function Documentation

void canonicalize_path

(

char *

path

)

Definition at line 254 of file path.c.

References skip_drive, trim_directory(), and trim_trailing_separator().

Referenced by adjust_data_dir(), check_canonical_path(), convert_and_check_filename(), create_script_for_old_cluster_deletion(), create_xlog_or_symlink(), CreateTableSpace(), do_copy(), exec_command_edit(), exec_command_write(), find_in_dynamic_libpath(), find_my_exec(), find_other_exec(), load_libraries(), main(), make_absolute_path(), make_relative_path(), parseCommandLine(), process_file(), resolve_symlinks(), set_pglocale_pgservice(), setup(), setup_bin_paths(), setup_pgdata(), SplitDirectoriesString(), tablespace_list_append(), and tokenize_inc_file().

{
    char       *p,
               *to_p;
    char       *spath;
    bool        was_sep = false;
    int         pending_strips;

#ifdef WIN32

    /*
     * The Windows command processor will accept suitably quoted paths with
     * forward slashes, but barfs badly with mixed forward and back slashes.
     */
    for (p = path; *p; p++)
    {
        if (*p == '\\')
            *p = '/';
    }

    /*
     * In Win32, if you do: prog.exe "a b" "\c\d\" the system will pass \c\d"
     * as argv[2], so trim off trailing quote.
     */
    if (p > path && *(p - 1) == '"')
        *(p - 1) = '/';
#endif

    /*
     * Removing the trailing slash on a path means we never get ugly double
     * trailing slashes. Also, Win32 can't stat() a directory with a trailing
     * slash. Don't remove a leading slash, though.
     */
    trim_trailing_separator(path);

    /*
     * Remove duplicate adjacent separators
     */
    p = path;
#ifdef WIN32
    /* Don't remove leading double-slash on Win32 */
    if (*p)
        p++;
#endif
    to_p = p;
    for (; *p; p++, to_p++)
    {
        /* Handle many adjacent slashes, like "/a///b" */
        while (*p == '/' && was_sep)
            p++;
        if (to_p != p)
            *to_p = *p;
        was_sep = (*p == '/');
    }
    *to_p = '\0';

    /*
     * Remove any trailing uses of "." and process ".." ourselves
     *
     * Note that "/../.." should reduce to just "/", while "../.." has to be
     * kept as-is.  In the latter case we put back mistakenly trimmed ".."
     * components below.  Also note that we want a Windows drive spec to be
     * visible to trim_directory(), but it's not part of the logic that's
     * looking at the name components; hence distinction between path and
     * spath.
     */
    spath = skip_drive(path);
    pending_strips = 0;
    for (;;)
    {
        int         len = strlen(spath);

        if (len >= 2 && strcmp(spath + len - 2, "/.") == 0)
            trim_directory(path);
        else if (strcmp(spath, ".") == 0)
        {
            /* Want to leave "." alone, but "./.." has to become ".." */
            if (pending_strips > 0)
                *spath = '\0';
            break;
        }
        else if ((len >= 3 && strcmp(spath + len - 3, "/..") == 0) ||
                 strcmp(spath, "..") == 0)
        {
            trim_directory(path);
            pending_strips++;
        }
        else if (pending_strips > 0 && *spath != '\0')
        {
            /* trim a regular directory name canceled by ".." */
            trim_directory(path);
            pending_strips--;
            /* foo/.. should become ".", not empty */
            if (*spath == '\0')
                strcpy(spath, ".");
        }
        else
            break;
    }

    if (pending_strips > 0)
    {
        /*
         * We could only get here if path is now totally empty (other than a
         * possible drive specifier on Windows). We have to put back one or
         * more ".."'s that we took off.
         */
        while (--pending_strips > 0)
            strcat(path, "../");
        strcat(path, "..");
    }
}

void cleanup_path

(

char *

path

)

Definition at line 185 of file path.c.

References MAXPGPATH.

Referenced by get_configdata().

{
#ifdef WIN32
    char       *ptr;

    /*
     * GetShortPathName() will fail if the path does not exist, or short names
     * are disabled on this file system.  In both cases, we just return the
     * original path.  This is particularly useful for --sysconfdir, which
     * might not exist.
     */
    GetShortPathName(path, path, MAXPGPATH - 1);

    /* Replace '\' with '/' */
    for (ptr = path; *ptr; ptr++)
    {
        if (*ptr == '\\')
            *ptr = '/';
    }
#endif
}

char* crypt	(	const char *	key,
		const char *	setting
	)

Referenced by chkpass_eq(), chkpass_in(), and chkpass_ne().

char* escape_single_quotes_ascii

(

const char *

src

)

Definition at line 33 of file quotes.c.

References i, malloc, NULL, result, and SQL_STR_DOUBLE.

Referenced by escape_quotes(), and write_auto_conf_file().

{
    int         len = strlen(src),
                i,
                j;
    char       *result = malloc(len * 2 + 1);

    if (!result)
        return NULL;

    for (i = 0, j = 0; i < len; i++)
    {
        if (SQL_STR_DOUBLE(src[i], true))
            result[j++] = src[i];
        result[j++] = src[i];
    }
    result[j] = '\0';
    return result;
}

int find_my_exec	(	const char *	argv0,
		char *	retpath
	)

Definition at line 119 of file exec.c.

References _, canonicalize_path(), first_dir_separator(), first_path_var_separator(), is_absolute_path, join_path_components(), log_error, MAXPGPATH, Min, NULL, resolve_symlinks(), strerror(), StrNCpy, and validate_exec().

Referenced by find_other_exec(), find_other_exec_or_die(), getInstallationPaths(), InitStandaloneProcess(), main(), process_psqlrc(), set_pglocale_pgservice(), setup(), setup_bin_paths(), and syncTargetDirectory().

{
    char        cwd[MAXPGPATH],
                test_path[MAXPGPATH];
    char       *path;

    if (!getcwd(cwd, MAXPGPATH))
    {
        log_error(_("could not identify current directory: %s"),
                  strerror(errno));
        return -1;
    }

    /*
     * If argv0 contains a separator, then PATH wasn't used.
     */
    if (first_dir_separator(argv0) != NULL)
    {
        if (is_absolute_path(argv0))
            StrNCpy(retpath, argv0, MAXPGPATH);
        else
            join_path_components(retpath, cwd, argv0);
        canonicalize_path(retpath);

        if (validate_exec(retpath) == 0)
            return resolve_symlinks(retpath);

        log_error(_("invalid binary \"%s\""), retpath);
        return -1;
    }

#ifdef WIN32
    /* Win32 checks the current directory first for names without slashes */
    join_path_components(retpath, cwd, argv0);
    if (validate_exec(retpath) == 0)
        return resolve_symlinks(retpath);
#endif

    /*
     * Since no explicit path was supplied, the user must have been relying on
     * PATH.  We'll search the same PATH.
     */
    if ((path = getenv("PATH")) && *path)
    {
        char       *startp = NULL,
                   *endp = NULL;

        do
        {
            if (!startp)
                startp = path;
            else
                startp = endp + 1;

            endp = first_path_var_separator(startp);
            if (!endp)
                endp = startp + strlen(startp); /* point to end */

            StrNCpy(test_path, startp, Min(endp - startp + 1, MAXPGPATH));

            if (is_absolute_path(test_path))
                join_path_components(retpath, test_path, argv0);
            else
            {
                join_path_components(retpath, cwd, test_path);
                join_path_components(retpath, retpath, argv0);
            }
            canonicalize_path(retpath);

            switch (validate_exec(retpath))
            {
                case 0: /* found ok */
                    return resolve_symlinks(retpath);
                case -1:        /* wasn't even a candidate, keep looking */
                    break;
                case -2:        /* found but disqualified */
                    log_error(_("could not read binary \"%s\""),
                              retpath);
                    break;
            }
        } while (*endp);
    }

    log_error(_("could not find a \"%s\" to execute"), argv0);
    return -1;
}

int find_other_exec	(	const char *	argv0,
		const char *	target,
		const char *	versionstr,
		char *	retpath
	)

Definition at line 307 of file exec.c.

References canonicalize_path(), EXE, find_my_exec(), last_dir_separator(), MAXPGPATH, pipe_read_line(), snprintf(), and validate_exec().

Referenced by find_other_exec_or_die(), getInstallationPaths(), isolation_start_test(), main(), setup_bin_paths(), and syncTargetDirectory().

{
    char        cmd[MAXPGPATH];
    char        line[100];

    if (find_my_exec(argv0, retpath) < 0)
        return -1;

    /* Trim off program name and keep just directory */
    *last_dir_separator(retpath) = '\0';
    canonicalize_path(retpath);

    /* Now append the other program's name */
    snprintf(retpath + strlen(retpath), MAXPGPATH - strlen(retpath),
             "/%s%s", target, EXE);

    if (validate_exec(retpath) != 0)
        return -1;

    snprintf(cmd, sizeof(cmd), "\"%s\" -V", retpath);

    if (!pipe_read_line(cmd, line, sizeof(line)))
        return -1;

    if (strcmp(line, versionstr) != 0)
        return -2;

    return 0;
}

char* first_dir_separator

(

const char *

filename

)

Definition at line 103 of file path.c.

References IS_DIR_SEP, NULL, and skip_drive.

Referenced by check_restricted_library_name(), check_valid_extension_name(), check_valid_version_name(), expand_dynamic_library_name(), find_in_dynamic_libpath(), find_my_exec(), load_libraries(), and substitute_libpath_macro().

{
    const char *p;

    for (p = skip_drive(filename); *p; p++)
        if (IS_DIR_SEP(*p))
            return (char *) p;
    return NULL;
}

char* first_path_var_separator

(

const char *

pathlist

)

Definition at line 120 of file path.c.

References IS_PATH_VAR_SEP, and NULL.

Referenced by find_in_dynamic_libpath(), and find_my_exec().

{
    const char *p;

    /* skip_drive is not needed */
    for (p = pathlist; *p; p++)
        if (IS_PATH_VAR_SEP(*p))
            return (char *) p;
    return NULL;
}

int fls

(

int

mask

)

Definition at line 55 of file fls.c.

References bit().

Referenced by _hash_get_oldblock_from_newbucket().

{
    int         bit;

    if (mask == 0)
        return (0);
    for (bit = 1; mask != 1; bit++)
        mask = (unsigned int) mask >> 1;
    return (bit);
}

void get_doc_path	(	const char *	my_exec_path,
		char *	ret_path
	)

Definition at line 776 of file path.c.

References make_relative_path().

Referenced by get_configdata().

{
    make_relative_path(ret_path, DOCDIR, PGBINDIR, my_exec_path);
}

void get_etc_path	(	const char *	my_exec_path,
		char *	ret_path
	)

Definition at line 713 of file path.c.

References make_relative_path().

Referenced by get_configdata(), process_psqlrc(), and set_pglocale_pgservice().

{
    make_relative_path(ret_path, SYSCONFDIR, PGBINDIR, my_exec_path);
}

bool get_home_path

(

char *

ret_path

)

Definition at line 807 of file path.c.

References MAXPGPATH, NULL, pqGetpwuid(), snprintf(), and strlcpy().

Referenced by expand_tilde(), initializeInput(), and process_psqlrc().

{
#ifndef WIN32
    char        pwdbuf[BUFSIZ];
    struct passwd pwdstr;
    struct passwd *pwd = NULL;

    (void) pqGetpwuid(geteuid(), &pwdstr, pwdbuf, sizeof(pwdbuf), &pwd);
    if (pwd == NULL)
        return false;
    strlcpy(ret_path, pwd->pw_dir, MAXPGPATH);
    return true;
#else
    char       *tmppath;

    /*
     * Note: We use getenv() here because the more modern SHGetFolderPath()
     * would force the backend to link with shell32.lib, which eats valuable
     * desktop heap.  XXX This function is used only in psql, which already
     * brings in shell32 via libpq.  Moving this function to its own file
     * would keep it out of the backend, freeing it from this concern.
     */
    tmppath = getenv("APPDATA");
    if (!tmppath)
        return false;
    snprintf(ret_path, MAXPGPATH, "%s/postgresql", tmppath);
    return true;
#endif
}

void get_html_path	(	const char *	my_exec_path,
		char *	ret_path
	)

Definition at line 785 of file path.c.

References make_relative_path().

Referenced by get_configdata().

{
    make_relative_path(ret_path, HTMLDIR, PGBINDIR, my_exec_path);
}

void get_include_path	(	const char *	my_exec_path,
		char *	ret_path
	)

Definition at line 722 of file path.c.

References make_relative_path().

Referenced by get_configdata(), and main().

{
    make_relative_path(ret_path, INCLUDEDIR, PGBINDIR, my_exec_path);
}

void get_includeserver_path	(	const char *	my_exec_path,
		char *	ret_path
	)

Definition at line 740 of file path.c.

References make_relative_path().

Referenced by get_configdata().

{
    make_relative_path(ret_path, INCLUDEDIRSERVER, PGBINDIR, my_exec_path);
}

void get_lib_path	(	const char *	my_exec_path,
		char *	ret_path
	)

Definition at line 749 of file path.c.

References make_relative_path().

Referenced by get_configdata().

{
    make_relative_path(ret_path, LIBDIR, PGBINDIR, my_exec_path);
}

void get_locale_path	(	const char *	my_exec_path,
		char *	ret_path
	)

Definition at line 767 of file path.c.

References make_relative_path().

Referenced by get_configdata(), pg_bindtextdomain(), and set_pglocale_pgservice().

{
    make_relative_path(ret_path, LOCALEDIR, PGBINDIR, my_exec_path);
}

void get_man_path	(	const char *	my_exec_path,
		char *	ret_path
	)

Definition at line 794 of file path.c.

References make_relative_path().

Referenced by get_configdata().

{
    make_relative_path(ret_path, MANDIR, PGBINDIR, my_exec_path);
}

void get_parent_directory

(

char *

path

)

Definition at line 854 of file path.c.

References trim_directory().

Referenced by destroy_tablespace_directories(), fsync_parent_path(), main(), process_file(), TablespaceCreateDbspace(), and tokenize_inc_file().

{
    trim_directory(path);
}

void get_pkginclude_path	(	const char *	my_exec_path,
		char *	ret_path
	)

Definition at line 731 of file path.c.

References make_relative_path().

Referenced by get_configdata(), and main().

{
    make_relative_path(ret_path, PKGINCLUDEDIR, PGBINDIR, my_exec_path);
}

void get_pkglib_path	(	const char *	my_exec_path,
		char *	ret_path
	)

Definition at line 758 of file path.c.

References make_relative_path().

Referenced by get_configdata(), getInstallationPaths(), and InitStandaloneProcess().

{
    make_relative_path(ret_path, PKGLIBDIR, PGBINDIR, my_exec_path);
}

const char* get_progname

(

const char *

argv0

)

Definition at line 453 of file path.c.

References EXE, last_dir_separator(), NULL, pg_strcasecmp(), progname, and skip_drive.

Referenced by get_opts(), handle_help_version_opts(), main(), parseCommandLine(), and regression_main().

{
    const char *nodir_name;
    char       *progname;

    nodir_name = last_dir_separator(argv0);
    if (nodir_name)
        nodir_name++;
    else
        nodir_name = skip_drive(argv0);

    /*
     * Make a copy in case argv[0] is modified by ps_status. Leaks memory, but
     * called only once.
     */
    progname = strdup(nodir_name);
    if (progname == NULL)
    {
        fprintf(stderr, "%s: out of memory\n", nodir_name);
        abort();                /* This could exit the postmaster */
    }

#if defined(__CYGWIN__) || defined(WIN32)
    /* strip ".exe" suffix, regardless of case */
    if (strlen(progname) > sizeof(EXE) - 1 &&
    pg_strcasecmp(progname + strlen(progname) - (sizeof(EXE) - 1), EXE) == 0)
        progname[strlen(progname) - (sizeof(EXE) - 1)] = '\0';
#endif

    return progname;
}

void get_share_path	(	const char *	my_exec_path,
		char *	ret_path
	)

Definition at line 704 of file path.c.

References make_relative_path().

Referenced by get_configdata(), get_extension_control_directory(), get_extension_control_filename(), get_extension_script_directory(), get_tsearch_config_filename(), ParseTzFile(), pg_TZDIR(), and setup_bin_paths().

{
    make_relative_path(ret_path, PGSHAREDIR, PGBINDIR, my_exec_path);
}

int getpeereid	(	int	sock,
		uid_t *	uid,
		gid_t *	gid
	)

Definition at line 35 of file getpeereid.c.

References NULL.

Referenced by PQconnectPoll().

{
#if defined(SO_PEERCRED)
    /* Linux: use getsockopt(SO_PEERCRED) */
    struct ucred peercred;
    ACCEPT_TYPE_ARG3 so_len = sizeof(peercred);

    if (getsockopt(sock, SOL_SOCKET, SO_PEERCRED, &peercred, &so_len) != 0 ||
        so_len != sizeof(peercred))
        return -1;
    *uid = peercred.uid;
    *gid = peercred.gid;
    return 0;
#elif defined(LOCAL_PEERCRED)
    /* Debian with FreeBSD kernel: use getsockopt(LOCAL_PEERCRED) */
    struct xucred peercred;
    ACCEPT_TYPE_ARG3 so_len = sizeof(peercred);

    if (getsockopt(sock, 0, LOCAL_PEERCRED, &peercred, &so_len) != 0 ||
        so_len != sizeof(peercred) ||
        peercred.cr_version != XUCRED_VERSION)
        return -1;
    *uid = peercred.cr_uid;
    *gid = peercred.cr_gid;
    return 0;
#elif defined(HAVE_GETPEERUCRED)
    /* Solaris: use getpeerucred() */
    ucred_t    *ucred;

    ucred = NULL;               /* must be initialized to NULL */
    if (getpeerucred(sock, &ucred) == -1)
        return -1;

    *uid = ucred_geteuid(ucred);
    *gid = ucred_getegid(ucred);
    ucred_free(ucred);

    if (*uid == (uid_t) (-1) || *gid == (gid_t) (-1))
        return -1;
    return 0;
#else
    /* No implementation available on this platform */
    errno = ENOSYS;
    return -1;
#endif
}

bool has_drive_prefix

(

const char *

filename

)

Definition at line 87 of file path.c.

References skip_drive.

Referenced by process_file().

{
#ifdef WIN32
    return skip_drive(path) != path;
#else
    return false;
#endif
}

int inet_aton	(	const char *	cp,
		struct in_addr *	addr
	)

Definition at line 54 of file inet_aton.c.

References val.

Referenced by getaddrinfo().

{
    unsigned int val;
    int         base,
                n;
    char        c;
    u_int       parts[4];
    u_int      *pp = parts;

    for (;;)
    {
        /*
         * Collect number up to ``.''. Values are specified as for C: 0x=hex,
         * 0=octal, other=decimal.
         */
        val = 0;
        base = 10;
        if (*cp == '0')
        {
            if (*++cp == 'x' || *cp == 'X')
                base = 16, cp++;
            else
                base = 8;
        }
        while ((c = *cp) != '\0')
        {
            if (isdigit((unsigned char) c))
            {
                val = (val * base) + (c - '0');
                cp++;
                continue;
            }
            if (base == 16 && isxdigit((unsigned char) c))
            {
                val = (val << 4) +
                    (c + 10 - (islower((unsigned char) c) ? 'a' : 'A'));
                cp++;
                continue;
            }
            break;
        }
        if (*cp == '.')
        {
            /*
             * Internet format: a.b.c.d a.b.c   (with c treated as 16-bits)
             * a.b     (with b treated as 24 bits)
             */
            if (pp >= parts + 3 || val > 0xff)
                return 0;
            *pp++ = val, cp++;
        }
        else
            break;
    }

    /*
     * Check for trailing junk.
     */
    while (*cp)
        if (!isspace((unsigned char) *cp++))
            return 0;

    /*
     * Concoct the address according to the number of parts specified.
     */
    n = pp - parts + 1;
    switch (n)
    {

        case 1:         /* a -- 32 bits */
            break;

        case 2:         /* a.b -- 8.24 bits */
            if (val > 0xffffff)
                return 0;
            val |= parts[0] << 24;
            break;

        case 3:         /* a.b.c -- 8.8.16 bits */
            if (val > 0xffff)
                return 0;
            val |= (parts[0] << 24) | (parts[1] << 16);
            break;

        case 4:         /* a.b.c.d -- 8.8.8.8 bits */
            if (val > 0xff)
                return 0;
            val |= (parts[0] << 24) | (parts[1] << 16) | (parts[2] << 8);
            break;
    }
    if (addr)
        addr->s_addr = htonl(val);
    return 1;
}

char* inet_net_ntop	(	int	af,
		const void *	src,
		int	bits,
		char *	dst,
		size_t	size
	)

Definition at line 77 of file inet_net_ntop.c.

References EAFNOSUPPORT, inet_net_ntop_ipv4(), inet_net_ntop_ipv6(), NULL, PGSQL_AF_INET, and PGSQL_AF_INET6.

Referenced by connectFailureMessage(), getnameinfo(), inet_abbrev(), network_host(), network_out(), and network_show().

{
    /*
     * We need to cover both the address family constants used by the PG inet
     * type (PGSQL_AF_INET and PGSQL_AF_INET6) and those used by the system
     * libraries (AF_INET and AF_INET6).  We can safely assume PGSQL_AF_INET
     * == AF_INET, but the INET6 constants are very likely to be different. If
     * AF_INET6 isn't defined, silently ignore it.
     */
    switch (af)
    {
        case PGSQL_AF_INET:
            return (inet_net_ntop_ipv4(src, bits, dst, size));
        case PGSQL_AF_INET6:
#if defined(AF_INET6) && AF_INET6 != PGSQL_AF_INET6
        case AF_INET6:
#endif
            return (inet_net_ntop_ipv6(src, bits, dst, size));
        default:
            errno = EAFNOSUPPORT;
            return (NULL);
    }
}

int isinf

(

double

x

)

Referenced by dcbrt(), dcos(), dcosd(), dcot(), dcotd(), degrees(), dexp(), dlog1(), dlog10(), dpow(), dsin(), dsind(), dsqrt(), dtan(), dtand(), dtof(), float48div(), float48mi(), float48mul(), float48pl(), float4_accum(), float4_dist(), float4div(), float4in(), float4mi(), float4mul(), float4pl(), float84div(), float84mi(), float84mul(), float84pl(), float8_accum(), float8_combine(), float8_corr(), float8_covar_pop(), float8_covar_samp(), float8_dist(), float8_regr_accum(), float8_regr_combine(), float8_regr_intercept(), float8_regr_r2(), float8_regr_slope(), float8_regr_sxx(), float8_regr_sxy(), float8_regr_syy(), float8_stddev_pop(), float8_stddev_samp(), float8_timestamptz(), float8_var_pop(), float8_var_samp(), float8div(), float8mi(), float8mul(), float8pl(), gbt_float8_dist(), is_infinite(), main(), make_interval(), pg_hypot(), radians(), sprintf_double_value(), sprintf_float_value(), and width_bucket_float8().

void join_path_components	(	char *	ret_path,
		const char *	head,
		const char *	tail
	)

Definition at line 218 of file path.c.

References IS_DIR_SEP, MAXPGPATH, skip_drive, snprintf(), and strlcpy().

Referenced by find_my_exec(), main(), make_relative_path(), process_file(), resolve_symlinks(), and tokenize_inc_file().

{
    if (ret_path != head)
        strlcpy(ret_path, head, MAXPGPATH);

    /*
     * Remove any leading "." in the tail component.
     *
     * Note: we used to try to remove ".." as well, but that's tricky to get
     * right; now we just leave it to be done by canonicalize_path() later.
     */
    while (tail[0] == '.' && IS_DIR_SEP(tail[1]))
        tail += 2;

    if (*tail)
    {
        /* only separate with slash if head wasn't empty */
        snprintf(ret_path + strlen(ret_path), MAXPGPATH - strlen(ret_path),
                 "%s%s",
                 (*(skip_drive(head)) != '\0') ? "/" : "",
                 tail);
    }
}

char* last_dir_separator

(

const char *

filename

)

Definition at line 138 of file path.c.

References IS_DIR_SEP, NULL, and skip_drive.

Referenced by ECPGconnect(), find_other_exec(), get_progname(), main(), resolve_symlinks(), setup(), and setup_bin_paths().

{
    const char *p,
               *ret = NULL;

    for (p = skip_drive(filename); *p; p++)
        if (IS_DIR_SEP(*p))
            ret = p;
    return (char *) ret;
}

char* make_absolute_path

(

const char *

path

)

Definition at line 608 of file path.c.

References _, buf, canonicalize_path(), elog, ereport, errcode(), errmsg(), ERROR, free, is_absolute_path, malloc, MAXPGPATH, NULL, and strerror().

Referenced by regression_main(), SelectConfigFiles(), and SetDataDir().

{
    char       *new;

    /* Returning null for null input is convenient for some callers */
    if (path == NULL)
        return NULL;

    if (!is_absolute_path(path))
    {
        char       *buf;
        size_t      buflen;

        buflen = MAXPGPATH;
        for (;;)
        {
            buf = malloc(buflen);
            if (!buf)
            {
#ifndef FRONTEND
                ereport(ERROR,
                        (errcode(ERRCODE_OUT_OF_MEMORY),
                         errmsg("out of memory")));
#else
                fprintf(stderr, _("out of memory\n"));
                return NULL;
#endif
            }

            if (getcwd(buf, buflen))
                break;
            else if (errno == ERANGE)
            {
                free(buf);
                buflen *= 2;
                continue;
            }
            else
            {
                int         save_errno = errno;

                free(buf);
                errno = save_errno;
#ifndef FRONTEND
                elog(ERROR, "could not get current working directory: %m");
#else
                fprintf(stderr, _("could not get current working directory: %s\n"),
                        strerror(errno));
                return NULL;
#endif
            }
        }

        new = malloc(strlen(buf) + strlen(path) + 2);
        if (!new)
        {
            free(buf);
#ifndef FRONTEND
            ereport(ERROR,
                    (errcode(ERRCODE_OUT_OF_MEMORY),
                     errmsg("out of memory")));
#else
            fprintf(stderr, _("out of memory\n"));
            return NULL;
#endif
        }
        sprintf(new, "%s/%s", buf, path);
        free(buf);
    }
    else
    {
        new = strdup(path);
        if (!new)
        {
#ifndef FRONTEND
            ereport(ERROR,
                    (errcode(ERRCODE_OUT_OF_MEMORY),
                     errmsg("out of memory")));
#else
            fprintf(stderr, _("out of memory\n"));
            return NULL;
#endif
        }
    }

    /* Make sure punctuation is canonical, too */
    canonicalize_path(new);

    return new;
}

void make_native_path

(

char *

path

)

Definition at line 166 of file path.c.

Referenced by pgarch_archiveXlog(), and RestoreArchivedFile().

{
#ifdef WIN32
    char       *p;

    for (p = filename; *p; p++)
        if (*p == '/')
            *p = '\\';
#endif
}

char* mkdtemp

(

char *

path

)

Definition at line 286 of file mkdtemp.c.

References _DIAGASSERT, GETTEMP(), and NULL.

{
    _DIAGASSERT(path != NULL);

    return GETTEMP(path, NULL, 1) ? path : NULL;
}

bool path_contains_parent_reference

(

const char *

path

)

Definition at line 376 of file path.c.

References NULL, and skip_drive.

Referenced by convert_and_check_filename(), and path_is_relative_and_below_cwd().

{
    int         path_len;

    path = skip_drive(path);    /* C: shouldn't affect our conclusion */

    path_len = strlen(path);

    /*
     * ".." could be the whole path; otherwise, if it's present it must be at
     * the beginning, in the middle, or at the end.
     */
    if (strcmp(path, "..") == 0 ||
        strncmp(path, "../", 3) == 0 ||
        strstr(path, "/../") != NULL ||
        (path_len >= 3 && strcmp(path + path_len - 3, "/..") == 0))
        return true;

    return false;
}

bool path_is_prefix_of_path	(	const char *	path1,
		const char *	path2
	)

Definition at line 438 of file path.c.

References IS_DIR_SEP.

Referenced by convert_and_check_filename(), create_script_for_old_cluster_deletion(), CreateTableSpace(), and parseCommandLine().

{
    int         path1_len = strlen(path1);

    if (strncmp(path1, path2, path1_len) == 0 &&
        (IS_DIR_SEP(path2[path1_len]) || path2[path1_len] == '\0'))
        return true;
    return false;
}

bool path_is_relative_and_below_cwd

(

const char *

path

)

Definition at line 405 of file path.c.

References is_absolute_path, IS_DIR_SEP, and path_contains_parent_reference().

Referenced by convert_and_check_filename().

{
    if (is_absolute_path(path))
        return false;
    /* don't allow anything above the cwd */
    else if (path_contains_parent_reference(path))
        return false;
#ifdef WIN32

    /*
     * On Win32, a drive letter _not_ followed by a slash, e.g. 'E:abc', is
     * relative to the cwd on that drive, or the drive's root directory if
     * that drive has no cwd.  Because the path itself cannot tell us which is
     * the case, we have to assume the worst, i.e. that it is not below the
     * cwd.  We could use GetFullPathName() to find the full path but that
     * could change if the current directory for the drive changes underneath
     * us, so we just disallow it.
     */
    else if (isalpha((unsigned char) path[0]) && path[1] == ':' &&
             !IS_DIR_SEP(path[2]))
        return false;
#endif
    else
        return true;
}

int pclose_check

(

FILE *

stream

)

Definition at line 510 of file exec.c.

References _, free, log_error, pfree(), strerror(), and wait_result_to_str().

Referenced by pipe_read_line().

{
    int         exitstatus;
    char       *reason;

    exitstatus = pclose(stream);

    if (exitstatus == 0)
        return 0;               /* all is well */

    if (exitstatus == -1)
    {
        /* pclose() itself failed, and hopefully set errno */
        log_error(_("pclose failed: %s"), strerror(errno));
    }
    else
    {
        reason = wait_result_to_str(exitstatus);
        log_error("%s", reason);
#ifdef FRONTEND
        free(reason);
#else
        pfree(reason);
#endif
    }
    return exitstatus;
}

unsigned char pg_ascii_tolower

(

unsigned char

ch

)

Definition at line 146 of file pgstrcasecmp.c.

Referenced by asc_initcap(), asc_tolower(), pg_wc_tolower(), and SB_lower_char().

{
    if (ch >= 'A' && ch <= 'Z')
        ch += 'a' - 'A';
    return ch;
}

unsigned char pg_ascii_toupper

(

unsigned char

ch

)

Definition at line 135 of file pgstrcasecmp.c.

Referenced by asc_initcap(), asc_toupper(), filter_list_to_array(), and pg_wc_toupper().

{
    if (ch >= 'a' && ch <= 'z')
        ch += 'A' - 'a';
    return ch;
}

int pg_check_dir

(

const char *

dir

)

Definition at line 31 of file pgcheckdir.c.

References closedir(), dirent::d_name, NULL, opendir(), readdir(), and result.

Referenced by create_data_directory(), create_xlog_or_symlink(), main(), and verify_dir_is_empty_or_create().

{
    int         result = 1;
    DIR        *chkdir;
    struct dirent *file;
    bool        dot_found = false;
    bool        mount_found = false;
    int         readdir_errno;

    chkdir = opendir(dir);
    if (chkdir == NULL)
        return (errno == ENOENT) ? 0 : -1;

    while (errno = 0, (file = readdir(chkdir)) != NULL)
    {
        if (strcmp(".", file->d_name) == 0 ||
            strcmp("..", file->d_name) == 0)
        {
            /* skip this and parent directory */
            continue;
        }
#ifndef WIN32
        /* file starts with "." */
        else if (file->d_name[0] == '.')
        {
            dot_found = true;
        }
        /* lost+found directory */
        else if (strcmp("lost+found", file->d_name) == 0)
        {
            mount_found = true;
        }
#endif
        else
        {
            result = 4;         /* not empty */
            break;
        }
    }

    if (errno)
        result = -1;            /* some kind of I/O error? */

    /* Close chkdir and avoid overwriting the readdir errno on success */
    readdir_errno = errno;
    if (closedir(chkdir))
        result = -1;            /* error executing closedir */
    else
        errno = readdir_errno;

    /* We report on mount point if we find a lost+found directory */
    if (result == 1 && mount_found)
        result = 3;

    /* We report on dot-files if we _only_ find dot files */
    if (result == 1 && dot_found)
        result = 2;

    return result;
}

double pg_erand48

(

unsigned short

xseed[3]

)

Definition at line 79 of file erand48.c.

References _dorand48().

Referenced by doLog(), geqo_rand(), getExponentialRand(), getGaussianRand(), getPoissonRand(), getrand(), and sampler_random_fract().

{
    _dorand48(xseed);
    return ldexp((double) xseed[0], -48) +
        ldexp((double) xseed[1], -32) +
        ldexp((double) xseed[2], -16);
}

int pg_get_encoding_from_locale	(	const char *	ctype,
		bool	write_message
	)

Definition at line 433 of file chklocale.c.

References PG_SQL_ASCII.

Referenced by check_encoding_locale_matches(), check_locale_encoding(), connectOptions2(), pg_import_system_collations(), PGLC_localeconv(), PQsetClientEncoding(), and setup_locale_encoding().

{
    return PG_SQL_ASCII;
}

long pg_jrand48

(

unsigned short

xseed[3]

)

Definition at line 95 of file erand48.c.

References _dorand48().

Referenced by pg_backend_random(), pg_frontend_random(), and RandomCancelKey().

{
    _dorand48(xseed);
    return ((long) xseed[2] << 16) + ((long) xseed[1]);
}

long pg_lrand48

(

void

)

Definition at line 88 of file erand48.c.

References _dorand48(), and _rand48_seed.

Referenced by random().

{
    _dorand48(_rand48_seed);
    return ((long) _rand48_seed[2] << 15) + ((long) _rand48_seed[1] >> 1);
}

int pg_mkdir_p	(	char *	path,
		int	omode
	)

Definition at line 57 of file pgmkdirp.c.

References mkdir, NULL, S_IRWXG, and S_IRWXO.

Referenced by create_data_directory(), create_xlog_or_symlink(), StartLogStreamer(), and verify_dir_is_empty_or_create().

{
    struct stat sb;
    mode_t      numask,
                oumask;
    int         last,
                retval;
    char       *p;

    retval = 0;
    p = path;

#ifdef WIN32
    /* skip network and drive specifiers for win32 */
    if (strlen(p) >= 2)
    {
        if (p[0] == '/' && p[1] == '/')
        {
            /* network drive */
            p = strstr(p + 2, "/");
            if (p == NULL)
            {
                errno = EINVAL;
                return -1;
            }
        }
        else if (p[1] == ':' &&
                 ((p[0] >= 'a' && p[0] <= 'z') ||
                  (p[0] >= 'A' && p[0] <= 'Z')))
        {
            /* local drive */
            p += 2;
        }
    }
#endif

    /*
     * POSIX 1003.2: For each dir operand that does not name an existing
     * directory, effects equivalent to those caused by the following command
     * shall occur:
     *
     * mkdir -p -m $(umask -S),u+wx $(dirname dir) && mkdir [-m mode] dir
     *
     * We change the user's umask and then restore it, instead of doing
     * chmod's.  Note we assume umask() can't change errno.
     */
    oumask = umask(0);
    numask = oumask & ~(S_IWUSR | S_IXUSR);
    (void) umask(numask);

    if (p[0] == '/')            /* Skip leading '/'. */
        ++p;
    for (last = 0; !last; ++p)
    {
        if (p[0] == '\0')
            last = 1;
        else if (p[0] != '/')
            continue;
        *p = '\0';
        if (!last && p[1] == '\0')
            last = 1;

        if (last)
            (void) umask(oumask);

        /* check for pre-existing directory */
        if (stat(path, &sb) == 0)
        {
            if (!S_ISDIR(sb.st_mode))
            {
                if (last)
                    errno = EEXIST;
                else
                    errno = ENOTDIR;
                retval = -1;
                break;
            }
        }
        else if (mkdir(path, last ? omode : S_IRWXU | S_IRWXG | S_IRWXO) < 0)
        {
            retval = -1;
            break;
        }
        if (!last)
            *p = '/';
    }

    /* ensure we restored umask */
    (void) umask(oumask);

    return retval;
}

void pg_qsort	(	void *	base,
		size_t	nel,
		size_t	elsize,
		int(*)(const void *, const void *)	cmp
	)

Definition at line 113 of file qsort.c.

References cmp(), med3(), Min, swap, SWAPINIT, and vecswap.

Referenced by DropRelFileNodesAllBuffers(), and InitCatalogCache().

{
    char       *pa,
               *pb,
               *pc,
               *pd,
               *pl,
               *pm,
               *pn;
    size_t      d1,
                d2;
    int         r,
                swaptype,
                presorted;

loop:SWAPINIT(a, es);
    if (n < 7)
    {
        for (pm = (char *) a + es; pm < (char *) a + n * es; pm += es)
            for (pl = pm; pl > (char *) a && cmp(pl - es, pl) > 0;
                 pl -= es)
                swap(pl, pl - es);
        return;
    }
    presorted = 1;
    for (pm = (char *) a + es; pm < (char *) a + n * es; pm += es)
    {
        if (cmp(pm - es, pm) > 0)
        {
            presorted = 0;
            break;
        }
    }
    if (presorted)
        return;
    pm = (char *) a + (n / 2) * es;
    if (n > 7)
    {
        pl = (char *) a;
        pn = (char *) a + (n - 1) * es;
        if (n > 40)
        {
            size_t      d = (n / 8) * es;

            pl = med3(pl, pl + d, pl + 2 * d, cmp);
            pm = med3(pm - d, pm, pm + d, cmp);
            pn = med3(pn - 2 * d, pn - d, pn, cmp);
        }
        pm = med3(pl, pm, pn, cmp);
    }
    swap(a, pm);
    pa = pb = (char *) a + es;
    pc = pd = (char *) a + (n - 1) * es;
    for (;;)
    {
        while (pb <= pc && (r = cmp(pb, a)) <= 0)
        {
            if (r == 0)
            {
                swap(pa, pb);
                pa += es;
            }
            pb += es;
        }
        while (pb <= pc && (r = cmp(pc, a)) >= 0)
        {
            if (r == 0)
            {
                swap(pc, pd);
                pd -= es;
            }
            pc -= es;
        }
        if (pb > pc)
            break;
        swap(pb, pc);
        pb += es;
        pc -= es;
    }
    pn = (char *) a + n * es;
    d1 = Min(pa - (char *) a, pb - pa);
    vecswap(a, pb - d1, d1);
    d1 = Min(pd - pc, pn - pd - es);
    vecswap(pb, pn - d1, d1);
    d1 = pb - pa;
    d2 = pd - pc;
    if (d1 <= d2)
    {
        /* Recurse on left partition, then iterate on right partition */
        if (d1 > es)
            pg_qsort(a, d1 / es, es, cmp);
        if (d2 > es)
        {
            /* Iterate rather than recurse to save stack space */
            /* pg_qsort(pn - d2, d2 / es, es, cmp); */
            a = pn - d2;
            n = d2 / es;
            goto loop;
        }
    }
    else
    {
        /* Recurse on right partition, then iterate on left partition */
        if (d2 > es)
            pg_qsort(pn - d2, d2 / es, es, cmp);
        if (d1 > es)
        {
            /* Iterate rather than recurse to save stack space */
            /* pg_qsort(a, d1 / es, es, cmp); */
            n = d1 / es;
            goto loop;
        }
    }
}

int pg_qsort_strcmp	(	const void *	a,
		const void *	b
	)

Definition at line 232 of file qsort.c.

Referenced by BuildEventTriggerCache(), filter_event_trigger(), readstoplist(), and searchstoplist().

{
    return strcmp(*(const char *const *) a, *(const char *const *) b);
}

bool pg_set_block

(

pgsocket

sock

)

Definition at line 49 of file noblock.c.

{
#if !defined(WIN32)
    int         flags;

    flags = fcntl(sock, F_GETFL);
    if (flags < 0)
        return false;
    if (fcntl(sock, F_SETFL, (flags & ~O_NONBLOCK)) == -1)
        return false;
    return true;
#else
    unsigned long ioctlsocket_ret = 0;

    /* Returns non-0 on failure, while fcntl() returns -1 on failure */
    return (ioctlsocket(sock, FIONBIO, &ioctlsocket_ret) == 0);
#endif
}

bool pg_set_noblock

(

pgsocket

sock

)

Definition at line 25 of file noblock.c.

Referenced by pgstat_init(), pq_init(), PQconnectPoll(), and report_fork_failure_to_client().

{
#if !defined(WIN32)
    int         flags;

    flags = fcntl(sock, F_GETFL);
    if (flags < 0)
        return false;
    if (fcntl(sock, F_SETFL, (flags | O_NONBLOCK)) == -1)
        return false;
    return true;
#else
    unsigned long ioctlsocket_ret = 1;

    /* Returns non-0 on failure, while fcntl() returns -1 on failure */
    return (ioctlsocket(sock, FIONBIO, &ioctlsocket_ret) == 0);
#endif
}

void pg_srand48

(

long

seed

)

Definition at line 102 of file erand48.c.

References _rand48_add, _rand48_mult, _rand48_seed, RAND48_ADD, RAND48_MULT_0, RAND48_MULT_1, RAND48_MULT_2, and RAND48_SEED_0.

Referenced by srandom().

{
    _rand48_seed[0] = RAND48_SEED_0;
    _rand48_seed[1] = (unsigned short) seed;
    _rand48_seed[2] = (unsigned short) (seed >> 16);
    _rand48_mult[0] = RAND48_MULT_0;
    _rand48_mult[1] = RAND48_MULT_1;
    _rand48_mult[2] = RAND48_MULT_2;
    _rand48_add = RAND48_ADD;
}

int pg_strcasecmp	(	const char *	s1,
		const char *	s2
	)

Definition at line 36 of file pgstrcasecmp.c.

References IS_HIGHBIT_SET.

Referenced by AlterOperator(), AlterTSDictionary(), array_out(), ATExecSetRelOptions(), ATExecSetStorage(), build_startup_packet(), check_datestyle(), check_ddl_tag(), check_ident_usermap(), check_log_destination(), check_table_rewrite_ddl_tag(), check_usermap(), check_wal_consistency_checking(), comp_keyword_case_hook(), compute_attributes_with_style(), config_enum_lookup_by_name(), convert_any_priv_string(), convert_priv_string(), defGetBoolean(), defGetTypeLength(), DefineAggregate(), DefineCollation(), DefineOperator(), DefineRange(), DefineTSConfiguration(), DefineTSDictionary(), DefineTSParser(), DefineTSTemplate(), DefineType(), DefineView(), dintdict_init(), dispell_init(), do_pset(), doCustom(), dsimple_init(), dsnowball_init(), dsynonym_init(), dumpFunc(), dxsyn_init(), echo_hidden_hook(), echo_hook(), equivalent_locale(), evaluateSleep(), exec_command(), fillRelOptions(), find_matching_ts_config(), findTTStatus(), get_progname(), helpSQL(), histcontrol_hook(), hostname_match(), interpretOidsOption(), locate_stem_module(), lookup_prop_name(), main(), makeAlterConfigCommand(), on_error_rollback_hook(), parse_hstore(), parse_slash_copy(), parseArchiveFormat(), parseNameAndArgTypes(), ParseVariableBool(), pg_fe_sendauth(), pg_find_encoding(), pg_get_functiondef(), pg_size_bytes(), pg_stat_get_progress_info(), pgp_get_cipher_code(), pgp_get_digest_code(), PGTYPEStimestamp_defmt_scan(), plperl_trigger_handler(), plpgsql_extra_checks_check_hook(), PLy_exec_trigger(), pqSetenvPoll(), process_backslash_command(), prsd_headline(), px_find_digest(), px_gen_salt(), px_resolve_alias(), ReadArrayStr(), show_context_hook(), splitTzLine(), SyncRepGetStandbyPriority(), thesaurus_init(), transformCreateStmt(), transformPartitionSpec(), transformRelOptions(), unaccent_init(), validate_exec(), validateWithCheckOption(), verbosity_hook(), verify_peer_name_matches_certificate_name(), wildcard_certificate_match(), and xmlpi().

{
    for (;;)
    {
        unsigned char ch1 = (unsigned char) *s1++;
        unsigned char ch2 = (unsigned char) *s2++;

        if (ch1 != ch2)
        {
            if (ch1 >= 'A' && ch1 <= 'Z')
                ch1 += 'a' - 'A';
            else if (IS_HIGHBIT_SET(ch1) && isupper(ch1))
                ch1 = tolower(ch1);

            if (ch2 >= 'A' && ch2 <= 'Z')
                ch2 += 'a' - 'A';
            else if (IS_HIGHBIT_SET(ch2) && isupper(ch2))
                ch2 = tolower(ch2);

            if (ch1 != ch2)
                return (int) ch1 - (int) ch2;
        }
        if (ch1 == 0)
            break;
    }
    return 0;
}

int pg_strncasecmp	(	const char *	s1,
		const char *	s2,
		size_t	n
	)

Definition at line 69 of file pgstrcasecmp.c.

References IS_HIGHBIT_SET.

Referenced by AlterTableGetRelOptionsLockLevel(), check_datestyle(), check_ddl_tag(), check_special_value(), check_timezone(), command_no_begin(), do_pset(), equivalent_locale(), float4in(), float8in_internal(), helpSQL(), is_select_command(), MainLoop(), map_sql_identifier_to_xml_name(), numeric_in(), parse_bool_with_len(), parseRelOptions(), ParseTzFile(), ParseVariableBool(), range_parse(), scan_directory_ci(), set_unicode_line_style(), set_var_from_str(), SpecialTags(), and transformRelOptions().

{
    while (n-- > 0)
    {
        unsigned char ch1 = (unsigned char) *s1++;
        unsigned char ch2 = (unsigned char) *s2++;

        if (ch1 != ch2)
        {
            if (ch1 >= 'A' && ch1 <= 'Z')
                ch1 += 'a' - 'A';
            else if (IS_HIGHBIT_SET(ch1) && isupper(ch1))
                ch1 = tolower(ch1);

            if (ch2 >= 'A' && ch2 <= 'Z')
                ch2 += 'a' - 'A';
            else if (IS_HIGHBIT_SET(ch2) && isupper(ch2))
                ch2 = tolower(ch2);

            if (ch1 != ch2)
                return (int) ch1 - (int) ch2;
        }
        if (ch1 == 0)
            break;
    }
    return 0;
}

unsigned char pg_tolower

(

unsigned char

ch

)

Definition at line 122 of file pgstrcasecmp.c.

References IS_HIGHBIT_SET.

Referenced by dir_strcmp(), ParseDateTime(), PGTYPESdate_defmt_asc(), PQfnumber(), processSQLNamePattern(), SB_lower_char(), seq_search(), str_initcap(), str_tolower(), and validateTzEntry().

{
    if (ch >= 'A' && ch <= 'Z')
        ch += 'a' - 'A';
    else if (IS_HIGHBIT_SET(ch) && isupper(ch))
        ch = tolower(ch);
    return ch;
}

unsigned char pg_toupper

(

unsigned char

ch

)

Definition at line 105 of file pgstrcasecmp.c.

References IS_HIGHBIT_SET.

Referenced by cash_words(), DetermineTimeZoneAbbrevOffsetInternal(), pg_timezone_abbrevs(), pg_tzset(), seq_search(), str_initcap(), and str_toupper().

{
    if (ch >= 'a' && ch <= 'z')
        ch += 'A' - 'a';
    else if (IS_HIGHBIT_SET(ch) && islower(ch))
        ch = toupper(ch);
    return ch;
}

void pg_usleep

(

long

microsec

)

Definition at line 53 of file signal.c.

References EINTR, FALSE, NULL, pgwin32_dispatch_queued_signals(), pgwin32_signal_event, and select.

Referenced by auth_delay_checks(), AutoVacLauncherMain(), AutoVacWorkerMain(), backend_read_statsfile(), BackendInitialize(), BackgroundWriterMain(), CheckpointerMain(), CheckpointWriteDelay(), CountOtherDBBackends(), CreateCheckPoint(), CustomizableNextWALFileReady(), do_pg_stop_backup(), do_promote(), do_restart(), do_stop(), do_watch(), exec_prog(), FileRead(), FileWrite(), ForgetDatabaseFsyncRequests(), ForgetRelationFsyncRequests(), GetMultiXactIdMembers(), InitPostgres(), lazy_truncate_heap(), main(), perform_spin_delay(), pgarch_ArchiverCopyLoop(), pgwin32_recv(), read_local_xlog_page(), recoveryPausesHere(), register_unlink(), regression_main(), RequestCheckpoint(), ResolveRecoveryConflictWithDatabase(), ResolveRecoveryConflictWithVirtualXIDs(), RestoreWALFileForRecovery(), ServerLoop(), ShutdownWalRcv(), StartBackgroundWorker(), StartupXLOG(), StreamConnection(), test_postmaster_connection(), vacuum_delay_point(), wait_pid(), WaitExceedsMaxStandbyDelay(), WalSndWaitStopping(), WalWriterMain(), XLogDumpXLogRead(), and XLogFlush().

{
    if (WaitForSingleObject(pgwin32_signal_event,
                            (microsec < 500 ? 1 : (microsec + 500) / 1000))
        == WAIT_OBJECT_0)
    {
        pgwin32_dispatch_queued_signals();
        errno = EINTR;
        return;
    }
}

char** pgfnames

(

const char *

path

)

Definition at line 31 of file pgfnames.c.

References _, closedir(), dirent::d_name, elog, NULL, opendir(), palloc(), pstrdup(), readdir(), repalloc(), strerror(), and WARNING.

Referenced by convert_sourcefiles_in(), rmtree(), and scan_available_timezones().

{
    DIR        *dir;
    struct dirent *file;
    char      **filenames;
    int         numnames = 0;
    int         fnsize = 200;   /* enough for many small dbs */

    dir = opendir(path);
    if (dir == NULL)
    {
#ifndef FRONTEND
        elog(WARNING, "could not open directory \"%s\": %m", path);
#else
        fprintf(stderr, _("could not open directory \"%s\": %s\n"),
                path, strerror(errno));
#endif
        return NULL;
    }

    filenames = (char **) palloc(fnsize * sizeof(char *));

    while (errno = 0, (file = readdir(dir)) != NULL)
    {
        if (strcmp(file->d_name, ".") != 0 && strcmp(file->d_name, "..") != 0)
        {
            if (numnames + 1 >= fnsize)
            {
                fnsize *= 2;
                filenames = (char **) repalloc(filenames,
                                               fnsize * sizeof(char *));
            }
            filenames[numnames++] = pstrdup(file->d_name);
        }
    }

    if (errno)
    {
#ifndef FRONTEND
        elog(WARNING, "could not read directory \"%s\": %m", path);
#else
        fprintf(stderr, _("could not read directory \"%s\": %s\n"),
                path, strerror(errno));
#endif
    }

    filenames[numnames] = NULL;

    if (closedir(dir))
    {
#ifndef FRONTEND
        elog(WARNING, "could not close directory \"%s\": %m", path);
#else
        fprintf(stderr, _("could not close directory \"%s\": %s\n"),
                path, strerror(errno));
#endif
    }

    return filenames;
}

void pgfnames_cleanup

(

char **

filenames

)

Definition at line 99 of file pgfnames.c.

References fn(), and pfree().

Referenced by convert_sourcefiles_in(), rmtree(), and scan_available_timezones().

{
    char      **fn;

    for (fn = filenames; *fn; fn++)
        pfree(*fn);

    pfree(filenames);
}

int pqGethostbyname	(	const char *	name,
		struct hostent *	resultbuf,
		char *	buffer,
		size_t	buflen,
		struct hostent **	result,
		int *	herrno
	)

Definition at line 117 of file thread.c.

References NULL.

Referenced by getaddrinfo().

{
#if defined(FRONTEND) && defined(ENABLE_THREAD_SAFETY) && defined(HAVE_GETHOSTBYNAME_R)

    /*
     * broken (well early POSIX draft) gethostbyname_r() which returns 'struct
     * hostent *'
     */
    *result = gethostbyname_r(name, resultbuf, buffer, buflen, herrno);
    return (*result == NULL) ? -1 : 0;
#else

    /* no gethostbyname_r(), just use gethostbyname() */
    *result = gethostbyname(name);

    if (*result != NULL)
        *herrno = h_errno;

    if (*result != NULL)
        return 0;
    else
        return -1;
#endif
}

int pqGetpwuid	(	uid_t	uid,
		struct passwd *	resultbuf,
		char *	buffer,
		size_t	buflen,
		struct passwd **	result
	)

Definition at line 95 of file thread.c.

References NULL.

Referenced by get_home_path(), pg_fe_getauthname(), PQconnectPoll(), and pqGetHomeDirectory().

{
#if defined(FRONTEND) && defined(ENABLE_THREAD_SAFETY) && defined(HAVE_GETPWUID_R)
    return getpwuid_r(uid, resultbuf, buffer, buflen, result);
#else
    /* no getpwuid_r() available, just use getpwuid() */
    errno = 0;
    *result = getpwuid(uid);
    /* paranoia: ensure we return zero on success */
    return (*result == NULL) ? errno : 0;
#endif
}

pqsigfunc pqsignal	(	int	signo,
		pqsigfunc	func
	)

Definition at line 168 of file signal.c.

References pg_signal_array, SIG_ERR, and SIGCHLD.

Referenced by ApplyLauncherMain(), ApplyWorkerMain(), AutoVacLauncherMain(), AutoVacWorkerMain(), BackendInitialize(), BackgroundWriterMain(), bootstrap_signals(), CheckpointerMain(), disable_sigpipe_trap(), InitializeTimeouts(), main(), ParallelBackupStart(), ParallelWorkerMain(), PgArchiverMain(), PgstatCollectorMain(), plperl_init_interp(), PostgresMain(), PostmasterMain(), PQprint(), restore_sigpipe_trap(), setalarm(), setup_cancel_handler(), setup_signals(), sigquit_handler(), sigTermHandler(), StartBackgroundWorker(), StartupProcessMain(), SysLoggerMain(), test_shm_mq_main(), trapsig(), WalReceiverMain(), WalSndSignals(), and WalWriterMain().

{
    pqsigfunc   prevfunc;

    if (signum >= PG_SIGNAL_COUNT || signum < 0)
        return SIG_ERR;
    prevfunc = pg_signal_array[signum];
    pg_signal_array[signum] = handler;
    return prevfunc;
}

pqsigfunc pqsignal_no_restart	(	int	signo,
		pqsigfunc	func
	)

Definition at line 71 of file pqsignal.c.

References SIG_ERR, and SIGCHLD.

Referenced by PostmasterMain().

{
    struct sigaction act,
                oact;

    act.sa_handler = func;
    sigemptyset(&act.sa_mask);
    act.sa_flags = 0;
#ifdef SA_NOCLDSTOP
    if (signo == SIGCHLD)
        act.sa_flags |= SA_NOCLDSTOP;
#endif
    if (sigaction(signo, &act, &oact) < 0)
        return SIG_ERR;
    return oact.sa_handler;
}

char* pqStrerror	(	int	errnum,
		char *	strerrbuf,
		size_t	buflen
	)

Definition at line 61 of file thread.c.

References strerror(), and strlcpy().

Referenced by initialize_SSL(), lo_export(), lo_import_internal(), pg_fe_getauthname(), pg_local_sendauth(), and PQconnectPoll().

{
#if defined(FRONTEND) && defined(ENABLE_THREAD_SAFETY) && defined(HAVE_STRERROR_R)
    /* reentrant strerror_r is available */
#ifdef STRERROR_R_INT
    /* SUSv3 version */
    if (strerror_r(errnum, strerrbuf, buflen) == 0)
        return strerrbuf;
    else
        return "Unknown error";
#else
    /* GNU libc */
    return strerror_r(errnum, strerrbuf, buflen);
#endif
#else
    /* no strerror_r() available, just use strerror */
    strlcpy(strerrbuf, strerror(errnum), buflen);

    return strerrbuf;
#endif
}

void qsort_arg	(	void *	base,
		size_t	nel,
		size_t	elsize,
		qsort_arg_comparator	cmp,
		void *	arg
	)

Definition at line 113 of file qsort_arg.c.

References cmp(), med3(), Min, swap, SWAPINIT, and vecswap.

Referenced by _bt_sort_array_elements(), compute_range_stats(), compute_scalar_stats(), dependency_degree(), gbt_num_picksplit(), gbt_var_picksplit(), ginExtractEntries(), isort(), mcelem_array_selec(), ndistinct_for_combination(), range_gist_double_sorting_split(), range_gist_single_sorting_split(), RelationBuildPartitionDesc(), SortAndUniqItems(), spg_range_quad_picksplit(), startScanKey(), tbm_prepare_shared_iterate(), tsvectorrecv(), uniqueentry(), and uniqueifyJsonbObject().

{
    char       *pa,
               *pb,
               *pc,
               *pd,
               *pl,
               *pm,
               *pn;
    size_t      d1,
                d2;
    int         r,
                swaptype,
                presorted;

loop:SWAPINIT(a, es);
    if (n < 7)
    {
        for (pm = (char *) a + es; pm < (char *) a + n * es; pm += es)
            for (pl = pm; pl > (char *) a && cmp(pl - es, pl, arg) > 0;
                 pl -= es)
                swap(pl, pl - es);
        return;
    }
    presorted = 1;
    for (pm = (char *) a + es; pm < (char *) a + n * es; pm += es)
    {
        if (cmp(pm - es, pm, arg) > 0)
        {
            presorted = 0;
            break;
        }
    }
    if (presorted)
        return;
    pm = (char *) a + (n / 2) * es;
    if (n > 7)
    {
        pl = (char *) a;
        pn = (char *) a + (n - 1) * es;
        if (n > 40)
        {
            size_t      d = (n / 8) * es;

            pl = med3(pl, pl + d, pl + 2 * d, cmp, arg);
            pm = med3(pm - d, pm, pm + d, cmp, arg);
            pn = med3(pn - 2 * d, pn - d, pn, cmp, arg);
        }
        pm = med3(pl, pm, pn, cmp, arg);
    }
    swap(a, pm);
    pa = pb = (char *) a + es;
    pc = pd = (char *) a + (n - 1) * es;
    for (;;)
    {
        while (pb <= pc && (r = cmp(pb, a, arg)) <= 0)
        {
            if (r == 0)
            {
                swap(pa, pb);
                pa += es;
            }
            pb += es;
        }
        while (pb <= pc && (r = cmp(pc, a, arg)) >= 0)
        {
            if (r == 0)
            {
                swap(pc, pd);
                pd -= es;
            }
            pc -= es;
        }
        if (pb > pc)
            break;
        swap(pb, pc);
        pb += es;
        pc -= es;
    }
    pn = (char *) a + n * es;
    d1 = Min(pa - (char *) a, pb - pa);
    vecswap(a, pb - d1, d1);
    d1 = Min(pd - pc, pn - pd - es);
    vecswap(pb, pn - d1, d1);
    d1 = pb - pa;
    d2 = pd - pc;
    if (d1 <= d2)
    {
        /* Recurse on left partition, then iterate on right partition */
        if (d1 > es)
            qsort_arg(a, d1 / es, es, cmp, arg);
        if (d2 > es)
        {
            /* Iterate rather than recurse to save stack space */
            /* qsort_arg(pn - d2, d2 / es, es, cmp, arg); */
            a = pn - d2;
            n = d2 / es;
            goto loop;
        }
    }
    else
    {
        /* Recurse on right partition, then iterate on left partition */
        if (d2 > es)
            qsort_arg(pn - d2, d2 / es, es, cmp, arg);
        if (d1 > es)
        {
            /* Iterate rather than recurse to save stack space */
            /* qsort_arg(a, d1 / es, es, cmp, arg); */
            n = d1 / es;
            goto loop;
        }
    }
}

long random

(

void

)

Definition at line 22 of file random.c.

References pg_lrand48().

Referenced by _bt_findinsertloc(), acquire_sample_rows(), anl_init_selection_state(), anl_random_fract(), choose_dsm_implementation(), drandom(), dsm_create(), dsm_postmaster_startup(), ExecInitSampleScan(), explain_ExecutorStart(), get_normal_pair(), get_random_uint64(), gistchoose(), main(), perform_spin_delay(), prepare_buf(), reservoir_init_selection_state(), SetTempTablespaces(), and spgdoinsert().

{
    return pg_lrand48();
}

double rint

(

double

x

)

Definition at line 22 of file rint.c.

Referenced by acquire_inherited_sample_rows(), AdjustFractSeconds(), bernoulli_beginsamplescan(), btcostestimate(), calculatePagesPerBuffer(), cash_div_flt4(), cash_div_flt8(), cash_mul_flt4(), cash_mul_flt8(), check_effective_io_concurrency(), clamp_row_est(), create_modifytable_path(), DecodeInterval(), DecodeNumberField(), dround(), dtoi2(), dtoi4(), dtoi8(), estimate_rel_size(), ExecInitBitmapHeapScan(), final_cost_hashjoin(), final_cost_nestloop(), float4_to_char(), float8_timestamptz(), float8_to_char(), flt4_mul_cash(), flt8_mul_cash(), ftoi2(), ftoi4(), ftoi8(), genericcostestimate(), gincostestimate(), initial_cost_mergejoin(), interval_div(), interval_mul(), make_interval(), make_time(), make_timestamp_internal(), ParseFractionalSecond(), set_append_rel_size(), and system_beginsamplescan().

{
    double      x_orig;
    double      r;

    /* Per POSIX, NaNs must be returned unchanged. */
    if (isnan(x))
        return x;

    if (x <= 0.0)
    {
        /* Both positive and negative zero should be returned unchanged. */
        if (x == 0.0)
            return x;

        /*
         * Subtracting 0.5 from a number very close to -0.5 can round to
         * exactly -1.0, producing incorrect results, so we take the opposite
         * approach: add 0.5 to the negative number, so that it goes closer to
         * zero (or at most to +0.5, which is dealt with next), avoiding the
         * precision issue.
         */
        x_orig = x;
        x += 0.5;

        /*
         * Be careful to return minus zero when input+0.5 >= 0, as that's what
         * rint() should return with negative input.
         */
        if (x >= 0.0)
            return -0.0;

        /*
         * For very big numbers the input may have no decimals.  That case is
         * detected by testing x+0.5 == x+1.0; if that happens, the input is
         * returned unchanged.  This also covers the case of minus infinity.
         */
        if (x == x_orig + 1.0)
            return x_orig;

        /* Otherwise produce a rounded estimate. */
        r = floor(x);

        /*
         * If the rounding did not produce exactly input+0.5 then we're done.
         */
        if (r != x)
            return r;

        /*
         * The original fractional part was exactly 0.5 (since
         * floor(input+0.5) == input+0.5).  We need to round to nearest even.
         * Dividing input+0.5 by 2, taking the floor and multiplying by 2
         * yields the closest even number.  This part assumes that division by
         * 2 is exact, which should be OK because underflow is impossible
         * here: x is an integer.
         */
        return floor(x * 0.5) * 2.0;
    }
    else
    {
        /*
         * The positive case is similar but with signs inverted and using
         * ceil() instead of floor().
         */
        x_orig = x;
        x -= 0.5;
        if (x <= 0.0)
            return 0.0;
        if (x == x_orig - 1.0)
            return x_orig;
        r = ceil(x);
        if (r != x)
            return r;
        return ceil(x * 0.5) * 2.0;
    }
}

bool rmtree	(	const char *	path,
		bool	rmtopdir
	)

Definition at line 36 of file rmtree.c.

References _, elog, filename, lstat, MAXPGPATH, NULL, pgfnames(), pgfnames_cleanup(), result, rmtree(), snprintf(), strerror(), unlink(), and WARNING.

Referenced by cleanup_directories_atexit(), convert_sourcefiles_in(), create_tablespace_directories(), CreateSlotOnDisk(), dbase_redo(), exit_nicely(), movedb(), movedb_failure_callback(), regression_main(), remove_dbtablespaces(), remove_new_subdir(), ReplicationSlotDropPtr(), RestoreSlotFromDisk(), rmtree(), and StartupReplicationSlots().

{
    bool        result = true;
    char        pathbuf[MAXPGPATH];
    char      **filenames;
    char      **filename;
    struct stat statbuf;

    /*
     * we copy all the names out of the directory before we start modifying
     * it.
     */
    filenames = pgfnames(path);

    if (filenames == NULL)
        return false;

    /* now we have the names we can start removing things */
    for (filename = filenames; *filename; filename++)
    {
        snprintf(pathbuf, MAXPGPATH, "%s/%s", path, *filename);

        /*
         * It's ok if the file is not there anymore; we were just about to
         * delete it anyway.
         *
         * This is not an academic possibility. One scenario where this
         * happens is when bgwriter has a pending unlink request for a file in
         * a database that's being dropped. In dropdb(), we call
         * ForgetDatabaseFsyncRequests() to flush out any such pending unlink
         * requests, but because that's asynchronous, it's not guaranteed that
         * the bgwriter receives the message in time.
         */
        if (lstat(pathbuf, &statbuf) != 0)
        {
            if (errno != ENOENT)
            {
#ifndef FRONTEND
                elog(WARNING, "could not stat file or directory \"%s\": %m",
                     pathbuf);
#else
                fprintf(stderr, _("could not stat file or directory \"%s\": %s\n"),
                        pathbuf, strerror(errno));
#endif
                result = false;
            }
            continue;
        }

        if (S_ISDIR(statbuf.st_mode))
        {
            /* call ourselves recursively for a directory */
            if (!rmtree(pathbuf, true))
            {
                /* we already reported the error */
                result = false;
            }
        }
        else
        {
            if (unlink(pathbuf) != 0)
            {
                if (errno != ENOENT)
                {
#ifndef FRONTEND
                    elog(WARNING, "could not remove file or directory \"%s\": %m",
                         pathbuf);
#else
                    fprintf(stderr, _("could not remove file or directory \"%s\": %s\n"),
                            pathbuf, strerror(errno));
#endif
                    result = false;
                }
            }
        }
    }

    if (rmtopdir)
    {
        if (rmdir(path) != 0)
        {
#ifndef FRONTEND
            elog(WARNING, "could not remove file or directory \"%s\": %m",
                 path);
#else
            fprintf(stderr, _("could not remove file or directory \"%s\": %s\n"),
                    path, strerror(errno));
#endif
            result = false;
        }
    }

    pgfnames_cleanup(filenames);

    return result;
}

void set_pglocale_pgservice	(	const char *	argv0,
		const char *	app
	)

Definition at line 550 of file exec.c.

References canonicalize_path(), find_my_exec(), get_etc_path(), get_locale_path(), MAXPGPATH, my_exec_path, NULL, PG_TEXTDOMAIN, putenv, and snprintf().

Referenced by main(), and regression_main().

{
    char        path[MAXPGPATH];
    char        my_exec_path[MAXPGPATH];
    char        env_path[MAXPGPATH + sizeof("PGSYSCONFDIR=")];  /* longer than
                                                                 * PGLOCALEDIR */
    char       *dup_path;

    /* don't set LC_ALL in the backend */
    if (strcmp(app, PG_TEXTDOMAIN("postgres")) != 0)
    {
        setlocale(LC_ALL, "");

        /*
         * One could make a case for reproducing here PostmasterMain()'s test
         * for whether the process is multithreaded.  Unlike the postmaster,
         * no frontend program calls sigprocmask() or otherwise provides for
         * mutual exclusion between signal handlers.  While frontends using
         * fork(), if multithreaded, are formally exposed to undefined
         * behavior, we have not witnessed a concrete bug.  Therefore,
         * complaining about multithreading here may be mere pedantry.
         */
    }

    if (find_my_exec(argv0, my_exec_path) < 0)
        return;

#ifdef ENABLE_NLS
    get_locale_path(my_exec_path, path);
    bindtextdomain(app, path);
    textdomain(app);

    if (getenv("PGLOCALEDIR") == NULL)
    {
        /* set for libpq to use */
        snprintf(env_path, sizeof(env_path), "PGLOCALEDIR=%s", path);
        canonicalize_path(env_path + 12);
        dup_path = strdup(env_path);
        if (dup_path)
            putenv(dup_path);
    }
#endif

    if (getenv("PGSYSCONFDIR") == NULL)
    {
        get_etc_path(my_exec_path, path);

        /* set for libpq to use */
        snprintf(env_path, sizeof(env_path), "PGSYSCONFDIR=%s", path);
        canonicalize_path(env_path + 13);
        dup_path = strdup(env_path);
        if (dup_path)
            putenv(dup_path);
    }
}

void simple_prompt	(	const char *	prompt,
		char *	destination,
		size_t	destlen,
		bool	echo
	)

Definition at line 37 of file sprompt.c.

References _, buf, length(), and NULL.

Referenced by _connectDB(), connectDatabase(), ConnectDatabase(), doConnect(), exec_command_password(), exec_command_prompt(), get_su_pwd(), GetConnection(), main(), prompt_for_password(), sql_conn(), vacuumlo(), and yesno_prompt().

{
    int         length;
    FILE       *termin,
               *termout;

#ifdef HAVE_TERMIOS_H
    struct termios t_orig,
                t;
#else
#ifdef WIN32
    HANDLE      t = NULL;
    DWORD       t_orig = 0;
#endif
#endif

#ifdef WIN32

    /*
     * A Windows console has an "input code page" and an "output code page";
     * these usually match each other, but they rarely match the "Windows ANSI
     * code page" defined at system boot and expected of "char *" arguments to
     * Windows API functions.  The Microsoft CRT write() implementation
     * automatically converts text between these code pages when writing to a
     * console.  To identify such file descriptors, it calls GetConsoleMode()
     * on the underlying HANDLE, which in turn requires GENERIC_READ access on
     * the HANDLE.  Opening termout in mode "w+" allows that detection to
     * succeed.  Otherwise, write() would not recognize the descriptor as a
     * console, and non-ASCII characters would display incorrectly.
     *
     * XXX fgets() still receives text in the console's input code page.  This
     * makes non-ASCII credentials unportable.
     */
    termin = fopen("CONIN$", "r");
    termout = fopen("CONOUT$", "w+");
#else

    /*
     * Do not try to collapse these into one "w+" mode file. Doesn't work on
     * some platforms (eg, HPUX 10.20).
     */
    termin = fopen("/dev/tty", "r");
    termout = fopen("/dev/tty", "w");
#endif
    if (!termin || !termout
#ifdef WIN32

    /*
     * Direct console I/O does not work from the MSYS 1.0.10 console.  Writes
     * reach nowhere user-visible; reads block indefinitely.  XXX This affects
     * most Windows terminal environments, including rxvt, mintty, Cygwin
     * xterm, Cygwin sshd, and PowerShell ISE.  Switch to a more-generic test.
     */
        || (getenv("OSTYPE") && strcmp(getenv("OSTYPE"), "msys") == 0)
#endif
        )
    {
        if (termin)
            fclose(termin);
        if (termout)
            fclose(termout);
        termin = stdin;
        termout = stderr;
    }

#ifdef HAVE_TERMIOS_H
    if (!echo)
    {
        tcgetattr(fileno(termin), &t);
        t_orig = t;
        t.c_lflag &= ~ECHO;
        tcsetattr(fileno(termin), TCSAFLUSH, &t);
    }
#else
#ifdef WIN32
    if (!echo)
    {
        /* get a new handle to turn echo off */
        t = GetStdHandle(STD_INPUT_HANDLE);

        /* save the old configuration first */
        GetConsoleMode(t, &t_orig);

        /* set to the new mode */
        SetConsoleMode(t, ENABLE_LINE_INPUT | ENABLE_PROCESSED_INPUT);
    }
#endif
#endif

    if (prompt)
    {
        fputs(_(prompt), termout);
        fflush(termout);
    }

    if (fgets(destination, destlen, termin) == NULL)
        destination[0] = '\0';

    length = strlen(destination);
    if (length > 0 && destination[length - 1] != '\n')
    {
        /* eat rest of the line */
        char        buf[128];
        int         buflen;

        do
        {
            if (fgets(buf, sizeof(buf), termin) == NULL)
                break;
            buflen = strlen(buf);
        } while (buflen > 0 && buf[buflen - 1] != '\n');
    }

    if (length > 0 && destination[length - 1] == '\n')
        /* remove trailing newline */
        destination[length - 1] = '\0';

#ifdef HAVE_TERMIOS_H
    if (!echo)
    {
        tcsetattr(fileno(termin), TCSAFLUSH, &t_orig);
        fputs("\n", termout);
        fflush(termout);
    }
#else
#ifdef WIN32
    if (!echo)
    {
        /* reset to the original console mode */
        SetConsoleMode(t, t_orig);
        fputs("\n", termout);
        fflush(termout);
    }
#endif
#endif

    if (termin != stdin)
    {
        fclose(termin);
        fclose(termout);
    }
}

void srandom

(

unsigned int

seed

)

Definition at line 22 of file srandom.c.

References pg_srand48().

Referenced by BackendRun(), main(), PostmasterMain(), and setseed().

{
    pg_srand48((long int) seed);
}

size_t strlcat	(	char *	dst,
		const char *	src,
		size_t	siz
	)

Definition at line 33 of file strlcat.c.

Referenced by CreateLockFile(), get_configdata(), get_prompt(), and validate_exec().

{
    char       *d = dst;
    const char *s = src;
    size_t      n = siz;
    size_t      dlen;

    /* Find the end of dst and adjust bytes left but don't go past end */
    while (n-- != 0 && *d != '\0')
        d++;
    dlen = d - dst;
    n = siz - dlen;

    if (n == 0)
        return (dlen + strlen(s));
    while (*s != '\0')
    {
        if (n != 1)
        {
            *d++ = *s;
            n--;
        }
        s++;
    }
    *d = '\0';

    return (dlen + (s - src));  /* count does not include NUL */
}

size_t strlcpy	(	char *	dst,
		const char *	src,
		size_t	siz
	)

Definition at line 45 of file strlcpy.c.

Referenced by _tarGetHeader(), AuxiliaryProcessMain(), BaseBackup(), be_tls_get_cipher(), be_tls_get_peerdn_name(), be_tls_get_version(), chkpass_in(), chkpass_out(), ChooseIndexNameAddition(), CleanupPriorWALFiles(), connectFailureMessage(), ConvertTimeZoneAbbrevs(), create_script_for_old_cluster_deletion(), createNewConnection(), descriptor_variable(), DetermineTimeZoneAbbrevOffsetInternal(), expand_tilde(), fetch_fp_info(), find_in_dynamic_libpath(), find_other_exec_or_die(), from_char_parse_int_len(), from_char_seq_search(), fsync_parent_path(), get_configdata(), get_control_data(), get_home_path(), get_prompt(), hash_create(), identify_system_timezone(), init(), initialize_SSL(), InitPostgres(), internal_cancel(), isolation_init(), join_path_components(), KeepFileRestoredFromArchive(), logfile_getname(), main(), make_oper_cache_key(), make_relative_path(), parseCommandLine(), ParseLongOption(), parseServiceInfo(), pg_getnameinfo_all(), pg_open_tzfile(), pg_perm_setlocale(), pg_timezone_abbrevs(), pg_TZDIR(), pg_tzenumerate_next(), pgarch_archiveXlog(), pgstat_bestart(), PQcancel(), pqGetErrorNotice3(), pqGetHomeDirectory(), pqParseInput2(), pqParseInput3(), PQrequestCancel(), pqStrerror(), process_file(), process_postgres_switches(), ReceiveAndUnpackTarFile(), recoveryStopsAfter(), replace_string(), RequestXLogStreaming(), resolve_symlinks(), results_differ(), scan_available_timezones(), scan_directory_ci(), SerializeLibraryState(), set_ps_display(), setup_bin_paths(), SetWALFileNameForCleanup(), SimpleLruInit(), SSLerrmessage(), StartupXLOG(), syncTargetDirectory(), tar_close(), tarCreateHeader(), test_postmaster_connection(), timestamptz_to_str(), uuid_generate_internal(), validate_exec(), WalReceiverMain(), and XLogRestorePoint().

{
    char       *d = dst;
    const char *s = src;
    size_t      n = siz;

    /* Copy as many bytes as will fit */
    if (n != 0)
    {
        while (--n != 0)
        {
            if ((*d++ = *s++) == '\0')
                break;
        }
    }

    /* Not enough room in dst, add NUL and traverse rest of src */
    if (n == 0)
    {
        if (siz != 0)
            *d = '\0';          /* NUL-terminate dst */
        while (*s++)
            ;
    }

    return (s - src - 1);       /* count does not include NUL */
}

void unsetenv

(

const char *

name

)

Definition at line 20 of file unsetenv.c.

References malloc, NULL, and putenv.

{
    char       *envstr;

    if (getenv(name) == NULL)
        return;                 /* no work */

    /*
     * The technique embodied here works if libc follows the Single Unix Spec
     * and actually uses the storage passed to putenv() to hold the environ
     * entry.  When we clobber the entry in the second step we are ensuring
     * that we zap the actual environ member.  However, there are some libc
     * implementations (notably recent BSDs) that do not obey SUS but copy the
     * presented string.  This method fails on such platforms.  Hopefully all
     * such platforms have unsetenv() and thus won't be using this hack. See:
     * http://www.greenend.org.uk/rjk/2008/putenv.html
     *
     * Note that repeatedly setting and unsetting a var using this code will
     * leak memory.
     */

    envstr = (char *) malloc(strlen(name) + 2);
    if (!envstr)                /* not much we can do if no memory */
        return;

    /* Override the existing setting by forcibly defining the var */
    sprintf(envstr, "%s=", name);
    putenv(envstr);

    /* Now we can clobber the variable definition this way: */
    strcpy(envstr, "=");

    /*
     * This last putenv cleans up if we have multiple zero-length names as a
     * result of unsetting multiple things.
     */
    putenv(envstr);
}

char* wait_result_to_str

(

int

exit_status

)

Definition at line 32 of file wait_error.c.

References _, pstrdup(), snprintf(), WEXITSTATUS, WIFEXITED, WIFSIGNALED, and WTERMSIG.

Referenced by ClosePipeToProgram(), do_copy(), ExecuteRecoveryCommand(), pclose_check(), and RestoreArchivedFile().

{
    char        str[512];

    if (WIFEXITED(exitstatus))
    {
        /*
         * Give more specific error message for some common exit codes that
         * have a special meaning in shells.
         */
        switch (WEXITSTATUS(exitstatus))
        {
            case 126:
                snprintf(str, sizeof(str), _("command not executable"));
                break;

            case 127:
                snprintf(str, sizeof(str), _("command not found"));
                break;

            default:
                snprintf(str, sizeof(str),
                         _("child process exited with exit code %d"),
                         WEXITSTATUS(exitstatus));
        }
    }
    else if (WIFSIGNALED(exitstatus))
#if defined(WIN32)
        snprintf(str, sizeof(str),
                 _("child process was terminated by exception 0x%X"),
                 WTERMSIG(exitstatus));
#elif defined(HAVE_DECL_SYS_SIGLIST) && HAVE_DECL_SYS_SIGLIST
    {
        char        str2[256];

        snprintf(str2, sizeof(str2), "%d: %s", WTERMSIG(exitstatus),
                 WTERMSIG(exitstatus) < NSIG ?
                 sys_siglist[WTERMSIG(exitstatus)] : "(unknown)");
        snprintf(str, sizeof(str),
                 _("child process was terminated by signal %s"), str2);
    }
#else
        snprintf(str, sizeof(str),
                 _("child process was terminated by signal %d"),
                 WTERMSIG(exitstatus));
#endif
    else
        snprintf(str, sizeof(str),
                 _("child process exited with unrecognized status %d"),
                 exitstatus);

    return pstrdup(str);
}