builtin/gamemgr.lua

   1 --Minetest
   2 --Copyright (C) 2013 sapier
   3 --
   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.
   8 --
   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.
  13 --
  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.
  17
  18 gamemgr = {}
  19
  20 --------------------------------------------------------------------------------
  21 function gamemgr.dialog_new_game()
  22         local retval =
  23                 "label[2,2;" .. fgettext("Game Name") .. "]"..
  24                 "field[4.5,2.4;6,0.5;te_game_name;;]" ..
  25                 "button[5,4.2;2.6,0.5;new_game_confirm;" .. fgettext("Create") .. "]" ..
  26                 "button[7.5,4.2;2.8,0.5;new_game_cancel;" .. fgettext("Cancel") .. "]"
  27
  28         return retval
  29 end
  30
  31 --------------------------------------------------------------------------------
  32 function gamemgr.handle_games_buttons(fields)
  33         if fields["gamelist"] ~= nil then
  34                 local event = explode_textlist_event(fields["gamelist"])
  35                 gamemgr.selected_game = event.index
  36         end
  37
  38         if fields["btn_game_mgr_edit_game"] ~= nil then
  39                 return {
  40                         is_dialog = true,
  41                         show_buttons = false,
  42                         current_tab = "dialog_edit_game"
  43                 }
  44         end
  45
  46         if fields["btn_game_mgr_new_game"] ~= nil then
  47                 return {
  48                         is_dialog = true,
  49                         show_buttons = false,
  50                         current_tab = "dialog_new_game"
  51                 }
  52         end
  53
  54         return nil
  55 end
  56
  57 --------------------------------------------------------------------------------
  58 function gamemgr.handle_new_game_buttons(fields)
  59
  60         if fields["new_game_confirm"] and
  61                 fields["te_game_name"] ~= nil and
  62                 fields["te_game_name"] ~= "" then
  63                 local gamepath = engine.get_gamepath()
  64
  65                 if gamepath ~= nil and
  66                         gamepath ~= "" then
  67                         local gamefolder = cleanup_path(fields["te_game_name"])
  68
  69                         --TODO check for already existing first
  70                         engine.create_dir(gamepath .. DIR_DELIM .. gamefolder)
  71                         engine.create_dir(gamepath .. DIR_DELIM .. gamefolder .. DIR_DELIM .. "mods")
  72                         engine.create_dir(gamepath .. DIR_DELIM .. gamefolder .. DIR_DELIM .. "menu")
  73
  74                         local gameconf =
  75                                 io.open(gamepath .. DIR_DELIM .. gamefolder .. DIR_DELIM .. "game.conf","w")
  76
  77                         if gameconf then
  78                                 gameconf:write("name = " .. fields["te_game_name"])
  79                                 gameconf:close()
  80                         end
  81                 end
  82         end
  83
  84         return {
  85                 is_dialog = false,
  86                 show_buttons = true,
  87                 current_tab = engine.setting_get("main_menu_tab")
  88                 }
  89 end
  90
  91 --------------------------------------------------------------------------------
  92 function gamemgr.handle_edit_game_buttons(fields)
  93         local current_game = gamemgr.get_game(gamemgr.selected_game)
  94
  95         if fields["btn_close_edit_game"] ~= nil or
  96                 current_game == nil then
  97                 return {
  98                         is_dialog = false,
  99                         show_buttons = true,
 100                         current_tab = engine.setting_get("main_menu_tab")
 101                         }
 102         end
 103
 104         if fields["btn_remove_mod_from_game"] ~= nil then
 105                 gamemgr.delete_mod(current_game,engine.get_textlist_index("mods_current"))
 106         end
 107
 108         if fields["btn_add_mod_to_game"] ~= nil then
 109                 local modindex = engine.get_textlist_index("mods_available")
 110
 111                 local mod = modmgr.get_global_mod(modindex)
 112                 if mod ~= nil then
 113
 114                         local sourcepath = mod.path
 115
 116                         if not gamemgr.add_mod(current_game,sourcepath) then
 117                                 gamedata.errormessage =
 118                                         fgettext("Gamemgr: Unable to copy mod \"$1\" to game \"$2\"", mod.name, current_game.id)
 119                         end
 120                 end
 121         end
 122
 123         return nil
 124 end
 125
 126 --------------------------------------------------------------------------------
 127 function gamemgr.add_mod(gamespec,sourcepath)
 128         if gamespec.gamemods_path ~= nil and
 129                 gamespec.gamemods_path ~= "" then
 130
 131                 local modname = get_last_folder(sourcepath)
 132
 133                 return engine.copy_dir(sourcepath,gamespec.gamemods_path .. DIR_DELIM .. modname);
 134         end
 135
 136         return false
 137 end
 138
 139 --------------------------------------------------------------------------------
 140 function gamemgr.delete_mod(gamespec,modindex)
 141         if gamespec.gamemods_path ~= nil and
 142                 gamespec.gamemods_path ~= "" then
 143                 local game_mods = {}
 144                 get_mods(gamespec.gamemods_path,game_mods)
 145
 146                 if modindex > 0 and
 147                         #game_mods >= modindex then
 148
 149                         if game_mods[modindex].path:sub(0,gamespec.gamemods_path:len())
 150                                         == gamespec.gamemods_path then
 151                                 engine.delete_dir(game_mods[modindex].path)
 152                         end
 153                 end
 154         end
 155 end
 156
 157 --------------------------------------------------------------------------------
 158 function gamemgr.get_game_mods(gamespec)
 159
 160         local retval = ""
 161
 162         if gamespec.gamemods_path ~= nil and
 163                 gamespec.gamemods_path ~= "" then
 164                 local game_mods = {}
 165                 get_mods(gamespec.gamemods_path,game_mods)
 166
 167                 for i=1,#game_mods,1 do
 168                         if retval ~= "" then
 169                                 retval = retval..","
 170                         end
 171                         retval = retval .. game_mods[i].name
 172                 end
 173         end
 174         return retval
 175 end
 176
 177 --------------------------------------------------------------------------------
 178 function gamemgr.gettab(name)
 179         local retval = ""
 180
 181         if name == "dialog_edit_game" then
 182                 retval = retval .. gamemgr.dialog_edit_game()
 183         end
 184
 185         if name == "dialog_new_game" then
 186                 retval = retval .. gamemgr.dialog_new_game()
 187         end
 188
 189         if name == "game_mgr" then
 190                 retval = retval .. gamemgr.tab()
 191         end
 192
 193         return retval
 194 end
 195
 196 --------------------------------------------------------------------------------
 197 function gamemgr.tab()
 198         if gamemgr.selected_game == nil then
 199                 gamemgr.selected_game = 1
 200         end
 201
 202         local retval =
 203                 "vertlabel[0,-0.25;" .. fgettext("GAMES") .. "]" ..
 204                 "label[1,-0.25;" .. fgettext("Games") .. ":]" ..
 205                 "textlist[1,0.25;4.5,4.4;gamelist;" ..
 206                 gamemgr.gamelist() ..
 207                 ";" .. gamemgr.selected_game .. "]"
 208
 209         local current_game = gamemgr.get_game(gamemgr.selected_game)
 210
 211         if current_game ~= nil then
 212                 if current_game.menuicon_path ~= nil and
 213                         current_game.menuicon_path ~= "" then
 214                         retval = retval ..
 215                                 "image[5.8,-0.25;2,2;" .. current_game.menuicon_path .. "]"
 216                 end
 217
 218                 retval = retval ..
 219                         "field[8,-0.25;6,2;;" .. current_game.name .. ";]"..
 220                         "label[6,1.4;" .. fgettext("Mods:") .."]" ..
 221                         "button[9.7,1.5;2,0.2;btn_game_mgr_edit_game;" .. fgettext("edit game") .. "]" ..
 222                         "textlist[6,2;5.5,3.3;game_mgr_modlist;"
 223                         .. gamemgr.get_game_mods(current_game) ..";0]" ..
 224                         "button[1,4.75;3.2,0.5;btn_game_mgr_new_game;" .. fgettext("new game") .. "]"
 225         end
 226         return retval
 227 end
 228
 229 --------------------------------------------------------------------------------
 230 function gamemgr.dialog_edit_game()
 231         local current_game = gamemgr.get_game(gamemgr.selected_game)
 232         if current_game ~= nil then
 233                 local retval =
 234                         "vertlabel[0,-0.25;" .. fgettext("EDIT GAME") .."]" ..
 235                         "label[0,-0.25;" .. current_game.name .. "]" ..
 236                         "button[11.55,-0.2;0.75,0.5;btn_close_edit_game;x]"
 237
 238                 if current_game.menuicon_path ~= nil and
 239                         current_game.menuicon_path ~= "" then
 240                         retval = retval ..
 241                                 "image[5.25,0;2,2;" .. current_game.menuicon_path .. "]"
 242                 end
 243
 244                 retval = retval ..
 245                         "textlist[0.5,0.5;4.5,4.3;mods_current;"
 246                         .. gamemgr.get_game_mods(current_game) ..";0]"
 247
 248
 249                 retval = retval ..
 250                         "textlist[7,0.5;4.5,4.3;mods_available;"
 251                         .. modmgr.render_modlist() .. ";0]"
 252
 253                 retval = retval ..
 254                         "button[0.55,4.95;4.7,0.5;btn_remove_mod_from_game;" .. fgettext("Remove selected mod") .."]"
 255
 256                 retval = retval ..
 257                         "button[7.05,4.95;4.7,0.5;btn_add_mod_to_game;" .. fgettext("<<-- Add mod") .."]"
 258
 259                 return retval
 260         end
 261 end
 262
 263 --------------------------------------------------------------------------------
 264 function gamemgr.handle_buttons(tab,fields)
 265         local retval = nil
 266
 267         if tab == "dialog_edit_game" then
 268                 retval = gamemgr.handle_edit_game_buttons(fields)
 269         end
 270
 271         if tab == "dialog_new_game" then
 272                 retval = gamemgr.handle_new_game_buttons(fields)
 273         end
 274
 275         if tab == "game_mgr" then
 276                 retval = gamemgr.handle_games_buttons(fields)
 277         end
 278
 279         return retval
 280 end
 281
 282 --------------------------------------------------------------------------------
 283 function gamemgr.get_game(index)
 284         if index > 0 and index <= #gamemgr.games then
 285                 return gamemgr.games[index]
 286         end
 287
 288         return nil
 289 end
 290
 291 --------------------------------------------------------------------------------
 292 function gamemgr.update_gamelist()
 293         gamemgr.games = engine.get_games()
 294 end
 295
 296 --------------------------------------------------------------------------------
 297 function gamemgr.gamelist()
 298         local retval = ""
 299         if #gamemgr.games > 0 then
 300                 retval = retval .. gamemgr.games[1].id
 301
 302                 for i=2,#gamemgr.games,1 do
 303                         retval = retval .. "," .. gamemgr.games[i].name
 304                 end
 305         end
 306         return retval
 307 end