2 --Copyright (C) 2013 sapier
4 --This program is free software; you can redistribute it and/or modify
5 --it under the terms of the GNU Lesser General Public License as published by
6 --the Free Software Foundation; either version 2.1 of the License, or
7 --(at your option) any later version.
9 --This program is distributed in the hope that it will be useful,
10 --but WITHOUT ANY WARRANTY; without even the implied warranty of
11 --MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 --GNU Lesser General Public License for more details.
14 --You should have received a copy of the GNU Lesser General Public License along
15 --with this program; if not, write to the Free Software Foundation, Inc.,
16 --51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
18 --------------------------------------------------------------------------------
20 --modstore implementation
23 --------------------------------------------------------------------------------
24 function modstore.init()
25 modstore.tabnames = {}
27 table.insert(modstore.tabnames,"dialog_modstore_unsorted")
28 table.insert(modstore.tabnames,"dialog_modstore_search")
30 modstore.modsperpage = 5
32 modstore.basetexturedir = engine.get_gamepath() .. DIR_DELIM .. ".." ..
33 DIR_DELIM .. "textures" .. DIR_DELIM .. "base" ..
34 DIR_DELIM .. "pack" .. DIR_DELIM
35 modstore.update_modlist()
37 modstore.current_list = nil
39 modstore.details_cache = {}
41 --------------------------------------------------------------------------------
42 function modstore.nametoindex(name)
44 for i=1,#modstore.tabnames,1 do
45 if modstore.tabnames[i] == name then
53 --------------------------------------------------------------------------------
54 function modstore.gettab(tabname)
57 local is_modstore_tab = false
59 if tabname == "dialog_modstore_unsorted" then
60 retval = modstore.getmodlist(modstore.modlist_unsorted)
61 is_modstore_tab = true
64 if tabname == "dialog_modstore_search" then
67 is_modstore_tab = true
70 if is_modstore_tab then
71 return modstore.tabheader(tabname) .. retval
74 if tabname == "modstore_mod_installed" then
75 return "size[6,2]label[0.25,0.25;Mod: " .. modstore.lastmodtitle ..
76 " installed successfully]" ..
77 "button[2.5,1.5;1,0.5;btn_confirm_mod_successfull;ok]"
83 --------------------------------------------------------------------------------
84 function modstore.tabheader(tabname)
85 local retval = "size[12,9.25]"
86 retval = retval .. "tabheader[-0.3,-0.99;modstore_tab;" ..
88 modstore.nametoindex(tabname) .. ";true;false]"
93 --------------------------------------------------------------------------------
94 function modstore.handle_buttons(current_tab,fields)
96 modstore.lastmodtitle = ""
98 if fields["modstore_tab"] then
99 local index = tonumber(fields["modstore_tab"])
102 index <= #modstore.tabnames then
104 current_tab = modstore.tabnames[index],
110 modstore.modlist_page = 0
113 if fields["btn_modstore_page_up"] then
114 if modstore.current_list ~= nil and modstore.current_list.page > 0 then
115 modstore.current_list.page = modstore.current_list.page - 1
119 if fields["btn_modstore_page_down"] then
120 if modstore.current_list ~= nil and
121 modstore.current_list.page <modstore.current_list.pagecount then
122 modstore.current_list.page = modstore.current_list.page +1
126 if fields["btn_confirm_mod_successfull"] then
128 current_tab = modstore.tabnames[1],
134 for i=1, modstore.modsperpage, 1 do
135 local installbtn = "btn_install_mod_" .. i
137 if fields[installbtn] then
139 modstore.current_list.page * modstore.modsperpage + i
141 local moddetails = modstore.get_details(modstore.current_list.data[modlistentry].id)
143 local fullurl = engine.setting_get("modstore_download_url") ..
144 moddetails.download_url
145 local modfilename = os.tempfolder() .. ".zip"
146 print("Downloading mod from: " .. fullurl .. " to ".. modfilename)
148 if engine.download_file(fullurl,modfilename) then
150 modmgr.installmod(modfilename,moddetails.basename)
152 os.remove(modfilename)
153 modstore.lastmodtitle = modstore.current_list.data[modlistentry].title
156 current_tab = "modstore_mod_installed",
161 gamedata.errormessage = "Unable to download " ..
162 moddetails.download_url .. " (internet connection?)"
168 --------------------------------------------------------------------------------
169 function modstore.update_modlist()
170 modstore.modlist_unsorted = {}
171 modstore.modlist_unsorted.data = engine.get_modstore_list()
173 if modstore.modlist_unsorted.data ~= nil then
174 modstore.modlist_unsorted.pagecount =
175 math.floor((#modstore.modlist_unsorted.data / modstore.modsperpage))
177 modstore.modlist_unsorted.data = {}
178 modstore.modlist_unsorted.pagecount = 0
180 modstore.modlist_unsorted.page = 0
183 --------------------------------------------------------------------------------
184 function modstore.getmodlist(list)
186 retval = retval .. "label[10,-0.4;Page " .. (list.page +1) ..
187 " of " .. (list.pagecount +1) .. "]"
189 retval = retval .. "button[11.6,-0.1;0.5,0.5;btn_modstore_page_up;^]"
190 retval = retval .. "box[11.6,0.35;0.28,8.6;000000]"
191 local scrollbarpos = 0.35 + (8.1/list.pagecount) * list.page
192 retval = retval .. "box[11.6," ..scrollbarpos .. ";0.28,0.5;32CD32]"
193 retval = retval .. "button[11.6,9.0;0.5,0.5;btn_modstore_page_down;v]"
196 if #list.data < (list.page * modstore.modsperpage) then
200 local endmod = (list.page * modstore.modsperpage) + modstore.modsperpage
202 if (endmod > #list.data) then
206 for i=(list.page * modstore.modsperpage) +1, endmod, 1 do
208 local details = modstore.get_details(list.data[i].id)
210 if details ~= nil then
211 local screenshot_ypos = (i-1 - (list.page * modstore.modsperpage))*1.9 +0.2
213 retval = retval .. "box[0," .. screenshot_ypos .. ";11.4,1.75;FFFFFF]"
216 if details.screenshot_url ~= nil and
217 details.screenshot_url ~= "" then
218 if list.data[i].texturename == nil then
219 print("downloading screenshot: " .. details.screenshot_url)
220 local filename = os.tempfolder()
222 if engine.download_file(details.screenshot_url,filename) then
223 list.data[i].texturename = filename
228 if list.data[i].texturename == nil then
229 list.data[i].texturename = modstore.basetexturedir .. "no_screenshot.png"
232 retval = retval .. "image[0,".. screenshot_ypos .. ";3,2;" ..
233 list.data[i].texturename .. "]"
236 retval = retval .."label[2.75," .. screenshot_ypos .. ";" ..
237 fs_escape_string(details.title) .. " (" .. details.author .. ")]"
240 local descriptiony = screenshot_ypos + 0.5
241 retval = retval .. "textarea[3," .. descriptiony .. ";6.5,1.6;;" ..
242 fs_escape_string(details.description) .. ";]"
244 local ratingy = screenshot_ypos + 0.6
245 retval = retval .."label[10.1," .. ratingy .. ";Rating: " .. details.rating .."]"
248 local buttony = screenshot_ypos + 1.2
249 local buttonnumber = (i - (list.page * modstore.modsperpage))
250 retval = retval .."button[9.6," .. buttony .. ";2,0.5;btn_install_mod_" .. buttonnumber .. ";"
252 if modmgr.mod_exists(details.basename) then
253 retval = retval .. "re-Install]"
255 retval = retval .. "Install]"
260 modstore.current_list = list
265 --------------------------------------------------------------------------------
266 function modstore.get_details(modid)
268 if modstore.details_cache[modid] ~= nil then
269 return modstore.details_cache[modid]
272 local retval = engine.get_modstore_details(tostring(modid))
273 modstore.details_cache[modid] = retval