print.c File Reference

#include "postgres.h"
#include "access/printtup.h"
#include "lib/stringinfo.h"
#include "nodes/nodeFuncs.h"
#include "nodes/pathnodes.h"
#include "nodes/print.h"
#include "parser/parsetree.h"
#include "utils/lsyscache.h"

Include dependency graph for print.c:

Go to the source code of this file.

Macros
#define	LINELEN   78
#define	INDENTSTOP   3
#define	MAXINDENT   60
#define	LINELEN   78

Functions
void	print (const void *obj)
void	pprint (const void *obj)
void	elog_node_display (int lev, const char *title, const void *obj, bool pretty)
char *	format_node_dump (const char *dump)
char *	pretty_format_node_dump (const char *dump)
void	print_rt (const List *rtable)
void	print_expr (const Node *expr, const List *rtable)
void	print_pathkeys (const List *pathkeys, const List *rtable)
void	print_tl (const List *tlist, const List *rtable)
void	print_slot (TupleTableSlot *slot)

Macro Definition Documentation

INDENTSTOP

#define INDENTSTOP   3

LINELEN [1/2]

#define LINELEN   78

LINELEN [2/2]

#define LINELEN   78

MAXINDENT

#define MAXINDENT   60

Function Documentation

elog_node_display()

void elog_node_display	(	int	lev,
		const char *	title,
		const void *	obj,
		bool	pretty
	)

Definition at line 72 of file print.c.

{
    char       *s;
    char       *f;
 
    s = nodeToStringWithLocations(obj);
    if (pretty)
        f = pretty_format_node_dump(s);
    else
        f = format_node_dump(s);
    pfree(s);
    ereport(lev,
            (errmsg_internal("%s:", title),
             errdetail_internal("%s", f)));
    pfree(f);
}

References ereport, errdetail_internal(), errmsg_internal(), format_node_dump(), nodeToStringWithLocations(), pfree(), and pretty_format_node_dump().

Referenced by pg_plan_query(), and pg_rewrite_query().

format_node_dump()

char* format_node_dump

(

const char *

dump

)

Definition at line 97 of file print.c.

{
#define LINELEN     78
    char        line[LINELEN + 1];
    StringInfoData str;
    int         i;
    int         j;
    int         k;
 
    initStringInfo(&str);
    i = 0;
    for (;;)
    {
        for (j = 0; j < LINELEN && dump[i] != '\0'; i++, j++)
            line[j] = dump[i];
        if (dump[i] == '\0')
            break;
        if (dump[i] == ' ')
        {
            /* ok to break at adjacent space */
            i++;
        }
        else
        {
            for (k = j - 1; k > 0; k--)
                if (line[k] == ' ')
                    break;
            if (k > 0)
            {
                /* back up; will reprint all after space */
                i -= (j - k - 1);
                j = k;
            }
        }
        line[j] = '\0';
        appendStringInfo(&str, "%s\n", line);
    }
    if (j > 0)
    {
        line[j] = '\0';
        appendStringInfo(&str, "%s\n", line);
    }
    return str.data;
#undef LINELEN
}

References appendStringInfo(), i, initStringInfo(), j, LINELEN, and str.

Referenced by elog_node_display(), and print().

pprint()

void pprint

(

const void *

obj

)

Definition at line 54 of file print.c.

{
    char       *s;
    char       *f;
 
    s = nodeToStringWithLocations(obj);
    f = pretty_format_node_dump(s);
    pfree(s);
    printf("%s\n", f);
    fflush(stdout);
    pfree(f);
}

References fflush(), nodeToStringWithLocations(), pfree(), pretty_format_node_dump(), printf, and generate_unaccent_rules::stdout.

Referenced by generate_partitionwise_join_paths(), preprocess_expression(), set_rel_pathlist(), and standard_join_search().

pretty_format_node_dump()

char* pretty_format_node_dump

(

const char *

dump

)

Definition at line 151 of file print.c.

{
#define INDENTSTOP  3
#define MAXINDENT   60
#define LINELEN     78
    char        line[LINELEN + 1];
    StringInfoData str;
    int         indentLev;
    int         indentDist;
    int         i;
    int         j;
 
    initStringInfo(&str);
    indentLev = 0;              /* logical indent level */
    indentDist = 0;             /* physical indent distance */
    i = 0;
    for (;;)
    {
        for (j = 0; j < indentDist; j++)
            line[j] = ' ';
        for (; j < LINELEN && dump[i] != '\0'; i++, j++)
        {
            line[j] = dump[i];
            switch (line[j])
            {
                case '}':
                    if (j != indentDist)
                    {
                        /* print data before the } */
                        line[j] = '\0';
                        appendStringInfo(&str, "%s\n", line);
                    }
                    /* print the } at indentDist */
                    line[indentDist] = '}';
                    line[indentDist + 1] = '\0';
                    appendStringInfo(&str, "%s\n", line);
                    /* outdent */
                    if (indentLev > 0)
                    {
                        indentLev--;
                        indentDist = Min(indentLev * INDENTSTOP, MAXINDENT);
                    }
                    j = indentDist - 1;
                    /* j will equal indentDist on next loop iteration */
                    /* suppress whitespace just after } */
                    while (dump[i + 1] == ' ')
                        i++;
                    break;
                case ')':
                    /* force line break after ), unless another ) follows */
                    if (dump[i + 1] != ')')
                    {
                        line[j + 1] = '\0';
                        appendStringInfo(&str, "%s\n", line);
                        j = indentDist - 1;
                        while (dump[i + 1] == ' ')
                            i++;
                    }
                    break;
                case '{':
                    /* force line break before { */
                    if (j != indentDist)
                    {
                        line[j] = '\0';
                        appendStringInfo(&str, "%s\n", line);
                    }
                    /* indent */
                    indentLev++;
                    indentDist = Min(indentLev * INDENTSTOP, MAXINDENT);
                    for (j = 0; j < indentDist; j++)
                        line[j] = ' ';
                    line[j] = dump[i];
                    break;
                case ':':
                    /* force line break before : */
                    if (j != indentDist)
                    {
                        line[j] = '\0';
                        appendStringInfo(&str, "%s\n", line);
                    }
                    j = indentDist;
                    line[j] = dump[i];
                    break;
            }
        }
        line[j] = '\0';
        if (dump[i] == '\0')
            break;
        appendStringInfo(&str, "%s\n", line);
    }
    if (j > 0)
        appendStringInfo(&str, "%s\n", line);
    return str.data;
#undef INDENTSTOP
#undef MAXINDENT
#undef LINELEN
}

References appendStringInfo(), i, INDENTSTOP, initStringInfo(), j, LINELEN, MAXINDENT, Min, and str.

Referenced by elog_node_display(), and pprint().

print()

void print

(

const void *

obj

)

Definition at line 36 of file print.c.

{
    char       *s;
    char       *f;
 
    s = nodeToStringWithLocations(obj);
    f = format_node_dump(s);
    pfree(s);
    printf("%s\n", f);
    fflush(stdout);
    pfree(f);
}

References fflush(), format_node_dump(), nodeToStringWithLocations(), pfree(), printf, and generate_unaccent_rules::stdout.

Referenced by ecpg_free_params(), and generate_unaccent_rules::print_record().

print_expr()

void print_expr	(	const Node *	expr,
		const List *	rtable
	)

Definition at line 325 of file print.c.

{
    if (expr == NULL)
    {
        printf("<>");
        return;
    }
 
    if (IsA(expr, Var))
    {
        const Var  *var = (const Var *) expr;
        char       *relname,
                   *attname;
 
        switch (var->varno)
        {
            case INNER_VAR:
                relname = "INNER";
                attname = "?";
                break;
            case OUTER_VAR:
                relname = "OUTER";
                attname = "?";
                break;
            case INDEX_VAR:
                relname = "INDEX";
                attname = "?";
                break;
            default:
                {
                    RangeTblEntry *rte;
 
                    Assert(var->varno > 0 &&
                           (int) var->varno <= list_length(rtable));
                    rte = rt_fetch(var->varno, rtable);
                    relname = rte->eref->aliasname;
                    attname = get_rte_attribute_name(rte, var->varattno);
                }
                break;
        }
        printf("%s.%s", relname, attname);
    }
    else if (IsA(expr, Const))
    {
        const Const *c = (const Const *) expr;
        Oid         typoutput;
        bool        typIsVarlena;
        char       *outputstr;
 
        if (c->constisnull)
        {
            printf("NULL");
            return;
        }
 
        getTypeOutputInfo(c->consttype,
                          &typoutput, &typIsVarlena);
 
        outputstr = OidOutputFunctionCall(typoutput, c->constvalue);
        printf("%s", outputstr);
        pfree(outputstr);
    }
    else if (IsA(expr, OpExpr))
    {
        const OpExpr *e = (const OpExpr *) expr;
        char       *opname;
 
        opname = get_opname(e->opno);
        if (list_length(e->args) > 1)
        {
            print_expr(get_leftop((const Expr *) e), rtable);
            printf(" %s ", ((opname != NULL) ? opname : "(invalid operator)"));
            print_expr(get_rightop((const Expr *) e), rtable);
        }
        else
        {
            printf("%s ", ((opname != NULL) ? opname : "(invalid operator)"));
            print_expr(get_leftop((const Expr *) e), rtable);
        }
    }
    else if (IsA(expr, FuncExpr))
    {
        const FuncExpr *e = (const FuncExpr *) expr;
        char       *funcname;
        ListCell   *l;
 
        funcname = get_func_name(e->funcid);
        printf("%s(", ((funcname != NULL) ? funcname : "(invalid function)"));
        foreach(l, e->args)
        {
            print_expr(lfirst(l), rtable);
            if (lnext(e->args, l))
                printf(",");
        }
        printf(")");
    }
    else
        printf("unknown expr");
}

References Assert, attname, funcname, get_func_name(), get_leftop(), get_opname(), get_rightop(), get_rte_attribute_name(), getTypeOutputInfo(), INDEX_VAR, INNER_VAR, IsA, lfirst, list_length(), lnext(), OidOutputFunctionCall(), OUTER_VAR, pfree(), printf, relname, rt_fetch, Var::varattno, and Var::varno.

Referenced by print_pathkeys(), and print_tl().

print_pathkeys()

void print_pathkeys	(	const List *	pathkeys,
		const List *	rtable
	)

Definition at line 430 of file print.c.

{
    const ListCell *i;
 
    printf("(");
    foreach(i, pathkeys)
    {
        PathKey    *pathkey = (PathKey *) lfirst(i);
        EquivalenceClass *eclass;
        ListCell   *k;
        bool        first = true;
 
        eclass = pathkey->pk_eclass;
        /* chase up, in case pathkey is non-canonical */
        while (eclass->ec_merged)
            eclass = eclass->ec_merged;
 
        printf("(");
        foreach(k, eclass->ec_members)
        {
            EquivalenceMember *mem = (EquivalenceMember *) lfirst(k);
 
            if (first)
                first = false;
            else
                printf(", ");
            print_expr((Node *) mem->em_expr, rtable);
        }
        printf(")");
        if (lnext(pathkeys, i))
            printf(", ");
    }
    printf(")\n");
}

References eclass(), EquivalenceMember::em_expr, i, lfirst, lnext(), print_expr(), and printf.

print_rt()

void print_rt

(

const List *

rtable

)

Definition at line 254 of file print.c.

{
    const ListCell *l;
    int         i = 1;
 
    printf("resno\trefname  \trelid\tinFromCl\n");
    printf("-----\t---------\t-----\t--------\n");
    foreach(l, rtable)
    {
        RangeTblEntry *rte = lfirst(l);
 
        switch (rte->rtekind)
        {
            case RTE_RELATION:
                printf("%d\t%s\t%u\t%c",
                       i, rte->eref->aliasname, rte->relid, rte->relkind);
                break;
            case RTE_SUBQUERY:
                printf("%d\t%s\t[subquery]",
                       i, rte->eref->aliasname);
                break;
            case RTE_JOIN:
                printf("%d\t%s\t[join]",
                       i, rte->eref->aliasname);
                break;
            case RTE_FUNCTION:
                printf("%d\t%s\t[rangefunction]",
                       i, rte->eref->aliasname);
                break;
            case RTE_TABLEFUNC:
                printf("%d\t%s\t[table function]",
                       i, rte->eref->aliasname);
                break;
            case RTE_VALUES:
                printf("%d\t%s\t[values list]",
                       i, rte->eref->aliasname);
                break;
            case RTE_CTE:
                printf("%d\t%s\t[cte]",
                       i, rte->eref->aliasname);
                break;
            case RTE_NAMEDTUPLESTORE:
                printf("%d\t%s\t[tuplestore]",
                       i, rte->eref->aliasname);
                break;
            case RTE_RESULT:
                printf("%d\t%s\t[result]",
                       i, rte->eref->aliasname);
                break;
            case RTE_GROUP:
                printf("%d\t%s\t[group]",
                       i, rte->eref->aliasname);
                break;
            default:
                printf("%d\t%s\t[unknown rtekind]",
                       i, rte->eref->aliasname);
        }
 
        printf("\t%s\t%s\n",
               (rte->inh ? "inh" : ""),
               (rte->inFromCl ? "inFromCl" : ""));
        i++;
    }
}

References i, RangeTblEntry::inh, lfirst, printf, RangeTblEntry::relid, RTE_CTE, RTE_FUNCTION, RTE_GROUP, RTE_JOIN, RTE_NAMEDTUPLESTORE, RTE_RELATION, RTE_RESULT, RTE_SUBQUERY, RTE_TABLEFUNC, RTE_VALUES, and RangeTblEntry::rtekind.

print_slot()

void print_slot

(

TupleTableSlot *

slot

)

Definition at line 496 of file print.c.

{
    if (TupIsNull(slot))
    {
        printf("tuple is null.\n");
        return;
    }
    if (!slot->tts_tupleDescriptor)
    {
        printf("no tuple descriptor.\n");
        return;
    }
 
    debugtup(slot, NULL);
}

References debugtup(), printf, TupleTableSlot::tts_tupleDescriptor, and TupIsNull.

print_tl()

void print_tl	(	const List *	tlist,
		const List *	rtable
	)

Definition at line 470 of file print.c.

{
    const ListCell *tl;
 
    printf("(\n");
    foreach(tl, tlist)
    {
        TargetEntry *tle = (TargetEntry *) lfirst(tl);
 
        printf("\t%d %s\t", tle->resno,
               tle->resname ? tle->resname : "<null>");
        if (tle->ressortgroupref != 0)
            printf("(%u):\t", tle->ressortgroupref);
        else
            printf("    :\t");
        print_expr((Node *) tle->expr, rtable);
        printf("\n");
    }
    printf(")\n");
}

References TargetEntry::expr, lfirst, print_expr(), printf, TargetEntry::resno, and TargetEntry::ressortgroupref.