mirror of
https://git.postgresql.org/git/postgresql.git
synced 2024-09-30 21:51:19 +02:00
115bf1e79a
A cast declared WITH INOUT was described as '(binary coercible)', which seems pretty inaccurate; let's print '(with inout)' instead. Per complaint from Jean-Pierre Pelletier. This definitely seems like a bug fix, but given that it's been wrong since 8.4 and nobody complained before, I'm hesitant to back-patch a behavior change into stable branches. It doesn't seem too late for v11 though. Discussion: https://postgr.es/m/5b887023.1c69fb81.ff96e.6a1d@mx.google.com
5590 lines
159 KiB
C
5590 lines
159 KiB
C
/*
|
|
* psql - the PostgreSQL interactive terminal
|
|
*
|
|
* Support for the various \d ("describe") commands. Note that the current
|
|
* expectation is that all functions in this file will succeed when working
|
|
* with servers of versions 7.4 and up. It's okay to omit irrelevant
|
|
* information for an old server, but not to fail outright.
|
|
*
|
|
* Copyright (c) 2000-2018, PostgreSQL Global Development Group
|
|
*
|
|
* src/bin/psql/describe.c
|
|
*/
|
|
#include "postgres_fe.h"
|
|
|
|
#include <ctype.h>
|
|
|
|
#include "catalog/pg_attribute_d.h"
|
|
#include "catalog/pg_cast_d.h"
|
|
#include "catalog/pg_class_d.h"
|
|
#include "catalog/pg_default_acl_d.h"
|
|
#include "fe_utils/string_utils.h"
|
|
|
|
#include "common.h"
|
|
#include "describe.h"
|
|
#include "fe_utils/mbprint.h"
|
|
#include "fe_utils/print.h"
|
|
#include "settings.h"
|
|
#include "variables.h"
|
|
|
|
|
|
static bool describeOneTableDetails(const char *schemaname,
|
|
const char *relationname,
|
|
const char *oid,
|
|
bool verbose);
|
|
static void add_tablespace_footer(printTableContent *const cont, char relkind,
|
|
Oid tablespace, const bool newline);
|
|
static void add_role_attribute(PQExpBuffer buf, const char *const str);
|
|
static bool listTSParsersVerbose(const char *pattern);
|
|
static bool describeOneTSParser(const char *oid, const char *nspname,
|
|
const char *prsname);
|
|
static bool listTSConfigsVerbose(const char *pattern);
|
|
static bool describeOneTSConfig(const char *oid, const char *nspname,
|
|
const char *cfgname,
|
|
const char *pnspname, const char *prsname);
|
|
static void printACLColumn(PQExpBuffer buf, const char *colname);
|
|
static bool listOneExtensionContents(const char *extname, const char *oid);
|
|
|
|
|
|
/*----------------
|
|
* Handlers for various slash commands displaying some sort of list
|
|
* of things in the database.
|
|
*
|
|
* Note: try to format the queries to look nice in -E output.
|
|
*----------------
|
|
*/
|
|
|
|
|
|
/*
|
|
* \da
|
|
* Takes an optional regexp to select particular aggregates
|
|
*/
|
|
bool
|
|
describeAggregates(const char *pattern, bool verbose, bool showSystem)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT n.nspname as \"%s\",\n"
|
|
" p.proname AS \"%s\",\n"
|
|
" pg_catalog.format_type(p.prorettype, NULL) AS \"%s\",\n",
|
|
gettext_noop("Schema"),
|
|
gettext_noop("Name"),
|
|
gettext_noop("Result data type"));
|
|
|
|
if (pset.sversion >= 80400)
|
|
appendPQExpBuffer(&buf,
|
|
" CASE WHEN p.pronargs = 0\n"
|
|
" THEN CAST('*' AS pg_catalog.text)\n"
|
|
" ELSE pg_catalog.pg_get_function_arguments(p.oid)\n"
|
|
" END AS \"%s\",\n",
|
|
gettext_noop("Argument data types"));
|
|
else if (pset.sversion >= 80200)
|
|
appendPQExpBuffer(&buf,
|
|
" CASE WHEN p.pronargs = 0\n"
|
|
" THEN CAST('*' AS pg_catalog.text)\n"
|
|
" ELSE\n"
|
|
" pg_catalog.array_to_string(ARRAY(\n"
|
|
" SELECT\n"
|
|
" pg_catalog.format_type(p.proargtypes[s.i], NULL)\n"
|
|
" FROM\n"
|
|
" pg_catalog.generate_series(0, pg_catalog.array_upper(p.proargtypes, 1)) AS s(i)\n"
|
|
" ), ', ')\n"
|
|
" END AS \"%s\",\n",
|
|
gettext_noop("Argument data types"));
|
|
else
|
|
appendPQExpBuffer(&buf,
|
|
" pg_catalog.format_type(p.proargtypes[0], NULL) AS \"%s\",\n",
|
|
gettext_noop("Argument data types"));
|
|
|
|
if (pset.sversion >= 110000)
|
|
appendPQExpBuffer(&buf,
|
|
" pg_catalog.obj_description(p.oid, 'pg_proc') as \"%s\"\n"
|
|
"FROM pg_catalog.pg_proc p\n"
|
|
" LEFT JOIN pg_catalog.pg_namespace n ON n.oid = p.pronamespace\n"
|
|
"WHERE p.prokind = 'a'\n",
|
|
gettext_noop("Description"));
|
|
else
|
|
appendPQExpBuffer(&buf,
|
|
" pg_catalog.obj_description(p.oid, 'pg_proc') as \"%s\"\n"
|
|
"FROM pg_catalog.pg_proc p\n"
|
|
" LEFT JOIN pg_catalog.pg_namespace n ON n.oid = p.pronamespace\n"
|
|
"WHERE p.proisagg\n",
|
|
gettext_noop("Description"));
|
|
|
|
if (!showSystem && !pattern)
|
|
appendPQExpBufferStr(&buf, " AND n.nspname <> 'pg_catalog'\n"
|
|
" AND n.nspname <> 'information_schema'\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, true, false,
|
|
"n.nspname", "p.proname", NULL,
|
|
"pg_catalog.pg_function_is_visible(p.oid)");
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1, 2, 4;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of aggregate functions");
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* \dA
|
|
* Takes an optional regexp to select particular access methods
|
|
*/
|
|
bool
|
|
describeAccessMethods(const char *pattern, bool verbose)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
static const bool translate_columns[] = {false, true, false, false};
|
|
|
|
if (pset.sversion < 90600)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("The server (version %s) does not support access methods.\n",
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT amname AS \"%s\",\n"
|
|
" CASE amtype"
|
|
" WHEN 'i' THEN '%s'"
|
|
" END AS \"%s\"",
|
|
gettext_noop("Name"),
|
|
gettext_noop("Index"),
|
|
gettext_noop("Type"));
|
|
|
|
if (verbose)
|
|
{
|
|
appendPQExpBuffer(&buf,
|
|
",\n amhandler AS \"%s\",\n"
|
|
" pg_catalog.obj_description(oid, 'pg_am') AS \"%s\"",
|
|
gettext_noop("Handler"),
|
|
gettext_noop("Description"));
|
|
}
|
|
|
|
appendPQExpBufferStr(&buf,
|
|
"\nFROM pg_catalog.pg_am\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
NULL, "amname", NULL,
|
|
NULL);
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of access methods");
|
|
myopt.translate_header = true;
|
|
myopt.translate_columns = translate_columns;
|
|
myopt.n_translate_columns = lengthof(translate_columns);
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* \db
|
|
* Takes an optional regexp to select particular tablespaces
|
|
*/
|
|
bool
|
|
describeTablespaces(const char *pattern, bool verbose)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
if (pset.sversion < 80000)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("The server (version %s) does not support tablespaces.\n",
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
if (pset.sversion >= 90200)
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT spcname AS \"%s\",\n"
|
|
" pg_catalog.pg_get_userbyid(spcowner) AS \"%s\",\n"
|
|
" pg_catalog.pg_tablespace_location(oid) AS \"%s\"",
|
|
gettext_noop("Name"),
|
|
gettext_noop("Owner"),
|
|
gettext_noop("Location"));
|
|
else
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT spcname AS \"%s\",\n"
|
|
" pg_catalog.pg_get_userbyid(spcowner) AS \"%s\",\n"
|
|
" spclocation AS \"%s\"",
|
|
gettext_noop("Name"),
|
|
gettext_noop("Owner"),
|
|
gettext_noop("Location"));
|
|
|
|
if (verbose)
|
|
{
|
|
appendPQExpBufferStr(&buf, ",\n ");
|
|
printACLColumn(&buf, "spcacl");
|
|
}
|
|
|
|
if (verbose && pset.sversion >= 90000)
|
|
appendPQExpBuffer(&buf,
|
|
",\n spcoptions AS \"%s\"",
|
|
gettext_noop("Options"));
|
|
|
|
if (verbose && pset.sversion >= 90200)
|
|
appendPQExpBuffer(&buf,
|
|
",\n pg_catalog.pg_size_pretty(pg_catalog.pg_tablespace_size(oid)) AS \"%s\"",
|
|
gettext_noop("Size"));
|
|
|
|
if (verbose && pset.sversion >= 80200)
|
|
appendPQExpBuffer(&buf,
|
|
",\n pg_catalog.shobj_description(oid, 'pg_tablespace') AS \"%s\"",
|
|
gettext_noop("Description"));
|
|
|
|
appendPQExpBufferStr(&buf,
|
|
"\nFROM pg_catalog.pg_tablespace\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
NULL, "spcname", NULL,
|
|
NULL);
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of tablespaces");
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
|
|
/*
|
|
* \df
|
|
* Takes an optional regexp to select particular functions.
|
|
*
|
|
* As with \d, you can specify the kinds of functions you want:
|
|
*
|
|
* a for aggregates
|
|
* n for normal
|
|
* t for trigger
|
|
* w for window
|
|
*
|
|
* and you can mix and match these in any order.
|
|
*/
|
|
bool
|
|
describeFunctions(const char *functypes, const char *pattern, bool verbose, bool showSystem)
|
|
{
|
|
bool showAggregate = strchr(functypes, 'a') != NULL;
|
|
bool showNormal = strchr(functypes, 'n') != NULL;
|
|
bool showProcedure = strchr(functypes, 'p') != NULL;
|
|
bool showTrigger = strchr(functypes, 't') != NULL;
|
|
bool showWindow = strchr(functypes, 'w') != NULL;
|
|
bool have_where;
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
static const bool translate_columns[] = {false, false, false, false, true, true, true, false, true, false, false, false, false};
|
|
|
|
/* No "Parallel" column before 9.6 */
|
|
static const bool translate_columns_pre_96[] = {false, false, false, false, true, true, false, true, false, false, false, false};
|
|
|
|
if (strlen(functypes) != strspn(functypes, "anptwS+"))
|
|
{
|
|
psql_error("\\df only takes [anptwS+] as options\n");
|
|
return true;
|
|
}
|
|
|
|
if (showProcedure && pset.sversion < 110000)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("\\df does not take a \"%c\" option with server version %s\n",
|
|
'p',
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
if (showWindow && pset.sversion < 80400)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("\\df does not take a \"%c\" option with server version %s\n",
|
|
'w',
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
if (!showAggregate && !showNormal && !showProcedure && !showTrigger && !showWindow)
|
|
{
|
|
showAggregate = showNormal = showTrigger = true;
|
|
if (pset.sversion >= 110000)
|
|
showProcedure = true;
|
|
if (pset.sversion >= 80400)
|
|
showWindow = true;
|
|
}
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT n.nspname as \"%s\",\n"
|
|
" p.proname as \"%s\",\n",
|
|
gettext_noop("Schema"),
|
|
gettext_noop("Name"));
|
|
|
|
if (pset.sversion >= 110000)
|
|
appendPQExpBuffer(&buf,
|
|
" pg_catalog.pg_get_function_result(p.oid) as \"%s\",\n"
|
|
" pg_catalog.pg_get_function_arguments(p.oid) as \"%s\",\n"
|
|
" CASE p.prokind\n"
|
|
" WHEN 'a' THEN '%s'\n"
|
|
" WHEN 'w' THEN '%s'\n"
|
|
" WHEN 'p' THEN '%s'\n"
|
|
" ELSE '%s'\n"
|
|
" END as \"%s\"",
|
|
gettext_noop("Result data type"),
|
|
gettext_noop("Argument data types"),
|
|
/* translator: "agg" is short for "aggregate" */
|
|
gettext_noop("agg"),
|
|
gettext_noop("window"),
|
|
gettext_noop("proc"),
|
|
gettext_noop("func"),
|
|
gettext_noop("Type"));
|
|
else if (pset.sversion >= 80400)
|
|
appendPQExpBuffer(&buf,
|
|
" pg_catalog.pg_get_function_result(p.oid) as \"%s\",\n"
|
|
" pg_catalog.pg_get_function_arguments(p.oid) as \"%s\",\n"
|
|
" CASE\n"
|
|
" WHEN p.proisagg THEN '%s'\n"
|
|
" WHEN p.proiswindow THEN '%s'\n"
|
|
" WHEN p.prorettype = 'pg_catalog.trigger'::pg_catalog.regtype THEN '%s'\n"
|
|
" ELSE '%s'\n"
|
|
" END as \"%s\"",
|
|
gettext_noop("Result data type"),
|
|
gettext_noop("Argument data types"),
|
|
/* translator: "agg" is short for "aggregate" */
|
|
gettext_noop("agg"),
|
|
gettext_noop("window"),
|
|
gettext_noop("trigger"),
|
|
gettext_noop("func"),
|
|
gettext_noop("Type"));
|
|
else if (pset.sversion >= 80100)
|
|
appendPQExpBuffer(&buf,
|
|
" CASE WHEN p.proretset THEN 'SETOF ' ELSE '' END ||\n"
|
|
" pg_catalog.format_type(p.prorettype, NULL) as \"%s\",\n"
|
|
" CASE WHEN proallargtypes IS NOT NULL THEN\n"
|
|
" pg_catalog.array_to_string(ARRAY(\n"
|
|
" SELECT\n"
|
|
" CASE\n"
|
|
" WHEN p.proargmodes[s.i] = 'i' THEN ''\n"
|
|
" WHEN p.proargmodes[s.i] = 'o' THEN 'OUT '\n"
|
|
" WHEN p.proargmodes[s.i] = 'b' THEN 'INOUT '\n"
|
|
" WHEN p.proargmodes[s.i] = 'v' THEN 'VARIADIC '\n"
|
|
" END ||\n"
|
|
" CASE\n"
|
|
" WHEN COALESCE(p.proargnames[s.i], '') = '' THEN ''\n"
|
|
" ELSE p.proargnames[s.i] || ' '\n"
|
|
" END ||\n"
|
|
" pg_catalog.format_type(p.proallargtypes[s.i], NULL)\n"
|
|
" FROM\n"
|
|
" pg_catalog.generate_series(1, pg_catalog.array_upper(p.proallargtypes, 1)) AS s(i)\n"
|
|
" ), ', ')\n"
|
|
" ELSE\n"
|
|
" pg_catalog.array_to_string(ARRAY(\n"
|
|
" SELECT\n"
|
|
" CASE\n"
|
|
" WHEN COALESCE(p.proargnames[s.i+1], '') = '' THEN ''\n"
|
|
" ELSE p.proargnames[s.i+1] || ' '\n"
|
|
" END ||\n"
|
|
" pg_catalog.format_type(p.proargtypes[s.i], NULL)\n"
|
|
" FROM\n"
|
|
" pg_catalog.generate_series(0, pg_catalog.array_upper(p.proargtypes, 1)) AS s(i)\n"
|
|
" ), ', ')\n"
|
|
" END AS \"%s\",\n"
|
|
" CASE\n"
|
|
" WHEN p.proisagg THEN '%s'\n"
|
|
" WHEN p.prorettype = 'pg_catalog.trigger'::pg_catalog.regtype THEN '%s'\n"
|
|
" ELSE '%s'\n"
|
|
" END AS \"%s\"",
|
|
gettext_noop("Result data type"),
|
|
gettext_noop("Argument data types"),
|
|
/* translator: "agg" is short for "aggregate" */
|
|
gettext_noop("agg"),
|
|
gettext_noop("trigger"),
|
|
gettext_noop("func"),
|
|
gettext_noop("Type"));
|
|
else
|
|
appendPQExpBuffer(&buf,
|
|
" CASE WHEN p.proretset THEN 'SETOF ' ELSE '' END ||\n"
|
|
" pg_catalog.format_type(p.prorettype, NULL) as \"%s\",\n"
|
|
" pg_catalog.oidvectortypes(p.proargtypes) as \"%s\",\n"
|
|
" CASE\n"
|
|
" WHEN p.proisagg THEN '%s'\n"
|
|
" WHEN p.prorettype = 'pg_catalog.trigger'::pg_catalog.regtype THEN '%s'\n"
|
|
" ELSE '%s'\n"
|
|
" END AS \"%s\"",
|
|
gettext_noop("Result data type"),
|
|
gettext_noop("Argument data types"),
|
|
/* translator: "agg" is short for "aggregate" */
|
|
gettext_noop("agg"),
|
|
gettext_noop("trigger"),
|
|
gettext_noop("func"),
|
|
gettext_noop("Type"));
|
|
|
|
if (verbose)
|
|
{
|
|
appendPQExpBuffer(&buf,
|
|
",\n CASE\n"
|
|
" WHEN p.provolatile = 'i' THEN '%s'\n"
|
|
" WHEN p.provolatile = 's' THEN '%s'\n"
|
|
" WHEN p.provolatile = 'v' THEN '%s'\n"
|
|
" END as \"%s\"",
|
|
gettext_noop("immutable"),
|
|
gettext_noop("stable"),
|
|
gettext_noop("volatile"),
|
|
gettext_noop("Volatility"));
|
|
if (pset.sversion >= 90600)
|
|
appendPQExpBuffer(&buf,
|
|
",\n CASE\n"
|
|
" WHEN p.proparallel = 'r' THEN '%s'\n"
|
|
" WHEN p.proparallel = 's' THEN '%s'\n"
|
|
" WHEN p.proparallel = 'u' THEN '%s'\n"
|
|
" END as \"%s\"",
|
|
gettext_noop("restricted"),
|
|
gettext_noop("safe"),
|
|
gettext_noop("unsafe"),
|
|
gettext_noop("Parallel"));
|
|
appendPQExpBuffer(&buf,
|
|
",\n pg_catalog.pg_get_userbyid(p.proowner) as \"%s\""
|
|
",\n CASE WHEN prosecdef THEN '%s' ELSE '%s' END AS \"%s\"",
|
|
gettext_noop("Owner"),
|
|
gettext_noop("definer"),
|
|
gettext_noop("invoker"),
|
|
gettext_noop("Security"));
|
|
appendPQExpBufferStr(&buf, ",\n ");
|
|
printACLColumn(&buf, "p.proacl");
|
|
appendPQExpBuffer(&buf,
|
|
",\n l.lanname as \"%s\""
|
|
",\n p.prosrc as \"%s\""
|
|
",\n pg_catalog.obj_description(p.oid, 'pg_proc') as \"%s\"",
|
|
gettext_noop("Language"),
|
|
gettext_noop("Source code"),
|
|
gettext_noop("Description"));
|
|
}
|
|
|
|
appendPQExpBufferStr(&buf,
|
|
"\nFROM pg_catalog.pg_proc p"
|
|
"\n LEFT JOIN pg_catalog.pg_namespace n ON n.oid = p.pronamespace\n");
|
|
|
|
if (verbose)
|
|
appendPQExpBufferStr(&buf,
|
|
" LEFT JOIN pg_catalog.pg_language l ON l.oid = p.prolang\n");
|
|
|
|
have_where = false;
|
|
|
|
/* filter by function type, if requested */
|
|
if (showNormal && showAggregate && showProcedure && showTrigger && showWindow)
|
|
/* Do nothing */ ;
|
|
else if (showNormal)
|
|
{
|
|
if (!showAggregate)
|
|
{
|
|
if (have_where)
|
|
appendPQExpBufferStr(&buf, " AND ");
|
|
else
|
|
{
|
|
appendPQExpBufferStr(&buf, "WHERE ");
|
|
have_where = true;
|
|
}
|
|
if (pset.sversion >= 110000)
|
|
appendPQExpBufferStr(&buf, "p.prokind <> 'a'\n");
|
|
else
|
|
appendPQExpBufferStr(&buf, "NOT p.proisagg\n");
|
|
}
|
|
if (!showProcedure && pset.sversion >= 110000)
|
|
{
|
|
if (have_where)
|
|
appendPQExpBufferStr(&buf, " AND ");
|
|
else
|
|
{
|
|
appendPQExpBufferStr(&buf, "WHERE ");
|
|
have_where = true;
|
|
}
|
|
appendPQExpBufferStr(&buf, "p.prokind <> 'p'\n");
|
|
}
|
|
if (!showTrigger)
|
|
{
|
|
if (have_where)
|
|
appendPQExpBufferStr(&buf, " AND ");
|
|
else
|
|
{
|
|
appendPQExpBufferStr(&buf, "WHERE ");
|
|
have_where = true;
|
|
}
|
|
appendPQExpBufferStr(&buf, "p.prorettype <> 'pg_catalog.trigger'::pg_catalog.regtype\n");
|
|
}
|
|
if (!showWindow && pset.sversion >= 80400)
|
|
{
|
|
if (have_where)
|
|
appendPQExpBufferStr(&buf, " AND ");
|
|
else
|
|
{
|
|
appendPQExpBufferStr(&buf, "WHERE ");
|
|
have_where = true;
|
|
}
|
|
if (pset.sversion >= 110000)
|
|
appendPQExpBufferStr(&buf, "p.prokind <> 'w'\n");
|
|
else
|
|
appendPQExpBufferStr(&buf, "NOT p.proiswindow\n");
|
|
}
|
|
}
|
|
else
|
|
{
|
|
bool needs_or = false;
|
|
|
|
appendPQExpBufferStr(&buf, "WHERE (\n ");
|
|
have_where = true;
|
|
/* Note: at least one of these must be true ... */
|
|
if (showAggregate)
|
|
{
|
|
if (pset.sversion >= 110000)
|
|
appendPQExpBufferStr(&buf, "p.prokind = 'a'\n");
|
|
else
|
|
appendPQExpBufferStr(&buf, "p.proisagg\n");
|
|
needs_or = true;
|
|
}
|
|
if (showTrigger)
|
|
{
|
|
if (needs_or)
|
|
appendPQExpBufferStr(&buf, " OR ");
|
|
appendPQExpBufferStr(&buf,
|
|
"p.prorettype = 'pg_catalog.trigger'::pg_catalog.regtype\n");
|
|
needs_or = true;
|
|
}
|
|
if (showProcedure)
|
|
{
|
|
if (needs_or)
|
|
appendPQExpBufferStr(&buf, " OR ");
|
|
appendPQExpBufferStr(&buf, "p.prokind = 'p'\n");
|
|
needs_or = true;
|
|
}
|
|
if (showWindow)
|
|
{
|
|
if (needs_or)
|
|
appendPQExpBufferStr(&buf, " OR ");
|
|
if (pset.sversion >= 110000)
|
|
appendPQExpBufferStr(&buf, "p.prokind = 'w'\n");
|
|
else
|
|
appendPQExpBufferStr(&buf, "p.proiswindow\n");
|
|
needs_or = true;
|
|
}
|
|
appendPQExpBufferStr(&buf, " )\n");
|
|
}
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, have_where, false,
|
|
"n.nspname", "p.proname", NULL,
|
|
"pg_catalog.pg_function_is_visible(p.oid)");
|
|
|
|
if (!showSystem && !pattern)
|
|
appendPQExpBufferStr(&buf, " AND n.nspname <> 'pg_catalog'\n"
|
|
" AND n.nspname <> 'information_schema'\n");
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1, 2, 4;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of functions");
|
|
myopt.translate_header = true;
|
|
if (pset.sversion >= 90600)
|
|
{
|
|
myopt.translate_columns = translate_columns;
|
|
myopt.n_translate_columns = lengthof(translate_columns);
|
|
}
|
|
else
|
|
{
|
|
myopt.translate_columns = translate_columns_pre_96;
|
|
myopt.n_translate_columns = lengthof(translate_columns_pre_96);
|
|
}
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
|
|
|
|
/*
|
|
* \dT
|
|
* describe types
|
|
*/
|
|
bool
|
|
describeTypes(const char *pattern, bool verbose, bool showSystem)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT n.nspname as \"%s\",\n"
|
|
" pg_catalog.format_type(t.oid, NULL) AS \"%s\",\n",
|
|
gettext_noop("Schema"),
|
|
gettext_noop("Name"));
|
|
if (verbose)
|
|
appendPQExpBuffer(&buf,
|
|
" t.typname AS \"%s\",\n"
|
|
" CASE WHEN t.typrelid != 0\n"
|
|
" THEN CAST('tuple' AS pg_catalog.text)\n"
|
|
" WHEN t.typlen < 0\n"
|
|
" THEN CAST('var' AS pg_catalog.text)\n"
|
|
" ELSE CAST(t.typlen AS pg_catalog.text)\n"
|
|
" END AS \"%s\",\n",
|
|
gettext_noop("Internal name"),
|
|
gettext_noop("Size"));
|
|
if (verbose && pset.sversion >= 80300)
|
|
{
|
|
appendPQExpBufferStr(&buf,
|
|
" pg_catalog.array_to_string(\n"
|
|
" ARRAY(\n"
|
|
" SELECT e.enumlabel\n"
|
|
" FROM pg_catalog.pg_enum e\n"
|
|
" WHERE e.enumtypid = t.oid\n");
|
|
|
|
if (pset.sversion >= 90100)
|
|
appendPQExpBufferStr(&buf,
|
|
" ORDER BY e.enumsortorder\n");
|
|
else
|
|
appendPQExpBufferStr(&buf,
|
|
" ORDER BY e.oid\n");
|
|
|
|
appendPQExpBuffer(&buf,
|
|
" ),\n"
|
|
" E'\\n'\n"
|
|
" ) AS \"%s\",\n",
|
|
gettext_noop("Elements"));
|
|
}
|
|
if (verbose)
|
|
{
|
|
appendPQExpBuffer(&buf,
|
|
" pg_catalog.pg_get_userbyid(t.typowner) AS \"%s\",\n",
|
|
gettext_noop("Owner"));
|
|
}
|
|
if (verbose && pset.sversion >= 90200)
|
|
{
|
|
printACLColumn(&buf, "t.typacl");
|
|
appendPQExpBufferStr(&buf, ",\n ");
|
|
}
|
|
|
|
appendPQExpBuffer(&buf,
|
|
" pg_catalog.obj_description(t.oid, 'pg_type') as \"%s\"\n",
|
|
gettext_noop("Description"));
|
|
|
|
appendPQExpBufferStr(&buf, "FROM pg_catalog.pg_type t\n"
|
|
" LEFT JOIN pg_catalog.pg_namespace n ON n.oid = t.typnamespace\n");
|
|
|
|
/*
|
|
* do not include complex types (typrelid!=0) unless they are standalone
|
|
* composite types
|
|
*/
|
|
appendPQExpBufferStr(&buf, "WHERE (t.typrelid = 0 ");
|
|
appendPQExpBufferStr(&buf, "OR (SELECT c.relkind = " CppAsString2(RELKIND_COMPOSITE_TYPE)
|
|
" FROM pg_catalog.pg_class c "
|
|
"WHERE c.oid = t.typrelid))\n");
|
|
|
|
/*
|
|
* do not include array types (before 8.3 we have to use the assumption
|
|
* that their names start with underscore)
|
|
*/
|
|
if (pset.sversion >= 80300)
|
|
appendPQExpBufferStr(&buf, " AND NOT EXISTS(SELECT 1 FROM pg_catalog.pg_type el WHERE el.oid = t.typelem AND el.typarray = t.oid)\n");
|
|
else
|
|
appendPQExpBufferStr(&buf, " AND t.typname !~ '^_'\n");
|
|
|
|
if (!showSystem && !pattern)
|
|
appendPQExpBufferStr(&buf, " AND n.nspname <> 'pg_catalog'\n"
|
|
" AND n.nspname <> 'information_schema'\n");
|
|
|
|
/* Match name pattern against either internal or external name */
|
|
processSQLNamePattern(pset.db, &buf, pattern, true, false,
|
|
"n.nspname", "t.typname",
|
|
"pg_catalog.format_type(t.oid, NULL)",
|
|
"pg_catalog.pg_type_is_visible(t.oid)");
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1, 2;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of data types");
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
|
|
/*
|
|
* \do
|
|
* Describe operators
|
|
*/
|
|
bool
|
|
describeOperators(const char *pattern, bool verbose, bool showSystem)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
/*
|
|
* Note: before Postgres 9.1, we did not assign comments to any built-in
|
|
* operators, preferring to let the comment on the underlying function
|
|
* suffice. The coalesce() on the obj_description() calls below supports
|
|
* this convention by providing a fallback lookup of a comment on the
|
|
* operator's function. As of 9.1 there is a policy that every built-in
|
|
* operator should have a comment; so the coalesce() is no longer
|
|
* necessary so far as built-in operators are concerned. We keep it
|
|
* anyway, for now, because (1) third-party modules may still be following
|
|
* the old convention, and (2) we'd need to do it anyway when talking to a
|
|
* pre-9.1 server.
|
|
*/
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT n.nspname as \"%s\",\n"
|
|
" o.oprname AS \"%s\",\n"
|
|
" CASE WHEN o.oprkind='l' THEN NULL ELSE pg_catalog.format_type(o.oprleft, NULL) END AS \"%s\",\n"
|
|
" CASE WHEN o.oprkind='r' THEN NULL ELSE pg_catalog.format_type(o.oprright, NULL) END AS \"%s\",\n"
|
|
" pg_catalog.format_type(o.oprresult, NULL) AS \"%s\",\n",
|
|
gettext_noop("Schema"),
|
|
gettext_noop("Name"),
|
|
gettext_noop("Left arg type"),
|
|
gettext_noop("Right arg type"),
|
|
gettext_noop("Result type"));
|
|
|
|
if (verbose)
|
|
appendPQExpBuffer(&buf,
|
|
" o.oprcode AS \"%s\",\n",
|
|
gettext_noop("Function"));
|
|
|
|
appendPQExpBuffer(&buf,
|
|
" coalesce(pg_catalog.obj_description(o.oid, 'pg_operator'),\n"
|
|
" pg_catalog.obj_description(o.oprcode, 'pg_proc')) AS \"%s\"\n"
|
|
"FROM pg_catalog.pg_operator o\n"
|
|
" LEFT JOIN pg_catalog.pg_namespace n ON n.oid = o.oprnamespace\n",
|
|
gettext_noop("Description"));
|
|
|
|
if (!showSystem && !pattern)
|
|
appendPQExpBufferStr(&buf, "WHERE n.nspname <> 'pg_catalog'\n"
|
|
" AND n.nspname <> 'information_schema'\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, !showSystem && !pattern, true,
|
|
"n.nspname", "o.oprname", NULL,
|
|
"pg_catalog.pg_operator_is_visible(o.oid)");
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1, 2, 3, 4;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of operators");
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
|
|
/*
|
|
* listAllDbs
|
|
*
|
|
* for \l, \list, and -l switch
|
|
*/
|
|
bool
|
|
listAllDbs(const char *pattern, bool verbose)
|
|
{
|
|
PGresult *res;
|
|
PQExpBufferData buf;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT d.datname as \"%s\",\n"
|
|
" pg_catalog.pg_get_userbyid(d.datdba) as \"%s\",\n"
|
|
" pg_catalog.pg_encoding_to_char(d.encoding) as \"%s\",\n",
|
|
gettext_noop("Name"),
|
|
gettext_noop("Owner"),
|
|
gettext_noop("Encoding"));
|
|
if (pset.sversion >= 80400)
|
|
appendPQExpBuffer(&buf,
|
|
" d.datcollate as \"%s\",\n"
|
|
" d.datctype as \"%s\",\n",
|
|
gettext_noop("Collate"),
|
|
gettext_noop("Ctype"));
|
|
appendPQExpBufferStr(&buf, " ");
|
|
printACLColumn(&buf, "d.datacl");
|
|
if (verbose && pset.sversion >= 80200)
|
|
appendPQExpBuffer(&buf,
|
|
",\n CASE WHEN pg_catalog.has_database_privilege(d.datname, 'CONNECT')\n"
|
|
" THEN pg_catalog.pg_size_pretty(pg_catalog.pg_database_size(d.datname))\n"
|
|
" ELSE 'No Access'\n"
|
|
" END as \"%s\"",
|
|
gettext_noop("Size"));
|
|
if (verbose && pset.sversion >= 80000)
|
|
appendPQExpBuffer(&buf,
|
|
",\n t.spcname as \"%s\"",
|
|
gettext_noop("Tablespace"));
|
|
if (verbose && pset.sversion >= 80200)
|
|
appendPQExpBuffer(&buf,
|
|
",\n pg_catalog.shobj_description(d.oid, 'pg_database') as \"%s\"",
|
|
gettext_noop("Description"));
|
|
appendPQExpBufferStr(&buf,
|
|
"\nFROM pg_catalog.pg_database d\n");
|
|
if (verbose && pset.sversion >= 80000)
|
|
appendPQExpBufferStr(&buf,
|
|
" JOIN pg_catalog.pg_tablespace t on d.dattablespace = t.oid\n");
|
|
|
|
if (pattern)
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
NULL, "d.datname", NULL, NULL);
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1;");
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of databases");
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
|
|
/*
|
|
* List Tables' Grant/Revoke Permissions
|
|
* \z (now also \dp -- perhaps more mnemonic)
|
|
*/
|
|
bool
|
|
permissionsList(const char *pattern)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
static const bool translate_columns[] = {false, false, true, false, false, false};
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
/*
|
|
* we ignore indexes and toast tables since they have no meaningful rights
|
|
*/
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT n.nspname as \"%s\",\n"
|
|
" c.relname as \"%s\",\n"
|
|
" CASE c.relkind"
|
|
" WHEN " CppAsString2(RELKIND_RELATION) " THEN '%s'"
|
|
" WHEN " CppAsString2(RELKIND_VIEW) " THEN '%s'"
|
|
" WHEN " CppAsString2(RELKIND_MATVIEW) " THEN '%s'"
|
|
" WHEN " CppAsString2(RELKIND_SEQUENCE) " THEN '%s'"
|
|
" WHEN " CppAsString2(RELKIND_FOREIGN_TABLE) " THEN '%s'"
|
|
" WHEN " CppAsString2(RELKIND_PARTITIONED_TABLE) " THEN '%s'"
|
|
" END as \"%s\",\n"
|
|
" ",
|
|
gettext_noop("Schema"),
|
|
gettext_noop("Name"),
|
|
gettext_noop("table"),
|
|
gettext_noop("view"),
|
|
gettext_noop("materialized view"),
|
|
gettext_noop("sequence"),
|
|
gettext_noop("foreign table"),
|
|
gettext_noop("table"), /* partitioned table */
|
|
gettext_noop("Type"));
|
|
|
|
printACLColumn(&buf, "c.relacl");
|
|
|
|
if (pset.sversion >= 80400)
|
|
appendPQExpBuffer(&buf,
|
|
",\n pg_catalog.array_to_string(ARRAY(\n"
|
|
" SELECT attname || E':\\n ' || pg_catalog.array_to_string(attacl, E'\\n ')\n"
|
|
" FROM pg_catalog.pg_attribute a\n"
|
|
" WHERE attrelid = c.oid AND NOT attisdropped AND attacl IS NOT NULL\n"
|
|
" ), E'\\n') AS \"%s\"",
|
|
gettext_noop("Column privileges"));
|
|
|
|
if (pset.sversion >= 90500 && pset.sversion < 100000)
|
|
appendPQExpBuffer(&buf,
|
|
",\n pg_catalog.array_to_string(ARRAY(\n"
|
|
" SELECT polname\n"
|
|
" || CASE WHEN polcmd != '*' THEN\n"
|
|
" E' (' || polcmd || E'):'\n"
|
|
" ELSE E':'\n"
|
|
" END\n"
|
|
" || CASE WHEN polqual IS NOT NULL THEN\n"
|
|
" E'\\n (u): ' || pg_catalog.pg_get_expr(polqual, polrelid)\n"
|
|
" ELSE E''\n"
|
|
" END\n"
|
|
" || CASE WHEN polwithcheck IS NOT NULL THEN\n"
|
|
" E'\\n (c): ' || pg_catalog.pg_get_expr(polwithcheck, polrelid)\n"
|
|
" ELSE E''\n"
|
|
" END"
|
|
" || CASE WHEN polroles <> '{0}' THEN\n"
|
|
" E'\\n to: ' || pg_catalog.array_to_string(\n"
|
|
" ARRAY(\n"
|
|
" SELECT rolname\n"
|
|
" FROM pg_catalog.pg_roles\n"
|
|
" WHERE oid = ANY (polroles)\n"
|
|
" ORDER BY 1\n"
|
|
" ), E', ')\n"
|
|
" ELSE E''\n"
|
|
" END\n"
|
|
" FROM pg_catalog.pg_policy pol\n"
|
|
" WHERE polrelid = c.oid), E'\\n')\n"
|
|
" AS \"%s\"",
|
|
gettext_noop("Policies"));
|
|
|
|
if (pset.sversion >= 100000)
|
|
appendPQExpBuffer(&buf,
|
|
",\n pg_catalog.array_to_string(ARRAY(\n"
|
|
" SELECT polname\n"
|
|
" || CASE WHEN NOT polpermissive THEN\n"
|
|
" E' (RESTRICTIVE)'\n"
|
|
" ELSE '' END\n"
|
|
" || CASE WHEN polcmd != '*' THEN\n"
|
|
" E' (' || polcmd || E'):'\n"
|
|
" ELSE E':'\n"
|
|
" END\n"
|
|
" || CASE WHEN polqual IS NOT NULL THEN\n"
|
|
" E'\\n (u): ' || pg_catalog.pg_get_expr(polqual, polrelid)\n"
|
|
" ELSE E''\n"
|
|
" END\n"
|
|
" || CASE WHEN polwithcheck IS NOT NULL THEN\n"
|
|
" E'\\n (c): ' || pg_catalog.pg_get_expr(polwithcheck, polrelid)\n"
|
|
" ELSE E''\n"
|
|
" END"
|
|
" || CASE WHEN polroles <> '{0}' THEN\n"
|
|
" E'\\n to: ' || pg_catalog.array_to_string(\n"
|
|
" ARRAY(\n"
|
|
" SELECT rolname\n"
|
|
" FROM pg_catalog.pg_roles\n"
|
|
" WHERE oid = ANY (polroles)\n"
|
|
" ORDER BY 1\n"
|
|
" ), E', ')\n"
|
|
" ELSE E''\n"
|
|
" END\n"
|
|
" FROM pg_catalog.pg_policy pol\n"
|
|
" WHERE polrelid = c.oid), E'\\n')\n"
|
|
" AS \"%s\"",
|
|
gettext_noop("Policies"));
|
|
|
|
appendPQExpBufferStr(&buf, "\nFROM pg_catalog.pg_class c\n"
|
|
" LEFT JOIN pg_catalog.pg_namespace n ON n.oid = c.relnamespace\n"
|
|
"WHERE c.relkind IN ("
|
|
CppAsString2(RELKIND_RELATION) ","
|
|
CppAsString2(RELKIND_VIEW) ","
|
|
CppAsString2(RELKIND_MATVIEW) ","
|
|
CppAsString2(RELKIND_SEQUENCE) ","
|
|
CppAsString2(RELKIND_FOREIGN_TABLE) ","
|
|
CppAsString2(RELKIND_PARTITIONED_TABLE) ")\n");
|
|
|
|
/*
|
|
* Unless a schema pattern is specified, we suppress system and temp
|
|
* tables, since they normally aren't very interesting from a permissions
|
|
* point of view. You can see 'em by explicit request though, eg with \z
|
|
* pg_catalog.*
|
|
*/
|
|
processSQLNamePattern(pset.db, &buf, pattern, true, false,
|
|
"n.nspname", "c.relname", NULL,
|
|
"n.nspname !~ '^pg_' AND pg_catalog.pg_table_is_visible(c.oid)");
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1, 2;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
if (!res)
|
|
{
|
|
termPQExpBuffer(&buf);
|
|
return false;
|
|
}
|
|
|
|
myopt.nullPrint = NULL;
|
|
printfPQExpBuffer(&buf, _("Access privileges"));
|
|
myopt.title = buf.data;
|
|
myopt.translate_header = true;
|
|
myopt.translate_columns = translate_columns;
|
|
myopt.n_translate_columns = lengthof(translate_columns);
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
termPQExpBuffer(&buf);
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
|
|
/*
|
|
* \ddp
|
|
*
|
|
* List Default ACLs. The pattern can match either schema or role name.
|
|
*/
|
|
bool
|
|
listDefaultACLs(const char *pattern)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
static const bool translate_columns[] = {false, false, true, false};
|
|
|
|
if (pset.sversion < 90000)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("The server (version %s) does not support altering default privileges.\n",
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT pg_catalog.pg_get_userbyid(d.defaclrole) AS \"%s\",\n"
|
|
" n.nspname AS \"%s\",\n"
|
|
" CASE d.defaclobjtype WHEN '%c' THEN '%s' WHEN '%c' THEN '%s' WHEN '%c' THEN '%s' WHEN '%c' THEN '%s' WHEN '%c' THEN '%s' END AS \"%s\",\n"
|
|
" ",
|
|
gettext_noop("Owner"),
|
|
gettext_noop("Schema"),
|
|
DEFACLOBJ_RELATION,
|
|
gettext_noop("table"),
|
|
DEFACLOBJ_SEQUENCE,
|
|
gettext_noop("sequence"),
|
|
DEFACLOBJ_FUNCTION,
|
|
gettext_noop("function"),
|
|
DEFACLOBJ_TYPE,
|
|
gettext_noop("type"),
|
|
DEFACLOBJ_NAMESPACE,
|
|
gettext_noop("schema"),
|
|
gettext_noop("Type"));
|
|
|
|
printACLColumn(&buf, "d.defaclacl");
|
|
|
|
appendPQExpBufferStr(&buf, "\nFROM pg_catalog.pg_default_acl d\n"
|
|
" LEFT JOIN pg_catalog.pg_namespace n ON n.oid = d.defaclnamespace\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
NULL,
|
|
"n.nspname",
|
|
"pg_catalog.pg_get_userbyid(d.defaclrole)",
|
|
NULL);
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1, 2, 3;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
if (!res)
|
|
{
|
|
termPQExpBuffer(&buf);
|
|
return false;
|
|
}
|
|
|
|
myopt.nullPrint = NULL;
|
|
printfPQExpBuffer(&buf, _("Default access privileges"));
|
|
myopt.title = buf.data;
|
|
myopt.translate_header = true;
|
|
myopt.translate_columns = translate_columns;
|
|
myopt.n_translate_columns = lengthof(translate_columns);
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
termPQExpBuffer(&buf);
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
|
|
/*
|
|
* Get object comments
|
|
*
|
|
* \dd [foo]
|
|
*
|
|
* Note: This command only lists comments for object types which do not have
|
|
* their comments displayed by their own backslash commands. The following
|
|
* types of objects will be displayed: constraint, operator class,
|
|
* operator family, rule, and trigger.
|
|
*
|
|
*/
|
|
bool
|
|
objectDescription(const char *pattern, bool showSystem)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
static const bool translate_columns[] = {false, false, true, false};
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
appendPQExpBuffer(&buf,
|
|
"SELECT DISTINCT tt.nspname AS \"%s\", tt.name AS \"%s\", tt.object AS \"%s\", d.description AS \"%s\"\n"
|
|
"FROM (\n",
|
|
gettext_noop("Schema"),
|
|
gettext_noop("Name"),
|
|
gettext_noop("Object"),
|
|
gettext_noop("Description"));
|
|
|
|
/* Table constraint descriptions */
|
|
appendPQExpBuffer(&buf,
|
|
" SELECT pgc.oid as oid, pgc.tableoid AS tableoid,\n"
|
|
" n.nspname as nspname,\n"
|
|
" CAST(pgc.conname AS pg_catalog.text) as name,"
|
|
" CAST('%s' AS pg_catalog.text) as object\n"
|
|
" FROM pg_catalog.pg_constraint pgc\n"
|
|
" JOIN pg_catalog.pg_class c "
|
|
"ON c.oid = pgc.conrelid\n"
|
|
" LEFT JOIN pg_catalog.pg_namespace n "
|
|
" ON n.oid = c.relnamespace\n",
|
|
gettext_noop("table constraint"));
|
|
|
|
if (!showSystem && !pattern)
|
|
appendPQExpBufferStr(&buf, "WHERE n.nspname <> 'pg_catalog'\n"
|
|
" AND n.nspname <> 'information_schema'\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, !showSystem && !pattern,
|
|
false, "n.nspname", "pgc.conname", NULL,
|
|
"pg_catalog.pg_table_is_visible(c.oid)");
|
|
|
|
/* Domain constraint descriptions */
|
|
appendPQExpBuffer(&buf,
|
|
"UNION ALL\n"
|
|
" SELECT pgc.oid as oid, pgc.tableoid AS tableoid,\n"
|
|
" n.nspname as nspname,\n"
|
|
" CAST(pgc.conname AS pg_catalog.text) as name,"
|
|
" CAST('%s' AS pg_catalog.text) as object\n"
|
|
" FROM pg_catalog.pg_constraint pgc\n"
|
|
" JOIN pg_catalog.pg_type t "
|
|
"ON t.oid = pgc.contypid\n"
|
|
" LEFT JOIN pg_catalog.pg_namespace n "
|
|
" ON n.oid = t.typnamespace\n",
|
|
gettext_noop("domain constraint"));
|
|
|
|
if (!showSystem && !pattern)
|
|
appendPQExpBufferStr(&buf, "WHERE n.nspname <> 'pg_catalog'\n"
|
|
" AND n.nspname <> 'information_schema'\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, !showSystem && !pattern,
|
|
false, "n.nspname", "pgc.conname", NULL,
|
|
"pg_catalog.pg_type_is_visible(t.oid)");
|
|
|
|
|
|
/*
|
|
* pg_opclass.opcmethod only available in 8.3+
|
|
*/
|
|
if (pset.sversion >= 80300)
|
|
{
|
|
/* Operator class descriptions */
|
|
appendPQExpBuffer(&buf,
|
|
"UNION ALL\n"
|
|
" SELECT o.oid as oid, o.tableoid as tableoid,\n"
|
|
" n.nspname as nspname,\n"
|
|
" CAST(o.opcname AS pg_catalog.text) as name,\n"
|
|
" CAST('%s' AS pg_catalog.text) as object\n"
|
|
" FROM pg_catalog.pg_opclass o\n"
|
|
" JOIN pg_catalog.pg_am am ON "
|
|
"o.opcmethod = am.oid\n"
|
|
" JOIN pg_catalog.pg_namespace n ON "
|
|
"n.oid = o.opcnamespace\n",
|
|
gettext_noop("operator class"));
|
|
|
|
if (!showSystem && !pattern)
|
|
appendPQExpBufferStr(&buf, " AND n.nspname <> 'pg_catalog'\n"
|
|
" AND n.nspname <> 'information_schema'\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, true, false,
|
|
"n.nspname", "o.opcname", NULL,
|
|
"pg_catalog.pg_opclass_is_visible(o.oid)");
|
|
}
|
|
|
|
/*
|
|
* although operator family comments have been around since 8.3,
|
|
* pg_opfamily_is_visible is only available in 9.2+
|
|
*/
|
|
if (pset.sversion >= 90200)
|
|
{
|
|
/* Operator family descriptions */
|
|
appendPQExpBuffer(&buf,
|
|
"UNION ALL\n"
|
|
" SELECT opf.oid as oid, opf.tableoid as tableoid,\n"
|
|
" n.nspname as nspname,\n"
|
|
" CAST(opf.opfname AS pg_catalog.text) AS name,\n"
|
|
" CAST('%s' AS pg_catalog.text) as object\n"
|
|
" FROM pg_catalog.pg_opfamily opf\n"
|
|
" JOIN pg_catalog.pg_am am "
|
|
"ON opf.opfmethod = am.oid\n"
|
|
" JOIN pg_catalog.pg_namespace n "
|
|
"ON opf.opfnamespace = n.oid\n",
|
|
gettext_noop("operator family"));
|
|
|
|
if (!showSystem && !pattern)
|
|
appendPQExpBufferStr(&buf, " AND n.nspname <> 'pg_catalog'\n"
|
|
" AND n.nspname <> 'information_schema'\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, true, false,
|
|
"n.nspname", "opf.opfname", NULL,
|
|
"pg_catalog.pg_opfamily_is_visible(opf.oid)");
|
|
}
|
|
|
|
/* Rule descriptions (ignore rules for views) */
|
|
appendPQExpBuffer(&buf,
|
|
"UNION ALL\n"
|
|
" SELECT r.oid as oid, r.tableoid as tableoid,\n"
|
|
" n.nspname as nspname,\n"
|
|
" CAST(r.rulename AS pg_catalog.text) as name,"
|
|
" CAST('%s' AS pg_catalog.text) as object\n"
|
|
" FROM pg_catalog.pg_rewrite r\n"
|
|
" JOIN pg_catalog.pg_class c ON c.oid = r.ev_class\n"
|
|
" LEFT JOIN pg_catalog.pg_namespace n ON n.oid = c.relnamespace\n"
|
|
" WHERE r.rulename != '_RETURN'\n",
|
|
gettext_noop("rule"));
|
|
|
|
if (!showSystem && !pattern)
|
|
appendPQExpBufferStr(&buf, " AND n.nspname <> 'pg_catalog'\n"
|
|
" AND n.nspname <> 'information_schema'\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, true, false,
|
|
"n.nspname", "r.rulename", NULL,
|
|
"pg_catalog.pg_table_is_visible(c.oid)");
|
|
|
|
/* Trigger descriptions */
|
|
appendPQExpBuffer(&buf,
|
|
"UNION ALL\n"
|
|
" SELECT t.oid as oid, t.tableoid as tableoid,\n"
|
|
" n.nspname as nspname,\n"
|
|
" CAST(t.tgname AS pg_catalog.text) as name,"
|
|
" CAST('%s' AS pg_catalog.text) as object\n"
|
|
" FROM pg_catalog.pg_trigger t\n"
|
|
" JOIN pg_catalog.pg_class c ON c.oid = t.tgrelid\n"
|
|
" LEFT JOIN pg_catalog.pg_namespace n ON n.oid = c.relnamespace\n",
|
|
gettext_noop("trigger"));
|
|
|
|
if (!showSystem && !pattern)
|
|
appendPQExpBufferStr(&buf, "WHERE n.nspname <> 'pg_catalog'\n"
|
|
" AND n.nspname <> 'information_schema'\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, !showSystem && !pattern, false,
|
|
"n.nspname", "t.tgname", NULL,
|
|
"pg_catalog.pg_table_is_visible(c.oid)");
|
|
|
|
appendPQExpBufferStr(&buf,
|
|
") AS tt\n"
|
|
" JOIN pg_catalog.pg_description d ON (tt.oid = d.objoid AND tt.tableoid = d.classoid AND d.objsubid = 0)\n");
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1, 2, 3;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("Object descriptions");
|
|
myopt.translate_header = true;
|
|
myopt.translate_columns = translate_columns;
|
|
myopt.n_translate_columns = lengthof(translate_columns);
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
|
|
/*
|
|
* describeTableDetails (for \d)
|
|
*
|
|
* This routine finds the tables to be displayed, and calls
|
|
* describeOneTableDetails for each one.
|
|
*
|
|
* verbose: if true, this is \d+
|
|
*/
|
|
bool
|
|
describeTableDetails(const char *pattern, bool verbose, bool showSystem)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
int i;
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT c.oid,\n"
|
|
" n.nspname,\n"
|
|
" c.relname\n"
|
|
"FROM pg_catalog.pg_class c\n"
|
|
" LEFT JOIN pg_catalog.pg_namespace n ON n.oid = c.relnamespace\n");
|
|
|
|
if (!showSystem && !pattern)
|
|
appendPQExpBufferStr(&buf, "WHERE n.nspname <> 'pg_catalog'\n"
|
|
" AND n.nspname <> 'information_schema'\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, !showSystem && !pattern, false,
|
|
"n.nspname", "c.relname", NULL,
|
|
"pg_catalog.pg_table_is_visible(c.oid)");
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 2, 3;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
if (PQntuples(res) == 0)
|
|
{
|
|
if (!pset.quiet)
|
|
{
|
|
if (pattern)
|
|
psql_error("Did not find any relation named \"%s\".\n",
|
|
pattern);
|
|
else
|
|
psql_error("Did not find any relations.\n");
|
|
}
|
|
PQclear(res);
|
|
return false;
|
|
}
|
|
|
|
for (i = 0; i < PQntuples(res); i++)
|
|
{
|
|
const char *oid;
|
|
const char *nspname;
|
|
const char *relname;
|
|
|
|
oid = PQgetvalue(res, i, 0);
|
|
nspname = PQgetvalue(res, i, 1);
|
|
relname = PQgetvalue(res, i, 2);
|
|
|
|
if (!describeOneTableDetails(nspname, relname, oid, verbose))
|
|
{
|
|
PQclear(res);
|
|
return false;
|
|
}
|
|
if (cancel_pressed)
|
|
{
|
|
PQclear(res);
|
|
return false;
|
|
}
|
|
}
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* describeOneTableDetails (for \d)
|
|
*
|
|
* Unfortunately, the information presented here is so complicated that it
|
|
* cannot be done in a single query. So we have to assemble the printed table
|
|
* by hand and pass it to the underlying printTable() function.
|
|
*/
|
|
static bool
|
|
describeOneTableDetails(const char *schemaname,
|
|
const char *relationname,
|
|
const char *oid,
|
|
bool verbose)
|
|
{
|
|
bool retval = false;
|
|
PQExpBufferData buf;
|
|
PGresult *res = NULL;
|
|
printTableOpt myopt = pset.popt.topt;
|
|
printTableContent cont;
|
|
bool printTableInitialized = false;
|
|
int i;
|
|
char *view_def = NULL;
|
|
char *headers[11];
|
|
PQExpBufferData title;
|
|
PQExpBufferData tmpbuf;
|
|
int cols;
|
|
int attname_col = -1, /* column indexes in "res" */
|
|
atttype_col = -1,
|
|
attrdef_col = -1,
|
|
attnotnull_col = -1,
|
|
attcoll_col = -1,
|
|
attidentity_col = -1,
|
|
isindexkey_col = -1,
|
|
indexdef_col = -1,
|
|
fdwopts_col = -1,
|
|
attstorage_col = -1,
|
|
attstattarget_col = -1,
|
|
attdescr_col = -1;
|
|
int numrows;
|
|
struct
|
|
{
|
|
int16 checks;
|
|
char relkind;
|
|
bool hasindex;
|
|
bool hasrules;
|
|
bool hastriggers;
|
|
bool rowsecurity;
|
|
bool forcerowsecurity;
|
|
bool hasoids;
|
|
Oid tablespace;
|
|
char *reloptions;
|
|
char *reloftype;
|
|
char relpersistence;
|
|
char relreplident;
|
|
} tableinfo;
|
|
bool show_column_details = false;
|
|
|
|
myopt.default_footer = false;
|
|
/* This output looks confusing in expanded mode. */
|
|
myopt.expanded = false;
|
|
|
|
initPQExpBuffer(&buf);
|
|
initPQExpBuffer(&title);
|
|
initPQExpBuffer(&tmpbuf);
|
|
|
|
/* Get general table info */
|
|
if (pset.sversion >= 90500)
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT c.relchecks, c.relkind, c.relhasindex, c.relhasrules, "
|
|
"c.relhastriggers, c.relrowsecurity, c.relforcerowsecurity, "
|
|
"c.relhasoids, %s, c.reltablespace, "
|
|
"CASE WHEN c.reloftype = 0 THEN '' ELSE c.reloftype::pg_catalog.regtype::pg_catalog.text END, "
|
|
"c.relpersistence, c.relreplident\n"
|
|
"FROM pg_catalog.pg_class c\n "
|
|
"LEFT JOIN pg_catalog.pg_class tc ON (c.reltoastrelid = tc.oid)\n"
|
|
"WHERE c.oid = '%s';",
|
|
(verbose ?
|
|
"pg_catalog.array_to_string(c.reloptions || "
|
|
"array(select 'toast.' || x from pg_catalog.unnest(tc.reloptions) x), ', ')\n"
|
|
: "''"),
|
|
oid);
|
|
}
|
|
else if (pset.sversion >= 90400)
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT c.relchecks, c.relkind, c.relhasindex, c.relhasrules, "
|
|
"c.relhastriggers, false, false, c.relhasoids, "
|
|
"%s, c.reltablespace, "
|
|
"CASE WHEN c.reloftype = 0 THEN '' ELSE c.reloftype::pg_catalog.regtype::pg_catalog.text END, "
|
|
"c.relpersistence, c.relreplident\n"
|
|
"FROM pg_catalog.pg_class c\n "
|
|
"LEFT JOIN pg_catalog.pg_class tc ON (c.reltoastrelid = tc.oid)\n"
|
|
"WHERE c.oid = '%s';",
|
|
(verbose ?
|
|
"pg_catalog.array_to_string(c.reloptions || "
|
|
"array(select 'toast.' || x from pg_catalog.unnest(tc.reloptions) x), ', ')\n"
|
|
: "''"),
|
|
oid);
|
|
}
|
|
else if (pset.sversion >= 90100)
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT c.relchecks, c.relkind, c.relhasindex, c.relhasrules, "
|
|
"c.relhastriggers, false, false, c.relhasoids, "
|
|
"%s, c.reltablespace, "
|
|
"CASE WHEN c.reloftype = 0 THEN '' ELSE c.reloftype::pg_catalog.regtype::pg_catalog.text END, "
|
|
"c.relpersistence\n"
|
|
"FROM pg_catalog.pg_class c\n "
|
|
"LEFT JOIN pg_catalog.pg_class tc ON (c.reltoastrelid = tc.oid)\n"
|
|
"WHERE c.oid = '%s';",
|
|
(verbose ?
|
|
"pg_catalog.array_to_string(c.reloptions || "
|
|
"array(select 'toast.' || x from pg_catalog.unnest(tc.reloptions) x), ', ')\n"
|
|
: "''"),
|
|
oid);
|
|
}
|
|
else if (pset.sversion >= 90000)
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT c.relchecks, c.relkind, c.relhasindex, c.relhasrules, "
|
|
"c.relhastriggers, false, false, c.relhasoids, "
|
|
"%s, c.reltablespace, "
|
|
"CASE WHEN c.reloftype = 0 THEN '' ELSE c.reloftype::pg_catalog.regtype::pg_catalog.text END\n"
|
|
"FROM pg_catalog.pg_class c\n "
|
|
"LEFT JOIN pg_catalog.pg_class tc ON (c.reltoastrelid = tc.oid)\n"
|
|
"WHERE c.oid = '%s';",
|
|
(verbose ?
|
|
"pg_catalog.array_to_string(c.reloptions || "
|
|
"array(select 'toast.' || x from pg_catalog.unnest(tc.reloptions) x), ', ')\n"
|
|
: "''"),
|
|
oid);
|
|
}
|
|
else if (pset.sversion >= 80400)
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT c.relchecks, c.relkind, c.relhasindex, c.relhasrules, "
|
|
"c.relhastriggers, false, false, c.relhasoids, "
|
|
"%s, c.reltablespace\n"
|
|
"FROM pg_catalog.pg_class c\n "
|
|
"LEFT JOIN pg_catalog.pg_class tc ON (c.reltoastrelid = tc.oid)\n"
|
|
"WHERE c.oid = '%s';",
|
|
(verbose ?
|
|
"pg_catalog.array_to_string(c.reloptions || "
|
|
"array(select 'toast.' || x from pg_catalog.unnest(tc.reloptions) x), ', ')\n"
|
|
: "''"),
|
|
oid);
|
|
}
|
|
else if (pset.sversion >= 80200)
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT relchecks, relkind, relhasindex, relhasrules, "
|
|
"reltriggers <> 0, false, false, relhasoids, "
|
|
"%s, reltablespace\n"
|
|
"FROM pg_catalog.pg_class WHERE oid = '%s';",
|
|
(verbose ?
|
|
"pg_catalog.array_to_string(reloptions, E', ')" : "''"),
|
|
oid);
|
|
}
|
|
else if (pset.sversion >= 80000)
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT relchecks, relkind, relhasindex, relhasrules, "
|
|
"reltriggers <> 0, false, false, relhasoids, "
|
|
"'', reltablespace\n"
|
|
"FROM pg_catalog.pg_class WHERE oid = '%s';",
|
|
oid);
|
|
}
|
|
else
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT relchecks, relkind, relhasindex, relhasrules, "
|
|
"reltriggers <> 0, false, false, relhasoids, "
|
|
"'', ''\n"
|
|
"FROM pg_catalog.pg_class WHERE oid = '%s';",
|
|
oid);
|
|
}
|
|
|
|
res = PSQLexec(buf.data);
|
|
if (!res)
|
|
goto error_return;
|
|
|
|
/* Did we get anything? */
|
|
if (PQntuples(res) == 0)
|
|
{
|
|
if (!pset.quiet)
|
|
psql_error("Did not find any relation with OID %s.\n", oid);
|
|
goto error_return;
|
|
}
|
|
|
|
tableinfo.checks = atoi(PQgetvalue(res, 0, 0));
|
|
tableinfo.relkind = *(PQgetvalue(res, 0, 1));
|
|
tableinfo.hasindex = strcmp(PQgetvalue(res, 0, 2), "t") == 0;
|
|
tableinfo.hasrules = strcmp(PQgetvalue(res, 0, 3), "t") == 0;
|
|
tableinfo.hastriggers = strcmp(PQgetvalue(res, 0, 4), "t") == 0;
|
|
tableinfo.rowsecurity = strcmp(PQgetvalue(res, 0, 5), "t") == 0;
|
|
tableinfo.forcerowsecurity = strcmp(PQgetvalue(res, 0, 6), "t") == 0;
|
|
tableinfo.hasoids = strcmp(PQgetvalue(res, 0, 7), "t") == 0;
|
|
tableinfo.reloptions = (pset.sversion >= 80200) ?
|
|
pg_strdup(PQgetvalue(res, 0, 8)) : NULL;
|
|
tableinfo.tablespace = (pset.sversion >= 80000) ?
|
|
atooid(PQgetvalue(res, 0, 9)) : 0;
|
|
tableinfo.reloftype = (pset.sversion >= 90000 &&
|
|
strcmp(PQgetvalue(res, 0, 10), "") != 0) ?
|
|
pg_strdup(PQgetvalue(res, 0, 10)) : NULL;
|
|
tableinfo.relpersistence = (pset.sversion >= 90100) ?
|
|
*(PQgetvalue(res, 0, 11)) : 0;
|
|
tableinfo.relreplident = (pset.sversion >= 90400) ?
|
|
*(PQgetvalue(res, 0, 12)) : 'd';
|
|
PQclear(res);
|
|
res = NULL;
|
|
|
|
/*
|
|
* If it's a sequence, deal with it here separately.
|
|
*/
|
|
if (tableinfo.relkind == RELKIND_SEQUENCE)
|
|
{
|
|
PGresult *result = NULL;
|
|
printQueryOpt myopt = pset.popt;
|
|
char *footers[2] = {NULL, NULL};
|
|
|
|
if (pset.sversion >= 100000)
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT pg_catalog.format_type(seqtypid, NULL) AS \"%s\",\n"
|
|
" seqstart AS \"%s\",\n"
|
|
" seqmin AS \"%s\",\n"
|
|
" seqmax AS \"%s\",\n"
|
|
" seqincrement AS \"%s\",\n"
|
|
" CASE WHEN seqcycle THEN '%s' ELSE '%s' END AS \"%s\",\n"
|
|
" seqcache AS \"%s\"\n",
|
|
gettext_noop("Type"),
|
|
gettext_noop("Start"),
|
|
gettext_noop("Minimum"),
|
|
gettext_noop("Maximum"),
|
|
gettext_noop("Increment"),
|
|
gettext_noop("yes"),
|
|
gettext_noop("no"),
|
|
gettext_noop("Cycles?"),
|
|
gettext_noop("Cache"));
|
|
appendPQExpBuffer(&buf,
|
|
"FROM pg_catalog.pg_sequence\n"
|
|
"WHERE seqrelid = '%s';",
|
|
oid);
|
|
}
|
|
else
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT 'bigint' AS \"%s\",\n"
|
|
" start_value AS \"%s\",\n"
|
|
" min_value AS \"%s\",\n"
|
|
" max_value AS \"%s\",\n"
|
|
" increment_by AS \"%s\",\n"
|
|
" CASE WHEN is_cycled THEN '%s' ELSE '%s' END AS \"%s\",\n"
|
|
" cache_value AS \"%s\"\n",
|
|
gettext_noop("Type"),
|
|
gettext_noop("Start"),
|
|
gettext_noop("Minimum"),
|
|
gettext_noop("Maximum"),
|
|
gettext_noop("Increment"),
|
|
gettext_noop("yes"),
|
|
gettext_noop("no"),
|
|
gettext_noop("Cycles?"),
|
|
gettext_noop("Cache"));
|
|
appendPQExpBuffer(&buf, "FROM %s", fmtId(schemaname));
|
|
/* must be separate because fmtId isn't reentrant */
|
|
appendPQExpBuffer(&buf, ".%s;", fmtId(relationname));
|
|
}
|
|
|
|
res = PSQLexec(buf.data);
|
|
if (!res)
|
|
goto error_return;
|
|
|
|
/* Footer information about a sequence */
|
|
|
|
/* Get the column that owns this sequence */
|
|
printfPQExpBuffer(&buf, "SELECT pg_catalog.quote_ident(nspname) || '.' ||"
|
|
"\n pg_catalog.quote_ident(relname) || '.' ||"
|
|
"\n pg_catalog.quote_ident(attname),"
|
|
"\n d.deptype"
|
|
"\nFROM pg_catalog.pg_class c"
|
|
"\nINNER JOIN pg_catalog.pg_depend d ON c.oid=d.refobjid"
|
|
"\nINNER JOIN pg_catalog.pg_namespace n ON n.oid=c.relnamespace"
|
|
"\nINNER JOIN pg_catalog.pg_attribute a ON ("
|
|
"\n a.attrelid=c.oid AND"
|
|
"\n a.attnum=d.refobjsubid)"
|
|
"\nWHERE d.classid='pg_catalog.pg_class'::pg_catalog.regclass"
|
|
"\n AND d.refclassid='pg_catalog.pg_class'::pg_catalog.regclass"
|
|
"\n AND d.objid='%s'"
|
|
"\n AND d.deptype IN ('a', 'i')",
|
|
oid);
|
|
|
|
result = PSQLexec(buf.data);
|
|
|
|
/*
|
|
* If we get no rows back, don't show anything (obviously). We should
|
|
* never get more than one row back, but if we do, just ignore it and
|
|
* don't print anything.
|
|
*/
|
|
if (!result)
|
|
goto error_return;
|
|
else if (PQntuples(result) == 1)
|
|
{
|
|
switch (PQgetvalue(result, 0, 1)[0])
|
|
{
|
|
case 'a':
|
|
footers[0] = psprintf(_("Owned by: %s"),
|
|
PQgetvalue(result, 0, 0));
|
|
break;
|
|
case 'i':
|
|
footers[0] = psprintf(_("Sequence for identity column: %s"),
|
|
PQgetvalue(result, 0, 0));
|
|
break;
|
|
}
|
|
}
|
|
PQclear(result);
|
|
|
|
printfPQExpBuffer(&title, _("Sequence \"%s.%s\""),
|
|
schemaname, relationname);
|
|
|
|
myopt.footers = footers;
|
|
myopt.topt.default_footer = false;
|
|
myopt.title = title.data;
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
if (footers[0])
|
|
free(footers[0]);
|
|
|
|
retval = true;
|
|
goto error_return; /* not an error, just return early */
|
|
}
|
|
|
|
/* Identify whether we should print collation, nullable, default vals */
|
|
if (tableinfo.relkind == RELKIND_RELATION ||
|
|
tableinfo.relkind == RELKIND_VIEW ||
|
|
tableinfo.relkind == RELKIND_MATVIEW ||
|
|
tableinfo.relkind == RELKIND_FOREIGN_TABLE ||
|
|
tableinfo.relkind == RELKIND_COMPOSITE_TYPE ||
|
|
tableinfo.relkind == RELKIND_PARTITIONED_TABLE)
|
|
show_column_details = true;
|
|
|
|
/*
|
|
* Get per-column info
|
|
*
|
|
* Since the set of query columns we need varies depending on relkind and
|
|
* server version, we compute all the column numbers on-the-fly. Column
|
|
* number variables for columns not fetched are left as -1; this avoids
|
|
* duplicative test logic below.
|
|
*/
|
|
cols = 0;
|
|
printfPQExpBuffer(&buf, "SELECT a.attname");
|
|
attname_col = cols++;
|
|
appendPQExpBufferStr(&buf, ",\n pg_catalog.format_type(a.atttypid, a.atttypmod)");
|
|
atttype_col = cols++;
|
|
|
|
if (show_column_details)
|
|
{
|
|
appendPQExpBufferStr(&buf,
|
|
",\n (SELECT substring(pg_catalog.pg_get_expr(d.adbin, d.adrelid) for 128)"
|
|
"\n FROM pg_catalog.pg_attrdef d"
|
|
"\n WHERE d.adrelid = a.attrelid AND d.adnum = a.attnum AND a.atthasdef)"
|
|
",\n a.attnotnull");
|
|
attrdef_col = cols++;
|
|
attnotnull_col = cols++;
|
|
if (pset.sversion >= 90100)
|
|
appendPQExpBufferStr(&buf, ",\n (SELECT c.collname FROM pg_catalog.pg_collation c, pg_catalog.pg_type t\n"
|
|
" WHERE c.oid = a.attcollation AND t.oid = a.atttypid AND a.attcollation <> t.typcollation) AS attcollation");
|
|
else
|
|
appendPQExpBufferStr(&buf, ",\n NULL AS attcollation");
|
|
attcoll_col = cols++;
|
|
if (pset.sversion >= 100000)
|
|
appendPQExpBufferStr(&buf, ",\n a.attidentity");
|
|
else
|
|
appendPQExpBufferStr(&buf, ",\n ''::pg_catalog.char AS attidentity");
|
|
attidentity_col = cols++;
|
|
}
|
|
if (tableinfo.relkind == RELKIND_INDEX ||
|
|
tableinfo.relkind == RELKIND_PARTITIONED_INDEX)
|
|
{
|
|
if (pset.sversion >= 110000)
|
|
{
|
|
appendPQExpBuffer(&buf, ",\n CASE WHEN a.attnum <= (SELECT i.indnkeyatts FROM pg_catalog.pg_index i WHERE i.indexrelid = '%s') THEN '%s' ELSE '%s' END AS is_key",
|
|
oid,
|
|
gettext_noop("yes"),
|
|
gettext_noop("no"));
|
|
isindexkey_col = cols++;
|
|
}
|
|
appendPQExpBufferStr(&buf, ",\n pg_catalog.pg_get_indexdef(a.attrelid, a.attnum, TRUE) AS indexdef");
|
|
indexdef_col = cols++;
|
|
}
|
|
/* FDW options for foreign table column, only for 9.2 or later */
|
|
if (tableinfo.relkind == RELKIND_FOREIGN_TABLE && pset.sversion >= 90200)
|
|
{
|
|
appendPQExpBufferStr(&buf, ",\n CASE WHEN attfdwoptions IS NULL THEN '' ELSE "
|
|
" '(' || pg_catalog.array_to_string(ARRAY(SELECT pg_catalog.quote_ident(option_name) || ' ' || pg_catalog.quote_literal(option_value) FROM "
|
|
" pg_catalog.pg_options_to_table(attfdwoptions)), ', ') || ')' END AS attfdwoptions");
|
|
fdwopts_col = cols++;
|
|
}
|
|
if (verbose)
|
|
{
|
|
appendPQExpBufferStr(&buf, ",\n a.attstorage");
|
|
attstorage_col = cols++;
|
|
|
|
/* stats target, if relevant to relkind */
|
|
if (tableinfo.relkind == RELKIND_RELATION ||
|
|
tableinfo.relkind == RELKIND_INDEX ||
|
|
tableinfo.relkind == RELKIND_PARTITIONED_INDEX ||
|
|
tableinfo.relkind == RELKIND_MATVIEW ||
|
|
tableinfo.relkind == RELKIND_FOREIGN_TABLE ||
|
|
tableinfo.relkind == RELKIND_PARTITIONED_TABLE)
|
|
{
|
|
appendPQExpBufferStr(&buf, ",\n CASE WHEN a.attstattarget=-1 THEN NULL ELSE a.attstattarget END AS attstattarget");
|
|
attstattarget_col = cols++;
|
|
}
|
|
|
|
/*
|
|
* In 9.0+, we have column comments for: relations, views, composite
|
|
* types, and foreign tables (cf. CommentObject() in comment.c).
|
|
*/
|
|
if (tableinfo.relkind == RELKIND_RELATION ||
|
|
tableinfo.relkind == RELKIND_VIEW ||
|
|
tableinfo.relkind == RELKIND_MATVIEW ||
|
|
tableinfo.relkind == RELKIND_FOREIGN_TABLE ||
|
|
tableinfo.relkind == RELKIND_COMPOSITE_TYPE ||
|
|
tableinfo.relkind == RELKIND_PARTITIONED_TABLE)
|
|
{
|
|
appendPQExpBufferStr(&buf, ",\n pg_catalog.col_description(a.attrelid, a.attnum)");
|
|
attdescr_col = cols++;
|
|
}
|
|
}
|
|
|
|
appendPQExpBufferStr(&buf, "\nFROM pg_catalog.pg_attribute a");
|
|
appendPQExpBuffer(&buf, "\nWHERE a.attrelid = '%s' AND a.attnum > 0 AND NOT a.attisdropped", oid);
|
|
appendPQExpBufferStr(&buf, "\nORDER BY a.attnum;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
if (!res)
|
|
goto error_return;
|
|
numrows = PQntuples(res);
|
|
|
|
/* Make title */
|
|
switch (tableinfo.relkind)
|
|
{
|
|
case RELKIND_RELATION:
|
|
if (tableinfo.relpersistence == 'u')
|
|
printfPQExpBuffer(&title, _("Unlogged table \"%s.%s\""),
|
|
schemaname, relationname);
|
|
else
|
|
printfPQExpBuffer(&title, _("Table \"%s.%s\""),
|
|
schemaname, relationname);
|
|
break;
|
|
case RELKIND_VIEW:
|
|
printfPQExpBuffer(&title, _("View \"%s.%s\""),
|
|
schemaname, relationname);
|
|
break;
|
|
case RELKIND_MATVIEW:
|
|
if (tableinfo.relpersistence == 'u')
|
|
printfPQExpBuffer(&title, _("Unlogged materialized view \"%s.%s\""),
|
|
schemaname, relationname);
|
|
else
|
|
printfPQExpBuffer(&title, _("Materialized view \"%s.%s\""),
|
|
schemaname, relationname);
|
|
break;
|
|
case RELKIND_INDEX:
|
|
case RELKIND_PARTITIONED_INDEX:
|
|
if (tableinfo.relpersistence == 'u')
|
|
printfPQExpBuffer(&title, _("Unlogged index \"%s.%s\""),
|
|
schemaname, relationname);
|
|
else
|
|
printfPQExpBuffer(&title, _("Index \"%s.%s\""),
|
|
schemaname, relationname);
|
|
break;
|
|
case 's':
|
|
/* not used as of 8.2, but keep it for backwards compatibility */
|
|
printfPQExpBuffer(&title, _("Special relation \"%s.%s\""),
|
|
schemaname, relationname);
|
|
break;
|
|
case RELKIND_TOASTVALUE:
|
|
printfPQExpBuffer(&title, _("TOAST table \"%s.%s\""),
|
|
schemaname, relationname);
|
|
break;
|
|
case RELKIND_COMPOSITE_TYPE:
|
|
printfPQExpBuffer(&title, _("Composite type \"%s.%s\""),
|
|
schemaname, relationname);
|
|
break;
|
|
case RELKIND_FOREIGN_TABLE:
|
|
printfPQExpBuffer(&title, _("Foreign table \"%s.%s\""),
|
|
schemaname, relationname);
|
|
break;
|
|
case RELKIND_PARTITIONED_TABLE:
|
|
if (tableinfo.relpersistence == 'u')
|
|
printfPQExpBuffer(&title, _("Unlogged table \"%s.%s\""),
|
|
schemaname, relationname);
|
|
else
|
|
printfPQExpBuffer(&title, _("Table \"%s.%s\""),
|
|
schemaname, relationname);
|
|
break;
|
|
default:
|
|
/* untranslated unknown relkind */
|
|
printfPQExpBuffer(&title, "?%c? \"%s.%s\"",
|
|
tableinfo.relkind, schemaname, relationname);
|
|
break;
|
|
}
|
|
|
|
/* Fill headers[] with the names of the columns we will output */
|
|
cols = 0;
|
|
headers[cols++] = gettext_noop("Column");
|
|
headers[cols++] = gettext_noop("Type");
|
|
if (show_column_details)
|
|
{
|
|
headers[cols++] = gettext_noop("Collation");
|
|
headers[cols++] = gettext_noop("Nullable");
|
|
headers[cols++] = gettext_noop("Default");
|
|
}
|
|
if (isindexkey_col >= 0)
|
|
headers[cols++] = gettext_noop("Key?");
|
|
if (indexdef_col >= 0)
|
|
headers[cols++] = gettext_noop("Definition");
|
|
if (fdwopts_col >= 0)
|
|
headers[cols++] = gettext_noop("FDW options");
|
|
if (attstorage_col >= 0)
|
|
headers[cols++] = gettext_noop("Storage");
|
|
if (attstattarget_col >= 0)
|
|
headers[cols++] = gettext_noop("Stats target");
|
|
if (attdescr_col >= 0)
|
|
headers[cols++] = gettext_noop("Description");
|
|
|
|
Assert(cols <= lengthof(headers));
|
|
|
|
printTableInit(&cont, &myopt, title.data, cols, numrows);
|
|
printTableInitialized = true;
|
|
|
|
for (i = 0; i < cols; i++)
|
|
printTableAddHeader(&cont, headers[i], true, 'l');
|
|
|
|
/* Generate table cells to be printed */
|
|
for (i = 0; i < numrows; i++)
|
|
{
|
|
/* Column */
|
|
printTableAddCell(&cont, PQgetvalue(res, i, attname_col), false, false);
|
|
|
|
/* Type */
|
|
printTableAddCell(&cont, PQgetvalue(res, i, atttype_col), false, false);
|
|
|
|
/* Collation, Nullable, Default */
|
|
if (show_column_details)
|
|
{
|
|
char *identity;
|
|
char *default_str = "";
|
|
|
|
printTableAddCell(&cont, PQgetvalue(res, i, attcoll_col), false, false);
|
|
|
|
printTableAddCell(&cont,
|
|
strcmp(PQgetvalue(res, i, attnotnull_col), "t") == 0 ? "not null" : "",
|
|
false, false);
|
|
|
|
identity = PQgetvalue(res, i, attidentity_col);
|
|
|
|
if (!identity[0])
|
|
/* (note: above we cut off the 'default' string at 128) */
|
|
default_str = PQgetvalue(res, i, attrdef_col);
|
|
else if (identity[0] == ATTRIBUTE_IDENTITY_ALWAYS)
|
|
default_str = "generated always as identity";
|
|
else if (identity[0] == ATTRIBUTE_IDENTITY_BY_DEFAULT)
|
|
default_str = "generated by default as identity";
|
|
|
|
printTableAddCell(&cont, default_str, false, false);
|
|
}
|
|
|
|
/* Info for index columns */
|
|
if (isindexkey_col >= 0)
|
|
printTableAddCell(&cont, PQgetvalue(res, i, isindexkey_col), true, false);
|
|
if (indexdef_col >= 0)
|
|
printTableAddCell(&cont, PQgetvalue(res, i, indexdef_col), false, false);
|
|
|
|
/* FDW options for foreign table columns */
|
|
if (fdwopts_col >= 0)
|
|
printTableAddCell(&cont, PQgetvalue(res, i, fdwopts_col), false, false);
|
|
|
|
/* Storage and Description */
|
|
if (attstorage_col >= 0)
|
|
{
|
|
char *storage = PQgetvalue(res, i, attstorage_col);
|
|
|
|
/* these strings are literal in our syntax, so not translated. */
|
|
printTableAddCell(&cont, (storage[0] == 'p' ? "plain" :
|
|
(storage[0] == 'm' ? "main" :
|
|
(storage[0] == 'x' ? "extended" :
|
|
(storage[0] == 'e' ? "external" :
|
|
"???")))),
|
|
false, false);
|
|
}
|
|
|
|
/* Statistics target, if the relkind supports this feature */
|
|
if (attstattarget_col >= 0)
|
|
printTableAddCell(&cont, PQgetvalue(res, i, attstattarget_col),
|
|
false, false);
|
|
|
|
/* Column comments, if the relkind supports this feature */
|
|
if (attdescr_col >= 0)
|
|
printTableAddCell(&cont, PQgetvalue(res, i, attdescr_col),
|
|
false, false);
|
|
}
|
|
|
|
/* Make footers */
|
|
if (pset.sversion >= 100000)
|
|
{
|
|
/* Get the partition information */
|
|
PGresult *result;
|
|
char *parent_name;
|
|
char *partdef;
|
|
char *partconstraintdef = NULL;
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT inhparent::pg_catalog.regclass,\n"
|
|
" pg_catalog.pg_get_expr(c.relpartbound, inhrelid)");
|
|
/* If verbose, also request the partition constraint definition */
|
|
if (verbose)
|
|
appendPQExpBuffer(&buf,
|
|
",\n pg_catalog.pg_get_partition_constraintdef(inhrelid)");
|
|
appendPQExpBuffer(&buf,
|
|
"\nFROM pg_catalog.pg_class c"
|
|
" JOIN pg_catalog.pg_inherits i"
|
|
" ON c.oid = inhrelid"
|
|
"\nWHERE c.oid = '%s' AND c.relispartition;", oid);
|
|
result = PSQLexec(buf.data);
|
|
if (!result)
|
|
goto error_return;
|
|
|
|
if (PQntuples(result) > 0)
|
|
{
|
|
parent_name = PQgetvalue(result, 0, 0);
|
|
partdef = PQgetvalue(result, 0, 1);
|
|
|
|
if (PQnfields(result) == 3 && !PQgetisnull(result, 0, 2))
|
|
partconstraintdef = PQgetvalue(result, 0, 2);
|
|
|
|
printfPQExpBuffer(&tmpbuf, _("Partition of: %s %s"), parent_name,
|
|
partdef);
|
|
printTableAddFooter(&cont, tmpbuf.data);
|
|
|
|
if (verbose)
|
|
{
|
|
/* If there isn't any constraint, show that explicitly */
|
|
if (partconstraintdef == NULL || partconstraintdef[0] == '\0')
|
|
printfPQExpBuffer(&tmpbuf, _("No partition constraint"));
|
|
else
|
|
printfPQExpBuffer(&tmpbuf, _("Partition constraint: %s"),
|
|
partconstraintdef);
|
|
printTableAddFooter(&cont, tmpbuf.data);
|
|
}
|
|
|
|
PQclear(result);
|
|
}
|
|
}
|
|
|
|
if (tableinfo.relkind == RELKIND_PARTITIONED_TABLE)
|
|
{
|
|
/* Get the partition key information */
|
|
PGresult *result;
|
|
char *partkeydef;
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT pg_catalog.pg_get_partkeydef('%s'::pg_catalog.oid);",
|
|
oid);
|
|
result = PSQLexec(buf.data);
|
|
if (!result || PQntuples(result) != 1)
|
|
goto error_return;
|
|
|
|
partkeydef = PQgetvalue(result, 0, 0);
|
|
printfPQExpBuffer(&tmpbuf, _("Partition key: %s"), partkeydef);
|
|
printTableAddFooter(&cont, tmpbuf.data);
|
|
PQclear(result);
|
|
}
|
|
|
|
if (tableinfo.relkind == RELKIND_INDEX ||
|
|
tableinfo.relkind == RELKIND_PARTITIONED_INDEX)
|
|
{
|
|
/* Footer information about an index */
|
|
PGresult *result;
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT i.indisunique, i.indisprimary, i.indisclustered, ");
|
|
if (pset.sversion >= 80200)
|
|
appendPQExpBufferStr(&buf, "i.indisvalid,\n");
|
|
else
|
|
appendPQExpBufferStr(&buf, "true AS indisvalid,\n");
|
|
if (pset.sversion >= 90000)
|
|
appendPQExpBufferStr(&buf,
|
|
" (NOT i.indimmediate) AND "
|
|
"EXISTS (SELECT 1 FROM pg_catalog.pg_constraint "
|
|
"WHERE conrelid = i.indrelid AND "
|
|
"conindid = i.indexrelid AND "
|
|
"contype IN ('p','u','x') AND "
|
|
"condeferrable) AS condeferrable,\n"
|
|
" (NOT i.indimmediate) AND "
|
|
"EXISTS (SELECT 1 FROM pg_catalog.pg_constraint "
|
|
"WHERE conrelid = i.indrelid AND "
|
|
"conindid = i.indexrelid AND "
|
|
"contype IN ('p','u','x') AND "
|
|
"condeferred) AS condeferred,\n");
|
|
else
|
|
appendPQExpBufferStr(&buf,
|
|
" false AS condeferrable, false AS condeferred,\n");
|
|
|
|
if (pset.sversion >= 90400)
|
|
appendPQExpBuffer(&buf, "i.indisreplident,\n");
|
|
else
|
|
appendPQExpBuffer(&buf, "false AS indisreplident,\n");
|
|
|
|
appendPQExpBuffer(&buf, " a.amname, c2.relname, "
|
|
"pg_catalog.pg_get_expr(i.indpred, i.indrelid, true)\n"
|
|
"FROM pg_catalog.pg_index i, pg_catalog.pg_class c, pg_catalog.pg_class c2, pg_catalog.pg_am a\n"
|
|
"WHERE i.indexrelid = c.oid AND c.oid = '%s' AND c.relam = a.oid\n"
|
|
"AND i.indrelid = c2.oid;",
|
|
oid);
|
|
|
|
result = PSQLexec(buf.data);
|
|
if (!result)
|
|
goto error_return;
|
|
else if (PQntuples(result) != 1)
|
|
{
|
|
PQclear(result);
|
|
goto error_return;
|
|
}
|
|
else
|
|
{
|
|
char *indisunique = PQgetvalue(result, 0, 0);
|
|
char *indisprimary = PQgetvalue(result, 0, 1);
|
|
char *indisclustered = PQgetvalue(result, 0, 2);
|
|
char *indisvalid = PQgetvalue(result, 0, 3);
|
|
char *deferrable = PQgetvalue(result, 0, 4);
|
|
char *deferred = PQgetvalue(result, 0, 5);
|
|
char *indisreplident = PQgetvalue(result, 0, 6);
|
|
char *indamname = PQgetvalue(result, 0, 7);
|
|
char *indtable = PQgetvalue(result, 0, 8);
|
|
char *indpred = PQgetvalue(result, 0, 9);
|
|
|
|
if (strcmp(indisprimary, "t") == 0)
|
|
printfPQExpBuffer(&tmpbuf, _("primary key, "));
|
|
else if (strcmp(indisunique, "t") == 0)
|
|
printfPQExpBuffer(&tmpbuf, _("unique, "));
|
|
else
|
|
resetPQExpBuffer(&tmpbuf);
|
|
appendPQExpBuffer(&tmpbuf, "%s, ", indamname);
|
|
|
|
/* we assume here that index and table are in same schema */
|
|
appendPQExpBuffer(&tmpbuf, _("for table \"%s.%s\""),
|
|
schemaname, indtable);
|
|
|
|
if (strlen(indpred))
|
|
appendPQExpBuffer(&tmpbuf, _(", predicate (%s)"), indpred);
|
|
|
|
if (strcmp(indisclustered, "t") == 0)
|
|
appendPQExpBufferStr(&tmpbuf, _(", clustered"));
|
|
|
|
if (strcmp(indisvalid, "t") != 0)
|
|
appendPQExpBufferStr(&tmpbuf, _(", invalid"));
|
|
|
|
if (strcmp(deferrable, "t") == 0)
|
|
appendPQExpBufferStr(&tmpbuf, _(", deferrable"));
|
|
|
|
if (strcmp(deferred, "t") == 0)
|
|
appendPQExpBufferStr(&tmpbuf, _(", initially deferred"));
|
|
|
|
if (strcmp(indisreplident, "t") == 0)
|
|
appendPQExpBuffer(&tmpbuf, _(", replica identity"));
|
|
|
|
printTableAddFooter(&cont, tmpbuf.data);
|
|
add_tablespace_footer(&cont, tableinfo.relkind,
|
|
tableinfo.tablespace, true);
|
|
}
|
|
|
|
PQclear(result);
|
|
}
|
|
else if (tableinfo.relkind == RELKIND_RELATION ||
|
|
tableinfo.relkind == RELKIND_MATVIEW ||
|
|
tableinfo.relkind == RELKIND_FOREIGN_TABLE ||
|
|
tableinfo.relkind == RELKIND_PARTITIONED_TABLE)
|
|
{
|
|
/* Footer information about a table */
|
|
PGresult *result = NULL;
|
|
int tuples = 0;
|
|
|
|
/* print indexes */
|
|
if (tableinfo.hasindex)
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT c2.relname, i.indisprimary, i.indisunique, i.indisclustered, ");
|
|
if (pset.sversion >= 80200)
|
|
appendPQExpBufferStr(&buf, "i.indisvalid, ");
|
|
else
|
|
appendPQExpBufferStr(&buf, "true as indisvalid, ");
|
|
appendPQExpBufferStr(&buf, "pg_catalog.pg_get_indexdef(i.indexrelid, 0, true),\n ");
|
|
if (pset.sversion >= 90000)
|
|
appendPQExpBufferStr(&buf,
|
|
"pg_catalog.pg_get_constraintdef(con.oid, true), "
|
|
"contype, condeferrable, condeferred");
|
|
else
|
|
appendPQExpBufferStr(&buf,
|
|
"null AS constraintdef, null AS contype, "
|
|
"false AS condeferrable, false AS condeferred");
|
|
if (pset.sversion >= 90400)
|
|
appendPQExpBufferStr(&buf, ", i.indisreplident");
|
|
else
|
|
appendPQExpBufferStr(&buf, ", false AS indisreplident");
|
|
if (pset.sversion >= 80000)
|
|
appendPQExpBufferStr(&buf, ", c2.reltablespace");
|
|
appendPQExpBufferStr(&buf,
|
|
"\nFROM pg_catalog.pg_class c, pg_catalog.pg_class c2, pg_catalog.pg_index i\n");
|
|
if (pset.sversion >= 90000)
|
|
appendPQExpBufferStr(&buf,
|
|
" LEFT JOIN pg_catalog.pg_constraint con ON (conrelid = i.indrelid AND conindid = i.indexrelid AND contype IN ('p','u','x'))\n");
|
|
appendPQExpBuffer(&buf,
|
|
"WHERE c.oid = '%s' AND c.oid = i.indrelid AND i.indexrelid = c2.oid\n"
|
|
"ORDER BY i.indisprimary DESC, i.indisunique DESC, c2.relname;",
|
|
oid);
|
|
result = PSQLexec(buf.data);
|
|
if (!result)
|
|
goto error_return;
|
|
else
|
|
tuples = PQntuples(result);
|
|
|
|
if (tuples > 0)
|
|
{
|
|
printTableAddFooter(&cont, _("Indexes:"));
|
|
for (i = 0; i < tuples; i++)
|
|
{
|
|
/* untranslated index name */
|
|
printfPQExpBuffer(&buf, " \"%s\"",
|
|
PQgetvalue(result, i, 0));
|
|
|
|
/* If exclusion constraint, print the constraintdef */
|
|
if (strcmp(PQgetvalue(result, i, 7), "x") == 0)
|
|
{
|
|
appendPQExpBuffer(&buf, " %s",
|
|
PQgetvalue(result, i, 6));
|
|
}
|
|
else
|
|
{
|
|
const char *indexdef;
|
|
const char *usingpos;
|
|
|
|
/* Label as primary key or unique (but not both) */
|
|
if (strcmp(PQgetvalue(result, i, 1), "t") == 0)
|
|
appendPQExpBufferStr(&buf, " PRIMARY KEY,");
|
|
else if (strcmp(PQgetvalue(result, i, 2), "t") == 0)
|
|
{
|
|
if (strcmp(PQgetvalue(result, i, 7), "u") == 0)
|
|
appendPQExpBufferStr(&buf, " UNIQUE CONSTRAINT,");
|
|
else
|
|
appendPQExpBufferStr(&buf, " UNIQUE,");
|
|
}
|
|
|
|
/* Everything after "USING" is echoed verbatim */
|
|
indexdef = PQgetvalue(result, i, 5);
|
|
usingpos = strstr(indexdef, " USING ");
|
|
if (usingpos)
|
|
indexdef = usingpos + 7;
|
|
appendPQExpBuffer(&buf, " %s", indexdef);
|
|
|
|
/* Need these for deferrable PK/UNIQUE indexes */
|
|
if (strcmp(PQgetvalue(result, i, 8), "t") == 0)
|
|
appendPQExpBufferStr(&buf, " DEFERRABLE");
|
|
|
|
if (strcmp(PQgetvalue(result, i, 9), "t") == 0)
|
|
appendPQExpBufferStr(&buf, " INITIALLY DEFERRED");
|
|
}
|
|
|
|
/* Add these for all cases */
|
|
if (strcmp(PQgetvalue(result, i, 3), "t") == 0)
|
|
appendPQExpBufferStr(&buf, " CLUSTER");
|
|
|
|
if (strcmp(PQgetvalue(result, i, 4), "t") != 0)
|
|
appendPQExpBufferStr(&buf, " INVALID");
|
|
|
|
if (strcmp(PQgetvalue(result, i, 10), "t") == 0)
|
|
appendPQExpBuffer(&buf, " REPLICA IDENTITY");
|
|
|
|
printTableAddFooter(&cont, buf.data);
|
|
|
|
/* Print tablespace of the index on the same line */
|
|
if (pset.sversion >= 80000)
|
|
add_tablespace_footer(&cont, RELKIND_INDEX,
|
|
atooid(PQgetvalue(result, i, 11)),
|
|
false);
|
|
}
|
|
}
|
|
PQclear(result);
|
|
}
|
|
|
|
/* print table (and column) check constraints */
|
|
if (tableinfo.checks)
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT r.conname, "
|
|
"pg_catalog.pg_get_constraintdef(r.oid, true)\n"
|
|
"FROM pg_catalog.pg_constraint r\n"
|
|
"WHERE r.conrelid = '%s' AND r.contype = 'c'\n"
|
|
"ORDER BY 1;",
|
|
oid);
|
|
result = PSQLexec(buf.data);
|
|
if (!result)
|
|
goto error_return;
|
|
else
|
|
tuples = PQntuples(result);
|
|
|
|
if (tuples > 0)
|
|
{
|
|
printTableAddFooter(&cont, _("Check constraints:"));
|
|
for (i = 0; i < tuples; i++)
|
|
{
|
|
/* untranslated constraint name and def */
|
|
printfPQExpBuffer(&buf, " \"%s\" %s",
|
|
PQgetvalue(result, i, 0),
|
|
PQgetvalue(result, i, 1));
|
|
|
|
printTableAddFooter(&cont, buf.data);
|
|
}
|
|
}
|
|
PQclear(result);
|
|
}
|
|
|
|
/*
|
|
* Print foreign-key constraints (there are none if no triggers,
|
|
* except if the table is partitioned, in which case the triggers
|
|
* appear in the partitions)
|
|
*/
|
|
if (tableinfo.hastriggers ||
|
|
tableinfo.relkind == RELKIND_PARTITIONED_TABLE)
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT conname,\n"
|
|
" pg_catalog.pg_get_constraintdef(r.oid, true) as condef\n"
|
|
"FROM pg_catalog.pg_constraint r\n"
|
|
"WHERE r.conrelid = '%s' AND r.contype = 'f' ORDER BY 1;",
|
|
oid);
|
|
result = PSQLexec(buf.data);
|
|
if (!result)
|
|
goto error_return;
|
|
else
|
|
tuples = PQntuples(result);
|
|
|
|
if (tuples > 0)
|
|
{
|
|
printTableAddFooter(&cont, _("Foreign-key constraints:"));
|
|
for (i = 0; i < tuples; i++)
|
|
{
|
|
/* untranslated constraint name and def */
|
|
printfPQExpBuffer(&buf, " \"%s\" %s",
|
|
PQgetvalue(result, i, 0),
|
|
PQgetvalue(result, i, 1));
|
|
|
|
printTableAddFooter(&cont, buf.data);
|
|
}
|
|
}
|
|
PQclear(result);
|
|
}
|
|
|
|
/* print incoming foreign-key references (none if no triggers) */
|
|
if (tableinfo.hastriggers)
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT conname, conrelid::pg_catalog.regclass,\n"
|
|
" pg_catalog.pg_get_constraintdef(c.oid, true) as condef\n"
|
|
"FROM pg_catalog.pg_constraint c\n"
|
|
"WHERE c.confrelid = '%s' AND c.contype = 'f' ORDER BY 1;",
|
|
oid);
|
|
result = PSQLexec(buf.data);
|
|
if (!result)
|
|
goto error_return;
|
|
else
|
|
tuples = PQntuples(result);
|
|
|
|
if (tuples > 0)
|
|
{
|
|
printTableAddFooter(&cont, _("Referenced by:"));
|
|
for (i = 0; i < tuples; i++)
|
|
{
|
|
printfPQExpBuffer(&buf, " TABLE \"%s\" CONSTRAINT \"%s\" %s",
|
|
PQgetvalue(result, i, 1),
|
|
PQgetvalue(result, i, 0),
|
|
PQgetvalue(result, i, 2));
|
|
|
|
printTableAddFooter(&cont, buf.data);
|
|
}
|
|
}
|
|
PQclear(result);
|
|
}
|
|
|
|
/* print any row-level policies */
|
|
if (pset.sversion >= 90500)
|
|
{
|
|
printfPQExpBuffer(&buf, "SELECT pol.polname,");
|
|
if (pset.sversion >= 100000)
|
|
appendPQExpBuffer(&buf,
|
|
" pol.polpermissive,\n");
|
|
else
|
|
appendPQExpBuffer(&buf,
|
|
" 't' as polpermissive,\n");
|
|
appendPQExpBuffer(&buf,
|
|
" CASE WHEN pol.polroles = '{0}' THEN NULL ELSE pg_catalog.array_to_string(array(select rolname from pg_catalog.pg_roles where oid = any (pol.polroles) order by 1),',') END,\n"
|
|
" pg_catalog.pg_get_expr(pol.polqual, pol.polrelid),\n"
|
|
" pg_catalog.pg_get_expr(pol.polwithcheck, pol.polrelid),\n"
|
|
" CASE pol.polcmd\n"
|
|
" WHEN 'r' THEN 'SELECT'\n"
|
|
" WHEN 'a' THEN 'INSERT'\n"
|
|
" WHEN 'w' THEN 'UPDATE'\n"
|
|
" WHEN 'd' THEN 'DELETE'\n"
|
|
" END AS cmd\n"
|
|
"FROM pg_catalog.pg_policy pol\n"
|
|
"WHERE pol.polrelid = '%s' ORDER BY 1;",
|
|
oid);
|
|
|
|
result = PSQLexec(buf.data);
|
|
if (!result)
|
|
goto error_return;
|
|
else
|
|
tuples = PQntuples(result);
|
|
|
|
/*
|
|
* Handle cases where RLS is enabled and there are policies, or
|
|
* there aren't policies, or RLS isn't enabled but there are
|
|
* policies
|
|
*/
|
|
if (tableinfo.rowsecurity && !tableinfo.forcerowsecurity && tuples > 0)
|
|
printTableAddFooter(&cont, _("Policies:"));
|
|
|
|
if (tableinfo.rowsecurity && tableinfo.forcerowsecurity && tuples > 0)
|
|
printTableAddFooter(&cont, _("Policies (forced row security enabled):"));
|
|
|
|
if (tableinfo.rowsecurity && !tableinfo.forcerowsecurity && tuples == 0)
|
|
printTableAddFooter(&cont, _("Policies (row security enabled): (none)"));
|
|
|
|
if (tableinfo.rowsecurity && tableinfo.forcerowsecurity && tuples == 0)
|
|
printTableAddFooter(&cont, _("Policies (forced row security enabled): (none)"));
|
|
|
|
if (!tableinfo.rowsecurity && tuples > 0)
|
|
printTableAddFooter(&cont, _("Policies (row security disabled):"));
|
|
|
|
/* Might be an empty set - that's ok */
|
|
for (i = 0; i < tuples; i++)
|
|
{
|
|
printfPQExpBuffer(&buf, " POLICY \"%s\"",
|
|
PQgetvalue(result, i, 0));
|
|
|
|
if (*(PQgetvalue(result, i, 1)) == 'f')
|
|
appendPQExpBuffer(&buf, " AS RESTRICTIVE");
|
|
|
|
if (!PQgetisnull(result, i, 5))
|
|
appendPQExpBuffer(&buf, " FOR %s",
|
|
PQgetvalue(result, i, 5));
|
|
|
|
if (!PQgetisnull(result, i, 2))
|
|
{
|
|
appendPQExpBuffer(&buf, "\n TO %s",
|
|
PQgetvalue(result, i, 2));
|
|
}
|
|
|
|
if (!PQgetisnull(result, i, 3))
|
|
appendPQExpBuffer(&buf, "\n USING (%s)",
|
|
PQgetvalue(result, i, 3));
|
|
|
|
if (!PQgetisnull(result, i, 4))
|
|
appendPQExpBuffer(&buf, "\n WITH CHECK (%s)",
|
|
PQgetvalue(result, i, 4));
|
|
|
|
printTableAddFooter(&cont, buf.data);
|
|
|
|
}
|
|
PQclear(result);
|
|
}
|
|
|
|
/* print any extended statistics */
|
|
if (pset.sversion >= 100000)
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT oid, "
|
|
"stxrelid::pg_catalog.regclass, "
|
|
"stxnamespace::pg_catalog.regnamespace AS nsp, "
|
|
"stxname,\n"
|
|
" (SELECT pg_catalog.string_agg(pg_catalog.quote_ident(attname),', ')\n"
|
|
" FROM pg_catalog.unnest(stxkeys) s(attnum)\n"
|
|
" JOIN pg_catalog.pg_attribute a ON (stxrelid = a.attrelid AND\n"
|
|
" a.attnum = s.attnum AND NOT attisdropped)) AS columns,\n"
|
|
" 'd' = any(stxkind) AS ndist_enabled,\n"
|
|
" 'f' = any(stxkind) AS deps_enabled\n"
|
|
"FROM pg_catalog.pg_statistic_ext stat "
|
|
"WHERE stxrelid = '%s'\n"
|
|
"ORDER BY 1;",
|
|
oid);
|
|
|
|
result = PSQLexec(buf.data);
|
|
if (!result)
|
|
goto error_return;
|
|
else
|
|
tuples = PQntuples(result);
|
|
|
|
if (tuples > 0)
|
|
{
|
|
printTableAddFooter(&cont, _("Statistics objects:"));
|
|
|
|
for (i = 0; i < tuples; i++)
|
|
{
|
|
bool gotone = false;
|
|
|
|
printfPQExpBuffer(&buf, " ");
|
|
|
|
/* statistics object name (qualified with namespace) */
|
|
appendPQExpBuffer(&buf, "\"%s\".\"%s\" (",
|
|
PQgetvalue(result, i, 2),
|
|
PQgetvalue(result, i, 3));
|
|
|
|
/* options */
|
|
if (strcmp(PQgetvalue(result, i, 5), "t") == 0)
|
|
{
|
|
appendPQExpBufferStr(&buf, "ndistinct");
|
|
gotone = true;
|
|
}
|
|
|
|
if (strcmp(PQgetvalue(result, i, 6), "t") == 0)
|
|
{
|
|
appendPQExpBuffer(&buf, "%sdependencies", gotone ? ", " : "");
|
|
}
|
|
|
|
appendPQExpBuffer(&buf, ") ON %s FROM %s",
|
|
PQgetvalue(result, i, 4),
|
|
PQgetvalue(result, i, 1));
|
|
|
|
printTableAddFooter(&cont, buf.data);
|
|
}
|
|
}
|
|
PQclear(result);
|
|
}
|
|
|
|
/* print rules */
|
|
if (tableinfo.hasrules && tableinfo.relkind != RELKIND_MATVIEW)
|
|
{
|
|
if (pset.sversion >= 80300)
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT r.rulename, trim(trailing ';' from pg_catalog.pg_get_ruledef(r.oid, true)), "
|
|
"ev_enabled\n"
|
|
"FROM pg_catalog.pg_rewrite r\n"
|
|
"WHERE r.ev_class = '%s' ORDER BY 1;",
|
|
oid);
|
|
}
|
|
else
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT r.rulename, trim(trailing ';' from pg_catalog.pg_get_ruledef(r.oid, true)), "
|
|
"'O' AS ev_enabled\n"
|
|
"FROM pg_catalog.pg_rewrite r\n"
|
|
"WHERE r.ev_class = '%s' ORDER BY 1;",
|
|
oid);
|
|
}
|
|
result = PSQLexec(buf.data);
|
|
if (!result)
|
|
goto error_return;
|
|
else
|
|
tuples = PQntuples(result);
|
|
|
|
if (tuples > 0)
|
|
{
|
|
bool have_heading;
|
|
int category;
|
|
|
|
for (category = 0; category < 4; category++)
|
|
{
|
|
have_heading = false;
|
|
|
|
for (i = 0; i < tuples; i++)
|
|
{
|
|
const char *ruledef;
|
|
bool list_rule = false;
|
|
|
|
switch (category)
|
|
{
|
|
case 0:
|
|
if (*PQgetvalue(result, i, 2) == 'O')
|
|
list_rule = true;
|
|
break;
|
|
case 1:
|
|
if (*PQgetvalue(result, i, 2) == 'D')
|
|
list_rule = true;
|
|
break;
|
|
case 2:
|
|
if (*PQgetvalue(result, i, 2) == 'A')
|
|
list_rule = true;
|
|
break;
|
|
case 3:
|
|
if (*PQgetvalue(result, i, 2) == 'R')
|
|
list_rule = true;
|
|
break;
|
|
}
|
|
if (!list_rule)
|
|
continue;
|
|
|
|
if (!have_heading)
|
|
{
|
|
switch (category)
|
|
{
|
|
case 0:
|
|
printfPQExpBuffer(&buf, _("Rules:"));
|
|
break;
|
|
case 1:
|
|
printfPQExpBuffer(&buf, _("Disabled rules:"));
|
|
break;
|
|
case 2:
|
|
printfPQExpBuffer(&buf, _("Rules firing always:"));
|
|
break;
|
|
case 3:
|
|
printfPQExpBuffer(&buf, _("Rules firing on replica only:"));
|
|
break;
|
|
}
|
|
printTableAddFooter(&cont, buf.data);
|
|
have_heading = true;
|
|
}
|
|
|
|
/* Everything after "CREATE RULE" is echoed verbatim */
|
|
ruledef = PQgetvalue(result, i, 1);
|
|
ruledef += 12;
|
|
printfPQExpBuffer(&buf, " %s", ruledef);
|
|
printTableAddFooter(&cont, buf.data);
|
|
}
|
|
}
|
|
}
|
|
PQclear(result);
|
|
}
|
|
|
|
/* print any publications */
|
|
if (pset.sversion >= 100000)
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT pubname\n"
|
|
"FROM pg_catalog.pg_publication p\n"
|
|
"JOIN pg_catalog.pg_publication_rel pr ON p.oid = pr.prpubid\n"
|
|
"WHERE pr.prrelid = '%s'\n"
|
|
"UNION ALL\n"
|
|
"SELECT pubname\n"
|
|
"FROM pg_catalog.pg_publication p\n"
|
|
"WHERE p.puballtables AND pg_catalog.pg_relation_is_publishable('%s')\n"
|
|
"ORDER BY 1;",
|
|
oid, oid);
|
|
|
|
result = PSQLexec(buf.data);
|
|
if (!result)
|
|
goto error_return;
|
|
else
|
|
tuples = PQntuples(result);
|
|
|
|
if (tuples > 0)
|
|
printTableAddFooter(&cont, _("Publications:"));
|
|
|
|
/* Might be an empty set - that's ok */
|
|
for (i = 0; i < tuples; i++)
|
|
{
|
|
printfPQExpBuffer(&buf, " \"%s\"",
|
|
PQgetvalue(result, i, 0));
|
|
|
|
printTableAddFooter(&cont, buf.data);
|
|
}
|
|
PQclear(result);
|
|
}
|
|
}
|
|
|
|
/* Get view_def if table is a view or materialized view */
|
|
if ((tableinfo.relkind == RELKIND_VIEW ||
|
|
tableinfo.relkind == RELKIND_MATVIEW) && verbose)
|
|
{
|
|
PGresult *result;
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT pg_catalog.pg_get_viewdef('%s'::pg_catalog.oid, true);",
|
|
oid);
|
|
result = PSQLexec(buf.data);
|
|
if (!result)
|
|
goto error_return;
|
|
|
|
if (PQntuples(result) > 0)
|
|
view_def = pg_strdup(PQgetvalue(result, 0, 0));
|
|
|
|
PQclear(result);
|
|
}
|
|
|
|
if (view_def)
|
|
{
|
|
PGresult *result = NULL;
|
|
|
|
/* Footer information about a view */
|
|
printTableAddFooter(&cont, _("View definition:"));
|
|
printTableAddFooter(&cont, view_def);
|
|
|
|
/* print rules */
|
|
if (tableinfo.hasrules)
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT r.rulename, trim(trailing ';' from pg_catalog.pg_get_ruledef(r.oid, true))\n"
|
|
"FROM pg_catalog.pg_rewrite r\n"
|
|
"WHERE r.ev_class = '%s' AND r.rulename != '_RETURN' ORDER BY 1;",
|
|
oid);
|
|
result = PSQLexec(buf.data);
|
|
if (!result)
|
|
goto error_return;
|
|
|
|
if (PQntuples(result) > 0)
|
|
{
|
|
printTableAddFooter(&cont, _("Rules:"));
|
|
for (i = 0; i < PQntuples(result); i++)
|
|
{
|
|
const char *ruledef;
|
|
|
|
/* Everything after "CREATE RULE" is echoed verbatim */
|
|
ruledef = PQgetvalue(result, i, 1);
|
|
ruledef += 12;
|
|
|
|
printfPQExpBuffer(&buf, " %s", ruledef);
|
|
printTableAddFooter(&cont, buf.data);
|
|
}
|
|
}
|
|
PQclear(result);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Print triggers next, if any (but only user-defined triggers). This
|
|
* could apply to either a table or a view.
|
|
*/
|
|
if (tableinfo.hastriggers)
|
|
{
|
|
PGresult *result;
|
|
int tuples;
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT t.tgname, "
|
|
"pg_catalog.pg_get_triggerdef(t.oid%s), "
|
|
"t.tgenabled, %s\n"
|
|
"FROM pg_catalog.pg_trigger t\n"
|
|
"WHERE t.tgrelid = '%s' AND ",
|
|
(pset.sversion >= 90000 ? ", true" : ""),
|
|
(pset.sversion >= 90000 ? "t.tgisinternal" :
|
|
pset.sversion >= 80300 ?
|
|
"t.tgconstraint <> 0 AS tgisinternal" :
|
|
"false AS tgisinternal"), oid);
|
|
if (pset.sversion >= 110000)
|
|
appendPQExpBuffer(&buf, "(NOT t.tgisinternal OR (t.tgisinternal AND t.tgenabled = 'D') \n"
|
|
" OR EXISTS (SELECT 1 FROM pg_catalog.pg_depend WHERE objid = t.oid \n"
|
|
" AND refclassid = 'pg_catalog.pg_trigger'::regclass))");
|
|
else if (pset.sversion >= 90000)
|
|
/* display/warn about disabled internal triggers */
|
|
appendPQExpBuffer(&buf, "(NOT t.tgisinternal OR (t.tgisinternal AND t.tgenabled = 'D'))");
|
|
else if (pset.sversion >= 80300)
|
|
appendPQExpBufferStr(&buf, "(t.tgconstraint = 0 OR (t.tgconstraint <> 0 AND t.tgenabled = 'D'))");
|
|
else
|
|
appendPQExpBufferStr(&buf,
|
|
"(NOT tgisconstraint "
|
|
" OR NOT EXISTS"
|
|
" (SELECT 1 FROM pg_catalog.pg_depend d "
|
|
" JOIN pg_catalog.pg_constraint c ON (d.refclassid = c.tableoid AND d.refobjid = c.oid) "
|
|
" WHERE d.classid = t.tableoid AND d.objid = t.oid AND d.deptype = 'i' AND c.contype = 'f'))");
|
|
appendPQExpBufferStr(&buf, "\nORDER BY 1;");
|
|
|
|
result = PSQLexec(buf.data);
|
|
if (!result)
|
|
goto error_return;
|
|
else
|
|
tuples = PQntuples(result);
|
|
|
|
if (tuples > 0)
|
|
{
|
|
bool have_heading;
|
|
int category;
|
|
|
|
/*
|
|
* split the output into 4 different categories. Enabled triggers,
|
|
* disabled triggers and the two special ALWAYS and REPLICA
|
|
* configurations.
|
|
*/
|
|
for (category = 0; category <= 4; category++)
|
|
{
|
|
have_heading = false;
|
|
for (i = 0; i < tuples; i++)
|
|
{
|
|
bool list_trigger;
|
|
const char *tgdef;
|
|
const char *usingpos;
|
|
const char *tgenabled;
|
|
const char *tgisinternal;
|
|
|
|
/*
|
|
* Check if this trigger falls into the current category
|
|
*/
|
|
tgenabled = PQgetvalue(result, i, 2);
|
|
tgisinternal = PQgetvalue(result, i, 3);
|
|
list_trigger = false;
|
|
switch (category)
|
|
{
|
|
case 0:
|
|
if (*tgenabled == 'O' || *tgenabled == 't')
|
|
list_trigger = true;
|
|
break;
|
|
case 1:
|
|
if ((*tgenabled == 'D' || *tgenabled == 'f') &&
|
|
*tgisinternal == 'f')
|
|
list_trigger = true;
|
|
break;
|
|
case 2:
|
|
if ((*tgenabled == 'D' || *tgenabled == 'f') &&
|
|
*tgisinternal == 't')
|
|
list_trigger = true;
|
|
break;
|
|
case 3:
|
|
if (*tgenabled == 'A')
|
|
list_trigger = true;
|
|
break;
|
|
case 4:
|
|
if (*tgenabled == 'R')
|
|
list_trigger = true;
|
|
break;
|
|
}
|
|
if (list_trigger == false)
|
|
continue;
|
|
|
|
/* Print the category heading once */
|
|
if (have_heading == false)
|
|
{
|
|
switch (category)
|
|
{
|
|
case 0:
|
|
printfPQExpBuffer(&buf, _("Triggers:"));
|
|
break;
|
|
case 1:
|
|
if (pset.sversion >= 80300)
|
|
printfPQExpBuffer(&buf, _("Disabled user triggers:"));
|
|
else
|
|
printfPQExpBuffer(&buf, _("Disabled triggers:"));
|
|
break;
|
|
case 2:
|
|
printfPQExpBuffer(&buf, _("Disabled internal triggers:"));
|
|
break;
|
|
case 3:
|
|
printfPQExpBuffer(&buf, _("Triggers firing always:"));
|
|
break;
|
|
case 4:
|
|
printfPQExpBuffer(&buf, _("Triggers firing on replica only:"));
|
|
break;
|
|
|
|
}
|
|
printTableAddFooter(&cont, buf.data);
|
|
have_heading = true;
|
|
}
|
|
|
|
/* Everything after "TRIGGER" is echoed verbatim */
|
|
tgdef = PQgetvalue(result, i, 1);
|
|
usingpos = strstr(tgdef, " TRIGGER ");
|
|
if (usingpos)
|
|
tgdef = usingpos + 9;
|
|
|
|
printfPQExpBuffer(&buf, " %s", tgdef);
|
|
printTableAddFooter(&cont, buf.data);
|
|
}
|
|
}
|
|
}
|
|
PQclear(result);
|
|
}
|
|
|
|
/*
|
|
* Finish printing the footer information about a table.
|
|
*/
|
|
if (tableinfo.relkind == RELKIND_RELATION ||
|
|
tableinfo.relkind == RELKIND_MATVIEW ||
|
|
tableinfo.relkind == RELKIND_FOREIGN_TABLE ||
|
|
tableinfo.relkind == RELKIND_PARTITIONED_TABLE)
|
|
{
|
|
PGresult *result;
|
|
int tuples;
|
|
|
|
/* print foreign server name */
|
|
if (tableinfo.relkind == RELKIND_FOREIGN_TABLE)
|
|
{
|
|
char *ftoptions;
|
|
|
|
/* Footer information about foreign table */
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT s.srvname,\n"
|
|
" pg_catalog.array_to_string(ARRAY(\n"
|
|
" SELECT pg_catalog.quote_ident(option_name)"
|
|
" || ' ' || pg_catalog.quote_literal(option_value)\n"
|
|
" FROM pg_catalog.pg_options_to_table(ftoptions)), ', ')\n"
|
|
"FROM pg_catalog.pg_foreign_table f,\n"
|
|
" pg_catalog.pg_foreign_server s\n"
|
|
"WHERE f.ftrelid = '%s' AND s.oid = f.ftserver;",
|
|
oid);
|
|
result = PSQLexec(buf.data);
|
|
if (!result)
|
|
goto error_return;
|
|
else if (PQntuples(result) != 1)
|
|
{
|
|
PQclear(result);
|
|
goto error_return;
|
|
}
|
|
|
|
/* Print server name */
|
|
printfPQExpBuffer(&buf, _("Server: %s"),
|
|
PQgetvalue(result, 0, 0));
|
|
printTableAddFooter(&cont, buf.data);
|
|
|
|
/* Print per-table FDW options, if any */
|
|
ftoptions = PQgetvalue(result, 0, 1);
|
|
if (ftoptions && ftoptions[0] != '\0')
|
|
{
|
|
printfPQExpBuffer(&buf, _("FDW options: (%s)"), ftoptions);
|
|
printTableAddFooter(&cont, buf.data);
|
|
}
|
|
PQclear(result);
|
|
}
|
|
|
|
/* print inherited tables (exclude, if parent is a partitioned table) */
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT c.oid::pg_catalog.regclass"
|
|
" FROM pg_catalog.pg_class c, pg_catalog.pg_inherits i"
|
|
" WHERE c.oid=i.inhparent AND i.inhrelid = '%s'"
|
|
" AND c.relkind != " CppAsString2(RELKIND_PARTITIONED_TABLE)
|
|
" ORDER BY inhseqno;", oid);
|
|
|
|
result = PSQLexec(buf.data);
|
|
if (!result)
|
|
goto error_return;
|
|
else
|
|
{
|
|
const char *s = _("Inherits");
|
|
int sw = pg_wcswidth(s, strlen(s), pset.encoding);
|
|
|
|
tuples = PQntuples(result);
|
|
|
|
for (i = 0; i < tuples; i++)
|
|
{
|
|
if (i == 0)
|
|
printfPQExpBuffer(&buf, "%s: %s",
|
|
s, PQgetvalue(result, i, 0));
|
|
else
|
|
printfPQExpBuffer(&buf, "%*s %s",
|
|
sw, "", PQgetvalue(result, i, 0));
|
|
if (i < tuples - 1)
|
|
appendPQExpBufferChar(&buf, ',');
|
|
|
|
printTableAddFooter(&cont, buf.data);
|
|
}
|
|
|
|
PQclear(result);
|
|
}
|
|
|
|
/* print child tables (with additional info if partitions) */
|
|
if (pset.sversion >= 100000)
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT c.oid::pg_catalog.regclass,"
|
|
" pg_catalog.pg_get_expr(c.relpartbound, c.oid),"
|
|
" c.relkind"
|
|
" FROM pg_catalog.pg_class c, pg_catalog.pg_inherits i"
|
|
" WHERE c.oid=i.inhrelid AND i.inhparent = '%s'"
|
|
" ORDER BY pg_catalog.pg_get_expr(c.relpartbound, c.oid) = 'DEFAULT',"
|
|
" c.oid::pg_catalog.regclass::pg_catalog.text;", oid);
|
|
else if (pset.sversion >= 80300)
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT c.oid::pg_catalog.regclass"
|
|
" FROM pg_catalog.pg_class c, pg_catalog.pg_inherits i"
|
|
" WHERE c.oid=i.inhrelid AND i.inhparent = '%s'"
|
|
" ORDER BY c.oid::pg_catalog.regclass::pg_catalog.text;", oid);
|
|
else
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT c.oid::pg_catalog.regclass"
|
|
" FROM pg_catalog.pg_class c, pg_catalog.pg_inherits i"
|
|
" WHERE c.oid=i.inhrelid AND i.inhparent = '%s'"
|
|
" ORDER BY c.relname;", oid);
|
|
|
|
result = PSQLexec(buf.data);
|
|
if (!result)
|
|
goto error_return;
|
|
else
|
|
tuples = PQntuples(result);
|
|
|
|
/*
|
|
* For a partitioned table with no partitions, always print the number
|
|
* of partitions as zero, even when verbose output is expected.
|
|
* Otherwise, we will not print "Partitions" section for a partitioned
|
|
* table without any partitions.
|
|
*/
|
|
if (tableinfo.relkind == RELKIND_PARTITIONED_TABLE && tuples == 0)
|
|
{
|
|
printfPQExpBuffer(&buf, _("Number of partitions: %d"), tuples);
|
|
printTableAddFooter(&cont, buf.data);
|
|
}
|
|
else if (!verbose)
|
|
{
|
|
/* print the number of child tables, if any */
|
|
if (tuples > 0)
|
|
{
|
|
if (tableinfo.relkind != RELKIND_PARTITIONED_TABLE)
|
|
printfPQExpBuffer(&buf, _("Number of child tables: %d (Use \\d+ to list them.)"), tuples);
|
|
else
|
|
printfPQExpBuffer(&buf, _("Number of partitions: %d (Use \\d+ to list them.)"), tuples);
|
|
printTableAddFooter(&cont, buf.data);
|
|
}
|
|
}
|
|
else
|
|
{
|
|
/* display the list of child tables */
|
|
const char *ct = (tableinfo.relkind != RELKIND_PARTITIONED_TABLE) ?
|
|
_("Child tables") : _("Partitions");
|
|
int ctw = pg_wcswidth(ct, strlen(ct), pset.encoding);
|
|
|
|
for (i = 0; i < tuples; i++)
|
|
{
|
|
if (tableinfo.relkind != RELKIND_PARTITIONED_TABLE)
|
|
{
|
|
if (i == 0)
|
|
printfPQExpBuffer(&buf, "%s: %s",
|
|
ct, PQgetvalue(result, i, 0));
|
|
else
|
|
printfPQExpBuffer(&buf, "%*s %s",
|
|
ctw, "", PQgetvalue(result, i, 0));
|
|
}
|
|
else
|
|
{
|
|
char *partitioned_note;
|
|
|
|
if (*PQgetvalue(result, i, 2) == RELKIND_PARTITIONED_TABLE)
|
|
partitioned_note = ", PARTITIONED";
|
|
else
|
|
partitioned_note = "";
|
|
|
|
if (i == 0)
|
|
printfPQExpBuffer(&buf, "%s: %s %s%s",
|
|
ct, PQgetvalue(result, i, 0), PQgetvalue(result, i, 1),
|
|
partitioned_note);
|
|
else
|
|
printfPQExpBuffer(&buf, "%*s %s %s%s",
|
|
ctw, "", PQgetvalue(result, i, 0), PQgetvalue(result, i, 1),
|
|
partitioned_note);
|
|
}
|
|
if (i < tuples - 1)
|
|
appendPQExpBufferChar(&buf, ',');
|
|
|
|
printTableAddFooter(&cont, buf.data);
|
|
}
|
|
}
|
|
PQclear(result);
|
|
|
|
/* Table type */
|
|
if (tableinfo.reloftype)
|
|
{
|
|
printfPQExpBuffer(&buf, _("Typed table of type: %s"), tableinfo.reloftype);
|
|
printTableAddFooter(&cont, buf.data);
|
|
}
|
|
|
|
if (verbose &&
|
|
(tableinfo.relkind == RELKIND_RELATION ||
|
|
tableinfo.relkind == RELKIND_MATVIEW) &&
|
|
|
|
/*
|
|
* No need to display default values; we already display a REPLICA
|
|
* IDENTITY marker on indexes.
|
|
*/
|
|
tableinfo.relreplident != 'i' &&
|
|
((strcmp(schemaname, "pg_catalog") != 0 && tableinfo.relreplident != 'd') ||
|
|
(strcmp(schemaname, "pg_catalog") == 0 && tableinfo.relreplident != 'n')))
|
|
{
|
|
const char *s = _("Replica Identity");
|
|
|
|
printfPQExpBuffer(&buf, "%s: %s",
|
|
s,
|
|
tableinfo.relreplident == 'f' ? "FULL" :
|
|
tableinfo.relreplident == 'n' ? "NOTHING" :
|
|
"???");
|
|
|
|
printTableAddFooter(&cont, buf.data);
|
|
}
|
|
|
|
/* OIDs, if verbose and not a materialized view */
|
|
if (verbose && tableinfo.relkind != RELKIND_MATVIEW && tableinfo.hasoids)
|
|
printTableAddFooter(&cont, _("Has OIDs: yes"));
|
|
|
|
/* Tablespace info */
|
|
add_tablespace_footer(&cont, tableinfo.relkind, tableinfo.tablespace,
|
|
true);
|
|
}
|
|
|
|
/* reloptions, if verbose */
|
|
if (verbose &&
|
|
tableinfo.reloptions && tableinfo.reloptions[0] != '\0')
|
|
{
|
|
const char *t = _("Options");
|
|
|
|
printfPQExpBuffer(&buf, "%s: %s", t, tableinfo.reloptions);
|
|
printTableAddFooter(&cont, buf.data);
|
|
}
|
|
|
|
printTable(&cont, pset.queryFout, false, pset.logfile);
|
|
|
|
retval = true;
|
|
|
|
error_return:
|
|
|
|
/* clean up */
|
|
if (printTableInitialized)
|
|
printTableCleanup(&cont);
|
|
termPQExpBuffer(&buf);
|
|
termPQExpBuffer(&title);
|
|
termPQExpBuffer(&tmpbuf);
|
|
|
|
if (view_def)
|
|
free(view_def);
|
|
|
|
if (res)
|
|
PQclear(res);
|
|
|
|
return retval;
|
|
}
|
|
|
|
/*
|
|
* Add a tablespace description to a footer. If 'newline' is true, it is added
|
|
* in a new line; otherwise it's appended to the current value of the last
|
|
* footer.
|
|
*/
|
|
static void
|
|
add_tablespace_footer(printTableContent *const cont, char relkind,
|
|
Oid tablespace, const bool newline)
|
|
{
|
|
/* relkinds for which we support tablespaces */
|
|
if (relkind == RELKIND_RELATION ||
|
|
relkind == RELKIND_MATVIEW ||
|
|
relkind == RELKIND_INDEX ||
|
|
relkind == RELKIND_PARTITIONED_TABLE)
|
|
{
|
|
/*
|
|
* We ignore the database default tablespace so that users not using
|
|
* tablespaces don't need to know about them. This case also covers
|
|
* pre-8.0 servers, for which tablespace will always be 0.
|
|
*/
|
|
if (tablespace != 0)
|
|
{
|
|
PGresult *result = NULL;
|
|
PQExpBufferData buf;
|
|
|
|
initPQExpBuffer(&buf);
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT spcname FROM pg_catalog.pg_tablespace\n"
|
|
"WHERE oid = '%u';", tablespace);
|
|
result = PSQLexec(buf.data);
|
|
if (!result)
|
|
{
|
|
termPQExpBuffer(&buf);
|
|
return;
|
|
}
|
|
/* Should always be the case, but.... */
|
|
if (PQntuples(result) > 0)
|
|
{
|
|
if (newline)
|
|
{
|
|
/* Add the tablespace as a new footer */
|
|
printfPQExpBuffer(&buf, _("Tablespace: \"%s\""),
|
|
PQgetvalue(result, 0, 0));
|
|
printTableAddFooter(cont, buf.data);
|
|
}
|
|
else
|
|
{
|
|
/* Append the tablespace to the latest footer */
|
|
printfPQExpBuffer(&buf, "%s", cont->footer->data);
|
|
|
|
/*-------
|
|
translator: before this string there's an index description like
|
|
'"foo_pkey" PRIMARY KEY, btree (a)' */
|
|
appendPQExpBuffer(&buf, _(", tablespace \"%s\""),
|
|
PQgetvalue(result, 0, 0));
|
|
printTableSetFooter(cont, buf.data);
|
|
}
|
|
}
|
|
PQclear(result);
|
|
termPQExpBuffer(&buf);
|
|
}
|
|
}
|
|
}
|
|
|
|
/*
|
|
* \du or \dg
|
|
*
|
|
* Describes roles. Any schema portion of the pattern is ignored.
|
|
*/
|
|
bool
|
|
describeRoles(const char *pattern, bool verbose, bool showSystem)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printTableContent cont;
|
|
printTableOpt myopt = pset.popt.topt;
|
|
int ncols = 3;
|
|
int nrows = 0;
|
|
int i;
|
|
int conns;
|
|
const char align = 'l';
|
|
char **attr;
|
|
|
|
myopt.default_footer = false;
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
if (pset.sversion >= 80100)
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT r.rolname, r.rolsuper, r.rolinherit,\n"
|
|
" r.rolcreaterole, r.rolcreatedb, r.rolcanlogin,\n"
|
|
" r.rolconnlimit, r.rolvaliduntil,\n"
|
|
" ARRAY(SELECT b.rolname\n"
|
|
" FROM pg_catalog.pg_auth_members m\n"
|
|
" JOIN pg_catalog.pg_roles b ON (m.roleid = b.oid)\n"
|
|
" WHERE m.member = r.oid) as memberof");
|
|
|
|
if (verbose && pset.sversion >= 80200)
|
|
{
|
|
appendPQExpBufferStr(&buf, "\n, pg_catalog.shobj_description(r.oid, 'pg_authid') AS description");
|
|
ncols++;
|
|
}
|
|
if (pset.sversion >= 90100)
|
|
{
|
|
appendPQExpBufferStr(&buf, "\n, r.rolreplication");
|
|
}
|
|
|
|
if (pset.sversion >= 90500)
|
|
{
|
|
appendPQExpBufferStr(&buf, "\n, r.rolbypassrls");
|
|
}
|
|
|
|
appendPQExpBufferStr(&buf, "\nFROM pg_catalog.pg_roles r\n");
|
|
|
|
if (!showSystem && !pattern)
|
|
appendPQExpBufferStr(&buf, "WHERE r.rolname !~ '^pg_'\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
NULL, "r.rolname", NULL, NULL);
|
|
}
|
|
else
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT u.usename AS rolname,\n"
|
|
" u.usesuper AS rolsuper,\n"
|
|
" true AS rolinherit, false AS rolcreaterole,\n"
|
|
" u.usecreatedb AS rolcreatedb, true AS rolcanlogin,\n"
|
|
" -1 AS rolconnlimit,"
|
|
" u.valuntil as rolvaliduntil,\n"
|
|
" ARRAY(SELECT g.groname FROM pg_catalog.pg_group g WHERE u.usesysid = ANY(g.grolist)) as memberof"
|
|
"\nFROM pg_catalog.pg_user u\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
NULL, "u.usename", NULL, NULL);
|
|
}
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
if (!res)
|
|
return false;
|
|
|
|
nrows = PQntuples(res);
|
|
attr = pg_malloc0((nrows + 1) * sizeof(*attr));
|
|
|
|
printTableInit(&cont, &myopt, _("List of roles"), ncols, nrows);
|
|
|
|
printTableAddHeader(&cont, gettext_noop("Role name"), true, align);
|
|
printTableAddHeader(&cont, gettext_noop("Attributes"), true, align);
|
|
printTableAddHeader(&cont, gettext_noop("Member of"), true, align);
|
|
|
|
if (verbose && pset.sversion >= 80200)
|
|
printTableAddHeader(&cont, gettext_noop("Description"), true, align);
|
|
|
|
for (i = 0; i < nrows; i++)
|
|
{
|
|
printTableAddCell(&cont, PQgetvalue(res, i, 0), false, false);
|
|
|
|
resetPQExpBuffer(&buf);
|
|
if (strcmp(PQgetvalue(res, i, 1), "t") == 0)
|
|
add_role_attribute(&buf, _("Superuser"));
|
|
|
|
if (strcmp(PQgetvalue(res, i, 2), "t") != 0)
|
|
add_role_attribute(&buf, _("No inheritance"));
|
|
|
|
if (strcmp(PQgetvalue(res, i, 3), "t") == 0)
|
|
add_role_attribute(&buf, _("Create role"));
|
|
|
|
if (strcmp(PQgetvalue(res, i, 4), "t") == 0)
|
|
add_role_attribute(&buf, _("Create DB"));
|
|
|
|
if (strcmp(PQgetvalue(res, i, 5), "t") != 0)
|
|
add_role_attribute(&buf, _("Cannot login"));
|
|
|
|
if (pset.sversion >= 90100)
|
|
if (strcmp(PQgetvalue(res, i, (verbose ? 10 : 9)), "t") == 0)
|
|
add_role_attribute(&buf, _("Replication"));
|
|
|
|
if (pset.sversion >= 90500)
|
|
if (strcmp(PQgetvalue(res, i, (verbose ? 11 : 10)), "t") == 0)
|
|
add_role_attribute(&buf, _("Bypass RLS"));
|
|
|
|
conns = atoi(PQgetvalue(res, i, 6));
|
|
if (conns >= 0)
|
|
{
|
|
if (buf.len > 0)
|
|
appendPQExpBufferChar(&buf, '\n');
|
|
|
|
if (conns == 0)
|
|
appendPQExpBufferStr(&buf, _("No connections"));
|
|
else
|
|
appendPQExpBuffer(&buf, ngettext("%d connection",
|
|
"%d connections",
|
|
conns),
|
|
conns);
|
|
}
|
|
|
|
if (strcmp(PQgetvalue(res, i, 7), "") != 0)
|
|
{
|
|
if (buf.len > 0)
|
|
appendPQExpBufferChar(&buf, '\n');
|
|
appendPQExpBufferStr(&buf, _("Password valid until "));
|
|
appendPQExpBufferStr(&buf, PQgetvalue(res, i, 7));
|
|
}
|
|
|
|
attr[i] = pg_strdup(buf.data);
|
|
|
|
printTableAddCell(&cont, attr[i], false, false);
|
|
|
|
printTableAddCell(&cont, PQgetvalue(res, i, 8), false, false);
|
|
|
|
if (verbose && pset.sversion >= 80200)
|
|
printTableAddCell(&cont, PQgetvalue(res, i, 9), false, false);
|
|
}
|
|
termPQExpBuffer(&buf);
|
|
|
|
printTable(&cont, pset.queryFout, false, pset.logfile);
|
|
printTableCleanup(&cont);
|
|
|
|
for (i = 0; i < nrows; i++)
|
|
free(attr[i]);
|
|
free(attr);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
static void
|
|
add_role_attribute(PQExpBuffer buf, const char *const str)
|
|
{
|
|
if (buf->len > 0)
|
|
appendPQExpBufferStr(buf, ", ");
|
|
|
|
appendPQExpBufferStr(buf, str);
|
|
}
|
|
|
|
/*
|
|
* \drds
|
|
*/
|
|
bool
|
|
listDbRoleSettings(const char *pattern, const char *pattern2)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
bool havewhere;
|
|
|
|
if (pset.sversion < 90000)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("The server (version %s) does not support per-database role settings.\n",
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf, "SELECT rolname AS \"%s\", datname AS \"%s\",\n"
|
|
"pg_catalog.array_to_string(setconfig, E'\\n') AS \"%s\"\n"
|
|
"FROM pg_catalog.pg_db_role_setting s\n"
|
|
"LEFT JOIN pg_catalog.pg_database d ON d.oid = setdatabase\n"
|
|
"LEFT JOIN pg_catalog.pg_roles r ON r.oid = setrole\n",
|
|
gettext_noop("Role"),
|
|
gettext_noop("Database"),
|
|
gettext_noop("Settings"));
|
|
havewhere = processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
NULL, "r.rolname", NULL, NULL);
|
|
processSQLNamePattern(pset.db, &buf, pattern2, havewhere, false,
|
|
NULL, "d.datname", NULL, NULL);
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1, 2;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
/*
|
|
* Most functions in this file are content to print an empty table when
|
|
* there are no matching objects. We intentionally deviate from that
|
|
* here, but only in !quiet mode, because of the possibility that the user
|
|
* is confused about what the two pattern arguments mean.
|
|
*/
|
|
if (PQntuples(res) == 0 && !pset.quiet)
|
|
{
|
|
if (pattern && pattern2)
|
|
psql_error("Did not find any settings for role \"%s\" and database \"%s\".\n",
|
|
pattern, pattern2);
|
|
else if (pattern)
|
|
psql_error("Did not find any settings for role \"%s\".\n",
|
|
pattern);
|
|
else
|
|
psql_error("Did not find any settings.\n");
|
|
}
|
|
else
|
|
{
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of settings");
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
}
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
|
|
/*
|
|
* listTables()
|
|
*
|
|
* handler for \dt, \di, etc.
|
|
*
|
|
* tabtypes is an array of characters, specifying what info is desired:
|
|
* t - tables
|
|
* i - indexes
|
|
* v - views
|
|
* m - materialized views
|
|
* s - sequences
|
|
* E - foreign table (Note: different from 'f', the relkind value)
|
|
* (any order of the above is fine)
|
|
*/
|
|
bool
|
|
listTables(const char *tabtypes, const char *pattern, bool verbose, bool showSystem)
|
|
{
|
|
bool showTables = strchr(tabtypes, 't') != NULL;
|
|
bool showIndexes = strchr(tabtypes, 'i') != NULL;
|
|
bool showViews = strchr(tabtypes, 'v') != NULL;
|
|
bool showMatViews = strchr(tabtypes, 'm') != NULL;
|
|
bool showSeq = strchr(tabtypes, 's') != NULL;
|
|
bool showForeign = strchr(tabtypes, 'E') != NULL;
|
|
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
static const bool translate_columns[] = {false, false, true, false, false, false, false};
|
|
|
|
/* If tabtypes is empty, we default to \dtvmsE (but see also command.c) */
|
|
if (!(showTables || showIndexes || showViews || showMatViews || showSeq || showForeign))
|
|
showTables = showViews = showMatViews = showSeq = showForeign = true;
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
/*
|
|
* Note: as of Pg 8.2, we no longer use relkind 's' (special), but we keep
|
|
* it here for backwards compatibility.
|
|
*/
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT n.nspname as \"%s\",\n"
|
|
" c.relname as \"%s\",\n"
|
|
" CASE c.relkind"
|
|
" WHEN " CppAsString2(RELKIND_RELATION) " THEN '%s'"
|
|
" WHEN " CppAsString2(RELKIND_VIEW) " THEN '%s'"
|
|
" WHEN " CppAsString2(RELKIND_MATVIEW) " THEN '%s'"
|
|
" WHEN " CppAsString2(RELKIND_INDEX) " THEN '%s'"
|
|
" WHEN " CppAsString2(RELKIND_SEQUENCE) " THEN '%s'"
|
|
" WHEN 's' THEN '%s'"
|
|
" WHEN " CppAsString2(RELKIND_FOREIGN_TABLE) " THEN '%s'"
|
|
" WHEN " CppAsString2(RELKIND_PARTITIONED_TABLE) " THEN '%s'"
|
|
" WHEN " CppAsString2(RELKIND_PARTITIONED_INDEX) " THEN '%s'"
|
|
" END as \"%s\",\n"
|
|
" pg_catalog.pg_get_userbyid(c.relowner) as \"%s\"",
|
|
gettext_noop("Schema"),
|
|
gettext_noop("Name"),
|
|
gettext_noop("table"),
|
|
gettext_noop("view"),
|
|
gettext_noop("materialized view"),
|
|
gettext_noop("index"),
|
|
gettext_noop("sequence"),
|
|
gettext_noop("special"),
|
|
gettext_noop("foreign table"),
|
|
gettext_noop("table"), /* partitioned table */
|
|
gettext_noop("index"), /* partitioned index */
|
|
gettext_noop("Type"),
|
|
gettext_noop("Owner"));
|
|
|
|
if (showIndexes)
|
|
appendPQExpBuffer(&buf,
|
|
",\n c2.relname as \"%s\"",
|
|
gettext_noop("Table"));
|
|
|
|
if (verbose)
|
|
{
|
|
/*
|
|
* As of PostgreSQL 9.0, use pg_table_size() to show a more accurate
|
|
* size of a table, including FSM, VM and TOAST tables.
|
|
*/
|
|
if (pset.sversion >= 90000)
|
|
appendPQExpBuffer(&buf,
|
|
",\n pg_catalog.pg_size_pretty(pg_catalog.pg_table_size(c.oid)) as \"%s\"",
|
|
gettext_noop("Size"));
|
|
else if (pset.sversion >= 80100)
|
|
appendPQExpBuffer(&buf,
|
|
",\n pg_catalog.pg_size_pretty(pg_catalog.pg_relation_size(c.oid)) as \"%s\"",
|
|
gettext_noop("Size"));
|
|
|
|
appendPQExpBuffer(&buf,
|
|
",\n pg_catalog.obj_description(c.oid, 'pg_class') as \"%s\"",
|
|
gettext_noop("Description"));
|
|
}
|
|
|
|
appendPQExpBufferStr(&buf,
|
|
"\nFROM pg_catalog.pg_class c"
|
|
"\n LEFT JOIN pg_catalog.pg_namespace n ON n.oid = c.relnamespace");
|
|
if (showIndexes)
|
|
appendPQExpBufferStr(&buf,
|
|
"\n LEFT JOIN pg_catalog.pg_index i ON i.indexrelid = c.oid"
|
|
"\n LEFT JOIN pg_catalog.pg_class c2 ON i.indrelid = c2.oid");
|
|
|
|
appendPQExpBufferStr(&buf, "\nWHERE c.relkind IN (");
|
|
if (showTables)
|
|
appendPQExpBufferStr(&buf, CppAsString2(RELKIND_RELATION) ","
|
|
CppAsString2(RELKIND_PARTITIONED_TABLE) ",");
|
|
if (showViews)
|
|
appendPQExpBufferStr(&buf, CppAsString2(RELKIND_VIEW) ",");
|
|
if (showMatViews)
|
|
appendPQExpBufferStr(&buf, CppAsString2(RELKIND_MATVIEW) ",");
|
|
if (showIndexes)
|
|
appendPQExpBufferStr(&buf, CppAsString2(RELKIND_INDEX) ","
|
|
CppAsString2(RELKIND_PARTITIONED_INDEX) ",");
|
|
if (showSeq)
|
|
appendPQExpBufferStr(&buf, CppAsString2(RELKIND_SEQUENCE) ",");
|
|
if (showSystem || pattern)
|
|
appendPQExpBufferStr(&buf, "'s',"); /* was RELKIND_SPECIAL */
|
|
if (showForeign)
|
|
appendPQExpBufferStr(&buf, CppAsString2(RELKIND_FOREIGN_TABLE) ",");
|
|
|
|
appendPQExpBufferStr(&buf, "''"); /* dummy */
|
|
appendPQExpBufferStr(&buf, ")\n");
|
|
|
|
if (!showSystem && !pattern)
|
|
appendPQExpBufferStr(&buf, " AND n.nspname <> 'pg_catalog'\n"
|
|
" AND n.nspname <> 'information_schema'\n");
|
|
|
|
/*
|
|
* TOAST objects are suppressed unconditionally. Since we don't provide
|
|
* any way to select RELKIND_TOASTVALUE above, we would never show toast
|
|
* tables in any case; it seems a bit confusing to allow their indexes to
|
|
* be shown. Use plain \d if you really need to look at a TOAST
|
|
* table/index.
|
|
*/
|
|
appendPQExpBufferStr(&buf, " AND n.nspname !~ '^pg_toast'\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, true, false,
|
|
"n.nspname", "c.relname", NULL,
|
|
"pg_catalog.pg_table_is_visible(c.oid)");
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1,2;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
/*
|
|
* Most functions in this file are content to print an empty table when
|
|
* there are no matching objects. We intentionally deviate from that
|
|
* here, but only in !quiet mode, for historical reasons.
|
|
*/
|
|
if (PQntuples(res) == 0 && !pset.quiet)
|
|
{
|
|
if (pattern)
|
|
psql_error("Did not find any relation named \"%s\".\n",
|
|
pattern);
|
|
else
|
|
psql_error("Did not find any relations.\n");
|
|
}
|
|
else
|
|
{
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of relations");
|
|
myopt.translate_header = true;
|
|
myopt.translate_columns = translate_columns;
|
|
myopt.n_translate_columns = lengthof(translate_columns);
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
}
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
|
|
/*
|
|
* \dL
|
|
*
|
|
* Describes languages.
|
|
*/
|
|
bool
|
|
listLanguages(const char *pattern, bool verbose, bool showSystem)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT l.lanname AS \"%s\",\n",
|
|
gettext_noop("Name"));
|
|
if (pset.sversion >= 80300)
|
|
appendPQExpBuffer(&buf,
|
|
" pg_catalog.pg_get_userbyid(l.lanowner) as \"%s\",\n",
|
|
gettext_noop("Owner"));
|
|
|
|
appendPQExpBuffer(&buf,
|
|
" l.lanpltrusted AS \"%s\"",
|
|
gettext_noop("Trusted"));
|
|
|
|
if (verbose)
|
|
{
|
|
appendPQExpBuffer(&buf,
|
|
",\n NOT l.lanispl AS \"%s\",\n"
|
|
" l.lanplcallfoid::pg_catalog.regprocedure AS \"%s\",\n"
|
|
" l.lanvalidator::pg_catalog.regprocedure AS \"%s\",\n ",
|
|
gettext_noop("Internal language"),
|
|
gettext_noop("Call handler"),
|
|
gettext_noop("Validator"));
|
|
if (pset.sversion >= 90000)
|
|
appendPQExpBuffer(&buf, "l.laninline::pg_catalog.regprocedure AS \"%s\",\n ",
|
|
gettext_noop("Inline handler"));
|
|
printACLColumn(&buf, "l.lanacl");
|
|
}
|
|
|
|
appendPQExpBuffer(&buf,
|
|
",\n d.description AS \"%s\""
|
|
"\nFROM pg_catalog.pg_language l\n"
|
|
"LEFT JOIN pg_catalog.pg_description d\n"
|
|
" ON d.classoid = l.tableoid AND d.objoid = l.oid\n"
|
|
" AND d.objsubid = 0\n",
|
|
gettext_noop("Description"));
|
|
|
|
if (pattern)
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
NULL, "l.lanname", NULL, NULL);
|
|
|
|
if (!showSystem && !pattern)
|
|
appendPQExpBufferStr(&buf, "WHERE l.lanplcallfoid != 0\n");
|
|
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of languages");
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
|
|
/*
|
|
* \dD
|
|
*
|
|
* Describes domains.
|
|
*/
|
|
bool
|
|
listDomains(const char *pattern, bool verbose, bool showSystem)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT n.nspname as \"%s\",\n"
|
|
" t.typname as \"%s\",\n"
|
|
" pg_catalog.format_type(t.typbasetype, t.typtypmod) as \"%s\",\n",
|
|
gettext_noop("Schema"),
|
|
gettext_noop("Name"),
|
|
gettext_noop("Type"));
|
|
|
|
if (pset.sversion >= 90100)
|
|
appendPQExpBuffer(&buf,
|
|
" (SELECT c.collname FROM pg_catalog.pg_collation c, pg_catalog.pg_type bt\n"
|
|
" WHERE c.oid = t.typcollation AND bt.oid = t.typbasetype AND t.typcollation <> bt.typcollation) as \"%s\",\n",
|
|
gettext_noop("Collation"));
|
|
appendPQExpBuffer(&buf,
|
|
" CASE WHEN t.typnotnull THEN 'not null' END as \"%s\",\n"
|
|
" t.typdefault as \"%s\",\n"
|
|
" pg_catalog.array_to_string(ARRAY(\n"
|
|
" SELECT pg_catalog.pg_get_constraintdef(r.oid, true) FROM pg_catalog.pg_constraint r WHERE t.oid = r.contypid\n"
|
|
" ), ' ') as \"%s\"",
|
|
gettext_noop("Nullable"),
|
|
gettext_noop("Default"),
|
|
gettext_noop("Check"));
|
|
|
|
if (verbose)
|
|
{
|
|
if (pset.sversion >= 90200)
|
|
{
|
|
appendPQExpBufferStr(&buf, ",\n ");
|
|
printACLColumn(&buf, "t.typacl");
|
|
}
|
|
appendPQExpBuffer(&buf,
|
|
",\n d.description as \"%s\"",
|
|
gettext_noop("Description"));
|
|
}
|
|
|
|
appendPQExpBufferStr(&buf,
|
|
"\nFROM pg_catalog.pg_type t\n"
|
|
" LEFT JOIN pg_catalog.pg_namespace n ON n.oid = t.typnamespace\n");
|
|
|
|
if (verbose)
|
|
appendPQExpBufferStr(&buf,
|
|
" LEFT JOIN pg_catalog.pg_description d "
|
|
"ON d.classoid = t.tableoid AND d.objoid = t.oid "
|
|
"AND d.objsubid = 0\n");
|
|
|
|
appendPQExpBufferStr(&buf, "WHERE t.typtype = 'd'\n");
|
|
|
|
if (!showSystem && !pattern)
|
|
appendPQExpBufferStr(&buf, " AND n.nspname <> 'pg_catalog'\n"
|
|
" AND n.nspname <> 'information_schema'\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, true, false,
|
|
"n.nspname", "t.typname", NULL,
|
|
"pg_catalog.pg_type_is_visible(t.oid)");
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1, 2;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of domains");
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* \dc
|
|
*
|
|
* Describes conversions.
|
|
*/
|
|
bool
|
|
listConversions(const char *pattern, bool verbose, bool showSystem)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
static const bool translate_columns[] =
|
|
{false, false, false, false, true, false};
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT n.nspname AS \"%s\",\n"
|
|
" c.conname AS \"%s\",\n"
|
|
" pg_catalog.pg_encoding_to_char(c.conforencoding) AS \"%s\",\n"
|
|
" pg_catalog.pg_encoding_to_char(c.contoencoding) AS \"%s\",\n"
|
|
" CASE WHEN c.condefault THEN '%s'\n"
|
|
" ELSE '%s' END AS \"%s\"",
|
|
gettext_noop("Schema"),
|
|
gettext_noop("Name"),
|
|
gettext_noop("Source"),
|
|
gettext_noop("Destination"),
|
|
gettext_noop("yes"), gettext_noop("no"),
|
|
gettext_noop("Default?"));
|
|
|
|
if (verbose)
|
|
appendPQExpBuffer(&buf,
|
|
",\n d.description AS \"%s\"",
|
|
gettext_noop("Description"));
|
|
|
|
appendPQExpBufferStr(&buf,
|
|
"\nFROM pg_catalog.pg_conversion c\n"
|
|
" JOIN pg_catalog.pg_namespace n "
|
|
"ON n.oid = c.connamespace\n");
|
|
|
|
if (verbose)
|
|
appendPQExpBufferStr(&buf,
|
|
"LEFT JOIN pg_catalog.pg_description d "
|
|
"ON d.classoid = c.tableoid\n"
|
|
" AND d.objoid = c.oid "
|
|
"AND d.objsubid = 0\n");
|
|
|
|
appendPQExpBufferStr(&buf, "WHERE true\n");
|
|
|
|
if (!showSystem && !pattern)
|
|
appendPQExpBufferStr(&buf, " AND n.nspname <> 'pg_catalog'\n"
|
|
" AND n.nspname <> 'information_schema'\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, true, false,
|
|
"n.nspname", "c.conname", NULL,
|
|
"pg_catalog.pg_conversion_is_visible(c.oid)");
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1, 2;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of conversions");
|
|
myopt.translate_header = true;
|
|
myopt.translate_columns = translate_columns;
|
|
myopt.n_translate_columns = lengthof(translate_columns);
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* \dy
|
|
*
|
|
* Describes Event Triggers.
|
|
*/
|
|
bool
|
|
listEventTriggers(const char *pattern, bool verbose)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
static const bool translate_columns[] =
|
|
{false, false, false, true, false, false, false};
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT evtname as \"%s\", "
|
|
"evtevent as \"%s\", "
|
|
"pg_catalog.pg_get_userbyid(e.evtowner) as \"%s\",\n"
|
|
" case evtenabled when 'O' then '%s'"
|
|
" when 'R' then '%s'"
|
|
" when 'A' then '%s'"
|
|
" when 'D' then '%s' end as \"%s\",\n"
|
|
" e.evtfoid::pg_catalog.regproc as \"%s\", "
|
|
"pg_catalog.array_to_string(array(select x"
|
|
" from pg_catalog.unnest(evttags) as t(x)), ', ') as \"%s\"",
|
|
gettext_noop("Name"),
|
|
gettext_noop("Event"),
|
|
gettext_noop("Owner"),
|
|
gettext_noop("enabled"),
|
|
gettext_noop("replica"),
|
|
gettext_noop("always"),
|
|
gettext_noop("disabled"),
|
|
gettext_noop("Enabled"),
|
|
gettext_noop("Function"),
|
|
gettext_noop("Tags"));
|
|
if (verbose)
|
|
appendPQExpBuffer(&buf,
|
|
",\npg_catalog.obj_description(e.oid, 'pg_event_trigger') as \"%s\"",
|
|
gettext_noop("Description"));
|
|
appendPQExpBufferStr(&buf,
|
|
"\nFROM pg_catalog.pg_event_trigger e ");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
NULL, "evtname", NULL, NULL);
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of event triggers");
|
|
myopt.translate_header = true;
|
|
myopt.translate_columns = translate_columns;
|
|
myopt.n_translate_columns = lengthof(translate_columns);
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* \dC
|
|
*
|
|
* Describes casts.
|
|
*/
|
|
bool
|
|
listCasts(const char *pattern, bool verbose)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
static const bool translate_columns[] = {false, false, false, true, false};
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT pg_catalog.format_type(castsource, NULL) AS \"%s\",\n"
|
|
" pg_catalog.format_type(casttarget, NULL) AS \"%s\",\n",
|
|
gettext_noop("Source type"),
|
|
gettext_noop("Target type"));
|
|
|
|
/*
|
|
* We don't attempt to localize '(binary coercible)' or '(with inout)',
|
|
* because there's too much risk of gettext translating a function name
|
|
* that happens to match some string in the PO database.
|
|
*/
|
|
if (pset.sversion >= 80400)
|
|
appendPQExpBuffer(&buf,
|
|
" CASE WHEN c.castmethod = '%c' THEN '(binary coercible)'\n"
|
|
" WHEN c.castmethod = '%c' THEN '(with inout)'\n"
|
|
" ELSE p.proname\n"
|
|
" END AS \"%s\",\n",
|
|
COERCION_METHOD_BINARY,
|
|
COERCION_METHOD_INOUT,
|
|
gettext_noop("Function"));
|
|
else
|
|
appendPQExpBuffer(&buf,
|
|
" CASE WHEN c.castfunc = 0 THEN '(binary coercible)'\n"
|
|
" ELSE p.proname\n"
|
|
" END AS \"%s\",\n",
|
|
gettext_noop("Function"));
|
|
|
|
appendPQExpBuffer(&buf,
|
|
" CASE WHEN c.castcontext = '%c' THEN '%s'\n"
|
|
" WHEN c.castcontext = '%c' THEN '%s'\n"
|
|
" ELSE '%s'\n"
|
|
" END AS \"%s\"",
|
|
COERCION_CODE_EXPLICIT,
|
|
gettext_noop("no"),
|
|
COERCION_CODE_ASSIGNMENT,
|
|
gettext_noop("in assignment"),
|
|
gettext_noop("yes"),
|
|
gettext_noop("Implicit?"));
|
|
|
|
if (verbose)
|
|
appendPQExpBuffer(&buf,
|
|
",\n d.description AS \"%s\"",
|
|
gettext_noop("Description"));
|
|
|
|
/*
|
|
* We need a left join to pg_proc for binary casts; the others are just
|
|
* paranoia.
|
|
*/
|
|
appendPQExpBufferStr(&buf,
|
|
"\nFROM pg_catalog.pg_cast c LEFT JOIN pg_catalog.pg_proc p\n"
|
|
" ON c.castfunc = p.oid\n"
|
|
" LEFT JOIN pg_catalog.pg_type ts\n"
|
|
" ON c.castsource = ts.oid\n"
|
|
" LEFT JOIN pg_catalog.pg_namespace ns\n"
|
|
" ON ns.oid = ts.typnamespace\n"
|
|
" LEFT JOIN pg_catalog.pg_type tt\n"
|
|
" ON c.casttarget = tt.oid\n"
|
|
" LEFT JOIN pg_catalog.pg_namespace nt\n"
|
|
" ON nt.oid = tt.typnamespace\n");
|
|
|
|
if (verbose)
|
|
appendPQExpBufferStr(&buf,
|
|
" LEFT JOIN pg_catalog.pg_description d\n"
|
|
" ON d.classoid = c.tableoid AND d.objoid = "
|
|
"c.oid AND d.objsubid = 0\n");
|
|
|
|
appendPQExpBufferStr(&buf, "WHERE ( (true");
|
|
|
|
/*
|
|
* Match name pattern against either internal or external name of either
|
|
* castsource or casttarget
|
|
*/
|
|
processSQLNamePattern(pset.db, &buf, pattern, true, false,
|
|
"ns.nspname", "ts.typname",
|
|
"pg_catalog.format_type(ts.oid, NULL)",
|
|
"pg_catalog.pg_type_is_visible(ts.oid)");
|
|
|
|
appendPQExpBufferStr(&buf, ") OR (true");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, true, false,
|
|
"nt.nspname", "tt.typname",
|
|
"pg_catalog.format_type(tt.oid, NULL)",
|
|
"pg_catalog.pg_type_is_visible(tt.oid)");
|
|
|
|
appendPQExpBufferStr(&buf, ") )\nORDER BY 1, 2;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of casts");
|
|
myopt.translate_header = true;
|
|
myopt.translate_columns = translate_columns;
|
|
myopt.n_translate_columns = lengthof(translate_columns);
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* \dO
|
|
*
|
|
* Describes collations.
|
|
*/
|
|
bool
|
|
listCollations(const char *pattern, bool verbose, bool showSystem)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
static const bool translate_columns[] = {false, false, false, false, false, false};
|
|
|
|
if (pset.sversion < 90100)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("The server (version %s) does not support collations.\n",
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT n.nspname AS \"%s\",\n"
|
|
" c.collname AS \"%s\",\n"
|
|
" c.collcollate AS \"%s\",\n"
|
|
" c.collctype AS \"%s\"",
|
|
gettext_noop("Schema"),
|
|
gettext_noop("Name"),
|
|
gettext_noop("Collate"),
|
|
gettext_noop("Ctype"));
|
|
|
|
if (pset.sversion >= 100000)
|
|
appendPQExpBuffer(&buf,
|
|
",\n CASE c.collprovider WHEN 'd' THEN 'default' WHEN 'c' THEN 'libc' WHEN 'i' THEN 'icu' END AS \"%s\"",
|
|
gettext_noop("Provider"));
|
|
|
|
if (verbose)
|
|
appendPQExpBuffer(&buf,
|
|
",\n pg_catalog.obj_description(c.oid, 'pg_collation') AS \"%s\"",
|
|
gettext_noop("Description"));
|
|
|
|
appendPQExpBufferStr(&buf,
|
|
"\nFROM pg_catalog.pg_collation c, pg_catalog.pg_namespace n\n"
|
|
"WHERE n.oid = c.collnamespace\n");
|
|
|
|
if (!showSystem && !pattern)
|
|
appendPQExpBufferStr(&buf, " AND n.nspname <> 'pg_catalog'\n"
|
|
" AND n.nspname <> 'information_schema'\n");
|
|
|
|
/*
|
|
* Hide collations that aren't usable in the current database's encoding.
|
|
* If you think to change this, note that pg_collation_is_visible rejects
|
|
* unusable collations, so you will need to hack name pattern processing
|
|
* somehow to avoid inconsistent behavior.
|
|
*/
|
|
appendPQExpBufferStr(&buf, " AND c.collencoding IN (-1, pg_catalog.pg_char_to_encoding(pg_catalog.getdatabaseencoding()))\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, true, false,
|
|
"n.nspname", "c.collname", NULL,
|
|
"pg_catalog.pg_collation_is_visible(c.oid)");
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1, 2;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of collations");
|
|
myopt.translate_header = true;
|
|
myopt.translate_columns = translate_columns;
|
|
myopt.n_translate_columns = lengthof(translate_columns);
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* \dn
|
|
*
|
|
* Describes schemas (namespaces)
|
|
*/
|
|
bool
|
|
listSchemas(const char *pattern, bool verbose, bool showSystem)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
initPQExpBuffer(&buf);
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT n.nspname AS \"%s\",\n"
|
|
" pg_catalog.pg_get_userbyid(n.nspowner) AS \"%s\"",
|
|
gettext_noop("Name"),
|
|
gettext_noop("Owner"));
|
|
|
|
if (verbose)
|
|
{
|
|
appendPQExpBufferStr(&buf, ",\n ");
|
|
printACLColumn(&buf, "n.nspacl");
|
|
appendPQExpBuffer(&buf,
|
|
",\n pg_catalog.obj_description(n.oid, 'pg_namespace') AS \"%s\"",
|
|
gettext_noop("Description"));
|
|
}
|
|
|
|
appendPQExpBuffer(&buf,
|
|
"\nFROM pg_catalog.pg_namespace n\n");
|
|
|
|
if (!showSystem && !pattern)
|
|
appendPQExpBufferStr(&buf,
|
|
"WHERE n.nspname !~ '^pg_' AND n.nspname <> 'information_schema'\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern,
|
|
!showSystem && !pattern, false,
|
|
NULL, "n.nspname", NULL,
|
|
NULL);
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of schemas");
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
|
|
/*
|
|
* \dFp
|
|
* list text search parsers
|
|
*/
|
|
bool
|
|
listTSParsers(const char *pattern, bool verbose)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
if (pset.sversion < 80300)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("The server (version %s) does not support full text search.\n",
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
if (verbose)
|
|
return listTSParsersVerbose(pattern);
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT\n"
|
|
" n.nspname as \"%s\",\n"
|
|
" p.prsname as \"%s\",\n"
|
|
" pg_catalog.obj_description(p.oid, 'pg_ts_parser') as \"%s\"\n"
|
|
"FROM pg_catalog.pg_ts_parser p\n"
|
|
"LEFT JOIN pg_catalog.pg_namespace n ON n.oid = p.prsnamespace\n",
|
|
gettext_noop("Schema"),
|
|
gettext_noop("Name"),
|
|
gettext_noop("Description")
|
|
);
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
"n.nspname", "p.prsname", NULL,
|
|
"pg_catalog.pg_ts_parser_is_visible(p.oid)");
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1, 2;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of text search parsers");
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* full description of parsers
|
|
*/
|
|
static bool
|
|
listTSParsersVerbose(const char *pattern)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
int i;
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT p.oid,\n"
|
|
" n.nspname,\n"
|
|
" p.prsname\n"
|
|
"FROM pg_catalog.pg_ts_parser p\n"
|
|
"LEFT JOIN pg_catalog.pg_namespace n ON n.oid = p.prsnamespace\n"
|
|
);
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
"n.nspname", "p.prsname", NULL,
|
|
"pg_catalog.pg_ts_parser_is_visible(p.oid)");
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1, 2;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
if (PQntuples(res) == 0)
|
|
{
|
|
if (!pset.quiet)
|
|
{
|
|
if (pattern)
|
|
psql_error("Did not find any text search parser named \"%s\".\n",
|
|
pattern);
|
|
else
|
|
psql_error("Did not find any text search parsers.\n");
|
|
}
|
|
PQclear(res);
|
|
return false;
|
|
}
|
|
|
|
for (i = 0; i < PQntuples(res); i++)
|
|
{
|
|
const char *oid;
|
|
const char *nspname = NULL;
|
|
const char *prsname;
|
|
|
|
oid = PQgetvalue(res, i, 0);
|
|
if (!PQgetisnull(res, i, 1))
|
|
nspname = PQgetvalue(res, i, 1);
|
|
prsname = PQgetvalue(res, i, 2);
|
|
|
|
if (!describeOneTSParser(oid, nspname, prsname))
|
|
{
|
|
PQclear(res);
|
|
return false;
|
|
}
|
|
|
|
if (cancel_pressed)
|
|
{
|
|
PQclear(res);
|
|
return false;
|
|
}
|
|
}
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
static bool
|
|
describeOneTSParser(const char *oid, const char *nspname, const char *prsname)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
PQExpBufferData title;
|
|
printQueryOpt myopt = pset.popt;
|
|
static const bool translate_columns[] = {true, false, false};
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT '%s' AS \"%s\",\n"
|
|
" p.prsstart::pg_catalog.regproc AS \"%s\",\n"
|
|
" pg_catalog.obj_description(p.prsstart, 'pg_proc') as \"%s\"\n"
|
|
" FROM pg_catalog.pg_ts_parser p\n"
|
|
" WHERE p.oid = '%s'\n"
|
|
"UNION ALL\n"
|
|
"SELECT '%s',\n"
|
|
" p.prstoken::pg_catalog.regproc,\n"
|
|
" pg_catalog.obj_description(p.prstoken, 'pg_proc')\n"
|
|
" FROM pg_catalog.pg_ts_parser p\n"
|
|
" WHERE p.oid = '%s'\n"
|
|
"UNION ALL\n"
|
|
"SELECT '%s',\n"
|
|
" p.prsend::pg_catalog.regproc,\n"
|
|
" pg_catalog.obj_description(p.prsend, 'pg_proc')\n"
|
|
" FROM pg_catalog.pg_ts_parser p\n"
|
|
" WHERE p.oid = '%s'\n"
|
|
"UNION ALL\n"
|
|
"SELECT '%s',\n"
|
|
" p.prsheadline::pg_catalog.regproc,\n"
|
|
" pg_catalog.obj_description(p.prsheadline, 'pg_proc')\n"
|
|
" FROM pg_catalog.pg_ts_parser p\n"
|
|
" WHERE p.oid = '%s'\n"
|
|
"UNION ALL\n"
|
|
"SELECT '%s',\n"
|
|
" p.prslextype::pg_catalog.regproc,\n"
|
|
" pg_catalog.obj_description(p.prslextype, 'pg_proc')\n"
|
|
" FROM pg_catalog.pg_ts_parser p\n"
|
|
" WHERE p.oid = '%s';",
|
|
gettext_noop("Start parse"),
|
|
gettext_noop("Method"),
|
|
gettext_noop("Function"),
|
|
gettext_noop("Description"),
|
|
oid,
|
|
gettext_noop("Get next token"),
|
|
oid,
|
|
gettext_noop("End parse"),
|
|
oid,
|
|
gettext_noop("Get headline"),
|
|
oid,
|
|
gettext_noop("Get token types"),
|
|
oid);
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
initPQExpBuffer(&title);
|
|
if (nspname)
|
|
printfPQExpBuffer(&title, _("Text search parser \"%s.%s\""),
|
|
nspname, prsname);
|
|
else
|
|
printfPQExpBuffer(&title, _("Text search parser \"%s\""), prsname);
|
|
myopt.title = title.data;
|
|
myopt.footers = NULL;
|
|
myopt.topt.default_footer = false;
|
|
myopt.translate_header = true;
|
|
myopt.translate_columns = translate_columns;
|
|
myopt.n_translate_columns = lengthof(translate_columns);
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT t.alias as \"%s\",\n"
|
|
" t.description as \"%s\"\n"
|
|
"FROM pg_catalog.ts_token_type( '%s'::pg_catalog.oid ) as t\n"
|
|
"ORDER BY 1;",
|
|
gettext_noop("Token name"),
|
|
gettext_noop("Description"),
|
|
oid);
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
if (nspname)
|
|
printfPQExpBuffer(&title, _("Token types for parser \"%s.%s\""),
|
|
nspname, prsname);
|
|
else
|
|
printfPQExpBuffer(&title, _("Token types for parser \"%s\""), prsname);
|
|
myopt.title = title.data;
|
|
myopt.footers = NULL;
|
|
myopt.topt.default_footer = true;
|
|
myopt.translate_header = true;
|
|
myopt.translate_columns = NULL;
|
|
myopt.n_translate_columns = 0;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
termPQExpBuffer(&title);
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
|
|
/*
|
|
* \dFd
|
|
* list text search dictionaries
|
|
*/
|
|
bool
|
|
listTSDictionaries(const char *pattern, bool verbose)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
if (pset.sversion < 80300)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("The server (version %s) does not support full text search.\n",
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT\n"
|
|
" n.nspname as \"%s\",\n"
|
|
" d.dictname as \"%s\",\n",
|
|
gettext_noop("Schema"),
|
|
gettext_noop("Name"));
|
|
|
|
if (verbose)
|
|
{
|
|
appendPQExpBuffer(&buf,
|
|
" ( SELECT COALESCE(nt.nspname, '(null)')::pg_catalog.text || '.' || t.tmplname FROM\n"
|
|
" pg_catalog.pg_ts_template t\n"
|
|
" LEFT JOIN pg_catalog.pg_namespace nt ON nt.oid = t.tmplnamespace\n"
|
|
" WHERE d.dicttemplate = t.oid ) AS \"%s\",\n"
|
|
" d.dictinitoption as \"%s\",\n",
|
|
gettext_noop("Template"),
|
|
gettext_noop("Init options"));
|
|
}
|
|
|
|
appendPQExpBuffer(&buf,
|
|
" pg_catalog.obj_description(d.oid, 'pg_ts_dict') as \"%s\"\n",
|
|
gettext_noop("Description"));
|
|
|
|
appendPQExpBufferStr(&buf, "FROM pg_catalog.pg_ts_dict d\n"
|
|
"LEFT JOIN pg_catalog.pg_namespace n ON n.oid = d.dictnamespace\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
"n.nspname", "d.dictname", NULL,
|
|
"pg_catalog.pg_ts_dict_is_visible(d.oid)");
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1, 2;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of text search dictionaries");
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
|
|
/*
|
|
* \dFt
|
|
* list text search templates
|
|
*/
|
|
bool
|
|
listTSTemplates(const char *pattern, bool verbose)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
if (pset.sversion < 80300)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("The server (version %s) does not support full text search.\n",
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
if (verbose)
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT\n"
|
|
" n.nspname AS \"%s\",\n"
|
|
" t.tmplname AS \"%s\",\n"
|
|
" t.tmplinit::pg_catalog.regproc AS \"%s\",\n"
|
|
" t.tmpllexize::pg_catalog.regproc AS \"%s\",\n"
|
|
" pg_catalog.obj_description(t.oid, 'pg_ts_template') AS \"%s\"\n",
|
|
gettext_noop("Schema"),
|
|
gettext_noop("Name"),
|
|
gettext_noop("Init"),
|
|
gettext_noop("Lexize"),
|
|
gettext_noop("Description"));
|
|
else
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT\n"
|
|
" n.nspname AS \"%s\",\n"
|
|
" t.tmplname AS \"%s\",\n"
|
|
" pg_catalog.obj_description(t.oid, 'pg_ts_template') AS \"%s\"\n",
|
|
gettext_noop("Schema"),
|
|
gettext_noop("Name"),
|
|
gettext_noop("Description"));
|
|
|
|
appendPQExpBufferStr(&buf, "FROM pg_catalog.pg_ts_template t\n"
|
|
"LEFT JOIN pg_catalog.pg_namespace n ON n.oid = t.tmplnamespace\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
"n.nspname", "t.tmplname", NULL,
|
|
"pg_catalog.pg_ts_template_is_visible(t.oid)");
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1, 2;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of text search templates");
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
|
|
/*
|
|
* \dF
|
|
* list text search configurations
|
|
*/
|
|
bool
|
|
listTSConfigs(const char *pattern, bool verbose)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
if (pset.sversion < 80300)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("The server (version %s) does not support full text search.\n",
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
if (verbose)
|
|
return listTSConfigsVerbose(pattern);
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT\n"
|
|
" n.nspname as \"%s\",\n"
|
|
" c.cfgname as \"%s\",\n"
|
|
" pg_catalog.obj_description(c.oid, 'pg_ts_config') as \"%s\"\n"
|
|
"FROM pg_catalog.pg_ts_config c\n"
|
|
"LEFT JOIN pg_catalog.pg_namespace n ON n.oid = c.cfgnamespace\n",
|
|
gettext_noop("Schema"),
|
|
gettext_noop("Name"),
|
|
gettext_noop("Description")
|
|
);
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
"n.nspname", "c.cfgname", NULL,
|
|
"pg_catalog.pg_ts_config_is_visible(c.oid)");
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1, 2;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of text search configurations");
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
static bool
|
|
listTSConfigsVerbose(const char *pattern)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
int i;
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT c.oid, c.cfgname,\n"
|
|
" n.nspname,\n"
|
|
" p.prsname,\n"
|
|
" np.nspname as pnspname\n"
|
|
"FROM pg_catalog.pg_ts_config c\n"
|
|
" LEFT JOIN pg_catalog.pg_namespace n ON n.oid = c.cfgnamespace,\n"
|
|
" pg_catalog.pg_ts_parser p\n"
|
|
" LEFT JOIN pg_catalog.pg_namespace np ON np.oid = p.prsnamespace\n"
|
|
"WHERE p.oid = c.cfgparser\n"
|
|
);
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, true, false,
|
|
"n.nspname", "c.cfgname", NULL,
|
|
"pg_catalog.pg_ts_config_is_visible(c.oid)");
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 3, 2;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
if (PQntuples(res) == 0)
|
|
{
|
|
if (!pset.quiet)
|
|
{
|
|
if (pattern)
|
|
psql_error("Did not find any text search configuration named \"%s\".\n",
|
|
pattern);
|
|
else
|
|
psql_error("Did not find any text search configurations.\n");
|
|
}
|
|
PQclear(res);
|
|
return false;
|
|
}
|
|
|
|
for (i = 0; i < PQntuples(res); i++)
|
|
{
|
|
const char *oid;
|
|
const char *cfgname;
|
|
const char *nspname = NULL;
|
|
const char *prsname;
|
|
const char *pnspname = NULL;
|
|
|
|
oid = PQgetvalue(res, i, 0);
|
|
cfgname = PQgetvalue(res, i, 1);
|
|
if (!PQgetisnull(res, i, 2))
|
|
nspname = PQgetvalue(res, i, 2);
|
|
prsname = PQgetvalue(res, i, 3);
|
|
if (!PQgetisnull(res, i, 4))
|
|
pnspname = PQgetvalue(res, i, 4);
|
|
|
|
if (!describeOneTSConfig(oid, nspname, cfgname, pnspname, prsname))
|
|
{
|
|
PQclear(res);
|
|
return false;
|
|
}
|
|
|
|
if (cancel_pressed)
|
|
{
|
|
PQclear(res);
|
|
return false;
|
|
}
|
|
}
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
static bool
|
|
describeOneTSConfig(const char *oid, const char *nspname, const char *cfgname,
|
|
const char *pnspname, const char *prsname)
|
|
{
|
|
PQExpBufferData buf,
|
|
title;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT\n"
|
|
" ( SELECT t.alias FROM\n"
|
|
" pg_catalog.ts_token_type(c.cfgparser) AS t\n"
|
|
" WHERE t.tokid = m.maptokentype ) AS \"%s\",\n"
|
|
" pg_catalog.btrim(\n"
|
|
" ARRAY( SELECT mm.mapdict::pg_catalog.regdictionary\n"
|
|
" FROM pg_catalog.pg_ts_config_map AS mm\n"
|
|
" WHERE mm.mapcfg = m.mapcfg AND mm.maptokentype = m.maptokentype\n"
|
|
" ORDER BY mapcfg, maptokentype, mapseqno\n"
|
|
" ) :: pg_catalog.text,\n"
|
|
" '{}') AS \"%s\"\n"
|
|
"FROM pg_catalog.pg_ts_config AS c, pg_catalog.pg_ts_config_map AS m\n"
|
|
"WHERE c.oid = '%s' AND m.mapcfg = c.oid\n"
|
|
"GROUP BY m.mapcfg, m.maptokentype, c.cfgparser\n"
|
|
"ORDER BY 1;",
|
|
gettext_noop("Token"),
|
|
gettext_noop("Dictionaries"),
|
|
oid);
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
initPQExpBuffer(&title);
|
|
|
|
if (nspname)
|
|
appendPQExpBuffer(&title, _("Text search configuration \"%s.%s\""),
|
|
nspname, cfgname);
|
|
else
|
|
appendPQExpBuffer(&title, _("Text search configuration \"%s\""),
|
|
cfgname);
|
|
|
|
if (pnspname)
|
|
appendPQExpBuffer(&title, _("\nParser: \"%s.%s\""),
|
|
pnspname, prsname);
|
|
else
|
|
appendPQExpBuffer(&title, _("\nParser: \"%s\""),
|
|
prsname);
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = title.data;
|
|
myopt.footers = NULL;
|
|
myopt.topt.default_footer = false;
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
termPQExpBuffer(&title);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
|
|
/*
|
|
* \dew
|
|
*
|
|
* Describes foreign-data wrappers
|
|
*/
|
|
bool
|
|
listForeignDataWrappers(const char *pattern, bool verbose)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
if (pset.sversion < 80400)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("The server (version %s) does not support foreign-data wrappers.\n",
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
initPQExpBuffer(&buf);
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT fdw.fdwname AS \"%s\",\n"
|
|
" pg_catalog.pg_get_userbyid(fdw.fdwowner) AS \"%s\",\n",
|
|
gettext_noop("Name"),
|
|
gettext_noop("Owner"));
|
|
if (pset.sversion >= 90100)
|
|
appendPQExpBuffer(&buf,
|
|
" fdw.fdwhandler::pg_catalog.regproc AS \"%s\",\n",
|
|
gettext_noop("Handler"));
|
|
appendPQExpBuffer(&buf,
|
|
" fdw.fdwvalidator::pg_catalog.regproc AS \"%s\"",
|
|
gettext_noop("Validator"));
|
|
|
|
if (verbose)
|
|
{
|
|
appendPQExpBufferStr(&buf, ",\n ");
|
|
printACLColumn(&buf, "fdwacl");
|
|
appendPQExpBuffer(&buf,
|
|
",\n CASE WHEN fdwoptions IS NULL THEN '' ELSE "
|
|
" '(' || pg_catalog.array_to_string(ARRAY(SELECT "
|
|
" pg_catalog.quote_ident(option_name) || ' ' || "
|
|
" pg_catalog.quote_literal(option_value) FROM "
|
|
" pg_catalog.pg_options_to_table(fdwoptions)), ', ') || ')' "
|
|
" END AS \"%s\"",
|
|
gettext_noop("FDW options"));
|
|
|
|
if (pset.sversion >= 90100)
|
|
appendPQExpBuffer(&buf,
|
|
",\n d.description AS \"%s\" ",
|
|
gettext_noop("Description"));
|
|
}
|
|
|
|
appendPQExpBufferStr(&buf, "\nFROM pg_catalog.pg_foreign_data_wrapper fdw\n");
|
|
|
|
if (verbose && pset.sversion >= 90100)
|
|
appendPQExpBufferStr(&buf,
|
|
"LEFT JOIN pg_catalog.pg_description d\n"
|
|
" ON d.classoid = fdw.tableoid "
|
|
"AND d.objoid = fdw.oid AND d.objsubid = 0\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
NULL, "fdwname", NULL, NULL);
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of foreign-data wrappers");
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* \des
|
|
*
|
|
* Describes foreign servers.
|
|
*/
|
|
bool
|
|
listForeignServers(const char *pattern, bool verbose)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
if (pset.sversion < 80400)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("The server (version %s) does not support foreign servers.\n",
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
initPQExpBuffer(&buf);
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT s.srvname AS \"%s\",\n"
|
|
" pg_catalog.pg_get_userbyid(s.srvowner) AS \"%s\",\n"
|
|
" f.fdwname AS \"%s\"",
|
|
gettext_noop("Name"),
|
|
gettext_noop("Owner"),
|
|
gettext_noop("Foreign-data wrapper"));
|
|
|
|
if (verbose)
|
|
{
|
|
appendPQExpBufferStr(&buf, ",\n ");
|
|
printACLColumn(&buf, "s.srvacl");
|
|
appendPQExpBuffer(&buf,
|
|
",\n"
|
|
" s.srvtype AS \"%s\",\n"
|
|
" s.srvversion AS \"%s\",\n"
|
|
" CASE WHEN srvoptions IS NULL THEN '' ELSE "
|
|
" '(' || pg_catalog.array_to_string(ARRAY(SELECT "
|
|
" pg_catalog.quote_ident(option_name) || ' ' || "
|
|
" pg_catalog.quote_literal(option_value) FROM "
|
|
" pg_catalog.pg_options_to_table(srvoptions)), ', ') || ')' "
|
|
" END AS \"%s\",\n"
|
|
" d.description AS \"%s\"",
|
|
gettext_noop("Type"),
|
|
gettext_noop("Version"),
|
|
gettext_noop("FDW options"),
|
|
gettext_noop("Description"));
|
|
}
|
|
|
|
appendPQExpBufferStr(&buf,
|
|
"\nFROM pg_catalog.pg_foreign_server s\n"
|
|
" JOIN pg_catalog.pg_foreign_data_wrapper f ON f.oid=s.srvfdw\n");
|
|
|
|
if (verbose)
|
|
appendPQExpBufferStr(&buf,
|
|
"LEFT JOIN pg_catalog.pg_description d\n "
|
|
"ON d.classoid = s.tableoid AND d.objoid = s.oid "
|
|
"AND d.objsubid = 0\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
NULL, "s.srvname", NULL, NULL);
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of foreign servers");
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* \deu
|
|
*
|
|
* Describes user mappings.
|
|
*/
|
|
bool
|
|
listUserMappings(const char *pattern, bool verbose)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
if (pset.sversion < 80400)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("The server (version %s) does not support user mappings.\n",
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
initPQExpBuffer(&buf);
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT um.srvname AS \"%s\",\n"
|
|
" um.usename AS \"%s\"",
|
|
gettext_noop("Server"),
|
|
gettext_noop("User name"));
|
|
|
|
if (verbose)
|
|
appendPQExpBuffer(&buf,
|
|
",\n CASE WHEN umoptions IS NULL THEN '' ELSE "
|
|
" '(' || pg_catalog.array_to_string(ARRAY(SELECT "
|
|
" pg_catalog.quote_ident(option_name) || ' ' || "
|
|
" pg_catalog.quote_literal(option_value) FROM "
|
|
" pg_catalog.pg_options_to_table(umoptions)), ', ') || ')' "
|
|
" END AS \"%s\"",
|
|
gettext_noop("FDW options"));
|
|
|
|
appendPQExpBufferStr(&buf, "\nFROM pg_catalog.pg_user_mappings um\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
NULL, "um.srvname", "um.usename", NULL);
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1, 2;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of user mappings");
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* \det
|
|
*
|
|
* Describes foreign tables.
|
|
*/
|
|
bool
|
|
listForeignTables(const char *pattern, bool verbose)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
if (pset.sversion < 90100)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("The server (version %s) does not support foreign tables.\n",
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
initPQExpBuffer(&buf);
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT n.nspname AS \"%s\",\n"
|
|
" c.relname AS \"%s\",\n"
|
|
" s.srvname AS \"%s\"",
|
|
gettext_noop("Schema"),
|
|
gettext_noop("Table"),
|
|
gettext_noop("Server"));
|
|
|
|
if (verbose)
|
|
appendPQExpBuffer(&buf,
|
|
",\n CASE WHEN ftoptions IS NULL THEN '' ELSE "
|
|
" '(' || pg_catalog.array_to_string(ARRAY(SELECT "
|
|
" pg_catalog.quote_ident(option_name) || ' ' || "
|
|
" pg_catalog.quote_literal(option_value) FROM "
|
|
" pg_catalog.pg_options_to_table(ftoptions)), ', ') || ')' "
|
|
" END AS \"%s\",\n"
|
|
" d.description AS \"%s\"",
|
|
gettext_noop("FDW options"),
|
|
gettext_noop("Description"));
|
|
|
|
appendPQExpBufferStr(&buf,
|
|
"\nFROM pg_catalog.pg_foreign_table ft\n"
|
|
" INNER JOIN pg_catalog.pg_class c"
|
|
" ON c.oid = ft.ftrelid\n"
|
|
" INNER JOIN pg_catalog.pg_namespace n"
|
|
" ON n.oid = c.relnamespace\n"
|
|
" INNER JOIN pg_catalog.pg_foreign_server s"
|
|
" ON s.oid = ft.ftserver\n");
|
|
if (verbose)
|
|
appendPQExpBufferStr(&buf,
|
|
" LEFT JOIN pg_catalog.pg_description d\n"
|
|
" ON d.classoid = c.tableoid AND "
|
|
"d.objoid = c.oid AND d.objsubid = 0\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
"n.nspname", "c.relname", NULL,
|
|
"pg_catalog.pg_table_is_visible(c.oid)");
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1, 2;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of foreign tables");
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* \dx
|
|
*
|
|
* Briefly describes installed extensions.
|
|
*/
|
|
bool
|
|
listExtensions(const char *pattern)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
if (pset.sversion < 90100)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("The server (version %s) does not support extensions.\n",
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
initPQExpBuffer(&buf);
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT e.extname AS \"%s\", "
|
|
"e.extversion AS \"%s\", n.nspname AS \"%s\", c.description AS \"%s\"\n"
|
|
"FROM pg_catalog.pg_extension e "
|
|
"LEFT JOIN pg_catalog.pg_namespace n ON n.oid = e.extnamespace "
|
|
"LEFT JOIN pg_catalog.pg_description c ON c.objoid = e.oid "
|
|
"AND c.classoid = 'pg_catalog.pg_extension'::pg_catalog.regclass\n",
|
|
gettext_noop("Name"),
|
|
gettext_noop("Version"),
|
|
gettext_noop("Schema"),
|
|
gettext_noop("Description"));
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern,
|
|
false, false,
|
|
NULL, "e.extname", NULL,
|
|
NULL);
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of installed extensions");
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* \dx+
|
|
*
|
|
* List contents of installed extensions.
|
|
*/
|
|
bool
|
|
listExtensionContents(const char *pattern)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
int i;
|
|
|
|
if (pset.sversion < 90100)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("The server (version %s) does not support extensions.\n",
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
initPQExpBuffer(&buf);
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT e.extname, e.oid\n"
|
|
"FROM pg_catalog.pg_extension e\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern,
|
|
false, false,
|
|
NULL, "e.extname", NULL,
|
|
NULL);
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
if (PQntuples(res) == 0)
|
|
{
|
|
if (!pset.quiet)
|
|
{
|
|
if (pattern)
|
|
psql_error("Did not find any extension named \"%s\".\n",
|
|
pattern);
|
|
else
|
|
psql_error("Did not find any extensions.\n");
|
|
}
|
|
PQclear(res);
|
|
return false;
|
|
}
|
|
|
|
for (i = 0; i < PQntuples(res); i++)
|
|
{
|
|
const char *extname;
|
|
const char *oid;
|
|
|
|
extname = PQgetvalue(res, i, 0);
|
|
oid = PQgetvalue(res, i, 1);
|
|
|
|
if (!listOneExtensionContents(extname, oid))
|
|
{
|
|
PQclear(res);
|
|
return false;
|
|
}
|
|
if (cancel_pressed)
|
|
{
|
|
PQclear(res);
|
|
return false;
|
|
}
|
|
}
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
static bool
|
|
listOneExtensionContents(const char *extname, const char *oid)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
PQExpBufferData title;
|
|
printQueryOpt myopt = pset.popt;
|
|
|
|
initPQExpBuffer(&buf);
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT pg_catalog.pg_describe_object(classid, objid, 0) AS \"%s\"\n"
|
|
"FROM pg_catalog.pg_depend\n"
|
|
"WHERE refclassid = 'pg_catalog.pg_extension'::pg_catalog.regclass AND refobjid = '%s' AND deptype = 'e'\n"
|
|
"ORDER BY 1;",
|
|
gettext_noop("Object description"),
|
|
oid);
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
initPQExpBuffer(&title);
|
|
printfPQExpBuffer(&title, _("Objects in extension \"%s\""), extname);
|
|
myopt.title = title.data;
|
|
myopt.translate_header = true;
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
termPQExpBuffer(&title);
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* \dRp
|
|
* Lists publications.
|
|
*
|
|
* Takes an optional regexp to select particular publications
|
|
*/
|
|
bool
|
|
listPublications(const char *pattern)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
static const bool translate_columns[] = {false, false, false, false, false, false, false};
|
|
|
|
if (pset.sversion < 100000)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("The server (version %s) does not support publications.\n",
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT pubname AS \"%s\",\n"
|
|
" pg_catalog.pg_get_userbyid(pubowner) AS \"%s\",\n"
|
|
" puballtables AS \"%s\",\n"
|
|
" pubinsert AS \"%s\",\n"
|
|
" pubupdate AS \"%s\",\n"
|
|
" pubdelete AS \"%s\"",
|
|
gettext_noop("Name"),
|
|
gettext_noop("Owner"),
|
|
gettext_noop("All tables"),
|
|
gettext_noop("Inserts"),
|
|
gettext_noop("Updates"),
|
|
gettext_noop("Deletes"));
|
|
if (pset.sversion >= 110000)
|
|
appendPQExpBuffer(&buf,
|
|
",\n pubtruncate AS \"%s\"",
|
|
gettext_noop("Truncates"));
|
|
|
|
appendPQExpBufferStr(&buf,
|
|
"\nFROM pg_catalog.pg_publication\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
NULL, "pubname", NULL,
|
|
NULL);
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of publications");
|
|
myopt.translate_header = true;
|
|
myopt.translate_columns = translate_columns;
|
|
myopt.n_translate_columns = lengthof(translate_columns);
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* \dRp+
|
|
* Describes publications including the contents.
|
|
*
|
|
* Takes an optional regexp to select particular publications
|
|
*/
|
|
bool
|
|
describePublications(const char *pattern)
|
|
{
|
|
PQExpBufferData buf;
|
|
int i;
|
|
PGresult *res;
|
|
bool has_pubtruncate;
|
|
|
|
if (pset.sversion < 100000)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("The server (version %s) does not support publications.\n",
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
has_pubtruncate = (pset.sversion >= 110000);
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT oid, pubname,\n"
|
|
" pg_catalog.pg_get_userbyid(pubowner) AS owner,\n"
|
|
" puballtables, pubinsert, pubupdate, pubdelete");
|
|
if (has_pubtruncate)
|
|
appendPQExpBuffer(&buf,
|
|
", pubtruncate");
|
|
appendPQExpBuffer(&buf,
|
|
"\nFROM pg_catalog.pg_publication\n");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, false, false,
|
|
NULL, "pubname", NULL,
|
|
NULL);
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 2;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
if (!res)
|
|
{
|
|
termPQExpBuffer(&buf);
|
|
return false;
|
|
}
|
|
|
|
if (PQntuples(res) == 0)
|
|
{
|
|
if (!pset.quiet)
|
|
{
|
|
if (pattern)
|
|
psql_error("Did not find any publication named \"%s\".\n",
|
|
pattern);
|
|
else
|
|
psql_error("Did not find any publications.\n");
|
|
}
|
|
|
|
termPQExpBuffer(&buf);
|
|
PQclear(res);
|
|
return false;
|
|
}
|
|
|
|
for (i = 0; i < PQntuples(res); i++)
|
|
{
|
|
const char align = 'l';
|
|
int ncols = 5;
|
|
int nrows = 1;
|
|
int tables = 0;
|
|
PGresult *tabres;
|
|
char *pubid = PQgetvalue(res, i, 0);
|
|
char *pubname = PQgetvalue(res, i, 1);
|
|
bool puballtables = strcmp(PQgetvalue(res, i, 3), "t") == 0;
|
|
int j;
|
|
PQExpBufferData title;
|
|
printTableOpt myopt = pset.popt.topt;
|
|
printTableContent cont;
|
|
|
|
if (has_pubtruncate)
|
|
ncols++;
|
|
|
|
initPQExpBuffer(&title);
|
|
printfPQExpBuffer(&title, _("Publication %s"), pubname);
|
|
printTableInit(&cont, &myopt, title.data, ncols, nrows);
|
|
|
|
printTableAddHeader(&cont, gettext_noop("Owner"), true, align);
|
|
printTableAddHeader(&cont, gettext_noop("All tables"), true, align);
|
|
printTableAddHeader(&cont, gettext_noop("Inserts"), true, align);
|
|
printTableAddHeader(&cont, gettext_noop("Updates"), true, align);
|
|
printTableAddHeader(&cont, gettext_noop("Deletes"), true, align);
|
|
if (has_pubtruncate)
|
|
printTableAddHeader(&cont, gettext_noop("Truncates"), true, align);
|
|
|
|
printTableAddCell(&cont, PQgetvalue(res, i, 2), false, false);
|
|
printTableAddCell(&cont, PQgetvalue(res, i, 3), false, false);
|
|
printTableAddCell(&cont, PQgetvalue(res, i, 4), false, false);
|
|
printTableAddCell(&cont, PQgetvalue(res, i, 5), false, false);
|
|
printTableAddCell(&cont, PQgetvalue(res, i, 6), false, false);
|
|
if (has_pubtruncate)
|
|
printTableAddCell(&cont, PQgetvalue(res, i, 7), false, false);
|
|
|
|
if (!puballtables)
|
|
{
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT n.nspname, c.relname\n"
|
|
"FROM pg_catalog.pg_class c,\n"
|
|
" pg_catalog.pg_namespace n,\n"
|
|
" pg_catalog.pg_publication_rel pr\n"
|
|
"WHERE c.relnamespace = n.oid\n"
|
|
" AND c.oid = pr.prrelid\n"
|
|
" AND pr.prpubid = '%s'\n"
|
|
"ORDER BY 1,2", pubid);
|
|
|
|
tabres = PSQLexec(buf.data);
|
|
if (!tabres)
|
|
{
|
|
printTableCleanup(&cont);
|
|
PQclear(res);
|
|
termPQExpBuffer(&buf);
|
|
termPQExpBuffer(&title);
|
|
return false;
|
|
}
|
|
else
|
|
tables = PQntuples(tabres);
|
|
|
|
if (tables > 0)
|
|
printTableAddFooter(&cont, _("Tables:"));
|
|
|
|
for (j = 0; j < tables; j++)
|
|
{
|
|
printfPQExpBuffer(&buf, " \"%s.%s\"",
|
|
PQgetvalue(tabres, j, 0),
|
|
PQgetvalue(tabres, j, 1));
|
|
|
|
printTableAddFooter(&cont, buf.data);
|
|
}
|
|
PQclear(tabres);
|
|
}
|
|
|
|
printTable(&cont, pset.queryFout, false, pset.logfile);
|
|
printTableCleanup(&cont);
|
|
|
|
termPQExpBuffer(&title);
|
|
}
|
|
|
|
termPQExpBuffer(&buf);
|
|
PQclear(res);
|
|
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* \dRs
|
|
* Describes subscriptions.
|
|
*
|
|
* Takes an optional regexp to select particular subscriptions
|
|
*/
|
|
bool
|
|
describeSubscriptions(const char *pattern, bool verbose)
|
|
{
|
|
PQExpBufferData buf;
|
|
PGresult *res;
|
|
printQueryOpt myopt = pset.popt;
|
|
static const bool translate_columns[] = {false, false, false, false,
|
|
false, false};
|
|
|
|
if (pset.sversion < 100000)
|
|
{
|
|
char sverbuf[32];
|
|
|
|
psql_error("The server (version %s) does not support subscriptions.\n",
|
|
formatPGVersionNumber(pset.sversion, false,
|
|
sverbuf, sizeof(sverbuf)));
|
|
return true;
|
|
}
|
|
|
|
initPQExpBuffer(&buf);
|
|
|
|
printfPQExpBuffer(&buf,
|
|
"SELECT subname AS \"%s\"\n"
|
|
", pg_catalog.pg_get_userbyid(subowner) AS \"%s\"\n"
|
|
", subenabled AS \"%s\"\n"
|
|
", subpublications AS \"%s\"\n",
|
|
gettext_noop("Name"),
|
|
gettext_noop("Owner"),
|
|
gettext_noop("Enabled"),
|
|
gettext_noop("Publication"));
|
|
|
|
if (verbose)
|
|
{
|
|
appendPQExpBuffer(&buf,
|
|
", subsynccommit AS \"%s\"\n"
|
|
", subconninfo AS \"%s\"\n",
|
|
gettext_noop("Synchronous commit"),
|
|
gettext_noop("Conninfo"));
|
|
}
|
|
|
|
/* Only display subscriptions in current database. */
|
|
appendPQExpBufferStr(&buf,
|
|
"FROM pg_catalog.pg_subscription\n"
|
|
"WHERE subdbid = (SELECT oid\n"
|
|
" FROM pg_catalog.pg_database\n"
|
|
" WHERE datname = pg_catalog.current_database())");
|
|
|
|
processSQLNamePattern(pset.db, &buf, pattern, true, false,
|
|
NULL, "subname", NULL,
|
|
NULL);
|
|
|
|
appendPQExpBufferStr(&buf, "ORDER BY 1;");
|
|
|
|
res = PSQLexec(buf.data);
|
|
termPQExpBuffer(&buf);
|
|
if (!res)
|
|
return false;
|
|
|
|
myopt.nullPrint = NULL;
|
|
myopt.title = _("List of subscriptions");
|
|
myopt.translate_header = true;
|
|
myopt.translate_columns = translate_columns;
|
|
myopt.n_translate_columns = lengthof(translate_columns);
|
|
|
|
printQuery(res, &myopt, pset.queryFout, false, pset.logfile);
|
|
|
|
PQclear(res);
|
|
return true;
|
|
}
|
|
|
|
/*
|
|
* printACLColumn
|
|
*
|
|
* Helper function for consistently formatting ACL (privilege) columns.
|
|
* The proper targetlist entry is appended to buf. Note lack of any
|
|
* whitespace or comma decoration.
|
|
*/
|
|
static void
|
|
printACLColumn(PQExpBuffer buf, const char *colname)
|
|
{
|
|
if (pset.sversion >= 80100)
|
|
appendPQExpBuffer(buf,
|
|
"pg_catalog.array_to_string(%s, E'\\n') AS \"%s\"",
|
|
colname, gettext_noop("Access privileges"));
|
|
else
|
|
appendPQExpBuffer(buf,
|
|
"pg_catalog.array_to_string(%s, '\\n') AS \"%s\"",
|
|
colname, gettext_noop("Access privileges"));
|
|
}
|