plpy_typeio.c File Reference

#include "postgres.h"
#include "access/htup_details.h"
#include "catalog/pg_type.h"
#include "funcapi.h"
#include "mb/pg_wchar.h"
#include "miscadmin.h"
#include "plpy_elog.h"
#include "plpy_main.h"
#include "plpy_typeio.h"
#include "plpy_util.h"
#include "utils/array.h"
#include "utils/builtins.h"
#include "utils/fmgroids.h"
#include "utils/lsyscache.h"
#include "utils/memutils.h"

Include dependency graph for plpy_typeio.c:

Go to the source code of this file.

Functions
static PyObject *	PLyBool_FromBool (PLyDatumToOb *arg, Datum d)
static PyObject *	PLyFloat_FromFloat4 (PLyDatumToOb *arg, Datum d)
static PyObject *	PLyFloat_FromFloat8 (PLyDatumToOb *arg, Datum d)
static PyObject *	PLyDecimal_FromNumeric (PLyDatumToOb *arg, Datum d)
static PyObject *	PLyLong_FromInt16 (PLyDatumToOb *arg, Datum d)
static PyObject *	PLyLong_FromInt32 (PLyDatumToOb *arg, Datum d)
static PyObject *	PLyLong_FromInt64 (PLyDatumToOb *arg, Datum d)
static PyObject *	PLyLong_FromOid (PLyDatumToOb *arg, Datum d)
static PyObject *	PLyBytes_FromBytea (PLyDatumToOb *arg, Datum d)
static PyObject *	PLyUnicode_FromScalar (PLyDatumToOb *arg, Datum d)
static PyObject *	PLyObject_FromTransform (PLyDatumToOb *arg, Datum d)
static PyObject *	PLyList_FromArray (PLyDatumToOb *arg, Datum d)
static PyObject *	PLyList_FromArray_recurse (PLyDatumToOb *elm, int *dims, int ndim, int dim, char **dataptr_p, bits8 **bitmap_p, int *bitmask_p)
static PyObject *	PLyDict_FromComposite (PLyDatumToOb *arg, Datum d)
static PyObject *	PLyDict_FromTuple (PLyDatumToOb *arg, HeapTuple tuple, TupleDesc desc, bool include_generated)
static Datum	PLyObject_ToBool (PLyObToDatum *arg, PyObject *plrv, bool *isnull, bool inarray)
static Datum	PLyObject_ToBytea (PLyObToDatum *arg, PyObject *plrv, bool *isnull, bool inarray)
static Datum	PLyObject_ToComposite (PLyObToDatum *arg, PyObject *plrv, bool *isnull, bool inarray)
static Datum	PLyObject_ToScalar (PLyObToDatum *arg, PyObject *plrv, bool *isnull, bool inarray)
static Datum	PLyObject_ToDomain (PLyObToDatum *arg, PyObject *plrv, bool *isnull, bool inarray)
static Datum	PLyObject_ToTransform (PLyObToDatum *arg, PyObject *plrv, bool *isnull, bool inarray)
static Datum	PLySequence_ToArray (PLyObToDatum *arg, PyObject *plrv, bool *isnull, bool inarray)
static void	PLySequence_ToArray_recurse (PyObject *obj, ArrayBuildState **astatep, int *ndims, int *dims, int cur_depth, PLyObToDatum *elm, Oid elmbasetype)
static Datum	PLyUnicode_ToComposite (PLyObToDatum *arg, PyObject *string, bool inarray)
static Datum	PLyMapping_ToComposite (PLyObToDatum *arg, TupleDesc desc, PyObject *mapping)
static Datum	PLySequence_ToComposite (PLyObToDatum *arg, TupleDesc desc, PyObject *sequence)
static Datum	PLyGenericObject_ToComposite (PLyObToDatum *arg, TupleDesc desc, PyObject *object, bool inarray)
PyObject *	PLy_input_convert (PLyDatumToOb *arg, Datum val)
Datum	PLy_output_convert (PLyObToDatum *arg, PyObject *val, bool *isnull)
PyObject *	PLy_input_from_tuple (PLyDatumToOb *arg, HeapTuple tuple, TupleDesc desc, bool include_generated)
void	PLy_input_setup_tuple (PLyDatumToOb *arg, TupleDesc desc, PLyProcedure *proc)
void	PLy_output_setup_tuple (PLyObToDatum *arg, TupleDesc desc, PLyProcedure *proc)
void	PLy_output_setup_record (PLyObToDatum *arg, TupleDesc desc, PLyProcedure *proc)
void	PLy_output_setup_func (PLyObToDatum *arg, MemoryContext arg_mcxt, Oid typeOid, int32 typmod, PLyProcedure *proc)
void	PLy_input_setup_func (PLyDatumToOb *arg, MemoryContext arg_mcxt, Oid typeOid, int32 typmod, PLyProcedure *proc)
char *	PLyObject_AsString (PyObject *plrv)

Function Documentation

PLy_input_convert()

PyObject * PLy_input_convert	(	PLyDatumToOb *	arg,
		Datum	val
	)

Definition at line 81 of file plpy_typeio.c.

{
    PyObject   *result;
    PLyExecutionContext *exec_ctx = PLy_current_execution_context();
    MemoryContext scratch_context = PLy_get_scratch_context(exec_ctx);
    MemoryContext oldcontext;
 
    /*
     * Do the work in the scratch context to avoid leaking memory from the
     * datatype output function calls.  (The individual PLyDatumToObFunc
     * functions can't reset the scratch context, because they recurse and an
     * inner one might clobber data an outer one still needs.  So we do it
     * once at the outermost recursion level.)
     *
     * We reset the scratch context before, not after, each conversion cycle.
     * This way we aren't on the hook to release a Python refcount on the
     * result object in case MemoryContextReset throws an error.
     */
    MemoryContextReset(scratch_context);
 
    oldcontext = MemoryContextSwitchTo(scratch_context);
 
    result = arg->func(arg, val);
 
    MemoryContextSwitchTo(oldcontext);
 
    return result;
}

References arg, fb(), MemoryContextReset(), MemoryContextSwitchTo(), PLy_current_execution_context(), PLy_get_scratch_context(), and val.

Referenced by PLy_function_build_args().

PLy_input_from_tuple()

PyObject * PLy_input_from_tuple	(	PLyDatumToOb *	arg,
		HeapTuple	tuple,
		TupleDesc	desc,
		bool	include_generated
	)

Definition at line 134 of file plpy_typeio.c.

{
    PyObject   *dict;
    PLyExecutionContext *exec_ctx = PLy_current_execution_context();
    MemoryContext scratch_context = PLy_get_scratch_context(exec_ctx);
    MemoryContext oldcontext;
 
    /*
     * As in PLy_input_convert, do the work in the scratch context.
     */
    MemoryContextReset(scratch_context);
 
    oldcontext = MemoryContextSwitchTo(scratch_context);
 
    dict = PLyDict_FromTuple(arg, tuple, desc, include_generated);
 
    MemoryContextSwitchTo(oldcontext);
 
    return dict;
}

References arg, fb(), MemoryContextReset(), MemoryContextSwitchTo(), PLy_current_execution_context(), PLy_get_scratch_context(), and PLyDict_FromTuple().

Referenced by PLy_cursor_fetch(), PLy_cursor_iternext(), PLy_spi_execute_fetch_result(), and PLy_trigger_build_args().

PLy_input_setup_func()

void PLy_input_setup_func	(	PLyDatumToOb *	arg,
		MemoryContext	arg_mcxt,
		Oid	typeOid,
		int32	typmod,
		PLyProcedure *	proc
	)

Definition at line 418 of file plpy_typeio.c.

{
    TypeCacheEntry *typentry;
    char        typtype;
    Oid         trfuncid;
    Oid         typoutput;
    bool        typisvarlena;
 
    /* Since this is recursive, it could theoretically be driven to overflow */
    check_stack_depth();
 
    arg->typoid = typeOid;
    arg->typmod = typmod;
    arg->mcxt = arg_mcxt;
 
    /*
     * Fetch typcache entry for the target type, asking for whatever info
     * we'll need later.  RECORD is a special case: just treat it as composite
     * without bothering with the typcache entry.
     */
    if (typeOid != RECORDOID)
    {
        typentry = lookup_type_cache(typeOid, TYPECACHE_DOMAIN_BASE_INFO);
        typtype = typentry->typtype;
        arg->typbyval = typentry->typbyval;
        arg->typlen = typentry->typlen;
        arg->typalign = typentry->typalign;
    }
    else
    {
        typentry = NULL;
        typtype = TYPTYPE_COMPOSITE;
        /* hard-wired knowledge about type RECORD: */
        arg->typbyval = false;
        arg->typlen = -1;
        arg->typalign = TYPALIGN_DOUBLE;
    }
 
    /*
     * Choose conversion method.  Note that transform functions are checked
     * for composite and scalar types, but not for arrays or domains.  This is
     * somewhat historical, but we'd have a problem allowing them on domains,
     * since we drill down through all levels of a domain nest without looking
     * at the intermediate levels at all.
     */
    if (typtype == TYPTYPE_DOMAIN)
    {
        /* Domain --- we don't care, just recurse down to the base type */
        PLy_input_setup_func(arg, arg_mcxt,
                             typentry->domainBaseType,
                             typentry->domainBaseTypmod,
                             proc);
    }
    else if (typentry &&
             IsTrueArrayType(typentry))
    {
        /* Standard array */
        arg->func = PLyList_FromArray;
        /* Recursively set up conversion info for the element type */
        arg->array.elm = (PLyDatumToOb *)
            MemoryContextAllocZero(arg_mcxt, sizeof(PLyDatumToOb));
        PLy_input_setup_func(arg->array.elm, arg_mcxt,
                             typentry->typelem, typmod,
                             proc);
    }
    else if ((trfuncid = get_transform_fromsql(typeOid,
                                               proc->langid,
                                               proc->trftypes)))
    {
        arg->func = PLyObject_FromTransform;
        fmgr_info_cxt(trfuncid, &arg->transform.typtransform, arg_mcxt);
    }
    else if (typtype == TYPTYPE_COMPOSITE)
    {
        /* Named composite type, or RECORD */
        arg->func = PLyDict_FromComposite;
        /* We'll set up the per-field data later */
        arg->tuple.recdesc = NULL;
        arg->tuple.typentry = typentry;
        arg->tuple.tupdescid = INVALID_TUPLEDESC_IDENTIFIER;
        arg->tuple.atts = NULL;
        arg->tuple.natts = 0;
    }
    else
    {
        /* Scalar type, but we have a couple of special cases */
        switch (typeOid)
        {
            case BOOLOID:
                arg->func = PLyBool_FromBool;
                break;
            case FLOAT4OID:
                arg->func = PLyFloat_FromFloat4;
                break;
            case FLOAT8OID:
                arg->func = PLyFloat_FromFloat8;
                break;
            case NUMERICOID:
                arg->func = PLyDecimal_FromNumeric;
                break;
            case INT2OID:
                arg->func = PLyLong_FromInt16;
                break;
            case INT4OID:
                arg->func = PLyLong_FromInt32;
                break;
            case INT8OID:
                arg->func = PLyLong_FromInt64;
                break;
            case OIDOID:
                arg->func = PLyLong_FromOid;
                break;
            case BYTEAOID:
                arg->func = PLyBytes_FromBytea;
                break;
            default:
                arg->func = PLyUnicode_FromScalar;
                getTypeOutputInfo(typeOid, &typoutput, &typisvarlena);
                fmgr_info_cxt(typoutput, &arg->scalar.typfunc, arg_mcxt);
                break;
        }
    }
}

References arg, check_stack_depth(), TypeCacheEntry::domainBaseType, TypeCacheEntry::domainBaseTypmod, fb(), fmgr_info_cxt(), get_transform_fromsql(), getTypeOutputInfo(), INVALID_TUPLEDESC_IDENTIFIER, PLyProcedure::langid, lookup_type_cache(), MemoryContextAllocZero(), PLy_input_setup_func(), PLyBool_FromBool(), PLyBytes_FromBytea(), PLyDecimal_FromNumeric(), PLyDict_FromComposite(), PLyFloat_FromFloat4(), PLyFloat_FromFloat8(), PLyList_FromArray(), PLyLong_FromInt16(), PLyLong_FromInt32(), PLyLong_FromInt64(), PLyLong_FromOid(), PLyObject_FromTransform(), PLyUnicode_FromScalar(), PLyProcedure::trftypes, TypeCacheEntry::typalign, TypeCacheEntry::typbyval, TYPECACHE_DOMAIN_BASE_INFO, TypeCacheEntry::typelem, TypeCacheEntry::typlen, and TypeCacheEntry::typtype.

Referenced by PLy_cursor_plan(), PLy_cursor_query(), PLy_exec_trigger(), PLy_input_setup_func(), PLy_input_setup_tuple(), PLy_procedure_create(), and PLy_spi_execute_fetch_result().

PLy_input_setup_tuple()

void PLy_input_setup_tuple	(	PLyDatumToOb *	arg,
		TupleDesc	desc,
		PLyProcedure *	proc
	)

Definition at line 165 of file plpy_typeio.c.

{
    int         i;
 
    /* We should be working on a previously-set-up struct */
    Assert(arg->func == PLyDict_FromComposite);
 
    /* Save pointer to tupdesc, but only if this is an anonymous record type */
    if (arg->typoid == RECORDOID && arg->typmod < 0)
        arg->tuple.recdesc = desc;
 
    /* (Re)allocate atts array as needed */
    if (arg->tuple.natts != desc->natts)
    {
        if (arg->tuple.atts)
            pfree(arg->tuple.atts);
        arg->tuple.natts = desc->natts;
        arg->tuple.atts = (PLyDatumToOb *)
            MemoryContextAllocZero(arg->mcxt,
                                   desc->natts * sizeof(PLyDatumToOb));
    }
 
    /* Fill the atts entries, except for dropped columns */
    for (i = 0; i < desc->natts; i++)
    {
        Form_pg_attribute attr = TupleDescAttr(desc, i);
        PLyDatumToOb *att = &arg->tuple.atts[i];
 
        if (attr->attisdropped)
            continue;
 
        if (att->typoid == attr->atttypid && att->typmod == attr->atttypmod)
            continue;           /* already set up this entry */
 
        PLy_input_setup_func(att, arg->mcxt,
                             attr->atttypid, attr->atttypmod,
                             proc);
    }
}

References arg, Assert, PLyTupleToOb::atts, fb(), i, MemoryContextAllocZero(), TupleDescData::natts, pfree(), PLy_input_setup_func(), PLyDict_FromComposite(), PLyDatumToOb::tuple, and TupleDescAttr().

Referenced by PLy_cursor_fetch(), PLy_cursor_iternext(), PLy_exec_trigger(), PLy_spi_execute_fetch_result(), and PLyDict_FromComposite().

PLy_output_convert()

Datum PLy_output_convert	(	PLyObToDatum *	arg,
		PyObject *	val,
		bool *	isnull
	)

Definition at line 120 of file plpy_typeio.c.

{
    /* at outer level, we are not considering an array element */
    return arg->func(arg, val, isnull, false);
}

References arg, and val.

Referenced by PLy_cursor_plan(), PLy_exec_function(), PLy_modify_tuple(), and PLy_spi_execute_plan().

PLy_output_setup_func()

void PLy_output_setup_func	(	PLyObToDatum *	arg,
		MemoryContext	arg_mcxt,
		Oid	typeOid,
		int32	typmod,
		PLyProcedure *	proc
	)

Definition at line 296 of file plpy_typeio.c.

{
    TypeCacheEntry *typentry;
    char        typtype;
    Oid         trfuncid;
    Oid         typinput;
 
    /* Since this is recursive, it could theoretically be driven to overflow */
    check_stack_depth();
 
    arg->typoid = typeOid;
    arg->typmod = typmod;
    arg->mcxt = arg_mcxt;
 
    /*
     * Fetch typcache entry for the target type, asking for whatever info
     * we'll need later.  RECORD is a special case: just treat it as composite
     * without bothering with the typcache entry.
     */
    if (typeOid != RECORDOID)
    {
        typentry = lookup_type_cache(typeOid, TYPECACHE_DOMAIN_BASE_INFO);
        typtype = typentry->typtype;
        arg->typbyval = typentry->typbyval;
        arg->typlen = typentry->typlen;
        arg->typalign = typentry->typalign;
    }
    else
    {
        typentry = NULL;
        typtype = TYPTYPE_COMPOSITE;
        /* hard-wired knowledge about type RECORD: */
        arg->typbyval = false;
        arg->typlen = -1;
        arg->typalign = TYPALIGN_DOUBLE;
    }
 
    /*
     * Choose conversion method.  Note that transform functions are checked
     * for composite and scalar types, but not for arrays or domains.  This is
     * somewhat historical, but we'd have a problem allowing them on domains,
     * since we drill down through all levels of a domain nest without looking
     * at the intermediate levels at all.
     */
    if (typtype == TYPTYPE_DOMAIN)
    {
        /* Domain */
        arg->func = PLyObject_ToDomain;
        arg->domain.domain_info = NULL;
        /* Recursively set up conversion info for the element type */
        arg->domain.base = (PLyObToDatum *)
            MemoryContextAllocZero(arg_mcxt, sizeof(PLyObToDatum));
        PLy_output_setup_func(arg->domain.base, arg_mcxt,
                              typentry->domainBaseType,
                              typentry->domainBaseTypmod,
                              proc);
    }
    else if (typentry &&
             IsTrueArrayType(typentry))
    {
        /* Standard array */
        arg->func = PLySequence_ToArray;
        /* Get base type OID to insert into constructed array */
        /* (note this might not be the same as the immediate child type) */
        arg->array.elmbasetype = getBaseType(typentry->typelem);
        /* Recursively set up conversion info for the element type */
        arg->array.elm = (PLyObToDatum *)
            MemoryContextAllocZero(arg_mcxt, sizeof(PLyObToDatum));
        PLy_output_setup_func(arg->array.elm, arg_mcxt,
                              typentry->typelem, typmod,
                              proc);
    }
    else if ((trfuncid = get_transform_tosql(typeOid,
                                             proc->langid,
                                             proc->trftypes)))
    {
        arg->func = PLyObject_ToTransform;
        fmgr_info_cxt(trfuncid, &arg->transform.typtransform, arg_mcxt);
    }
    else if (typtype == TYPTYPE_COMPOSITE)
    {
        /* Named composite type, or RECORD */
        arg->func = PLyObject_ToComposite;
        /* We'll set up the per-field data later */
        arg->tuple.recdesc = NULL;
        arg->tuple.typentry = typentry;
        arg->tuple.tupdescid = INVALID_TUPLEDESC_IDENTIFIER;
        arg->tuple.atts = NULL;
        arg->tuple.natts = 0;
        /* Mark this invalid till needed, too */
        arg->tuple.recinfunc.fn_oid = InvalidOid;
    }
    else
    {
        /* Scalar type, but we have a couple of special cases */
        switch (typeOid)
        {
            case BOOLOID:
                arg->func = PLyObject_ToBool;
                break;
            case BYTEAOID:
                arg->func = PLyObject_ToBytea;
                break;
            default:
                arg->func = PLyObject_ToScalar;
                getTypeInputInfo(typeOid, &typinput, &arg->scalar.typioparam);
                fmgr_info_cxt(typinput, &arg->scalar.typfunc, arg_mcxt);
                break;
        }
    }
}

References arg, check_stack_depth(), TypeCacheEntry::domainBaseType, TypeCacheEntry::domainBaseTypmod, fb(), fmgr_info_cxt(), get_transform_tosql(), getBaseType(), getTypeInputInfo(), INVALID_TUPLEDESC_IDENTIFIER, InvalidOid, PLyProcedure::langid, lookup_type_cache(), MemoryContextAllocZero(), PLy_output_setup_func(), PLyObject_ToBool(), PLyObject_ToBytea(), PLyObject_ToComposite(), PLyObject_ToDomain(), PLyObject_ToScalar(), PLyObject_ToTransform(), PLySequence_ToArray(), PLyProcedure::trftypes, TypeCacheEntry::typalign, TypeCacheEntry::typbyval, TYPECACHE_DOMAIN_BASE_INFO, TypeCacheEntry::typelem, TypeCacheEntry::typlen, and TypeCacheEntry::typtype.

Referenced by PLy_exec_trigger(), PLy_output_setup_func(), PLy_output_setup_tuple(), PLy_procedure_create(), and PLy_spi_prepare().

PLy_output_setup_record()

void PLy_output_setup_record	(	PLyObToDatum *	arg,
		TupleDesc	desc,
		PLyProcedure *	proc
	)

Definition at line 261 of file plpy_typeio.c.

{
    /* Makes no sense unless RECORD */
    Assert(arg->typoid == RECORDOID);
    Assert(desc->tdtypeid == RECORDOID);
 
    /*
     * Bless the record type if not already done.  We'd have to do this anyway
     * to return a tuple, so we might as well force the issue so we can use
     * the known-record-type code path.
     */
    BlessTupleDesc(desc);
 
    /*
     * Update arg->typmod, and clear the recdesc link if it's changed. The
     * next call of PLyObject_ToComposite will look up a long-lived tupdesc
     * for the record type.
     */
    arg->typmod = desc->tdtypmod;
    if (arg->tuple.recdesc &&
        arg->tuple.recdesc->tdtypmod != arg->typmod)
        arg->tuple.recdesc = NULL;
 
    /* Update derived data if necessary */
    PLy_output_setup_tuple(arg, desc, proc);
}

References arg, Assert, BlessTupleDesc(), fb(), PLy_output_setup_tuple(), TupleDescData::tdtypeid, and TupleDescData::tdtypmod.

Referenced by PLy_exec_function().

PLy_output_setup_tuple()

void PLy_output_setup_tuple	(	PLyObToDatum *	arg,
		TupleDesc	desc,
		PLyProcedure *	proc
	)

Definition at line 215 of file plpy_typeio.c.

{
    int         i;
 
    /* We should be working on a previously-set-up struct */
    Assert(arg->func == PLyObject_ToComposite);
 
    /* Save pointer to tupdesc, but only if this is an anonymous record type */
    if (arg->typoid == RECORDOID && arg->typmod < 0)
        arg->tuple.recdesc = desc;
 
    /* (Re)allocate atts array as needed */
    if (arg->tuple.natts != desc->natts)
    {
        if (arg->tuple.atts)
            pfree(arg->tuple.atts);
        arg->tuple.natts = desc->natts;
        arg->tuple.atts = (PLyObToDatum *)
            MemoryContextAllocZero(arg->mcxt,
                                   desc->natts * sizeof(PLyObToDatum));
    }
 
    /* Fill the atts entries, except for dropped columns */
    for (i = 0; i < desc->natts; i++)
    {
        Form_pg_attribute attr = TupleDescAttr(desc, i);
        PLyObToDatum *att = &arg->tuple.atts[i];
 
        if (attr->attisdropped)
            continue;
 
        if (att->typoid == attr->atttypid && att->typmod == attr->atttypmod)
            continue;           /* already set up this entry */
 
        PLy_output_setup_func(att, arg->mcxt,
                              attr->atttypid, attr->atttypmod,
                              proc);
    }
}

References arg, Assert, PLyObToTuple::atts, fb(), i, MemoryContextAllocZero(), TupleDescData::natts, pfree(), PLy_output_setup_func(), PLyObject_ToComposite(), PLyObToDatum::tuple, and TupleDescAttr().

Referenced by PLy_exec_trigger(), PLy_output_setup_record(), and PLyObject_ToComposite().

PLyBool_FromBool()

static PyObject * PLyBool_FromBool ( PLyDatumToOb *  arg, Datum  d  )

static

Definition at line 550 of file plpy_typeio.c.

{
    if (DatumGetBool(d))
        Py_RETURN_TRUE;
    Py_RETURN_FALSE;
}

References DatumGetBool(), and fb().

Referenced by PLy_input_setup_func().

PLyBytes_FromBytea()

static PyObject * PLyBytes_FromBytea ( PLyDatumToOb *  arg, Datum  d  )

static

Definition at line 628 of file plpy_typeio.c.

{
    text       *txt = DatumGetByteaPP(d);
    char       *str = VARDATA_ANY(txt);
    size_t      size = VARSIZE_ANY_EXHDR(txt);
 
    return PyBytes_FromStringAndSize(str, size);
}

References DatumGetByteaPP, fb(), str, VARDATA_ANY(), and VARSIZE_ANY_EXHDR().

Referenced by PLy_input_setup_func().

PLyDecimal_FromNumeric()

static PyObject * PLyDecimal_FromNumeric ( PLyDatumToOb *  arg, Datum  d  )

static

Definition at line 570 of file plpy_typeio.c.

{
    static PyObject *decimal_constructor;
    char       *str;
    PyObject   *pyvalue;
 
    /* Try to import cdecimal.  If it doesn't exist, fall back to decimal. */
    if (!decimal_constructor)
    {
        PyObject   *decimal_module;
 
        decimal_module = PyImport_ImportModule("cdecimal");
        if (!decimal_module)
        {
            PyErr_Clear();
            decimal_module = PyImport_ImportModule("decimal");
        }
        if (!decimal_module)
            PLy_elog(ERROR, "could not import a module for Decimal constructor");
 
        decimal_constructor = PyObject_GetAttrString(decimal_module, "Decimal");
        if (!decimal_constructor)
            PLy_elog(ERROR, "no Decimal attribute in module");
    }
 
    str = DatumGetCString(DirectFunctionCall1(numeric_out, d));
    pyvalue = PyObject_CallFunction(decimal_constructor, "s", str);
    if (!pyvalue)
        PLy_elog(ERROR, "conversion from numeric to Decimal failed");
 
    return pyvalue;
}

References DatumGetCString(), decimal_constructor, DirectFunctionCall1, ERROR, fb(), numeric_out(), PLy_elog, and str.

Referenced by PLy_input_setup_func().

PLyDict_FromComposite()

static PyObject * PLyDict_FromComposite ( PLyDatumToOb *  arg, Datum  d  )

static

Definition at line 782 of file plpy_typeio.c.

{
    PyObject   *dict;
    HeapTupleHeader td;
    Oid         tupType;
    int32       tupTypmod;
    TupleDesc   tupdesc;
    HeapTupleData tmptup;
 
    td = DatumGetHeapTupleHeader(d);
    /* Extract rowtype info and find a tupdesc */
    tupType = HeapTupleHeaderGetTypeId(td);
    tupTypmod = HeapTupleHeaderGetTypMod(td);
    tupdesc = lookup_rowtype_tupdesc(tupType, tupTypmod);
 
    /* Set up I/O funcs if not done yet */
    PLy_input_setup_tuple(arg, tupdesc,
                          PLy_current_execution_context()->curr_proc);
 
    /* Build a temporary HeapTuple control structure */
    tmptup.t_len = HeapTupleHeaderGetDatumLength(td);
    tmptup.t_data = td;
 
    dict = PLyDict_FromTuple(arg, &tmptup, tupdesc, true);
 
    ReleaseTupleDesc(tupdesc);
 
    return dict;
}

References arg, DatumGetHeapTupleHeader, fb(), HeapTupleHeaderGetDatumLength(), HeapTupleHeaderGetTypeId(), HeapTupleHeaderGetTypMod(), lookup_rowtype_tupdesc(), PLy_current_execution_context(), PLy_input_setup_tuple(), PLyDict_FromTuple(), and ReleaseTupleDesc.

Referenced by PLy_input_setup_func(), and PLy_input_setup_tuple().

PLyDict_FromTuple()

static PyObject * PLyDict_FromTuple ( PLyDatumToOb *  arg, HeapTuple  tuple, TupleDesc  desc, bool  include_generated  )

static

Definition at line 816 of file plpy_typeio.c.

{
    PyObject   *volatile dict;
 
    /* Simple sanity check that desc matches */
    Assert(desc->natts == arg->tuple.natts);
 
    dict = PyDict_New();
    if (dict == NULL)
        return NULL;
 
    PG_TRY();
    {
        int         i;
 
        for (i = 0; i < arg->tuple.natts; i++)
        {
            PLyDatumToOb *att = &arg->tuple.atts[i];
            Form_pg_attribute attr = TupleDescAttr(desc, i);
            char       *key;
            Datum       vattr;
            bool        is_null;
            PyObject   *value;
 
            if (attr->attisdropped)
                continue;
 
            if (attr->attgenerated)
            {
                /* don't include unless requested */
                if (!include_generated)
                    continue;
                /* never include virtual columns */
                if (attr->attgenerated == ATTRIBUTE_GENERATED_VIRTUAL)
                    continue;
            }
 
            key = NameStr(attr->attname);
            vattr = heap_getattr(tuple, (i + 1), desc, &is_null);
 
            if (is_null)
                PyDict_SetItemString(dict, key, Py_None);
            else
            {
                value = att->func(att, vattr);
                PyDict_SetItemString(dict, key, value);
                Py_DECREF(value);
            }
        }
    }
    PG_CATCH();
    {
        Py_DECREF(dict);
        PG_RE_THROW();
    }
    PG_END_TRY();
 
    return dict;
}

References arg, Assert, PLyTupleToOb::atts, fb(), heap_getattr(), i, NameStr, TupleDescData::natts, PG_CATCH, PG_END_TRY, PG_RE_THROW, PG_TRY, PLyDatumToOb::tuple, TupleDescAttr(), and value.

Referenced by PLy_input_from_tuple(), and PLyDict_FromComposite().

PLyFloat_FromFloat4()

static PyObject * PLyFloat_FromFloat4 ( PLyDatumToOb *  arg, Datum  d  )

static

Definition at line 558 of file plpy_typeio.c.

{
    return PyFloat_FromDouble(DatumGetFloat4(d));
}

References DatumGetFloat4(), and fb().

Referenced by PLy_input_setup_func().

PLyFloat_FromFloat8()

static PyObject * PLyFloat_FromFloat8 ( PLyDatumToOb *  arg, Datum  d  )

static

Definition at line 564 of file plpy_typeio.c.

{
    return PyFloat_FromDouble(DatumGetFloat8(d));
}

References DatumGetFloat8(), and fb().

Referenced by PLy_input_setup_func().

PLyGenericObject_ToComposite()

static Datum PLyGenericObject_ToComposite ( PLyObToDatum *  arg, TupleDesc  desc, PyObject *  object, bool  inarray  )

static

Definition at line 1488 of file plpy_typeio.c.

{
    Datum       result;
    HeapTuple   tuple;
    Datum      *values;
    bool       *nulls;
    volatile int i;
 
    /* Build tuple */
    values = palloc_array(Datum, desc->natts);
    nulls = palloc_array(bool, desc->natts);
    for (i = 0; i < desc->natts; ++i)
    {
        char       *key;
        PyObject   *volatile value;
        PLyObToDatum *att;
        Form_pg_attribute attr = TupleDescAttr(desc, i);
 
        if (attr->attisdropped)
        {
            values[i] = (Datum) 0;
            nulls[i] = true;
            continue;
        }
 
        key = NameStr(attr->attname);
        value = NULL;
        att = &arg->tuple.atts[i];
        PG_TRY();
        {
            value = PyObject_GetAttrString(object, key);
            if (!value)
            {
                /*
                 * No attribute for this column in the object.
                 *
                 * If we are parsing a composite type in an array, a likely
                 * cause is that the function contained something like "[[123,
                 * 'foo']]". Before PostgreSQL 10, that was interpreted as an
                 * array, with a composite type (123, 'foo') in it. But now
                 * it's interpreted as a two-dimensional array, and we try to
                 * interpret "123" as the composite type. See also similar
                 * heuristic in PLyObject_ToScalar().
                 */
                ereport(ERROR,
                        (errcode(ERRCODE_UNDEFINED_COLUMN),
                         errmsg("attribute \"%s\" does not exist in Python object", key),
                         inarray ?
                         errhint("To return a composite type in an array, return the composite type as a Python tuple, e.g., \"[('foo',)]\".") :
                         errhint("To return null in a column, let the returned object have an attribute named after column with value None.")));
            }
 
            values[i] = att->func(att, value, &nulls[i], false);
 
            Py_XDECREF(value);
            value = NULL;
        }
        PG_CATCH();
        {
            Py_XDECREF(value);
            PG_RE_THROW();
        }
        PG_END_TRY();
    }
 
    tuple = heap_form_tuple(desc, values, nulls);
    result = heap_copy_tuple_as_datum(tuple, desc);
    heap_freetuple(tuple);
 
    pfree(values);
    pfree(nulls);
 
    return result;
}

References arg, ereport, errcode(), errhint(), errmsg(), ERROR, fb(), heap_copy_tuple_as_datum(), heap_form_tuple(), heap_freetuple(), i, NameStr, TupleDescData::natts, palloc_array, pfree(), PG_CATCH, PG_END_TRY, PG_RE_THROW, PG_TRY, TupleDescAttr(), value, and values.

Referenced by PLyObject_ToComposite().

PLyList_FromArray()

static PyObject * PLyList_FromArray ( PLyDatumToOb *  arg, Datum  d  )

static

Definition at line 667 of file plpy_typeio.c.

{
    ArrayType  *array = DatumGetArrayTypeP(d);
    PLyDatumToOb *elm = arg->array.elm;
    int         ndim;
    int        *dims;
    char       *dataptr;
    bits8      *bitmap;
    int         bitmask;
 
    if (ARR_NDIM(array) == 0)
        return PyList_New(0);
 
    /* Array dimensions and left bounds */
    ndim = ARR_NDIM(array);
    dims = ARR_DIMS(array);
    Assert(ndim <= MAXDIM);
 
    /*
     * We iterate the SQL array in the physical order it's stored in the
     * datum. For example, for a 3-dimensional array the order of iteration
     * would be the following: [0,0,0] elements through [0,0,k], then [0,1,0]
     * through [0,1,k] till [0,m,k], then [1,0,0] through [1,0,k] till
     * [1,m,k], and so on.
     *
     * In Python, there are no multi-dimensional lists as such, but they are
     * represented as a list of lists. So a 3-d array of [n,m,k] elements is a
     * list of n m-element arrays, each element of which is k-element array.
     * PLyList_FromArray_recurse() builds the Python list for a single
     * dimension, and recurses for the next inner dimension.
     */
    dataptr = ARR_DATA_PTR(array);
    bitmap = ARR_NULLBITMAP(array);
    bitmask = 1;
 
    return PLyList_FromArray_recurse(elm, dims, ndim, 0,
                                     &dataptr, &bitmap, &bitmask);
}

References arg, ARR_DATA_PTR, ARR_DIMS, ARR_NDIM, ARR_NULLBITMAP, PLyDatumToOb::array, Assert, DatumGetArrayTypeP, PLyArrayToOb::elm, fb(), MAXDIM, and PLyList_FromArray_recurse().

Referenced by PLy_input_setup_func().

PLyList_FromArray_recurse()

static PyObject * PLyList_FromArray_recurse ( PLyDatumToOb *  elm, int *  dims, int  ndim, int  dim, char **  dataptr_p, bits8 **  bitmap_p, int *  bitmask_p  )

static

Definition at line 707 of file plpy_typeio.c.

{
    int         i;
    PyObject   *list;
 
    list = PyList_New(dims[dim]);
    if (!list)
        return NULL;
 
    if (dim < ndim - 1)
    {
        /* Outer dimension. Recurse for each inner slice. */
        for (i = 0; i < dims[dim]; i++)
        {
            PyObject   *sublist;
 
            sublist = PLyList_FromArray_recurse(elm, dims, ndim, dim + 1,
                                                dataptr_p, bitmap_p, bitmask_p);
            PyList_SetItem(list, i, sublist);
        }
    }
    else
    {
        /*
         * Innermost dimension. Fill the list with the values from the array
         * for this slice.
         */
        char       *dataptr = *dataptr_p;
        bits8      *bitmap = *bitmap_p;
        int         bitmask = *bitmask_p;
        uint8       typalignby = typalign_to_alignby(elm->typalign);
 
        for (i = 0; i < dims[dim]; i++)
        {
            /* checking for NULL */
            if (bitmap && (*bitmap & bitmask) == 0)
            {
                Py_INCREF(Py_None);
                PyList_SetItem(list, i, Py_None);
            }
            else
            {
                Datum       itemvalue;
 
                itemvalue = fetch_att(dataptr, elm->typbyval, elm->typlen);
                PyList_SetItem(list, i, elm->func(elm, itemvalue));
                dataptr = att_addlength_pointer(dataptr, elm->typlen, dataptr);
                dataptr = (char *) att_nominal_alignby(dataptr, typalignby);
            }
 
            /* advance bitmap pointer if any */
            if (bitmap)
            {
                bitmask <<= 1;
                if (bitmask == 0x100 /* (1<<8) */ )
                {
                    bitmap++;
                    bitmask = 1;
                }
            }
        }
 
        *dataptr_p = dataptr;
        *bitmap_p = bitmap;
        *bitmask_p = bitmask;
    }
 
    return list;
}

References att_addlength_pointer, att_nominal_alignby, fb(), fetch_att(), PLyDatumToOb::func, i, PLyList_FromArray_recurse(), PLyDatumToOb::typalign, typalign_to_alignby(), PLyDatumToOb::typbyval, and PLyDatumToOb::typlen.

Referenced by PLyList_FromArray(), and PLyList_FromArray_recurse().

PLyLong_FromInt16()

static PyObject * PLyLong_FromInt16 ( PLyDatumToOb *  arg, Datum  d  )

static

Definition at line 604 of file plpy_typeio.c.

{
    return PyLong_FromLong(DatumGetInt16(d));
}

References DatumGetInt16(), and fb().

Referenced by PLy_input_setup_func().

PLyLong_FromInt32()

static PyObject * PLyLong_FromInt32 ( PLyDatumToOb *  arg, Datum  d  )

static

Definition at line 610 of file plpy_typeio.c.

{
    return PyLong_FromLong(DatumGetInt32(d));
}

References DatumGetInt32(), and fb().

Referenced by PLy_input_setup_func().

PLyLong_FromInt64()

static PyObject * PLyLong_FromInt64 ( PLyDatumToOb *  arg, Datum  d  )

static

Definition at line 616 of file plpy_typeio.c.

{
    return PyLong_FromLongLong(DatumGetInt64(d));
}

References DatumGetInt64(), and fb().

Referenced by PLy_input_setup_func().

PLyLong_FromOid()

static PyObject * PLyLong_FromOid ( PLyDatumToOb *  arg, Datum  d  )

static

Definition at line 622 of file plpy_typeio.c.

{
    return PyLong_FromUnsignedLong(DatumGetObjectId(d));
}

References DatumGetObjectId(), and fb().

Referenced by PLy_input_setup_func().

PLyMapping_ToComposite()

static Datum PLyMapping_ToComposite ( PLyObToDatum *  arg, TupleDesc  desc, PyObject *  mapping  )

static

Definition at line 1346 of file plpy_typeio.c.

{
    Datum       result;
    HeapTuple   tuple;
    Datum      *values;
    bool       *nulls;
    volatile int i;
 
    Assert(PyMapping_Check(mapping));
 
    /* Build tuple */
    values = palloc_array(Datum, desc->natts);
    nulls = palloc_array(bool, desc->natts);
    for (i = 0; i < desc->natts; ++i)
    {
        char       *key;
        PyObject   *volatile value;
        PLyObToDatum *att;
        Form_pg_attribute attr = TupleDescAttr(desc, i);
 
        if (attr->attisdropped)
        {
            values[i] = (Datum) 0;
            nulls[i] = true;
            continue;
        }
 
        key = NameStr(attr->attname);
        value = NULL;
        att = &arg->tuple.atts[i];
        PG_TRY();
        {
            value = PyMapping_GetItemString(mapping, key);
            if (!value)
                ereport(ERROR,
                        (errcode(ERRCODE_UNDEFINED_COLUMN),
                         errmsg("key \"%s\" not found in mapping", key),
                         errhint("To return null in a column, "
                                 "add the value None to the mapping with the key named after the column.")));
 
            values[i] = att->func(att, value, &nulls[i], false);
 
            Py_XDECREF(value);
            value = NULL;
        }
        PG_CATCH();
        {
            Py_XDECREF(value);
            PG_RE_THROW();
        }
        PG_END_TRY();
    }
 
    tuple = heap_form_tuple(desc, values, nulls);
    result = heap_copy_tuple_as_datum(tuple, desc);
    heap_freetuple(tuple);
 
    pfree(values);
    pfree(nulls);
 
    return result;
}

References arg, Assert, ereport, errcode(), errhint(), errmsg(), ERROR, fb(), heap_copy_tuple_as_datum(), heap_form_tuple(), heap_freetuple(), i, NameStr, TupleDescData::natts, palloc_array, pfree(), PG_CATCH, PG_END_TRY, PG_RE_THROW, PG_TRY, TupleDescAttr(), value, and values.

Referenced by PLyObject_ToComposite().

PLyObject_AsString()

char * PLyObject_AsString

(

PyObject *

plrv

)

Definition at line 1028 of file plpy_typeio.c.

{
    PyObject   *plrv_bo;
    char       *plrv_sc;
    size_t      plen;
    size_t      slen;
 
    if (PyUnicode_Check(plrv))
        plrv_bo = PLyUnicode_Bytes(plrv);
    else if (PyFloat_Check(plrv))
    {
        /* use repr() for floats, str() is lossy */
        PyObject   *s = PyObject_Repr(plrv);
 
        plrv_bo = PLyUnicode_Bytes(s);
        Py_XDECREF(s);
    }
    else
    {
        PyObject   *s = PyObject_Str(plrv);
 
        plrv_bo = PLyUnicode_Bytes(s);
        Py_XDECREF(s);
    }
    if (!plrv_bo)
        PLy_elog(ERROR, "could not create string representation of Python object");
 
    plrv_sc = pstrdup(PyBytes_AsString(plrv_bo));
    plen = PyBytes_Size(plrv_bo);
    slen = strlen(plrv_sc);
 
    Py_XDECREF(plrv_bo);
 
    if (slen < plen)
        ereport(ERROR,
                (errcode(ERRCODE_DATATYPE_MISMATCH),
                 errmsg("could not convert Python object into cstring: Python string representation appears to contain null bytes")));
    else if (slen > plen)
        elog(ERROR, "could not convert Python object into cstring: Python string longer than reported length");
    pg_verifymbstr(plrv_sc, slen, false);
 
    return plrv_sc;
}

References elog, ereport, errcode(), errmsg(), ERROR, fb(), pg_verifymbstr(), PLy_elog, PLyUnicode_Bytes(), and pstrdup().

PLyObject_FromTransform()

static PyObject * PLyObject_FromTransform ( PLyDatumToOb *  arg, Datum  d  )

static

Definition at line 655 of file plpy_typeio.c.

{
    Datum       t;
 
    t = FunctionCall1(&arg->transform.typtransform, d);
    return (PyObject *) DatumGetPointer(t);
}

References arg, DatumGetPointer(), fb(), and FunctionCall1.

Referenced by PLy_input_setup_func().

PLyObject_ToBool()

static Datum PLyObject_ToBool ( PLyObToDatum *  arg, PyObject *  plrv, bool *  isnull, bool  inarray  )

static

Definition at line 883 of file plpy_typeio.c.

{
    if (plrv == Py_None)
    {
        *isnull = true;
        return (Datum) 0;
    }
    *isnull = false;
    return BoolGetDatum(PyObject_IsTrue(plrv));
}

References BoolGetDatum(), and fb().

Referenced by PLy_output_setup_func().

PLyObject_ToBytea()

static Datum PLyObject_ToBytea ( PLyObToDatum *  arg, PyObject *  plrv, bool *  isnull, bool  inarray  )

static

Definition at line 901 of file plpy_typeio.c.

{
    PyObject   *volatile plrv_so = NULL;
    Datum       rv = (Datum) 0;
 
    if (plrv == Py_None)
    {
        *isnull = true;
        return (Datum) 0;
    }
    *isnull = false;
 
    plrv_so = PyObject_Bytes(plrv);
    if (!plrv_so)
        PLy_elog(ERROR, "could not create bytes representation of Python object");
 
    PG_TRY();
    {
        char       *plrv_sc = PyBytes_AsString(plrv_so);
        size_t      len = PyBytes_Size(plrv_so);
        size_t      size = len + VARHDRSZ;
        bytea      *result = palloc(size);
 
        SET_VARSIZE(result, size);
        memcpy(VARDATA(result), plrv_sc, len);
        rv = PointerGetDatum(result);
    }
    PG_FINALLY();
    {
        Py_XDECREF(plrv_so);
    }
    PG_END_TRY();
 
    return rv;
}

References ERROR, fb(), len, palloc(), PG_END_TRY, PG_FINALLY, PG_TRY, PLy_elog, PointerGetDatum(), SET_VARSIZE(), VARDATA(), and VARHDRSZ.

Referenced by PLy_output_setup_func().

PLyObject_ToComposite()

static Datum PLyObject_ToComposite ( PLyObToDatum *  arg, PyObject *  plrv, bool *  isnull, bool  inarray  )

static

Definition at line 945 of file plpy_typeio.c.

{
    Datum       rv;
    TupleDesc   desc;
 
    if (plrv == Py_None)
    {
        *isnull = true;
        return (Datum) 0;
    }
    *isnull = false;
 
    /*
     * The string conversion case doesn't require a tupdesc, nor per-field
     * conversion data, so just go for it if that's the case to use.
     */
    if (PyUnicode_Check(plrv))
        return PLyUnicode_ToComposite(arg, plrv, inarray);
 
    /*
     * If we're dealing with a named composite type, we must look up the
     * tupdesc every time, to protect against possible changes to the type.
     * RECORD types can't change between calls; but we must still be willing
     * to set up the info the first time, if nobody did yet.
     */
    if (arg->typoid != RECORDOID)
    {
        desc = lookup_rowtype_tupdesc(arg->typoid, arg->typmod);
        /* We should have the descriptor of the type's typcache entry */
        Assert(desc == arg->tuple.typentry->tupDesc);
        /* Detect change of descriptor, update cache if needed */
        if (arg->tuple.tupdescid != arg->tuple.typentry->tupDesc_identifier)
        {
            PLy_output_setup_tuple(arg, desc,
                                   PLy_current_execution_context()->curr_proc);
            arg->tuple.tupdescid = arg->tuple.typentry->tupDesc_identifier;
        }
    }
    else
    {
        desc = arg->tuple.recdesc;
        if (desc == NULL)
        {
            desc = lookup_rowtype_tupdesc(arg->typoid, arg->typmod);
            arg->tuple.recdesc = desc;
        }
        else
        {
            /* Pin descriptor to match unpin below */
            PinTupleDesc(desc);
        }
    }
 
    /* Simple sanity check on our caching */
    Assert(desc->natts == arg->tuple.natts);
 
    /*
     * Convert, using the appropriate method depending on the type of the
     * supplied Python object.
     */
    if (PySequence_Check(plrv))
        /* composite type as sequence (tuple, list etc) */
        rv = PLySequence_ToComposite(arg, desc, plrv);
    else if (PyMapping_Check(plrv))
        /* composite type as mapping (currently only dict) */
        rv = PLyMapping_ToComposite(arg, desc, plrv);
    else
        /* returned as smth, must provide method __getattr__(name) */
        rv = PLyGenericObject_ToComposite(arg, desc, plrv, inarray);
 
    ReleaseTupleDesc(desc);
 
    return rv;
}

References arg, Assert, fb(), lookup_rowtype_tupdesc(), TupleDescData::natts, PinTupleDesc, PLy_current_execution_context(), PLy_output_setup_tuple(), PLyGenericObject_ToComposite(), PLyMapping_ToComposite(), PLySequence_ToComposite(), PLyUnicode_ToComposite(), and ReleaseTupleDesc.

Referenced by PLy_output_setup_func(), and PLy_output_setup_tuple().

PLyObject_ToDomain()

static Datum PLyObject_ToDomain ( PLyObToDatum *  arg, PyObject *  plrv, bool *  isnull, bool  inarray  )

static

Definition at line 1103 of file plpy_typeio.c.

{
    Datum       result;
    PLyObToDatum *base = arg->domain.base;
 
    result = base->func(base, plrv, isnull, inarray);
    domain_check(result, *isnull, arg->typoid,
                 &arg->domain.domain_info, arg->mcxt);
    return result;
}

References arg, PLyObToDomain::base, PLyObToDatum::domain, domain_check(), fb(), and PLyObToDatum::func.

Referenced by PLy_output_setup_func().

PLyObject_ToScalar()

static Datum PLyObject_ToScalar ( PLyObToDatum *  arg, PyObject *  plrv, bool *  isnull, bool  inarray  )

static

Definition at line 1078 of file plpy_typeio.c.

{
    char       *str;
 
    if (plrv == Py_None)
    {
        *isnull = true;
        return (Datum) 0;
    }
    *isnull = false;
 
    str = PLyObject_AsString(plrv);
 
    return InputFunctionCall(&arg->scalar.typfunc,
                             str,
                             arg->scalar.typioparam,
                             arg->typmod);
}

References arg, fb(), InputFunctionCall(), PLyObject_AsString, and str.

Referenced by PLy_output_setup_func().

PLyObject_ToTransform()

static Datum PLyObject_ToTransform ( PLyObToDatum *  arg, PyObject *  plrv, bool *  isnull, bool  inarray  )

static

Definition at line 1120 of file plpy_typeio.c.

{
    if (plrv == Py_None)
    {
        *isnull = true;
        return (Datum) 0;
    }
    *isnull = false;
    return FunctionCall1(&arg->transform.typtransform, PointerGetDatum(plrv));
}

References arg, fb(), FunctionCall1, and PointerGetDatum().

Referenced by PLy_output_setup_func().

PLySequence_ToArray()

static Datum PLySequence_ToArray ( PLyObToDatum *  arg, PyObject *  plrv, bool *  isnull, bool  inarray  )

static

Definition at line 1137 of file plpy_typeio.c.

{
    ArrayBuildState *astate = NULL;
    int         ndims = 1;
    int         dims[MAXDIM];
    int         lbs[MAXDIM];
 
    if (plrv == Py_None)
    {
        *isnull = true;
        return (Datum) 0;
    }
    *isnull = false;
 
    /*
     * For historical reasons, we allow any sequence (not only a list) at the
     * top level when converting a Python object to a SQL array.  However, a
     * multi-dimensional array is recognized only when the object contains
     * true lists.
     */
    if (!PySequence_Check(plrv))
        ereport(ERROR,
                (errcode(ERRCODE_DATATYPE_MISMATCH),
                 errmsg("return value of function with array return type is not a Python sequence")));
 
    /* Initialize dimensionality info with first-level dimension */
    memset(dims, 0, sizeof(dims));
    dims[0] = PySequence_Length(plrv);
 
    /*
     * Traverse the Python lists, in depth-first order, and collect all the
     * elements at the bottom level into an ArrayBuildState.
     */
    PLySequence_ToArray_recurse(plrv, &astate,
                                &ndims, dims, 1,
                                arg->array.elm,
                                arg->array.elmbasetype);
 
    /* ensure we get zero-D array for no inputs, as per PG convention */
    if (astate == NULL)
        return PointerGetDatum(construct_empty_array(arg->array.elmbasetype));
 
    for (int i = 0; i < ndims; i++)
        lbs[i] = 1;
 
    return makeMdArrayResult(astate, ndims, dims, lbs,
                             CurrentMemoryContext, true);
}

References arg, construct_empty_array(), CurrentMemoryContext, ereport, errcode(), errmsg(), ERROR, fb(), i, makeMdArrayResult(), MAXDIM, PLySequence_ToArray_recurse(), and PointerGetDatum().

Referenced by PLy_output_setup_func().

PLySequence_ToArray_recurse()

static void PLySequence_ToArray_recurse ( PyObject *  obj, ArrayBuildState **  astatep, int *  ndims, int *  dims, int  cur_depth, PLyObToDatum *  elm, Oid  elmbasetype  )

static

Definition at line 1197 of file plpy_typeio.c.

{
    int         i;
    int         len = PySequence_Length(obj);
 
    /* We should not get here with a non-sequence object */
    if (len < 0)
        PLy_elog(ERROR, "could not determine sequence length for function return value");
 
    for (i = 0; i < len; i++)
    {
        /* fetch the array element */
        PyObject   *subobj = PySequence_GetItem(obj, i);
 
        /* need PG_TRY to ensure we release the subobj's refcount */
        PG_TRY();
        {
            /* multi-dimensional array? */
            if (PyList_Check(subobj))
            {
                /* set size when at first element in this level, else compare */
                if (i == 0 && *ndims == cur_depth)
                {
                    /* array after some scalars at same level? */
                    if (*astatep != NULL)
                        ereport(ERROR,
                                (errcode(ERRCODE_INVALID_TEXT_REPRESENTATION),
                                 errmsg("multidimensional arrays must have array expressions with matching dimensions")));
                    /* too many dimensions? */
                    if (cur_depth >= MAXDIM)
                        ereport(ERROR,
                                (errcode(ERRCODE_PROGRAM_LIMIT_EXCEEDED),
                                 errmsg("number of array dimensions exceeds the maximum allowed (%d)",
                                        MAXDIM)));
                    /* OK, add a dimension */
                    dims[*ndims] = PySequence_Length(subobj);
                    (*ndims)++;
                }
                else if (cur_depth >= *ndims ||
                         PySequence_Length(subobj) != dims[cur_depth])
                    ereport(ERROR,
                            (errcode(ERRCODE_INVALID_TEXT_REPRESENTATION),
                             errmsg("multidimensional arrays must have array expressions with matching dimensions")));
 
                /* recurse to fetch elements of this sub-array */
                PLySequence_ToArray_recurse(subobj, astatep,
                                            ndims, dims, cur_depth + 1,
                                            elm, elmbasetype);
            }
            else
            {
                Datum       dat;
                bool        isnull;
 
                /* scalar after some sub-arrays at same level? */
                if (*ndims != cur_depth)
                    ereport(ERROR,
                            (errcode(ERRCODE_INVALID_TEXT_REPRESENTATION),
                             errmsg("multidimensional arrays must have array expressions with matching dimensions")));
 
                /* convert non-list object to Datum */
                dat = elm->func(elm, subobj, &isnull, true);
 
                /* create ArrayBuildState if we didn't already */
                if (*astatep == NULL)
                    *astatep = initArrayResult(elmbasetype,
                                               CurrentMemoryContext, true);
 
                /* ... and save the element value in it */
                (void) accumArrayResult(*astatep, dat, isnull,
                                        elmbasetype, CurrentMemoryContext);
            }
        }
        PG_FINALLY();
        {
            Py_XDECREF(subobj);
        }
        PG_END_TRY();
    }
}

References accumArrayResult(), CurrentMemoryContext, ereport, errcode(), errmsg(), ERROR, fb(), PLyObToDatum::func, i, initArrayResult(), len, MAXDIM, PG_END_TRY, PG_FINALLY, PG_TRY, PLy_elog, and PLySequence_ToArray_recurse().

Referenced by PLySequence_ToArray(), and PLySequence_ToArray_recurse().

PLySequence_ToComposite()

static Datum PLySequence_ToComposite ( PLyObToDatum *  arg, TupleDesc  desc, PyObject *  sequence  )

static

Definition at line 1411 of file plpy_typeio.c.

{
    Datum       result;
    HeapTuple   tuple;
    Datum      *values;
    bool       *nulls;
    volatile int idx;
    volatile int i;
 
    Assert(PySequence_Check(sequence));
 
    /*
     * Check that sequence length is exactly same as PG tuple's. We actually
     * can ignore exceeding items or assume missing ones as null but to avoid
     * plpython developer's errors we are strict here
     */
    idx = 0;
    for (i = 0; i < desc->natts; i++)
    {
        if (!TupleDescCompactAttr(desc, i)->attisdropped)
            idx++;
    }
    if (PySequence_Length(sequence) != idx)
        ereport(ERROR,
                (errcode(ERRCODE_DATATYPE_MISMATCH),
                 errmsg("length of returned sequence did not match number of columns in row")));
 
    /* Build tuple */
    values = palloc_array(Datum, desc->natts);
    nulls = palloc_array(bool, desc->natts);
    idx = 0;
    for (i = 0; i < desc->natts; ++i)
    {
        PyObject   *volatile value;
        PLyObToDatum *att;
 
        if (TupleDescCompactAttr(desc, i)->attisdropped)
        {
            values[i] = (Datum) 0;
            nulls[i] = true;
            continue;
        }
 
        value = NULL;
        att = &arg->tuple.atts[i];
        PG_TRY();
        {
            value = PySequence_GetItem(sequence, idx);
            Assert(value);
 
            values[i] = att->func(att, value, &nulls[i], false);
 
            Py_XDECREF(value);
            value = NULL;
        }
        PG_CATCH();
        {
            Py_XDECREF(value);
            PG_RE_THROW();
        }
        PG_END_TRY();
 
        idx++;
    }
 
    tuple = heap_form_tuple(desc, values, nulls);
    result = heap_copy_tuple_as_datum(tuple, desc);
    heap_freetuple(tuple);
 
    pfree(values);
    pfree(nulls);
 
    return result;
}

References arg, Assert, PLyObToTuple::atts, ereport, errcode(), errmsg(), ERROR, fb(), heap_copy_tuple_as_datum(), heap_form_tuple(), heap_freetuple(), i, idx(), TupleDescData::natts, palloc_array, pfree(), PG_CATCH, PG_END_TRY, PG_RE_THROW, PG_TRY, PLyObToDatum::tuple, TupleDescCompactAttr(), value, and values.

Referenced by PLyObject_ToComposite().

PLyUnicode_FromScalar()

static PyObject * PLyUnicode_FromScalar ( PLyDatumToOb *  arg, Datum  d  )

static

Definition at line 642 of file plpy_typeio.c.

{
    char       *x = OutputFunctionCall(&arg->scalar.typfunc, d);
    PyObject   *r = PLyUnicode_FromString(x);
 
    pfree(x);
    return r;
}

References arg, fb(), OutputFunctionCall(), pfree(), PLyUnicode_FromString(), and x.

Referenced by PLy_input_setup_func().

PLyUnicode_ToComposite()

static Datum PLyUnicode_ToComposite ( PLyObToDatum *  arg, PyObject *  string, bool  inarray  )

static

Definition at line 1285 of file plpy_typeio.c.

{
    char       *str;
 
    /*
     * Set up call data for record_in, if we didn't already.  (We can't just
     * use DirectFunctionCall, because record_in needs a fn_extra field.)
     */
    if (!OidIsValid(arg->tuple.recinfunc.fn_oid))
        fmgr_info_cxt(F_RECORD_IN, &arg->tuple.recinfunc, arg->mcxt);
 
    str = PLyObject_AsString(string);
 
    /*
     * If we are parsing a composite type within an array, and the string
     * isn't a valid record literal, there's a high chance that the function
     * did something like:
     *
     * CREATE FUNCTION .. RETURNS comptype[] AS $$ return [['foo', 'bar']] $$
     * LANGUAGE plpython;
     *
     * Before PostgreSQL 10, that was interpreted as a single-dimensional
     * array, containing record ('foo', 'bar'). PostgreSQL 10 added support
     * for multi-dimensional arrays, and it is now interpreted as a
     * two-dimensional array, containing two records, 'foo', and 'bar'.
     * record_in() will throw an error, because "foo" is not a valid record
     * literal.
     *
     * To make that less confusing to users who are upgrading from older
     * versions, try to give a hint in the typical instances of that. If we
     * are parsing an array of composite types, and we see a string literal
     * that is not a valid record literal, give a hint. We only want to give
     * the hint in the narrow case of a malformed string literal, not any
     * error from record_in(), so check for that case here specifically.
     *
     * This check better match the one in record_in(), so that we don't forbid
     * literals that are actually valid!
     */
    if (inarray)
    {
        char       *ptr = str;
 
        /* Allow leading whitespace */
        while (*ptr && isspace((unsigned char) *ptr))
            ptr++;
        if (*ptr++ != '(')
            ereport(ERROR,
                    (errcode(ERRCODE_INVALID_TEXT_REPRESENTATION),
                     errmsg("malformed record literal: \"%s\"", str),
                     errdetail("Missing left parenthesis."),
                     errhint("To return a composite type in an array, return the composite type as a Python tuple, e.g., \"[('foo',)]\".")));
    }
 
    return InputFunctionCall(&arg->tuple.recinfunc,
                             str,
                             arg->typoid,
                             arg->typmod);
}

References arg, ereport, errcode(), errdetail(), errhint(), errmsg(), ERROR, fb(), fmgr_info_cxt(), InputFunctionCall(), OidIsValid, PLyObject_AsString, and str.

Referenced by PLyObject_ToComposite().