parse_gml_coordinates()

static POINTARRAY * parse_gml_coordinates ( xmlNodePtr  xnode, bool *  hasz  )

static

Parse gml:coordinates.

Definition at line 606 of file lwgeom_in_gml.c.

{
        xmlChar *gml_coord, *gml_ts, *gml_cs, *gml_dec;
        char cs, ts, dec;
        POINTARRAY *dpa;
        int gml_dims;
        char *p, *q;
        bool digit;
        POINT4D pt;
 
        /* We begin to retrieve coordinates string */
        gml_coord = xmlNodeGetContent(xnode);
        p = (char *) gml_coord;
 
        /* Default GML coordinates pattern:     x1,y1 x2,y2
         *                                      x1,y1,z1 x2,y2,z2
         *
         * Cf GML 2.1.2 -> 4.3.1 (p18)
         */
 
        /* Retrieve separator between coordinates tuples */
        gml_ts = gmlGetProp(xnode, "ts");
        if (gml_ts == NULL) ts = ' ';
        else
        {
                if (xmlStrlen(gml_ts) > 1 || isdigit(gml_ts[0]))
                        gml_lwpgerror("invalid GML representation", 15);
                ts = gml_ts[0];
                xmlFree(gml_ts);
        }
 
        /* Retrieve separator between each coordinate */
        gml_cs = gmlGetProp(xnode, "cs");
        if (gml_cs == NULL) cs = ',';
        else
        {
                if (xmlStrlen(gml_cs) > 1 || isdigit(gml_cs[0]))
                        gml_lwpgerror("invalid GML representation", 16);
                cs = gml_cs[0];
                xmlFree(gml_cs);
        }
 
        /* Retrieve decimal separator */
        gml_dec = gmlGetProp(xnode, "decimal");
        if (gml_dec == NULL) dec = '.';
        else
        {
                if (xmlStrlen(gml_dec) > 1 || isdigit(gml_dec[0]))
                        gml_lwpgerror("invalid GML representation", 17);
                dec = gml_dec[0];
                xmlFree(gml_dec);
        }
 
        if (cs == ts || cs == dec || ts == dec)
                gml_lwpgerror("invalid GML representation", 18);
 
        /* HasZ, !HasM, 1 Point */
        dpa = ptarray_construct_empty(1, 0, 1);
 
        while (isspace(*p)) p++;                /* Eat extra whitespaces if any */
        for (q = p, gml_dims=0, digit = false ; *p ; p++)
        {
 
                if (isdigit(*p)) digit = true;  /* One state parser */
 
                /* Coordinate Separator */
                if (*p == cs)
                {
                        *p = '\0';
                        gml_dims++;
 
                        if (*(p+1) == '\0') gml_lwpgerror("invalid GML representation", 19);
 
                        if      (gml_dims == 1) pt.x = parse_gml_double(q, false, true);
                        else if (gml_dims == 2) pt.y = parse_gml_double(q, false, true);
 
                        q = p+1;
 
                        /* Tuple Separator (or end string) */
                }
                else if (digit && (*p == ts || *(p+1) == '\0'))
                {
                        if (*p == ts) *p = '\0';
                        gml_dims++;
 
                        if (gml_dims < 2 || gml_dims > 3)
                                gml_lwpgerror("invalid GML representation", 20);
 
                        if (gml_dims == 3)
                                pt.z = parse_gml_double(q, false, true);
                        else
                        {
                                pt.y = parse_gml_double(q, false, true);
                                *hasz = false;
                        }
 
                        ptarray_append_point(dpa, &pt, LW_TRUE);
                        digit = false;
 
                        q = p+1;
                        gml_dims = 0;
 
                        /* Need to put standard decimal separator to atof handle */
                }
                else if (*p == dec && dec != '.') *p = '.';
        }
 
        xmlFree(gml_coord);
 
        return dpa; /* ptarray_clone_deep(dpa); */
}

References gml_lwpgerror(), gmlGetProp(), LW_TRUE, parse_gml_double(), ptarray_append_point(), ptarray_construct_empty(), POINT4D::x, POINT4D::y, and POINT4D::z.

Referenced by parse_gml_data().

Here is the call graph for this function:

Here is the caller graph for this function: