diff options
Diffstat (limited to 'builtin/mainmenu/modstore.lua')
| -rw-r--r-- | builtin/mainmenu/modstore.lua | 615 |
1 files changed, 0 insertions, 615 deletions
diff --git a/builtin/mainmenu/modstore.lua b/builtin/mainmenu/modstore.lua deleted file mode 100644 index ef7fd0165..000000000 --- a/builtin/mainmenu/modstore.lua +++ /dev/null @@ -1,615 +0,0 @@ ---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,true]" - 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,true]" - 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 { - moddetails = param.moddetails, - 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 - |