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 "folder_item_prefs.h"
34 #include "prefs_account.h"
35 #include "prefs_common.h"
36 #include "alertpanel.h"
38 static gint starting_config_version
= 0;
40 gboolean
_version_check(gint ver
)
42 if (ver
> CLAWS_CONFIG_VERSION
) {
47 markup
= g_strdup_printf(
48 "<a href=\"%s\"><span underline=\"none\">",
50 msg
= g_strdup_printf(
51 _("Your Claws Mail configuration is from a newer "
52 "version than the version which you are currently "
54 "This is not recommended.\n\n"
55 "For further information see the %sClaws Mail "
57 "Do you want to exit now?"),
58 markup
, "</span></a>");
60 av
= alertpanel_full(_("Configuration warning"), msg
,
61 GTK_STOCK_NO
, GTK_STOCK_YES
, NULL
, ALERTFOCUS_SECOND
,
62 FALSE
, NULL
, ALERT_ERROR
);
65 if (av
!= G_ALERTDEFAULT
)
66 return FALSE
; /* abort startup */
68 return TRUE
; /* hic sunt dracones */
74 static void _update_config_common(gint version
)
76 debug_print("Updating config version %d to %d.\n", version
, version
+ 1);
81 /* The autochk_interval preference is now
82 * interpreted as seconds instead of minutes */
83 prefs_common
.autochk_itv
*= 60;
95 static void _update_config_account(PrefsAccount
*ac_prefs
, gint version
)
97 debug_print("Account '%s': Updating config version from %d to %d.\n",
98 ac_prefs
->account_name
, version
, version
+ 1);
103 /* Removing A_APOP and A_RPOP from RecvProtocol enum,
104 * protocol numbers above A_POP3 need to be adjusted.
106 * In config_version=0:
110 * A_IMAP and the rest are from 3 up.
111 * We can't use the macros, since they may change in the
112 * future. Numbers do not change. :) */
113 if (ac_prefs
->protocol
== 1) {
114 ac_prefs
->protocol
= 0;
115 } else if (ac_prefs
->protocol
> 2) {
116 /* A_IMAP and above gets bumped down by 2. */
117 ac_prefs
->protocol
-= 2;
124 /* Introducing per-account mail check intervals, and separating
125 * recv_at_getall from autocheck function.
127 * If recv_at_getall is TRUE, the account's autocheck will be
128 * enabled, following global autocheck interval.
130 * The account's own autocheck interval will be set to the
131 * same value as the global interval, but will not be used.
133 * recv_at_getall will remain enabled, but will only be used
134 * to determine whether or not to include this account for
135 * manual 'Get all' check. */
136 ac_prefs
->autochk_itv
= prefs_common_get_prefs()->autochk_itv
;
137 ac_prefs
->autochk_use_custom
= FALSE
;
138 if (ac_prefs
->recv_at_getall
) {
139 ac_prefs
->autochk_use_default
= TRUE
;
141 ac_prefs
->autochk_use_default
= FALSE
;
147 /* With the introduction of OAUTH2 support, the APOP option
148 * (use_apop_auth) has been swallowed into a combobox and
150 if (ac_prefs
->use_apop_auth
== 1) {
151 ac_prefs
->use_pop_auth
= 1;
152 ac_prefs
->pop_auth_type
= 1;
162 ac_prefs
->config_version
= version
+ 1;
165 static void _update_config_password_store(gint version
)
167 debug_print("Password store: Updating config version from %d to %d.\n",
168 version
, version
+ 1);
171 /* nothing here yet */
181 static void _update_config_folderlist(gint version
)
183 debug_print("Folderlist: Updating config version from %d to %d.\n",
184 version
, version
+ 1);
187 /* nothing here yet */
197 static void _update_config_folder_item(FolderItem
*item
,
200 debug_print("Updating config_version from %d to %d.\n",
201 version
, version
+ 1);
204 /* nothing here yet */
214 int prefs_update_config_version_common()
216 gint ver
= prefs_common_get_prefs()->config_version
;
218 /* Store the starting version number for other components'
219 * migration functions. */
220 starting_config_version
= ver
;
222 if (!_version_check(ver
))
225 debug_print("Starting config update at config_version %d.\n", ver
);
226 if (ver
== CLAWS_CONFIG_VERSION
) {
227 debug_print("No update necessary, already at latest config_version.\n");
228 return 0; /* nothing to do */
231 while (ver
< CLAWS_CONFIG_VERSION
) {
232 _update_config_common(ver
++);
233 prefs_common_get_prefs()->config_version
= ver
;
236 debug_print("Config update done.\n");
237 return 1; /* update done */
240 int prefs_update_config_version_accounts()
243 PrefsAccount
*ac_prefs
;
245 for (cur
= account_get_list(); cur
!= NULL
; cur
= cur
->next
) {
246 ac_prefs
= (PrefsAccount
*)cur
->data
;
248 if (ac_prefs
->config_version
== -1) {
249 /* There was no config_version stored in the config, let's
250 * assume config_version same as what clawsrc started at
251 * this session, to avoid breaking the configuration by
252 * "upgrading" it unnecessarily. */
253 debug_print("Account '%s': config_version not saved, using one from clawsrc: %d\n", ac_prefs
->account_name
, starting_config_version
);
254 ac_prefs
->config_version
= starting_config_version
;
257 gint ver
= ac_prefs
->config_version
;
259 debug_print("Account '%s': Starting config update at config_version %d.\n", ac_prefs
->account_name
, ver
);
261 if (!_version_check(ver
))
264 if (ver
== CLAWS_CONFIG_VERSION
) {
265 debug_print("Account '%s': No update necessary, already at latest config_version.\n", ac_prefs
->account_name
);
269 while (ver
< CLAWS_CONFIG_VERSION
) {
270 _update_config_account(ac_prefs
, ver
++);
274 debug_print("Accounts config update done.\n");
278 int prefs_update_config_version_password_store(gint from_version
)
280 gint ver
= from_version
;
283 /* There was no config_version stored in the config, let's assume
284 * config_version same as what clawsrc started at this session,
285 * to avoid breaking the configuration by "upgrading" it unnecessarily. */
286 debug_print("Password store: config_version not saved, using one from clawsrc: %d\n", starting_config_version
);
287 ver
= starting_config_version
;
290 debug_print("Starting config update at config_version %d.\n", ver
);
292 if (!_version_check(ver
))
295 if (ver
== CLAWS_CONFIG_VERSION
) {
296 debug_print("No update necessary, already at latest config_version.\n");
297 return 0; /* nothing to do */
300 while (ver
< CLAWS_CONFIG_VERSION
) {
301 _update_config_password_store(ver
++);
304 debug_print("Passwordstore config update done.\n");
308 int prefs_update_config_version_folderlist(gint from_version
)
310 gint ver
= from_version
;
313 /* There was no config_version stored in the config, let's assume
314 * config_version same as what clawsrc started at this session,
315 * to avoid breaking the configuration by "upgrading" it unnecessarily. */
316 debug_print("Folderlist: config_version not saved, using one from clawsrc: %d\n", starting_config_version
);
317 ver
= starting_config_version
;
320 debug_print("Starting config_update at config_version %d,\n", ver
);
322 if (!_version_check(ver
))
325 if (ver
== CLAWS_CONFIG_VERSION
) {
326 debug_print("No update necessary, already at latest config_version.\n");
327 return 0; /* nothing to do */
330 while (ver
< CLAWS_CONFIG_VERSION
) {
331 _update_config_folderlist(ver
++);
334 debug_print("Folderlist config update done.\n");
338 int prefs_update_config_version_folder_item(FolderItem
*item
)
343 cm_return_val_if_fail(item
!= NULL
, 0);
345 id
= folder_item_get_identifier(item
);
347 if (item
->prefs
->config_version
== -1) {
348 /* There was no config_version stored in the config, let's assume
349 * config_version same as what clawsrc started at this session,
350 * to avoid breaking the configuration by "upgrading" it unnecessarily. */
351 debug_print("Folder item '%s': config_version not saved, using one from clawsrc: %d\n", id
, starting_config_version
);
352 item
->prefs
->config_version
= starting_config_version
;
355 ver
= item
->prefs
->config_version
;
357 if (!_version_check(ver
)) {
362 if (ver
== CLAWS_CONFIG_VERSION
) {
363 debug_print("Folder item '%s': No update necessary, already at latest config_version %d.\n", id
, ver
);
365 return 0; /* nothing to do */
368 debug_print("Folder item '%s': starting config_update at version %d.\n",
372 while (ver
< CLAWS_CONFIG_VERSION
) {
373 _update_config_folder_item(item
, ver
++);
376 debug_print("Folder item config update done.\n");