online_analyze.c

   1 /*
   2  * Copyright (c) 2011 Teodor Sigaev <teodor@sigaev.ru>
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *        notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *        notice, this list of conditions and the following disclaimer in the
  12  *        documentation and/or other materials provided with the distribution.
  13  * 3. Neither the name of the author nor the names of any co-contributors
  14  *        may be used to endorse or promote products derived from this software
  15  *        without specific prior written permission.
  16  *
  17  * THIS SOFTWARE IS PROVIDED BY CONTRIBUTORS ``AS IS'' AND ANY EXPRESS
  18  * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
  19  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  20  * ARE DISCLAIMED. IN NO EVENT SHALL CONTRIBUTORS BE LIABLE FOR ANY
  21  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
  23  * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  24  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
  25  * IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
  26  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN
  27  * IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  28  */
  29
  30 #include "postgres.h"
  31
  32 #include "pgstat.h"
  33 #include "catalog/namespace.h"
  34 #include "commands/vacuum.h"
  35 #include "executor/executor.h"
  36 #include "nodes/nodes.h"
  37 #include "nodes/parsenodes.h"
  38 #include "storage/bufmgr.h"
  39 #include "utils/builtins.h"
  40 #include "utils/lsyscache.h"
  41 #include "utils/guc.h"
  42 #if PG_VERSION_NUM >= 90200
  43 #include "catalog/pg_class.h"
  44 #include "nodes/primnodes.h"
  45 #include "tcop/utility.h"
  46 #include "utils/rel.h"
  47 #include "utils/relcache.h"
  48 #include "utils/timestamp.h"
  49 #endif
  50
  51 #ifdef PG_MODULE_MAGIC
  52 PG_MODULE_MAGIC;
  53 #endif
  54
  55 static bool online_analyze_enable = true;
  56 static bool online_analyze_verbose = true;
  57 static double online_analyze_scale_factor = 0.1;
  58 static int online_analyze_threshold = 50;
  59 static double online_analyze_min_interval = 10000;
  60
  61 static ExecutorEnd_hook_type oldExecutorEndHook = NULL;
  62 #if PG_VERSION_NUM >= 90200
  63 static ProcessUtility_hook_type oldProcessUtilityHook = NULL;
  64 #endif
  65
  66 typedef enum
  67 {
  68         OATT_ALL                = 0x03,
  69         OATT_PERSISTENT = 0x01,
  70         OATT_TEMPORARY  = 0x02,
  71         OATT_NONE               = 0x00
  72 } OnlineAnalyzeTableType;
  73
  74 static const struct config_enum_entry online_analyze_table_type_options[] =
  75 {
  76         {"all", OATT_ALL, false},
  77         {"persistent", OATT_PERSISTENT, false},
  78         {"temporary", OATT_TEMPORARY, false},
  79         {"none", OATT_NONE, false},
  80         {NULL, 0, false},
  81 };
  82
  83 static int online_analyze_table_type = (int)OATT_ALL;
  84
  85 typedef struct TableList {
  86         int             nTables;
  87         Oid             *tables;
  88         char    *tableStr;
  89 } TableList;
  90
  91 static TableList excludeTables = {0, NULL, NULL};
  92 static TableList includeTables = {0, NULL, NULL};
  93
  94 static int
  95 oid_cmp(const void *a, const void *b)
  96 {
  97         if (*(Oid*)a == *(Oid*)b)
  98                 return 0;
  99         return (*(Oid*)a > *(Oid*)b) ? 1 : -1;
 100 }
 101
 102 static const char *
 103 tableListAssign(const char * newval, bool doit, TableList *tbl)
 104 {
 105         char       *rawname;
 106         List       *namelist;
 107         ListCell   *l;
 108         Oid         *newOids = NULL;
 109         int         nOids = 0,
 110                                 i = 0;
 111
 112         rawname = pstrdup(newval);
 113
 114         if (!SplitIdentifierString(rawname, ',', &namelist))
 115                 goto cleanup;
 116
 117         if (doit)
 118         {
 119                 nOids = list_length(namelist);
 120                 newOids = malloc(sizeof(Oid) * (nOids+1));
 121                 if (!newOids)
 122                         elog(ERROR,"could not allocate %d bytes", (int)(sizeof(Oid) * (nOids+1)));
 123         }
 124
 125         foreach(l, namelist)
 126         {
 127                 char        *curname = (char *) lfirst(l);
 128                 Oid         relOid = RangeVarGetRelid(makeRangeVarFromNameList(stringToQualifiedNameList(curname)),
 129 #if PG_VERSION_NUM >= 90200
 130                                                                                                 NoLock,
 131 #endif
 132                                                                                                 true);
 133
 134                 if (relOid == InvalidOid)
 135                 {
 136 #if PG_VERSION_NUM >= 90100
 137                         if (doit == false)
 138 #endif
 139                         elog(WARNING,"'%s' does not exist", curname);
 140                         continue;
 141                 }
 142                 else if ( get_rel_relkind(relOid) != RELKIND_RELATION )
 143                 {
 144 #if PG_VERSION_NUM >= 90100
 145                         if (doit == false)
 146 #endif
 147                                 elog(WARNING,"'%s' is not an table", curname);
 148                         continue;
 149                 }
 150                 else if (doit)
 151                 {
 152                         newOids[i++] = relOid;
 153                 }
 154         }
 155
 156         if (doit)
 157         {
 158                 tbl->nTables = i;
 159                 if (tbl->tables)
 160                         free(tbl->tables);
 161                 tbl->tables = newOids;
 162                 if (tbl->nTables > 1)
 163                         qsort(tbl->tables, tbl->nTables, sizeof(tbl->tables[0]), oid_cmp);
 164         }
 165
 166         pfree(rawname);
 167         list_free(namelist);
 168
 169         return newval;
 170
 171 cleanup:
 172         if (newOids)
 173                 free(newOids);
 174         pfree(rawname);
 175         list_free(namelist);
 176         return NULL;
 177 }
 178
 179 #if PG_VERSION_NUM >= 90100
 180 static bool
 181 excludeTablesCheck(char **newval, void **extra, GucSource source)
 182 {
 183         char *val;
 184
 185         val = (char*)tableListAssign(*newval, false, &excludeTables);
 186
 187         if (val)
 188         {
 189                 *newval = val;
 190                 return true;
 191         }
 192
 193         return false;
 194 }
 195
 196 static void
 197 excludeTablesAssign(const char *newval, void *extra)
 198 {
 199         tableListAssign(newval, true, &excludeTables);
 200 }
 201
 202 static bool
 203 includeTablesCheck(char **newval, void **extra, GucSource source)
 204 {
 205         char *val;
 206
 207         val = (char*)tableListAssign(*newval, false, &includeTables);
 208
 209         if (val)
 210         {
 211                 *newval = val;
 212                 return true;
 213         }
 214
 215         return false;
 216 }
 217
 218 static void
 219 includeTablesAssign(const char *newval, void *extra)
 220 {
 221         tableListAssign(newval, true, &excludeTables);
 222 }
 223
 224 #else /* PG_VERSION_NUM < 90100 */
 225
 226 static const char *
 227 excludeTablesAssign(const char * newval, bool doit, GucSource source)
 228 {
 229         return tableListAssign(newval, doit, &excludeTables);
 230 }
 231
 232 static const char *
 233 includeTablesAssign(const char * newval, bool doit, GucSource source)
 234 {
 235         return tableListAssign(newval, doit, &includeTables);
 236 }
 237
 238 #endif
 239
 240 static const char*
 241 tableListShow(TableList *tbl)
 242 {
 243         char    *val, *ptr;
 244         int     i,
 245                         len;
 246
 247         len = 1 /* \0 */ + tbl->nTables * (2 * NAMEDATALEN + 2 /* ', ' */ + 1 /* . */);
 248         ptr = val = palloc(len);
 249         *ptr ='\0';
 250         for(i=0; i<tbl->nTables; i++)
 251         {
 252                 char    *relname = get_rel_name(tbl->tables[i]);
 253                 Oid     nspOid = get_rel_namespace(tbl->tables[i]);
 254                 char    *nspname = get_namespace_name(nspOid);
 255
 256                 if ( relname == NULL || nspOid == InvalidOid || nspname == NULL )
 257                         continue;
 258
 259                 ptr += snprintf(ptr, len - (ptr - val), "%s%s.%s",
 260                                                                                                         (i==0) ? "" : ", ",
 261                                                                                                         nspname, relname);
 262         }
 263
 264         return val;
 265 }
 266
 267 static const char*
 268 excludeTablesShow(void)
 269 {
 270         return tableListShow(&excludeTables);
 271 }
 272
 273 static const char*
 274 includeTablesShow(void)
 275 {
 276         return tableListShow(&includeTables);
 277 }
 278
 279 static bool
 280 matchOid(TableList *tbl, Oid oid)
 281 {
 282         Oid     *StopLow = tbl->tables,
 283                 *StopHigh = tbl->tables + tbl->nTables,
 284                 *StopMiddle;
 285
 286         /* Loop invariant: StopLow <= val < StopHigh */
 287         while (StopLow < StopHigh)
 288         {
 289                 StopMiddle = StopLow + ((StopHigh - StopLow) >> 1);
 290
 291                 if (*StopMiddle == oid)
 292                         return true;
 293                 else  if (*StopMiddle < oid)
 294                         StopLow = StopMiddle + 1;
 295                 else
 296                         StopHigh = StopMiddle;
 297         }
 298
 299         return false;
 300 }
 301
 302 static void
 303 makeAnalyze(Oid relOid, CmdType operation, uint32 naffected)
 304 {
 305         PgStat_StatTabEntry             *tabentry;
 306         TimestampTz                     now = GetCurrentTimestamp();
 307
 308         if (relOid == InvalidOid)
 309                 return;
 310
 311         tabentry = pgstat_fetch_stat_tabentry(relOid);
 312
 313 #if PG_VERSION_NUM >= 90000
 314 #define changes_since_analyze(t)        ((t)->changes_since_analyze)
 315 #else
 316 #define changes_since_analyze(t)        ((t)->n_live_tuples + (t)->n_dead_tuples - (t)->last_anl_tuples)
 317 #endif
 318
 319         if (
 320                 tabentry == NULL /* a new table */ ||
 321                 (
 322                         /* do not analyze too often, if both stamps are exceeded the go */
 323                         TimestampDifferenceExceeds(tabentry->analyze_timestamp, now, online_analyze_min_interval) &&
 324                         TimestampDifferenceExceeds(tabentry->autovac_analyze_timestamp, now, online_analyze_min_interval) &&
 325                         /* be in sync with relation_needs_vacanalyze */
 326                         ((double)(changes_since_analyze(tabentry) + naffected)) >=
 327                                 online_analyze_scale_factor * ((double)(tabentry->n_dead_tuples + tabentry->n_live_tuples)) +
 328                                         (double)online_analyze_threshold
 329                 )
 330         )
 331         {
 332                 VacuumStmt                              vacstmt;
 333                 TimestampTz                             startStamp, endStamp;
 334
 335                 /*
 336                  * includeTables overwrites excludeTables
 337                  */
 338                 switch(online_analyze_table_type)
 339                 {
 340                         case OATT_ALL:
 341                                 if (matchOid(&excludeTables, relOid) == true && matchOid(&includeTables, relOid) == false)
 342                                         return;
 343                                 break;
 344                         case OATT_NONE:
 345                                 if (matchOid(&includeTables, relOid) == false)
 346                                         return;
 347                                 break;
 348                         case OATT_TEMPORARY:
 349                         case OATT_PERSISTENT:
 350                         default:
 351                                 {
 352                                         Relation                                rel;
 353                                         OnlineAnalyzeTableType  reltype;
 354
 355                                         rel = RelationIdGetRelation(relOid);
 356                                         reltype =
 357 #if PG_VERSION_NUM >= 90100
 358                                                 (rel->rd_rel->relpersistence == RELPERSISTENCE_TEMP)
 359 #else
 360                                                 (rel->rd_istemp || rel->rd_islocaltemp)
 361 #endif
 362                                                         ? OATT_TEMPORARY : OATT_PERSISTENT;
 363                                         RelationClose(rel);
 364
 365                                         /*
 366                                          * skip analyze if relation's type doesn't not match online_analyze_table_type
 367                                          */
 368                                         if ((online_analyze_table_type & reltype) == 0 || matchOid(&excludeTables, relOid) == true)
 369                                         {
 370                                                 if (matchOid(&includeTables, relOid) == false)
 371                                                         return;
 372                                         }
 373                                 }
 374                                 break;
 375                 }
 376
 377                 vacstmt.type = T_VacuumStmt;
 378                 vacstmt.freeze_min_age = -1;
 379                 vacstmt.freeze_table_age = -1; /* ??? */
 380                 vacstmt.relation = NULL;
 381                 vacstmt.va_cols = NIL;
 382
 383 #if PG_VERSION_NUM >= 90000
 384                 vacstmt.options = VACOPT_ANALYZE;
 385                 if (online_analyze_verbose)
 386                         vacstmt.options |= VACOPT_VERBOSE;
 387 #else
 388                 vacstmt.vacuum = vacstmt.full = false;
 389                 vacstmt.analyze = true;
 390                 vacstmt.verbose = online_analyze_verbose;
 391 #endif
 392
 393                 if (online_analyze_verbose)
 394                         startStamp = GetCurrentTimestamp();
 395
 396                 analyze_rel(relOid, &vacstmt, GetAccessStrategy(BAS_VACUUM)
 397 #if (PG_VERSION_NUM < 90004) && (PG_VERSION_NUM >= 90000)
 398                         , true
 399 #endif
 400                 );
 401
 402                 if (online_analyze_verbose)
 403                 {
 404                         long    secs;
 405                         int             microsecs;
 406
 407                         endStamp = GetCurrentTimestamp();
 408                         TimestampDifference(startStamp, endStamp, &secs, &microsecs);
 409                         elog(INFO, "analyze \"%s\" took %.02f seconds",
 410                                 get_rel_name(relOid), ((double)secs) + ((double)microsecs)/1.0e6);
 411                 }
 412
 413
 414                 if (tabentry == NULL)
 415                 {
 416                         /* new table */
 417                         pgstat_clear_snapshot();
 418                 }
 419                 else
 420                 {
 421                         /* update last analyze timestamp in local memory of backend */
 422                         tabentry->analyze_timestamp = now;
 423                 }
 424         }
 425 #if PG_VERSION_NUM >= 90000
 426         else if (tabentry != NULL)
 427         {
 428                 tabentry->changes_since_analyze += naffected;
 429         }
 430 #endif
 431 }
 432
 433 extern PGDLLIMPORT void onlineAnalyzeHooker(QueryDesc *queryDesc);
 434 void
 435 onlineAnalyzeHooker(QueryDesc *queryDesc)
 436 {
 437         uint32  naffected = 0;
 438
 439         if (queryDesc->estate)
 440                 naffected = queryDesc->estate->es_processed;
 441
 442         if (online_analyze_enable && queryDesc->plannedstmt &&
 443                         (queryDesc->operation == CMD_INSERT ||
 444                          queryDesc->operation == CMD_UPDATE ||
 445                          queryDesc->operation == CMD_DELETE
 446 #if PG_VERSION_NUM < 90200
 447                          || (queryDesc->operation == CMD_SELECT && queryDesc->plannedstmt->intoClause)
 448 #endif
 449                          ))
 450         {
 451 #if PG_VERSION_NUM < 90200
 452                 if (queryDesc->operation == CMD_SELECT)
 453                 {
 454                         Oid     relOid = RangeVarGetRelid(queryDesc->plannedstmt->intoClause->rel, true);
 455
 456                         makeAnalyze(relOid, queryDesc->operation, naffected);
 457                 }
 458                 else
 459 #endif
 460                 if (queryDesc->plannedstmt->resultRelations &&
 461                                  queryDesc->plannedstmt->rtable)
 462                 {
 463                         ListCell        *l;
 464
 465                         foreach(l, queryDesc->plannedstmt->resultRelations)
 466                         {
 467                                 int                     n = lfirst_int(l);
 468                                 RangeTblEntry   *rte = list_nth(queryDesc->plannedstmt->rtable, n-1);
 469
 470                                 if (rte->rtekind == RTE_RELATION)
 471                                         makeAnalyze(rte->relid, queryDesc->operation, naffected);
 472                         }
 473                 }
 474         }
 475
 476         if (oldExecutorEndHook)
 477                 oldExecutorEndHook(queryDesc);
 478         else
 479                 standard_ExecutorEnd(queryDesc);
 480 }
 481
 482 #if PG_VERSION_NUM >= 90200
 483 static void
 484 onlineAnalyzeHookerUtility(Node *parsetree, const char *queryString,
 485                                                         ParamListInfo params, bool isTopLevel,
 486                                                         DestReceiver *dest, char *completionTag) {
 487         RangeVar        *tblname = NULL;
 488
 489         if (IsA(parsetree, CreateTableAsStmt) && ((CreateTableAsStmt*)parsetree)->into)
 490                 tblname = (RangeVar*)copyObject(((CreateTableAsStmt*)parsetree)->into->rel);
 491
 492         if (oldProcessUtilityHook)
 493                 oldProcessUtilityHook(parsetree, queryString, params, isTopLevel, dest, completionTag);
 494         else
 495                 standard_ProcessUtility(parsetree, queryString, params, isTopLevel, dest, completionTag);
 496
 497         if (tblname) {
 498                 Oid     tblOid = RangeVarGetRelid(tblname, NoLock, true);
 499
 500                 makeAnalyze(tblOid, CMD_INSERT, 0);
 501         }
 502 }
 503 #endif
 504
 505 void _PG_init(void);
 506 void
 507 _PG_init(void)
 508 {
 509         oldExecutorEndHook = ExecutorEnd_hook;
 510
 511         ExecutorEnd_hook = onlineAnalyzeHooker;
 512
 513 #if PG_VERSION_NUM >= 90200
 514         oldProcessUtilityHook = ProcessUtility_hook;
 515
 516         ProcessUtility_hook = onlineAnalyzeHookerUtility;
 517 #endif
 518
 519
 520         DefineCustomBoolVariable(
 521                 "online_analyze.enable",
 522                 "Enable on-line analyze",
 523                 "Enables analyze of table directly after insert/update/delete/select into",
 524                 &online_analyze_enable,
 525 #if PG_VERSION_NUM >= 80400
 526                 online_analyze_enable,
 527 #endif
 528                 PGC_USERSET,
 529 #if PG_VERSION_NUM >= 80400
 530                 GUC_NOT_IN_SAMPLE,
 531 #if PG_VERSION_NUM >= 90100
 532                 NULL,
 533 #endif
 534 #endif
 535                 NULL,
 536                 NULL
 537         );
 538
 539         DefineCustomBoolVariable(
 540                 "online_analyze.verbose",
 541                 "Verbosity of on-line analyze",
 542                 "Make ANALYZE VERBOSE after table's changes",
 543                 &online_analyze_verbose,
 544 #if PG_VERSION_NUM >= 80400
 545                 online_analyze_verbose,
 546 #endif
 547                 PGC_USERSET,
 548 #if PG_VERSION_NUM >= 80400
 549                 GUC_NOT_IN_SAMPLE,
 550 #if PG_VERSION_NUM >= 90100
 551                 NULL,
 552 #endif
 553 #endif
 554                 NULL,
 555                 NULL
 556         );
 557
 558     DefineCustomRealVariable(
 559                 "online_analyze.scale_factor",
 560                 "fraction of table size to start on-line analyze",
 561                 "fraction of table size to start on-line analyze",
 562                 &online_analyze_scale_factor,
 563 #if PG_VERSION_NUM >= 80400
 564                 online_analyze_scale_factor,
 565 #endif
 566                 0.0,
 567                 1.0,
 568                 PGC_USERSET,
 569 #if PG_VERSION_NUM >= 80400
 570                 GUC_NOT_IN_SAMPLE,
 571 #if PG_VERSION_NUM >= 90100
 572                 NULL,
 573 #endif
 574 #endif
 575                 NULL,
 576                 NULL
 577         );
 578
 579     DefineCustomIntVariable(
 580                 "online_analyze.threshold",
 581                 "min number of row updates before on-line analyze",
 582                 "min number of row updates before on-line analyze",
 583                 &online_analyze_threshold,
 584 #if PG_VERSION_NUM >= 80400
 585                 online_analyze_threshold,
 586 #endif
 587                 0,
 588                 0x7fffffff,
 589                 PGC_USERSET,
 590 #if PG_VERSION_NUM >= 80400
 591                 GUC_NOT_IN_SAMPLE,
 592 #if PG_VERSION_NUM >= 90100
 593                 NULL,
 594 #endif
 595 #endif
 596                 NULL,
 597                 NULL
 598         );
 599
 600     DefineCustomRealVariable(
 601                 "online_analyze.min_interval",
 602                 "minimum time interval between analyze call (in milliseconds)",
 603                 "minimum time interval between analyze call (in milliseconds)",
 604                 &online_analyze_scale_factor,
 605 #if PG_VERSION_NUM >= 80400
 606                 online_analyze_min_interval,
 607 #endif
 608                 0.0,
 609                 1e30,
 610                 PGC_USERSET,
 611 #if PG_VERSION_NUM >= 80400
 612                 GUC_NOT_IN_SAMPLE,
 613 #if PG_VERSION_NUM >= 90100
 614                 NULL,
 615 #endif
 616 #endif
 617                 NULL,
 618                 NULL
 619         );
 620
 621         DefineCustomEnumVariable(
 622                 "online_analyze.table_type",
 623                 "Type(s) of table for online analyze: all(default), persistent, temporary, none",
 624                 NULL,
 625                 &online_analyze_table_type,
 626 #if PG_VERSION_NUM >= 80400
 627                 online_analyze_table_type,
 628 #endif
 629                 online_analyze_table_type_options,
 630                 PGC_USERSET,
 631 #if PG_VERSION_NUM >= 80400
 632         GUC_NOT_IN_SAMPLE,
 633 #if PG_VERSION_NUM >= 90100
 634                 NULL,
 635 #endif
 636 #endif
 637                 NULL,
 638                 NULL
 639         );
 640
 641     DefineCustomStringVariable(
 642                 "online_analyze.exclude_tables",
 643                 "List of tables which will not online analyze",
 644                 NULL,
 645                 &excludeTables.tableStr,
 646 #if PG_VERSION_NUM >= 80400
 647                 "",
 648 #endif
 649                 PGC_USERSET,
 650                 0,
 651 #if PG_VERSION_NUM >= 90100
 652                 excludeTablesCheck,
 653                 excludeTablesAssign,
 654 #else
 655                 excludeTablesAssign,
 656 #endif
 657                 excludeTablesShow
 658         );
 659
 660     DefineCustomStringVariable(
 661                 "online_analyze.include_tables",
 662                 "List of tables which will online analyze",
 663                 NULL,
 664                 &includeTables.tableStr,
 665 #if PG_VERSION_NUM >= 80400
 666                 "",
 667 #endif
 668                 PGC_USERSET,
 669                 0,
 670 #if PG_VERSION_NUM >= 90100
 671                 includeTablesCheck,
 672                 includeTablesAssign,
 673 #else
 674                 includeTablesAssign,
 675 #endif
 676                 includeTablesShow
 677         );
 678 }
 679
 680 void _PG_fini(void);
 681 void
 682 _PG_fini(void)
 683 {
 684         ExecutorEnd_hook = oldExecutorEndHook;
 685 #if PG_VERSION_NUM >= 90200
 686         ProcessUtility_hook = oldProcessUtilityHook;
 687 #endif
 688
 689         if (excludeTables.tables)
 690                 free(excludeTables.tables);
 691         if (includeTables.tables)
 692                 free(includeTables.tables);
 693
 694         excludeTables.tables = includeTables.tables = NULL;
 695         excludeTables.nTables = includeTables.nTables = 0;
 696 }