WKBFromLWGEOM()

Datum WKBFromLWGEOM

(

PG_FUNCTION_ARGS

)

Definition at line 422 of file lwgeom_inout.c.

References lwgeom_free(), lwgeom_from_gserialized(), lwgeom_to_wkb(), PG_FUNCTION_INFO_V1(), TWKBFromLWGEOM(), ovdump::type, variant, WKB_EXTENDED, WKB_NDR, and WKB_XDR.

Referenced by LWGEOM_send(), LWGEOM_to_bytea(), and LWGEOMFromTWKB().

{
        GSERIALIZED *geom = PG_GETARG_GSERIALIZED_P(0);
        LWGEOM *lwgeom;
        uint8_t *wkb;
        size_t wkb_size;
        uint8_t variant = 0;
        bytea *result;
        text *type;
        /* If user specified endianness, respect it */
        if ( (PG_NARGS()>1) && (!PG_ARGISNULL(1)) )
        {
                type = PG_GETARG_TEXT_P(1);

                if  ( ! strncmp(VARDATA(type), "xdr", 3) ||
                      ! strncmp(VARDATA(type), "XDR", 3) )
                {
                        variant = variant | WKB_XDR;
                }
                else
                {
                        variant = variant | WKB_NDR;
                }
        }
        wkb_size= VARSIZE(geom) - VARHDRSZ;
        /* Create WKB hex string */
        lwgeom = lwgeom_from_gserialized(geom);

        wkb = lwgeom_to_wkb(lwgeom, variant | WKB_EXTENDED , &wkb_size);
        lwgeom_free(lwgeom);

        /* Prepare the PgSQL text return type */
        result = palloc(wkb_size + VARHDRSZ);
        memcpy(VARDATA(result), wkb, wkb_size);
        SET_VARSIZE(result, wkb_size+VARHDRSZ);

        /* Clean up and return */
        pfree(wkb);
        PG_FREE_IF_COPY(geom, 0);
        PG_RETURN_BYTEA_P(result);
}

Here is the call graph for this function:

Here is the caller graph for this function: