summaryrefslogtreecommitdiff
path: root/builtin/mainmenu/modstore.lua
diff options
context:
space:
mode:
authorsapier <Sapier at GMX dot net>2014-04-18 15:39:15 +0200
committersapier <Sapier at GMX dot net>2014-05-16 22:57:14 +0200
commitc3984569c06dc3c2890516e95adc38dcab9ec89a (patch)
treec3b134eb11cadad6b70ff866e4c9e1167b509235 /builtin/mainmenu/modstore.lua
parent34d872628d5099ae520dd92433e211f561aaf611 (diff)
downloadminetest-c3984569c06dc3c2890516e95adc38dcab9ec89a.tar.gz
minetest-c3984569c06dc3c2890516e95adc38dcab9ec89a.tar.bz2
minetest-c3984569c06dc3c2890516e95adc38dcab9ec89a.zip
Add formspec toolkit and refactor mainmenu to use it
Fix crash on using cursor keys in client menu without selected server Add support for non fixed size tabviews
Diffstat (limited to 'builtin/mainmenu/modstore.lua')
-rw-r--r--builtin/mainmenu/modstore.lua615
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
-