xref: /sqlite-3.40.0/src/resolve.c (revision e7952263)
1 /*
2 ** 2008 August 18
3 **
4 ** The author disclaims copyright to this source code.  In place of
5 ** a legal notice, here is a blessing:
6 **
7 **    May you do good and not evil.
8 **    May you find forgiveness for yourself and forgive others.
9 **    May you share freely, never taking more than you give.
10 **
11 *************************************************************************
12 **
13 ** This file contains routines used for walking the parser tree and
14 ** resolve all identifiers by associating them with a particular
15 ** table and column.
16 */
17 #include "sqliteInt.h"
18 
19 /*
20 ** Walk the expression tree pExpr and increase the aggregate function
21 ** depth (the Expr.op2 field) by N on every TK_AGG_FUNCTION node.
22 ** This needs to occur when copying a TK_AGG_FUNCTION node from an
23 ** outer query into an inner subquery.
24 **
25 ** incrAggFunctionDepth(pExpr,n) is the main routine.  incrAggDepth(..)
26 ** is a helper function - a callback for the tree walker.
27 */
28 static int incrAggDepth(Walker *pWalker, Expr *pExpr){
29   if( pExpr->op==TK_AGG_FUNCTION ) pExpr->op2 += pWalker->u.n;
30   return WRC_Continue;
31 }
32 static void incrAggFunctionDepth(Expr *pExpr, int N){
33   if( N>0 ){
34     Walker w;
35     memset(&w, 0, sizeof(w));
36     w.xExprCallback = incrAggDepth;
37     w.u.n = N;
38     sqlite3WalkExpr(&w, pExpr);
39   }
40 }
41 
42 /*
43 ** Turn the pExpr expression into an alias for the iCol-th column of the
44 ** result set in pEList.
45 **
46 ** If the reference is followed by a COLLATE operator, then make sure
47 ** the COLLATE operator is preserved.  For example:
48 **
49 **     SELECT a+b, c+d FROM t1 ORDER BY 1 COLLATE nocase;
50 **
51 ** Should be transformed into:
52 **
53 **     SELECT a+b, c+d FROM t1 ORDER BY (a+b) COLLATE nocase;
54 **
55 ** The nSubquery parameter specifies how many levels of subquery the
56 ** alias is removed from the original expression.  The usual value is
57 ** zero but it might be more if the alias is contained within a subquery
58 ** of the original expression.  The Expr.op2 field of TK_AGG_FUNCTION
59 ** structures must be increased by the nSubquery amount.
60 */
61 static void resolveAlias(
62   Parse *pParse,         /* Parsing context */
63   ExprList *pEList,      /* A result set */
64   int iCol,              /* A column in the result set.  0..pEList->nExpr-1 */
65   Expr *pExpr,           /* Transform this into an alias to the result set */
66   const char *zType,     /* "GROUP" or "ORDER" or "" */
67   int nSubquery          /* Number of subqueries that the label is moving */
68 ){
69   Expr *pOrig;           /* The iCol-th column of the result set */
70   Expr *pDup;            /* Copy of pOrig */
71   sqlite3 *db;           /* The database connection */
72 
73   assert( iCol>=0 && iCol<pEList->nExpr );
74   pOrig = pEList->a[iCol].pExpr;
75   assert( pOrig!=0 );
76   db = pParse->db;
77   pDup = sqlite3ExprDup(db, pOrig, 0);
78   if( pDup!=0 ){
79     if( zType[0]!='G' ) incrAggFunctionDepth(pDup, nSubquery);
80     if( pExpr->op==TK_COLLATE ){
81       pDup = sqlite3ExprAddCollateString(pParse, pDup, pExpr->u.zToken);
82     }
83     ExprSetProperty(pDup, EP_Alias);
84 
85     /* Before calling sqlite3ExprDelete(), set the EP_Static flag. This
86     ** prevents ExprDelete() from deleting the Expr structure itself,
87     ** allowing it to be repopulated by the memcpy() on the following line.
88     ** The pExpr->u.zToken might point into memory that will be freed by the
89     ** sqlite3DbFree(db, pDup) on the last line of this block, so be sure to
90     ** make a copy of the token before doing the sqlite3DbFree().
91     */
92     ExprSetProperty(pExpr, EP_Static);
93     sqlite3ExprDelete(db, pExpr);
94     memcpy(pExpr, pDup, sizeof(*pExpr));
95     if( !ExprHasProperty(pExpr, EP_IntValue) && pExpr->u.zToken!=0 ){
96       assert( (pExpr->flags & (EP_Reduced|EP_TokenOnly))==0 );
97       pExpr->u.zToken = sqlite3DbStrDup(db, pExpr->u.zToken);
98       pExpr->flags |= EP_MemToken;
99     }
100     sqlite3DbFree(db, pDup);
101   }
102   ExprSetProperty(pExpr, EP_Alias);
103 }
104 
105 
106 /*
107 ** Return TRUE if the name zCol occurs anywhere in the USING clause.
108 **
109 ** Return FALSE if the USING clause is NULL or if it does not contain
110 ** zCol.
111 */
112 static int nameInUsingClause(IdList *pUsing, const char *zCol){
113   if( pUsing ){
114     int k;
115     for(k=0; k<pUsing->nId; k++){
116       if( sqlite3StrICmp(pUsing->a[k].zName, zCol)==0 ) return 1;
117     }
118   }
119   return 0;
120 }
121 
122 /*
123 ** Subqueries stores the original database, table and column names for their
124 ** result sets in ExprList.a[].zSpan, in the form "DATABASE.TABLE.COLUMN".
125 ** Check to see if the zSpan given to this routine matches the zDb, zTab,
126 ** and zCol.  If any of zDb, zTab, and zCol are NULL then those fields will
127 ** match anything.
128 */
129 int sqlite3MatchSpanName(
130   const char *zSpan,
131   const char *zCol,
132   const char *zTab,
133   const char *zDb
134 ){
135   int n;
136   for(n=0; ALWAYS(zSpan[n]) && zSpan[n]!='.'; n++){}
137   if( zDb && (sqlite3StrNICmp(zSpan, zDb, n)!=0 || zDb[n]!=0) ){
138     return 0;
139   }
140   zSpan += n+1;
141   for(n=0; ALWAYS(zSpan[n]) && zSpan[n]!='.'; n++){}
142   if( zTab && (sqlite3StrNICmp(zSpan, zTab, n)!=0 || zTab[n]!=0) ){
143     return 0;
144   }
145   zSpan += n+1;
146   if( zCol && sqlite3StrICmp(zSpan, zCol)!=0 ){
147     return 0;
148   }
149   return 1;
150 }
151 
152 /*
153 ** Given the name of a column of the form X.Y.Z or Y.Z or just Z, look up
154 ** that name in the set of source tables in pSrcList and make the pExpr
155 ** expression node refer back to that source column.  The following changes
156 ** are made to pExpr:
157 **
158 **    pExpr->iDb           Set the index in db->aDb[] of the database X
159 **                         (even if X is implied).
160 **    pExpr->iTable        Set to the cursor number for the table obtained
161 **                         from pSrcList.
162 **    pExpr->pTab          Points to the Table structure of X.Y (even if
163 **                         X and/or Y are implied.)
164 **    pExpr->iColumn       Set to the column number within the table.
165 **    pExpr->op            Set to TK_COLUMN.
166 **    pExpr->pLeft         Any expression this points to is deleted
167 **    pExpr->pRight        Any expression this points to is deleted.
168 **
169 ** The zDb variable is the name of the database (the "X").  This value may be
170 ** NULL meaning that name is of the form Y.Z or Z.  Any available database
171 ** can be used.  The zTable variable is the name of the table (the "Y").  This
172 ** value can be NULL if zDb is also NULL.  If zTable is NULL it
173 ** means that the form of the name is Z and that columns from any table
174 ** can be used.
175 **
176 ** If the name cannot be resolved unambiguously, leave an error message
177 ** in pParse and return WRC_Abort.  Return WRC_Prune on success.
178 */
179 static int lookupName(
180   Parse *pParse,       /* The parsing context */
181   const char *zDb,     /* Name of the database containing table, or NULL */
182   const char *zTab,    /* Name of table containing column, or NULL */
183   const char *zCol,    /* Name of the column. */
184   NameContext *pNC,    /* The name context used to resolve the name */
185   Expr *pExpr          /* Make this EXPR node point to the selected column */
186 ){
187   int i, j;                         /* Loop counters */
188   int cnt = 0;                      /* Number of matching column names */
189   int cntTab = 0;                   /* Number of matching table names */
190   int nSubquery = 0;                /* How many levels of subquery */
191   sqlite3 *db = pParse->db;         /* The database connection */
192   struct SrcList_item *pItem;       /* Use for looping over pSrcList items */
193   struct SrcList_item *pMatch = 0;  /* The matching pSrcList item */
194   NameContext *pTopNC = pNC;        /* First namecontext in the list */
195   Schema *pSchema = 0;              /* Schema of the expression */
196   int eNewExprOp = TK_COLUMN;       /* New value for pExpr->op on success */
197   Table *pTab = 0;                  /* Table hold the row */
198   Column *pCol;                     /* A column of pTab */
199 
200   assert( pNC );     /* the name context cannot be NULL. */
201   assert( zCol );    /* The Z in X.Y.Z cannot be NULL */
202   assert( !ExprHasProperty(pExpr, EP_TokenOnly|EP_Reduced) );
203 
204   /* Initialize the node to no-match */
205   pExpr->iTable = -1;
206   pExpr->pTab = 0;
207   ExprSetVVAProperty(pExpr, EP_NoReduce);
208 
209   /* Translate the schema name in zDb into a pointer to the corresponding
210   ** schema.  If not found, pSchema will remain NULL and nothing will match
211   ** resulting in an appropriate error message toward the end of this routine
212   */
213   if( zDb ){
214     testcase( pNC->ncFlags & NC_PartIdx );
215     testcase( pNC->ncFlags & NC_IsCheck );
216     if( (pNC->ncFlags & (NC_PartIdx|NC_IsCheck))!=0 ){
217       /* Silently ignore database qualifiers inside CHECK constraints and
218       ** partial indices.  Do not raise errors because that might break
219       ** legacy and because it does not hurt anything to just ignore the
220       ** database name. */
221       zDb = 0;
222     }else{
223       for(i=0; i<db->nDb; i++){
224         assert( db->aDb[i].zDbSName );
225         if( sqlite3StrICmp(db->aDb[i].zDbSName,zDb)==0 ){
226           pSchema = db->aDb[i].pSchema;
227           break;
228         }
229       }
230     }
231   }
232 
233   /* Start at the inner-most context and move outward until a match is found */
234   assert( pNC && cnt==0 );
235   do{
236     ExprList *pEList;
237     SrcList *pSrcList = pNC->pSrcList;
238 
239     if( pSrcList ){
240       for(i=0, pItem=pSrcList->a; i<pSrcList->nSrc; i++, pItem++){
241         pTab = pItem->pTab;
242         assert( pTab!=0 && pTab->zName!=0 );
243         assert( pTab->nCol>0 );
244         if( pItem->pSelect && (pItem->pSelect->selFlags & SF_NestedFrom)!=0 ){
245           int hit = 0;
246           pEList = pItem->pSelect->pEList;
247           for(j=0; j<pEList->nExpr; j++){
248             if( sqlite3MatchSpanName(pEList->a[j].zSpan, zCol, zTab, zDb) ){
249               cnt++;
250               cntTab = 2;
251               pMatch = pItem;
252               pExpr->iColumn = j;
253               hit = 1;
254             }
255           }
256           if( hit || zTab==0 ) continue;
257         }
258         if( zDb && pTab->pSchema!=pSchema ){
259           continue;
260         }
261         if( zTab ){
262           const char *zTabName = pItem->zAlias ? pItem->zAlias : pTab->zName;
263           assert( zTabName!=0 );
264           if( sqlite3StrICmp(zTabName, zTab)!=0 ){
265             continue;
266           }
267         }
268         if( 0==(cntTab++) ){
269           pMatch = pItem;
270         }
271         for(j=0, pCol=pTab->aCol; j<pTab->nCol; j++, pCol++){
272           if( sqlite3StrICmp(pCol->zName, zCol)==0 ){
273             /* If there has been exactly one prior match and this match
274             ** is for the right-hand table of a NATURAL JOIN or is in a
275             ** USING clause, then skip this match.
276             */
277             if( cnt==1 ){
278               if( pItem->fg.jointype & JT_NATURAL ) continue;
279               if( nameInUsingClause(pItem->pUsing, zCol) ) continue;
280             }
281             cnt++;
282             pMatch = pItem;
283             /* Substitute the rowid (column -1) for the INTEGER PRIMARY KEY */
284             pExpr->iColumn = j==pTab->iPKey ? -1 : (i16)j;
285             break;
286           }
287         }
288       }
289       if( pMatch ){
290         pExpr->iTable = pMatch->iCursor;
291         pExpr->pTab = pMatch->pTab;
292         /* RIGHT JOIN not (yet) supported */
293         assert( (pMatch->fg.jointype & JT_RIGHT)==0 );
294         if( (pMatch->fg.jointype & JT_LEFT)!=0 ){
295           ExprSetProperty(pExpr, EP_CanBeNull);
296         }
297         pSchema = pExpr->pTab->pSchema;
298       }
299     } /* if( pSrcList ) */
300 
301 #if !defined(SQLITE_OMIT_TRIGGER) || !defined(SQLITE_OMIT_UPSERT)
302     /* If we have not already resolved the name, then maybe
303     ** it is a new.* or old.* trigger argument reference.  Or
304     ** maybe it is an excluded.* from an upsert.
305     */
306     if( zDb==0 && zTab!=0 && cntTab==0 ){
307       pTab = 0;
308 #ifndef SQLITE_OMIT_TRIGGER
309       if( pParse->pTriggerTab!=0 ){
310         int op = pParse->eTriggerOp;
311         assert( op==TK_DELETE || op==TK_UPDATE || op==TK_INSERT );
312         if( op!=TK_DELETE && sqlite3StrICmp("new",zTab) == 0 ){
313           pExpr->iTable = 1;
314           pTab = pParse->pTriggerTab;
315         }else if( op!=TK_INSERT && sqlite3StrICmp("old",zTab)==0 ){
316           pExpr->iTable = 0;
317           pTab = pParse->pTriggerTab;
318         }
319       }
320 #endif /* SQLITE_OMIT_TRIGGER */
321 #ifndef SQLITE_OMIT_UPSERT
322       if( (pNC->ncFlags & NC_UUpsert)!=0 ){
323         Upsert *pUpsert = pNC->uNC.pUpsert;
324         if( pUpsert && sqlite3StrICmp("excluded",zTab)==0 ){
325           pTab = pUpsert->pUpsertSrc->a[0].pTab;
326           pExpr->iTable = 2;
327         }
328       }
329 #endif /* SQLITE_OMIT_UPSERT */
330 
331       if( pTab ){
332         int iCol;
333         pSchema = pTab->pSchema;
334         cntTab++;
335         for(iCol=0, pCol=pTab->aCol; iCol<pTab->nCol; iCol++, pCol++){
336           if( sqlite3StrICmp(pCol->zName, zCol)==0 ){
337             if( iCol==pTab->iPKey ){
338               iCol = -1;
339             }
340             break;
341           }
342         }
343         if( iCol>=pTab->nCol && sqlite3IsRowid(zCol) && VisibleRowid(pTab) ){
344           /* IMP: R-51414-32910 */
345           iCol = -1;
346         }
347         if( iCol<pTab->nCol ){
348           cnt++;
349 #ifndef SQLITE_OMIT_UPSERT
350           if( pExpr->iTable==2 ){
351             testcase( iCol==(-1) );
352             pExpr->iTable = pNC->uNC.pUpsert->regData + iCol;
353             eNewExprOp = TK_REGISTER;
354             ExprSetProperty(pExpr, EP_Alias);
355           }else
356 #endif /* SQLITE_OMIT_UPSERT */
357           {
358 #ifndef SQLITE_OMIT_TRIGGER
359             if( iCol<0 ){
360               pExpr->affinity = SQLITE_AFF_INTEGER;
361             }else if( pExpr->iTable==0 ){
362               testcase( iCol==31 );
363               testcase( iCol==32 );
364               pParse->oldmask |= (iCol>=32 ? 0xffffffff : (((u32)1)<<iCol));
365             }else{
366               testcase( iCol==31 );
367               testcase( iCol==32 );
368               pParse->newmask |= (iCol>=32 ? 0xffffffff : (((u32)1)<<iCol));
369             }
370             pExpr->pTab = pTab;
371             pExpr->iColumn = (i16)iCol;
372             eNewExprOp = TK_TRIGGER;
373 #endif /* SQLITE_OMIT_TRIGGER */
374           }
375         }
376       }
377     }
378 #endif /* !defined(SQLITE_OMIT_TRIGGER) || !defined(SQLITE_OMIT_UPSERT) */
379 
380     /*
381     ** Perhaps the name is a reference to the ROWID
382     */
383     if( cnt==0
384      && cntTab==1
385      && pMatch
386      && (pNC->ncFlags & NC_IdxExpr)==0
387      && sqlite3IsRowid(zCol)
388      && VisibleRowid(pMatch->pTab)
389     ){
390       cnt = 1;
391       pExpr->iColumn = -1;
392       pExpr->affinity = SQLITE_AFF_INTEGER;
393     }
394 
395     /*
396     ** If the input is of the form Z (not Y.Z or X.Y.Z) then the name Z
397     ** might refer to an result-set alias.  This happens, for example, when
398     ** we are resolving names in the WHERE clause of the following command:
399     **
400     **     SELECT a+b AS x FROM table WHERE x<10;
401     **
402     ** In cases like this, replace pExpr with a copy of the expression that
403     ** forms the result set entry ("a+b" in the example) and return immediately.
404     ** Note that the expression in the result set should have already been
405     ** resolved by the time the WHERE clause is resolved.
406     **
407     ** The ability to use an output result-set column in the WHERE, GROUP BY,
408     ** or HAVING clauses, or as part of a larger expression in the ORDER BY
409     ** clause is not standard SQL.  This is a (goofy) SQLite extension, that
410     ** is supported for backwards compatibility only. Hence, we issue a warning
411     ** on sqlite3_log() whenever the capability is used.
412     */
413     if( (pNC->ncFlags & NC_UEList)!=0
414      && cnt==0
415      && zTab==0
416     ){
417       pEList = pNC->uNC.pEList;
418       assert( pEList!=0 );
419       for(j=0; j<pEList->nExpr; j++){
420         char *zAs = pEList->a[j].zName;
421         if( zAs!=0 && sqlite3StrICmp(zAs, zCol)==0 ){
422           Expr *pOrig;
423           assert( pExpr->pLeft==0 && pExpr->pRight==0 );
424           assert( pExpr->x.pList==0 );
425           assert( pExpr->x.pSelect==0 );
426           pOrig = pEList->a[j].pExpr;
427           if( (pNC->ncFlags&NC_AllowAgg)==0 && ExprHasProperty(pOrig, EP_Agg) ){
428             sqlite3ErrorMsg(pParse, "misuse of aliased aggregate %s", zAs);
429             return WRC_Abort;
430           }
431           if( sqlite3ExprVectorSize(pOrig)!=1 ){
432             sqlite3ErrorMsg(pParse, "row value misused");
433             return WRC_Abort;
434           }
435           resolveAlias(pParse, pEList, j, pExpr, "", nSubquery);
436           cnt = 1;
437           pMatch = 0;
438           assert( zTab==0 && zDb==0 );
439           goto lookupname_end;
440         }
441       }
442     }
443 
444     /* Advance to the next name context.  The loop will exit when either
445     ** we have a match (cnt>0) or when we run out of name contexts.
446     */
447     if( cnt ) break;
448     pNC = pNC->pNext;
449     nSubquery++;
450   }while( pNC );
451 
452 
453   /*
454   ** If X and Y are NULL (in other words if only the column name Z is
455   ** supplied) and the value of Z is enclosed in double-quotes, then
456   ** Z is a string literal if it doesn't match any column names.  In that
457   ** case, we need to return right away and not make any changes to
458   ** pExpr.
459   **
460   ** Because no reference was made to outer contexts, the pNC->nRef
461   ** fields are not changed in any context.
462   */
463   if( cnt==0 && zTab==0 ){
464     assert( pExpr->op==TK_ID );
465     if( ExprHasProperty(pExpr,EP_DblQuoted) ){
466       pExpr->op = TK_STRING;
467       pExpr->pTab = 0;
468       return WRC_Prune;
469     }
470     if( sqlite3ExprIdToTrueFalse(pExpr) ){
471       return WRC_Prune;
472     }
473   }
474 
475   /*
476   ** cnt==0 means there was not match.  cnt>1 means there were two or
477   ** more matches.  Either way, we have an error.
478   */
479   if( cnt!=1 ){
480     const char *zErr;
481     zErr = cnt==0 ? "no such column" : "ambiguous column name";
482     if( zDb ){
483       sqlite3ErrorMsg(pParse, "%s: %s.%s.%s", zErr, zDb, zTab, zCol);
484     }else if( zTab ){
485       sqlite3ErrorMsg(pParse, "%s: %s.%s", zErr, zTab, zCol);
486     }else{
487       sqlite3ErrorMsg(pParse, "%s: %s", zErr, zCol);
488     }
489     pParse->checkSchema = 1;
490     pTopNC->nErr++;
491   }
492 
493   /* If a column from a table in pSrcList is referenced, then record
494   ** this fact in the pSrcList.a[].colUsed bitmask.  Column 0 causes
495   ** bit 0 to be set.  Column 1 sets bit 1.  And so forth.  If the
496   ** column number is greater than the number of bits in the bitmask
497   ** then set the high-order bit of the bitmask.
498   */
499   if( pExpr->iColumn>=0 && pMatch!=0 ){
500     int n = pExpr->iColumn;
501     testcase( n==BMS-1 );
502     if( n>=BMS ){
503       n = BMS-1;
504     }
505     assert( pMatch->iCursor==pExpr->iTable );
506     pMatch->colUsed |= ((Bitmask)1)<<n;
507   }
508 
509   /* Clean up and return
510   */
511   sqlite3ExprDelete(db, pExpr->pLeft);
512   pExpr->pLeft = 0;
513   sqlite3ExprDelete(db, pExpr->pRight);
514   pExpr->pRight = 0;
515   pExpr->op = eNewExprOp;
516   ExprSetProperty(pExpr, EP_Leaf);
517 lookupname_end:
518   if( cnt==1 ){
519     assert( pNC!=0 );
520     if( !ExprHasProperty(pExpr, EP_Alias) ){
521       sqlite3AuthRead(pParse, pExpr, pSchema, pNC->pSrcList);
522     }
523     /* Increment the nRef value on all name contexts from TopNC up to
524     ** the point where the name matched. */
525     for(;;){
526       assert( pTopNC!=0 );
527       pTopNC->nRef++;
528       if( pTopNC==pNC ) break;
529       pTopNC = pTopNC->pNext;
530     }
531     return WRC_Prune;
532   } else {
533     return WRC_Abort;
534   }
535 }
536 
537 /*
538 ** Allocate and return a pointer to an expression to load the column iCol
539 ** from datasource iSrc in SrcList pSrc.
540 */
541 Expr *sqlite3CreateColumnExpr(sqlite3 *db, SrcList *pSrc, int iSrc, int iCol){
542   Expr *p = sqlite3ExprAlloc(db, TK_COLUMN, 0, 0);
543   if( p ){
544     struct SrcList_item *pItem = &pSrc->a[iSrc];
545     p->pTab = pItem->pTab;
546     p->iTable = pItem->iCursor;
547     if( p->pTab->iPKey==iCol ){
548       p->iColumn = -1;
549     }else{
550       p->iColumn = (ynVar)iCol;
551       testcase( iCol==BMS );
552       testcase( iCol==BMS-1 );
553       pItem->colUsed |= ((Bitmask)1)<<(iCol>=BMS ? BMS-1 : iCol);
554     }
555   }
556   return p;
557 }
558 
559 /*
560 ** Report an error that an expression is not valid for some set of
561 ** pNC->ncFlags values determined by validMask.
562 */
563 static void notValid(
564   Parse *pParse,       /* Leave error message here */
565   NameContext *pNC,    /* The name context */
566   const char *zMsg,    /* Type of error */
567   int validMask        /* Set of contexts for which prohibited */
568 ){
569   assert( (validMask&~(NC_IsCheck|NC_PartIdx|NC_IdxExpr))==0 );
570   if( (pNC->ncFlags & validMask)!=0 ){
571     const char *zIn = "partial index WHERE clauses";
572     if( pNC->ncFlags & NC_IdxExpr )      zIn = "index expressions";
573 #ifndef SQLITE_OMIT_CHECK
574     else if( pNC->ncFlags & NC_IsCheck ) zIn = "CHECK constraints";
575 #endif
576     sqlite3ErrorMsg(pParse, "%s prohibited in %s", zMsg, zIn);
577   }
578 }
579 
580 /*
581 ** Expression p should encode a floating point value between 1.0 and 0.0.
582 ** Return 1024 times this value.  Or return -1 if p is not a floating point
583 ** value between 1.0 and 0.0.
584 */
585 static int exprProbability(Expr *p){
586   double r = -1.0;
587   if( p->op!=TK_FLOAT ) return -1;
588   sqlite3AtoF(p->u.zToken, &r, sqlite3Strlen30(p->u.zToken), SQLITE_UTF8);
589   assert( r>=0.0 );
590   if( r>1.0 ) return -1;
591   return (int)(r*134217728.0);
592 }
593 
594 /*
595 ** This routine is callback for sqlite3WalkExpr().
596 **
597 ** Resolve symbolic names into TK_COLUMN operators for the current
598 ** node in the expression tree.  Return 0 to continue the search down
599 ** the tree or 2 to abort the tree walk.
600 **
601 ** This routine also does error checking and name resolution for
602 ** function names.  The operator for aggregate functions is changed
603 ** to TK_AGG_FUNCTION.
604 */
605 static int resolveExprStep(Walker *pWalker, Expr *pExpr){
606   NameContext *pNC;
607   Parse *pParse;
608 
609   pNC = pWalker->u.pNC;
610   assert( pNC!=0 );
611   pParse = pNC->pParse;
612   assert( pParse==pWalker->pParse );
613 
614 #ifndef NDEBUG
615   if( pNC->pSrcList && pNC->pSrcList->nAlloc>0 ){
616     SrcList *pSrcList = pNC->pSrcList;
617     int i;
618     for(i=0; i<pNC->pSrcList->nSrc; i++){
619       assert( pSrcList->a[i].iCursor>=0 && pSrcList->a[i].iCursor<pParse->nTab);
620     }
621   }
622 #endif
623   switch( pExpr->op ){
624 
625 #if defined(SQLITE_ENABLE_UPDATE_DELETE_LIMIT) && !defined(SQLITE_OMIT_SUBQUERY)
626     /* The special operator TK_ROW means use the rowid for the first
627     ** column in the FROM clause.  This is used by the LIMIT and ORDER BY
628     ** clause processing on UPDATE and DELETE statements.
629     */
630     case TK_ROW: {
631       SrcList *pSrcList = pNC->pSrcList;
632       struct SrcList_item *pItem;
633       assert( pSrcList && pSrcList->nSrc==1 );
634       pItem = pSrcList->a;
635       assert( HasRowid(pItem->pTab) && pItem->pTab->pSelect==0 );
636       pExpr->op = TK_COLUMN;
637       pExpr->pTab = pItem->pTab;
638       pExpr->iTable = pItem->iCursor;
639       pExpr->iColumn = -1;
640       pExpr->affinity = SQLITE_AFF_INTEGER;
641       break;
642     }
643 #endif /* defined(SQLITE_ENABLE_UPDATE_DELETE_LIMIT)
644           && !defined(SQLITE_OMIT_SUBQUERY) */
645 
646     /* A column name:                    ID
647     ** Or table name and column name:    ID.ID
648     ** Or a database, table and column:  ID.ID.ID
649     **
650     ** The TK_ID and TK_OUT cases are combined so that there will only
651     ** be one call to lookupName().  Then the compiler will in-line
652     ** lookupName() for a size reduction and performance increase.
653     */
654     case TK_ID:
655     case TK_DOT: {
656       const char *zColumn;
657       const char *zTable;
658       const char *zDb;
659       Expr *pRight;
660 
661       if( pExpr->op==TK_ID ){
662         zDb = 0;
663         zTable = 0;
664         zColumn = pExpr->u.zToken;
665       }else{
666         notValid(pParse, pNC, "the \".\" operator", NC_IdxExpr);
667         pRight = pExpr->pRight;
668         if( pRight->op==TK_ID ){
669           zDb = 0;
670           zTable = pExpr->pLeft->u.zToken;
671           zColumn = pRight->u.zToken;
672         }else{
673           assert( pRight->op==TK_DOT );
674           zDb = pExpr->pLeft->u.zToken;
675           zTable = pRight->pLeft->u.zToken;
676           zColumn = pRight->pRight->u.zToken;
677         }
678       }
679       return lookupName(pParse, zDb, zTable, zColumn, pNC, pExpr);
680     }
681 
682     /* Resolve function names
683     */
684     case TK_FUNCTION: {
685       ExprList *pList = pExpr->x.pList;    /* The argument list */
686       int n = pList ? pList->nExpr : 0;    /* Number of arguments */
687       int no_such_func = 0;       /* True if no such function exists */
688       int wrong_num_args = 0;     /* True if wrong number of arguments */
689       int is_agg = 0;             /* True if is an aggregate function */
690       int nId;                    /* Number of characters in function name */
691       const char *zId;            /* The function name. */
692       FuncDef *pDef;              /* Information about the function */
693       u8 enc = ENC(pParse->db);   /* The database encoding */
694 
695       assert( !ExprHasProperty(pExpr, EP_xIsSelect) );
696       zId = pExpr->u.zToken;
697       nId = sqlite3Strlen30(zId);
698       pDef = sqlite3FindFunction(pParse->db, zId, n, enc, 0);
699       if( pDef==0 ){
700         pDef = sqlite3FindFunction(pParse->db, zId, -2, enc, 0);
701         if( pDef==0 ){
702           no_such_func = 1;
703         }else{
704           wrong_num_args = 1;
705         }
706       }else{
707         is_agg = pDef->xFinalize!=0;
708         if( pDef->funcFlags & SQLITE_FUNC_UNLIKELY ){
709           ExprSetProperty(pExpr, EP_Unlikely|EP_Skip);
710           if( n==2 ){
711             pExpr->iTable = exprProbability(pList->a[1].pExpr);
712             if( pExpr->iTable<0 ){
713               sqlite3ErrorMsg(pParse,
714                 "second argument to likelihood() must be a "
715                 "constant between 0.0 and 1.0");
716               pNC->nErr++;
717             }
718           }else{
719             /* EVIDENCE-OF: R-61304-29449 The unlikely(X) function is
720             ** equivalent to likelihood(X, 0.0625).
721             ** EVIDENCE-OF: R-01283-11636 The unlikely(X) function is
722             ** short-hand for likelihood(X,0.0625).
723             ** EVIDENCE-OF: R-36850-34127 The likely(X) function is short-hand
724             ** for likelihood(X,0.9375).
725             ** EVIDENCE-OF: R-53436-40973 The likely(X) function is equivalent
726             ** to likelihood(X,0.9375). */
727             /* TUNING: unlikely() probability is 0.0625.  likely() is 0.9375 */
728             pExpr->iTable = pDef->zName[0]=='u' ? 8388608 : 125829120;
729           }
730         }
731 #ifndef SQLITE_OMIT_AUTHORIZATION
732         {
733           int auth = sqlite3AuthCheck(pParse, SQLITE_FUNCTION, 0,pDef->zName,0);
734           if( auth!=SQLITE_OK ){
735             if( auth==SQLITE_DENY ){
736               sqlite3ErrorMsg(pParse, "not authorized to use function: %s",
737                                       pDef->zName);
738               pNC->nErr++;
739             }
740             pExpr->op = TK_NULL;
741             return WRC_Prune;
742           }
743         }
744 #endif
745         if( pDef->funcFlags & (SQLITE_FUNC_CONSTANT|SQLITE_FUNC_SLOCHNG) ){
746           /* For the purposes of the EP_ConstFunc flag, date and time
747           ** functions and other functions that change slowly are considered
748           ** constant because they are constant for the duration of one query */
749           ExprSetProperty(pExpr,EP_ConstFunc);
750         }
751         if( (pDef->funcFlags & SQLITE_FUNC_CONSTANT)==0 ){
752           /* Date/time functions that use 'now', and other functions like
753           ** sqlite_version() that might change over time cannot be used
754           ** in an index. */
755           notValid(pParse, pNC, "non-deterministic functions",
756                    NC_IdxExpr|NC_PartIdx);
757         }
758       }
759 
760 #ifndef SQLITE_OMIT_WINDOWFUNC
761       assert( is_agg==0 || (pDef->funcFlags & SQLITE_FUNC_MINMAX)
762           || (pDef->xValue==0 && pDef->xInverse==0)
763           || (pDef->xValue && pDef->xInverse && pDef->xSFunc && pDef->xFinalize)
764       );
765       if( pDef && pDef->xValue==0 && pExpr->pWin ){
766         sqlite3ErrorMsg(pParse,
767             "%.*s() may not be used as a window function", nId, zId
768         );
769         pNC->nErr++;
770       }else if(
771             (is_agg && (pNC->ncFlags & NC_AllowAgg)==0)
772          || (is_agg && (pDef->funcFlags & SQLITE_FUNC_WINDOW) && !pExpr->pWin)
773          || (is_agg && pExpr->pWin && (pNC->ncFlags & NC_AllowWin)==0)
774       ){
775         const char *zType;
776         if( (pDef->funcFlags & SQLITE_FUNC_WINDOW) || pExpr->pWin ){
777           zType = "window";
778         }else{
779           zType = "aggregate";
780         }
781         sqlite3ErrorMsg(pParse, "misuse of %s function %.*s()", zType, nId,zId);
782         pNC->nErr++;
783         is_agg = 0;
784       }
785 #else
786       if( (is_agg && (pNC->ncFlags & NC_AllowAgg)==0) ){
787         sqlite3ErrorMsg(pParse, "misuse of aggregate function %.*s()", nId,zId);
788         pNC->nErr++;
789         is_agg = 0;
790       }
791 #endif
792       else if( no_such_func && pParse->db->init.busy==0
793 #ifdef SQLITE_ENABLE_UNKNOWN_SQL_FUNCTION
794                 && pParse->explain==0
795 #endif
796       ){
797         sqlite3ErrorMsg(pParse, "no such function: %.*s", nId, zId);
798         pNC->nErr++;
799       }else if( wrong_num_args ){
800         sqlite3ErrorMsg(pParse,"wrong number of arguments to function %.*s()",
801              nId, zId);
802         pNC->nErr++;
803       }
804       if( is_agg ){
805 #ifndef SQLITE_OMIT_WINDOWFUNC
806         pNC->ncFlags &= ~(pExpr->pWin ? NC_AllowWin : NC_AllowAgg);
807 #else
808         pNC->ncFlags &= ~NC_AllowAgg;
809 #endif
810       }
811       sqlite3WalkExprList(pWalker, pList);
812       if( is_agg ){
813 #ifndef SQLITE_OMIT_WINDOWFUNC
814         if( pExpr->pWin ){
815           Select *pSel = pNC->pWinSelect;
816           sqlite3WalkExprList(pWalker, pExpr->pWin->pPartition);
817           sqlite3WalkExprList(pWalker, pExpr->pWin->pOrderBy);
818           sqlite3WalkExpr(pWalker, pExpr->pWin->pFilter);
819           sqlite3WindowUpdate(pParse, pSel->pWinDefn, pExpr->pWin, pDef);
820           if( 0==pSel->pWin
821            || 0==sqlite3WindowCompare(pParse, pSel->pWin, pExpr->pWin)
822           ){
823             pExpr->pWin->pNextWin = pSel->pWin;
824             pSel->pWin = pExpr->pWin;
825           }
826           pNC->ncFlags |= NC_AllowWin;
827         }else
828 #endif /* SQLITE_OMIT_WINDOWFUNC */
829         {
830           NameContext *pNC2 = pNC;
831           pExpr->op = TK_AGG_FUNCTION;
832           pExpr->op2 = 0;
833           while( pNC2 && !sqlite3FunctionUsesThisSrc(pExpr, pNC2->pSrcList) ){
834             pExpr->op2++;
835             pNC2 = pNC2->pNext;
836           }
837           assert( pDef!=0 );
838           if( pNC2 ){
839             assert( SQLITE_FUNC_MINMAX==NC_MinMaxAgg );
840             testcase( (pDef->funcFlags & SQLITE_FUNC_MINMAX)!=0 );
841             pNC2->ncFlags |= NC_HasAgg | (pDef->funcFlags & SQLITE_FUNC_MINMAX);
842 
843           }
844           pNC->ncFlags |= NC_AllowAgg;
845         }
846       }
847       /* FIX ME:  Compute pExpr->affinity based on the expected return
848       ** type of the function
849       */
850       return WRC_Prune;
851     }
852 #ifndef SQLITE_OMIT_SUBQUERY
853     case TK_SELECT:
854     case TK_EXISTS:  testcase( pExpr->op==TK_EXISTS );
855 #endif
856     case TK_IN: {
857       testcase( pExpr->op==TK_IN );
858       if( ExprHasProperty(pExpr, EP_xIsSelect) ){
859         int nRef = pNC->nRef;
860         notValid(pParse, pNC, "subqueries", NC_IsCheck|NC_PartIdx|NC_IdxExpr);
861         sqlite3WalkSelect(pWalker, pExpr->x.pSelect);
862         assert( pNC->nRef>=nRef );
863         if( nRef!=pNC->nRef ){
864           ExprSetProperty(pExpr, EP_VarSelect);
865           pNC->ncFlags |= NC_VarSelect;
866         }
867       }
868       break;
869     }
870     case TK_VARIABLE: {
871       notValid(pParse, pNC, "parameters", NC_IsCheck|NC_PartIdx|NC_IdxExpr);
872       break;
873     }
874     case TK_IS:
875     case TK_ISNOT: {
876       Expr *pRight;
877       assert( !ExprHasProperty(pExpr, EP_Reduced) );
878       /* Handle special cases of "x IS TRUE", "x IS FALSE", "x IS NOT TRUE",
879       ** and "x IS NOT FALSE". */
880       if( (pRight = pExpr->pRight)->op==TK_ID ){
881         int rc = resolveExprStep(pWalker, pRight);
882         if( rc==WRC_Abort ) return WRC_Abort;
883         if( pRight->op==TK_TRUEFALSE ){
884           pExpr->op2 = pExpr->op;
885           pExpr->op = TK_TRUTH;
886           return WRC_Continue;
887         }
888       }
889       /* Fall thru */
890     }
891     case TK_BETWEEN:
892     case TK_EQ:
893     case TK_NE:
894     case TK_LT:
895     case TK_LE:
896     case TK_GT:
897     case TK_GE: {
898       int nLeft, nRight;
899       if( pParse->db->mallocFailed ) break;
900       assert( pExpr->pLeft!=0 );
901       nLeft = sqlite3ExprVectorSize(pExpr->pLeft);
902       if( pExpr->op==TK_BETWEEN ){
903         nRight = sqlite3ExprVectorSize(pExpr->x.pList->a[0].pExpr);
904         if( nRight==nLeft ){
905           nRight = sqlite3ExprVectorSize(pExpr->x.pList->a[1].pExpr);
906         }
907       }else{
908         assert( pExpr->pRight!=0 );
909         nRight = sqlite3ExprVectorSize(pExpr->pRight);
910       }
911       if( nLeft!=nRight ){
912         testcase( pExpr->op==TK_EQ );
913         testcase( pExpr->op==TK_NE );
914         testcase( pExpr->op==TK_LT );
915         testcase( pExpr->op==TK_LE );
916         testcase( pExpr->op==TK_GT );
917         testcase( pExpr->op==TK_GE );
918         testcase( pExpr->op==TK_IS );
919         testcase( pExpr->op==TK_ISNOT );
920         testcase( pExpr->op==TK_BETWEEN );
921         sqlite3ErrorMsg(pParse, "row value misused");
922       }
923       break;
924     }
925   }
926   return (pParse->nErr || pParse->db->mallocFailed) ? WRC_Abort : WRC_Continue;
927 }
928 
929 /*
930 ** pEList is a list of expressions which are really the result set of the
931 ** a SELECT statement.  pE is a term in an ORDER BY or GROUP BY clause.
932 ** This routine checks to see if pE is a simple identifier which corresponds
933 ** to the AS-name of one of the terms of the expression list.  If it is,
934 ** this routine return an integer between 1 and N where N is the number of
935 ** elements in pEList, corresponding to the matching entry.  If there is
936 ** no match, or if pE is not a simple identifier, then this routine
937 ** return 0.
938 **
939 ** pEList has been resolved.  pE has not.
940 */
941 static int resolveAsName(
942   Parse *pParse,     /* Parsing context for error messages */
943   ExprList *pEList,  /* List of expressions to scan */
944   Expr *pE           /* Expression we are trying to match */
945 ){
946   int i;             /* Loop counter */
947 
948   UNUSED_PARAMETER(pParse);
949 
950   if( pE->op==TK_ID ){
951     char *zCol = pE->u.zToken;
952     for(i=0; i<pEList->nExpr; i++){
953       char *zAs = pEList->a[i].zName;
954       if( zAs!=0 && sqlite3StrICmp(zAs, zCol)==0 ){
955         return i+1;
956       }
957     }
958   }
959   return 0;
960 }
961 
962 /*
963 ** pE is a pointer to an expression which is a single term in the
964 ** ORDER BY of a compound SELECT.  The expression has not been
965 ** name resolved.
966 **
967 ** At the point this routine is called, we already know that the
968 ** ORDER BY term is not an integer index into the result set.  That
969 ** case is handled by the calling routine.
970 **
971 ** Attempt to match pE against result set columns in the left-most
972 ** SELECT statement.  Return the index i of the matching column,
973 ** as an indication to the caller that it should sort by the i-th column.
974 ** The left-most column is 1.  In other words, the value returned is the
975 ** same integer value that would be used in the SQL statement to indicate
976 ** the column.
977 **
978 ** If there is no match, return 0.  Return -1 if an error occurs.
979 */
980 static int resolveOrderByTermToExprList(
981   Parse *pParse,     /* Parsing context for error messages */
982   Select *pSelect,   /* The SELECT statement with the ORDER BY clause */
983   Expr *pE           /* The specific ORDER BY term */
984 ){
985   int i;             /* Loop counter */
986   ExprList *pEList;  /* The columns of the result set */
987   NameContext nc;    /* Name context for resolving pE */
988   sqlite3 *db;       /* Database connection */
989   int rc;            /* Return code from subprocedures */
990   u8 savedSuppErr;   /* Saved value of db->suppressErr */
991 
992   assert( sqlite3ExprIsInteger(pE, &i)==0 );
993   pEList = pSelect->pEList;
994 
995   /* Resolve all names in the ORDER BY term expression
996   */
997   memset(&nc, 0, sizeof(nc));
998   nc.pParse = pParse;
999   nc.pSrcList = pSelect->pSrc;
1000   nc.uNC.pEList = pEList;
1001   nc.ncFlags = NC_AllowAgg|NC_UEList;
1002   nc.nErr = 0;
1003   db = pParse->db;
1004   savedSuppErr = db->suppressErr;
1005   db->suppressErr = 1;
1006   rc = sqlite3ResolveExprNames(&nc, pE);
1007   db->suppressErr = savedSuppErr;
1008   if( rc ) return 0;
1009 
1010   /* Try to match the ORDER BY expression against an expression
1011   ** in the result set.  Return an 1-based index of the matching
1012   ** result-set entry.
1013   */
1014   for(i=0; i<pEList->nExpr; i++){
1015     if( sqlite3ExprCompare(0, pEList->a[i].pExpr, pE, -1)<2 ){
1016       return i+1;
1017     }
1018   }
1019 
1020   /* If no match, return 0. */
1021   return 0;
1022 }
1023 
1024 /*
1025 ** Generate an ORDER BY or GROUP BY term out-of-range error.
1026 */
1027 static void resolveOutOfRangeError(
1028   Parse *pParse,         /* The error context into which to write the error */
1029   const char *zType,     /* "ORDER" or "GROUP" */
1030   int i,                 /* The index (1-based) of the term out of range */
1031   int mx                 /* Largest permissible value of i */
1032 ){
1033   sqlite3ErrorMsg(pParse,
1034     "%r %s BY term out of range - should be "
1035     "between 1 and %d", i, zType, mx);
1036 }
1037 
1038 /*
1039 ** Analyze the ORDER BY clause in a compound SELECT statement.   Modify
1040 ** each term of the ORDER BY clause is a constant integer between 1
1041 ** and N where N is the number of columns in the compound SELECT.
1042 **
1043 ** ORDER BY terms that are already an integer between 1 and N are
1044 ** unmodified.  ORDER BY terms that are integers outside the range of
1045 ** 1 through N generate an error.  ORDER BY terms that are expressions
1046 ** are matched against result set expressions of compound SELECT
1047 ** beginning with the left-most SELECT and working toward the right.
1048 ** At the first match, the ORDER BY expression is transformed into
1049 ** the integer column number.
1050 **
1051 ** Return the number of errors seen.
1052 */
1053 static int resolveCompoundOrderBy(
1054   Parse *pParse,        /* Parsing context.  Leave error messages here */
1055   Select *pSelect       /* The SELECT statement containing the ORDER BY */
1056 ){
1057   int i;
1058   ExprList *pOrderBy;
1059   ExprList *pEList;
1060   sqlite3 *db;
1061   int moreToDo = 1;
1062 
1063   pOrderBy = pSelect->pOrderBy;
1064   if( pOrderBy==0 ) return 0;
1065   db = pParse->db;
1066   if( pOrderBy->nExpr>db->aLimit[SQLITE_LIMIT_COLUMN] ){
1067     sqlite3ErrorMsg(pParse, "too many terms in ORDER BY clause");
1068     return 1;
1069   }
1070   for(i=0; i<pOrderBy->nExpr; i++){
1071     pOrderBy->a[i].done = 0;
1072   }
1073   pSelect->pNext = 0;
1074   while( pSelect->pPrior ){
1075     pSelect->pPrior->pNext = pSelect;
1076     pSelect = pSelect->pPrior;
1077   }
1078   while( pSelect && moreToDo ){
1079     struct ExprList_item *pItem;
1080     moreToDo = 0;
1081     pEList = pSelect->pEList;
1082     assert( pEList!=0 );
1083     for(i=0, pItem=pOrderBy->a; i<pOrderBy->nExpr; i++, pItem++){
1084       int iCol = -1;
1085       Expr *pE, *pDup;
1086       if( pItem->done ) continue;
1087       pE = sqlite3ExprSkipCollate(pItem->pExpr);
1088       if( sqlite3ExprIsInteger(pE, &iCol) ){
1089         if( iCol<=0 || iCol>pEList->nExpr ){
1090           resolveOutOfRangeError(pParse, "ORDER", i+1, pEList->nExpr);
1091           return 1;
1092         }
1093       }else{
1094         iCol = resolveAsName(pParse, pEList, pE);
1095         if( iCol==0 ){
1096           pDup = sqlite3ExprDup(db, pE, 0);
1097           if( !db->mallocFailed ){
1098             assert(pDup);
1099             iCol = resolveOrderByTermToExprList(pParse, pSelect, pDup);
1100           }
1101           sqlite3ExprDelete(db, pDup);
1102         }
1103       }
1104       if( iCol>0 ){
1105         /* Convert the ORDER BY term into an integer column number iCol,
1106         ** taking care to preserve the COLLATE clause if it exists */
1107         Expr *pNew = sqlite3Expr(db, TK_INTEGER, 0);
1108         if( pNew==0 ) return 1;
1109         pNew->flags |= EP_IntValue;
1110         pNew->u.iValue = iCol;
1111         if( pItem->pExpr==pE ){
1112           pItem->pExpr = pNew;
1113         }else{
1114           Expr *pParent = pItem->pExpr;
1115           assert( pParent->op==TK_COLLATE );
1116           while( pParent->pLeft->op==TK_COLLATE ) pParent = pParent->pLeft;
1117           assert( pParent->pLeft==pE );
1118           pParent->pLeft = pNew;
1119         }
1120         sqlite3ExprDelete(db, pE);
1121         pItem->u.x.iOrderByCol = (u16)iCol;
1122         pItem->done = 1;
1123       }else{
1124         moreToDo = 1;
1125       }
1126     }
1127     pSelect = pSelect->pNext;
1128   }
1129   for(i=0; i<pOrderBy->nExpr; i++){
1130     if( pOrderBy->a[i].done==0 ){
1131       sqlite3ErrorMsg(pParse, "%r ORDER BY term does not match any "
1132             "column in the result set", i+1);
1133       return 1;
1134     }
1135   }
1136   return 0;
1137 }
1138 
1139 /*
1140 ** Check every term in the ORDER BY or GROUP BY clause pOrderBy of
1141 ** the SELECT statement pSelect.  If any term is reference to a
1142 ** result set expression (as determined by the ExprList.a.u.x.iOrderByCol
1143 ** field) then convert that term into a copy of the corresponding result set
1144 ** column.
1145 **
1146 ** If any errors are detected, add an error message to pParse and
1147 ** return non-zero.  Return zero if no errors are seen.
1148 */
1149 int sqlite3ResolveOrderGroupBy(
1150   Parse *pParse,        /* Parsing context.  Leave error messages here */
1151   Select *pSelect,      /* The SELECT statement containing the clause */
1152   ExprList *pOrderBy,   /* The ORDER BY or GROUP BY clause to be processed */
1153   const char *zType     /* "ORDER" or "GROUP" */
1154 ){
1155   int i;
1156   sqlite3 *db = pParse->db;
1157   ExprList *pEList;
1158   struct ExprList_item *pItem;
1159 
1160   if( pOrderBy==0 || pParse->db->mallocFailed ) return 0;
1161   if( pOrderBy->nExpr>db->aLimit[SQLITE_LIMIT_COLUMN] ){
1162     sqlite3ErrorMsg(pParse, "too many terms in %s BY clause", zType);
1163     return 1;
1164   }
1165   pEList = pSelect->pEList;
1166   assert( pEList!=0 );  /* sqlite3SelectNew() guarantees this */
1167   for(i=0, pItem=pOrderBy->a; i<pOrderBy->nExpr; i++, pItem++){
1168     if( pItem->u.x.iOrderByCol ){
1169       if( pItem->u.x.iOrderByCol>pEList->nExpr ){
1170         resolveOutOfRangeError(pParse, zType, i+1, pEList->nExpr);
1171         return 1;
1172       }
1173       resolveAlias(pParse, pEList, pItem->u.x.iOrderByCol-1, pItem->pExpr,
1174                    zType,0);
1175     }
1176   }
1177   return 0;
1178 }
1179 
1180 /*
1181 ** pOrderBy is an ORDER BY or GROUP BY clause in SELECT statement pSelect.
1182 ** The Name context of the SELECT statement is pNC.  zType is either
1183 ** "ORDER" or "GROUP" depending on which type of clause pOrderBy is.
1184 **
1185 ** This routine resolves each term of the clause into an expression.
1186 ** If the order-by term is an integer I between 1 and N (where N is the
1187 ** number of columns in the result set of the SELECT) then the expression
1188 ** in the resolution is a copy of the I-th result-set expression.  If
1189 ** the order-by term is an identifier that corresponds to the AS-name of
1190 ** a result-set expression, then the term resolves to a copy of the
1191 ** result-set expression.  Otherwise, the expression is resolved in
1192 ** the usual way - using sqlite3ResolveExprNames().
1193 **
1194 ** This routine returns the number of errors.  If errors occur, then
1195 ** an appropriate error message might be left in pParse.  (OOM errors
1196 ** excepted.)
1197 */
1198 static int resolveOrderGroupBy(
1199   NameContext *pNC,     /* The name context of the SELECT statement */
1200   Select *pSelect,      /* The SELECT statement holding pOrderBy */
1201   ExprList *pOrderBy,   /* An ORDER BY or GROUP BY clause to resolve */
1202   const char *zType     /* Either "ORDER" or "GROUP", as appropriate */
1203 ){
1204   int i, j;                      /* Loop counters */
1205   int iCol;                      /* Column number */
1206   struct ExprList_item *pItem;   /* A term of the ORDER BY clause */
1207   Parse *pParse;                 /* Parsing context */
1208   int nResult;                   /* Number of terms in the result set */
1209 
1210   if( pOrderBy==0 ) return 0;
1211   nResult = pSelect->pEList->nExpr;
1212   pParse = pNC->pParse;
1213   for(i=0, pItem=pOrderBy->a; i<pOrderBy->nExpr; i++, pItem++){
1214     Expr *pE = pItem->pExpr;
1215     Expr *pE2 = sqlite3ExprSkipCollate(pE);
1216     if( zType[0]!='G' ){
1217       iCol = resolveAsName(pParse, pSelect->pEList, pE2);
1218       if( iCol>0 ){
1219         /* If an AS-name match is found, mark this ORDER BY column as being
1220         ** a copy of the iCol-th result-set column.  The subsequent call to
1221         ** sqlite3ResolveOrderGroupBy() will convert the expression to a
1222         ** copy of the iCol-th result-set expression. */
1223         pItem->u.x.iOrderByCol = (u16)iCol;
1224         continue;
1225       }
1226     }
1227     if( sqlite3ExprIsInteger(pE2, &iCol) ){
1228       /* The ORDER BY term is an integer constant.  Again, set the column
1229       ** number so that sqlite3ResolveOrderGroupBy() will convert the
1230       ** order-by term to a copy of the result-set expression */
1231       if( iCol<1 || iCol>0xffff ){
1232         resolveOutOfRangeError(pParse, zType, i+1, nResult);
1233         return 1;
1234       }
1235       pItem->u.x.iOrderByCol = (u16)iCol;
1236       continue;
1237     }
1238 
1239     /* Otherwise, treat the ORDER BY term as an ordinary expression */
1240     pItem->u.x.iOrderByCol = 0;
1241     if( sqlite3ResolveExprNames(pNC, pE) ){
1242       return 1;
1243     }
1244     for(j=0; j<pSelect->pEList->nExpr; j++){
1245       if( sqlite3ExprCompare(0, pE, pSelect->pEList->a[j].pExpr, -1)==0 ){
1246 #ifndef SQLITE_OMIT_WINDOWFUNC
1247         if( pE->pWin ){
1248           /* Since this window function is being changed into a reference
1249           ** to the same window function the result set, remove the instance
1250           ** of this window function from the Select.pWin list. */
1251           Window **pp;
1252           for(pp=&pSelect->pWin; *pp; pp=&(*pp)->pNextWin){
1253             if( *pp==pE->pWin ){
1254               *pp = (*pp)->pNextWin;
1255             }
1256           }
1257         }
1258 #endif
1259         pItem->u.x.iOrderByCol = j+1;
1260       }
1261     }
1262   }
1263   return sqlite3ResolveOrderGroupBy(pParse, pSelect, pOrderBy, zType);
1264 }
1265 
1266 /*
1267 ** Resolve names in the SELECT statement p and all of its descendants.
1268 */
1269 static int resolveSelectStep(Walker *pWalker, Select *p){
1270   NameContext *pOuterNC;  /* Context that contains this SELECT */
1271   NameContext sNC;        /* Name context of this SELECT */
1272   int isCompound;         /* True if p is a compound select */
1273   int nCompound;          /* Number of compound terms processed so far */
1274   Parse *pParse;          /* Parsing context */
1275   int i;                  /* Loop counter */
1276   ExprList *pGroupBy;     /* The GROUP BY clause */
1277   Select *pLeftmost;      /* Left-most of SELECT of a compound */
1278   sqlite3 *db;            /* Database connection */
1279 
1280 
1281   assert( p!=0 );
1282   if( p->selFlags & SF_Resolved ){
1283     return WRC_Prune;
1284   }
1285   pOuterNC = pWalker->u.pNC;
1286   pParse = pWalker->pParse;
1287   db = pParse->db;
1288 
1289   /* Normally sqlite3SelectExpand() will be called first and will have
1290   ** already expanded this SELECT.  However, if this is a subquery within
1291   ** an expression, sqlite3ResolveExprNames() will be called without a
1292   ** prior call to sqlite3SelectExpand().  When that happens, let
1293   ** sqlite3SelectPrep() do all of the processing for this SELECT.
1294   ** sqlite3SelectPrep() will invoke both sqlite3SelectExpand() and
1295   ** this routine in the correct order.
1296   */
1297   if( (p->selFlags & SF_Expanded)==0 ){
1298     sqlite3SelectPrep(pParse, p, pOuterNC);
1299     return (pParse->nErr || db->mallocFailed) ? WRC_Abort : WRC_Prune;
1300   }
1301 
1302   isCompound = p->pPrior!=0;
1303   nCompound = 0;
1304   pLeftmost = p;
1305   while( p ){
1306     assert( (p->selFlags & SF_Expanded)!=0 );
1307     assert( (p->selFlags & SF_Resolved)==0 );
1308     p->selFlags |= SF_Resolved;
1309 
1310     /* Resolve the expressions in the LIMIT and OFFSET clauses. These
1311     ** are not allowed to refer to any names, so pass an empty NameContext.
1312     */
1313     memset(&sNC, 0, sizeof(sNC));
1314     sNC.pParse = pParse;
1315     sNC.pWinSelect = p;
1316     if( sqlite3ResolveExprNames(&sNC, p->pLimit) ){
1317       return WRC_Abort;
1318     }
1319 
1320     /* If the SF_Converted flags is set, then this Select object was
1321     ** was created by the convertCompoundSelectToSubquery() function.
1322     ** In this case the ORDER BY clause (p->pOrderBy) should be resolved
1323     ** as if it were part of the sub-query, not the parent. This block
1324     ** moves the pOrderBy down to the sub-query. It will be moved back
1325     ** after the names have been resolved.  */
1326     if( p->selFlags & SF_Converted ){
1327       Select *pSub = p->pSrc->a[0].pSelect;
1328       assert( p->pSrc->nSrc==1 && p->pOrderBy );
1329       assert( pSub->pPrior && pSub->pOrderBy==0 );
1330       pSub->pOrderBy = p->pOrderBy;
1331       p->pOrderBy = 0;
1332     }
1333 
1334     /* Recursively resolve names in all subqueries
1335     */
1336     for(i=0; i<p->pSrc->nSrc; i++){
1337       struct SrcList_item *pItem = &p->pSrc->a[i];
1338       if( pItem->pSelect ){
1339         NameContext *pNC;         /* Used to iterate name contexts */
1340         int nRef = 0;             /* Refcount for pOuterNC and outer contexts */
1341         const char *zSavedContext = pParse->zAuthContext;
1342 
1343         /* Count the total number of references to pOuterNC and all of its
1344         ** parent contexts. After resolving references to expressions in
1345         ** pItem->pSelect, check if this value has changed. If so, then
1346         ** SELECT statement pItem->pSelect must be correlated. Set the
1347         ** pItem->fg.isCorrelated flag if this is the case. */
1348         for(pNC=pOuterNC; pNC; pNC=pNC->pNext) nRef += pNC->nRef;
1349 
1350         if( pItem->zName ) pParse->zAuthContext = pItem->zName;
1351         sqlite3ResolveSelectNames(pParse, pItem->pSelect, pOuterNC);
1352         pParse->zAuthContext = zSavedContext;
1353         if( pParse->nErr || db->mallocFailed ) return WRC_Abort;
1354 
1355         for(pNC=pOuterNC; pNC; pNC=pNC->pNext) nRef -= pNC->nRef;
1356         assert( pItem->fg.isCorrelated==0 && nRef<=0 );
1357         pItem->fg.isCorrelated = (nRef!=0);
1358       }
1359     }
1360 
1361     /* Set up the local name-context to pass to sqlite3ResolveExprNames() to
1362     ** resolve the result-set expression list.
1363     */
1364     sNC.ncFlags = NC_AllowAgg|NC_AllowWin;
1365     sNC.pSrcList = p->pSrc;
1366     sNC.pNext = pOuterNC;
1367 
1368     /* Resolve names in the result set. */
1369     if( sqlite3ResolveExprListNames(&sNC, p->pEList) ) return WRC_Abort;
1370     sNC.ncFlags &= ~NC_AllowWin;
1371 
1372     /* If there are no aggregate functions in the result-set, and no GROUP BY
1373     ** expression, do not allow aggregates in any of the other expressions.
1374     */
1375     assert( (p->selFlags & SF_Aggregate)==0 );
1376     pGroupBy = p->pGroupBy;
1377     if( pGroupBy || (sNC.ncFlags & NC_HasAgg)!=0 ){
1378       assert( NC_MinMaxAgg==SF_MinMaxAgg );
1379       p->selFlags |= SF_Aggregate | (sNC.ncFlags&NC_MinMaxAgg);
1380     }else{
1381       sNC.ncFlags &= ~NC_AllowAgg;
1382     }
1383 
1384     /* If a HAVING clause is present, then there must be a GROUP BY clause.
1385     */
1386     if( p->pHaving && !pGroupBy ){
1387       sqlite3ErrorMsg(pParse, "a GROUP BY clause is required before HAVING");
1388       return WRC_Abort;
1389     }
1390 
1391     /* Add the output column list to the name-context before parsing the
1392     ** other expressions in the SELECT statement. This is so that
1393     ** expressions in the WHERE clause (etc.) can refer to expressions by
1394     ** aliases in the result set.
1395     **
1396     ** Minor point: If this is the case, then the expression will be
1397     ** re-evaluated for each reference to it.
1398     */
1399     assert( (sNC.ncFlags & (NC_UAggInfo|NC_UUpsert))==0 );
1400     sNC.uNC.pEList = p->pEList;
1401     sNC.ncFlags |= NC_UEList;
1402     if( sqlite3ResolveExprNames(&sNC, p->pHaving) ) return WRC_Abort;
1403     if( sqlite3ResolveExprNames(&sNC, p->pWhere) ) return WRC_Abort;
1404 
1405     /* Resolve names in table-valued-function arguments */
1406     for(i=0; i<p->pSrc->nSrc; i++){
1407       struct SrcList_item *pItem = &p->pSrc->a[i];
1408       if( pItem->fg.isTabFunc
1409        && sqlite3ResolveExprListNames(&sNC, pItem->u1.pFuncArg)
1410       ){
1411         return WRC_Abort;
1412       }
1413     }
1414 
1415     /* The ORDER BY and GROUP BY clauses may not refer to terms in
1416     ** outer queries
1417     */
1418     sNC.pNext = 0;
1419     sNC.ncFlags |= NC_AllowAgg|NC_AllowWin;
1420 
1421     /* If this is a converted compound query, move the ORDER BY clause from
1422     ** the sub-query back to the parent query. At this point each term
1423     ** within the ORDER BY clause has been transformed to an integer value.
1424     ** These integers will be replaced by copies of the corresponding result
1425     ** set expressions by the call to resolveOrderGroupBy() below.  */
1426     if( p->selFlags & SF_Converted ){
1427       Select *pSub = p->pSrc->a[0].pSelect;
1428       p->pOrderBy = pSub->pOrderBy;
1429       pSub->pOrderBy = 0;
1430     }
1431 
1432     /* Process the ORDER BY clause for singleton SELECT statements.
1433     ** The ORDER BY clause for compounds SELECT statements is handled
1434     ** below, after all of the result-sets for all of the elements of
1435     ** the compound have been resolved.
1436     **
1437     ** If there is an ORDER BY clause on a term of a compound-select other
1438     ** than the right-most term, then that is a syntax error.  But the error
1439     ** is not detected until much later, and so we need to go ahead and
1440     ** resolve those symbols on the incorrect ORDER BY for consistency.
1441     */
1442     if( isCompound<=nCompound  /* Defer right-most ORDER BY of a compound */
1443      && resolveOrderGroupBy(&sNC, p, p->pOrderBy, "ORDER")
1444     ){
1445       return WRC_Abort;
1446     }
1447     if( db->mallocFailed ){
1448       return WRC_Abort;
1449     }
1450     sNC.ncFlags &= ~NC_AllowWin;
1451 
1452     /* Resolve the GROUP BY clause.  At the same time, make sure
1453     ** the GROUP BY clause does not contain aggregate functions.
1454     */
1455     if( pGroupBy ){
1456       struct ExprList_item *pItem;
1457 
1458       if( resolveOrderGroupBy(&sNC, p, pGroupBy, "GROUP") || db->mallocFailed ){
1459         return WRC_Abort;
1460       }
1461       for(i=0, pItem=pGroupBy->a; i<pGroupBy->nExpr; i++, pItem++){
1462         if( ExprHasProperty(pItem->pExpr, EP_Agg) ){
1463           sqlite3ErrorMsg(pParse, "aggregate functions are not allowed in "
1464               "the GROUP BY clause");
1465           return WRC_Abort;
1466         }
1467       }
1468     }
1469 
1470     /* If this is part of a compound SELECT, check that it has the right
1471     ** number of expressions in the select list. */
1472     if( p->pNext && p->pEList->nExpr!=p->pNext->pEList->nExpr ){
1473       sqlite3SelectWrongNumTermsError(pParse, p->pNext);
1474       return WRC_Abort;
1475     }
1476 
1477     /* Advance to the next term of the compound
1478     */
1479     p = p->pPrior;
1480     nCompound++;
1481   }
1482 
1483   /* Resolve the ORDER BY on a compound SELECT after all terms of
1484   ** the compound have been resolved.
1485   */
1486   if( isCompound && resolveCompoundOrderBy(pParse, pLeftmost) ){
1487     return WRC_Abort;
1488   }
1489 
1490   return WRC_Prune;
1491 }
1492 
1493 /*
1494 ** This routine walks an expression tree and resolves references to
1495 ** table columns and result-set columns.  At the same time, do error
1496 ** checking on function usage and set a flag if any aggregate functions
1497 ** are seen.
1498 **
1499 ** To resolve table columns references we look for nodes (or subtrees) of the
1500 ** form X.Y.Z or Y.Z or just Z where
1501 **
1502 **      X:   The name of a database.  Ex:  "main" or "temp" or
1503 **           the symbolic name assigned to an ATTACH-ed database.
1504 **
1505 **      Y:   The name of a table in a FROM clause.  Or in a trigger
1506 **           one of the special names "old" or "new".
1507 **
1508 **      Z:   The name of a column in table Y.
1509 **
1510 ** The node at the root of the subtree is modified as follows:
1511 **
1512 **    Expr.op        Changed to TK_COLUMN
1513 **    Expr.pTab      Points to the Table object for X.Y
1514 **    Expr.iColumn   The column index in X.Y.  -1 for the rowid.
1515 **    Expr.iTable    The VDBE cursor number for X.Y
1516 **
1517 **
1518 ** To resolve result-set references, look for expression nodes of the
1519 ** form Z (with no X and Y prefix) where the Z matches the right-hand
1520 ** size of an AS clause in the result-set of a SELECT.  The Z expression
1521 ** is replaced by a copy of the left-hand side of the result-set expression.
1522 ** Table-name and function resolution occurs on the substituted expression
1523 ** tree.  For example, in:
1524 **
1525 **      SELECT a+b AS x, c+d AS y FROM t1 ORDER BY x;
1526 **
1527 ** The "x" term of the order by is replaced by "a+b" to render:
1528 **
1529 **      SELECT a+b AS x, c+d AS y FROM t1 ORDER BY a+b;
1530 **
1531 ** Function calls are checked to make sure that the function is
1532 ** defined and that the correct number of arguments are specified.
1533 ** If the function is an aggregate function, then the NC_HasAgg flag is
1534 ** set and the opcode is changed from TK_FUNCTION to TK_AGG_FUNCTION.
1535 ** If an expression contains aggregate functions then the EP_Agg
1536 ** property on the expression is set.
1537 **
1538 ** An error message is left in pParse if anything is amiss.  The number
1539 ** if errors is returned.
1540 */
1541 int sqlite3ResolveExprNames(
1542   NameContext *pNC,       /* Namespace to resolve expressions in. */
1543   Expr *pExpr             /* The expression to be analyzed. */
1544 ){
1545   u16 savedHasAgg;
1546   Walker w;
1547 
1548   if( pExpr==0 ) return SQLITE_OK;
1549   savedHasAgg = pNC->ncFlags & (NC_HasAgg|NC_MinMaxAgg);
1550   pNC->ncFlags &= ~(NC_HasAgg|NC_MinMaxAgg);
1551   w.pParse = pNC->pParse;
1552   w.xExprCallback = resolveExprStep;
1553   w.xSelectCallback = resolveSelectStep;
1554   w.xSelectCallback2 = 0;
1555   w.u.pNC = pNC;
1556 #if SQLITE_MAX_EXPR_DEPTH>0
1557   w.pParse->nHeight += pExpr->nHeight;
1558   if( sqlite3ExprCheckHeight(w.pParse, w.pParse->nHeight) ){
1559     return SQLITE_ERROR;
1560   }
1561 #endif
1562   sqlite3WalkExpr(&w, pExpr);
1563 #if SQLITE_MAX_EXPR_DEPTH>0
1564   w.pParse->nHeight -= pExpr->nHeight;
1565 #endif
1566   if( pNC->ncFlags & NC_HasAgg ){
1567     ExprSetProperty(pExpr, EP_Agg);
1568   }
1569   pNC->ncFlags |= savedHasAgg;
1570   return pNC->nErr>0 || w.pParse->nErr>0;
1571 }
1572 
1573 /*
1574 ** Resolve all names for all expression in an expression list.  This is
1575 ** just like sqlite3ResolveExprNames() except that it works for an expression
1576 ** list rather than a single expression.
1577 */
1578 int sqlite3ResolveExprListNames(
1579   NameContext *pNC,       /* Namespace to resolve expressions in. */
1580   ExprList *pList         /* The expression list to be analyzed. */
1581 ){
1582   int i;
1583   if( pList ){
1584     for(i=0; i<pList->nExpr; i++){
1585       if( sqlite3ResolveExprNames(pNC, pList->a[i].pExpr) ) return WRC_Abort;
1586     }
1587   }
1588   return WRC_Continue;
1589 }
1590 
1591 /*
1592 ** Resolve all names in all expressions of a SELECT and in all
1593 ** decendents of the SELECT, including compounds off of p->pPrior,
1594 ** subqueries in expressions, and subqueries used as FROM clause
1595 ** terms.
1596 **
1597 ** See sqlite3ResolveExprNames() for a description of the kinds of
1598 ** transformations that occur.
1599 **
1600 ** All SELECT statements should have been expanded using
1601 ** sqlite3SelectExpand() prior to invoking this routine.
1602 */
1603 void sqlite3ResolveSelectNames(
1604   Parse *pParse,         /* The parser context */
1605   Select *p,             /* The SELECT statement being coded. */
1606   NameContext *pOuterNC  /* Name context for parent SELECT statement */
1607 ){
1608   Walker w;
1609 
1610   assert( p!=0 );
1611   w.xExprCallback = resolveExprStep;
1612   w.xSelectCallback = resolveSelectStep;
1613   w.xSelectCallback2 = 0;
1614   w.pParse = pParse;
1615   w.u.pNC = pOuterNC;
1616   sqlite3WalkSelect(&w, p);
1617 }
1618 
1619 /*
1620 ** Resolve names in expressions that can only reference a single table:
1621 **
1622 **    *   CHECK constraints
1623 **    *   WHERE clauses on partial indices
1624 **
1625 ** The Expr.iTable value for Expr.op==TK_COLUMN nodes of the expression
1626 ** is set to -1 and the Expr.iColumn value is set to the column number.
1627 **
1628 ** Any errors cause an error message to be set in pParse.
1629 */
1630 void sqlite3ResolveSelfReference(
1631   Parse *pParse,      /* Parsing context */
1632   Table *pTab,        /* The table being referenced */
1633   int type,           /* NC_IsCheck or NC_PartIdx or NC_IdxExpr */
1634   Expr *pExpr,        /* Expression to resolve.  May be NULL. */
1635   ExprList *pList     /* Expression list to resolve.  May be NULL. */
1636 ){
1637   SrcList sSrc;                   /* Fake SrcList for pParse->pNewTable */
1638   NameContext sNC;                /* Name context for pParse->pNewTable */
1639 
1640   assert( type==NC_IsCheck || type==NC_PartIdx || type==NC_IdxExpr );
1641   memset(&sNC, 0, sizeof(sNC));
1642   memset(&sSrc, 0, sizeof(sSrc));
1643   sSrc.nSrc = 1;
1644   sSrc.a[0].zName = pTab->zName;
1645   sSrc.a[0].pTab = pTab;
1646   sSrc.a[0].iCursor = -1;
1647   sNC.pParse = pParse;
1648   sNC.pSrcList = &sSrc;
1649   sNC.ncFlags = type;
1650   if( sqlite3ResolveExprNames(&sNC, pExpr) ) return;
1651   if( pList ) sqlite3ResolveExprListNames(&sNC, pList);
1652 }
1653