aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/backend/executor/spi.c14
-rw-r--r--src/pl/plpgsql/src/expected/plpgsql_call.out20
-rw-r--r--src/pl/plpgsql/src/sql/plpgsql_call.sql17
3 files changed, 47 insertions, 4 deletions
diff --git a/src/backend/executor/spi.c b/src/backend/executor/spi.c
index 77899d81918..2bf84ad98e3 100644
--- a/src/backend/executor/spi.c
+++ b/src/backend/executor/spi.c
@@ -334,13 +334,13 @@ _SPI_rollback(bool chain)
{
MemoryContext oldcontext = CurrentMemoryContext;
- /* see under SPI_commit() */
+ /* see comments in _SPI_commit() */
if (_SPI_current->atomic)
ereport(ERROR,
(errcode(ERRCODE_INVALID_TRANSACTION_TERMINATION),
errmsg("invalid transaction termination")));
- /* see under SPI_commit() */
+ /* see comments in _SPI_commit() */
if (IsSubTransaction())
ereport(ERROR,
(errcode(ERRCODE_INVALID_TRANSACTION_TERMINATION),
@@ -593,8 +593,11 @@ SPI_inside_nonatomic_context(void)
{
if (_SPI_current == NULL)
return false; /* not in any SPI context at all */
+ /* these tests must match _SPI_commit's opinion of what's atomic: */
if (_SPI_current->atomic)
return false; /* it's atomic (ie function not procedure) */
+ if (IsSubTransaction())
+ return false; /* if within subtransaction, it's atomic */
return true;
}
@@ -2418,9 +2421,12 @@ _SPI_execute_plan(SPIPlanPtr plan, const SPIExecuteOptions *options,
/*
* We allow nonatomic behavior only if options->allow_nonatomic is set
- * *and* the SPI_OPT_NONATOMIC flag was given when connecting.
+ * *and* the SPI_OPT_NONATOMIC flag was given when connecting and we are
+ * not inside a subtransaction. The latter two tests match whether
+ * _SPI_commit() would allow a commit; see there for more commentary.
*/
- allow_nonatomic = options->allow_nonatomic && !_SPI_current->atomic;
+ allow_nonatomic = options->allow_nonatomic &&
+ !_SPI_current->atomic && !IsSubTransaction();
/*
* Setup error traceback support for ereport()
diff --git a/src/pl/plpgsql/src/expected/plpgsql_call.out b/src/pl/plpgsql/src/expected/plpgsql_call.out
index e1b377c1359..fb5afaf1580 100644
--- a/src/pl/plpgsql/src/expected/plpgsql_call.out
+++ b/src/pl/plpgsql/src/expected/plpgsql_call.out
@@ -585,6 +585,26 @@ NOTICE: f_get_x(1)
NOTICE: f_print_x(1)
NOTICE: f_get_x(2)
NOTICE: f_print_x(2)
+-- test in non-atomic context, except exception block is locally atomic
+DO $$
+BEGIN
+ BEGIN
+ UPDATE t_test SET x = x + 1;
+ RAISE NOTICE 'f_get_x(%)', f_get_x();
+ CALL f_print_x(f_get_x());
+ UPDATE t_test SET x = x + 1;
+ RAISE NOTICE 'f_get_x(%)', f_get_x();
+ CALL f_print_x(f_get_x());
+ EXCEPTION WHEN division_by_zero THEN
+ RAISE NOTICE '%', SQLERRM;
+ END;
+ ROLLBACK;
+END
+$$;
+NOTICE: f_get_x(1)
+NOTICE: f_print_x(1)
+NOTICE: f_get_x(2)
+NOTICE: f_print_x(2)
-- test in atomic context
BEGIN;
DO $$
diff --git a/src/pl/plpgsql/src/sql/plpgsql_call.sql b/src/pl/plpgsql/src/sql/plpgsql_call.sql
index c1e301e04a0..61eabb261a3 100644
--- a/src/pl/plpgsql/src/sql/plpgsql_call.sql
+++ b/src/pl/plpgsql/src/sql/plpgsql_call.sql
@@ -545,6 +545,23 @@ BEGIN
END
$$;
+-- test in non-atomic context, except exception block is locally atomic
+DO $$
+BEGIN
+ BEGIN
+ UPDATE t_test SET x = x + 1;
+ RAISE NOTICE 'f_get_x(%)', f_get_x();
+ CALL f_print_x(f_get_x());
+ UPDATE t_test SET x = x + 1;
+ RAISE NOTICE 'f_get_x(%)', f_get_x();
+ CALL f_print_x(f_get_x());
+ EXCEPTION WHEN division_by_zero THEN
+ RAISE NOTICE '%', SQLERRM;
+ END;
+ ROLLBACK;
+END
+$$;
+
-- test in atomic context
BEGIN;