advtrains_interlocking - advtrains.git - Advtrains mod for minetest.

Mode	Name	Size
-rw-r--r--	approach.lua	3782	log plain
-rw-r--r--	ars.lua	4178	log plain
-rw-r--r--	database.lua	22273	log plain
-rw-r--r--	demosignals.lua	2530	log plain
-rw-r--r--	init.lua	874	log plain
-rw-r--r--	mod.conf	196	log plain
d---------	models	46	log plain
-rw-r--r--	route_prog.lua	18006	log plain
-rw-r--r--	route_ui.lua	4983	log plain
-rw-r--r--	routesetting.lua	11167	log plain
-rw-r--r--	settingtypes.txt	385	log plain
-rw-r--r--	signal_api.lua	19914	log plain
d---------	spec	40	log plain
-rwxr-xr-x	tcb_ts_ui.lua	27653	log plain
d---------	textures	1168	log plain
-rw-r--r--	tool.lua	1932	log plain
-rw-r--r--	train_sections.lua	5317	log plain
-rw-r--r--	tsr_rail.lua	2329	log plain

; then return nil elseif t=="*" then return {default=true} end local arstab = {} for line in string.gmatch(t, "[^\r\n]+") do if line=="*" then arstab.default = true else local c, v = string.match(line, "^(...?)%s(.*)$") if c and v then local n = nil if string.sub(c,1,1) == "!" then n = true c = string.sub(c,2) end local tt=string.upper(c) if tt=="LN" then arstab[#arstab+1] = {ln=v, n=n} elseif tt=="RC" then arstab[#arstab+1] = {rc=v, n=n} end else local ct = string.match(line, "^#(.*)$") if ct then arstab[#arstab+1] = {c = ct} end end end end return arstab end local function find_rtematch(routes, train) local default for rteid, route in ipairs(routes) do if route.ars then if route.ars.default then default = rteid else if il.ars_check_rule_match(route.ars, train) then return rteid end end end end return default end -- Checks whether ARS rule explicitly matches. This does not take into account the "default" field, since a wider context is required for this. -- Returns the rule number that matched, or nil if nothing matched function il.ars_check_rule_match(ars, train) if not ars then return nil end local line = train.line local routingcode = train.routingcode for arskey, arsent in ipairs(ars) do --atdebug(arsent, line, routingcode) if arsent.n then -- rule is inverse... if arsent.ln and (not line or arsent.ln ~= line) then return arskey elseif arsent.rc and (not routingcode or not string.find(" "..routingcode.." ", " "..arsent.rc.." ", nil, true)) then return arskey end return nil end if arsent.ln and line and arsent.ln == line then return arskey elseif arsent.rc and routingcode and string.find(" "..routingcode.." ", " "..arsent.rc.." ", nil, true) then return arskey end end return nil end function advtrains.interlocking.ars_check(sigd, train) local tcbs = il.db.get_tcbs(sigd) if not tcbs or not tcbs.routes then return end if tcbs.ars_disabled then -- No-ARS mode of signal. -- ignore... return end if tcbs.routeset then -- ARS is not in effect when a route is already set -- just "punch" routesetting, just in case callback got lost. minetest.after(0, il.route.update_route, sigd, tcbs, nil, nil) return end local rteid = find_rtematch(tcbs.routes, train) if rteid then --delay routesetting, it should not occur inside train step -- using after here is OK because that gets called on every path recalculation minetest.after(0, il.route.update_route, sigd, tcbs, rteid, nil) end end