geography_distance()

Datum geography_distance

(

PG_FUNCTION_ARGS

)

Definition at line 206 of file geography_measurement.c.

{
        GSERIALIZED* g1 = NULL;
        GSERIALIZED* g2 = NULL;
        double distance;
        bool use_spheroid = true;
        SPHEROID s;
 
        /* Get our geometry objects loaded into memory. */
        g1 = PG_GETARG_GSERIALIZED_P(0);
        g2 = PG_GETARG_GSERIALIZED_P(1);
 
        if (PG_NARGS() > 2)
                use_spheroid = PG_GETARG_BOOL(2);
 
        gserialized_error_if_srid_mismatch(g1, g2, __func__);
 
        /* Initialize spheroid */
        spheroid_init_from_srid(fcinfo, gserialized_get_srid(g1), &s);
 
        /* Set to sphere if requested */
        if ( ! use_spheroid )
                s.a = s.b = s.radius;
 
        /* Return NULL on empty arguments. */
        if ( gserialized_is_empty(g1) || gserialized_is_empty(g2) )
        {
                PG_FREE_IF_COPY(g1, 0);
                PG_FREE_IF_COPY(g2, 1);
                PG_RETURN_NULL();
        }
 
        /* Do the brute force calculation if the cached calculation doesn't tick over */
        if ( LW_FAILURE == geography_distance_cache(fcinfo, g1, g2, &s, &distance) )
        {
                /* default to using tree-based distance calculation at all times */
                /* in standard distance call. */
                geography_tree_distance(g1, g2, &s, FP_TOLERANCE, &distance);
                /*
                LWGEOM* lwgeom1 = lwgeom_from_gserialized(g1);
                LWGEOM* lwgeom2 = lwgeom_from_gserialized(g2);
                distance = lwgeom_distance_spheroid(lwgeom1, lwgeom2, &s, tolerance);
                lwgeom_free(lwgeom1);
                lwgeom_free(lwgeom2);
                */
        }
 
        /* Clean up */
        PG_FREE_IF_COPY(g1, 0);
        PG_FREE_IF_COPY(g2, 1);
 
        /* Knock off any funny business at the nanometer level, ticket #2168 */
        distance = round(distance * INVMINDIST) / INVMINDIST;
 
        /* Something went wrong, negative return... should already be eloged, return NULL */
        if ( distance < 0.0 )
        {
                elog(ERROR, "distance returned negative!");
                PG_RETURN_NULL();
        }
 
        PG_RETURN_FLOAT8(distance);
}

References distance(), FP_TOLERANCE, geography_distance_cache(), geography_tree_distance(), gserialized_error_if_srid_mismatch(), gserialized_get_srid(), gserialized_is_empty(), INVMINDIST, LW_FAILURE, and s.

Here is the call graph for this function: