be8bb707d373d98f06341091db3c3b9eb290a997
[supertux.git] / src / supertux / gameconfig.cpp
1 //  SuperTux -  A Jump'n Run
2 //  Copyright (C) 2006 Matthias Braun <matze@braunis.de>
3 //
4 //  This program is free software: you can redistribute it and/or modify
5 //  it under the terms of the GNU General Public License as published by
6 //  the Free Software Foundation, either version 3 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 General Public License for more details.
13 //
14 //  You should have received a copy of the GNU General Public License
15 //  along with this program.  If not, see <http://www.gnu.org/licenses/>.
16
17 #include "supertux/gameconfig.hpp"
18
19 #include <stdexcept>
20
21 #include "addon/addon_manager.hpp"
22 #include "control/joystickkeyboardcontroller.hpp"
23 #include "lisp/lisp.hpp"
24 #include "lisp/writer.hpp"
25 #include "lisp/parser.hpp"
26 #include "supertux/globals.hpp"
27
28 Config* g_config = 0;
29
30 Config::Config() :
31   profile(1),
32   fullscreen_width (800),
33   fullscreen_height(600),
34   window_width (800),
35   window_height(600),
36   aspect_width (0), // auto detect
37   aspect_height(0),
38   magnification(1.0f),
39   use_fullscreen(false),
40   video(AUTO_VIDEO),
41   try_vsync(true),
42   show_fps(false),
43   sound_enabled(true),
44   music_enabled(true),
45   console_enabled(false),
46   random_seed(0),          // set by time(), by default (unless in config)
47   start_level(),
48   enable_script_debugger(false),
49   start_demo(),
50   record_demo(),
51   locale()
52 {
53 }
54
55 Config::~Config()
56 {}
57
58 void
59 Config::load()
60 {
61   lisp::Parser parser;
62   const lisp::Lisp* root = parser.parse("config");
63
64   const lisp::Lisp* config_lisp = root->get_lisp("supertux-config");
65   if(!config_lisp)
66     throw std::runtime_error("File is not a supertux-config file");
67
68   config_lisp->get("show_fps", show_fps);
69   config_lisp->get("console", console_enabled);
70   config_lisp->get("locale", locale);
71   config_lisp->get("random_seed", random_seed);
72
73   const lisp::Lisp* config_video_lisp = config_lisp->get_lisp("video");
74   if(config_video_lisp) {
75     config_video_lisp->get("fullscreen", use_fullscreen);
76     std::string video_string;
77     config_video_lisp->get("video", video_string);
78     video = get_video_system(video_string);
79     config_video_lisp->get("vsync", try_vsync);
80
81     config_video_lisp->get("fullscreen_width",  fullscreen_width);
82     config_video_lisp->get("fullscreen_height", fullscreen_height);
83
84     config_video_lisp->get("window_width",  window_width);
85     config_video_lisp->get("window_height", window_height);
86
87     config_video_lisp->get("aspect_width",  aspect_width);
88     config_video_lisp->get("aspect_height", aspect_height);
89   }
90
91   const lisp::Lisp* config_audio_lisp = config_lisp->get_lisp("audio");
92   if(config_audio_lisp) {
93     config_audio_lisp->get("sound_enabled", sound_enabled);
94     config_audio_lisp->get("music_enabled", music_enabled);
95   }
96
97   const lisp::Lisp* config_control_lisp = config_lisp->get_lisp("control");
98   if(config_control_lisp && g_main_controller) {
99     g_main_controller->read(*config_control_lisp);
100   }
101
102   const lisp::Lisp* config_addons_lisp = config_lisp->get_lisp("addons");
103   if(config_addons_lisp) {
104     AddonManager::get_instance().read(*config_addons_lisp);
105   }
106 }
107
108 void
109 Config::save()
110 {
111   lisp::Writer writer("config");
112
113   writer.start_list("supertux-config");
114
115   writer.write("show_fps", show_fps);
116   writer.write("console", console_enabled);
117   writer.write("locale", locale);
118
119   writer.start_list("video");
120   writer.write("fullscreen", use_fullscreen);
121   writer.write("video", get_video_string(video));
122   writer.write("vsync", try_vsync);
123
124   writer.write("fullscreen_width",  fullscreen_width);
125   writer.write("fullscreen_height", fullscreen_height);
126
127   writer.write("window_width",  window_width);
128   writer.write("window_height", window_height);
129
130   writer.write("aspect_width",  aspect_width);
131   writer.write("aspect_height", aspect_height);
132
133   writer.end_list("video");
134
135   writer.start_list("audio");
136   writer.write("sound_enabled", sound_enabled);
137   writer.write("music_enabled", music_enabled);
138   writer.end_list("audio");
139
140   if(g_main_controller) {
141     writer.start_list("control");
142     g_main_controller->write(writer);
143     writer.end_list("control");
144   }
145
146   writer.start_list("addons");
147   AddonManager::get_instance().write(writer);
148   writer.end_list("addons");
149
150   writer.end_list("supertux-config");
151 }
152
153 /* EOF */