LWGEOM_asX3D()

Datum LWGEOM_asX3D

(

PG_FUNCTION_ARGS

)

TODO: we need to support UTM and other coordinate systems supported by X3D eventually http://www.web3d.org/documents/specifications/19775-1/V3.2/Part01/components/geodata.html#t-earthgeoids

Definition at line 527 of file lwgeom_export.c.

References dumpnode::geom, getSRSbySRID(), gserialized_get_srid(), LW_X3D_USE_GEOCOORDS, lwfree(), LWGEOM_asEncodedPolyline(), lwgeom_free(), lwgeom_from_gserialized(), lwgeom_to_x3d3(), PG_FUNCTION_INFO_V1(), precision, and SRID_UNKNOWN.

Referenced by LWGEOM_asSVG().

{
        GSERIALIZED *geom;
        LWGEOM *lwgeom;
        char *x3d;
        text *result;
        int version;
        char *srs;
        int srid;
        int option = 0;
        int precision = DBL_DIG;
        static const char* default_defid = "x3d:"; /* default defid */
        char *defidbuf;
        const char* defid = default_defid;
        text *defid_text;

        /* Get the version */
        version = PG_GETARG_INT32(0);
        if (  version != 3 )
        {
                elog(ERROR, "Only X3D version 3 are supported");
                PG_RETURN_NULL();
        }

        /* Get the geometry */
        if ( PG_ARGISNULL(1) ) PG_RETURN_NULL();
        geom = PG_GETARG_GSERIALIZED_P(1);

        /* Retrieve precision if any (default is max) */
        if (PG_NARGS() >2 && !PG_ARGISNULL(2))
        {
                precision = PG_GETARG_INT32(2);
                /* TODO: leave this to liblwgeom ? */
                if ( precision > DBL_DIG )
                        precision = DBL_DIG;
                else if ( precision < 0 ) precision = 0;
        }

        /* retrieve option */
        if (PG_NARGS() >3 && !PG_ARGISNULL(3))
                option = PG_GETARG_INT32(3);



        /* retrieve defid */
        if (PG_NARGS() >4 && !PG_ARGISNULL(4))
        {
                defid_text = PG_GETARG_TEXT_P(4);
                if ( VARSIZE(defid_text)-VARHDRSZ == 0 )
                {
                        defid = "";
                }
                else
                {
                        /* +2 is one for the ':' and one for term null */
                        defidbuf = palloc(VARSIZE(defid_text)-VARHDRSZ+2);
                        memcpy(defidbuf, VARDATA(defid_text),
                               VARSIZE(defid_text)-VARHDRSZ);
                        /* add colon and null terminate */
                        defidbuf[VARSIZE(defid_text)-VARHDRSZ] = ':';
                        defidbuf[VARSIZE(defid_text)-VARHDRSZ+1] = '\0';
                        defid = defidbuf;
                }
        }

        lwgeom = lwgeom_from_gserialized(geom);
        srid = gserialized_get_srid(geom);
        if (srid == SRID_UNKNOWN)      srs = NULL;
        else if (option & 1) srs = getSRSbySRID(srid, false);
        else                 srs = getSRSbySRID(srid, true);

        if (option & LW_X3D_USE_GEOCOORDS) {
                if (srid != 4326) {
                        PG_FREE_IF_COPY(geom, 0);
                        elog(ERROR, "Only SRID 4326 is supported for geocoordinates.");
                        PG_RETURN_NULL();
                }
        }


        x3d = lwgeom_to_x3d3(lwgeom, srs, precision,option, defid);

        lwgeom_free(lwgeom);
        PG_FREE_IF_COPY(geom, 1);

        result = cstring2text(x3d);
        lwfree(x3d);

        PG_RETURN_TEXT_P(result);
}

Here is the call graph for this function:

Here is the caller graph for this function: