616 lines
17 KiB
Lua
616 lines
17 KiB
Lua
--Minetest
|
|
--Copyright (C) 2013 sapier
|
|
--
|
|
--This program is free software; you can redistribute it and/or modify
|
|
--it under the terms of the GNU Lesser General Public License as published by
|
|
--the Free Software Foundation; either version 2.1 of the License, or
|
|
--(at your option) any later version.
|
|
--
|
|
--This program is distributed in the hope that it will be useful,
|
|
--but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
--MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
--GNU Lesser General Public License for more details.
|
|
--
|
|
--You should have received a copy of the GNU Lesser General Public License along
|
|
--with this program; if not, write to the Free Software Foundation, Inc.,
|
|
--51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
|
|
|
|
--------------------------------------------------------------------------------
|
|
|
|
--modstore implementation
|
|
modstore = {}
|
|
|
|
--------------------------------------------------------------------------------
|
|
-- @function [parent=#modstore] init
|
|
function modstore.init()
|
|
modstore.tabnames = {}
|
|
|
|
table.insert(modstore.tabnames,"dialog_modstore_unsorted")
|
|
table.insert(modstore.tabnames,"dialog_modstore_search")
|
|
|
|
modstore.modsperpage = 5
|
|
|
|
modstore.basetexturedir = engine.get_texturepath() .. DIR_DELIM .. "base" ..
|
|
DIR_DELIM .. "pack" .. DIR_DELIM
|
|
|
|
modstore.lastmodtitle = ""
|
|
modstore.last_search = ""
|
|
|
|
modstore.searchlist = filterlist.create(
|
|
function()
|
|
if modstore.modlist_unsorted ~= nil and
|
|
modstore.modlist_unsorted.data ~= nil then
|
|
return modstore.modlist_unsorted.data
|
|
end
|
|
return {}
|
|
end,
|
|
function(element,modid)
|
|
if element.id == modid then
|
|
return true
|
|
end
|
|
return false
|
|
end, --compare fct
|
|
nil, --uid match fct
|
|
function(element,substring)
|
|
if substring == nil or
|
|
substring == "" then
|
|
return false
|
|
end
|
|
substring = substring:upper()
|
|
|
|
if element.title ~= nil and
|
|
element.title:upper():find(substring) ~= nil then
|
|
return true
|
|
end
|
|
|
|
if element.details ~= nil and
|
|
element.details.author ~= nil and
|
|
element.details.author:upper():find(substring) ~= nil then
|
|
return true
|
|
end
|
|
|
|
if element.details ~= nil and
|
|
element.details.description ~= nil and
|
|
element.details.description:upper():find(substring) ~= nil then
|
|
return true
|
|
end
|
|
return false
|
|
end --filter fct
|
|
)
|
|
|
|
modstore.current_list = nil
|
|
end
|
|
|
|
--------------------------------------------------------------------------------
|
|
-- @function [parent=#modstore] nametoindex
|
|
function modstore.nametoindex(name)
|
|
|
|
for i=1,#modstore.tabnames,1 do
|
|
if modstore.tabnames[i] == name then
|
|
return i
|
|
end
|
|
end
|
|
|
|
return 1
|
|
end
|
|
|
|
--------------------------------------------------------------------------------
|
|
-- @function [parent=#modstore] getsuccessfuldialog
|
|
function modstore.getsuccessfuldialog()
|
|
local retval = ""
|
|
retval = retval .. "size[6,2]"
|
|
if modstore.lastmodentry ~= nil then
|
|
retval = retval .. "label[0,0.25;" .. fgettext("Successfully installed:") .. "]"
|
|
retval = retval .. "label[3,0.25;" .. modstore.lastmodentry.moddetails.title .. "]"
|
|
|
|
|
|
retval = retval .. "label[0,0.75;" .. fgettext("Shortname:") .. "]"
|
|
retval = retval .. "label[3,0.75;" .. engine.formspec_escape(modstore.lastmodentry.moddetails.basename) .. "]"
|
|
|
|
end
|
|
retval = retval .. "button[2.5,1.5;1,0.5;btn_confirm_mod_successfull;" .. fgettext("ok") .. "]"
|
|
|
|
|
|
return retval
|
|
end
|
|
|
|
--------------------------------------------------------------------------------
|
|
-- @function [parent=#modstore] gettab
|
|
function modstore.gettab(tabname)
|
|
local retval = ""
|
|
|
|
local is_modstore_tab = false
|
|
|
|
if tabname == "dialog_modstore_unsorted" then
|
|
modstore.modsperpage = 5
|
|
retval = modstore.getmodlist(modstore.modlist_unsorted)
|
|
is_modstore_tab = true
|
|
end
|
|
|
|
if tabname == "dialog_modstore_search" then
|
|
retval = modstore.getsearchpage()
|
|
is_modstore_tab = true
|
|
end
|
|
|
|
if is_modstore_tab then
|
|
return modstore.tabheader(tabname) .. retval
|
|
end
|
|
|
|
if tabname == "modstore_mod_installed" then
|
|
return modstore.getsuccessfuldialog()
|
|
end
|
|
|
|
if tabname == "modstore_downloading" then
|
|
return "size[6,2]label[0.25,0.75;" .. fgettext("Downloading") ..
|
|
" " .. modstore.lastmodtitle .. " " ..
|
|
fgettext("please wait...") .. "]"
|
|
end
|
|
|
|
return ""
|
|
end
|
|
|
|
--------------------------------------------------------------------------------
|
|
-- @function [parent=#modstore] tabheader
|
|
function modstore.tabheader(tabname)
|
|
local retval = "size[12,10.25]"
|
|
retval = retval .. "tabheader[-0.3,-0.99;modstore_tab;" ..
|
|
"Unsorted,Search;" ..
|
|
modstore.nametoindex(tabname) .. ";true;false]" ..
|
|
"button[4,9.9;4,0.5;btn_modstore_close;" ..
|
|
fgettext("Close modstore") .. "]"
|
|
|
|
return retval
|
|
end
|
|
|
|
--------------------------------------------------------------------------------
|
|
-- @function [parent=#modstore] handle_buttons
|
|
function modstore.handle_buttons(current_tab,fields)
|
|
|
|
if fields["modstore_tab"] then
|
|
local index = tonumber(fields["modstore_tab"])
|
|
|
|
if index > 0 and
|
|
index <= #modstore.tabnames then
|
|
if modstore.tabnames[index] == "dialog_modstore_search" then
|
|
filterlist.set_filtercriteria(modstore.searchlist,modstore.last_search)
|
|
filterlist.refresh(modstore.searchlist)
|
|
modstore.modsperpage = 4
|
|
modstore.currentlist = {
|
|
page = 0,
|
|
pagecount =
|
|
math.ceil(filterlist.size(modstore.searchlist) / modstore.modsperpage),
|
|
data = filterlist.get_list(modstore.searchlist),
|
|
}
|
|
end
|
|
|
|
return {
|
|
current_tab = modstore.tabnames[index],
|
|
is_dialog = true,
|
|
show_buttons = false
|
|
}
|
|
end
|
|
|
|
end
|
|
|
|
if fields["btn_modstore_page_up"] then
|
|
if modstore.current_list ~= nil and modstore.current_list.page > 0 then
|
|
modstore.current_list.page = modstore.current_list.page - 1
|
|
end
|
|
end
|
|
|
|
if fields["btn_modstore_page_down"] then
|
|
if modstore.current_list ~= nil and
|
|
modstore.current_list.page <modstore.current_list.pagecount-1 then
|
|
modstore.current_list.page = modstore.current_list.page +1
|
|
end
|
|
end
|
|
|
|
if fields["btn_hidden_close_download"] ~= nil then
|
|
if fields["btn_hidden_close_download"].successfull then
|
|
modstore.lastmodentry = fields["btn_hidden_close_download"]
|
|
return {
|
|
current_tab = "modstore_mod_installed",
|
|
is_dialog = true,
|
|
show_buttons = false
|
|
}
|
|
else
|
|
modstore.lastmodtitle = ""
|
|
return {
|
|
current_tab = modstore.tabnames[1],
|
|
is_dialog = true,
|
|
show_buttons = false
|
|
}
|
|
end
|
|
end
|
|
|
|
if fields["btn_confirm_mod_successfull"] then
|
|
modstore.lastmodentry = nil
|
|
modstore.lastmodtitle = ""
|
|
return {
|
|
current_tab = modstore.tabnames[1],
|
|
is_dialog = true,
|
|
show_buttons = false
|
|
}
|
|
end
|
|
|
|
if fields["btn_modstore_search"] or
|
|
(fields["key_enter"] and fields["te_modstore_search"] ~= nil) then
|
|
modstore.last_search = fields["te_modstore_search"]
|
|
filterlist.set_filtercriteria(modstore.searchlist,fields["te_modstore_search"])
|
|
filterlist.refresh(modstore.searchlist)
|
|
modstore.currentlist = {
|
|
page = 0,
|
|
pagecount = math.ceil(filterlist.size(modstore.searchlist) / modstore.modsperpage),
|
|
data = filterlist.get_list(modstore.searchlist),
|
|
}
|
|
end
|
|
|
|
|
|
if fields["btn_modstore_close"] then
|
|
return {
|
|
is_dialog = false,
|
|
show_buttons = true,
|
|
current_tab = engine.setting_get("main_menu_tab")
|
|
}
|
|
end
|
|
|
|
for key,value in pairs(fields) do
|
|
local foundat = key:find("btn_install_mod_")
|
|
if ( foundat == 1) then
|
|
local modid = tonumber(key:sub(17))
|
|
for i=1,#modstore.modlist_unsorted.data,1 do
|
|
if modstore.modlist_unsorted.data[i].id == modid then
|
|
local moddetails = modstore.modlist_unsorted.data[i].details
|
|
|
|
if modstore.lastmodtitle ~= "" then
|
|
modstore.lastmodtitle = modstore.lastmodtitle .. ", "
|
|
end
|
|
|
|
modstore.lastmodtitle = modstore.lastmodtitle .. moddetails.title
|
|
|
|
engine.handle_async(
|
|
function(param)
|
|
|
|
local fullurl = engine.setting_get("modstore_download_url") ..
|
|
param.moddetails.download_url
|
|
|
|
if param.version ~= nil then
|
|
local found = false
|
|
for i=1,#param.moddetails.versions, 1 do
|
|
if param.moddetails.versions[i].date:sub(1,10) == param.version then
|
|
fullurl = engine.setting_get("modstore_download_url") ..
|
|
param.moddetails.versions[i].download_url
|
|
found = true
|
|
end
|
|
end
|
|
|
|
if not found then
|
|
return {
|
|
moddetails = param.moddetails,
|
|
successfull = false
|
|
}
|
|
end
|
|
end
|
|
|
|
if engine.download_file(fullurl,param.filename) then
|
|
return {
|
|
texturename = param.texturename,
|
|
moddetails = param.moddetails,
|
|
filename = param.filename,
|
|
successfull = true
|
|
}
|
|
else
|
|
return {
|
|
modtitle = param.title,
|
|
successfull = false
|
|
}
|
|
end
|
|
end,
|
|
{
|
|
moddetails = moddetails,
|
|
version = fields["dd_version" .. modid],
|
|
filename = os.tempfolder() .. "_MODNAME_" .. moddetails.basename .. ".zip",
|
|
texturename = modstore.modlist_unsorted.data[i].texturename
|
|
},
|
|
function(result)
|
|
if result.successfull then
|
|
modmgr.installmod(result.filename,result.moddetails.basename)
|
|
os.remove(result.filename)
|
|
else
|
|
gamedata.errormessage = "Failed to download " .. result.moddetails.title
|
|
end
|
|
|
|
if gamedata.errormessage == nil then
|
|
engine.button_handler({btn_hidden_close_download=result})
|
|
else
|
|
engine.button_handler({btn_hidden_close_download={successfull=false}})
|
|
end
|
|
end
|
|
)
|
|
|
|
return {
|
|
current_tab = "modstore_downloading",
|
|
is_dialog = true,
|
|
show_buttons = false,
|
|
ignore_menu_quit = true
|
|
}
|
|
end
|
|
end
|
|
break
|
|
end
|
|
end
|
|
end
|
|
|
|
--------------------------------------------------------------------------------
|
|
-- @function [parent=#modstore] update_modlist
|
|
function modstore.update_modlist()
|
|
modstore.modlist_unsorted = {}
|
|
modstore.modlist_unsorted.data = {}
|
|
modstore.modlist_unsorted.pagecount = 1
|
|
modstore.modlist_unsorted.page = 0
|
|
|
|
engine.handle_async(
|
|
function(param)
|
|
return engine.get_modstore_list()
|
|
end,
|
|
nil,
|
|
function(result)
|
|
if result ~= nil then
|
|
modstore.modlist_unsorted = {}
|
|
modstore.modlist_unsorted.data = result
|
|
|
|
if modstore.modlist_unsorted.data ~= nil then
|
|
modstore.modlist_unsorted.pagecount =
|
|
math.ceil((#modstore.modlist_unsorted.data / modstore.modsperpage))
|
|
else
|
|
modstore.modlist_unsorted.data = {}
|
|
modstore.modlist_unsorted.pagecount = 1
|
|
end
|
|
modstore.modlist_unsorted.page = 0
|
|
modstore.fetchdetails()
|
|
engine.event_handler("Refresh")
|
|
end
|
|
end
|
|
)
|
|
end
|
|
|
|
--------------------------------------------------------------------------------
|
|
-- @function [parent=#modstore] fetchdetails
|
|
function modstore.fetchdetails()
|
|
|
|
for i=1,#modstore.modlist_unsorted.data,1 do
|
|
engine.handle_async(
|
|
function(param)
|
|
param.details = engine.get_modstore_details(tostring(param.modid))
|
|
return param
|
|
end,
|
|
{
|
|
modid=modstore.modlist_unsorted.data[i].id,
|
|
listindex=i
|
|
},
|
|
function(result)
|
|
if result ~= nil and
|
|
modstore.modlist_unsorted ~= nil
|
|
and modstore.modlist_unsorted.data ~= nil and
|
|
modstore.modlist_unsorted.data[result.listindex] ~= nil and
|
|
modstore.modlist_unsorted.data[result.listindex].id ~= nil then
|
|
|
|
modstore.modlist_unsorted.data[result.listindex].details = result.details
|
|
engine.event_handler("Refresh")
|
|
end
|
|
end
|
|
)
|
|
end
|
|
end
|
|
|
|
--------------------------------------------------------------------------------
|
|
-- @function [parent=#modstore] getscreenshot
|
|
function modstore.getscreenshot(ypos,listentry)
|
|
|
|
if listentry.details ~= nil and
|
|
(listentry.details.screenshot_url == nil or
|
|
listentry.details.screenshot_url == "") then
|
|
|
|
if listentry.texturename == nil then
|
|
listentry.texturename = modstore.basetexturedir .. "no_screenshot.png"
|
|
end
|
|
|
|
return "image[0,".. ypos .. ";3,2;" ..
|
|
engine.formspec_escape(listentry.texturename) .. "]"
|
|
end
|
|
|
|
if listentry.details ~= nil and
|
|
listentry.texturename == nil then
|
|
--make sure we don't download multiple times
|
|
listentry.texturename = "in progress"
|
|
|
|
--prepare url and filename
|
|
local fullurl = engine.setting_get("modstore_download_url") ..
|
|
listentry.details.screenshot_url
|
|
local filename = os.tempfolder() .. "_MID_" .. listentry.id
|
|
|
|
--trigger download
|
|
engine.handle_async(
|
|
--first param is downloadfct
|
|
function(param)
|
|
param.successfull = engine.download_file(param.fullurl,param.filename)
|
|
return param
|
|
end,
|
|
--second parameter is data passed to async job
|
|
{
|
|
fullurl = fullurl,
|
|
filename = filename,
|
|
modid = listentry.id
|
|
},
|
|
--integrate result to raw list
|
|
function(result)
|
|
if result.successfull then
|
|
local found = false
|
|
for i=1,#modstore.modlist_unsorted.data,1 do
|
|
if modstore.modlist_unsorted.data[i].id == result.modid then
|
|
found = true
|
|
modstore.modlist_unsorted.data[i].texturename = result.filename
|
|
break
|
|
end
|
|
end
|
|
if found then
|
|
engine.event_handler("Refresh")
|
|
else
|
|
engine.log("error","got screenshot but didn't find matching mod: " .. result.modid)
|
|
end
|
|
end
|
|
end
|
|
)
|
|
end
|
|
|
|
if listentry.texturename ~= nil and
|
|
listentry.texturename ~= "in progress" then
|
|
return "image[0,".. ypos .. ";3,2;" ..
|
|
engine.formspec_escape(listentry.texturename) .. "]"
|
|
end
|
|
|
|
return ""
|
|
end
|
|
|
|
--------------------------------------------------------------------------------
|
|
--@function [parent=#modstore] getshortmodinfo
|
|
function modstore.getshortmodinfo(ypos,listentry,details)
|
|
local retval = ""
|
|
|
|
retval = retval .. "box[0," .. ypos .. ";11.4,1.75;#FFFFFF]"
|
|
|
|
--screenshot
|
|
retval = retval .. modstore.getscreenshot(ypos,listentry)
|
|
|
|
--title + author
|
|
retval = retval .."label[2.75," .. ypos .. ";" ..
|
|
engine.formspec_escape(details.title) .. " (" .. details.author .. ")]"
|
|
|
|
--description
|
|
local descriptiony = ypos + 0.5
|
|
retval = retval .. "textarea[3," .. descriptiony .. ";6.5,1.55;;" ..
|
|
engine.formspec_escape(details.description) .. ";]"
|
|
|
|
--rating
|
|
local ratingy = ypos
|
|
retval = retval .."label[7," .. ratingy .. ";" ..
|
|
fgettext("Rating") .. ":]"
|
|
retval = retval .. "label[8.7," .. ratingy .. ";" .. details.rating .."]"
|
|
|
|
--versions (IMPORTANT has to be defined AFTER rating)
|
|
if details.versions ~= nil and
|
|
#details.versions > 1 then
|
|
local versiony = ypos + 0.05
|
|
retval = retval .. "dropdown[9.1," .. versiony .. ";2.48,0.25;dd_version" .. details.id .. ";"
|
|
local versions = ""
|
|
for i=1,#details.versions , 1 do
|
|
if versions ~= "" then
|
|
versions = versions .. ","
|
|
end
|
|
|
|
versions = versions .. details.versions[i].date:sub(1,10)
|
|
end
|
|
retval = retval .. versions .. ";1]"
|
|
end
|
|
|
|
if details.basename then
|
|
--install button
|
|
local buttony = ypos + 1.2
|
|
retval = retval .."button[9.1," .. buttony .. ";2.5,0.5;btn_install_mod_" .. details.id .. ";"
|
|
|
|
if modmgr.mod_exists(details.basename) then
|
|
retval = retval .. fgettext("re-Install") .."]"
|
|
else
|
|
retval = retval .. fgettext("Install") .."]"
|
|
end
|
|
end
|
|
|
|
return retval
|
|
end
|
|
|
|
--------------------------------------------------------------------------------
|
|
--@function [parent=#modstore] getmodlist
|
|
function modstore.getmodlist(list,yoffset)
|
|
|
|
modstore.current_list = list
|
|
|
|
if #list.data == 0 then
|
|
return ""
|
|
end
|
|
|
|
if yoffset == nil then
|
|
yoffset = 0
|
|
end
|
|
|
|
local scrollbar = ""
|
|
scrollbar = scrollbar .. "label[0.1,9.5;"
|
|
.. fgettext("Page $1 of $2", list.page+1, list.pagecount) .. "]"
|
|
scrollbar = scrollbar .. "box[11.6," .. (yoffset + 0.35) .. ";0.28,"
|
|
.. (8.6 - yoffset) .. ";#000000]"
|
|
local scrollbarpos = (yoffset + 0.75) +
|
|
((7.7 -yoffset)/(list.pagecount-1)) * list.page
|
|
scrollbar = scrollbar .. "box[11.6," ..scrollbarpos .. ";0.28,0.5;#32CD32]"
|
|
scrollbar = scrollbar .. "button[11.6," .. (yoffset + (0.3))
|
|
.. ";0.5,0.5;btn_modstore_page_up;^]"
|
|
scrollbar = scrollbar .. "button[11.6," .. 9.0
|
|
.. ";0.5,0.5;btn_modstore_page_down;v]"
|
|
|
|
local retval = ""
|
|
|
|
local endmod = (list.page * modstore.modsperpage) + modstore.modsperpage
|
|
|
|
if (endmod > #list.data) then
|
|
endmod = #list.data
|
|
end
|
|
|
|
for i=(list.page * modstore.modsperpage) +1, endmod, 1 do
|
|
--getmoddetails
|
|
local details = list.data[i].details
|
|
|
|
if details == nil then
|
|
details = {}
|
|
details.title = list.data[i].title
|
|
details.author = ""
|
|
details.rating = -1
|
|
details.description = ""
|
|
end
|
|
|
|
if details ~= nil then
|
|
local screenshot_ypos =
|
|
yoffset +(i-1 - (list.page * modstore.modsperpage))*1.9 +0.2
|
|
|
|
retval = retval .. modstore.getshortmodinfo(screenshot_ypos,
|
|
list.data[i],
|
|
details)
|
|
end
|
|
end
|
|
|
|
return retval .. scrollbar
|
|
end
|
|
|
|
--------------------------------------------------------------------------------
|
|
--@function [parent=#modstore] getsearchpage
|
|
function modstore.getsearchpage()
|
|
local retval = ""
|
|
local search = ""
|
|
|
|
if modstore.last_search ~= nil then
|
|
search = modstore.last_search
|
|
end
|
|
|
|
retval = retval ..
|
|
"button[9.5,0.2;2.5,0.5;btn_modstore_search;".. fgettext("Search") .. "]" ..
|
|
"field[0.5,0.5;9,0.5;te_modstore_search;;" .. search .. "]"
|
|
|
|
|
|
--show 4 mods only
|
|
modstore.modsperpage = 4
|
|
retval = retval ..
|
|
modstore.getmodlist(
|
|
modstore.currentlist,
|
|
1.75)
|
|
|
|
return retval;
|
|
end
|
|
|