2012-09-19 12:35:45 -04:00
|
|
|
-- Begin of globals
|
|
|
|
|
2012-10-03 13:04:56 -04:00
|
|
|
barrier_whitelist = { [""] = true, ["bollard"] = true, ["entrance"] = true, ["cattle_grid"] = true, ["border_control"] = true, ["toll_booth"] = true, ["no"] = true, ["sally_port"] = true, ["gate"] = true}
|
2012-10-04 02:36:14 -04:00
|
|
|
access_tag_whitelist = { ["yes"] = true, ["permissive"] = true, ["designated"] = true }
|
|
|
|
access_tag_blacklist = { ["no"] = true, ["private"] = true, ["agricultural"] = true, ["forestery"] = true }
|
2012-09-19 12:35:45 -04:00
|
|
|
access_tag_restricted = { ["destination"] = true, ["delivery"] = true }
|
2012-10-04 02:36:14 -04:00
|
|
|
access_tags_hierachy = { "bicycle", "vehicle", "access" }
|
2012-09-19 12:35:45 -04:00
|
|
|
service_tag_restricted = { ["parking_aisle"] = true }
|
|
|
|
ignore_in_grid = { ["ferry"] = true }
|
|
|
|
|
|
|
|
speed_profile = {
|
2012-09-27 02:46:36 -04:00
|
|
|
["cycleway"] = 18,
|
|
|
|
["primary"] = 17,
|
|
|
|
["primary_link"] = 17,
|
|
|
|
["secondary"] = 18,
|
|
|
|
["secondary_link"] = 18,
|
|
|
|
["tertiary"] = 18,
|
2012-09-30 08:40:59 -04:00
|
|
|
["tertiary_link"] = 18,
|
2012-09-27 02:46:36 -04:00
|
|
|
["residential"] = 18,
|
|
|
|
["unclassified"] = 16,
|
|
|
|
["living_street"] = 16,
|
|
|
|
["road"] = 16,
|
|
|
|
["service"] = 16,
|
|
|
|
["track"] = 13,
|
|
|
|
["path"] = 13,
|
|
|
|
["footway"] = 5,
|
|
|
|
["pedestrian"] = 5,
|
|
|
|
["pier"] = 5,
|
|
|
|
["steps"] = 1,
|
2012-09-27 07:49:49 -04:00
|
|
|
["default"] = 18,
|
|
|
|
["ferry"] = 5
|
2012-09-19 12:35:45 -04:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
take_minimum_of_speeds = true
|
|
|
|
obey_oneway = true
|
|
|
|
obey_bollards = false
|
|
|
|
use_restrictions = true
|
|
|
|
ignore_areas = true -- future feature
|
|
|
|
traffic_signal_penalty = 2
|
|
|
|
u_turn_penalty = 20
|
|
|
|
|
|
|
|
-- End of globals
|
|
|
|
|
2012-10-04 02:36:14 -04:00
|
|
|
--find first tag in access hierachy which is set
|
|
|
|
function find_access_tag(source)
|
|
|
|
for i,v in ipairs(access_tags_hierachy) do
|
|
|
|
local tag = source.tags:Find(v)
|
|
|
|
if tag ~= '' then --and tag ~= "" then
|
|
|
|
return tag
|
|
|
|
end
|
|
|
|
end
|
|
|
|
return nil
|
|
|
|
end
|
|
|
|
|
2012-09-19 12:35:45 -04:00
|
|
|
function node_function (node)
|
2012-09-27 02:46:36 -04:00
|
|
|
local barrier = node.tags:Find ("barrier")
|
2012-10-04 02:36:14 -04:00
|
|
|
local access = find_access_tag(node)
|
2012-09-27 02:46:36 -04:00
|
|
|
local traffic_signal = node.tags:Find("highway")
|
|
|
|
|
2012-10-03 13:04:56 -04:00
|
|
|
-- flag node if it carries a traffic light
|
2012-09-27 02:46:36 -04:00
|
|
|
if traffic_signal == "traffic_signals" then
|
2012-10-03 13:04:56 -04:00
|
|
|
node.traffic_light = true
|
2012-09-27 02:46:36 -04:00
|
|
|
end
|
|
|
|
|
2012-10-03 13:04:56 -04:00
|
|
|
-- parse access and barrier tags
|
2012-10-04 02:36:14 -04:00
|
|
|
if access and access ~= "" then
|
2012-10-03 13:04:56 -04:00
|
|
|
if access_tag_blacklist[access] then
|
|
|
|
node.bollard = true
|
|
|
|
else
|
|
|
|
node.bollard = false
|
2012-09-27 02:46:36 -04:00
|
|
|
end
|
2012-10-04 02:36:14 -04:00
|
|
|
elseif barrier and barrier ~= "" then
|
2012-10-03 13:04:56 -04:00
|
|
|
if barrier_whitelist[barrier] then
|
|
|
|
node.bollard = false
|
|
|
|
else
|
|
|
|
node.bollard = true
|
2012-09-27 02:46:36 -04:00
|
|
|
end
|
|
|
|
end
|
2012-10-03 13:04:56 -04:00
|
|
|
|
2012-09-27 02:46:36 -04:00
|
|
|
return 1
|
2012-09-19 12:35:45 -04:00
|
|
|
end
|
|
|
|
|
|
|
|
function way_function (way, numberOfNodesInWay)
|
2012-09-27 02:46:36 -04:00
|
|
|
-- A way must have two nodes or more
|
|
|
|
if(numberOfNodesInWay < 2) then
|
|
|
|
return 0;
|
2012-09-19 12:35:45 -04:00
|
|
|
end
|
2012-09-27 02:46:36 -04:00
|
|
|
|
|
|
|
-- First, get the properties of each way that we come across
|
|
|
|
local highway = way.tags:Find("highway")
|
|
|
|
local name = way.tags:Find("name")
|
|
|
|
local ref = way.tags:Find("ref")
|
|
|
|
local junction = way.tags:Find("junction")
|
|
|
|
local route = way.tags:Find("route")
|
|
|
|
local maxspeed = parseMaxspeed(way.tags:Find ( "maxspeed") )
|
|
|
|
local man_made = way.tags:Find("man_made")
|
|
|
|
local barrier = way.tags:Find("barrier")
|
|
|
|
local oneway = way.tags:Find("oneway")
|
|
|
|
local onewayClass = way.tags:Find("oneway:bicycle")
|
|
|
|
local cycleway = way.tags:Find("cycleway")
|
|
|
|
local duration = way.tags:Find("duration")
|
|
|
|
local service = way.tags:Find("service")
|
|
|
|
local area = way.tags:Find("area")
|
2012-10-04 02:36:14 -04:00
|
|
|
local access = find_access_tag(way)
|
2012-09-27 02:46:36 -04:00
|
|
|
|
2012-09-19 12:35:45 -04:00
|
|
|
|
2012-10-03 13:04:56 -04:00
|
|
|
-- Check if we are allowed to access the way
|
2012-10-04 02:36:14 -04:00
|
|
|
if access_tag_blacklist[access] then
|
2012-10-03 13:04:56 -04:00
|
|
|
return 0
|
|
|
|
end
|
|
|
|
|
2012-09-27 02:46:36 -04:00
|
|
|
-- Set the name that will be used for instructions
|
2012-09-19 12:35:45 -04:00
|
|
|
if "" ~= ref then
|
2012-09-27 02:46:36 -04:00
|
|
|
way.name = ref
|
2012-09-19 12:35:45 -04:00
|
|
|
elseif "" ~= name then
|
2012-09-27 02:46:36 -04:00
|
|
|
way.name = name
|
|
|
|
else
|
|
|
|
way.name = highway -- if no name exists, use way type
|
2012-09-19 12:35:45 -04:00
|
|
|
end
|
|
|
|
|
2012-09-27 07:49:49 -04:00
|
|
|
-- Handling ferries and piers
|
|
|
|
if (speed_profile[route] ~= nil and speed_profile[route] > 0) or
|
|
|
|
(speed_profile[man_made] ~= nil and speed_profile[man_made] > 0)
|
|
|
|
then
|
|
|
|
if durationIsValid(duration) then
|
|
|
|
way.speed = math.max( duration / math.max(1, numberOfNodesInWay-1) );
|
|
|
|
way.is_duration_set = true;
|
|
|
|
end
|
|
|
|
way.direction = Way.bidirectional;
|
|
|
|
if speed_profile[route] ~= nil then
|
|
|
|
highway = route;
|
|
|
|
elseif speed_profile[man_made] ~= nil then
|
|
|
|
highway = man_made;
|
|
|
|
end
|
|
|
|
if not way.is_duration_set then
|
|
|
|
way.speed = speed_profile[highway]
|
|
|
|
end
|
|
|
|
print("added "..route.." with speed "..way.speed)
|
|
|
|
end
|
|
|
|
|
|
|
|
-- Set the avg speed on the way if it is accessible by road class
|
|
|
|
if (speed_profile[highway] ~= nil and way.speed == -1 ) then
|
|
|
|
if (0 < maxspeed and not take_minimum_of_speeds) or (maxspeed == 0) then
|
|
|
|
maxspeed = math.huge
|
|
|
|
end
|
|
|
|
way.speed = math.min(speed_profile[highway], maxspeed)
|
|
|
|
end
|
2012-09-27 02:46:36 -04:00
|
|
|
|
|
|
|
-- Set the avg speed on ways that are marked accessible
|
|
|
|
if access_tag_whitelist[access] and way.speed == -1 then
|
|
|
|
if (0 < maxspeed and not take_minimum_of_speeds) or maxspeed == 0 then
|
|
|
|
maxspeed = math.huge
|
|
|
|
end
|
|
|
|
way.speed = math.min(speed_profile["default"], maxspeed)
|
|
|
|
end
|
|
|
|
|
|
|
|
-- Set direction according to tags on way
|
|
|
|
if obey_oneway then
|
|
|
|
if onewayClass == "yes" or onewayClass == "1" or onewayClass == "true" then
|
|
|
|
way.direction = Way.oneway
|
|
|
|
elseif onewayClass == "no" or onewayClass == "0" or onewayClass == "false" then
|
|
|
|
way.direction = Way.bidirectional
|
|
|
|
elseif onewayClass == "-1" then
|
|
|
|
way.direction = Way.opposite
|
|
|
|
elseif oneway == "no" or oneway == "0" or oneway == "false" then
|
|
|
|
way.direction = Way.bidirectional
|
|
|
|
elseif cycleway == "opposite" or cycleway == "opposite_track" or cycleway == "opposite_lane" then
|
|
|
|
way.direction = Way.bidirectional
|
|
|
|
elseif oneway == "-1" then
|
|
|
|
way.direction = Way.opposite
|
|
|
|
elseif oneway == "yes" or oneway == "1" or oneway == "true" or junction == "roundabout" or highway == "motorway_link" or highway == "motorway" then
|
|
|
|
way.direction = Way.oneway
|
|
|
|
else
|
|
|
|
way.direction = Way.bidirectional
|
|
|
|
end
|
|
|
|
else
|
|
|
|
way.direction = Way.bidirectional
|
|
|
|
end
|
|
|
|
|
|
|
|
way.type = 1
|
|
|
|
return 1
|
2012-09-19 12:35:45 -04:00
|
|
|
end
|