--51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
--------------------------------------------------------------------------------
-function get_mods(path,retval,basefolder)
+function get_mods(path,retval,modpack)
local mods = engine.get_dirlist(path,true)
-
for i=1,#mods,1 do
- local filename = path .. DIR_DELIM .. mods[i] .. DIR_DELIM .. "modpack.txt"
- local modpackfile,error = io.open(filename,"r")
-
- local name = mods[i]
- if basefolder ~= nil and
- basefolder ~= "" then
- name = basefolder .. DIR_DELIM .. mods[i]
- end
-
+ local toadd = {}
+ local modpackfile = nil
+
+ toadd.name = mods[i]
+ toadd.path = path .. DIR_DELIM .. mods[i] .. DIR_DELIM
+ if modpack ~= nil and
+ modpack ~= "" then
+ toadd.modpack = modpack
+ else
+ local filename = path .. DIR_DELIM .. mods[i] .. DIR_DELIM .. "modpack.txt"
+ local error = nil
+ modpackfile,error = io.open(filename,"r")
+ end
+
if modpackfile ~= nil then
modpackfile:close()
- table.insert(retval,name .. " <MODPACK>")
- get_mods(path .. DIR_DELIM .. name,retval,name)
+ toadd.is_modpack = true
+ table.insert(retval,toadd)
+ get_mods(path .. DIR_DELIM .. mods[i],retval,mods[i])
else
-
- table.insert(retval,name)
+ table.insert(retval,toadd)
end
end
end
function modmgr.extract(modfile)
if modfile.type == "zip" then
local tempfolder = os.tempfolder()
-
+
if tempfolder ~= nil and
- tempfodler ~= "" then
+ tempfolder ~= "" then
engine.create_dir(tempfolder)
- engine.extract_zip(modfile.name,tempfolder)
- return tempfolder
+ if engine.extract_zip(modfile.name,tempfolder) then
+ return tempfolder
+ end
end
end
+ return nil
end
-------------------------------------------------------------------------------
path=temppath
}
end
-
+
testfile = io.open(temppath .. DIR_DELIM .. "modpack.txt","r")
if testfile ~= nil then
testfile:close()
path=temppath
}
end
-
+
local subdirs = engine.get_dirlist(temppath,true)
-
+
--only single mod or modpack allowed
if #subdirs ~= 1 then
return {
}
end
- testfile =
+ testfile =
io.open(temppath .. DIR_DELIM .. subdirs[1] ..DIR_DELIM .."init.lua","r")
if testfile ~= nil then
testfile:close()
path= temppath .. DIR_DELIM .. subdirs[1]
}
end
-
- testfile =
+
+ testfile =
io.open(temppath .. DIR_DELIM .. subdirs[1] ..DIR_DELIM .."modpack.txt","r")
if testfile ~= nil then
testfile:close()
if modpath:find("-") ~= nil then
return false
end
-
+
return true
end
if pos1 ~= nil then
pos2 = line:find("\"",pos1+1)
end
-
+
if pos1 ~= nil and pos2 ~= nil then
local item = line:sub(pos1+1,pos2-1)
-
+
if item ~= nil and
item ~= "" then
local pos3 = item:find(":")
-
+
if pos3 ~= nil then
- return item:sub(1,pos3-1)
+ local retval = item:sub(1,pos3-1)
+ if retval ~= nil and
+ retval ~= "" then
+ return retval
+ end
end
end
end
if pos1 ~= nil then
pos2 = line:find("\"",pos1+1)
end
-
+
if pos1 ~= nil and pos2 ~= nil then
local filename = line:sub(pos1+1,pos2-1)
-
+
if filename ~= nil and
filename ~= "" and
filename:find(".lua") then
return nil
end
---------------------------------------------------------------------------------
-function modmgr.update_global_mods()
- local modpath = engine.get_modpath()
- modmgr.global_mods = {}
- if modpath ~= nil and
- modpath ~= "" then
- get_mods(modpath,modmgr.global_mods)
- end
-end
-
---------------------------------------------------------------------------------
-function modmgr.get_mods_list()
- local toadd = ""
-
- modmgr.update_global_mods()
-
- if modmgr.global_mods ~= nil then
- for i=1,#modmgr.global_mods,1 do
- if toadd ~= "" then
- toadd = toadd..","
- end
- toadd = toadd .. modmgr.global_mods[i]
- end
- end
-
- return toadd
-end
-
---------------------------------------------------------------------------------
-function modmgr.mod_exists(basename)
- modmgr.update_global_mods()
-
- if modmgr.global_mods ~= nil then
- for i=1,#modmgr.global_mods,1 do
- if modmgr.global_mods[i] == basename then
- return true
- end
- end
- end
-
- return false
-end
-
--------------------------------------------------------------------------------
function modmgr.identify_modname(modpath,filename)
local testfile = io.open(modpath .. DIR_DELIM .. filename,"r")
if testfile ~= nil then
local line = testfile:read()
-
+
while line~= nil do
local modname = nil
-
+
if line:find("minetest.register_tool") then
modname = modmgr.parse_register_line(line)
end
-
+
if line:find("minetest.register_craftitem") then
modname = modmgr.parse_register_line(line)
end
-
-
+
+
if line:find("minetest.register_node") then
modname = modmgr.parse_register_line(line)
end
-
+
if line:find("dofile") then
modname = modmgr.parse_dofile_line(modpath,line)
end
-
+
if modname ~= nil then
testfile:close()
return modname
end
-
+
line = testfile:read()
end
testfile:close()
end
-
+
return nil
end
--------------------------------------------------------------------------------
function modmgr.tab()
+
+ if modmgr.global_mods == nil then
+ modmgr.refresh_globals()
+ end
+
if modmgr.selected_mod == nil then
modmgr.selected_mod = 1
end
-
- local retval =
- "vertlabel[0,-0.25;MODS]" ..
- "label[0.8,-0.25;Installed Mods:]" ..
- "textlist[0.75,0.25;4.5,4.3;modlist;" ..
- modmgr.get_mods_list() ..
+
+ local retval =
+ "vertlabel[0,-0.25;".. fgettext("MODS") .. "]" ..
+ "label[0.8,-0.25;".. fgettext("Installed Mods:") .. "]" ..
+ "textlist[0.75,0.25;4.5,4;modlist;" ..
+ modmgr.render_modlist(modmgr.global_mods) ..
";" .. modmgr.selected_mod .. "]"
retval = retval ..
- "button[1,4.85;2,0.5;btn_mod_mgr_install_local;Install]" ..
- "button[3,4.85;2,0.5;btn_mod_mgr_download;Download]"
-
- if #modmgr.global_mods >= modmgr.selected_mod and
- modmgr.global_mods[modmgr.selected_mod]:find("<MODPACK>") then
- retval = retval .. "button[10,4.85;2,0.5;btn_mod_mgr_rename_modpack;Rename]"
- end
-
- if #modmgr.global_mods >= modmgr.selected_mod then
- local modpath = engine.get_modpath()
- --show dependencys
- if modmgr.global_mods[modmgr.selected_mod]:find("<MODPACK>") == nil then
- retval = retval ..
- "label[6,1.9;Depends:]" ..
- "textlist[6,2.4;5.7,2;deplist;"
-
- toadd = modmgr.get_dependencys(modpath .. DIR_DELIM ..
- modmgr.global_mods[modmgr.selected_mod])
-
- retval = retval .. toadd .. ";0;true,false]"
-
- --TODO read modinfo
- end
- --show delete button
- retval = retval .. "button[8,4.85;2,0.5;btn_mod_mgr_delete_mod;Delete]"
+ "label[0.8,4.2;" .. fgettext("Add mod:") .. "]" ..
+-- TODO Disabled due to upcoming release 0.4.8 and irrlicht messing up localization
+-- "button[0.75,4.85;1.8,0.5;btn_mod_mgr_install_local;".. fgettext("Local install") .. "]" ..
+ "button[2.45,4.85;3.05,0.5;btn_mod_mgr_download;".. fgettext("Online mod repository") .. "]"
+
+ local selected_mod = nil
+
+ if filterlist.size(modmgr.global_mods) >= modmgr.selected_mod then
+ selected_mod = filterlist.get_list(modmgr.global_mods)[modmgr.selected_mod]
+ end
+
+ if selected_mod ~= nil then
+ local modscreenshot = nil
+
+ --check for screenshot beeing available
+ local screenshotfilename = selected_mod.path .. DIR_DELIM .. "screenshot.png"
+ local error = nil
+ screenshotfile,error = io.open(screenshotfilename,"r")
+ if error == nil then
+ screenshotfile:close()
+ modscreenshot = screenshotfilename
+ end
+
+ if modscreenshot == nil then
+ modscreenshot = modstore.basetexturedir .. "no_screenshot.png"
+ end
+
+ retval = retval
+ .. "image[5.5,0;3,2;" .. engine.formspec_escape(modscreenshot) .. "]"
+ .. "label[8.25,0.6;" .. selected_mod.name .. "]"
+
+ local descriptionlines = nil
+ error = nil
+ local descriptionfilename = selected_mod.path .. "description.txt"
+ descriptionfile,error = io.open(descriptionfilename,"r")
+ if error == nil then
+ descriptiontext = descriptionfile:read("*all")
+
+ descriptionlines = engine.splittext(descriptiontext,42)
+ descriptionfile:close()
+ else
+ descriptionlines = {}
+ table.insert(descriptionlines,fgettext("No mod description available"))
+ end
+
+ retval = retval ..
+ "label[5.5,1.7;".. fgettext("Mod information:") .. "]" ..
+ "textlist[5.5,2.2;6.2,2.4;description;"
+
+ for i=1,#descriptionlines,1 do
+ retval = retval .. engine.formspec_escape(descriptionlines[i]) .. ","
+ end
+
+
+ if selected_mod.is_modpack then
+ retval = retval .. ";0]" ..
+ "button[10,4.85;2,0.5;btn_mod_mgr_rename_modpack;" ..
+ fgettext("Rename") .. "]"
+ retval = retval .. "button[5.5,4.85;4.5,0.5;btn_mod_mgr_delete_mod;"
+ .. fgettext("Uninstall selected modpack") .. "]"
+ else
+ --show dependencies
+
+ retval = retval .. ",Depends:,"
+
+ toadd = modmgr.get_dependencies(selected_mod.path)
+
+ retval = retval .. toadd .. ";0]"
+
+ retval = retval .. "button[5.5,4.85;4.5,0.5;btn_mod_mgr_delete_mod;"
+ .. fgettext("Uninstall selected mod") .. "]"
+ end
end
return retval
end
--------------------------------------------------------------------------------
function modmgr.dialog_rename_modpack()
- local modname = modmgr.global_mods[modmgr.selected_mod]
- modname = modname:sub(0,modname:find("<") -2)
-
- local retval =
- "label[1.75,1;Rename Modpack:]"..
+ local mod = filterlist.get_list(modmgr.global_mods)[modmgr.selected_mod]
+
+ local retval =
+ "label[1.75,1;".. fgettext("Rename Modpack:") .. "]"..
"field[4.5,1.4;6,0.5;te_modpack_name;;" ..
- modname ..
+ mod.name ..
"]" ..
- "button[5,4.2;2.6,0.5;dlg_rename_modpack_confirm;Accept]" ..
- "button[7.5,4.2;2.8,0.5;dlg_rename_modpack_cancel;Cancel]"
+ "button[5,4.2;2.6,0.5;dlg_rename_modpack_confirm;"..
+ fgettext("Accept") .. "]" ..
+ "button[7.5,4.2;2.8,0.5;dlg_rename_modpack_cancel;"..
+ fgettext("Cancel") .. "]"
return retval
end
--------------------------------------------------------------------------------
function modmgr.precheck()
- if modmgr.global_mods == nil then
- modmgr.update_global_mods()
- end
-
+
if modmgr.world_config_selected_world == nil then
modmgr.world_config_selected_world = 1
end
-
+
if modmgr.world_config_selected_mod == nil then
modmgr.world_config_selected_mod = 1
end
-
+
if modmgr.hide_gamemods == nil then
modmgr.hide_gamemods = true
end
-end
---------------------------------------------------------------------------------
-function modmgr.get_worldmod_idx()
- if not modmgr.hide_gamemods then
- return modmgr.world_config_selected_mod - #modmgr.worldconfig.game_mods
- else
- return modmgr.world_config_selected_mod
+ if modmgr.hide_modpackcontents == nil then
+ modmgr.hide_modpackcontents = true
end
end
--------------------------------------------------------------------------------
-function modmgr.is_gamemod()
- if not modmgr.hide_gamemods then
- if modmgr.world_config_selected_mod <= #modmgr.worldconfig.game_mods then
- return true
- else
- return false
+function modmgr.render_modlist(render_list)
+ local retval = ""
+
+ if render_list == nil then
+ if modmgr.global_mods == nil then
+ modmgr.refresh_globals()
end
- else
- return false
+ render_list = modmgr.global_mods
end
-end
---------------------------------------------------------------------------------
-function modmgr.render_worldmodlist()
- local retval = ""
-
- for i=1,#modmgr.global_mods,1 do
- local parts = modmgr.global_mods[i]:split(DIR_DELIM)
- local shortname = parts[#parts]
- if modmgr.worldconfig.global_mods[shortname] then
- retval = retval .. "#22F922" .. modmgr.global_mods[i] .. ","
+ local list = filterlist.get_list(render_list)
+ local last_modpack = nil
+
+ for i,v in ipairs(list) do
+ if retval ~= "" then
+ retval = retval ..","
+ end
+
+ local color = ""
+
+ if v.is_modpack then
+ local rawlist = filterlist.get_raw_list(render_list)
+
+ local all_enabled = true
+ for j=1,#rawlist,1 do
+ if rawlist[j].modpack == list[i].name and
+ rawlist[j].enabled ~= true then
+ all_enabled = false
+ break
+ end
+ end
+
+ if all_enabled == false then
+ color = mt_color_grey
+ else
+ color = mt_color_dark_green
+ end
+ end
+
+ if v.typ == "game_mod" then
+ color = mt_color_blue
else
- retval = retval .. modmgr.global_mods[i] .. ","
+ if v.enabled then
+ color = mt_color_green
+ end
end
- end
-
- return retval
-end
---------------------------------------------------------------------------------
-function modmgr.render_gamemodlist()
- local retval = ""
- for i=1,#modmgr.worldconfig.game_mods,1 do
- retval = retval ..
- "#0000FF" .. modmgr.worldconfig.game_mods[i] .. ","
+ retval = retval .. color
+ if v.modpack ~= nil then
+ retval = retval .. " "
+ end
+ retval = retval .. v.name
end
-
+
return retval
end
--------------------------------------------------------------------------------
function modmgr.dialog_configure_world()
modmgr.precheck()
-
- local modpack_selected = false
- local gamemod_selected = modmgr.is_gamemod()
- local modname = ""
- local modfolder = ""
- local shortname = ""
-
- if not gamemod_selected then
- local worldmodidx = modmgr.get_worldmod_idx()
- modname = modmgr.global_mods[worldmodidx]
-
- if modname:find("<MODPACK>") ~= nil then
- modname = modname:sub(0,modname:find("<") -2)
- modpack_selected = true
- end
-
- local parts = modmgr.global_mods[worldmodidx]:split(DIR_DELIM)
- shortname = parts[#parts]
-
- modfolder = engine.get_modpath() .. DIR_DELIM .. modname
- end
local worldspec = engine.get_worlds()[modmgr.world_config_selected_world]
-
+ local mod = filterlist.get_list(modmgr.modlist)[modmgr.world_config_selected_mod]
+
local retval =
"size[11,6.5]" ..
- "label[1.5,-0.25;World: " .. worldspec.name .. "]"
-
+ "label[0.5,-0.25;" .. fgettext("World:") .. "]" ..
+ "label[1.75,-0.25;" .. worldspec.name .. "]"
+
if modmgr.hide_gamemods then
- retval = retval .. "checkbox[5.5,6.15;cb_hide_gamemods;Hide Game;true]"
+ retval = retval .. "checkbox[0,5.75;cb_hide_gamemods;" .. fgettext("Hide Game") .. ";true]"
else
- retval = retval .. "checkbox[5.5,6.15;cb_hide_gamemods;Hide Game;false]"
+ retval = retval .. "checkbox[0,5.75;cb_hide_gamemods;" .. fgettext("Hide Game") .. ";false]"
end
- retval = retval ..
- "button[9.25,6.35;2,0.5;btn_config_world_save;Save]" ..
- "button[7.4,6.35;2,0.5;btn_config_world_cancel;Cancel]" ..
- "textlist[5.5,-0.25;5.5,6.5;world_config_modlist;"
-
- if not modmgr.hide_gamemods then
- retval = retval .. modmgr.render_gamemodlist()
+ if modmgr.hide_modpackcontents then
+ retval = retval .. "checkbox[2,5.75;cb_hide_mpcontent;" .. fgettext("Hide mp content") .. ";true]"
+ else
+ retval = retval .. "checkbox[2,5.75;cb_hide_mpcontent;" .. fgettext("Hide mp content") .. ";false]"
end
-
- retval = retval .. modmgr.render_worldmodlist()
- retval = retval .. ";" .. modmgr.world_config_selected_mod .."]"
-
- if not gamemod_selected then
- retval = retval ..
- "label[0,0.45;Mod:]" ..
- "label[0.75,0.45;" .. modname .. "]" ..
- "label[0,1.5;depends on:]" ..
- "textlist[0,2;5,2;world_config_depends;" ..
- modmgr.get_dependencys(modfolder) .. ";0]" ..
- "label[0,4;depends on:]" ..
- "textlist[0,4.5;5,2;world_config_is_required;;0]"
-
- if modpack_selected then
- retval = retval ..
- "button[-0.05,1.05;2,0.5;btn_cfgw_enable_all;Enable All]" ..
- "button[3.25,1.05;2,0.5;btn_cfgw_disable_all;Disable All]"
+ if mod == nil then
+ mod = {name=""}
+ end
+ retval = retval ..
+ "label[0,0.45;" .. fgettext("Mod:") .. "]" ..
+ "label[0.75,0.45;" .. mod.name .. "]" ..
+ "label[0,1;" .. fgettext("Depends:") .. "]" ..
+ "textlist[0,1.5;5,4.25;world_config_depends;" ..
+ modmgr.get_dependencies(mod.path) .. ";0]" ..
+ "button[9.25,6.35;2,0.5;btn_config_world_save;" .. fgettext("Save") .. "]" ..
+ "button[7.4,6.35;2,0.5;btn_config_world_cancel;" .. fgettext("Cancel") .. "]"
+
+ if mod ~= nil and mod.name ~= "" and mod.typ ~= "game_mod" then
+ if mod.is_modpack then
+ local rawlist = filterlist.get_raw_list(modmgr.modlist)
+
+ local all_enabled = true
+ for j=1,#rawlist,1 do
+ if rawlist[j].modpack == mod.name and
+ rawlist[j].enabled ~= true then
+ all_enabled = false
+ break
+ end
+ end
+
+ if all_enabled == false then
+ retval = retval .. "button[5.5,-0.125;2,0.5;btn_mp_enable;" .. fgettext("Enable MP") .. "]"
+ else
+ retval = retval .. "button[5.5,-0.125;2,0.5;btn_mp_disable;" .. fgettext("Disable MP") .. "]"
+ end
else
- retval = retval ..
- "checkbox[0,0.8;cb_mod_enabled;enabled;"
-
- if modmgr.worldconfig.global_mods[shortname] then
- print("checkbox " .. shortname .. " enabled")
- retval = retval .. "true"
+ if mod.enabled then
+ retval = retval .. "checkbox[5.5,-0.375;cb_mod_enable;" .. fgettext("enabled") .. ";true]"
else
- print("checkbox " .. shortname .. " disabled")
- retval = retval .. "false"
+ retval = retval .. "checkbox[5.5,-0.375;cb_mod_enable;" .. fgettext("enabled") .. ";false]"
end
-
- retval = retval .. "]"
end
end
-
+
+ retval = retval ..
+ "button[8.5,-0.125;2.5,0.5;btn_all_mods;" .. fgettext("Enable all") .. "]" ..
+ "textlist[5.5,0.5;5.5,5.75;world_config_modlist;"
+
+ retval = retval .. modmgr.render_modlist(modmgr.modlist)
+
+ retval = retval .. ";" .. modmgr.world_config_selected_mod .."]"
+
return retval
end
function modmgr.handle_buttons(tab,fields)
local retval = nil
-
+
if tab == "mod_mgr" then
retval = modmgr.handle_modmgr_buttons(fields)
end
-
+
if tab == "dialog_rename_modpack" then
retval = modmgr.handle_rename_modpack_buttons(fields)
end
-
+
if tab == "dialog_delete_mod" then
retval = modmgr.handle_delete_mod_buttons(fields)
end
-
+
if tab == "dialog_configure_world" then
retval = modmgr.handle_configure_world_buttons(fields)
end
-
+
return retval
end
--------------------------------------------------------------------------------
-function modmgr.get_dependencys(modfolder)
- local filename = modfolder ..
- DIR_DELIM .. "depends.txt"
-
- local dependencyfile = io.open(filename,"r")
-
+function modmgr.get_dependencies(modfolder)
local toadd = ""
- if dependencyfile then
- local dependency = dependencyfile:read("*l")
- while dependency do
- if toadd ~= "" then
- toadd = toadd .. ","
+ if modfolder ~= nil then
+ local filename = modfolder ..
+ DIR_DELIM .. "depends.txt"
+
+ local dependencyfile = io.open(filename,"r")
+
+ if dependencyfile then
+ local dependency = dependencyfile:read("*l")
+ while dependency do
+ if toadd ~= "" then
+ toadd = toadd .. ","
+ end
+ toadd = toadd .. dependency
+ dependency = dependencyfile:read()
end
- toadd = toadd .. dependency
- dependency = dependencyfile:read()
+ dependencyfile:close()
end
- dependencyfile:close()
- else
- print(filename .. " not found")
end
return toadd
local filename = worldpath ..
DIR_DELIM .. "world.mt"
- local worldfile = io.open(filename,"r")
-
+ local worldfile = Settings(filename)
+
local worldconfig = {}
worldconfig.global_mods = {}
worldconfig.game_mods = {}
-
- if worldfile then
- local dependency = worldfile:read("*l")
- while dependency do
- local parts = dependency:split("=")
-
- local key = parts[1]:trim()
- if key == "gameid" then
- worldconfig.id = parts[2]:trim()
- else
- local key = parts[1]:trim():sub(10)
- if parts[2]:trim() == "true" then
- print("found enabled mod: >" .. key .. "<")
- worldconfig.global_mods[key] = true
- else
- print("found disabled mod: >" .. key .. "<")
- worldconfig.global_mods[key] = false
- end
- end
- dependency = worldfile:read("*l")
+ for key,value in pairs(worldfile:to_table()) do
+ if key == "gameid" then
+ worldconfig.id = value
+ else
+ worldconfig.global_mods[key] = engine.is_yes(value)
end
- worldfile:close()
- else
- print(filename .. " not found")
end
-
+
--read gamemods
- local gamemodpath = engine.get_gamepath() .. DIR_DELIM .. worldconfig.id .. DIR_DELIM .. "mods"
-
- print("reading game mods from: " .. dump(gamemodpath))
- get_mods(gamemodpath,worldconfig.game_mods)
+ local gamespec = gamemgr.find_by_gameid(worldconfig.id)
+ gamemgr.get_game_mods(gamespec, worldconfig.game_mods)
return worldconfig
end
local event = explode_textlist_event(fields["modlist"])
modmgr.selected_mod = event.index
end
-
+
if fields["btn_mod_mgr_install_local"] ~= nil then
- engine.show_file_open_dialog("mod_mgt_open_dlg","Select Mod File:")
+ engine.show_file_open_dialog("mod_mgt_open_dlg",fgettext("Select Mod File:"))
end
-
+
if fields["btn_mod_mgr_download"] ~= nil then
+ modstore.update_modlist()
retval.current_tab = "dialog_modstore_unsorted"
retval.is_dialog = true
retval.show_buttons = false
return retval
end
-
+
if fields["btn_mod_mgr_rename_modpack"] ~= nil then
retval.current_tab = "dialog_rename_modpack"
retval.is_dialog = true
retval.show_buttons = false
return retval
end
-
+
if fields["btn_mod_mgr_delete_mod"] ~= nil then
retval.current_tab = "dialog_delete_mod"
retval.is_dialog = true
retval.show_buttons = false
return retval
end
-
+
if fields["mod_mgt_open_dlg_accepted"] ~= nil and
fields["mod_mgt_open_dlg_accepted"] ~= "" then
modmgr.installmod(fields["mod_mgt_open_dlg_accepted"],nil)
end
-
+
return nil;
end
--------------------------------------------------------------------------------
function modmgr.installmod(modfilename,basename)
- local modfile = identify_filetype(modfilename)
-
+ local modfile = modmgr.identify_filetype(modfilename)
local modpath = modmgr.extract(modfile)
-
+
if modpath == nil then
- gamedata.errormessage = "Install Mod: file: " .. modfile.name ..
- "\nInstall Mod: unsupported filetype \"" .. modfile.type .. "\""
+ gamedata.errormessage = fgettext("Install Mod: file: \"$1\"", modfile.name) ..
+ fgettext("\nInstall Mod: unsupported filetype \"$1\" or broken archive", modfile.type)
return
end
-
-
+
+
local basefolder = modmgr.getbasefolder(modpath)
-
+
if basefolder.type == "modpack" then
local clean_path = nil
-
+
if basename ~= nil then
clean_path = "mp_" .. basename
end
-
+
if clean_path == nil then
clean_path = get_last_folder(cleanup_path(basefolder.path))
end
-
+
if clean_path ~= nil then
local targetpath = engine.get_modpath() .. DIR_DELIM .. clean_path
- engine.copy_dir(basefolder.path,targetpath)
+ if not engine.copy_dir(basefolder.path,targetpath) then
+ gamedata.errormessage = fgettext("Failed to install $1 to $2", basename, targetpath)
+ end
else
- gamedata.errormessage = "Install Mod: unable to find suitable foldername for modpack "
- .. modfilename
+ gamedata.errormessage = fgettext("Install Mod: unable to find suitable foldername for modpack $1", modfilename)
end
end
-
+
if basefolder.type == "mod" then
local targetfolder = basename
-
+
if targetfolder == nil then
targetfolder = modmgr.identify_modname(basefolder.path,"init.lua")
end
-
+
--if heuristic failed try to use current foldername
if targetfolder == nil then
targetfolder = get_last_folder(basefolder.path)
- end
-
+ end
+
if targetfolder ~= nil and modmgr.isValidModname(targetfolder) then
local targetpath = engine.get_modpath() .. DIR_DELIM .. targetfolder
engine.copy_dir(basefolder.path,targetpath)
else
- gamedata.errormessage = "Install Mod: unable to find real modname for: "
- .. modfilename
+ gamedata.errormessage = fgettext("Install Mod: unable to find real modname for: $1", modfilename)
end
end
-
+
engine.delete_dir(modpath)
+
+ modmgr.refresh_globals()
+
end
--------------------------------------------------------------------------------
function modmgr.handle_rename_modpack_buttons(fields)
- local oldname = modmgr.global_mods[modmgr.selected_mod]
- oldname = oldname:sub(0,oldname:find("<") -2)
-
+
if fields["dlg_rename_modpack_confirm"] ~= nil then
- local oldpath = engine.get_modpath() .. DIR_DELIM .. oldname
+ local mod = filterlist.get_list(modmgr.global_mods)[modmgr.selected_mod]
+ local oldpath = engine.get_modpath() .. DIR_DELIM .. mod.name
local targetpath = engine.get_modpath() .. DIR_DELIM .. fields["te_modpack_name"]
engine.copy_dir(oldpath,targetpath,false)
+ modmgr.refresh_globals()
+ modmgr.selected_mod = filterlist.get_current_index(modmgr.global_mods,
+ filterlist.raw_index_by_uid(modmgr.global_mods, fields["te_modpack_name"]))
end
-
+
return {
is_dialog = false,
show_buttons = true,
if fields["world_config_modlist"] ~= nil then
local event = explode_textlist_event(fields["world_config_modlist"])
modmgr.world_config_selected_mod = event.index
- end
- if fields["cb_mod_enabled"] ~= nil then
- local index = modmgr.get_worldmod_idx()
- local modname = modmgr.global_mods[index]
-
- local parts = modmgr.global_mods[index]:split(DIR_DELIM)
- local shortname = parts[#parts]
-
- if fields["cb_mod_enabled"] == "true" then
- modmgr.worldconfig.global_mods[shortname] = true
- else
- modmgr.worldconfig.global_mods[shortname] = false
+ if event.typ == "DCL" then
+ modmgr.world_config_enable_mod(nil)
end
end
-
+
+ if fields["key_enter"] ~= nil then
+ modmgr.world_config_enable_mod(nil)
+ end
+
+ if fields["cb_mod_enable"] ~= nil then
+ local toset = engine.is_yes(fields["cb_mod_enable"])
+ modmgr.world_config_enable_mod(toset)
+ end
+
+ if fields["btn_mp_enable"] ~= nil or
+ fields["btn_mp_disable"] then
+ local toset = (fields["btn_mp_enable"] ~= nil)
+ modmgr.world_config_enable_mod(toset)
+ end
+
if fields["cb_hide_gamemods"] ~= nil then
- if fields["cb_hide_gamemods"] == "true" then
+ local current = filterlist.get_filtercriteria(modmgr.modlist)
+
+ if current == nil then
+ current = {}
+ end
+
+ if engine.is_yes(fields["cb_hide_gamemods"]) then
+ current.hide_game = true
modmgr.hide_gamemods = true
else
+ current.hide_game = false
modmgr.hide_gamemods = false
end
+
+ filterlist.set_filtercriteria(modmgr.modlist,current)
+ end
+
+ if fields["cb_hide_mpcontent"] ~= nil then
+ local current = filterlist.get_filtercriteria(modmgr.modlist)
+
+ if current == nil then
+ current = {}
+ end
+
+ if engine.is_yes(fields["cb_hide_mpcontent"]) then
+ current.hide_modpackcontents = true
+ modmgr.hide_modpackcontents = true
+ else
+ current.hide_modpackcontents = false
+ modmgr.hide_modpackcontents = false
+ end
+
+ filterlist.set_filtercriteria(modmgr.modlist,current)
end
-
+
if fields["btn_config_world_save"] then
local worldspec = engine.get_worlds()[modmgr.world_config_selected_world]
-
+
local filename = worldspec.path ..
DIR_DELIM .. "world.mt"
- local worldfile = io.open(filename,"w")
-
- if worldfile then
- worldfile:write("gameid = " .. modmgr.worldconfig.id .. "\n")
- for key,value in pairs(modmgr.worldconfig.global_mods) do
- if value then
- worldfile:write("load_mod_" .. key .. " = true" .. "\n")
+ local worldfile = Settings(filename)
+ local mods = worldfile:to_table()
+
+ local rawlist = filterlist.get_raw_list(modmgr.modlist)
+
+ local i,mod
+ for i,mod in ipairs(rawlist) do
+ if not mod.is_modpack and
+ mod.typ ~= "game_mod" then
+ if mod.enabled then
+ worldfile:set("load_mod_"..mod.name, "true")
else
- worldfile:write("load_mod_" .. key .. " = false" .. "\n")
+ worldfile:set("load_mod_"..mod.name, "false")
end
+ mods["load_mod_"..mod.name] = nil
end
-
- worldfile:close()
end
-
+
+ -- Remove mods that are not present anymore
+ for key,value in pairs(mods) do
+ if key:sub(1,9) == "load_mod_" then
+ worldfile:remove(key)
+ end
+ end
+
+ if not worldfile:write() then
+ engine.log("error", "Failed to write world config file")
+ end
+
+ modmgr.modlist = nil
modmgr.worldconfig = nil
-
+
return {
is_dialog = false,
show_buttons = true,
current_tab = engine.setting_get("main_menu_tab")
}
end
-
+
if fields["btn_config_world_cancel"] then
-
+
modmgr.worldconfig = nil
-
+
return {
is_dialog = false,
show_buttons = true,
current_tab = engine.setting_get("main_menu_tab")
}
end
-
- if fields["btn_cfgw_enable_all"] then
- local worldmodidx = modmgr.get_worldmod_idx()
- modname = modmgr.global_mods[worldmodidx]
-
- modname = modname:sub(0,modname:find("<") -2)
-
- for i=1,#modmgr.global_mods,1 do
-
- if modmgr.global_mods[i]:find("<MODPACK>") == nil then
- local modpackpart = modmgr.global_mods[i]:sub(0,modname:len())
-
- if modpackpart == modname then
- local parts = modmgr.global_mods[i]:split(DIR_DELIM)
- local shortname = parts[#parts]
- modmgr.worldconfig.global_mods[shortname] = true
- end
+
+ if fields["btn_all_mods"] then
+ local list = filterlist.get_raw_list(modmgr.modlist)
+
+ for i=1,#list,1 do
+ if list[i].typ ~= "game_mod" and
+ not list[i].is_modpack then
+ list[i].enabled = true
end
end
end
-
- if fields["btn_cfgw_disable_all"] then
- local worldmodidx = modmgr.get_worldmod_idx()
- modname = modmgr.global_mods[worldmodidx]
- modname = modname:sub(0,modname:find("<") -2)
- for i=1,#modmgr.global_mods,1 do
- local modpackpart = modmgr.global_mods[i]:sub(0,modname:len())
-
- if modpackpart == modname then
- local parts = modmgr.global_mods[i]:split(DIR_DELIM)
- local shortname = parts[#parts]
- modmgr.worldconfig.global_mods[shortname] = nil
+
+ return nil
+end
+--------------------------------------------------------------------------------
+function modmgr.world_config_enable_mod(toset)
+ local mod = filterlist.get_list(modmgr.modlist)
+ [engine.get_textlist_index("world_config_modlist")]
+
+ if mod.typ == "game_mod" then
+ -- game mods can't be enabled or disabled
+ elseif not mod.is_modpack then
+ if toset == nil then
+ mod.enabled = not mod.enabled
+ else
+ mod.enabled = toset
+ end
+ else
+ local list = filterlist.get_raw_list(modmgr.modlist)
+ for i=1,#list,1 do
+ if list[i].modpack == mod.name then
+ if toset == nil then
+ toset = not list[i].enabled
+ end
+ list[i].enabled = toset
end
end
end
-
- return nil
end
--------------------------------------------------------------------------------
function modmgr.handle_delete_mod_buttons(fields)
- local modname = modmgr.global_mods[modmgr.selected_mod]
-
- if modname:find("<MODPACK>") ~= nil then
- modname = modname:sub(0,modname:find("<") -2)
- end
-
+ local mod = filterlist.get_list(modmgr.global_mods)[modmgr.selected_mod]
+
if fields["dlg_delete_mod_confirm"] ~= nil then
- local oldpath = engine.get_modpath() .. DIR_DELIM .. modname
-
- if oldpath ~= nil and
- oldpath ~= "" and
- oldpath ~= engine.get_modpath() then
- engine.delete_dir(oldpath)
+
+ if mod.path ~= nil and
+ mod.path ~= "" and
+ mod.path ~= engine.get_modpath() then
+ if not engine.delete_dir(mod.path) then
+ gamedata.errormessage = fgettext("Modmgr: failed to delete \"$1\"", mod.path)
+ end
+ modmgr.refresh_globals()
+ else
+ gamedata.errormessage = fgettext("Modmgr: invalid modpath \"$1\"", mod.path)
end
end
-
+
return {
is_dialog = false,
show_buttons = true,
--------------------------------------------------------------------------------
function modmgr.dialog_delete_mod()
- local modname = modmgr.global_mods[modmgr.selected_mod]
+ local mod = filterlist.get_list(modmgr.global_mods)[modmgr.selected_mod]
+
+ local retval =
+ "field[1.75,1;10,3;;" .. fgettext("Are you sure you want to delete \"$1\"?", mod.name) .. ";]"..
+ "button[4,4.2;1,0.5;dlg_delete_mod_confirm;" .. fgettext("Yes") .. "]" ..
+ "button[6.5,4.2;3,0.5;dlg_delete_mod_cancel;" .. fgettext("No of course not!") .. "]"
- if modname:find("<MODPACK>") ~= nil then
- modname = modname:sub(0,modname:find("<") -2)
+ return retval
+end
+
+--------------------------------------------------------------------------------
+function modmgr.preparemodlist(data)
+ local retval = {}
+
+ local global_mods = {}
+ local game_mods = {}
+
+ --read global mods
+ local modpath = engine.get_modpath()
+
+ if modpath ~= nil and
+ modpath ~= "" then
+ get_mods(modpath,global_mods)
+ end
+
+ for i=1,#global_mods,1 do
+ global_mods[i].typ = "global_mod"
+ table.insert(retval,global_mods[i])
+ end
+
+ --read game mods
+ local gamespec = gamemgr.find_by_gameid(data.gameid)
+ gamemgr.get_game_mods(gamespec, game_mods)
+
+ for i=1,#game_mods,1 do
+ game_mods[i].typ = "game_mod"
+ table.insert(retval,game_mods[i])
+ end
+
+ if data.worldpath == nil then
+ return retval
+ end
+
+ --read world mod configuration
+ local filename = data.worldpath ..
+ DIR_DELIM .. "world.mt"
+
+ local worldfile = Settings(filename)
+
+ for key,value in pairs(worldfile:to_table()) do
+ if key:sub(1, 9) == "load_mod_" then
+ key = key:sub(10)
+ local element = nil
+ for i=1,#retval,1 do
+ if retval[i].name == key then
+ element = retval[i]
+ break
+ end
+ end
+ if element ~= nil then
+ element.enabled = engine.is_yes(value)
+ else
+ engine.log("info", "Mod: " .. key .. " " .. dump(value) .. " but not found")
+ end
+ end
end
-
- local retval =
- "field[1.75,1;10,3;;Are you sure you want to delete ".. modname .. "?;]"..
- "button[4,4.2;1,0.5;dlg_delete_mod_confirm;Yes]" ..
- "button[6.5,4.2;3,0.5;dlg_delete_mod_cancel;No of course not!]"
return retval
end
--------------------------------------------------------------------------------
function modmgr.init_worldconfig()
-
+ modmgr.precheck()
local worldspec = engine.get_worlds()[modmgr.world_config_selected_world]
-
+
if worldspec ~= nil then
--read worldconfig
modmgr.worldconfig = modmgr.get_worldconfig(worldspec.path)
-
+
if modmgr.worldconfig.id == nil or
modmgr.worldconfig.id == "" then
modmgr.worldconfig = nil
return false
end
-
- return true
+
+ modmgr.modlist = filterlist.create(
+ modmgr.preparemodlist, --refresh
+ modmgr.comparemod, --compare
+ function(element,uid) --uid match
+ if element.name == uid then
+ return true
+ end
+ end,
+ function(element,criteria)
+ if criteria.hide_game and
+ element.typ == "game_mod" then
+ return false
+ end
+
+ if criteria.hide_modpackcontents and
+ element.modpack ~= nil then
+ return false
+ end
+ return true
+ end, --filter
+ { worldpath= worldspec.path,
+ gameid = worldspec.gameid }
+ )
+
+ filterlist.set_filtercriteria(modmgr.modlist, {
+ hide_game=modmgr.hide_gamemods,
+ hide_modpackcontents= modmgr.hide_modpackcontents
+ })
+ filterlist.add_sort_mechanism(modmgr.modlist, "alphabetic", sort_mod_list)
+ filterlist.set_sortmode(modmgr.modlist, "alphabetic")
+
+ return true
end
return false
end
+--------------------------------------------------------------------------------
+function modmgr.comparemod(elem1,elem2)
+ if elem1 == nil or elem2 == nil then
+ return false
+ end
+ if elem1.name ~= elem2.name then
+ return false
+ end
+ if elem1.is_modpack ~= elem2.is_modpack then
+ return false
+ end
+ if elem1.typ ~= elem2.typ then
+ return false
+ end
+ if elem1.modpack ~= elem2.modpack then
+ return false
+ end
+
+ if elem1.path ~= elem2.path then
+ return false
+ end
+
+ return true
+end
+
--------------------------------------------------------------------------------
function modmgr.gettab(name)
local retval = ""
-
+
if name == "mod_mgr" then
retval = retval .. modmgr.tab()
end
-
+
if name == "dialog_rename_modpack" then
retval = retval .. modmgr.dialog_rename_modpack()
end
-
+
if name == "dialog_delete_mod" then
retval = retval .. modmgr.dialog_delete_mod()
end
-
+
if name == "dialog_configure_world" then
retval = retval .. modmgr.dialog_configure_world()
end
-
+
return retval
end
+
+--------------------------------------------------------------------------------
+function modmgr.mod_exists(basename)
+
+ if modmgr.global_mods == nil then
+ modmgr.refresh_globals()
+ end
+
+ if filterlist.raw_index_by_uid(modmgr.global_mods,basename) > 0 then
+ return true
+ end
+
+ return false
+end
+
+--------------------------------------------------------------------------------
+function modmgr.get_global_mod(idx)
+
+ if modmgr.global_mods == nil then
+ return nil
+ end
+
+ if idx < 1 or idx > filterlist.size(modmgr.global_mods) then
+ return nil
+ end
+
+ return filterlist.get_list(modmgr.global_mods)[idx]
+end
+
+--------------------------------------------------------------------------------
+function modmgr.refresh_globals()
+ modmgr.global_mods = filterlist.create(
+ modmgr.preparemodlist, --refresh
+ modmgr.comparemod, --compare
+ function(element,uid) --uid match
+ if element.name == uid then
+ return true
+ end
+ end,
+ nil, --filter
+ {}
+ )
+ filterlist.add_sort_mechanism(modmgr.global_mods, "alphabetic", sort_mod_list)
+ filterlist.set_sortmode(modmgr.global_mods, "alphabetic")
+end
+
+--------------------------------------------------------------------------------
+function modmgr.identify_filetype(name)
+
+ if name:sub(-3):lower() == "zip" then
+ return {
+ name = name,
+ type = "zip"
+ }
+ end
+
+ if name:sub(-6):lower() == "tar.gz" or
+ name:sub(-3):lower() == "tgz"then
+ return {
+ name = name,
+ type = "tgz"
+ }
+ end
+
+ if name:sub(-6):lower() == "tar.bz2" then
+ return {
+ name = name,
+ type = "tbz"
+ }
+ end
+
+ if name:sub(-2):lower() == "7z" then
+ return {
+ name = name,
+ type = "7z"
+ }
+ end
+
+ return {
+ name = name,
+ type = "ukn"
+ }
+end