- local fullmatches = {}
- local key_prefixes = {}
- local key_suffixes = {}
-
- if data.keys ~= nil then
- for _, key in pairs(data.keys) do
- if key:sub(1, 1) == '*' then
- if #key > 1 then
- if key_suffixes[#key - 1] == nil then
- key_suffixes[#key - 1] = {}
- end
- key_suffixes[#key - 1][key:sub(2)] = true
- end
- elseif key:sub(#key, #key) == '*' then
- if key_prefixes[#key - 1] == nil then
- key_prefixes[#key - 1] = {}
- end
- key_prefixes[#key - 1][key:sub(1, #key - 1)] = true
- else
- fullmatches[key] = true
- end
- end
- end
-
- if data.tags ~= nil then
- for k, vlist in pairs(data.tags) do
- if fullmatches[k] == nil then
- fullmatches[k] = {}
- for _, v in pairs(vlist) do
- fullmatches[k][v] = true
- end
- end
- end
- end
-
- return function (k, v)
- if fullmatches[k] ~= nil and (fullmatches[k] == true or fullmatches[k][v] ~= nil) then
- return true
- end
-
- for slen, slist in pairs(key_suffixes) do
- if #k >= slen and slist[k:sub(-slen)] ~= nil then
- return true
- end
- end
-
- for slen, slist in pairs(key_prefixes) do
- if #k >= slen and slist[k:sub(1, slen)] ~= nil then
- return true
- end
- end
-
- return false
- end
-end
-
-
-function module.tag_group(data)
- if data == nil or next(data) == nil then
- return nil
- end
-
- local fullmatches = {}
- local key_prefixes = {}
- local key_suffixes = {}
-
- for group, tags in pairs(data) do
- for _, key in pairs(tags) do
- if key:sub(1, 1) == '*' then
- if #key > 1 then
- if key_suffixes[#key - 1] == nil then
- key_suffixes[#key - 1] = {}
- end
- key_suffixes[#key - 1][key:sub(2)] = group
- end
- elseif key:sub(#key, #key) == '*' then
- if key_prefixes[#key - 1] == nil then
- key_prefixes[#key - 1] = {}
- end
- key_prefixes[#key - 1][key:sub(1, #key - 1)] = group
- else
- fullmatches[key] = group
- end
- end
- end
-
- return function (k, v)
- local val = fullmatches[k]
- if val ~= nil then
- return val
- end
-
- for slen, slist in pairs(key_suffixes) do
- if #k >= slen then
- val = slist[k:sub(-slen)]
- if val ~= nil then
- return val
- end
- end
- end
-
- for slen, slist in pairs(key_prefixes) do
- if #k >= slen then
- val = slist[k:sub(1, slen)]
- if val ~= nil then
- return val
- end
- end
- end
- end
-end
-
--- Returns prefix part of the keys, and reject suffix matching keys
-local function process_key(key)
- if key:sub(1, 1) == '*' then
- return nil
- end
- if key:sub(#key, #key) == '*' then
- return key:sub(1, #key - 2)
- end
- return key
-end
-
--- Process functions for all data types
-function module.process_node(object)
-
- local function geom_func(o)
- return o:as_point()
- end
-
- module.process_tags(Place.new(object, geom_func))
-end
-
-function module.process_way(object)
-
- local function geom_func(o)
- local geom = o:as_polygon()
-
- if geom:is_null() then
- geom = o:as_linestring()
- end
-
- return geom
- end
-
- module.process_tags(Place.new(object, geom_func))
-end
-
-function module.process_relation(object)
- local geom_func = module.RELATION_TYPES[object.tags.type]
-
- if geom_func ~= nil then
- module.process_tags(Place.new(object, geom_func))
- end
-end
-
--- The process functions are used by default by osm2pgsql.
-osm2pgsql.process_node = module.process_node
-osm2pgsql.process_way = module.process_way
-osm2pgsql.process_relation = module.process_relation
-
-function module.process_tags(o)
- o:clean{delete = PRE_DELETE, extra = PRE_EXTRAS}
-
- -- Exception for boundary/place double tagging
- if o.object.tags.boundary == 'administrative' then
- o:grab_extratags{match = function (k, v)
- return k == 'place' and v:sub(1,3) ~= 'isl'
- end}
- end
-
- -- name keys
- local fallback = o:grab_name_parts{groups=NAMES}
-
- -- address keys
- if o:grab_address_parts{groups=ADDRESS_TAGS} > 0 and fallback == nil then
- fallback = {'place', 'house', 'always'}
- end
- if o.address.country ~= nil and #o.address.country ~= 2 then
- o.address['country'] = nil
- end
- if POSTCODE_FALLBACK and fallback == nil and o.address.postcode ~= nil then
- fallback = {'place', 'postcode', 'always'}
- end
-
- if o.address.interpolation ~= nil then
- o:write_place('place', 'houses', 'always', SAVE_EXTRA_MAINS)
- return
- end
-
- o:clean{delete = POST_DELETE}
-
- -- collect main keys
- for k, v in pairs(o.object.tags) do
- local ktype = MAIN_KEYS[k]
- if ktype == 'fallback' then
- if o.has_name then
- fallback = {k, v, 'named'}
- end
- elseif ktype ~= nil then
- o:write_place(k, v, MAIN_KEYS[k], SAVE_EXTRA_MAINS)
- end
- end
-
- if fallback ~= nil and o.num_entries == 0 then
- o:write_place(fallback[1], fallback[2], fallback[3], SAVE_EXTRA_MAINS)
- end
-end
-
---------- Convenience functions for simple style configuration -----------------
-
-
-function module.set_prefilters(data)
- PRE_DELETE = module.tag_match{keys = data.delete_keys, tags = data.delete_tags}
- PRE_EXTRAS = module.tag_match{keys = data.extra_keys,
- tags = data.extra_tags}
- module.TAGINFO_MAIN.delete_tags = data.delete_tags
-end
-
-function module.set_main_tags(data)
- MAIN_KEYS = data
- local keys = {}
- for k, _ in pairs(data) do
- table.insert(keys, k)
- end
- module.TAGINFO_MAIN.keys = keys
-end
-
-function module.set_name_tags(data)
- NAMES = module.tag_group(data)
-
- for _, lst in pairs(data) do
- for _, k in ipairs(lst) do
- local key = process_key(k)
- if key ~= nil then
- module.TAGINFO_NAME_KEYS[key] = true
- end
- end
- end
-end
-
-function module.set_address_tags(data)
- if data.postcode_fallback ~= nil then
- POSTCODE_FALLBACK = data.postcode_fallback
- data.postcode_fallback = nil
- end
- ADDRESS_TAGS = module.tag_group(data)
-
- for _, lst in pairs(data) do
- if lst ~= nil then
- for _, k in ipairs(lst) do
- local key = process_key(k)
- if key ~= nil then
- module.TAGINFO_ADDRESS_KEYS[key] = true
- end
- end
- end
- end
-end
-
-function module.set_unused_handling(data)
- if data.extra_keys == nil and data.extra_tags == nil then
- POST_DELETE = module.tag_match{keys = data.delete_keys, tags = data.delete_tags}
- SAVE_EXTRA_MAINS = function() return true end
- elseif data.delete_keys == nil and data.delete_tags == nil then
- POST_DELETE = nil
- SAVE_EXTRA_MAINS = module.tag_match{keys = data.extra_keys, tags = data.extra_tags}
- else
- error("unused handler can have only 'extra_keys' or 'delete_keys' set.")
- end
-end
-
-function module.set_relation_types(data)
- module.RELATION_TYPES = {}
- for k, v in data do
- if v == 'multipolygon' then
- module.RELATION_TYPES[k] = module.relation_as_multipolygon
- elseif v == 'multiline' then
- module.RELATION_TYPES[k] = module.relation_as_multiline
- end
- end