I would like to reformat all of our SQL to have a concise coding style. This makes it far easier to understand the code for a casual contributor, and lets us spot errors more easily. Most importantly, it makes it much easier to grep (search) the code because it is more likely to be in the same syntax Some key changes: * SQL keywords are always UPPERCASE, e.g. `SELECT WHEN AS END ...` * types, variables, aliases, and field names (identifiers) are always lower case * `LANGUAGE 'plpgsql'` is now `LANGUAGE plpgsql` (no quotes) * a few minor spacing/semicolon cleanups P.S. Per @TomPohys request, `TABLE` is spelled using upper case despite being a type for consistency with PG Docs. Same for `LANGUAGE SQL` vs `LANGUAGE plpgsql`.
62 lines
2.2 KiB
PL/PgSQL
62 lines
2.2 KiB
PL/PgSQL
-- etldoc: layer_mountain_peak[shape=record fillcolor=lightpink,
|
|
-- etldoc: style="rounded,filled", label="layer_mountain_peak | <z7_> z7+" ] ;
|
|
|
|
CREATE OR REPLACE FUNCTION layer_mountain_peak(bbox geometry,
|
|
zoom_level integer,
|
|
pixel_width numeric)
|
|
RETURNS TABLE
|
|
(
|
|
osm_id bigint,
|
|
geometry geometry,
|
|
name text,
|
|
name_en text,
|
|
name_de text,
|
|
class text,
|
|
tags hstore,
|
|
ele int,
|
|
ele_ft int,
|
|
"rank" int
|
|
)
|
|
AS
|
|
$$
|
|
SELECT
|
|
-- etldoc: osm_peak_point -> layer_mountain_peak:z7_
|
|
osm_id,
|
|
geometry,
|
|
name,
|
|
name_en,
|
|
name_de,
|
|
tags->'natural' AS class,
|
|
tags,
|
|
ele::int,
|
|
ele_ft::int,
|
|
rank::int
|
|
FROM (
|
|
SELECT osm_id,
|
|
geometry,
|
|
name,
|
|
COALESCE(NULLIF(name_en, ''), name) AS name_en,
|
|
COALESCE(NULLIF(name_de, ''), name, name_en) AS name_de,
|
|
tags,
|
|
substring(ele FROM E'^(-?\\d+)(\\D|$)')::int AS ele,
|
|
round(substring(ele FROM E'^(-?\\d+)(\\D|$)')::int * 3.2808399)::int AS ele_ft,
|
|
row_number() OVER (
|
|
PARTITION BY LabelGrid(geometry, 100 * pixel_width)
|
|
ORDER BY (
|
|
substring(ele FROM E'^(-?\\d+)(\\D|$)')::int +
|
|
(CASE WHEN NULLIF(wikipedia, '') IS NOT NULL THEN 10000 ELSE 0 END) +
|
|
(CASE WHEN NULLIF(name, '') IS NOT NULL THEN 10000 ELSE 0 END)
|
|
) DESC
|
|
)::int AS "rank"
|
|
FROM osm_peak_point
|
|
WHERE geometry && bbox
|
|
AND ele IS NOT NULL
|
|
AND ele ~ E'^-?\\d{1,4}(\\D|$)'
|
|
) AS ranked_peaks
|
|
WHERE zoom_level >= 7
|
|
AND (rank <= 5 OR zoom_level >= 14)
|
|
ORDER BY "rank" ASC;
|
|
|
|
$$ LANGUAGE SQL IMMUTABLE
|
|
PARALLEL SAFE;
|