1 /*-------------------------------------------------------------------------
4 * This code provides support for generalized relation scans. ExecScan
5 * is passed a node and a pointer to a function to "do the right thing"
6 * and return a tuple from the relation. ExecScan then does the tedious
7 * stuff - checking the qualification and projecting the tuple
10 * Portions Copyright (c) 1996-2009, PostgreSQL Global Development Group
11 * Portions Copyright (c) 1994, Regents of the University of California
15 * $PostgreSQL: pgsql/src/backend/executor/execScan.c,v 1.45 2009/04/02 19:14:33 momjian Exp $
17 *-------------------------------------------------------------------------
21 #include "executor/executor.h"
22 #include "miscadmin.h"
24 #include "utils/memutils.h"
27 static bool tlist_matches_tupdesc(PlanState *ps, List *tlist, Index varno, TupleDesc tupdesc);
30 /* ----------------------------------------------------------------
33 * Scans the relation using the 'access method' indicated and
34 * returns the next qualifying tuple in the direction specified
35 * in the global variable ExecDirection.
36 * The access method returns the next tuple and execScan() is
37 * responsible for checking the tuple returned against the qual-clause.
40 * -- the "cursor" maintained by the AMI is positioned at the tuple
41 * returned previously.
44 * -- the relation indicated is opened for scanning so that the
45 * "cursor" is positioned before the first qualifying tuple.
46 * ----------------------------------------------------------------
49 ExecScan(ScanState *node,
50 ExecScanAccessMtd accessMtd) /* function returning a tuple */
52 ExprContext *econtext;
54 ProjectionInfo *projInfo;
56 TupleTableSlot *resultSlot;
59 * Fetch data from node
62 projInfo = node->ps.ps_ProjInfo;
64 TRACE_POSTGRESQL_EXECUTOR_SCAN((uintptr_t)node, ((Scan *)node->ps.plan)->scanrelid, (uintptr_t)accessMtd);
67 * If we have neither a qual to check nor a projection to do, just skip
68 * all the overhead and return the raw scan tuple.
70 if (!qual && !projInfo)
71 return (*accessMtd) (node);
74 * Check to see if we're still projecting out tuples from a previous scan
75 * tuple (because there is a function-returning-set in the projection
76 * expressions). If so, try to project another one.
78 if (node->ps.ps_TupFromTlist)
80 Assert(projInfo); /* can't get here if not projecting */
81 resultSlot = ExecProject(projInfo, &isDone);
82 if (isDone == ExprMultipleResult)
84 /* Done with that source tuple... */
85 node->ps.ps_TupFromTlist = false;
89 * Reset per-tuple memory context to free any expression evaluation
90 * storage allocated in the previous tuple cycle. Note this can't happen
91 * until we're done projecting out tuples from a scan tuple.
93 econtext = node->ps.ps_ExprContext;
94 ResetExprContext(econtext);
97 * get a tuple from the access method loop until we obtain a tuple which
98 * passes the qualification.
102 TupleTableSlot *slot;
104 CHECK_FOR_INTERRUPTS();
106 slot = (*accessMtd) (node);
109 * if the slot returned by the accessMtd contains NULL, then it means
110 * there is nothing more to scan so we just return an empty slot,
111 * being careful to use the projection result slot so it has correct
117 return ExecClearTuple(projInfo->pi_slot);
123 * place the current tuple into the expr context
125 econtext->ecxt_scantuple = slot;
128 * check that the current tuple satisfies the qual-clause
130 * check for non-nil qual here to avoid a function call to ExecQual()
131 * when the qual is nil ... saves only a few cycles, but they add up
134 if (!qual || ExecQual(qual, econtext, false))
137 * Found a satisfactory scan tuple.
142 * Form a projection tuple, store it in the result tuple slot
143 * and return it --- unless we find we can project no tuples
144 * from this scan tuple, in which case continue scan.
146 resultSlot = ExecProject(projInfo, &isDone);
147 if (isDone != ExprEndResult)
149 node->ps.ps_TupFromTlist = (isDone == ExprMultipleResult);
156 * Here, we aren't projecting, so just return scan tuple.
163 * Tuple fails qual, so free per-tuple memory and try again.
165 ResetExprContext(econtext);
170 * ExecAssignScanProjectionInfo
171 * Set up projection info for a scan node, if necessary.
173 * We can avoid a projection step if the requested tlist exactly matches
174 * the underlying tuple type. If so, we just set ps_ProjInfo to NULL.
175 * Note that this case occurs not only for simple "SELECT * FROM ...", but
176 * also in most cases where there are joins or other processing nodes above
177 * the scan node, because the planner will preferentially generate a matching
180 * ExecAssignScanType must have been called already.
183 ExecAssignScanProjectionInfo(ScanState *node)
185 Scan *scan = (Scan *) node->ps.plan;
187 if (tlist_matches_tupdesc(&node->ps,
188 scan->plan.targetlist,
190 node->ss_ScanTupleSlot->tts_tupleDescriptor))
191 node->ps.ps_ProjInfo = NULL;
193 ExecAssignProjectionInfo(&node->ps,
194 node->ss_ScanTupleSlot->tts_tupleDescriptor);
198 tlist_matches_tupdesc(PlanState *ps, List *tlist, Index varno, TupleDesc tupdesc)
200 int numattrs = tupdesc->natts;
203 ListCell *tlist_item = list_head(tlist);
205 /* Check the tlist attributes */
206 for (attrno = 1; attrno <= numattrs; attrno++)
208 Form_pg_attribute att_tup = tupdesc->attrs[attrno - 1];
211 if (tlist_item == NULL)
212 return false; /* tlist too short */
213 var = (Var *) ((TargetEntry *) lfirst(tlist_item))->expr;
214 if (!var || !IsA(var, Var))
215 return false; /* tlist item not a Var */
216 /* if these Asserts fail, planner messed up */
217 Assert(var->varno == varno);
218 Assert(var->varlevelsup == 0);
219 if (var->varattno != attrno)
220 return false; /* out of order */
221 if (att_tup->attisdropped)
222 return false; /* table contains dropped columns */
225 * Note: usually the Var's type should match the tupdesc exactly, but
226 * in situations involving unions of columns that have different
227 * typmods, the Var may have come from above the union and hence have
228 * typmod -1. This is a legitimate situation since the Var still
229 * describes the column, just not as exactly as the tupdesc does. We
230 * could change the planner to prevent it, but it'd then insert
231 * projection steps just to convert from specific typmod to typmod -1,
232 * which is pretty silly.
234 if (var->vartype != att_tup->atttypid ||
235 (var->vartypmod != att_tup->atttypmod &&
236 var->vartypmod != -1))
237 return false; /* type mismatch */
239 tlist_item = lnext(tlist_item);
243 return false; /* tlist too long */
246 * If the plan context requires a particular hasoid setting, then that has
249 if (ExecContextForcesOids(ps, &hasoid) &&
250 hasoid != tupdesc->tdhasoid)