diff --git a/src/backend/utils/adt/ruleutils.c b/src/backend/utils/adt/ruleutils.c index e8e227c48a0..9c5fea78860 100644 --- a/src/backend/utils/adt/ruleutils.c +++ b/src/backend/utils/adt/ruleutils.c @@ -8587,7 +8587,6 @@ isSimpleNode(Node *node, Node *parentNode, int prettyFlags) case T_CoalesceExpr: case T_MinMaxExpr: case T_SQLValueFunction: - case T_XmlExpr: case T_NextValueExpr: case T_NullIfExpr: case T_Aggref: @@ -8686,6 +8685,17 @@ isSimpleNode(Node *node, Node *parentNode, int prettyFlags) } /* FALLTHROUGH */ + case T_XmlExpr: + + /* + * Function-like (name(..)), except "x IS DOCUMENT", which is a + * postfix test like IS NULL. (The IsA check is needed because + * T_OpExpr falls through to here.) + */ + if (IsA(node, XmlExpr) && ((XmlExpr *) node)->op != IS_DOCUMENT) + return true; + /* FALLTHROUGH */ + case T_SubLink: case T_NullTest: case T_BooleanTest: @@ -8710,13 +8720,14 @@ isSimpleNode(Node *node, Node *parentNode, int prettyFlags) case T_RowExpr: /* other separators */ case T_CoalesceExpr: /* own parentheses */ case T_MinMaxExpr: /* own parentheses */ - case T_XmlExpr: /* own parentheses */ case T_NullIfExpr: /* other separators */ case T_Aggref: /* own parentheses */ case T_GroupingFunc: /* own parentheses */ case T_WindowFunc: /* own parentheses */ case T_CaseExpr: /* other separators */ return true; + case T_XmlExpr: /* own parentheses, except IS DOCUMENT */ + return ((XmlExpr *) parentNode)->op != IS_DOCUMENT; default: return false; } @@ -8762,7 +8773,6 @@ isSimpleNode(Node *node, Node *parentNode, int prettyFlags) case T_RowExpr: /* other separators */ case T_CoalesceExpr: /* own parentheses */ case T_MinMaxExpr: /* own parentheses */ - case T_XmlExpr: /* own parentheses */ case T_NullIfExpr: /* other separators */ case T_Aggref: /* own parentheses */ case T_GroupingFunc: /* own parentheses */ @@ -8770,6 +8780,8 @@ isSimpleNode(Node *node, Node *parentNode, int prettyFlags) case T_CaseExpr: /* other separators */ case T_JsonExpr: /* own parentheses */ return true; + case T_XmlExpr: /* own parentheses, except IS DOCUMENT */ + return ((XmlExpr *) parentNode)->op != IS_DOCUMENT; default: return false; } @@ -9807,6 +9819,9 @@ get_rule_expr(Node *node, deparse_context *context, appendStringInfoString(buf, "XMLSERIALIZE("); break; case IS_DOCUMENT: + /* postfix test, like IS NULL: not self-delimiting */ + if (!PRETTY_PAREN(context)) + appendStringInfoChar(buf, '('); break; } if (xexpr->op == IS_XMLPARSE || xexpr->op == IS_XMLSERIALIZE) @@ -9914,7 +9929,9 @@ get_rule_expr(Node *node, deparse_context *context, } break; case IS_DOCUMENT: - get_rule_expr_paren((Node *) xexpr->args, context, false, node); + Assert(list_length(xexpr->args) == 1); + get_rule_expr_paren((Node *) linitial(xexpr->args), + context, false, node); break; } } @@ -9930,7 +9947,11 @@ get_rule_expr(Node *node, deparse_context *context, } if (xexpr->op == IS_DOCUMENT) + { appendStringInfoString(buf, " IS DOCUMENT"); + if (!PRETTY_PAREN(context)) + appendStringInfoChar(buf, ')'); + } else appendStringInfoChar(buf, ')'); } @@ -10418,10 +10439,12 @@ looks_like_function(Node *node) case T_CoalesceExpr: case T_MinMaxExpr: case T_SQLValueFunction: - case T_XmlExpr: case T_JsonExpr: /* these are all accepted by func_expr_common_subexpr */ return true; + case T_XmlExpr: + /* all but IS DOCUMENT, which is a postfix test */ + return ((XmlExpr *) node)->op != IS_DOCUMENT; default: break; } diff --git a/src/test/regress/expected/create_view.out b/src/test/regress/expected/create_view.out index 5c2c8b051ab..cc4c4aeea26 100644 --- a/src/test/regress/expected/create_view.out +++ b/src/test/regress/expected/create_view.out @@ -2256,6 +2256,23 @@ select pg_get_viewdef('tt26v', true); FROM ( VALUES (1,2,3)) v(x, y, z); (1 row) +-- xml IS DOCUMENT needs to be treated specially +create operator || + (function = xmlconcat2, leftarg=xml, rightarg=xml); +create view tt261v as +select x is document as c1, + (x || x) is document as c2, + f = (x is document) as c3 +from (values(false,null::xml)) v(f,x); +select pg_get_viewdef('tt261v', true); + pg_get_viewdef +---------------------------------------------- + SELECT x IS DOCUMENT AS c1, + + (x || x) IS DOCUMENT AS c2, + + f = (x IS DOCUMENT) AS c3 + + FROM ( VALUES (false,NULL::xml)) v(f, x); +(1 row) + -- test restriction on non-system view expansion. create table tt27v_tbl (a int); create view tt27v as select a from tt27v_tbl; @@ -2302,7 +2319,7 @@ drop cascades to view aliased_view_2 drop cascades to view aliased_view_3 drop cascades to view aliased_view_4 DROP SCHEMA testviewschm2 CASCADE; -NOTICE: drop cascades to 80 other objects +NOTICE: drop cascades to 82 other objects DETAIL: drop cascades to table t1 drop cascades to view temporal1 drop cascades to view temporal2 @@ -2381,5 +2398,7 @@ drop cascades to view tt23v drop cascades to view tt24v drop cascades to view tt25v drop cascades to view tt26v +drop cascades to operator ||(xml,xml) +drop cascades to view tt261v drop cascades to table tt27v_tbl drop cascades to view tt27v diff --git a/src/test/regress/sql/create_view.sql b/src/test/regress/sql/create_view.sql index 2509e4545a3..316b60ea28b 100644 --- a/src/test/regress/sql/create_view.sql +++ b/src/test/regress/sql/create_view.sql @@ -832,6 +832,16 @@ select x + y + z as c1, from (values(1,2,3)) v(x,y,z); select pg_get_viewdef('tt26v', true); +-- xml IS DOCUMENT needs to be treated specially +create operator || + (function = xmlconcat2, leftarg=xml, rightarg=xml); +create view tt261v as +select x is document as c1, + (x || x) is document as c2, + f = (x is document) as c3 +from (values(false,null::xml)) v(f,x); +select pg_get_viewdef('tt261v', true); + -- test restriction on non-system view expansion. create table tt27v_tbl (a int); create view tt27v as select a from tt27v_tbl;