gserialized_typmod_in()

static uint32 gserialized_typmod_in ( ArrayType *  arr, int  is_geography  )

static

Definition at line 234 of file gserialized_typmod.c.

{
        int32 typmod = 0;
        Datum *elem_values;
        int n = 0;
        int     i = 0;
 
        if (ARR_ELEMTYPE(arr) != CSTRINGOID)
                ereport(ERROR,
                        (errcode(ERRCODE_ARRAY_ELEMENT_ERROR),
                         errmsg("typmod array must be type cstring[]")));
 
        if (ARR_NDIM(arr) != 1)
                ereport(ERROR,
                        (errcode(ERRCODE_ARRAY_SUBSCRIPT_ERROR),
                         errmsg("typmod array must be one-dimensional")));
 
        if (ARR_HASNULL(arr))
                ereport(ERROR,
                        (errcode(ERRCODE_NULL_VALUE_NOT_ALLOWED),
                         errmsg("typmod array must not contain nulls")));
 
        deconstruct_array(arr,
                          CSTRINGOID, -2, false, 'c', /* hardwire cstring representation details */
                          &elem_values, NULL, &n);
 
        /* Set the SRID to the default value first */
        if (is_geography)
            TYPMOD_SET_SRID(typmod, SRID_DEFAULT);
        else
            TYPMOD_SET_SRID(typmod, SRID_UNKNOWN);
 
        for (i = 0; i < n; i++)
        {
                if ( i == 0 ) /* TYPE */
                {
                        char *s = DatumGetCString(elem_values[i]);
                        uint8_t type = 0;
                        int z = 0;
                        int m = 0;
 
                        if ( geometry_type_from_string(s, &type, &z, &m) == LW_FAILURE )
                        {
                                ereport(ERROR,
                                        (errcode(ERRCODE_INVALID_PARAMETER_VALUE),
                                         errmsg("Invalid geometry type modifier: %s", s)));
                        }
                        else
                        {
                                TYPMOD_SET_TYPE(typmod, type);
                                if ( z )
                                        TYPMOD_SET_Z(typmod);
                                if ( m )
                                        TYPMOD_SET_M(typmod);
                        }
                }
                if ( i == 1 ) /* SRID */
                {
                        char *int_string = DatumGetCString(elem_values[i]);
                        char *endp;
                        long l;
                        int32_t srid;
 
                        errno = 0;
                        l = strtol(int_string, &endp, 10);
 
                        if (int_string == endp)
                                ereport(ERROR,
                                                (errcode(ERRCODE_INVALID_TEXT_REPRESENTATION),
                                                 errmsg("invalid input syntax for type %s: \"%s\"",
                                                                "integer", int_string)));
 
                        if (errno == ERANGE || l < INT_MIN || l > INT_MAX)
                                ereport(ERROR,
                                                (errcode(ERRCODE_NUMERIC_VALUE_OUT_OF_RANGE),
                                                 errmsg("value \"%s\" is out of range for type %s", int_string,
                                                                "integer")));
 
                        if (*endp != '\0')
                                ereport(ERROR,
                                                (errcode(ERRCODE_INVALID_TEXT_REPRESENTATION),
                                                 errmsg("invalid input syntax for type %s: \"%s\"",
                                                                "integer", int_string)));
 
                        srid = clamp_srid(l);
                        POSTGIS_DEBUGF(3, "srid: %d", srid);
                        if ( srid != SRID_UNKNOWN )
                        {
                                TYPMOD_SET_SRID(typmod, srid);
                        }
                }
        }
 
        pfree(elem_values);
 
        return typmod;
}

References clamp_srid(), geometry_type_from_string(), LW_FAILURE, s, SRID_DEFAULT, SRID_UNKNOWN, ovdump::type, TYPMOD_SET_M, TYPMOD_SET_SRID, TYPMOD_SET_TYPE, and TYPMOD_SET_Z.

Referenced by geography_typmod_in(), and geometry_typmod_in().

Here is the call graph for this function:

Here is the caller graph for this function: