]> granicus.if.org Git - postgresql/commit
Fix up Perl-to-Postgres datatype conversions in pl/perl.
authorTom Lane <tgl@sss.pgh.pa.us>
Thu, 13 Oct 2011 22:02:43 +0000 (18:02 -0400)
committerTom Lane <tgl@sss.pgh.pa.us>
Thu, 13 Oct 2011 22:04:47 +0000 (18:04 -0400)
commit7c64c9f6b767b84597d69cfa2ae03d9a9655ec75
treeaa4670e4099b2ba8516d1e6c9fa00dd57793963d
parenta6c96534f0dee5c1faefadb5463c78a4d8c58660
Fix up Perl-to-Postgres datatype conversions in pl/perl.

This patch restores the pre-9.1 behavior that pl/perl functions returning
VOID ignore the result value of their last Perl statement.  9.1.0
unintentionally threw an error if the last statement returned a reference,
as reported by Amit Khandekar.

Also, make sure it works to return a string value for a composite type,
so long as the string meets the type's input format.  We already allowed
the equivalent behavior for arrays, so it seems inconsistent to not allow
it for composites.

In addition, ensure we throw errors for attempts to return arrays or hashes
when the function's declared result type is not an array or composite type,
respectively.  Pre-9.1 versions rather uselessly returned strings like
ARRAY(0x221a9a0) or HASH(0x221aa90), while 9.1.0 threw an error for the
hash case and returned a garbage value for the array case.

Also, clean up assorted grotty coding in Perl array conversion, including
use of a session-lifespan memory context to accumulate the array value
(resulting in session-lifespan memory leak on error), failure to apply the
declared typmod if any, and failure to detect some cases of non-rectangular
multi-dimensional arrays.

Alex Hunsaker and Tom Lane
src/pl/plperl/expected/plperl.out
src/pl/plperl/expected/plperl_array.out
src/pl/plperl/plperl.c
src/pl/plperl/sql/plperl.sql
src/pl/plperl/sql/plperl_array.sql