PostGIS  2.2.7dev-r@@SVN_REVISION@@
int lw_dist2d_pt_arc ( const POINT2D P,
const POINT2D A1,
const POINT2D A2,
const POINT2D A3,
DISTPTS dl 
)

Definition at line 1421 of file measures.c.

References DISTPTS::distance, distance2d_pt_pt(), FP_EQUALS, lw_arc_center(), lw_arc_is_pt(), lw_dist2d_pt_pt(), lw_dist2d_pt_seg(), lw_pt_in_arc(), LW_TRUE, lwerror(), DISTPTS::mode, DISTPTS::p1, DISTPTS::p2, p2d_same(), POINT2D::x, and POINT2D::y.

Referenced by lw_dist2d_arc_arc(), lw_dist2d_pt_ptarrayarc(), lw_dist2d_seg_arc(), and test_lw_dist2d_pt_arc().

1422 {
1423  double radius_A, d;
1424  POINT2D C; /* center of circle defined by arc A */
1425  POINT2D X; /* point circle(A) where line from C to P crosses */
1426 
1427  if ( dl->mode < 0 )
1428  lwerror("lw_dist2d_pt_arc does not support maxdistance mode");
1429 
1430  /* What if the arc is a point? */
1431  if ( lw_arc_is_pt(A1, A2, A3) )
1432  return lw_dist2d_pt_pt(P, A1, dl);
1433 
1434  /* Calculate centers and radii of circles. */
1435  radius_A = lw_arc_center(A1, A2, A3, &C);
1436 
1437  /* This "arc" is actually a line (A2 is colinear with A1,A3) */
1438  if ( radius_A < 0.0 )
1439  return lw_dist2d_pt_seg(P, A1, A3, dl);
1440 
1441  /* Distance from point to center */
1442  d = distance2d_pt_pt(&C, P);
1443 
1444  /* P is the center of the circle */
1445  if ( FP_EQUALS(d, 0.0) )
1446  {
1447  dl->distance = radius_A;
1448  dl->p1 = *A1;
1449  dl->p2 = *P;
1450  return LW_TRUE;
1451  }
1452 
1453  /* X is the point on the circle where the line from P to C crosses */
1454  X.x = C.x + (P->x - C.x) * radius_A / d;
1455  X.y = C.y + (P->y - C.y) * radius_A / d;
1456 
1457  /* Is crossing point inside the arc? Or arc is actually circle? */
1458  if ( p2d_same(A1, A3) || lw_pt_in_arc(&X, A1, A2, A3) )
1459  {
1460  lw_dist2d_pt_pt(P, &X, dl);
1461  }
1462  else
1463  {
1464  /* Distance is the minimum of the distances to the arc end points */
1465  lw_dist2d_pt_pt(A1, P, dl);
1466  lw_dist2d_pt_pt(A3, P, dl);
1467  }
1468  return LW_TRUE;
1469 }
double lw_arc_center(const POINT2D *p1, const POINT2D *p2, const POINT2D *p3, POINT2D *result)
Determines the center of the circle defined by the three given points.
Definition: lwalgorithm.c:213
int lw_arc_is_pt(const POINT2D *A1, const POINT2D *A2, const POINT2D *A3)
Returns true if arc A is actually a point (all vertices are the same) .
Definition: lwalgorithm.c:91
int mode
Definition: measures.h:27
POINT2D p1
Definition: measures.h:25
double x
Definition: liblwgeom.h:312
int p2d_same(const POINT2D *p1, const POINT2D *p2)
Definition: lwalgorithm.c:35
#define LW_TRUE
Return types for functions with status returns.
Definition: liblwgeom.h:61
int lw_dist2d_pt_seg(const POINT2D *p, const POINT2D *A, const POINT2D *B, DISTPTS *dl)
lw_dist2d_comp from p to line A->B This one is now sending every occation to lw_dist2d_pt_pt Before i...
Definition: measures.c:2189
POINT2D p2
Definition: measures.h:26
double y
Definition: liblwgeom.h:312
int lw_pt_in_arc(const POINT2D *P, const POINT2D *A1, const POINT2D *A2, const POINT2D *A3)
Returns true if P is on the same side of the plane partition defined by A1/A3 as A2 is...
Definition: lwalgorithm.c:71
double distance
Definition: measures.h:24
double distance2d_pt_pt(const POINT2D *p1, const POINT2D *p2)
The old function nessecary for ptarray_segmentize2d in ptarray.c.
Definition: measures.c:2301
#define FP_EQUALS(A, B)
void lwerror(const char *fmt,...)
Write a notice out to the error handler.
Definition: lwutil.c:74
int lw_dist2d_pt_pt(const POINT2D *thep1, const POINT2D *thep2, DISTPTS *dl)
Compares incomming points and stores the points closest to each other or most far away from each othe...
Definition: measures.c:2265

Here is the call graph for this function:

Here is the caller graph for this function: