src/prefs_migration.c

   1 /*
   2  * Claws Mail -- a GTK+ based, lightweight, and fast e-mail client
   3  * Copyright (C) 2016 the Claws Mail team
   4  *
   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.
   9  *
  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.
  14  *
  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/>.
  17  */
  18
  19 #ifdef HAVE_CONFIG_H
  20 #include "config.h"
  21 #include "claws-features.h"
  22 #endif
  23
  24 #ifdef ENABLE_NLS
  25 #include <glib/gi18n.h>
  26 #else
  27 #define _(a) (a)
  28 #define N_(a) (a)
  29 #endif
  30
  31 #include "defs.h"
  32 #include "account.h"
  33 #include "folder_item_prefs.h"
  34 #include "prefs_account.h"
  35 #include "prefs_common.h"
  36 #include "alertpanel.h"
  37
  38 static gint starting_config_version = 0;
  39
  40 gboolean _version_check(gint ver)
  41 {
  42         if (ver > CLAWS_CONFIG_VERSION) {
  43                 gchar *msg;
  44                 gchar *markup;
  45                 AlertValue av;
  46
  47                 markup = g_strdup_printf(
  48                         "<a href=\"%s\"><span underline=\"none\">",
  49                         CONFIG_VERSIONS_URI);
  50                 msg = g_strdup_printf(
  51                         _("Your Claws Mail configuration is from a newer "
  52                           "version than the version which you are currently "
  53                           "using.\n\n"
  54                           "This is not recommended.\n\n"
  55                           "For further information see the %sClaws Mail "
  56                           "website%s.\n\n"
  57                           "Do you want to exit now?"),
  58                           markup, "</span></a>");
  59                 g_free(markup);
  60                 av = alertpanel_full(_("Configuration warning"), msg,
  61                                         GTK_STOCK_NO, GTK_STOCK_YES, NULL, ALERTFOCUS_SECOND,
  62                                         FALSE, NULL, ALERT_ERROR);
  63                 g_free(msg);
  64
  65                 if (av != G_ALERTDEFAULT)
  66                         return FALSE; /* abort startup */
  67
  68                 return TRUE; /* hic sunt dracones */
  69         }
  70
  71         return TRUE;
  72 }
  73
  74 static void _update_config_common(gint version)
  75 {
  76         debug_print("Updating config version %d to %d.\n", version, version + 1);
  77
  78         switch (version) {
  79                 case 1:
  80
  81                         /* The autochk_interval preference is now
  82                          * interpreted as seconds instead of minutes */
  83                         prefs_common.autochk_itv *= 60;
  84
  85                         break;
  86
  87                 default:
  88
  89                         /* NOOP */
  90
  91                         break;
  92         }
  93 }
  94
  95 static void _update_config_account(PrefsAccount *ac_prefs, gint version)
  96 {
  97         debug_print("Account '%s': Updating config version from %d to %d.\n",
  98                         ac_prefs->account_name, version, version + 1);
  99
 100         switch (version) {
 101                 case 0:
 102
 103                         /* Removing A_APOP and A_RPOP from RecvProtocol enum,
 104                          * protocol numbers above A_POP3 need to be adjusted.
 105                          *
 106                          * In config_version=0:
 107                          * A_POP3 is 0,
 108                          * A_APOP is 1,
 109                          * A_RPOP is 2,
 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;
 118                         }
 119
 120                         break;
 121
 122                 case 2:
 123
 124                         /* Introducing per-account mail check intervals, and separating
 125                          * recv_at_getall from autocheck function.
 126                          *
 127                          * If recv_at_getall is TRUE, the account's autocheck will be
 128                          * enabled, following global autocheck interval.
 129                          *
 130                          * The account's own autocheck interval will be set to the
 131                          * same value as the global interval, but will not be used.
 132                          *
 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;
 140                         } else {
 141                                 ac_prefs->autochk_use_default = FALSE;
 142                         }
 143
 144                         break;
 145
 146                 default:
 147
 148                         /* NOOP */
 149
 150                         break;
 151         }
 152
 153         ac_prefs->config_version = version + 1;
 154 }
 155
 156 static void _update_config_password_store(gint version)
 157 {
 158         debug_print("Password store: Updating config version from %d to %d.\n",
 159                         version, version + 1);
 160
 161         switch (version) {
 162                 /* nothing here yet */
 163
 164                 default:
 165
 166                         /* NOOP */
 167
 168                         break;
 169         }
 170 }
 171
 172 static void _update_config_folderlist(gint version)
 173 {
 174         debug_print("Folderlist: Updating config version from %d to %d.\n",
 175                         version, version + 1);
 176
 177         switch (version) {
 178                 /* nothing here yet */
 179
 180                 default:
 181
 182                         /* NOOP */
 183
 184                         break;
 185         }
 186 }
 187
 188 static void _update_config_folder_item(FolderItem *item,
 189                 gint version)
 190 {
 191         debug_print("Updating config_version from %d to %d.\n",
 192                         version, version + 1);
 193
 194         switch (version) {
 195                 /* nothing here yet */
 196
 197                 default:
 198
 199                         /* NOOP */
 200
 201                         break;
 202         }
 203 }
 204
 205 int prefs_update_config_version_common()
 206 {
 207         gint ver = prefs_common_get_prefs()->config_version;
 208
 209         /* Store the starting version number for other components'
 210          * migration functions. */
 211         starting_config_version = ver;
 212
 213         if (!_version_check(ver))
 214                 return -1;
 215
 216         debug_print("Starting config update at config_version %d.\n", ver);
 217         if (ver == CLAWS_CONFIG_VERSION) {
 218                 debug_print("No update necessary, already at latest config_version.\n");
 219                 return 0; /* nothing to do */
 220         }
 221
 222         while (ver < CLAWS_CONFIG_VERSION) {
 223                 _update_config_common(ver++);
 224                 prefs_common_get_prefs()->config_version = ver;
 225         }
 226
 227         debug_print("Config update done.\n");
 228         return 1; /* update done */
 229 }
 230
 231 int prefs_update_config_version_accounts()
 232 {
 233         GList *cur;
 234         PrefsAccount *ac_prefs;
 235
 236         for (cur = account_get_list(); cur != NULL; cur = cur->next) {
 237                 ac_prefs = (PrefsAccount *)cur->data;
 238
 239                 if (ac_prefs->config_version == -1) {
 240                         /* There was no config_version stored in the config, let's
 241                          * assume config_version same as what clawsrc started at
 242                          * this session, to avoid breaking the configuration by
 243                          * "upgrading" it unnecessarily. */
 244                         debug_print("Account '%s': config_version not saved, using one from clawsrc: %d\n", ac_prefs->account_name, starting_config_version);
 245                         ac_prefs->config_version = starting_config_version;
 246                 }
 247
 248                 gint ver = ac_prefs->config_version;
 249
 250                 debug_print("Account '%s': Starting config update at config_version %d.\n", ac_prefs->account_name, ver);
 251
 252                 if (!_version_check(ver))
 253                         return -1;
 254
 255                 if (ver == CLAWS_CONFIG_VERSION) {
 256                         debug_print("Account '%s': No update necessary, already at latest config_version.\n", ac_prefs->account_name);
 257                         continue;
 258                 }
 259
 260                 while (ver < CLAWS_CONFIG_VERSION) {
 261                         _update_config_account(ac_prefs, ver++);
 262                 }
 263         }
 264
 265         debug_print("Accounts config update done.\n");
 266         return 1;
 267 }
 268
 269 int prefs_update_config_version_password_store(gint from_version)
 270 {
 271         gint ver = from_version;
 272
 273         if (ver == -1) {
 274                 /* There was no config_version stored in the config, let's assume
 275                  * config_version same as what clawsrc started at this session,
 276                  * to avoid breaking the configuration by "upgrading" it unnecessarily. */
 277                 debug_print("Password store: config_version not saved, using one from clawsrc: %d\n", starting_config_version);
 278                 ver = starting_config_version;
 279         }
 280
 281         debug_print("Starting config update at config_version %d.\n", ver);
 282
 283         if (!_version_check(ver))
 284                 return -1;
 285
 286         if (ver == CLAWS_CONFIG_VERSION) {
 287                 debug_print("No update necessary, already at latest config_version.\n");
 288                 return 0; /* nothing to do */
 289         }
 290
 291         while (ver < CLAWS_CONFIG_VERSION) {
 292                 _update_config_password_store(ver++);
 293         }
 294
 295         debug_print("Passwordstore config update done.\n");
 296         return 1;
 297 }
 298
 299 int prefs_update_config_version_folderlist(gint from_version)
 300 {
 301         gint ver = from_version;
 302
 303         if (ver == -1) {
 304                 /* There was no config_version stored in the config, let's assume
 305                  * config_version same as what clawsrc started at this session,
 306                  * to avoid breaking the configuration by "upgrading" it unnecessarily. */
 307                 debug_print("Folderlist: config_version not saved, using one from clawsrc: %d\n", starting_config_version);
 308                 ver = starting_config_version;
 309         }
 310
 311         debug_print("Starting config_update at config_version %d,\n", ver);
 312
 313         if (!_version_check(ver))
 314                 return -1;
 315
 316         if (ver == CLAWS_CONFIG_VERSION) {
 317                 debug_print("No update necessary, already at latest config_version.\n");
 318                 return 0; /* nothing to do */
 319         }
 320
 321         while (ver < CLAWS_CONFIG_VERSION) {
 322                 _update_config_folderlist(ver++);
 323         }
 324
 325         debug_print("Folderlist config update done.\n");
 326         return 1;
 327 }
 328
 329 int prefs_update_config_version_folder_item(FolderItem *item)
 330 {
 331         gint ver;
 332         gchar *id;
 333
 334         cm_return_val_if_fail(item != NULL, 0);
 335
 336         id = folder_item_get_identifier(item);
 337
 338         if (item->prefs->config_version == -1) {
 339                 /* There was no config_version stored in the config, let's assume
 340                  * config_version same as what clawsrc started at this session,
 341                  * to avoid breaking the configuration by "upgrading" it unnecessarily. */
 342                 debug_print("Folder item '%s': config_version not saved, using one from clawsrc: %d\n", id, starting_config_version);
 343                 item->prefs->config_version = starting_config_version;
 344         }
 345
 346         ver = item->prefs->config_version;
 347
 348         if (!_version_check(ver)) {
 349                 g_free(id);
 350                 return -1;
 351         }
 352
 353         if (ver == CLAWS_CONFIG_VERSION) {
 354                 debug_print("Folder item '%s': No update necessary, already at latest config_version %d.\n", id, ver);
 355                 g_free(id);
 356                 return 0; /* nothing to do */
 357         }
 358
 359         debug_print("Folder item '%s': starting config_update at version %d.\n",
 360                         id, ver);
 361         g_free(id);
 362
 363         while (ver < CLAWS_CONFIG_VERSION) {
 364                 _update_config_folder_item(item, ver++);
 365         }
 366
 367         debug_print("Folder item config update done.\n");
 368         return 0;
 369 }