PostGIS  3.4.0dev-r@@SVN_REVISION@@

◆ closest_point_on_segment()

void closest_point_on_segment ( const POINT4D R,
const POINT4D A,
const POINT4D B,
POINT4D ret 
)

Definition at line 1276 of file ptarray.c.

1277 {
1278  double r;
1279 
1280  if ( FP_EQUALS(A->x, B->x) && FP_EQUALS(A->y, B->y) )
1281  {
1282  *ret = *A;
1283  return;
1284  }
1285 
1286  /*
1287  * We use comp.graphics.algorithms Frequently Asked Questions method
1288  *
1289  * (1) AC dot AB
1290  * r = ----------
1291  * ||AB||^2
1292  * r has the following meaning:
1293  * r=0 P = A
1294  * r=1 P = B
1295  * r<0 P is on the backward extension of AB
1296  * r>1 P is on the forward extension of AB
1297  * 0<r<1 P is interior to AB
1298  *
1299  */
1300  r = ( (p->x-A->x) * (B->x-A->x) + (p->y-A->y) * (B->y-A->y) )/( (B->x-A->x)*(B->x-A->x) +(B->y-A->y)*(B->y-A->y) );
1301 
1302  if (r<=0)
1303  {
1304  *ret = *A;
1305  return;
1306  }
1307  if (r>=1)
1308  {
1309  *ret = *B;
1310  return;
1311  }
1312 
1313  ret->x = A->x + ( (B->x - A->x) * r );
1314  ret->y = A->y + ( (B->y - A->y) * r );
1315  ret->z = A->z + ( (B->z - A->z) * r );
1316  ret->m = A->m + ( (B->m - A->m) * r );
1317 }
char * r
Definition: cu_in_wkt.c:24
#define FP_EQUALS(A, B)
double m
Definition: liblwgeom.h:414
double x
Definition: liblwgeom.h:414
double z
Definition: liblwgeom.h:414
double y
Definition: liblwgeom.h:414

References FP_EQUALS, POINT4D::m, r, POINT4D::x, POINT4D::y, and POINT4D::z.

Referenced by lwline_split_by_point_to(), ptarray_locate_point(), and test_ptarray_closest_point_on_segment().

Here is the caller graph for this function: