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_gamepath() .. DIR_DELIM .. ".." ..
- DIR_DELIM .. "textures" .. DIR_DELIM .. "base" ..
+
+ 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
-
- modstore.details_cache = {}
end
+
--------------------------------------------------------------------------------
+-- @function [parent=#modstore] nametoindex
function modstore.nametoindex(name)
for i=1,#modstore.tabnames,1 do
end
--------------------------------------------------------------------------------
-function modstore.gettab(tabname)
+-- @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 "size[6,2]label[0.25,0.25;Mod: " .. modstore.lastmodtitle ..
- " installed successfully]" ..
- "button[2.5,1.5;1,0.5;btn_confirm_mod_successfull;ok]"
+ 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,9.25]"
+ local retval = "size[12,10.25]"
retval = retval .. "tabheader[-0.3,-0.99;modstore_tab;" ..
"Unsorted,Search;" ..
- modstore.nametoindex(tabname) .. ";true;false]"
-
+ 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)
- modstore.lastmodtitle = ""
-
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,
}
end
- modstore.modlist_page = 0
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 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
- for i=1, modstore.modsperpage, 1 do
- local installbtn = "btn_install_mod_" .. i
-
- if fields[installbtn] then
- local modlistentry =
- modstore.current_list.page * modstore.modsperpage + i
-
- local moddetails = modstore.get_details(modstore.current_list.data[modlistentry].id)
-
- local fullurl = engine.setting_get("modstore_download_url") ..
- moddetails.download_url
- local modfilename = os.tempfolder() .. ".zip"
-
- if engine.download_file(fullurl,modfilename) then
-
- modmgr.installmod(modfilename,moddetails.basename)
-
- os.remove(modfilename)
- modstore.lastmodtitle = modstore.current_list.data[modlistentry].title
-
- return {
- current_tab = "modstore_mod_installed",
- is_dialog = true,
- show_buttons = false
- }
- else
- gamedata.errormessage = "Unable to download " ..
- moddetails.download_url .. " (internet connection?)"
+
+ 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 = engine.get_modstore_list()
+ 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 modstore.modlist_unsorted.data ~= nil then
- modstore.modlist_unsorted.pagecount =
- math.floor((#modstore.modlist_unsorted.data / modstore.modsperpage))
- else
- modstore.modlist_unsorted.data = {}
- modstore.modlist_unsorted.pagecount = 0
+ 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
- modstore.modlist_unsorted.page = 0
+
+ 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 modstore.getmodlist(list)
+--@function [parent=#modstore] getshortmodinfo
+function modstore.getshortmodinfo(ypos,listentry,details)
local retval = ""
- retval = retval .. "label[10,-0.4;Page " .. (list.page +1) ..
- " of " .. (list.pagecount +1) .. "]"
- retval = retval .. "button[11.6,-0.1;0.5,0.5;btn_modstore_page_up;^]"
- retval = retval .. "box[11.6,0.35;0.28,8.6;000000]"
- local scrollbarpos = 0.35 + (8.1/list.pagecount) * list.page
- retval = retval .. "box[11.6," ..scrollbarpos .. ";0.28,0.5;32CD32]"
- retval = retval .. "button[11.6,9.0;0.5,0.5;btn_modstore_page_down;v]"
+ 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 < (list.page * modstore.modsperpage) then
- return retval
+ 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 = modstore.get_details(list.data[i].id)
-
+ 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 = (i-1 - (list.page * modstore.modsperpage))*1.9 +0.2
-
- retval = retval .. "box[0," .. screenshot_ypos .. ";11.4,1.75;FFFFFF]"
-
- --screenshot
- if details.screenshot_url ~= nil and
- details.screenshot_url ~= "" then
- if list.data[i].texturename == nil then
- local fullurl = engine.setting_get("modstore_download_url") ..
- details.screenshot_url
- local filename = os.tempfolder()
-
- if engine.download_file(fullurl,filename) then
- list.data[i].texturename = filename
- end
- end
- end
-
- if list.data[i].texturename == nil then
- list.data[i].texturename = modstore.basetexturedir .. "no_screenshot.png"
- end
-
- retval = retval .. "image[0,".. screenshot_ypos .. ";3,2;" ..
- list.data[i].texturename .. "]"
-
- --title + author
- retval = retval .."label[2.75," .. screenshot_ypos .. ";" ..
- engine.formspec_escape(details.title) .. " (" .. details.author .. ")]"
-
- --description
- local descriptiony = screenshot_ypos + 0.5
- retval = retval .. "textarea[3," .. descriptiony .. ";6.5,1.55;;" ..
- engine.formspec_escape(details.description) .. ";]"
- --rating
- local ratingy = screenshot_ypos + 0.6
- retval = retval .."label[10.1," .. ratingy .. ";Rating: " .. details.rating .."]"
-
- --install button
- local buttony = screenshot_ypos + 1.2
- local buttonnumber = (i - (list.page * modstore.modsperpage))
- retval = retval .."button[9.6," .. buttony .. ";2,0.5;btn_install_mod_" .. buttonnumber .. ";"
-
- if modmgr.mod_exists(details.basename) then
- retval = retval .. "re-Install]"
- else
- retval = retval .. "Install]"
- end
+ 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
- modstore.current_list = list
-
- return retval
+ return retval .. scrollbar
end
--------------------------------------------------------------------------------
-function modstore.get_details(modid)
-
- if modstore.details_cache[modid] ~= nil then
- return modstore.details_cache[modid]
+--@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 .. "]"
+
- local retval = engine.get_modstore_details(tostring(modid))
- modstore.details_cache[modid] = retval
- return retval
+ --show 4 mods only
+ modstore.modsperpage = 4
+ retval = retval ..
+ modstore.getmodlist(
+ modstore.currentlist,
+ 1.75)
+
+ return retval;
end
projects / minetest.git / blobdiff