geom_from_kml()

Datum geom_from_kml

(

PG_FUNCTION_ARGS

)

Definition at line 74 of file lwgeom_in_kml.c.

References COLLECTIONTYPE, geometry_serialize(), lwgeom_add_bbox(), lwgeom_force_2d(), lwgeom_free(), lwgeom_homogenize(), lwgeom_release(), parse_kml(), text2cstring(), and LWGEOM::type.

{
        GSERIALIZED *geom;
        LWGEOM *lwgeom, *hlwgeom;
        xmlDocPtr xmldoc;
        text *xml_input;
        int xml_size;
        char *xml;
        bool hasz=true;
        xmlNodePtr xmlroot=NULL;


        /* Get the KML stream */
        if (PG_ARGISNULL(0)) PG_RETURN_NULL();
        xml_input = PG_GETARG_TEXT_P(0);
        xml = text2cstring(xml_input);
        xml_size = VARSIZE(xml_input) - VARHDRSZ;

        /* Begin to Parse XML doc */
        xmlInitParser();
        xmldoc = xmlReadMemory(xml, xml_size, NULL, NULL, XML_PARSE_SAX1);
        if (!xmldoc || (xmlroot = xmlDocGetRootElement(xmldoc)) == NULL)
        {
                xmlFreeDoc(xmldoc);
                xmlCleanupParser();
                lwpgerror("invalid KML representation");
        }

        lwgeom = parse_kml(xmlroot, &hasz);

        /* Homogenize geometry result if needed */
        if (lwgeom->type == COLLECTIONTYPE)
        {
                hlwgeom = lwgeom_homogenize(lwgeom);
                lwgeom_release(lwgeom);
                lwgeom = hlwgeom;
        }

        lwgeom_add_bbox(lwgeom);

        /* KML geometries could be either 2 or 3D
         *
         * So we deal with 3D in all structures allocation, and flag hasz
         * to false if we met once a missing Z dimension
         * In this case, we force recursive 2D.
         */
        if (!hasz)
        {
                LWGEOM *tmp = lwgeom_force_2d(lwgeom);
                lwgeom_free(lwgeom);
                lwgeom = tmp;
        }

        geom = geometry_serialize(lwgeom);
        lwgeom_free(lwgeom);

        xmlFreeDoc(xmldoc);
        xmlCleanupParser();

        PG_RETURN_POINTER(geom);
}

Here is the call graph for this function: