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