PostgreSQL Source Code  git master
tlist.c File Reference
#include "postgres.h"
#include "nodes/makefuncs.h"
#include "nodes/nodeFuncs.h"
#include "optimizer/cost.h"
#include "optimizer/optimizer.h"
#include "optimizer/tlist.h"
Include dependency graph for tlist.c:

Go to the source code of this file.

Data Structures

struct  split_pathtarget_item
 
struct  split_pathtarget_context
 

Macros

#define IS_SRF_CALL(node)
 

Functions

static bool split_pathtarget_walker (Node *node, split_pathtarget_context *context)
 
static void add_sp_item_to_pathtarget (PathTarget *target, split_pathtarget_item *item)
 
static void add_sp_items_to_pathtarget (PathTarget *target, List *items)
 
TargetEntrytlist_member (Expr *node, List *targetlist)
 
TargetEntrytlist_member_ignore_relabel (Expr *node, List *targetlist)
 
static TargetEntrytlist_member_match_var (Var *var, List *targetlist)
 
Listadd_to_flat_tlist (List *tlist, List *exprs)
 
Listget_tlist_exprs (List *tlist, bool includeJunk)
 
int count_nonjunk_tlist_entries (List *tlist)
 
bool tlist_same_exprs (List *tlist1, List *tlist2)
 
bool tlist_same_datatypes (List *tlist, List *colTypes, bool junkOK)
 
bool tlist_same_collations (List *tlist, List *colCollations, bool junkOK)
 
void apply_tlist_labeling (List *dest_tlist, List *src_tlist)
 
TargetEntryget_sortgroupref_tle (Index sortref, List *targetList)
 
TargetEntryget_sortgroupclause_tle (SortGroupClause *sgClause, List *targetList)
 
Nodeget_sortgroupclause_expr (SortGroupClause *sgClause, List *targetList)
 
Listget_sortgrouplist_exprs (List *sgClauses, List *targetList)
 
SortGroupClauseget_sortgroupref_clause (Index sortref, List *clauses)
 
SortGroupClauseget_sortgroupref_clause_noerr (Index sortref, List *clauses)
 
Oidextract_grouping_ops (List *groupClause)
 
Oidextract_grouping_collations (List *groupClause, List *tlist)
 
AttrNumberextract_grouping_cols (List *groupClause, List *tlist)
 
bool grouping_is_sortable (List *groupClause)
 
bool grouping_is_hashable (List *groupClause)
 
PathTargetmake_pathtarget_from_tlist (List *tlist)
 
Listmake_tlist_from_pathtarget (PathTarget *target)
 
PathTargetcopy_pathtarget (PathTarget *src)
 
PathTargetcreate_empty_pathtarget (void)
 
void add_column_to_pathtarget (PathTarget *target, Expr *expr, Index sortgroupref)
 
void add_new_column_to_pathtarget (PathTarget *target, Expr *expr)
 
void add_new_columns_to_pathtarget (PathTarget *target, List *exprs)
 
void apply_pathtarget_labeling_to_tlist (List *tlist, PathTarget *target)
 
void split_pathtarget_at_srfs (PlannerInfo *root, PathTarget *target, PathTarget *input_target, List **targets, List **targets_contain_srfs)
 

Macro Definition Documentation

◆ IS_SRF_CALL

#define IS_SRF_CALL (   node)
Value:
((IsA(node, FuncExpr) && ((FuncExpr *) (node))->funcretset) || \
(IsA(node, OpExpr) && ((OpExpr *) (node))->opretset))
#define IsA(nodeptr, _type_)
Definition: nodes.h:576

Definition at line 25 of file tlist.c.

Referenced by split_pathtarget_at_srfs(), and split_pathtarget_walker().

Function Documentation

◆ add_column_to_pathtarget()

void add_column_to_pathtarget ( PathTarget target,
Expr expr,
Index  sortgroupref 
)

Definition at line 710 of file tlist.c.

References PathTarget::exprs, lappend(), list_length(), palloc0(), repalloc(), and PathTarget::sortgrouprefs.

Referenced by add_new_column_to_pathtarget(), add_sp_item_to_pathtarget(), create_one_window_path(), make_group_input_target(), make_partial_grouping_target(), make_sort_input_target(), and make_window_input_target().

711 {
712  /* Updating the exprs list is easy ... */
713  target->exprs = lappend(target->exprs, expr);
714  /* ... the sortgroupref data, a bit less so */
715  if (target->sortgrouprefs)
716  {
717  int nexprs = list_length(target->exprs);
718 
719  /* This might look inefficient, but actually it's usually cheap */
720  target->sortgrouprefs = (Index *)
721  repalloc(target->sortgrouprefs, nexprs * sizeof(Index));
722  target->sortgrouprefs[nexprs - 1] = sortgroupref;
723  }
724  else if (sortgroupref)
725  {
726  /* Adding sortgroupref labeling to a previously unlabeled target */
727  int nexprs = list_length(target->exprs);
728 
729  target->sortgrouprefs = (Index *) palloc0(nexprs * sizeof(Index));
730  target->sortgrouprefs[nexprs - 1] = sortgroupref;
731  }
732 }
Index * sortgrouprefs
Definition: pathnodes.h:1045
List * lappend(List *list, void *datum)
Definition: list.c:322
List * exprs
Definition: pathnodes.h:1044
void * palloc0(Size size)
Definition: mcxt.c:980
unsigned int Index
Definition: c.h:476
static int list_length(const List *l)
Definition: pg_list.h:169
void * repalloc(void *pointer, Size size)
Definition: mcxt.c:1069

◆ add_new_column_to_pathtarget()

void add_new_column_to_pathtarget ( PathTarget target,
Expr expr 
)

Definition at line 746 of file tlist.c.

References add_column_to_pathtarget(), PathTarget::exprs, and list_member().

Referenced by add_new_columns_to_pathtarget().

747 {
748  if (!list_member(target->exprs, expr))
749  add_column_to_pathtarget(target, expr, 0);
750 }
void add_column_to_pathtarget(PathTarget *target, Expr *expr, Index sortgroupref)
Definition: tlist.c:710
bool list_member(const List *list, const void *datum)
Definition: list.c:614
List * exprs
Definition: pathnodes.h:1044

◆ add_new_columns_to_pathtarget()

void add_new_columns_to_pathtarget ( PathTarget target,
List exprs 
)

Definition at line 757 of file tlist.c.

References add_new_column_to_pathtarget(), and lfirst.

Referenced by make_group_input_target(), make_partial_grouping_target(), make_sort_input_target(), and make_window_input_target().

758 {
759  ListCell *lc;
760 
761  foreach(lc, exprs)
762  {
763  Expr *expr = (Expr *) lfirst(lc);
764 
765  add_new_column_to_pathtarget(target, expr);
766  }
767 }
#define lfirst(lc)
Definition: pg_list.h:190
void add_new_column_to_pathtarget(PathTarget *target, Expr *expr)
Definition: tlist.c:746

◆ add_sp_item_to_pathtarget()

static void add_sp_item_to_pathtarget ( PathTarget target,
split_pathtarget_item item 
)
static

Definition at line 1207 of file tlist.c.

References add_column_to_pathtarget(), copyObject, equal(), split_pathtarget_item::expr, PathTarget::exprs, get_pathtarget_sortgroupref, lfirst, list_length(), palloc0(), split_pathtarget_item::sortgroupref, and PathTarget::sortgrouprefs.

Referenced by add_sp_items_to_pathtarget(), and split_pathtarget_at_srfs().

1208 {
1209  int lci;
1210  ListCell *lc;
1211 
1212  /*
1213  * Look for a pre-existing entry that is equal() and does not have a
1214  * conflicting sortgroupref already.
1215  */
1216  lci = 0;
1217  foreach(lc, target->exprs)
1218  {
1219  Node *node = (Node *) lfirst(lc);
1220  Index sgref = get_pathtarget_sortgroupref(target, lci);
1221 
1222  if ((item->sortgroupref == sgref ||
1223  item->sortgroupref == 0 ||
1224  sgref == 0) &&
1225  equal(item->expr, node))
1226  {
1227  /* Found a match. Assign item's sortgroupref if it has one. */
1228  if (item->sortgroupref)
1229  {
1230  if (target->sortgrouprefs == NULL)
1231  {
1232  target->sortgrouprefs = (Index *)
1233  palloc0(list_length(target->exprs) * sizeof(Index));
1234  }
1235  target->sortgrouprefs[lci] = item->sortgroupref;
1236  }
1237  return;
1238  }
1239  lci++;
1240  }
1241 
1242  /*
1243  * No match, so add item to PathTarget. Copy the expr for safety.
1244  */
1245  add_column_to_pathtarget(target, (Expr *) copyObject(item->expr),
1246  item->sortgroupref);
1247 }
bool equal(const void *a, const void *b)
Definition: equalfuncs.c:3011
void add_column_to_pathtarget(PathTarget *target, Expr *expr, Index sortgroupref)
Definition: tlist.c:710
Definition: nodes.h:525
Index * sortgrouprefs
Definition: pathnodes.h:1045
Index sortgroupref
Definition: tlist.c:37
List * exprs
Definition: pathnodes.h:1044
void * palloc0(Size size)
Definition: mcxt.c:980
unsigned int Index
Definition: c.h:476
#define get_pathtarget_sortgroupref(target, colno)
Definition: pathnodes.h:1051
#define lfirst(lc)
Definition: pg_list.h:190
static int list_length(const List *l)
Definition: pg_list.h:169
#define copyObject(obj)
Definition: nodes.h:641

◆ add_sp_items_to_pathtarget()

static void add_sp_items_to_pathtarget ( PathTarget target,
List items 
)
static

Definition at line 1253 of file tlist.c.

References add_sp_item_to_pathtarget(), and lfirst.

Referenced by split_pathtarget_at_srfs().

1254 {
1255  ListCell *lc;
1256 
1257  foreach(lc, items)
1258  {
1259  split_pathtarget_item *item = lfirst(lc);
1260 
1261  add_sp_item_to_pathtarget(target, item);
1262  }
1263 }
static void add_sp_item_to_pathtarget(PathTarget *target, split_pathtarget_item *item)
Definition: tlist.c:1207
#define lfirst(lc)
Definition: pg_list.h:190

◆ add_to_flat_tlist()

List* add_to_flat_tlist ( List tlist,
List exprs 
)

Definition at line 154 of file tlist.c.

References copyObject, lappend(), lfirst, list_length(), makeTargetEntry(), and tlist_member().

Referenced by build_tlist_to_deparse(), and foreign_grouping_ok().

155 {
156  int next_resno = list_length(tlist) + 1;
157  ListCell *lc;
158 
159  foreach(lc, exprs)
160  {
161  Expr *expr = (Expr *) lfirst(lc);
162 
163  if (!tlist_member(expr, tlist))
164  {
165  TargetEntry *tle;
166 
167  tle = makeTargetEntry(copyObject(expr), /* copy needed?? */
168  next_resno++,
169  NULL,
170  false);
171  tlist = lappend(tlist, tle);
172  }
173  }
174  return tlist;
175 }
TargetEntry * makeTargetEntry(Expr *expr, AttrNumber resno, char *resname, bool resjunk)
Definition: makefuncs.c:236
List * lappend(List *list, void *datum)
Definition: list.c:322
TargetEntry * tlist_member(Expr *node, List *targetlist)
Definition: tlist.c:73
#define lfirst(lc)
Definition: pg_list.h:190
static int list_length(const List *l)
Definition: pg_list.h:169
#define copyObject(obj)
Definition: nodes.h:641

◆ apply_pathtarget_labeling_to_tlist()

void apply_pathtarget_labeling_to_tlist ( List tlist,
PathTarget target 
)

Definition at line 779 of file tlist.c.

References elog, ERROR, PathTarget::exprs, i, IsA, lfirst, TargetEntry::ressortgroupref, PathTarget::sortgrouprefs, tlist_member(), and tlist_member_match_var().

Referenced by create_projection_plan(), and create_scan_plan().

780 {
781  int i;
782  ListCell *lc;
783 
784  /* Nothing to do if PathTarget has no sortgrouprefs data */
785  if (target->sortgrouprefs == NULL)
786  return;
787 
788  i = 0;
789  foreach(lc, target->exprs)
790  {
791  Expr *expr = (Expr *) lfirst(lc);
792  TargetEntry *tle;
793 
794  if (target->sortgrouprefs[i])
795  {
796  /*
797  * For Vars, use tlist_member_match_var's weakened matching rule;
798  * this allows us to deal with some cases where a set-returning
799  * function has been inlined, so that we now have more knowledge
800  * about what it returns than we did when the original Var was
801  * created. Otherwise, use regular equal() to find the matching
802  * TLE. (In current usage, only the Var case is actually needed;
803  * but it seems best to have sane behavior here for non-Vars too.)
804  */
805  if (expr && IsA(expr, Var))
806  tle = tlist_member_match_var((Var *) expr, tlist);
807  else
808  tle = tlist_member(expr, tlist);
809 
810  /*
811  * Complain if noplace for the sortgrouprefs label, or if we'd
812  * have to label a column twice. (The case where it already has
813  * the desired label probably can't happen, but we may as well
814  * allow for it.)
815  */
816  if (!tle)
817  elog(ERROR, "ORDER/GROUP BY expression not found in targetlist");
818  if (tle->ressortgroupref != 0 &&
819  tle->ressortgroupref != target->sortgrouprefs[i])
820  elog(ERROR, "targetlist item has multiple sortgroupref labels");
821 
822  tle->ressortgroupref = target->sortgrouprefs[i];
823  }
824  i++;
825  }
826 }
#define IsA(nodeptr, _type_)
Definition: nodes.h:576
Definition: primnodes.h:167
#define ERROR
Definition: elog.h:43
Index * sortgrouprefs
Definition: pathnodes.h:1045
List * exprs
Definition: pathnodes.h:1044
TargetEntry * tlist_member(Expr *node, List *targetlist)
Definition: tlist.c:73
static TargetEntry * tlist_member_match_var(Var *var, List *targetlist)
Definition: tlist.c:124
#define lfirst(lc)
Definition: pg_list.h:190
#define elog(elevel,...)
Definition: elog.h:228
int i
Index ressortgroupref
Definition: primnodes.h:1396

◆ apply_tlist_labeling()

void apply_tlist_labeling ( List dest_tlist,
List src_tlist 
)

Definition at line 340 of file tlist.c.

References Assert, forboth, lfirst, list_length(), TargetEntry::resjunk, TargetEntry::resname, TargetEntry::resno, TargetEntry::resorigcol, TargetEntry::resorigtbl, and TargetEntry::ressortgroupref.

Referenced by clean_up_removed_plan_level(), create_modifytable_plan(), and create_plan().

341 {
342  ListCell *ld,
343  *ls;
344 
345  Assert(list_length(dest_tlist) == list_length(src_tlist));
346  forboth(ld, dest_tlist, ls, src_tlist)
347  {
348  TargetEntry *dest_tle = (TargetEntry *) lfirst(ld);
349  TargetEntry *src_tle = (TargetEntry *) lfirst(ls);
350 
351  Assert(dest_tle->resno == src_tle->resno);
352  dest_tle->resname = src_tle->resname;
353  dest_tle->ressortgroupref = src_tle->ressortgroupref;
354  dest_tle->resorigtbl = src_tle->resorigtbl;
355  dest_tle->resorigcol = src_tle->resorigcol;
356  dest_tle->resjunk = src_tle->resjunk;
357  }
358 }
#define forboth(cell1, list1, cell2, list2)
Definition: pg_list.h:419
Oid resorigtbl
Definition: primnodes.h:1398
char * resname
Definition: primnodes.h:1395
bool resjunk
Definition: primnodes.h:1400
AttrNumber resno
Definition: primnodes.h:1394
#define Assert(condition)
Definition: c.h:739
#define lfirst(lc)
Definition: pg_list.h:190
static int list_length(const List *l)
Definition: pg_list.h:169
AttrNumber resorigcol
Definition: primnodes.h:1399
Index ressortgroupref
Definition: primnodes.h:1396

◆ copy_pathtarget()

PathTarget* copy_pathtarget ( PathTarget src)

Definition at line 672 of file tlist.c.

References PathTarget::exprs, list_copy(), list_length(), makeNode, palloc(), and PathTarget::sortgrouprefs.

Referenced by apply_scanjoin_target_to_paths(), create_one_window_path(), create_partitionwise_grouping_paths(), and reparameterize_path_by_child().

673 {
675 
676  /* Copy scalar fields */
677  memcpy(dst, src, sizeof(PathTarget));
678  /* Shallow-copy the expression list */
679  dst->exprs = list_copy(src->exprs);
680  /* Duplicate sortgrouprefs if any (if not, the memcpy handled this) */
681  if (src->sortgrouprefs)
682  {
683  Size nbytes = list_length(src->exprs) * sizeof(Index);
684 
685  dst->sortgrouprefs = (Index *) palloc(nbytes);
686  memcpy(dst->sortgrouprefs, src->sortgrouprefs, nbytes);
687  }
688  return dst;
689 }
List * list_copy(const List *oldlist)
Definition: list.c:1404
Index * sortgrouprefs
Definition: pathnodes.h:1045
List * exprs
Definition: pathnodes.h:1044
unsigned int Index
Definition: c.h:476
#define makeNode(_type_)
Definition: nodes.h:573
size_t Size
Definition: c.h:467
static int list_length(const List *l)
Definition: pg_list.h:169
void * palloc(Size size)
Definition: mcxt.c:949

◆ count_nonjunk_tlist_entries()

int count_nonjunk_tlist_entries ( List tlist)

Definition at line 208 of file tlist.c.

References lfirst, and TargetEntry::resjunk.

Referenced by get_update_query_targetlist_def(), transformMultiAssignRef(), and transformSubLink().

209 {
210  int len = 0;
211  ListCell *l;
212 
213  foreach(l, tlist)
214  {
215  TargetEntry *tle = (TargetEntry *) lfirst(l);
216 
217  if (!tle->resjunk)
218  len++;
219  }
220  return len;
221 }
bool resjunk
Definition: primnodes.h:1400
#define lfirst(lc)
Definition: pg_list.h:190

◆ create_empty_pathtarget()

PathTarget* create_empty_pathtarget ( void  )

Definition at line 696 of file tlist.c.

References makeNode.

Referenced by build_child_join_rel(), build_join_rel(), build_simple_rel(), fetch_upper_rel(), make_group_input_target(), make_partial_grouping_target(), make_sort_input_target(), make_window_input_target(), and split_pathtarget_at_srfs().

697 {
698  /* This is easy, but we don't want callers to hard-wire this ... */
699  return makeNode(PathTarget);
700 }
#define makeNode(_type_)
Definition: nodes.h:573

◆ extract_grouping_collations()

Oid* extract_grouping_collations ( List groupClause,
List tlist 
)

Definition at line 511 of file tlist.c.

References TargetEntry::expr, exprCollation(), get_sortgroupclause_tle(), lfirst, list_length(), and palloc().

Referenced by create_agg_plan(), create_group_plan(), and create_groupingsets_plan().

512 {
513  int numCols = list_length(groupClause);
514  int colno = 0;
515  Oid *grpCollations;
516  ListCell *glitem;
517 
518  grpCollations = (Oid *) palloc(sizeof(Oid) * numCols);
519 
520  foreach(glitem, groupClause)
521  {
522  SortGroupClause *groupcl = (SortGroupClause *) lfirst(glitem);
523  TargetEntry *tle = get_sortgroupclause_tle(groupcl, tlist);
524 
525  grpCollations[colno++] = exprCollation((Node *) tle->expr);
526  }
527 
528  return grpCollations;
529 }
TargetEntry * get_sortgroupclause_tle(SortGroupClause *sgClause, List *targetList)
Definition: tlist.c:389
Definition: nodes.h:525
unsigned int Oid
Definition: postgres_ext.h:31
#define lfirst(lc)
Definition: pg_list.h:190
Expr * expr
Definition: primnodes.h:1393
static int list_length(const List *l)
Definition: pg_list.h:169
Oid exprCollation(const Node *expr)
Definition: nodeFuncs.c:719
void * palloc(Size size)
Definition: mcxt.c:949

◆ extract_grouping_cols()

AttrNumber* extract_grouping_cols ( List groupClause,
List tlist 
)

Definition at line 536 of file tlist.c.

References get_sortgroupclause_tle(), lfirst, list_length(), palloc(), and TargetEntry::resno.

Referenced by create_agg_plan(), and create_group_plan().

537 {
538  AttrNumber *grpColIdx;
539  int numCols = list_length(groupClause);
540  int colno = 0;
541  ListCell *glitem;
542 
543  grpColIdx = (AttrNumber *) palloc(sizeof(AttrNumber) * numCols);
544 
545  foreach(glitem, groupClause)
546  {
547  SortGroupClause *groupcl = (SortGroupClause *) lfirst(glitem);
548  TargetEntry *tle = get_sortgroupclause_tle(groupcl, tlist);
549 
550  grpColIdx[colno++] = tle->resno;
551  }
552 
553  return grpColIdx;
554 }
TargetEntry * get_sortgroupclause_tle(SortGroupClause *sgClause, List *targetList)
Definition: tlist.c:389
AttrNumber resno
Definition: primnodes.h:1394
#define lfirst(lc)
Definition: pg_list.h:190
static int list_length(const List *l)
Definition: pg_list.h:169
void * palloc(Size size)
Definition: mcxt.c:949
int16 AttrNumber
Definition: attnum.h:21

◆ extract_grouping_ops()

Oid* extract_grouping_ops ( List groupClause)

Definition at line 485 of file tlist.c.

References Assert, SortGroupClause::eqop, lfirst, list_length(), OidIsValid, and palloc().

Referenced by create_agg_plan(), create_group_plan(), and create_groupingsets_plan().

486 {
487  int numCols = list_length(groupClause);
488  int colno = 0;
489  Oid *groupOperators;
490  ListCell *glitem;
491 
492  groupOperators = (Oid *) palloc(sizeof(Oid) * numCols);
493 
494  foreach(glitem, groupClause)
495  {
496  SortGroupClause *groupcl = (SortGroupClause *) lfirst(glitem);
497 
498  groupOperators[colno] = groupcl->eqop;
499  Assert(OidIsValid(groupOperators[colno]));
500  colno++;
501  }
502 
503  return groupOperators;
504 }
unsigned int Oid
Definition: postgres_ext.h:31
#define OidIsValid(objectId)
Definition: c.h:645
#define Assert(condition)
Definition: c.h:739
#define lfirst(lc)
Definition: pg_list.h:190
static int list_length(const List *l)
Definition: pg_list.h:169
void * palloc(Size size)
Definition: mcxt.c:949

◆ get_sortgroupclause_expr()

Node* get_sortgroupclause_expr ( SortGroupClause sgClause,
List targetList 
)

Definition at line 401 of file tlist.c.

References TargetEntry::expr, and get_sortgroupclause_tle().

Referenced by get_sortgrouplist_exprs(), make_pathkeys_for_sortclauses(), transformAggregateCall(), and transformWindowDefinitions().

402 {
403  TargetEntry *tle = get_sortgroupclause_tle(sgClause, targetList);
404 
405  return (Node *) tle->expr;
406 }
TargetEntry * get_sortgroupclause_tle(SortGroupClause *sgClause, List *targetList)
Definition: tlist.c:389
Definition: nodes.h:525
Expr * expr
Definition: primnodes.h:1393

◆ get_sortgroupclause_tle()

◆ get_sortgrouplist_exprs()

List* get_sortgrouplist_exprs ( List sgClauses,
List targetList 
)

Definition at line 414 of file tlist.c.

References get_sortgroupclause_expr(), lappend(), lfirst, and NIL.

Referenced by create_distinct_paths(), estimate_path_cost_size(), get_number_of_groups(), and group_by_has_partkey().

415 {
416  List *result = NIL;
417  ListCell *l;
418 
419  foreach(l, sgClauses)
420  {
421  SortGroupClause *sortcl = (SortGroupClause *) lfirst(l);
422  Node *sortexpr;
423 
424  sortexpr = get_sortgroupclause_expr(sortcl, targetList);
425  result = lappend(result, sortexpr);
426  }
427  return result;
428 }
#define NIL
Definition: pg_list.h:65
Node * get_sortgroupclause_expr(SortGroupClause *sgClause, List *targetList)
Definition: tlist.c:401
Definition: nodes.h:525
List * lappend(List *list, void *datum)
Definition: list.c:322
#define lfirst(lc)
Definition: pg_list.h:190
Definition: pg_list.h:50

◆ get_sortgroupref_clause()

SortGroupClause* get_sortgroupref_clause ( Index  sortref,
List clauses 
)

Definition at line 444 of file tlist.c.

References elog, ERROR, lfirst, and SortGroupClause::tleSortGroupRef.

Referenced by preprocess_groupclause().

445 {
446  ListCell *l;
447 
448  foreach(l, clauses)
449  {
451 
452  if (cl->tleSortGroupRef == sortref)
453  return cl;
454  }
455 
456  elog(ERROR, "ORDER/GROUP BY expression not found in list");
457  return NULL; /* keep compiler quiet */
458 }
Index tleSortGroupRef
Definition: parsenodes.h:1234
#define ERROR
Definition: elog.h:43
#define lfirst(lc)
Definition: pg_list.h:190
#define elog(elevel,...)
Definition: elog.h:228

◆ get_sortgroupref_clause_noerr()

SortGroupClause* get_sortgroupref_clause_noerr ( Index  sortref,
List clauses 
)

Definition at line 465 of file tlist.c.

References lfirst, and SortGroupClause::tleSortGroupRef.

Referenced by find_em_expr_for_input_target(), foreign_grouping_ok(), make_group_input_target(), and make_partial_grouping_target().

466 {
467  ListCell *l;
468 
469  foreach(l, clauses)
470  {
472 
473  if (cl->tleSortGroupRef == sortref)
474  return cl;
475  }
476 
477  return NULL;
478 }
Index tleSortGroupRef
Definition: parsenodes.h:1234
#define lfirst(lc)
Definition: pg_list.h:190

◆ get_sortgroupref_tle()

TargetEntry* get_sortgroupref_tle ( Index  sortref,
List targetList 
)

Definition at line 367 of file tlist.c.

References elog, ERROR, lfirst, and TargetEntry::ressortgroupref.

Referenced by convert_subquery_pathkeys(), deparseSortGroupClause(), foreign_expr_walker(), get_rule_sortgroupclause(), get_sortgroupclause_tle(), make_unique_from_pathkeys(), prepare_sort_from_pathkeys(), and transformDistinctOnClause().

368 {
369  ListCell *l;
370 
371  foreach(l, targetList)
372  {
373  TargetEntry *tle = (TargetEntry *) lfirst(l);
374 
375  if (tle->ressortgroupref == sortref)
376  return tle;
377  }
378 
379  elog(ERROR, "ORDER/GROUP BY expression not found in targetlist");
380  return NULL; /* keep compiler quiet */
381 }
#define ERROR
Definition: elog.h:43
#define lfirst(lc)
Definition: pg_list.h:190
#define elog(elevel,...)
Definition: elog.h:228
Index ressortgroupref
Definition: primnodes.h:1396

◆ get_tlist_exprs()

List* get_tlist_exprs ( List tlist,
bool  includeJunk 
)

Definition at line 185 of file tlist.c.

References TargetEntry::expr, lappend(), lfirst, NIL, and TargetEntry::resjunk.

Referenced by recurse_set_operations().

186 {
187  List *result = NIL;
188  ListCell *l;
189 
190  foreach(l, tlist)
191  {
192  TargetEntry *tle = (TargetEntry *) lfirst(l);
193 
194  if (tle->resjunk && !includeJunk)
195  continue;
196 
197  result = lappend(result, tle->expr);
198  }
199  return result;
200 }
#define NIL
Definition: pg_list.h:65
bool resjunk
Definition: primnodes.h:1400
List * lappend(List *list, void *datum)
Definition: list.c:322
#define lfirst(lc)
Definition: pg_list.h:190
Expr * expr
Definition: primnodes.h:1393
Definition: pg_list.h:50

◆ grouping_is_hashable()

bool grouping_is_hashable ( List groupClause)

Definition at line 582 of file tlist.c.

References SortGroupClause::hashable, and lfirst.

Referenced by choose_hashed_setop(), create_distinct_paths(), create_grouping_paths(), and generate_recursion_path().

583 {
584  ListCell *glitem;
585 
586  foreach(glitem, groupClause)
587  {
588  SortGroupClause *groupcl = (SortGroupClause *) lfirst(glitem);
589 
590  if (!groupcl->hashable)
591  return false;
592  }
593  return true;
594 }
#define lfirst(lc)
Definition: pg_list.h:190

◆ grouping_is_sortable()

bool grouping_is_sortable ( List groupClause)

Definition at line 562 of file tlist.c.

References lfirst, OidIsValid, and SortGroupClause::sortop.

Referenced by adjust_foreign_grouping_path_cost(), choose_hashed_setop(), create_distinct_paths(), create_grouping_paths(), make_pathkeys_for_window(), and standard_qp_callback().

563 {
564  ListCell *glitem;
565 
566  foreach(glitem, groupClause)
567  {
568  SortGroupClause *groupcl = (SortGroupClause *) lfirst(glitem);
569 
570  if (!OidIsValid(groupcl->sortop))
571  return false;
572  }
573  return true;
574 }
#define OidIsValid(objectId)
Definition: c.h:645
#define lfirst(lc)
Definition: pg_list.h:190

◆ make_pathtarget_from_tlist()

PathTarget* make_pathtarget_from_tlist ( List tlist)

Definition at line 613 of file tlist.c.

References TargetEntry::expr, PathTarget::exprs, i, lappend(), lfirst, list_length(), makeNode, palloc(), TargetEntry::ressortgroupref, and PathTarget::sortgrouprefs.

614 {
615  PathTarget *target = makeNode(PathTarget);
616  int i;
617  ListCell *lc;
618 
619  target->sortgrouprefs = (Index *) palloc(list_length(tlist) * sizeof(Index));
620 
621  i = 0;
622  foreach(lc, tlist)
623  {
624  TargetEntry *tle = (TargetEntry *) lfirst(lc);
625 
626  target->exprs = lappend(target->exprs, tle->expr);
627  target->sortgrouprefs[i] = tle->ressortgroupref;
628  i++;
629  }
630 
631  return target;
632 }
Index * sortgrouprefs
Definition: pathnodes.h:1045
List * lappend(List *list, void *datum)
Definition: list.c:322
List * exprs
Definition: pathnodes.h:1044
unsigned int Index
Definition: c.h:476
#define makeNode(_type_)
Definition: nodes.h:573
#define lfirst(lc)
Definition: pg_list.h:190
Expr * expr
Definition: primnodes.h:1393
static int list_length(const List *l)
Definition: pg_list.h:169
void * palloc(Size size)
Definition: mcxt.c:949
int i
Index ressortgroupref
Definition: primnodes.h:1396

◆ make_tlist_from_pathtarget()

List* make_tlist_from_pathtarget ( PathTarget target)

Definition at line 639 of file tlist.c.

References PathTarget::exprs, i, lappend(), lfirst, makeTargetEntry(), NIL, TargetEntry::ressortgroupref, and PathTarget::sortgrouprefs.

Referenced by set_subquery_pathlist().

640 {
641  List *tlist = NIL;
642  int i;
643  ListCell *lc;
644 
645  i = 0;
646  foreach(lc, target->exprs)
647  {
648  Expr *expr = (Expr *) lfirst(lc);
649  TargetEntry *tle;
650 
651  tle = makeTargetEntry(expr,
652  i + 1,
653  NULL,
654  false);
655  if (target->sortgrouprefs)
656  tle->ressortgroupref = target->sortgrouprefs[i];
657  tlist = lappend(tlist, tle);
658  i++;
659  }
660 
661  return tlist;
662 }
#define NIL
Definition: pg_list.h:65
Index * sortgrouprefs
Definition: pathnodes.h:1045
TargetEntry * makeTargetEntry(Expr *expr, AttrNumber resno, char *resname, bool resjunk)
Definition: makefuncs.c:236
List * lappend(List *list, void *datum)
Definition: list.c:322
List * exprs
Definition: pathnodes.h:1044
#define lfirst(lc)
Definition: pg_list.h:190
int i
Index ressortgroupref
Definition: primnodes.h:1396
Definition: pg_list.h:50

◆ split_pathtarget_at_srfs()

void split_pathtarget_at_srfs ( PlannerInfo root,
PathTarget target,
PathTarget input_target,
List **  targets,
List **  targets_contain_srfs 
)

Definition at line 886 of file tlist.c.

References add_sp_item_to_pathtarget(), add_sp_items_to_pathtarget(), create_empty_pathtarget(), split_pathtarget_context::current_depth, split_pathtarget_context::current_input_srfs, split_pathtarget_context::current_input_vars, split_pathtarget_context::current_sgref, split_pathtarget_item::expr, PathTarget::exprs, for_each_cell, forthree, get_pathtarget_sortgroupref, split_pathtarget_context::input_target_exprs, IS_SRF_CALL, lappend(), lappend_int(), split_pathtarget_context::level_input_srfs, split_pathtarget_context::level_input_vars, split_pathtarget_context::level_srfs, lfirst, list_concat(), list_make1, list_make1_int, list_member(), list_nth_cell(), lnext(), NIL, set_pathtarget_cost_width(), and split_pathtarget_walker().

Referenced by grouping_planner().

889 {
890  split_pathtarget_context context;
891  int max_depth;
892  bool need_extra_projection;
893  List *prev_level_tlist;
894  int lci;
895  ListCell *lc,
896  *lc1,
897  *lc2,
898  *lc3;
899 
900  /*
901  * It's not unusual for planner.c to pass us two physically identical
902  * targets, in which case we can conclude without further ado that all
903  * expressions are available from the input. (The logic below would
904  * arrive at the same conclusion, but much more tediously.)
905  */
906  if (target == input_target)
907  {
908  *targets = list_make1(target);
909  *targets_contain_srfs = list_make1_int(false);
910  return;
911  }
912 
913  /* Pass any input_target exprs down to split_pathtarget_walker() */
914  context.input_target_exprs = input_target ? input_target->exprs : NIL;
915 
916  /*
917  * Initialize with empty level-zero lists, and no levels after that.
918  * (Note: we could dispense with representing level zero explicitly, since
919  * it will never receive any SRFs, but then we'd have to special-case that
920  * level when we get to building result PathTargets. Level zero describes
921  * the SRF-free PathTarget that will be given to the input plan node.)
922  */
923  context.level_srfs = list_make1(NIL);
924  context.level_input_vars = list_make1(NIL);
925  context.level_input_srfs = list_make1(NIL);
926 
927  /* Initialize data we'll accumulate across all the target expressions */
928  context.current_input_vars = NIL;
929  context.current_input_srfs = NIL;
930  max_depth = 0;
931  need_extra_projection = false;
932 
933  /* Scan each expression in the PathTarget looking for SRFs */
934  lci = 0;
935  foreach(lc, target->exprs)
936  {
937  Node *node = (Node *) lfirst(lc);
938 
939  /* Tell split_pathtarget_walker about this expr's sortgroupref */
940  context.current_sgref = get_pathtarget_sortgroupref(target, lci);
941  lci++;
942 
943  /*
944  * Find all SRFs and Vars (and Var-like nodes) in this expression, and
945  * enter them into appropriate lists within the context struct.
946  */
947  context.current_depth = 0;
948  split_pathtarget_walker(node, &context);
949 
950  /* An expression containing no SRFs is of no further interest */
951  if (context.current_depth == 0)
952  continue;
953 
954  /*
955  * Track max SRF nesting depth over the whole PathTarget. Also, if
956  * this expression establishes a new max depth, we no longer care
957  * whether previous expressions contained nested SRFs; we can handle
958  * any required projection for them in the final ProjectSet node.
959  */
960  if (max_depth < context.current_depth)
961  {
962  max_depth = context.current_depth;
963  need_extra_projection = false;
964  }
965 
966  /*
967  * If any maximum-depth SRF is not at the top level of its expression,
968  * we'll need an extra Result node to compute the top-level scalar
969  * expression.
970  */
971  if (max_depth == context.current_depth && !IS_SRF_CALL(node))
972  need_extra_projection = true;
973  }
974 
975  /*
976  * If we found no SRFs needing evaluation (maybe they were all present in
977  * input_target, or maybe they were all removed by const-simplification),
978  * then no ProjectSet is needed; fall out.
979  */
980  if (max_depth == 0)
981  {
982  *targets = list_make1(target);
983  *targets_contain_srfs = list_make1_int(false);
984  return;
985  }
986 
987  /*
988  * The Vars and SRF outputs needed at top level can be added to the last
989  * level_input lists if we don't need an extra projection step. If we do
990  * need one, add a SRF-free level to the lists.
991  */
992  if (need_extra_projection)
993  {
994  context.level_srfs = lappend(context.level_srfs, NIL);
995  context.level_input_vars = lappend(context.level_input_vars,
996  context.current_input_vars);
997  context.level_input_srfs = lappend(context.level_input_srfs,
998  context.current_input_srfs);
999  }
1000  else
1001  {
1002  lc = list_nth_cell(context.level_input_vars, max_depth);
1003  lfirst(lc) = list_concat(lfirst(lc), context.current_input_vars);
1004  lc = list_nth_cell(context.level_input_srfs, max_depth);
1005  lfirst(lc) = list_concat(lfirst(lc), context.current_input_srfs);
1006  }
1007 
1008  /*
1009  * Now construct the output PathTargets. The original target can be used
1010  * as-is for the last one, but we need to construct a new SRF-free target
1011  * representing what the preceding plan node has to emit, as well as a
1012  * target for each intermediate ProjectSet node.
1013  */
1014  *targets = *targets_contain_srfs = NIL;
1015  prev_level_tlist = NIL;
1016 
1017  forthree(lc1, context.level_srfs,
1018  lc2, context.level_input_vars,
1019  lc3, context.level_input_srfs)
1020  {
1021  List *level_srfs = (List *) lfirst(lc1);
1022  PathTarget *ntarget;
1023 
1024  if (lnext(context.level_srfs, lc1) == NULL)
1025  {
1026  ntarget = target;
1027  }
1028  else
1029  {
1030  ntarget = create_empty_pathtarget();
1031 
1032  /*
1033  * This target should actually evaluate any SRFs of the current
1034  * level, and it needs to propagate forward any Vars needed by
1035  * later levels, as well as SRFs computed earlier and needed by
1036  * later levels.
1037  */
1038  add_sp_items_to_pathtarget(ntarget, level_srfs);
1039  for_each_cell(lc, context.level_input_vars,
1040  lnext(context.level_input_vars, lc2))
1041  {
1042  List *input_vars = (List *) lfirst(lc);
1043 
1044  add_sp_items_to_pathtarget(ntarget, input_vars);
1045  }
1046  for_each_cell(lc, context.level_input_srfs,
1047  lnext(context.level_input_srfs, lc3))
1048  {
1049  List *input_srfs = (List *) lfirst(lc);
1050  ListCell *lcx;
1051 
1052  foreach(lcx, input_srfs)
1053  {
1054  split_pathtarget_item *item = lfirst(lcx);
1055 
1056  if (list_member(prev_level_tlist, item->expr))
1057  add_sp_item_to_pathtarget(ntarget, item);
1058  }
1059  }
1060  set_pathtarget_cost_width(root, ntarget);
1061  }
1062 
1063  /*
1064  * Add current target and does-it-compute-SRFs flag to output lists.
1065  */
1066  *targets = lappend(*targets, ntarget);
1067  *targets_contain_srfs = lappend_int(*targets_contain_srfs,
1068  (level_srfs != NIL));
1069 
1070  /* Remember this level's output for next pass */
1071  prev_level_tlist = ntarget->exprs;
1072  }
1073 }
PathTarget * create_empty_pathtarget(void)
Definition: tlist.c:696
#define NIL
Definition: pg_list.h:65
List * level_input_vars
Definition: tlist.c:46
PathTarget * set_pathtarget_cost_width(PlannerInfo *root, PathTarget *target)
Definition: costsize.c:5376
static void add_sp_item_to_pathtarget(PathTarget *target, split_pathtarget_item *item)
Definition: tlist.c:1207
static ListCell * lnext(const List *l, const ListCell *c)
Definition: pg_list.h:321
static ListCell * list_nth_cell(const List *list, int n)
Definition: pg_list.h:265
#define for_each_cell(cell, lst, initcell)
Definition: pg_list.h:390
#define forthree(cell1, list1, cell2, list2, cell3, list3)
Definition: pg_list.h:464
Definition: nodes.h:525
List * list_concat(List *list1, const List *list2)
Definition: list.c:516
List * current_input_srfs
Definition: tlist.c:50
#define list_make1(x1)
Definition: pg_list.h:227
bool list_member(const List *list, const void *datum)
Definition: list.c:614
List * level_input_srfs
Definition: tlist.c:47
static void add_sp_items_to_pathtarget(PathTarget *target, List *items)
Definition: tlist.c:1253
#define list_make1_int(x1)
Definition: pg_list.h:238
List * lappend_int(List *list, int datum)
Definition: list.c:340
#define IS_SRF_CALL(node)
Definition: tlist.c:25
List * lappend(List *list, void *datum)
Definition: list.c:322
List * exprs
Definition: pathnodes.h:1044
#define get_pathtarget_sortgroupref(target, colno)
Definition: pathnodes.h:1051
List * input_target_exprs
Definition: tlist.c:43
#define lfirst(lc)
Definition: pg_list.h:190
static bool split_pathtarget_walker(Node *node, split_pathtarget_context *context)
Definition: tlist.c:1082
Definition: pg_list.h:50
List * current_input_vars
Definition: tlist.c:49

◆ split_pathtarget_walker()

static bool split_pathtarget_walker ( Node node,
split_pathtarget_context context 
)
static

Definition at line 1082 of file tlist.c.

References split_pathtarget_context::current_depth, split_pathtarget_context::current_input_srfs, split_pathtarget_context::current_input_vars, split_pathtarget_context::current_sgref, split_pathtarget_item::expr, expression_tree_walker(), split_pathtarget_context::input_target_exprs, IS_SRF_CALL, IsA, lappend(), split_pathtarget_context::level_input_srfs, split_pathtarget_context::level_input_vars, split_pathtarget_context::level_srfs, lfirst, list_concat(), list_length(), list_member(), list_nth_cell(), Max, NIL, palloc(), and split_pathtarget_item::sortgroupref.

Referenced by split_pathtarget_at_srfs().

1083 {
1084  if (node == NULL)
1085  return false;
1086 
1087  /*
1088  * A subexpression that matches an expression already computed in
1089  * input_target can be treated like a Var (which indeed it will be after
1090  * setrefs.c gets done with it), even if it's actually a SRF. Record it
1091  * as being needed for the current expression, and ignore any
1092  * substructure. (Note in particular that this preserves the identity of
1093  * any expressions that appear as sortgrouprefs in input_target.)
1094  */
1095  if (list_member(context->input_target_exprs, node))
1096  {
1098 
1099  item->expr = node;
1100  item->sortgroupref = context->current_sgref;
1101  context->current_input_vars = lappend(context->current_input_vars,
1102  item);
1103  return false;
1104  }
1105 
1106  /*
1107  * Vars and Var-like constructs are expected to be gotten from the input,
1108  * too. We assume that these constructs cannot contain any SRFs (if one
1109  * does, there will be an executor failure from a misplaced SRF).
1110  */
1111  if (IsA(node, Var) ||
1112  IsA(node, PlaceHolderVar) ||
1113  IsA(node, Aggref) ||
1114  IsA(node, GroupingFunc) ||
1115  IsA(node, WindowFunc))
1116  {
1118 
1119  item->expr = node;
1120  item->sortgroupref = context->current_sgref;
1121  context->current_input_vars = lappend(context->current_input_vars,
1122  item);
1123  return false;
1124  }
1125 
1126  /*
1127  * If it's a SRF, recursively examine its inputs, determine its level, and
1128  * make appropriate entries in the output lists.
1129  */
1130  if (IS_SRF_CALL(node))
1131  {
1133  List *save_input_vars = context->current_input_vars;
1134  List *save_input_srfs = context->current_input_srfs;
1135  int save_current_depth = context->current_depth;
1136  int srf_depth;
1137  ListCell *lc;
1138 
1139  item->expr = node;
1140  item->sortgroupref = context->current_sgref;
1141 
1142  context->current_input_vars = NIL;
1143  context->current_input_srfs = NIL;
1144  context->current_depth = 0;
1145  context->current_sgref = 0; /* subexpressions are not sortgroup items */
1146 
1148  (void *) context);
1149 
1150  /* Depth is one more than any SRF below it */
1151  srf_depth = context->current_depth + 1;
1152 
1153  /* If new record depth, initialize another level of output lists */
1154  if (srf_depth >= list_length(context->level_srfs))
1155  {
1156  context->level_srfs = lappend(context->level_srfs, NIL);
1157  context->level_input_vars = lappend(context->level_input_vars, NIL);
1158  context->level_input_srfs = lappend(context->level_input_srfs, NIL);
1159  }
1160 
1161  /* Record this SRF as needing to be evaluated at appropriate level */
1162  lc = list_nth_cell(context->level_srfs, srf_depth);
1163  lfirst(lc) = lappend(lfirst(lc), item);
1164 
1165  /* Record its inputs as being needed at the same level */
1166  lc = list_nth_cell(context->level_input_vars, srf_depth);
1167  lfirst(lc) = list_concat(lfirst(lc), context->current_input_vars);
1168  lc = list_nth_cell(context->level_input_srfs, srf_depth);
1169  lfirst(lc) = list_concat(lfirst(lc), context->current_input_srfs);
1170 
1171  /*
1172  * Restore caller-level state and update it for presence of this SRF.
1173  * Notice we report the SRF itself as being needed for evaluation of
1174  * surrounding expression.
1175  */
1176  context->current_input_vars = save_input_vars;
1177  context->current_input_srfs = lappend(save_input_srfs, item);
1178  context->current_depth = Max(save_current_depth, srf_depth);
1179 
1180  /* We're done here */
1181  return false;
1182  }
1183 
1184  /*
1185  * Otherwise, the node is a scalar (non-set) expression, so recurse to
1186  * examine its inputs.
1187  */
1188  context->current_sgref = 0; /* subexpressions are not sortgroup items */
1190  (void *) context);
1191 }
#define NIL
Definition: pg_list.h:65
List * level_input_vars
Definition: tlist.c:46
#define IsA(nodeptr, _type_)
Definition: nodes.h:576
static ListCell * list_nth_cell(const List *list, int n)
Definition: pg_list.h:265
List * list_concat(List *list1, const List *list2)
Definition: list.c:516
Definition: primnodes.h:167
List * current_input_srfs
Definition: tlist.c:50
bool list_member(const List *list, const void *datum)
Definition: list.c:614
List * level_input_srfs
Definition: tlist.c:47
Index sortgroupref
Definition: tlist.c:37
#define IS_SRF_CALL(node)
Definition: tlist.c:25
List * lappend(List *list, void *datum)
Definition: list.c:322
List * input_target_exprs
Definition: tlist.c:43
#define Max(x, y)
Definition: c.h:905
#define lfirst(lc)
Definition: pg_list.h:190
bool expression_tree_walker(Node *node, bool(*walker)(), void *context)
Definition: nodeFuncs.c:1839
static int list_length(const List *l)
Definition: pg_list.h:169
void * palloc(Size size)
Definition: mcxt.c:949
static bool split_pathtarget_walker(Node *node, split_pathtarget_context *context)
Definition: tlist.c:1082
Definition: pg_list.h:50
List * current_input_vars
Definition: tlist.c:49

◆ tlist_member()

TargetEntry* tlist_member ( Expr node,
List targetlist 
)

Definition at line 73 of file tlist.c.

References equal(), TargetEntry::expr, and lfirst.

Referenced by add_to_flat_tlist(), apply_pathtarget_labeling_to_tlist(), build_remote_returning(), create_unique_plan(), preprocess_targetlist(), rebuild_fdw_scan_tlist(), and search_indexed_tlist_for_non_var().

74 {
75  ListCell *temp;
76 
77  foreach(temp, targetlist)
78  {
79  TargetEntry *tlentry = (TargetEntry *) lfirst(temp);
80 
81  if (equal(node, tlentry->expr))
82  return tlentry;
83  }
84  return NULL;
85 }
bool equal(const void *a, const void *b)
Definition: equalfuncs.c:3011
#define lfirst(lc)
Definition: pg_list.h:190
Expr * expr
Definition: primnodes.h:1393

◆ tlist_member_ignore_relabel()

TargetEntry* tlist_member_ignore_relabel ( Expr node,
List targetlist 
)

Definition at line 94 of file tlist.c.

References arg, equal(), TargetEntry::expr, IsA, and lfirst.

Referenced by prepare_sort_from_pathkeys().

95 {
96  ListCell *temp;
97 
98  while (node && IsA(node, RelabelType))
99  node = ((RelabelType *) node)->arg;
100 
101  foreach(temp, targetlist)
102  {
103  TargetEntry *tlentry = (TargetEntry *) lfirst(temp);
104  Expr *tlexpr = tlentry->expr;
105 
106  while (tlexpr && IsA(tlexpr, RelabelType))
107  tlexpr = ((RelabelType *) tlexpr)->arg;
108 
109  if (equal(node, tlexpr))
110  return tlentry;
111  }
112  return NULL;
113 }
#define IsA(nodeptr, _type_)
Definition: nodes.h:576
bool equal(const void *a, const void *b)
Definition: equalfuncs.c:3011
#define lfirst(lc)
Definition: pg_list.h:190
Expr * expr
Definition: primnodes.h:1393
void * arg

◆ tlist_member_match_var()

static TargetEntry* tlist_member_match_var ( Var var,
List targetlist 
)
static

Definition at line 124 of file tlist.c.

References TargetEntry::expr, IsA, lfirst, Var::varattno, Var::varlevelsup, Var::varno, and Var::vartype.

Referenced by apply_pathtarget_labeling_to_tlist().

125 {
126  ListCell *temp;
127 
128  foreach(temp, targetlist)
129  {
130  TargetEntry *tlentry = (TargetEntry *) lfirst(temp);
131  Var *tlvar = (Var *) tlentry->expr;
132 
133  if (!tlvar || !IsA(tlvar, Var))
134  continue;
135  if (var->varno == tlvar->varno &&
136  var->varattno == tlvar->varattno &&
137  var->varlevelsup == tlvar->varlevelsup &&
138  var->vartype == tlvar->vartype)
139  return tlentry;
140  }
141  return NULL;
142 }
#define IsA(nodeptr, _type_)
Definition: nodes.h:576
Index varlevelsup
Definition: primnodes.h:177
AttrNumber varattno
Definition: primnodes.h:172
Definition: primnodes.h:167
Oid vartype
Definition: primnodes.h:174
Index varno
Definition: primnodes.h:170
#define lfirst(lc)
Definition: pg_list.h:190
Expr * expr
Definition: primnodes.h:1393

◆ tlist_same_collations()

bool tlist_same_collations ( List tlist,
List colCollations,
bool  junkOK 
)

Definition at line 304 of file tlist.c.

References TargetEntry::expr, exprCollation(), lfirst, lfirst_oid, list_head(), lnext(), and TargetEntry::resjunk.

Referenced by recurse_set_operations().

305 {
306  ListCell *l;
307  ListCell *curColColl = list_head(colCollations);
308 
309  foreach(l, tlist)
310  {
311  TargetEntry *tle = (TargetEntry *) lfirst(l);
312 
313  if (tle->resjunk)
314  {
315  if (!junkOK)
316  return false;
317  }
318  else
319  {
320  if (curColColl == NULL)
321  return false; /* tlist longer than colCollations */
322  if (exprCollation((Node *) tle->expr) != lfirst_oid(curColColl))
323  return false;
324  curColColl = lnext(colCollations, curColColl);
325  }
326  }
327  if (curColColl != NULL)
328  return false; /* tlist shorter than colCollations */
329  return true;
330 }
static ListCell * lnext(const List *l, const ListCell *c)
Definition: pg_list.h:321
Definition: nodes.h:525
bool resjunk
Definition: primnodes.h:1400
static ListCell * list_head(const List *l)
Definition: pg_list.h:125
#define lfirst(lc)
Definition: pg_list.h:190
Expr * expr
Definition: primnodes.h:1393
Oid exprCollation(const Node *expr)
Definition: nodeFuncs.c:719
#define lfirst_oid(lc)
Definition: pg_list.h:192

◆ tlist_same_datatypes()

bool tlist_same_datatypes ( List tlist,
List colTypes,
bool  junkOK 
)

Definition at line 270 of file tlist.c.

References TargetEntry::expr, exprType(), lfirst, lfirst_oid, list_head(), lnext(), and TargetEntry::resjunk.

Referenced by is_simple_union_all_recurse(), and recurse_set_operations().

271 {
272  ListCell *l;
273  ListCell *curColType = list_head(colTypes);
274 
275  foreach(l, tlist)
276  {
277  TargetEntry *tle = (TargetEntry *) lfirst(l);
278 
279  if (tle->resjunk)
280  {
281  if (!junkOK)
282  return false;
283  }
284  else
285  {
286  if (curColType == NULL)
287  return false; /* tlist longer than colTypes */
288  if (exprType((Node *) tle->expr) != lfirst_oid(curColType))
289  return false;
290  curColType = lnext(colTypes, curColType);
291  }
292  }
293  if (curColType != NULL)
294  return false; /* tlist shorter than colTypes */
295  return true;
296 }
static ListCell * lnext(const List *l, const ListCell *c)
Definition: pg_list.h:321
Definition: nodes.h:525
bool resjunk
Definition: primnodes.h:1400
static ListCell * list_head(const List *l)
Definition: pg_list.h:125
#define lfirst(lc)
Definition: pg_list.h:190
Expr * expr
Definition: primnodes.h:1393
Oid exprType(const Node *expr)
Definition: nodeFuncs.c:41
#define lfirst_oid(lc)
Definition: pg_list.h:192

◆ tlist_same_exprs()

bool tlist_same_exprs ( List tlist1,
List tlist2 
)

Definition at line 240 of file tlist.c.

References equal(), TargetEntry::expr, forboth, lfirst, and list_length().

Referenced by change_plan_targetlist(), and create_projection_plan().

241 {
242  ListCell *lc1,
243  *lc2;
244 
245  if (list_length(tlist1) != list_length(tlist2))
246  return false; /* not same length, so can't match */
247 
248  forboth(lc1, tlist1, lc2, tlist2)
249  {
250  TargetEntry *tle1 = (TargetEntry *) lfirst(lc1);
251  TargetEntry *tle2 = (TargetEntry *) lfirst(lc2);
252 
253  if (!equal(tle1->expr, tle2->expr))
254  return false;
255  }
256 
257  return true;
258 }
#define forboth(cell1, list1, cell2, list2)
Definition: pg_list.h:419
bool equal(const void *a, const void *b)
Definition: equalfuncs.c:3011
#define lfirst(lc)
Definition: pg_list.h:190
Expr * expr
Definition: primnodes.h:1393
static int list_length(const List *l)
Definition: pg_list.h:169