aboutsummaryrefslogtreecommitdiff
path: root/advtrains_interlocking/autonaming.lua
blob: 78886c0238215fc4b3f4bd51d53fce1751a8083f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
-- autonaming.lua
-- Automatically set names of signals (and maybe track sections) based on numbering

-- Get current translator
local S = advtrains.interlocking.translate

local function find_highest_count(prefix)
	local cnt = 0
	local pattern = "^"..prefix.."(%d+)$"
	local alltcb = advtrains.interlocking.db.get_all_tcb()
	for _,tcb in pairs(alltcb) do
		for _,tcbs in pairs(tcb) do
			if tcbs.signal_name then
				local mnum = string.match(tcbs.signal_name, pattern)
				if mnum then
					local n = tonumber(mnum)
					if n and n > cnt then
						cnt = n
					end
				end
			end
		end
	end
	return cnt
end

-- { pname = { prefix = "FOO", count = 7 } }
local player_prefix_info = {}

function advtrains.interlocking.set_autoname_prefix(pname, prefix)
	if prefix and #prefix>0 then
		-- check that it is valid
		if not string.match(prefix,"[A-Za-z_]+") then
			return false, "Illegal prefix, only letters and _ allowed"
		end
		-- scan database for this prefix to find out the highest count
		local count = find_highest_count(prefix)
		player_prefix_info[pname] = { prefix = prefix, count = count}
		return true, S("Prefix set, next signal name will be: @1", advtrains.interlocking.get_next_autoname(pname, true))
	else
		player_prefix_info[pname] = nil
		return true, S("Prefix unset, signals are not auto-named for you!")
	end
end

function advtrains.interlocking.get_next_autoname(pname, no_increment)
	local pi = player_prefix_info[pname]
	if pi then
		local name = pi.prefix..(pi.count+1)
		if not no_increment then pi.count = pi.count+1 end
		return name
	else
		return nil
	end
end

function advtrains.interlocking.add_autoname_to_tcbs(tcbs, pname)
	if not tcbs or not pname then return end
	if tcbs.signal_name then return end -- name already set
	
	tcbs.signal_name = advtrains.interlocking.get_next_autoname(pname)
end

minetest.register_chatcommand("at_nameprefix",
	{
		params = "<prefix>",
		description = S("Sets the current prefix for automatically naming interlocking components. Example: '/at_nameprefix TEST' - signals will be named TEST1, TEST2 and so on"),
		privs = {interlocking = true},
		func = advtrains.interlocking.set_autoname_prefix,
})

(is)); readU8(is); // m_allow_text_input readU8(is); // m_allow_removal readU8(is); // m_enforce_owner int num_vars = readU32(is); for(int i=0; i<num_vars; i++){ std::string name = deSerializeString(is); std::string var = deSerializeLongString(is); meta->setString(name, var); } return false; } else if(id == NODEMETA_SIGN) // SignNodeMetadata { meta->setString("text", deSerializeString(is)); //meta->setString("infotext","\"${text}\""); meta->setString("infotext", std::string("\"") + meta->getString("text") + "\""); meta->setString("formspec","field[text;;${text}]"); return false; } else if(id == NODEMETA_CHEST) // ChestNodeMetadata { meta->getInventory()->deSerialize(is); // Rename inventory list "0" to "main" Inventory *inv = meta->getInventory(); if(!inv->getList("main") && inv->getList("0")){ inv->getList("0")->setName("main"); } assert(inv->getList("main") && !inv->getList("0")); meta->setString("formspec","size[8,9]" "list[current_name;main;0,0;8,4;]" "list[current_player;main;0,5;8,4;]"); return false; } else if(id == NODEMETA_LOCKABLE_CHEST) // LockingChestNodeMetadata { meta->setString("owner", deSerializeString(is)); meta->getInventory()->deSerialize(is); // Rename inventory list "0" to "main" Inventory *inv = meta->getInventory(); if(!inv->getList("main") && inv->getList("0")){ inv->getList("0")->setName("main"); } assert(inv->getList("main") && !inv->getList("0")); meta->setString("formspec","size[8,9]" "list[current_name;main;0,0;8,4;]" "list[current_player;main;0,5;8,4;]"); return false; } else if(id == NODEMETA_FURNACE) // FurnaceNodeMetadata { meta->getInventory()->deSerialize(is); int temp = 0; is>>temp; meta->setString("fuel_totaltime", ftos((float)temp/10)); temp = 0; is>>temp; meta->setString("fuel_time", ftos((float)temp/10)); temp = 0; is>>temp; //meta->setString("src_totaltime", ftos((float)temp/10)); temp = 0; is>>temp; meta->setString("src_time", ftos((float)temp/10)); meta->setString("formspec","size[8,9]" "list[current_name;fuel;2,3;1,1;]" "list[current_name;src;2,1;1,1;]" "list[current_name;dst;5,1;2,2;]" "list[current_player;main;0,5;8,4;]"); return true; } else { throw SerializationError("Unknown legacy node metadata"); } } static bool content_nodemeta_deserialize_legacy_meta( std::istream &is, NodeMetadata *meta) { // Read id s16 id = readS16(is); // Read data std::string data = deSerializeString(is); std::istringstream tmp_is(data, std::ios::binary); return content_nodemeta_deserialize_legacy_body(tmp_is, id, meta); } void content_nodemeta_deserialize_legacy(std::istream &is, NodeMetadataList *meta, NodeTimerList *timers, IGameDef *gamedef) { meta->clear(); timers->clear(); u16 version = readU16(is); if(version > 1) { infostream<<__FUNCTION_NAME<<": version "<<version<<" not supported" <<std::endl; throw SerializationError(__FUNCTION_NAME); } u16 count = readU16(is); for(u16 i=0; i<count; i++) { u16 p16 = readU16(is); v3s16 p(0,0,0); p.Z += p16 / MAP_BLOCKSIZE / MAP_BLOCKSIZE; p16 -= p.Z * MAP_BLOCKSIZE * MAP_BLOCKSIZE; p.Y += p16 / MAP_BLOCKSIZE; p16 -= p.Y * MAP_BLOCKSIZE; p.X += p16; if(meta->get(p) != NULL) { infostream<<"WARNING: "<<__FUNCTION_NAME<<": " <<"already set data at position" <<"("<<p.X<<","<<p.Y<<","<<p.Z<<"): Ignoring." <<std::endl; continue; } NodeMetadata *data = new NodeMetadata(gamedef); bool need_timer = content_nodemeta_deserialize_legacy_meta(is, data); meta->set(p, data); if(need_timer) timers->set(p, NodeTimer(1., 0.)); } } void content_nodemeta_serialize_legacy(std::ostream &os, NodeMetadataList *meta) { // Sorry, I was too lazy to implement this. --kahrl writeU16(os, 1); // version writeU16(os, 0); // count } // END