gis.road_graph

Parameters

Name	Type	Mode
		IN

Definition

DECLARE
    new_jsonb jsonb;
    sql_text text;
    managed_object record;
    point_references jsonb;
    start_references jsonb;
    end_references jsonb;
BEGIN
    -- Trigger disabled by session variable
    -- This variable can be set for example when merging the editing session schema
    -- The managed object would be updated and the trigger must not be run
    IF road_graph.get_current_setting('road.graph.disable.trigger', '0') = '1'
    THEN
        RETURN NEW;
    END IF;

new_jsonb = to_jsonb(NEW);

-- Check road_code values
    IF NOT new_jsonb ? 'road_code' THEN
        RAISE NOTICE 'The given feature does not have the mandatory column road_code !';
        RETURN NEW;
    END IF;

-- Get info on the managed object table
    sql_text = format(
        $SQL$
        SELECT *
        FROM road_graph.managed_objects
        WHERE
            schema_name = %1$L
            AND table_name = %2$L
        LIMIT 1;
        $SQL$,
        TG_TABLE_SCHEMA,
        TG_TABLE_NAME
    );
    EXECUTE sql_text
    INTO managed_object
    ;
    IF managed_object IS NULL THEN
        RAISE NOTICE 'The table "%"."%" is not registered as managed object in the road graph system !', TG_TABLE_SCHEMA, TG_TABLE_NAME;
        RETURN NEW;
    END IF;

IF lower(managed_object.geometry_type) IN ('linestring', 'multilinestring')
    THEN
        -- LINESTRING
        -- Get the references of the start & end points
        start_references = road_graph.get_reference_from_point(
            CASE
                WHEN lower(GeometryType(NEW.geom)) = 'linestring'
                    THEN ST_StartPoint(NEW.geom)
                -- hopefully the last part is really the end part of the multilinestring
                ELSE ST_StartPoint(ST_GeometryN(NEW.geom, 1))
            END,
            Nullif(
                trim(new_jsonb->>'road_code'),
                ''
            )
        );
        end_references = road_graph.get_reference_from_point(
            CASE
                WHEN lower(GeometryType(NEW.geom)) = 'linestring'
                    THEN ST_EndPoint(NEW.geom)
                -- hopefully the last part is really the end part of the multilinestring
                ELSE ST_EndPoint(ST_GeometryN(NEW.geom, ST_NumGeometries(NEW.geom)))
            END,
            Nullif(
                trim(new_jsonb->>'road_code'),
                ''
            )
        );

-- The references of the managed lines follow the road direction (start before end),
        -- like in the function update_table_references_from_geometries:
        -- invert start and end if the line is digitized in the opposite direction of the road
        IF (
            (start_references->>'marker_code')::integer,
            (start_references->>'abscissa')::real
        ) > (
            (end_references->>'marker_code')::integer,
            (end_references->>'abscissa')::real
        ) THEN
            SELECT end_references, start_references
            INTO start_references, end_references;
        END IF;

-- Update the NEW object with the given references

-- road_code - keep object road_code intact if it is not empty
        NEW.road_code =
        CASE
            WHEN Coalesce(NEW.road_code, '') != ''
                THEN NEW.road_code
            ELSE start_references->>'road_code'
        END;

-- start_marker_code
        IF new_jsonb ? 'start_marker_code' THEN
            NEW.start_marker_code = (start_references->>'marker_code')::int;
        END IF;

-- start_abscissa
        IF new_jsonb ? 'start_abscissa' THEN
            NEW.start_abscissa = (start_references->>'abscissa')::real;
        END IF;

-- start_cumulative
        IF new_jsonb ? 'start_cumulative' THEN
            NEW.start_cumulative = (start_references->>'cumulative')::real;
        END IF;

-- end_marker_code
        IF new_jsonb ? 'end_marker_code' THEN
            NEW.end_marker_code = (end_references->>'marker_code')::int;
        END IF;

-- end_abscissa
        IF new_jsonb ? 'end_abscissa' THEN
            NEW.end_abscissa = (end_references->>'abscissa')::real;
        END IF;

-- end_cumulative
        IF new_jsonb ? 'end_cumulative' THEN
            NEW.end_cumulative = (end_references->>'cumulative')::real;
        END IF;

-- offset
        IF new_jsonb ? 'offset' THEN
            NEW.offset = Coalesce((start_references->>'offset')::real, 0.0::real);
        END IF;

-- side
        IF new_jsonb ? 'side' THEN
            NEW.side = Coalesce(start_references->>'side', 'right');
        END IF;
    ELSE
        -- POINT
        point_references = road_graph.get_reference_from_point(
            NEW.geom,
            Nullif(
                trim(new_jsonb->>'road_code'),
                ''
            )
        );

-- Update the NEW object with the given references
        -- road_code - keep object road_code intact if it is not empty
        NEW.road_code =
        CASE
            WHEN Coalesce(NEW.road_code, '') != ''
                THEN NEW.road_code
            ELSE point_references->>'road_code'
        END;

-- marker_code
        IF new_jsonb ? 'marker_code' THEN
            NEW.marker_code = (point_references->>'marker_code')::int;
        END IF;

-- abscissa
        IF new_jsonb ? 'abscissa' THEN
            NEW.abscissa = (point_references->>'abscissa')::real;
        END IF;

-- cumulative
        IF new_jsonb ? 'cumulative' THEN
            NEW.cumulative = (point_references->>'cumulative')::real;
        END IF;

-- offset
        IF new_jsonb ? 'offset' THEN
            NEW.offset = Coalesce((point_references->>'offset')::real, 0.0::real);
        END IF;

-- side
        IF new_jsonb ? 'side' THEN
            NEW.side = Coalesce(point_references->>'side', 'right');
        END IF;

END IF;

RETURN NEW;
END;

calculate_managed_object_references()

Description

Parameters

Definition