PostGIS 3.7.0dev-r@@SVN_REVISION@@
Loading...
Searching...
No Matches

◆ lw_dist2d_fast_ptarray_ptarray()

int lw_dist2d_fast_ptarray_ptarray ( POINTARRAY l1,
POINTARRAY l2,
DISTPTS dl,
GBOX box1,
GBOX box2 
)

The new faster calculation comparing pointarray to another pointarray the arrays can come from both polygons and linestrings.

The naming is not good but comes from that it compares a chosen selection of the points not all of them

Definition at line 1947 of file measures.c.

1948{
1949 /*here we define two lists to hold our calculated "z"-values and the order number in the geometry*/
1950
1951 double k, thevalue;
1952 float deltaX, deltaY, c1m, c2m;
1953 POINT2D c1, c2;
1954 const POINT2D *theP;
1955 float min1X, max1X, max1Y, min1Y, min2X, max2X, max2Y, min2Y;
1956 int t;
1957 int n1 = l1->npoints;
1958 int n2 = l2->npoints;
1959
1960 LISTSTRUCT *list1, *list2;
1961 list1 = (LISTSTRUCT *)lwalloc(sizeof(LISTSTRUCT) * n1);
1962 list2 = (LISTSTRUCT *)lwalloc(sizeof(LISTSTRUCT) * n2);
1963
1964 LWDEBUG(2, "lw_dist2d_fast_ptarray_ptarray is called");
1965
1966 max1X = box1->xmax;
1967 min1X = box1->xmin;
1968 max1Y = box1->ymax;
1969 min1Y = box1->ymin;
1970 max2X = box2->xmax;
1971 min2X = box2->xmin;
1972 max2Y = box2->ymax;
1973 min2Y = box2->ymin;
1974 /*we want the center of the bboxes, and calculate the slope between the centerpoints*/
1975 c1.x = min1X + (max1X - min1X) / 2;
1976 c1.y = min1Y + (max1Y - min1Y) / 2;
1977 c2.x = min2X + (max2X - min2X) / 2;
1978 c2.y = min2Y + (max2Y - min2Y) / 2;
1979
1980 deltaX = (c2.x - c1.x);
1981 deltaY = (c2.y - c1.y);
1982
1983 /*Here we calculate where the line perpendicular to the center-center line crosses the axes for each vertex
1984 if the center-center line is vertical the perpendicular line will be horizontal and we find it's crossing the
1985 Y-axes with z = y-kx */
1986 if ((deltaX * deltaX) < (deltaY * deltaY)) /*North or South*/
1987 {
1988 k = -deltaX / deltaY;
1989 for (t = 0; t < n1; t++) /*for each segment in L1 */
1990 {
1991 theP = getPoint2d_cp(l1, t);
1992 thevalue = theP->y - (k * theP->x);
1993 list1[t].themeasure = thevalue;
1994 list1[t].pnr = t;
1995 }
1996 for (t = 0; t < n2; t++) /*for each segment in L2*/
1997 {
1998 theP = getPoint2d_cp(l2, t);
1999 thevalue = theP->y - (k * theP->x);
2000 list2[t].themeasure = thevalue;
2001 list2[t].pnr = t;
2002 }
2003 c1m = c1.y - (k * c1.x);
2004 c2m = c2.y - (k * c2.x);
2005 }
2006
2007 /*if the center-center line is horizontal the perpendicular line will be vertical. To eliminate problems with
2008 dividing by zero we are here mirroring the coordinate-system and we find it's crossing the X-axes with z =
2009 x-(1/k)y */
2010 else /*West or East*/
2011 {
2012 k = -deltaY / deltaX;
2013 for (t = 0; t < n1; t++) /*for each segment in L1 */
2014 {
2015 theP = getPoint2d_cp(l1, t);
2016 thevalue = theP->x - (k * theP->y);
2017 list1[t].themeasure = thevalue;
2018 list1[t].pnr = t;
2019 /* lwnotice("l1 %d, measure=%f",t,thevalue ); */
2020 }
2021 for (t = 0; t < n2; t++) /*for each segment in L2*/
2022 {
2023 theP = getPoint2d_cp(l2, t);
2024 thevalue = theP->x - (k * theP->y);
2025 list2[t].themeasure = thevalue;
2026 list2[t].pnr = t;
2027 /* lwnotice("l2 %d, measure=%f",t,thevalue ); */
2028 }
2029 c1m = c1.x - (k * c1.y);
2030 c2m = c2.x - (k * c2.y);
2031 }
2032
2033 /*we sort our lists by the calculated values*/
2034 qsort(list1, n1, sizeof(LISTSTRUCT), struct_cmp_by_measure);
2035 qsort(list2, n2, sizeof(LISTSTRUCT), struct_cmp_by_measure);
2036
2037 if (c1m < c2m)
2038 {
2039 if (!lw_dist2d_pre_seg_seg(l1, l2, list1, list2, k, dl))
2040 {
2041 lwfree(list1);
2042 lwfree(list2);
2043 return LW_FALSE;
2044 }
2045 }
2046 else
2047 {
2048 dl->twisted = ((dl->twisted) * (-1));
2049 if (!lw_dist2d_pre_seg_seg(l2, l1, list2, list1, k, dl))
2050 {
2051 lwfree(list1);
2052 lwfree(list2);
2053 return LW_FALSE;
2054 }
2055 }
2056 lwfree(list1);
2057 lwfree(list2);
2058 return LW_TRUE;
2059}
#define LW_FALSE
Definition liblwgeom.h:94
void * lwalloc(size_t size)
Definition lwutil.c:227
void lwfree(void *mem)
Definition lwutil.c:248
#define LW_TRUE
Return types for functions with status returns.
Definition liblwgeom.h:93
#define LWDEBUG(level, msg)
Definition lwgeom_log.h:101
static const POINT2D * getPoint2d_cp(const POINTARRAY *pa, uint32_t n)
Returns a POINT2D pointer into the POINTARRAY serialized_ptlist, suitable for reading from.
Definition lwinline.h:97
int struct_cmp_by_measure(const void *a, const void *b)
Definition measures.c:2062
int lw_dist2d_pre_seg_seg(POINTARRAY *l1, POINTARRAY *l2, LISTSTRUCT *list1, LISTSTRUCT *list2, double k, DISTPTS *dl)
preparation before lw_dist2d_seg_seg.
Definition measures.c:2071
int twisted
Definition measures.h:55
double ymax
Definition liblwgeom.h:357
double xmax
Definition liblwgeom.h:355
double ymin
Definition liblwgeom.h:356
double xmin
Definition liblwgeom.h:354
double themeasure
Definition measures.h:61
double y
Definition liblwgeom.h:390
double x
Definition liblwgeom.h:390
uint32_t npoints
Definition liblwgeom.h:427

References getPoint2d_cp(), lw_dist2d_pre_seg_seg(), LW_FALSE, LW_TRUE, lwalloc(), LWDEBUG, lwfree(), POINTARRAY::npoints, LISTSTRUCT::pnr, struct_cmp_by_measure(), LISTSTRUCT::themeasure, DISTPTS::twisted, POINT2D::x, GBOX::xmax, GBOX::xmin, POINT2D::y, GBOX::ymax, and GBOX::ymin.

Referenced by lw_dist2d_distribute_fast().

Here is the call graph for this function:
Here is the caller graph for this function: