DROP TRIGGER IF EXISTS trigger_flag ON osm_lm_point;
DROP TRIGGER IF EXISTS trigger_refresh ON lm_point.updates;

-- etldoc:  osm_lm_point ->  osm_lm_point
CREATE OR REPLACE FUNCTION update_osm_lm_point() RETURNS void AS
$$
BEGIN
    UPDATE osm_lm_point
    SET subclass = 'subway'
    WHERE station = 'subway'
      AND subclass = 'station';

    UPDATE osm_lm_point
    SET subclass = 'halt'
    WHERE funicular = 'yes'
      AND subclass = 'station';

    UPDATE osm_lm_point
    SET tags = update_tags(tags, geometry)
    WHERE COALESCE(tags->'name:latin', tags->'name:nonlatin', tags->'name_int') IS NULL;

END;
$$ LANGUAGE plpgsql;

SELECT update_osm_lm_point();

CREATE OR REPLACE FUNCTION update_osm_lm_point_agg() RETURNS void AS
$$
BEGIN
    UPDATE osm_lm_point p
    SET agg_stop = CASE
                       WHEN p.subclass IN ('bus_stop', 'bus_station', 'tram_stop', 'subway')
                           THEN 1
        END;

    UPDATE osm_lm_point p
    SET agg_stop = (
        CASE
            WHEN p.subclass IN ('bus_stop', 'bus_station', 'tram_stop', 'subway')
                     AND r.rk IS NULL OR r.rk = 1
                THEN 1
            END)
    FROM osm_lm_stop_rank r
    WHERE p.osm_id = r.osm_id;

END;
$$ LANGUAGE plpgsql;

ALTER TABLE osm_lm_point
    ADD COLUMN IF NOT EXISTS agg_stop integer DEFAULT NULL;
SELECT update_osm_lm_point_agg();

-- Handle updates

CREATE SCHEMA IF NOT EXISTS lm_point;

CREATE TABLE IF NOT EXISTS lm_point.updates
(
    id serial PRIMARY KEY,
    t  text,
    UNIQUE (t)
);
CREATE OR REPLACE FUNCTION lm_point.flag() RETURNS trigger AS
$$
BEGIN
    INSERT INTO lm_point.updates(t) VALUES ('y') ON CONFLICT(t) DO NOTHING;
    RETURN NULL;
END;
$$ LANGUAGE plpgsql;

CREATE OR REPLACE FUNCTION lm_point.refresh() RETURNS trigger AS
$$
BEGIN
    RAISE LOG 'Refresh lm_point';
    PERFORM update_osm_lm_point();
    REFRESH MATERIALIZED VIEW osm_lm_stop_centroid;
    REFRESH MATERIALIZED VIEW osm_lm_stop_rank;
    PERFORM update_osm_lm_point_agg();
    -- noinspection SqlWithoutWhere
    DELETE FROM lm_point.updates;
    RETURN NULL;
END;
$$ LANGUAGE plpgsql;

CREATE TRIGGER trigger_flag
    AFTER INSERT OR UPDATE OR DELETE
    ON osm_lm_point
    FOR EACH STATEMENT
EXECUTE PROCEDURE lm_point.flag();

CREATE CONSTRAINT TRIGGER trigger_refresh
    AFTER INSERT
    ON lm_point.updates
    INITIALLY DEFERRED
    FOR EACH ROW
EXECUTE PROCEDURE lm_point.refresh();
