Fix bug noted by Bruce: FETCH in an already-aborted transaction block
would crash, due to premature invocation of SetQuerySnapshot(). Clean up problems with handling of multiple queries by splitting pg_parse_and_plan into two routines. The old code would not, for example, do the right thing with END; SELECT... submitted in one query string when it had been in transaction abort state, because it'd decide to skip planning the SELECT before it had executed the END. New arrangement is simpler and doesn't force caller to plan if only parse+rewrite is needed.
This commit is contained in:
Tom Lane
parent
30d4f58256
commit
708f82f191
|
|
@ -8,7 +8,7 @@
|
|||
*
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/catalog/pg_proc.c,v 1.40 2000/01/26 05:56:11 momjian Exp $
|
||||
* $Header: /cvsroot/pgsql/src/backend/catalog/pg_proc.c,v 1.41 2000/04/04 21:44:37 tgl Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
|
@ -61,7 +61,6 @@ ProcedureCreate(char *procedureName,
|
|||
Oid typeObjectId;
|
||||
List *x;
|
||||
List *querytree_list;
|
||||
List *plan_list;
|
||||
Oid typev[FUNC_MAX_ARGS];
|
||||
Oid relid;
|
||||
Oid toid;
|
||||
|
|
@ -222,9 +221,8 @@ ProcedureCreate(char *procedureName,
|
|||
|
||||
if (strcmp(languageName, "sql") == 0)
|
||||
{
|
||||
plan_list = pg_parse_and_plan(prosrc, typev, parameterCount,
|
||||
&querytree_list, dest, FALSE);
|
||||
|
||||
querytree_list = pg_parse_and_rewrite(prosrc, typev, parameterCount,
|
||||
FALSE);
|
||||
/* typecheck return value */
|
||||
pg_checkretval(typeObjectId, querytree_list);
|
||||
}
|
||||
|
|
|
|||
|
|
@ -9,7 +9,7 @@
|
|||
*
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/executor/functions.c,v 1.31 2000/01/26 05:56:22 momjian Exp $
|
||||
* $Header: /cvsroot/pgsql/src/backend/executor/functions.c,v 1.32 2000/04/04 21:44:39 tgl Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
|
@ -84,7 +84,6 @@ init_execution_state(FunctionCachePtr fcache,
|
|||
execution_state *nextes;
|
||||
execution_state *preves;
|
||||
List *queryTree_list,
|
||||
*planTree_list,
|
||||
*qtl_item;
|
||||
int nargs = fcache->nargs;
|
||||
|
||||
|
|
@ -92,15 +91,17 @@ init_execution_state(FunctionCachePtr fcache,
|
|||
nextes = newes;
|
||||
preves = (execution_state *) NULL;
|
||||
|
||||
planTree_list = pg_parse_and_plan(fcache->src, fcache->argOidVect,
|
||||
nargs, &queryTree_list, None, FALSE);
|
||||
queryTree_list = pg_parse_and_rewrite(fcache->src, fcache->argOidVect,
|
||||
nargs, FALSE);
|
||||
|
||||
foreach(qtl_item, queryTree_list)
|
||||
{
|
||||
Query *queryTree = lfirst(qtl_item);
|
||||
Plan *planTree = lfirst(planTree_list);
|
||||
Plan *planTree;
|
||||
EState *estate;
|
||||
|
||||
planTree = pg_plan_query(queryTree);
|
||||
|
||||
if (!nextes)
|
||||
nextes = (execution_state *) palloc(sizeof(execution_state));
|
||||
if (preves)
|
||||
|
|
@ -141,8 +142,6 @@ init_execution_state(FunctionCachePtr fcache,
|
|||
nextes->estate = estate;
|
||||
preves = nextes;
|
||||
nextes = (execution_state *) NULL;
|
||||
|
||||
planTree_list = lnext(planTree_list);
|
||||
}
|
||||
|
||||
return newes;
|
||||
|
|
@ -151,15 +150,12 @@ init_execution_state(FunctionCachePtr fcache,
|
|||
static TupleDesc
|
||||
postquel_start(execution_state *es)
|
||||
{
|
||||
#ifdef FUNC_UTIL_PATCH
|
||||
|
||||
/*
|
||||
* Do nothing for utility commands. (create, destroy...) DZ -
|
||||
* 30-8-1996
|
||||
*/
|
||||
if (es->qd->operation == CMD_UTILITY)
|
||||
return (TupleDesc) NULL;
|
||||
#endif
|
||||
return ExecutorStart(es->qd, es->estate);
|
||||
}
|
||||
|
||||
|
|
@ -168,12 +164,10 @@ postquel_getnext(execution_state *es)
|
|||
{
|
||||
int feature;
|
||||
|
||||
#ifdef FUNC_UTIL_PATCH
|
||||
if (es->qd->operation == CMD_UTILITY)
|
||||
{
|
||||
|
||||
/*
|
||||
* Process an utility command. (create, destroy...) DZ -
|
||||
* Process a utility command. (create, destroy...) DZ -
|
||||
* 30-8-1996
|
||||
*/
|
||||
ProcessUtility(es->qd->parsetree->utilityStmt, es->qd->dest);
|
||||
|
|
@ -181,7 +175,6 @@ postquel_getnext(execution_state *es)
|
|||
CommandCounterIncrement();
|
||||
return (TupleTableSlot *) NULL;
|
||||
}
|
||||
#endif
|
||||
|
||||
feature = (LAST_POSTQUEL_COMMAND(es)) ? EXEC_RETONE : EXEC_RUN;
|
||||
|
||||
|
|
@ -191,15 +184,12 @@ postquel_getnext(execution_state *es)
|
|||
static void
|
||||
postquel_end(execution_state *es)
|
||||
{
|
||||
#ifdef FUNC_UTIL_PATCH
|
||||
|
||||
/*
|
||||
* Do nothing for utility commands. (create, destroy...) DZ -
|
||||
* 30-8-1996
|
||||
*/
|
||||
if (es->qd->operation == CMD_UTILITY)
|
||||
return;
|
||||
#endif
|
||||
ExecutorEnd(es->qd, es->estate);
|
||||
}
|
||||
|
||||
|
|
|
|||
|
|
@ -3,7 +3,7 @@
|
|||
* spi.c
|
||||
* Server Programming Interface
|
||||
*
|
||||
* $Id: spi.c,v 1.44 1999/12/16 22:19:44 wieck Exp $
|
||||
* $Id: spi.c,v 1.45 2000/04/04 21:44:39 tgl Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
|
@ -622,7 +622,6 @@ _SPI_execute(char *src, int tcount, _SPI_plan *plan)
|
|||
List *queryTree_list;
|
||||
List *planTree_list;
|
||||
List *queryTree_list_item;
|
||||
List *ptlist;
|
||||
QueryDesc *qdesc;
|
||||
Query *queryTree;
|
||||
Plan *planTree;
|
||||
|
|
@ -645,18 +644,20 @@ _SPI_execute(char *src, int tcount, _SPI_plan *plan)
|
|||
nargs = plan->nargs;
|
||||
argtypes = plan->argtypes;
|
||||
}
|
||||
ptlist = planTree_list =
|
||||
pg_parse_and_plan(src, argtypes, nargs, &queryTree_list, None, FALSE);
|
||||
|
||||
queryTree_list = pg_parse_and_rewrite(src, argtypes, nargs, FALSE);
|
||||
|
||||
_SPI_current->qtlist = queryTree_list;
|
||||
|
||||
planTree_list = NIL;
|
||||
|
||||
foreach(queryTree_list_item, queryTree_list)
|
||||
{
|
||||
queryTree = (Query *) lfirst(queryTree_list_item);
|
||||
planTree = lfirst(planTree_list);
|
||||
planTree_list = lnext(planTree_list);
|
||||
islastquery = (planTree_list == NIL); /* assume lists are same
|
||||
* len */
|
||||
islastquery = (lnext(queryTree_list_item) == NIL);
|
||||
|
||||
planTree = pg_plan_query(queryTree);
|
||||
planTree_list = lappend(planTree_list, planTree);
|
||||
|
||||
if (queryTree->commandType == CMD_UTILITY)
|
||||
{
|
||||
|
|
@ -707,7 +708,7 @@ _SPI_execute(char *src, int tcount, _SPI_plan *plan)
|
|||
}
|
||||
|
||||
plan->qtlist = queryTree_list;
|
||||
plan->ptlist = ptlist;
|
||||
plan->ptlist = planTree_list;
|
||||
|
||||
return res;
|
||||
}
|
||||
|
|
|
|||
|
|
@ -8,7 +8,7 @@
|
|||
*
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/tcop/postgres.c,v 1.148 2000/03/23 23:16:48 momjian Exp $
|
||||
* $Header: /cvsroot/pgsql/src/backend/tcop/postgres.c,v 1.149 2000/04/04 21:44:39 tgl Exp $
|
||||
*
|
||||
* NOTES
|
||||
* this is the "main" module of the postgres backend and
|
||||
|
|
@ -377,22 +377,23 @@ ReadCommand(StringInfo inBuf)
|
|||
return result;
|
||||
}
|
||||
|
||||
|
||||
/*
|
||||
* Parse a query string and pass it through the rewriter.
|
||||
*
|
||||
* A list of Query nodes is returned, since the string might contain
|
||||
* multiple queries and/or the rewriter might expand one query to several.
|
||||
*/
|
||||
List *
|
||||
pg_parse_and_plan(char *query_string, /* string to execute */
|
||||
Oid *typev, /* argument types */
|
||||
int nargs, /* number of arguments */
|
||||
List **queryListP, /* returned pointer to the parse
|
||||
* trees */
|
||||
CommandDest dest, /* where results should go */
|
||||
bool aclOverride)
|
||||
pg_parse_and_rewrite(char *query_string, /* string to execute */
|
||||
Oid *typev, /* argument types */
|
||||
int nargs, /* number of arguments */
|
||||
bool aclOverride)
|
||||
{
|
||||
List *querytree_list = NIL;
|
||||
List *plan_list = NIL;
|
||||
List *querytree_list;
|
||||
List *querytree_list_item;
|
||||
Query *querytree;
|
||||
Plan *plan;
|
||||
List *new_list;
|
||||
List *rewritten;
|
||||
|
||||
if (DebugPrintQuery)
|
||||
{
|
||||
|
|
@ -448,15 +449,16 @@ pg_parse_and_plan(char *query_string, /* string to execute */
|
|||
else
|
||||
{
|
||||
/* rewrite regular queries */
|
||||
rewritten = QueryRewrite(querytree);
|
||||
List *rewritten = QueryRewrite(querytree);
|
||||
new_list = nconc(new_list, rewritten);
|
||||
}
|
||||
}
|
||||
|
||||
querytree_list = new_list;
|
||||
|
||||
/*
|
||||
* Override ACL checking if requested
|
||||
/* ----------------
|
||||
* (3) If ACL override is requested, mark queries for no ACL check.
|
||||
* ----------------
|
||||
*/
|
||||
if (aclOverride)
|
||||
{
|
||||
|
|
@ -503,87 +505,54 @@ pg_parse_and_plan(char *query_string, /* string to execute */
|
|||
}
|
||||
}
|
||||
|
||||
foreach(querytree_list_item, querytree_list)
|
||||
return querytree_list;
|
||||
}
|
||||
|
||||
|
||||
/* Generate a plan for a single query. */
|
||||
Plan *
|
||||
pg_plan_query(Query *querytree)
|
||||
{
|
||||
Plan *plan;
|
||||
|
||||
/* Utility commands have no plans. */
|
||||
if (querytree->commandType == CMD_UTILITY)
|
||||
return NULL;
|
||||
|
||||
if (ShowPlannerStats)
|
||||
ResetUsage();
|
||||
|
||||
/* call that optimizer */
|
||||
plan = planner(querytree);
|
||||
|
||||
if (ShowPlannerStats)
|
||||
{
|
||||
querytree = (Query *) lfirst(querytree_list_item);
|
||||
|
||||
/*
|
||||
* For each query that isn't a utility invocation, generate a
|
||||
* plan.
|
||||
*/
|
||||
|
||||
if (querytree->commandType != CMD_UTILITY)
|
||||
{
|
||||
|
||||
if (IsAbortedTransactionBlockState())
|
||||
{
|
||||
/* ----------------
|
||||
* the EndCommand() stuff is to tell the frontend
|
||||
* that the command ended. -cim 6/1/90
|
||||
* ----------------
|
||||
*/
|
||||
char *tag = "*ABORT STATE*";
|
||||
|
||||
EndCommand(tag, dest);
|
||||
|
||||
elog(NOTICE, "(transaction aborted): %s",
|
||||
"queries ignored until END");
|
||||
|
||||
if (queryListP)
|
||||
*queryListP = NIL;
|
||||
return NIL;
|
||||
}
|
||||
|
||||
if (ShowPlannerStats)
|
||||
ResetUsage();
|
||||
|
||||
/* call that optimizer */
|
||||
plan = planner(querytree);
|
||||
|
||||
if (ShowPlannerStats)
|
||||
{
|
||||
fprintf(stderr, "! Planner Stats:\n");
|
||||
ShowUsage();
|
||||
}
|
||||
plan_list = lappend(plan_list, plan);
|
||||
#ifdef INDEXSCAN_PATCH
|
||||
/* ----------------
|
||||
* Print plan if debugging.
|
||||
* This has been moved here to get debugging output
|
||||
* also for queries in functions. DZ - 27-8-1996
|
||||
* ----------------
|
||||
*/
|
||||
if (DebugPrintPlan || DebugPPrintPlan)
|
||||
{
|
||||
if (DebugPPrintPlan)
|
||||
{
|
||||
TPRINTF(TRACE_PRETTY_PLAN, "plan:");
|
||||
nodeDisplay(plan);
|
||||
}
|
||||
else
|
||||
{
|
||||
TPRINTF(TRACE_PLAN, "plan:");
|
||||
printf("\n%s\n\n", nodeToString(plan));
|
||||
}
|
||||
}
|
||||
#endif
|
||||
}
|
||||
|
||||
/*
|
||||
* If the command is an utility append a null plan. This is needed
|
||||
* to keep the plan_list aligned with the querytree_list or the
|
||||
* function executor will crash. DZ - 30-8-1996
|
||||
*/
|
||||
else
|
||||
plan_list = lappend(plan_list, NULL);
|
||||
fprintf(stderr, "! Planner Stats:\n");
|
||||
ShowUsage();
|
||||
}
|
||||
|
||||
if (queryListP)
|
||||
*queryListP = querytree_list;
|
||||
/* ----------------
|
||||
* Print plan if debugging.
|
||||
* ----------------
|
||||
*/
|
||||
if (DebugPrintPlan || DebugPPrintPlan)
|
||||
{
|
||||
if (DebugPPrintPlan)
|
||||
{
|
||||
TPRINTF(TRACE_PRETTY_PLAN, "plan:");
|
||||
nodeDisplay(plan);
|
||||
}
|
||||
else
|
||||
{
|
||||
TPRINTF(TRACE_PLAN, "plan:");
|
||||
printf("\n%s\n\n", nodeToString(plan));
|
||||
}
|
||||
}
|
||||
|
||||
return plan_list;
|
||||
return plan;
|
||||
}
|
||||
|
||||
|
||||
/* ----------------------------------------------------------------
|
||||
* pg_exec_query()
|
||||
*
|
||||
|
|
@ -620,39 +589,31 @@ pg_exec_query_dest(char *query_string, /* string to execute */
|
|||
* of superusers */
|
||||
{
|
||||
List *querytree_list;
|
||||
List *plan_list;
|
||||
Query *querytree;
|
||||
Plan *plan;
|
||||
int j;
|
||||
|
||||
/* plan the queries */
|
||||
plan_list = pg_parse_and_plan(query_string, NULL, 0,
|
||||
&querytree_list, dest, aclOverride);
|
||||
|
||||
/* if we got a cancel signal whilst planning, quit */
|
||||
if (QueryCancel)
|
||||
CancelQuery();
|
||||
|
||||
/* OK, do it to it! */
|
||||
/* parse and rewrite the queries */
|
||||
querytree_list = pg_parse_and_rewrite(query_string, NULL, 0,
|
||||
aclOverride);
|
||||
|
||||
/*
|
||||
* NOTE: we do not use "foreach" here because we want to be sure the
|
||||
* list pointers have been advanced before the query is executed. We
|
||||
* list pointer has been advanced before the query is executed. We
|
||||
* need to do that because VACUUM has a nasty little habit of doing
|
||||
* CommitTransactionCommand at startup, and that will release the
|
||||
* memory holding our parse/plan lists :-(. This needs a better
|
||||
* memory holding our parse list :-(. This needs a better
|
||||
* solution --- currently, the code will crash if someone submits
|
||||
* "vacuum; something-else" in a single query string. But memory
|
||||
* allocation needs redesigned anyway, so this will have to do for
|
||||
* now.
|
||||
*/
|
||||
|
||||
while (querytree_list)
|
||||
{
|
||||
querytree = (Query *) lfirst(querytree_list);
|
||||
Query *querytree = (Query *) lfirst(querytree_list);
|
||||
|
||||
querytree_list = lnext(querytree_list);
|
||||
plan = (Plan *) lfirst(plan_list);
|
||||
plan_list = lnext(plan_list);
|
||||
|
||||
/* if we got a cancel signal in parsing or prior command, quit */
|
||||
if (QueryCancel)
|
||||
CancelQuery();
|
||||
|
||||
if (querytree->commandType == CMD_UTILITY)
|
||||
{
|
||||
|
|
@ -668,42 +629,38 @@ pg_exec_query_dest(char *query_string, /* string to execute */
|
|||
else if (Verbose)
|
||||
TPRINTF(TRACE_VERBOSE, "ProcessUtility");
|
||||
|
||||
/*
|
||||
* We have to set query SnapShot in the case of FETCH or COPY TO.
|
||||
*/
|
||||
if (nodeTag(querytree->utilityStmt) == T_FetchStmt ||
|
||||
(nodeTag(querytree->utilityStmt) == T_CopyStmt &&
|
||||
((CopyStmt *)(querytree->utilityStmt))->direction != FROM))
|
||||
SetQuerySnapshot();
|
||||
ProcessUtility(querytree->utilityStmt, dest);
|
||||
}
|
||||
else
|
||||
{
|
||||
#ifdef INDEXSCAN_PATCH
|
||||
Plan *plan;
|
||||
int j;
|
||||
|
||||
/*
|
||||
* Print moved in pg_parse_and_plan. DZ - 27-8-1996
|
||||
*/
|
||||
#else
|
||||
/* ----------------
|
||||
* print plan if debugging
|
||||
* ----------------
|
||||
*/
|
||||
if (DebugPrintPlan || DebugPPrintPlan)
|
||||
/* If aborted transaction, quit now */
|
||||
if (IsAbortedTransactionBlockState())
|
||||
{
|
||||
if (DebugPPrintPlan)
|
||||
{
|
||||
TPRINTF(TRACE_PRETTY_PLAN, "plan:");
|
||||
nodeDisplay(plan);
|
||||
}
|
||||
else
|
||||
{
|
||||
TPRINTF(TRACE_PLAN, "plan:");
|
||||
printf("\n%s\n\n", nodeToString(plan));
|
||||
}
|
||||
}
|
||||
#endif
|
||||
/* ----------------
|
||||
* the EndCommand() stuff is to tell the frontend
|
||||
* that the command ended. -cim 6/1/90
|
||||
* ----------------
|
||||
*/
|
||||
char *tag = "*ABORT STATE*";
|
||||
|
||||
elog(NOTICE, "current transaction is aborted, "
|
||||
"queries ignored until end of transaction block");
|
||||
|
||||
EndCommand(tag, dest);
|
||||
|
||||
break;
|
||||
}
|
||||
|
||||
plan = pg_plan_query(querytree);
|
||||
|
||||
/* if we got a cancel signal whilst planning, quit */
|
||||
if (QueryCancel)
|
||||
CancelQuery();
|
||||
|
||||
/* Initialize snapshot state for query */
|
||||
SetQuerySnapshot();
|
||||
|
||||
/*
|
||||
|
|
@ -1505,7 +1462,7 @@ PostgresMain(int argc, char *argv[], int real_argc, char *real_argv[])
|
|||
if (!IsUnderPostmaster)
|
||||
{
|
||||
puts("\nPOSTGRES backend interactive interface ");
|
||||
puts("$Revision: 1.148 $ $Date: 2000/03/23 23:16:48 $\n");
|
||||
puts("$Revision: 1.149 $ $Date: 2000/04/04 21:44:39 $\n");
|
||||
}
|
||||
|
||||
/*
|
||||
|
|
|
|||
|
|
@ -10,7 +10,7 @@
|
|||
*
|
||||
*
|
||||
* IDENTIFICATION
|
||||
* $Header: /cvsroot/pgsql/src/backend/tcop/utility.c,v 1.84 2000/02/19 02:29:07 tgl Exp $
|
||||
* $Header: /cvsroot/pgsql/src/backend/tcop/utility.c,v 1.85 2000/04/04 21:44:40 tgl Exp $
|
||||
*
|
||||
*-------------------------------------------------------------------------
|
||||
*/
|
||||
|
|
@ -136,6 +136,8 @@ ProcessUtility(Node *parsetree,
|
|||
PS_SET_STATUS(commandTag = (stmt->ismove) ? "MOVE" : "FETCH");
|
||||
CHECK_IF_ABORTED();
|
||||
|
||||
SetQuerySnapshot();
|
||||
|
||||
forward = (bool) (stmt->direction == FORWARD);
|
||||
|
||||
/*
|
||||
|
|
@ -255,6 +257,9 @@ ProcessUtility(Node *parsetree,
|
|||
PS_SET_STATUS(commandTag = "COPY");
|
||||
CHECK_IF_ABORTED();
|
||||
|
||||
if (stmt->direction != FROM)
|
||||
SetQuerySnapshot();
|
||||
|
||||
DoCopy(stmt->relname,
|
||||
stmt->binary,
|
||||
stmt->oids,
|
||||
|
|
|
|||
|
|
@ -7,7 +7,7 @@
|
|||
* Portions Copyright (c) 1996-2000, PostgreSQL, Inc
|
||||
* Portions Copyright (c) 1994, Regents of the University of California
|
||||
*
|
||||
* $Id: tcopprot.h,v 1.25 2000/02/20 14:28:28 petere Exp $
|
||||
* $Id: tcopprot.h,v 1.26 2000/04/04 21:44:37 tgl Exp $
|
||||
*
|
||||
* OLD COMMENTS
|
||||
* This file was created so that other c files could get the two
|
||||
|
|
@ -29,12 +29,15 @@ extern bool InError;
|
|||
extern bool ExitAfterAbort;
|
||||
|
||||
#ifndef BOOTSTRAP_INCLUDE
|
||||
extern List *pg_parse_and_plan(char *query_string, Oid *typev, int nargs,
|
||||
List **queryListP, CommandDest dest,
|
||||
bool aclOverride);
|
||||
|
||||
extern List *pg_parse_and_rewrite(char *query_string,
|
||||
Oid *typev, int nargs,
|
||||
bool aclOverride);
|
||||
extern Plan *pg_plan_query(Query *querytree);
|
||||
extern void pg_exec_query_acl_override(char *query_string);
|
||||
extern void
|
||||
pg_exec_query_dest(char *query_string, CommandDest dest, bool aclOverride);
|
||||
extern void pg_exec_query_dest(char *query_string,
|
||||
CommandDest dest,
|
||||
bool aclOverride);
|
||||
|
||||
#endif /* BOOTSTRAP_INCLUDE */
|
||||
|
||||
|
|
|
|||
Loading…
Reference in New Issue