modstore = {}
--------------------------------------------------------------------------------
+-- @function [parent=#modstore] init
function modstore.init()
modstore.tabnames = {}
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
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
end
if tabname == "modstore_mod_installed" then
- return "size[6,2]label[0.25,0.25;Mod(s): " .. 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.25;Dowloading " .. modstore.lastmodtitle ..
- " please wait]"
+ 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)
if fields["modstore_tab"] then
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
-
- modstore.modlist_page = 0
+
end
if fields["btn_modstore_page_up"] then
end
end
- if fields["btn_hidden_close_download"] then
- return {
+ 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],
}
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
-
- if modstore.modlist_unsorted.data[modlistentry] ~= nil and
- modstore.modlist_unsorted.data[modlistentry].details ~= nil then
-
- local moddetails = modstore.modlist_unsorted.data[modlistentry].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 engine.download_file(fullurl,param.filename) then
- return {
- moddetails = param.moddetails,
- filename = param.filename,
- successfull = true
- }
- else
- return {
- modtitle = param.title,
- successfull = false
- }
- end
- end,
- {
- moddetails = moddetails,
- filename = os.tempfolder() .. ".zip"
- },
- 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
-
- engine.button_handler({btn_hidden_close_download=true})
+ 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
- )
-
- return {
- current_tab = "modstore_downloading",
- is_dialog = true,
- show_buttons = false,
- ignore_menu_quit = true
- }
-
- else
- gamedata.errormessage =
- "Internal modstore error please leave modstore and reopen! (Sorry)"
+
+ 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 = {}
end
--------------------------------------------------------------------------------
+-- @function [parent=#modstore] fetchdetails
function modstore.fetchdetails()
for i=1,#modstore.modlist_unsorted.data,1 do
)
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 modstore.getmodlist(list)
+--@function [parent=#modstore] getshortmodinfo
+function modstore.getshortmodinfo(ypos,listentry,details)
local retval = ""
- retval = retval .. "label[10,-0.4;" .. fgettext("Page $1 of $2", list.page+1, list.pagecount) .. "]"
+
+ 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 .. ";"
- 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-1)) * 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]"
+ 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)
- if #list.data < (list.page * modstore.modsperpage) then
- return retval
+ 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
--getmoddetails
local details = list.data[i].details
--- if details == nil then
--- details = modstore.get_details(list.data[i].id)
--- end
-
if details == nil then
details = {}
details.title = list.data[i].title
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]"
-
- if details.basename then
- --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() .. "_MID_" .. list.data[i].id
- list.data[i].texturename = "in progress"
- engine.handle_async(
- function(param)
- param.successfull = engine.download_file(param.fullurl,param.filename)
- return param
- end,
- {
- fullurl = fullurl,
- filename = filename,
- listindex = i,
- modid = list.data[i].id
- },
- function(result)
- if modstore.modlist_unsorted and
- modstore.modlist_unsorted.data and
- #modstore.modlist_unsorted.data >= result.listindex and
- modstore.modlist_unsorted.data[result.listindex].id == result.modid then
- if result.successfull then
- modstore.modlist_unsorted.data[result.listindex].texturename = result.filename
- else
- modstore.modlist_unsorted.data[result.listindex].texturename = modstore.basetexturedir .. "no_screenshot.png"
- end
- engine.event_handler("Refresh")
- end
- end
- )
- end
- else
- if list.data[i].texturename == nil then
- list.data[i].texturename = modstore.basetexturedir .. "no_screenshot.png"
- end
- end
-
- if list.data[i].texturename ~= nil and
- list.data[i].texturename ~= "in progress" then
- retval = retval .. "image[0,".. screenshot_ypos .. ";3,2;" ..
- engine.formspec_escape(list.data[i].texturename) .. "]"
- end
- end
-
- --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[9.1," .. ratingy .. ";" ..
- fgettext("Rating") .. ":]"
- retval = retval .. "label[11.1," .. ratingy .. ";" .. details.rating .."]"
-
- if details.basename then
- --install button
- local buttony = screenshot_ypos + 1.2
- local buttonnumber = (i - (list.page * modstore.modsperpage))
- retval = retval .."button[9.1," .. buttony .. ";2.5,0.5;btn_install_mod_" .. buttonnumber .. ";"
-
- if modmgr.mod_exists(details.basename) then
- retval = retval .. fgettext("re-Install") .."]"
- else
- retval = retval .. fgettext("Install") .."]"
- end
- 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 [parent=#modstore] getsearchpage
function modstore.getsearchpage()
local retval = ""
+ local search = ""
+
+ if modstore.last_search ~= nil then
+ search = modstore.last_search
+ end
- --TODO implement search!
+ 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