PostGIS  2.4.9dev-r@@SVN_REVISION@@

◆ ptarray_segmentize_sphere()

static POINTARRAY* ptarray_segmentize_sphere ( const POINTARRAY pa_in,
double  max_seg_length 

Create a new point array with no segment longer than the input segment length (expressed in radians!)

pa_in- input point array pointer
max_seg_length- maximum output segment length in radians

Definition at line 1680 of file lwgeodetic.c.

References geog2cart(), geographic_point_init(), getPoint4d_p(), LW_TRUE, lwerror(), POINTARRAY::npoints, p4d_same(), ptarray_append_point(), ptarray_construct_empty(), ptarray_has_m(), ptarray_has_z(), ptarray_segmentize_sphere_edge_recursive(), sphere_distance(), POINT4D::x, and POINT4D::y.

Referenced by lwgeom_segmentize_sphere().

1681 {
1682  POINTARRAY *pa_out;
1683  int hasz = ptarray_has_z(pa_in);
1684  int hasm = ptarray_has_m(pa_in);
1685  POINT4D p1, p2;
1686  POINT3D q1, q2;
1687  GEOGRAPHIC_POINT g1, g2;
1688  int i;
1690  /* Just crap out on crazy input */
1691  if ( ! pa_in )
1692  lwerror("%s: null input pointarray", __func__);
1693  if ( max_seg_length <= 0.0 )
1694  lwerror("%s: maximum segment length must be positive", __func__);
1696  /* Empty starting array */
1697  pa_out = ptarray_construct_empty(hasz, hasm, pa_in->npoints);
1699  /* Simple loop per edge */
1700  for (i = 1; i < pa_in->npoints; i++)
1701  {
1702  getPoint4d_p(pa_in, i-1, &p1);
1703  getPoint4d_p(pa_in, i, &p2);
1704  geographic_point_init(p1.x, p1.y, &g1);
1705  geographic_point_init(p2.x, p2.y, &g2);
1707  /* Skip duplicate points (except in case of 2-point lines!) */
1708  if ((pa_in->npoints > 2) && p4d_same(&p1, &p2))
1709  continue;
1711  /* How long is this edge? */
1712  double d = sphere_distance(&g1, &g2);
1714  if (d > max_seg_length)
1715  {
1716  geog2cart(&g1, &q1);
1717  geog2cart(&g2, &q2);
1718  /* 3-d end points, XYZM end point, current edge size, min edge size */
1719  ptarray_segmentize_sphere_edge_recursive(&q1, &q2, &p1, &p2, d, max_seg_length, pa_out);
1720  }
1721  /* If we don't segmentize, we need to add first point manually */
1722  else
1723  {
1724  ptarray_append_point(pa_out, &p1, LW_TRUE);
1725  }
1726  }
1727  /* Always add the last point */
1728  ptarray_append_point(pa_out, &p2, LW_TRUE);
1729  return pa_out;
1730 }
double x
Definition: liblwgeom.h:352
double sphere_distance(const GEOGRAPHIC_POINT *s, const GEOGRAPHIC_POINT *e)
Given two points on a unit sphere, calculate their distance apart in radians.
Definition: lwgeodetic.c:944
int npoints
Definition: liblwgeom.h:371
POINTARRAY * ptarray_construct_empty(char hasz, char hasm, uint32_t maxpoints)
Create a new POINTARRAY with no points.
Definition: ptarray.c:70
Point in spherical coordinates on the world.
Definition: lwgeodetic.h:52
int ptarray_append_point(POINTARRAY *pa, const POINT4D *pt, int allow_duplicates)
Append a point to the end of an existing POINTARRAY If allow_duplicate is LW_FALSE, then a duplicate point will not be added.
Definition: ptarray.c:156
#define LW_TRUE
Return types for functions with status returns.
Definition: liblwgeom.h:76
void geog2cart(const GEOGRAPHIC_POINT *g, POINT3D *p)
Convert spherical coordinates to cartesion coordinates on unit sphere.
Definition: lwgeodetic.c:400
int ptarray_has_m(const POINTARRAY *pa)
Definition: ptarray.c:43
void geographic_point_init(double lon, double lat, GEOGRAPHIC_POINT *g)
Initialize a geographic point.
Definition: lwgeodetic.c:180
int ptarray_has_z(const POINTARRAY *pa)
Definition: ptarray.c:36
double y
Definition: liblwgeom.h:352
static int ptarray_segmentize_sphere_edge_recursive(const POINT3D *p1, const POINT3D *p2, const POINT4D *v1, const POINT4D *v2, double d, double max_seg_length, POINTARRAY *pa)
Definition: lwgeodetic.c:1629
void lwerror(const char *fmt,...)
Write a notice out to the error handler.
Definition: lwutil.c:190
int getPoint4d_p(const POINTARRAY *pa, int n, POINT4D *point)
Definition: lwgeom_api.c:122
int p4d_same(const POINT4D *p1, const POINT4D *p2)
Definition: lwalgorithm.c:31
Here is the call graph for this function:
Here is the caller graph for this function: