166 lines
3.3 KiB
C
166 lines
3.3 KiB
C
/*
|
|
* makefuncs.c
|
|
* creator functions for primitive nodes. The functions here are for
|
|
* the most frequently created nodes.
|
|
*
|
|
* Portions Copyright (c) 1996-2000, PostgreSQL, Inc
|
|
* Portions Copyright (c) 1994, Regents of the University of California
|
|
*
|
|
*
|
|
* IDENTIFICATION
|
|
* $Header: /cvsroot/pgsql/src/backend/nodes/makefuncs.c,v 1.21 2000/04/12 17:15:16 momjian Exp $
|
|
*
|
|
* NOTES
|
|
* Creator functions in POSTGRES 4.2 are generated automatically. Most of
|
|
* them are rarely used. Now we don't generate them any more. If you want
|
|
* one, you have to write it yourself.
|
|
*
|
|
* HISTORY
|
|
* AUTHOR DATE MAJOR EVENT
|
|
* Andrew Yu Oct 20, 1994 file creation
|
|
*/
|
|
#include "postgres.h"
|
|
#include "nodes/makefuncs.h"
|
|
|
|
/*
|
|
* makeOper -
|
|
* creates an Oper node
|
|
*/
|
|
Oper *
|
|
makeOper(Oid opno,
|
|
Oid opid,
|
|
Oid opresulttype,
|
|
int opsize,
|
|
FunctionCachePtr op_fcache)
|
|
{
|
|
Oper *oper = makeNode(Oper);
|
|
|
|
oper->opno = opno;
|
|
oper->opid = opid;
|
|
oper->opresulttype = opresulttype;
|
|
oper->opsize = opsize;
|
|
oper->op_fcache = op_fcache;
|
|
return oper;
|
|
}
|
|
|
|
/*
|
|
* makeVar -
|
|
* creates a Var node
|
|
*
|
|
*/
|
|
Var *
|
|
makeVar(Index varno,
|
|
AttrNumber varattno,
|
|
Oid vartype,
|
|
int32 vartypmod,
|
|
Index varlevelsup)
|
|
{
|
|
Var *var = makeNode(Var);
|
|
|
|
var->varno = varno;
|
|
var->varattno = varattno;
|
|
var->vartype = vartype;
|
|
var->vartypmod = vartypmod;
|
|
var->varlevelsup = varlevelsup;
|
|
|
|
/*
|
|
* Since few if any routines ever create Var nodes with
|
|
* varnoold/varoattno different from varno/varattno, we don't provide
|
|
* separate arguments for them, but just initialize them to the given
|
|
* varno/varattno. This reduces code clutter and chance of error for
|
|
* most callers.
|
|
*/
|
|
var->varnoold = varno;
|
|
var->varoattno = varattno;
|
|
|
|
return var;
|
|
}
|
|
|
|
/*
|
|
* makeTargetEntry -
|
|
* creates a TargetEntry node(contains a Resdom)
|
|
*/
|
|
TargetEntry *
|
|
makeTargetEntry(Resdom *resdom, Node *expr)
|
|
{
|
|
TargetEntry *rt = makeNode(TargetEntry);
|
|
|
|
rt->resdom = resdom;
|
|
rt->expr = expr;
|
|
return rt;
|
|
}
|
|
|
|
/*
|
|
* makeResdom -
|
|
* creates a Resdom (Result Domain) node
|
|
*/
|
|
Resdom *
|
|
makeResdom(AttrNumber resno,
|
|
Oid restype,
|
|
int32 restypmod,
|
|
char *resname,
|
|
Index reskey,
|
|
Oid reskeyop,
|
|
bool resjunk)
|
|
{
|
|
Resdom *resdom = makeNode(Resdom);
|
|
|
|
resdom->resno = resno;
|
|
resdom->restype = restype;
|
|
resdom->restypmod = restypmod;
|
|
resdom->resname = resname;
|
|
|
|
/*
|
|
* For historical reasons, ressortgroupref defaults to 0 while
|
|
* reskey/reskeyop are passed in explicitly. This is pretty silly.
|
|
*/
|
|
resdom->ressortgroupref = 0;
|
|
resdom->reskey = reskey;
|
|
resdom->reskeyop = reskeyop;
|
|
resdom->resjunk = resjunk;
|
|
return resdom;
|
|
}
|
|
|
|
/*
|
|
* makeConst -
|
|
* creates a Const node
|
|
*/
|
|
Const *
|
|
makeConst(Oid consttype,
|
|
int constlen,
|
|
Datum constvalue,
|
|
bool constisnull,
|
|
bool constbyval,
|
|
bool constisset,
|
|
bool constiscast)
|
|
{
|
|
Const *cnst = makeNode(Const);
|
|
|
|
cnst->consttype = consttype;
|
|
cnst->constlen = constlen;
|
|
cnst->constvalue = constvalue;
|
|
cnst->constisnull = constisnull;
|
|
cnst->constbyval = constbyval;
|
|
cnst->constisset = constisset;
|
|
cnst->constiscast = constiscast;
|
|
return cnst;
|
|
}
|
|
|
|
/*
|
|
* makeAttr -
|
|
* creates an Attr node
|
|
*/
|
|
Attr *
|
|
makeAttr(char *relname, char *attname)
|
|
{
|
|
Attr *a = makeNode(Attr);
|
|
|
|
a->relname = pstrdup(relname);
|
|
a->paramNo = NULL;
|
|
if (attname != NULL)
|
|
a->attrs = lcons(makeString(pstrdup(attname)), NIL);
|
|
a->indirection = NULL;
|
|
|
|
return a;
|
|
}
|