diff options
Diffstat (limited to 'builtin/mainmenu/store.lua')
| -rw-r--r-- | builtin/mainmenu/store.lua | 614 |
1 files changed, 0 insertions, 614 deletions
diff --git a/builtin/mainmenu/store.lua b/builtin/mainmenu/store.lua deleted file mode 100644 index 59391f8bc..000000000 --- a/builtin/mainmenu/store.lua +++ /dev/null @@ -1,614 +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(size, unsortedmods, searchmods) - - modstore.mods_on_unsorted_page = unsortedmods - modstore.mods_on_search_page = searchmods - modstore.modsperpage = modstore.mods_on_unsorted_page - - modstore.basetexturedir = core.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.tv_store = tabview_create("modstore",size,{x=0,y=0}) - - modstore.tv_store:set_global_event_handler(modstore.handle_events) - - modstore.tv_store:add( - { - name = "unsorted", - caption = fgettext("Unsorted"), - cbf_formspec = modstore.unsorted_tab, - cbf_button_handler = modstore.handle_buttons, - on_change = - function() modstore.modsperpage = modstore.mods_on_unsorted_page end - } - ) - - modstore.tv_store:add( - { - name = "search", - caption = fgettext("Search"), - cbf_formspec = modstore.getsearchpage, - cbf_button_handler = modstore.handle_buttons, - on_change = modstore.activate_search_tab - } - ) -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] showdownloading -function modstore.showdownloading(title) - local new_dlg = dialog_create("store_downloading", - function(data) - return "size[6,2]label[0.25,0.75;" .. - fgettext("Downloading $1, please wait...", data.title) .. "]" - end, - function(this,fields) - if fields["btn_hidden_close_download"] ~= nil then - if fields["btn_hidden_close_download"].successfull then - modstore.lastmodentry = fields["btn_hidden_close_download"] - modstore.successfulldialog(this) - else - this.parent:show() - this:delete() - modstore.lastmodtitle = "" - end - - return true - end - - return false - end, - nil) - - new_dlg:set_parent(modstore.tv_store) - modstore.tv_store:hide() - new_dlg.data.title = title - new_dlg:show() -end - --------------------------------------------------------------------------------- --- @function [parent=#modstore] successfulldialog -function modstore.successfulldialog(downloading_dlg) - local new_dlg = dialog_create("store_downloading", - function(data) - 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;" .. core.formspec_escape(modstore.lastmodentry.moddetails.basename) .. "]" - end - retval = retval .. "button[2.2,1.5;1.5,0.5;btn_confirm_mod_successfull;" .. fgettext("Ok") .. "]" - return retval - end, - function(this,fields) - if fields["btn_confirm_mod_successfull"] ~= nil then - this.parent:show() - downloading_dlg:delete() - this:delete() - - return true - end - - return false - end, - nil) - - new_dlg:set_parent(modstore.tv_store) - modstore.tv_store:hide() - new_dlg:show() -end - --------------------------------------------------------------------------------- --- @function [parent=#modstore] handle_buttons -function modstore.handle_buttons(parent, fields, name, data) - - 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 - return true - 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 - return true - 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), - } - return true - end - - if fields["btn_modstore_close"] then - local maintab = ui.find_by_name("maintab") - parent:hide() - maintab:show() - return true - 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 - modstore.lastmodtitle = moddetails.title - - if not core.handle_async( - function(param) - local fullurl = core.settings: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 = core.settings:get("modstore_download_url") .. - param.moddetails.versions[i].download_url - found = true - end - end - - if not found then - core.log("error","no download url found for version " .. dump(param.version)) - return { - moddetails = param.moddetails, - successfull = false - } - end - end - - if core.download_file(fullurl,param.filename) then - return { - texturename = param.texturename, - moddetails = param.moddetails, - filename = param.filename, - successfull = true - } - else - core.log("error","downloading " .. dump(fullurl) .. " failed") - 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) - --print("Result from async: " .. dump(result.successfull)) - 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 - core.button_handler({btn_hidden_close_download=result}) - else - core.button_handler({btn_hidden_close_download={successfull=false}}) - end - end - ) then - print("ERROR: async event failed") - gamedata.errormessage = "Failed to download " .. modstore.lastmodtitle - end - - modstore.showdownloading(modstore.lastmodtitle) - return true - end - end - return true - end - end - - return false -end - --------------------------------------------------------------------------------- --- @function [parent=#modstore] handle_events -function modstore.handle_events(this,event) - if (event == "MenuQuit") then - this:hide() - return true - 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 - - core.handle_async( - function(param) - return core.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() - core.event_handler("Refresh") - end - end - ) -end - --------------------------------------------------------------------------------- --- @function [parent=#modstore] fetchdetails -function modstore.fetchdetails() - - for i=1,#modstore.modlist_unsorted.data,1 do - core.handle_async( - function(param) - param.details = core.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 - core.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 = defaulttexturedir .. "no_screenshot.png" - end - - return "image[0,".. ypos .. ";3,2;" .. - core.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 = core.settings:get("modstore_download_url") .. - listentry.details.screenshot_url - local filename = os.tempfolder() .. "_MID_" .. listentry.id - - --trigger download - core.handle_async( - --first param is downloadfct - function(param) - param.successfull = core.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 - core.event_handler("Refresh") - else - core.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;" .. - core.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 .. ";" .. - core.formspec_escape(details.title) .. " (" .. details.author .. ")]" - - --description - local descriptiony = ypos + 0.5 - retval = retval .. "textarea[3," .. descriptiony .. ";6.5,1.55;;" .. - core.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 yoffset == nil then - yoffset = 0 - end - - local sb_y_start = 0.2 + yoffset - local sb_y_end = (modstore.modsperpage * 1.75) + ((modstore.modsperpage-1) * 0.15) - local close_button = "button[4," .. (sb_y_end + 0.3 + yoffset) .. - ";4,0.5;btn_modstore_close;" .. fgettext("Close store") .. "]" - - if #list.data == 0 then - return close_button - end - - local scrollbar = "" - scrollbar = scrollbar .. "label[0.1,".. (sb_y_end + 0.25 + yoffset) ..";" - .. fgettext("Page $1 of $2", list.page+1, list.pagecount) .. "]" - scrollbar = scrollbar .. "box[11.6," .. sb_y_start .. ";0.28," .. sb_y_end .. ";#000000]" - local scrollbarpos = (sb_y_start + 0.5) + - ((sb_y_end -1.6)/(list.pagecount-1)) * list.page - scrollbar = scrollbar .. "box[11.6," ..scrollbarpos .. ";0.28,0.5;#32CD32]" - scrollbar = scrollbar .. "button[11.6," .. (sb_y_start) - .. ";0.5,0.5;btn_modstore_page_up;^]" - scrollbar = scrollbar .. "button[11.6," .. (sb_y_start + sb_y_end - 0.5) - .. ";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 .. close_button -end - --------------------------------------------------------------------------------- ---@function [parent=#modstore] getsearchpage -function modstore.getsearchpage(tabview, name, tabdata) - 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 .. "]" - - retval = retval .. - modstore.getmodlist( - modstore.currentlist, - 1.75) - - return retval; -end - --------------------------------------------------------------------------------- ---@function [parent=#modstore] unsorted_tab -function modstore.unsorted_tab() - return modstore.getmodlist(modstore.modlist_unsorted) -end - --------------------------------------------------------------------------------- ---@function [parent=#modstore] activate_search_tab -function modstore.activate_search_tab(type, old_tab, new_tab) - - if old_tab == new_tab then - return - end - filterlist.set_filtercriteria(modstore.searchlist,modstore.last_search) - filterlist.refresh(modstore.searchlist) - modstore.modsperpage = modstore.mods_on_search_page - modstore.currentlist = { - page = 0, - pagecount = - math.ceil(filterlist.size(modstore.searchlist) / modstore.modsperpage), - data = filterlist.get_list(modstore.searchlist), - } -end - |