xref: /sqlite-3.40.0/src/treeview.c (revision e99cb2da)
1 /*
2 ** 2015-06-08
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 C code to implement the TreeView debugging routines.
14 ** These routines print a parse tree to standard output for debugging and
15 ** analysis.
16 **
17 ** The interfaces in this file is only available when compiling
18 ** with SQLITE_DEBUG.
19 */
20 #include "sqliteInt.h"
21 #ifdef SQLITE_DEBUG
22 
23 /*
24 ** Add a new subitem to the tree.  The moreToFollow flag indicates that this
25 ** is not the last item in the tree.
26 */
27 static TreeView *sqlite3TreeViewPush(TreeView *p, u8 moreToFollow){
28   if( p==0 ){
29     p = sqlite3_malloc64( sizeof(*p) );
30     if( p==0 ) return 0;
31     memset(p, 0, sizeof(*p));
32   }else{
33     p->iLevel++;
34   }
35   assert( moreToFollow==0 || moreToFollow==1 );
36   if( p->iLevel<sizeof(p->bLine) ) p->bLine[p->iLevel] = moreToFollow;
37   return p;
38 }
39 
40 /*
41 ** Finished with one layer of the tree
42 */
43 static void sqlite3TreeViewPop(TreeView *p){
44   if( p==0 ) return;
45   p->iLevel--;
46   if( p->iLevel<0 ) sqlite3_free(p);
47 }
48 
49 /*
50 ** Generate a single line of output for the tree, with a prefix that contains
51 ** all the appropriate tree lines
52 */
53 static void sqlite3TreeViewLine(TreeView *p, const char *zFormat, ...){
54   va_list ap;
55   int i;
56   StrAccum acc;
57   char zBuf[500];
58   sqlite3StrAccumInit(&acc, 0, zBuf, sizeof(zBuf), 0);
59   if( p ){
60     for(i=0; i<p->iLevel && i<sizeof(p->bLine)-1; i++){
61       sqlite3_str_append(&acc, p->bLine[i] ? "|   " : "    ", 4);
62     }
63     sqlite3_str_append(&acc, p->bLine[i] ? "|-- " : "'-- ", 4);
64   }
65   if( zFormat!=0 ){
66     va_start(ap, zFormat);
67     sqlite3_str_vappendf(&acc, zFormat, ap);
68     va_end(ap);
69     assert( acc.nChar>0 || acc.accError );
70     sqlite3_str_append(&acc, "\n", 1);
71   }
72   sqlite3StrAccumFinish(&acc);
73   fprintf(stdout,"%s", zBuf);
74   fflush(stdout);
75 }
76 
77 /*
78 ** Shorthand for starting a new tree item that consists of a single label
79 */
80 static void sqlite3TreeViewItem(TreeView *p, const char *zLabel,u8 moreFollows){
81   p = sqlite3TreeViewPush(p, moreFollows);
82   sqlite3TreeViewLine(p, "%s", zLabel);
83 }
84 
85 /*
86 ** Generate a human-readable description of a WITH clause.
87 */
88 void sqlite3TreeViewWith(TreeView *pView, const With *pWith, u8 moreToFollow){
89   int i;
90   if( pWith==0 ) return;
91   if( pWith->nCte==0 ) return;
92   if( pWith->pOuter ){
93     sqlite3TreeViewLine(pView, "WITH (0x%p, pOuter=0x%p)",pWith,pWith->pOuter);
94   }else{
95     sqlite3TreeViewLine(pView, "WITH (0x%p)", pWith);
96   }
97   if( pWith->nCte>0 ){
98     pView = sqlite3TreeViewPush(pView, 1);
99     for(i=0; i<pWith->nCte; i++){
100       StrAccum x;
101       char zLine[1000];
102       const struct Cte *pCte = &pWith->a[i];
103       sqlite3StrAccumInit(&x, 0, zLine, sizeof(zLine), 0);
104       sqlite3_str_appendf(&x, "%s", pCte->zName);
105       if( pCte->pCols && pCte->pCols->nExpr>0 ){
106         char cSep = '(';
107         int j;
108         for(j=0; j<pCte->pCols->nExpr; j++){
109           sqlite3_str_appendf(&x, "%c%s", cSep, pCte->pCols->a[j].zName);
110           cSep = ',';
111         }
112         sqlite3_str_appendf(&x, ")");
113       }
114       sqlite3_str_appendf(&x, " AS");
115       sqlite3StrAccumFinish(&x);
116       sqlite3TreeViewItem(pView, zLine, i<pWith->nCte-1);
117       sqlite3TreeViewSelect(pView, pCte->pSelect, 0);
118       sqlite3TreeViewPop(pView);
119     }
120     sqlite3TreeViewPop(pView);
121   }
122 }
123 
124 /*
125 ** Generate a human-readable description of a SrcList object.
126 */
127 void sqlite3TreeViewSrcList(TreeView *pView, const SrcList *pSrc){
128   int i;
129   for(i=0; i<pSrc->nSrc; i++){
130     const struct SrcList_item *pItem = &pSrc->a[i];
131     StrAccum x;
132     char zLine[100];
133     sqlite3StrAccumInit(&x, 0, zLine, sizeof(zLine), 0);
134     sqlite3_str_appendf(&x, "{%d:*}", pItem->iCursor);
135     if( pItem->zDatabase ){
136       sqlite3_str_appendf(&x, " %s.%s", pItem->zDatabase, pItem->zName);
137     }else if( pItem->zName ){
138       sqlite3_str_appendf(&x, " %s", pItem->zName);
139     }
140     if( pItem->pTab ){
141       sqlite3_str_appendf(&x, " tab=%Q nCol=%d ptr=%p",
142            pItem->pTab->zName, pItem->pTab->nCol, pItem->pTab);
143     }
144     if( pItem->zAlias ){
145       sqlite3_str_appendf(&x, " (AS %s)", pItem->zAlias);
146     }
147     if( pItem->fg.jointype & JT_LEFT ){
148       sqlite3_str_appendf(&x, " LEFT-JOIN");
149     }
150     sqlite3StrAccumFinish(&x);
151     sqlite3TreeViewItem(pView, zLine, i<pSrc->nSrc-1);
152     if( pItem->pSelect ){
153       sqlite3TreeViewSelect(pView, pItem->pSelect, 0);
154     }
155     if( pItem->fg.isTabFunc ){
156       sqlite3TreeViewExprList(pView, pItem->u1.pFuncArg, 0, "func-args:");
157     }
158     sqlite3TreeViewPop(pView);
159   }
160 }
161 
162 /*
163 ** Generate a human-readable description of a Select object.
164 */
165 void sqlite3TreeViewSelect(TreeView *pView, const Select *p, u8 moreToFollow){
166   int n = 0;
167   int cnt = 0;
168   if( p==0 ){
169     sqlite3TreeViewLine(pView, "nil-SELECT");
170     return;
171   }
172   pView = sqlite3TreeViewPush(pView, moreToFollow);
173   if( p->pWith ){
174     sqlite3TreeViewWith(pView, p->pWith, 1);
175     cnt = 1;
176     sqlite3TreeViewPush(pView, 1);
177   }
178   do{
179     if( p->selFlags & SF_WhereBegin ){
180       sqlite3TreeViewLine(pView, "sqlite3WhereBegin()");
181     }else{
182       sqlite3TreeViewLine(pView,
183         "SELECT%s%s (%u/%p) selFlags=0x%x nSelectRow=%d",
184         ((p->selFlags & SF_Distinct) ? " DISTINCT" : ""),
185         ((p->selFlags & SF_Aggregate) ? " agg_flag" : ""),
186         p->selId, p, p->selFlags,
187         (int)p->nSelectRow
188       );
189     }
190     if( cnt++ ) sqlite3TreeViewPop(pView);
191     if( p->pPrior ){
192       n = 1000;
193     }else{
194       n = 0;
195       if( p->pSrc && p->pSrc->nSrc ) n++;
196       if( p->pWhere ) n++;
197       if( p->pGroupBy ) n++;
198       if( p->pHaving ) n++;
199       if( p->pOrderBy ) n++;
200       if( p->pLimit ) n++;
201 #ifndef SQLITE_OMIT_WINDOWFUNC
202       if( p->pWin ) n++;
203       if( p->pWinDefn ) n++;
204 #endif
205     }
206     if( p->pEList ){
207       sqlite3TreeViewExprList(pView, p->pEList, n>0, "result-set");
208     }
209     n--;
210 #ifndef SQLITE_OMIT_WINDOWFUNC
211     if( p->pWin ){
212       Window *pX;
213       pView = sqlite3TreeViewPush(pView, (n--)>0);
214       sqlite3TreeViewLine(pView, "window-functions");
215       for(pX=p->pWin; pX; pX=pX->pNextWin){
216         sqlite3TreeViewWinFunc(pView, pX, pX->pNextWin!=0);
217       }
218       sqlite3TreeViewPop(pView);
219     }
220 #endif
221     if( p->pSrc && p->pSrc->nSrc ){
222       pView = sqlite3TreeViewPush(pView, (n--)>0);
223       sqlite3TreeViewLine(pView, "FROM");
224       sqlite3TreeViewSrcList(pView, p->pSrc);
225       sqlite3TreeViewPop(pView);
226     }
227     if( p->pWhere ){
228       sqlite3TreeViewItem(pView, "WHERE", (n--)>0);
229       sqlite3TreeViewExpr(pView, p->pWhere, 0);
230       sqlite3TreeViewPop(pView);
231     }
232     if( p->pGroupBy ){
233       sqlite3TreeViewExprList(pView, p->pGroupBy, (n--)>0, "GROUPBY");
234     }
235     if( p->pHaving ){
236       sqlite3TreeViewItem(pView, "HAVING", (n--)>0);
237       sqlite3TreeViewExpr(pView, p->pHaving, 0);
238       sqlite3TreeViewPop(pView);
239     }
240 #ifndef SQLITE_OMIT_WINDOWFUNC
241     if( p->pWinDefn ){
242       Window *pX;
243       sqlite3TreeViewItem(pView, "WINDOW", (n--)>0);
244       for(pX=p->pWinDefn; pX; pX=pX->pNextWin){
245         sqlite3TreeViewWindow(pView, pX, pX->pNextWin!=0);
246       }
247       sqlite3TreeViewPop(pView);
248     }
249 #endif
250     if( p->pOrderBy ){
251       sqlite3TreeViewExprList(pView, p->pOrderBy, (n--)>0, "ORDERBY");
252     }
253     if( p->pLimit ){
254       sqlite3TreeViewItem(pView, "LIMIT", (n--)>0);
255       sqlite3TreeViewExpr(pView, p->pLimit->pLeft, p->pLimit->pRight!=0);
256       if( p->pLimit->pRight ){
257         sqlite3TreeViewItem(pView, "OFFSET", (n--)>0);
258         sqlite3TreeViewExpr(pView, p->pLimit->pRight, 0);
259         sqlite3TreeViewPop(pView);
260       }
261       sqlite3TreeViewPop(pView);
262     }
263     if( p->pPrior ){
264       const char *zOp = "UNION";
265       switch( p->op ){
266         case TK_ALL:         zOp = "UNION ALL";  break;
267         case TK_INTERSECT:   zOp = "INTERSECT";  break;
268         case TK_EXCEPT:      zOp = "EXCEPT";     break;
269       }
270       sqlite3TreeViewItem(pView, zOp, 1);
271     }
272     p = p->pPrior;
273   }while( p!=0 );
274   sqlite3TreeViewPop(pView);
275 }
276 
277 #ifndef SQLITE_OMIT_WINDOWFUNC
278 /*
279 ** Generate a description of starting or stopping bounds
280 */
281 void sqlite3TreeViewBound(
282   TreeView *pView,        /* View context */
283   u8 eBound,              /* UNBOUNDED, CURRENT, PRECEDING, FOLLOWING */
284   Expr *pExpr,            /* Value for PRECEDING or FOLLOWING */
285   u8 moreToFollow         /* True if more to follow */
286 ){
287   switch( eBound ){
288     case TK_UNBOUNDED: {
289       sqlite3TreeViewItem(pView, "UNBOUNDED", moreToFollow);
290       sqlite3TreeViewPop(pView);
291       break;
292     }
293     case TK_CURRENT: {
294       sqlite3TreeViewItem(pView, "CURRENT", moreToFollow);
295       sqlite3TreeViewPop(pView);
296       break;
297     }
298     case TK_PRECEDING: {
299       sqlite3TreeViewItem(pView, "PRECEDING", moreToFollow);
300       sqlite3TreeViewExpr(pView, pExpr, 0);
301       sqlite3TreeViewPop(pView);
302       break;
303     }
304     case TK_FOLLOWING: {
305       sqlite3TreeViewItem(pView, "FOLLOWING", moreToFollow);
306       sqlite3TreeViewExpr(pView, pExpr, 0);
307       sqlite3TreeViewPop(pView);
308       break;
309     }
310   }
311 }
312 #endif /* SQLITE_OMIT_WINDOWFUNC */
313 
314 #ifndef SQLITE_OMIT_WINDOWFUNC
315 /*
316 ** Generate a human-readable explanation for a Window object
317 */
318 void sqlite3TreeViewWindow(TreeView *pView, const Window *pWin, u8 more){
319   int nElement = 0;
320   if( pWin->pFilter ){
321     sqlite3TreeViewItem(pView, "FILTER", 1);
322     sqlite3TreeViewExpr(pView, pWin->pFilter, 0);
323     sqlite3TreeViewPop(pView);
324   }
325   pView = sqlite3TreeViewPush(pView, more);
326   if( pWin->zName ){
327     sqlite3TreeViewLine(pView, "OVER %s (%p)", pWin->zName, pWin);
328   }else{
329     sqlite3TreeViewLine(pView, "OVER (%p)", pWin);
330   }
331   if( pWin->zBase )    nElement++;
332   if( pWin->pOrderBy ) nElement++;
333   if( pWin->eFrmType ) nElement++;
334   if( pWin->eExclude ) nElement++;
335   if( pWin->zBase ){
336     sqlite3TreeViewPush(pView, (--nElement)>0);
337     sqlite3TreeViewLine(pView, "window: %s", pWin->zBase);
338     sqlite3TreeViewPop(pView);
339   }
340   if( pWin->pPartition ){
341     sqlite3TreeViewExprList(pView, pWin->pPartition, nElement>0,"PARTITION-BY");
342   }
343   if( pWin->pOrderBy ){
344     sqlite3TreeViewExprList(pView, pWin->pOrderBy, (--nElement)>0, "ORDER-BY");
345   }
346   if( pWin->eFrmType ){
347     char zBuf[30];
348     const char *zFrmType = "ROWS";
349     if( pWin->eFrmType==TK_RANGE ) zFrmType = "RANGE";
350     if( pWin->eFrmType==TK_GROUPS ) zFrmType = "GROUPS";
351     sqlite3_snprintf(sizeof(zBuf),zBuf,"%s%s",zFrmType,
352         pWin->bImplicitFrame ? " (implied)" : "");
353     sqlite3TreeViewItem(pView, zBuf, (--nElement)>0);
354     sqlite3TreeViewBound(pView, pWin->eStart, pWin->pStart, 1);
355     sqlite3TreeViewBound(pView, pWin->eEnd, pWin->pEnd, 0);
356     sqlite3TreeViewPop(pView);
357   }
358   if( pWin->eExclude ){
359     char zBuf[30];
360     const char *zExclude;
361     switch( pWin->eExclude ){
362       case TK_NO:      zExclude = "NO OTHERS";   break;
363       case TK_CURRENT: zExclude = "CURRENT ROW"; break;
364       case TK_GROUP:   zExclude = "GROUP";       break;
365       case TK_TIES:    zExclude = "TIES";        break;
366       default:
367         sqlite3_snprintf(sizeof(zBuf),zBuf,"invalid(%d)", pWin->eExclude);
368         zExclude = zBuf;
369         break;
370     }
371     sqlite3TreeViewPush(pView, 0);
372     sqlite3TreeViewLine(pView, "EXCLUDE %s", zExclude);
373     sqlite3TreeViewPop(pView);
374   }
375   sqlite3TreeViewPop(pView);
376 }
377 #endif /* SQLITE_OMIT_WINDOWFUNC */
378 
379 #ifndef SQLITE_OMIT_WINDOWFUNC
380 /*
381 ** Generate a human-readable explanation for a Window Function object
382 */
383 void sqlite3TreeViewWinFunc(TreeView *pView, const Window *pWin, u8 more){
384   pView = sqlite3TreeViewPush(pView, more);
385   sqlite3TreeViewLine(pView, "WINFUNC %s(%d)",
386                        pWin->pFunc->zName, pWin->pFunc->nArg);
387   sqlite3TreeViewWindow(pView, pWin, 0);
388   sqlite3TreeViewPop(pView);
389 }
390 #endif /* SQLITE_OMIT_WINDOWFUNC */
391 
392 /*
393 ** Generate a human-readable explanation of an expression tree.
394 */
395 void sqlite3TreeViewExpr(TreeView *pView, const Expr *pExpr, u8 moreToFollow){
396   const char *zBinOp = 0;   /* Binary operator */
397   const char *zUniOp = 0;   /* Unary operator */
398   char zFlgs[60];
399   pView = sqlite3TreeViewPush(pView, moreToFollow);
400   if( pExpr==0 ){
401     sqlite3TreeViewLine(pView, "nil");
402     sqlite3TreeViewPop(pView);
403     return;
404   }
405   if( pExpr->flags || pExpr->affExpr ){
406     if( ExprHasProperty(pExpr, EP_FromJoin) ){
407       sqlite3_snprintf(sizeof(zFlgs),zFlgs,"  fg.af=%x.%c iRJT=%d",
408                        pExpr->flags, pExpr->affExpr ? pExpr->affExpr : 'n',
409                        pExpr->iRightJoinTable);
410     }else{
411       sqlite3_snprintf(sizeof(zFlgs),zFlgs,"  fg.af=%x.%c",
412                        pExpr->flags, pExpr->affExpr ? pExpr->affExpr : 'n');
413     }
414   }else{
415     zFlgs[0] = 0;
416   }
417   switch( pExpr->op ){
418     case TK_AGG_COLUMN: {
419       sqlite3TreeViewLine(pView, "AGG{%d:%d}%s",
420             pExpr->iTable, pExpr->iColumn, zFlgs);
421       break;
422     }
423     case TK_COLUMN: {
424       if( pExpr->iTable<0 ){
425         /* This only happens when coding check constraints */
426         char zOp2[16];
427         if( pExpr->op2 ){
428           sqlite3_snprintf(sizeof(zOp2),zOp2," op2=0x%02x",pExpr->op2);
429         }else{
430           zOp2[0] = 0;
431         }
432         sqlite3TreeViewLine(pView, "COLUMN(%d)%s%s",
433                                     pExpr->iColumn, zFlgs, zOp2);
434       }else{
435         sqlite3TreeViewLine(pView, "{%d:%d}%s",
436                              pExpr->iTable, pExpr->iColumn, zFlgs);
437       }
438       if( ExprHasProperty(pExpr, EP_FixedCol) ){
439         sqlite3TreeViewExpr(pView, pExpr->pLeft, 0);
440       }
441       break;
442     }
443     case TK_INTEGER: {
444       if( pExpr->flags & EP_IntValue ){
445         sqlite3TreeViewLine(pView, "%d", pExpr->u.iValue);
446       }else{
447         sqlite3TreeViewLine(pView, "%s", pExpr->u.zToken);
448       }
449       break;
450     }
451 #ifndef SQLITE_OMIT_FLOATING_POINT
452     case TK_FLOAT: {
453       sqlite3TreeViewLine(pView,"%s", pExpr->u.zToken);
454       break;
455     }
456 #endif
457     case TK_STRING: {
458       sqlite3TreeViewLine(pView,"%Q", pExpr->u.zToken);
459       break;
460     }
461     case TK_NULL: {
462       sqlite3TreeViewLine(pView,"NULL");
463       break;
464     }
465     case TK_TRUEFALSE: {
466       sqlite3TreeViewLine(pView,
467          sqlite3ExprTruthValue(pExpr) ? "TRUE" : "FALSE");
468       break;
469     }
470 #ifndef SQLITE_OMIT_BLOB_LITERAL
471     case TK_BLOB: {
472       sqlite3TreeViewLine(pView,"%s", pExpr->u.zToken);
473       break;
474     }
475 #endif
476     case TK_VARIABLE: {
477       sqlite3TreeViewLine(pView,"VARIABLE(%s,%d)",
478                           pExpr->u.zToken, pExpr->iColumn);
479       break;
480     }
481     case TK_REGISTER: {
482       sqlite3TreeViewLine(pView,"REGISTER(%d)", pExpr->iTable);
483       break;
484     }
485     case TK_ID: {
486       sqlite3TreeViewLine(pView,"ID \"%w\"", pExpr->u.zToken);
487       break;
488     }
489 #ifndef SQLITE_OMIT_CAST
490     case TK_CAST: {
491       /* Expressions of the form:   CAST(pLeft AS token) */
492       sqlite3TreeViewLine(pView,"CAST %Q", pExpr->u.zToken);
493       sqlite3TreeViewExpr(pView, pExpr->pLeft, 0);
494       break;
495     }
496 #endif /* SQLITE_OMIT_CAST */
497     case TK_LT:      zBinOp = "LT";     break;
498     case TK_LE:      zBinOp = "LE";     break;
499     case TK_GT:      zBinOp = "GT";     break;
500     case TK_GE:      zBinOp = "GE";     break;
501     case TK_NE:      zBinOp = "NE";     break;
502     case TK_EQ:      zBinOp = "EQ";     break;
503     case TK_IS:      zBinOp = "IS";     break;
504     case TK_ISNOT:   zBinOp = "ISNOT";  break;
505     case TK_AND:     zBinOp = "AND";    break;
506     case TK_OR:      zBinOp = "OR";     break;
507     case TK_PLUS:    zBinOp = "ADD";    break;
508     case TK_STAR:    zBinOp = "MUL";    break;
509     case TK_MINUS:   zBinOp = "SUB";    break;
510     case TK_REM:     zBinOp = "REM";    break;
511     case TK_BITAND:  zBinOp = "BITAND"; break;
512     case TK_BITOR:   zBinOp = "BITOR";  break;
513     case TK_SLASH:   zBinOp = "DIV";    break;
514     case TK_LSHIFT:  zBinOp = "LSHIFT"; break;
515     case TK_RSHIFT:  zBinOp = "RSHIFT"; break;
516     case TK_CONCAT:  zBinOp = "CONCAT"; break;
517     case TK_DOT:     zBinOp = "DOT";    break;
518 
519     case TK_UMINUS:  zUniOp = "UMINUS"; break;
520     case TK_UPLUS:   zUniOp = "UPLUS";  break;
521     case TK_BITNOT:  zUniOp = "BITNOT"; break;
522     case TK_NOT:     zUniOp = "NOT";    break;
523     case TK_ISNULL:  zUniOp = "ISNULL"; break;
524     case TK_NOTNULL: zUniOp = "NOTNULL"; break;
525 
526     case TK_TRUTH: {
527       int x;
528       const char *azOp[] = {
529          "IS-FALSE", "IS-TRUE", "IS-NOT-FALSE", "IS-NOT-TRUE"
530       };
531       assert( pExpr->op2==TK_IS || pExpr->op2==TK_ISNOT );
532       assert( pExpr->pRight );
533       assert( sqlite3ExprSkipCollate(pExpr->pRight)->op==TK_TRUEFALSE );
534       x = (pExpr->op2==TK_ISNOT)*2 + sqlite3ExprTruthValue(pExpr->pRight);
535       zUniOp = azOp[x];
536       break;
537     }
538 
539     case TK_SPAN: {
540       sqlite3TreeViewLine(pView, "SPAN %Q", pExpr->u.zToken);
541       sqlite3TreeViewExpr(pView, pExpr->pLeft, 0);
542       break;
543     }
544 
545     case TK_COLLATE: {
546       /* COLLATE operators without the EP_Collate flag are intended to
547       ** emulate collation associated with a table column.  These show
548       ** up in the treeview output as "SOFT-COLLATE".  Explicit COLLATE
549       ** operators that appear in the original SQL always have the
550       ** EP_Collate bit set and appear in treeview output as just "COLLATE" */
551       sqlite3TreeViewLine(pView, "%sCOLLATE %Q%s",
552         !ExprHasProperty(pExpr, EP_Collate) ? "SOFT-" : "",
553         pExpr->u.zToken, zFlgs);
554       sqlite3TreeViewExpr(pView, pExpr->pLeft, 0);
555       break;
556     }
557 
558     case TK_AGG_FUNCTION:
559     case TK_FUNCTION: {
560       ExprList *pFarg;       /* List of function arguments */
561       Window *pWin;
562       if( ExprHasProperty(pExpr, EP_TokenOnly) ){
563         pFarg = 0;
564         pWin = 0;
565       }else{
566         pFarg = pExpr->x.pList;
567 #ifndef SQLITE_OMIT_WINDOWFUNC
568         pWin = pExpr->y.pWin;
569 #else
570         pWin = 0;
571 #endif
572       }
573       if( pExpr->op==TK_AGG_FUNCTION ){
574         sqlite3TreeViewLine(pView, "AGG_FUNCTION%d %Q%s",
575                              pExpr->op2, pExpr->u.zToken, zFlgs);
576       }else if( pExpr->op2!=0 ){
577         const char *zOp2;
578         char zBuf[8];
579         sqlite3_snprintf(sizeof(zBuf),zBuf,"0x%02x",pExpr->op2);
580         zOp2 = zBuf;
581         if( pExpr->op2==NC_IsCheck ) zOp2 = "NC_IsCheck";
582         if( pExpr->op2==NC_IdxExpr ) zOp2 = "NC_IdxExpr";
583         if( pExpr->op2==NC_PartIdx ) zOp2 = "NC_PartIdx";
584         if( pExpr->op2==NC_GenCol ) zOp2 = "NC_GenCol";
585         sqlite3TreeViewLine(pView, "FUNCTION %Q%s op2=%s",
586                             pExpr->u.zToken, zFlgs, zOp2);
587       }else{
588         sqlite3TreeViewLine(pView, "FUNCTION %Q%s", pExpr->u.zToken, zFlgs);
589       }
590       if( pFarg ){
591         sqlite3TreeViewExprList(pView, pFarg, pWin!=0, 0);
592       }
593 #ifndef SQLITE_OMIT_WINDOWFUNC
594       if( pWin ){
595         sqlite3TreeViewWindow(pView, pWin, 0);
596       }
597 #endif
598       break;
599     }
600 #ifndef SQLITE_OMIT_SUBQUERY
601     case TK_EXISTS: {
602       sqlite3TreeViewLine(pView, "EXISTS-expr flags=0x%x", pExpr->flags);
603       sqlite3TreeViewSelect(pView, pExpr->x.pSelect, 0);
604       break;
605     }
606     case TK_SELECT: {
607       sqlite3TreeViewLine(pView, "SELECT-expr flags=0x%x", pExpr->flags);
608       sqlite3TreeViewSelect(pView, pExpr->x.pSelect, 0);
609       break;
610     }
611     case TK_IN: {
612       sqlite3TreeViewLine(pView, "IN flags=0x%x", pExpr->flags);
613       sqlite3TreeViewExpr(pView, pExpr->pLeft, 1);
614       if( ExprHasProperty(pExpr, EP_xIsSelect) ){
615         sqlite3TreeViewSelect(pView, pExpr->x.pSelect, 0);
616       }else{
617         sqlite3TreeViewExprList(pView, pExpr->x.pList, 0, 0);
618       }
619       break;
620     }
621 #endif /* SQLITE_OMIT_SUBQUERY */
622 
623     /*
624     **    x BETWEEN y AND z
625     **
626     ** This is equivalent to
627     **
628     **    x>=y AND x<=z
629     **
630     ** X is stored in pExpr->pLeft.
631     ** Y is stored in pExpr->pList->a[0].pExpr.
632     ** Z is stored in pExpr->pList->a[1].pExpr.
633     */
634     case TK_BETWEEN: {
635       Expr *pX = pExpr->pLeft;
636       Expr *pY = pExpr->x.pList->a[0].pExpr;
637       Expr *pZ = pExpr->x.pList->a[1].pExpr;
638       sqlite3TreeViewLine(pView, "BETWEEN");
639       sqlite3TreeViewExpr(pView, pX, 1);
640       sqlite3TreeViewExpr(pView, pY, 1);
641       sqlite3TreeViewExpr(pView, pZ, 0);
642       break;
643     }
644     case TK_TRIGGER: {
645       /* If the opcode is TK_TRIGGER, then the expression is a reference
646       ** to a column in the new.* or old.* pseudo-tables available to
647       ** trigger programs. In this case Expr.iTable is set to 1 for the
648       ** new.* pseudo-table, or 0 for the old.* pseudo-table. Expr.iColumn
649       ** is set to the column of the pseudo-table to read, or to -1 to
650       ** read the rowid field.
651       */
652       sqlite3TreeViewLine(pView, "%s(%d)",
653           pExpr->iTable ? "NEW" : "OLD", pExpr->iColumn);
654       break;
655     }
656     case TK_CASE: {
657       sqlite3TreeViewLine(pView, "CASE");
658       sqlite3TreeViewExpr(pView, pExpr->pLeft, 1);
659       sqlite3TreeViewExprList(pView, pExpr->x.pList, 0, 0);
660       break;
661     }
662 #ifndef SQLITE_OMIT_TRIGGER
663     case TK_RAISE: {
664       const char *zType = "unk";
665       switch( pExpr->affExpr ){
666         case OE_Rollback:   zType = "rollback";  break;
667         case OE_Abort:      zType = "abort";     break;
668         case OE_Fail:       zType = "fail";      break;
669         case OE_Ignore:     zType = "ignore";    break;
670       }
671       sqlite3TreeViewLine(pView, "RAISE %s(%Q)", zType, pExpr->u.zToken);
672       break;
673     }
674 #endif
675     case TK_MATCH: {
676       sqlite3TreeViewLine(pView, "MATCH {%d:%d}%s",
677                           pExpr->iTable, pExpr->iColumn, zFlgs);
678       sqlite3TreeViewExpr(pView, pExpr->pRight, 0);
679       break;
680     }
681     case TK_VECTOR: {
682       char *z = sqlite3_mprintf("VECTOR%s",zFlgs);
683       sqlite3TreeViewBareExprList(pView, pExpr->x.pList, z);
684       sqlite3_free(z);
685       break;
686     }
687     case TK_SELECT_COLUMN: {
688       sqlite3TreeViewLine(pView, "SELECT-COLUMN %d", pExpr->iColumn);
689       sqlite3TreeViewSelect(pView, pExpr->pLeft->x.pSelect, 0);
690       break;
691     }
692     case TK_IF_NULL_ROW: {
693       sqlite3TreeViewLine(pView, "IF-NULL-ROW %d", pExpr->iTable);
694       sqlite3TreeViewExpr(pView, pExpr->pLeft, 0);
695       break;
696     }
697     default: {
698       sqlite3TreeViewLine(pView, "op=%d", pExpr->op);
699       break;
700     }
701   }
702   if( zBinOp ){
703     sqlite3TreeViewLine(pView, "%s%s", zBinOp, zFlgs);
704     sqlite3TreeViewExpr(pView, pExpr->pLeft, 1);
705     sqlite3TreeViewExpr(pView, pExpr->pRight, 0);
706   }else if( zUniOp ){
707     sqlite3TreeViewLine(pView, "%s%s", zUniOp, zFlgs);
708    sqlite3TreeViewExpr(pView, pExpr->pLeft, 0);
709   }
710   sqlite3TreeViewPop(pView);
711 }
712 
713 
714 /*
715 ** Generate a human-readable explanation of an expression list.
716 */
717 void sqlite3TreeViewBareExprList(
718   TreeView *pView,
719   const ExprList *pList,
720   const char *zLabel
721 ){
722   if( zLabel==0 || zLabel[0]==0 ) zLabel = "LIST";
723   if( pList==0 ){
724     sqlite3TreeViewLine(pView, "%s (empty)", zLabel);
725   }else{
726     int i;
727     sqlite3TreeViewLine(pView, "%s", zLabel);
728     for(i=0; i<pList->nExpr; i++){
729       int j = pList->a[i].u.x.iOrderByCol;
730       char *zName = pList->a[i].zName;
731       int moreToFollow = i<pList->nExpr - 1;
732       if( j || zName ){
733         sqlite3TreeViewPush(pView, moreToFollow);
734         moreToFollow = 0;
735         sqlite3TreeViewLine(pView, 0);
736         if( zName ){
737           fprintf(stdout, "AS %s ", zName);
738         }
739         if( j ){
740           fprintf(stdout, "iOrderByCol=%d", j);
741         }
742         fprintf(stdout, "\n");
743         fflush(stdout);
744       }
745       sqlite3TreeViewExpr(pView, pList->a[i].pExpr, moreToFollow);
746       if( j || zName ){
747         sqlite3TreeViewPop(pView);
748       }
749     }
750   }
751 }
752 void sqlite3TreeViewExprList(
753   TreeView *pView,
754   const ExprList *pList,
755   u8 moreToFollow,
756   const char *zLabel
757 ){
758   pView = sqlite3TreeViewPush(pView, moreToFollow);
759   sqlite3TreeViewBareExprList(pView, pList, zLabel);
760   sqlite3TreeViewPop(pView);
761 }
762 
763 #endif /* SQLITE_DEBUG */
764