2 * Claws Mail -- a GTK+ based, lightweight, and fast e-mail client
3 * Copyright (C) 2016 the Claws Mail team
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 3 of the License, or
8 * (at your option) any later version.
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
15 * You should have received a copy of the GNU General Public License
16 * along with this program. If not, see <http://www.gnu.org/licenses/>.
21 #include "claws-features.h"
25 #include <glib/gi18n.h>
33 #include "prefs_account.h"
34 #include "prefs_common.h"
35 #include "alertpanel.h"
37 extern gint _password_store_config_version;
39 static gint starting_config_version = 0;
41 gboolean _version_check(gint ver)
43 if (ver > CLAWS_CONFIG_VERSION) {
48 markup = g_strdup_printf(
49 "<a href=\"%s\"><span underline=\"none\">",
51 msg = g_strdup_printf(
52 _("Your Claws Mail configuration is from a newer "
53 "version than the version which you are currently "
55 "This is not recommended.\n\n"
56 "For further information see the %sClaws Mail "
58 "Do you want to exit now?"),
59 markup, "</span></a>");
61 av = alertpanel_full(_("Configuration warning"), msg,
62 GTK_STOCK_NO, GTK_STOCK_YES, NULL,
64 ALERT_ERROR, G_ALERTALTERNATE);
67 if (av != G_ALERTDEFAULT)
68 return FALSE; /* abort startup */
70 return TRUE; /* hic sunt dracones */
76 static void _update_config_common(gint version)
78 debug_print("Updating config version %d to %d.\n", version, version + 1);
83 /* The autochk_interval preference is now
84 * interpreted as seconds instead of minutes */
85 prefs_common.autochk_itv *= 60;
97 static void _update_config_account(PrefsAccount *ac_prefs, gint version)
99 debug_print("Account '%s': Updating config version from %d to %d.\n",
100 ac_prefs->account_name, version, version + 1);
105 /* Removing A_APOP and A_RPOP from RecvProtocol enum,
106 * protocol numbers above A_POP3 need to be adjusted.
108 * In config_version=0:
112 * A_IMAP and the rest are from 3 up.
113 * We can't use the macros, since they may change in the
114 * future. Numbers do not change. :) */
115 if (ac_prefs->protocol == 1) {
116 ac_prefs->protocol = 0;
117 } else if (ac_prefs->protocol > 2) {
118 /* A_IMAP and above gets bumped down by 2. */
119 ac_prefs->protocol -= 2;
131 ac_prefs->config_version = version + 1;
134 static void _update_config_password_store(gint version)
136 debug_print("Password store: Updating config version from %d to %d.\n",
137 version, version + 1);
140 /* nothing here yet */
150 static void _update_config_folderlist(gint version)
152 debug_print("Folderlist: Updating config version from %d to %d.\n",
153 version, version + 1);
156 /* nothing here yet */
166 int prefs_update_config_version_common()
168 gint ver = prefs_common_get_prefs()->config_version;
170 /* Store the starting version number for other components'
171 * migration functions. */
172 starting_config_version = ver;
174 if (!_version_check(ver))
177 debug_print("Starting config update at config_version %d.\n", ver);
178 if (ver == CLAWS_CONFIG_VERSION) {
179 debug_print("No update necessary, already at latest config_version.\n");
180 return 0; /* nothing to do */
183 while (ver < CLAWS_CONFIG_VERSION) {
184 _update_config_common(ver++);
185 prefs_common_get_prefs()->config_version = ver;
188 debug_print("Config update done.\n");
189 return 1; /* update done */
192 int prefs_update_config_version_accounts()
195 PrefsAccount *ac_prefs;
197 for (cur = account_get_list(); cur != NULL; cur = cur->next) {
198 ac_prefs = (PrefsAccount *)cur->data;
200 if (ac_prefs->config_version == -1) {
201 /* There was no config_version stored in accountrc, let's assume
202 * config_version same as clawsrc started at, to avoid breaking
203 * this account by "upgrading" it unnecessarily. */
204 debug_print("Account '%s': config_version not saved, using one from clawsrc: %d\n", ac_prefs->account_name, starting_config_version);
205 ac_prefs->config_version = starting_config_version;
208 gint ver = ac_prefs->config_version;
210 debug_print("Account '%s': Starting config update at config_version %d.\n", ac_prefs->account_name, ver);
212 if (!_version_check(ver))
215 if (ver == CLAWS_CONFIG_VERSION) {
216 debug_print("Account '%s': No update necessary, already at latest config_version.\n", ac_prefs->account_name);
220 while (ver < CLAWS_CONFIG_VERSION) {
221 _update_config_account(ac_prefs, ver++);
228 int prefs_update_config_version_password_store()
232 if (_password_store_config_version == -1) {
233 /* There was no config_version stored in the config, let's assume
234 * config_version same as clawsrc started at, to avoid breaking
235 * the configuration by "upgrading" it unnecessarily. */
236 debug_print("Password store: config_version not saved, using one from clawsrc: %d\n", starting_config_version);
237 _password_store_config_version = starting_config_version;
240 ver = _password_store_config_version;
242 debug_print("Starting config update at config_version %d.\n", ver);
244 if (!_version_check(ver))
247 if (ver == CLAWS_CONFIG_VERSION) {
248 debug_print("No update necessary, already at latest config_version.\n");
249 return 0; /* nothing to do */
252 while (ver < CLAWS_CONFIG_VERSION) {
253 _update_config_password_store(ver++);
254 _password_store_config_version = ver;
257 debug_print("Config update done.\n");
261 int prefs_update_config_version_folderlist(gint from_version)
263 gint ver = from_version;
266 /* There was no config_version stored in the config, let's assume
267 * config_version same as clawsrc started at, to avoid breaking
268 * the configuration by "upgrading" it unnecessarily. */
269 debug_print("Folderlist: config_version not saved, using one from clawsrc: %d\n", starting_config_version);
270 ver = starting_config_version;
273 debug_print("Starting config_update at config_version %d,\n", ver);
275 if (!_version_check(ver))
278 if (ver == CLAWS_CONFIG_VERSION) {
279 debug_print("No update necessary, already at latest config_version.\n");
280 return 0; /* nothing to do */
283 while (ver < CLAWS_CONFIG_VERSION) {
284 _update_config_folderlist(ver++);
287 debug_print("Config update done.\n");