lib/mcconfig/paths.c

   1 /*
   2    paths to configuration files
   3
   4    Copyright (C) 2010, 2011
   5    The Free Software Foundation, Inc.
   6
   7    Written by:
   8    Slava Zanko <slavazanko@gmail.com>, 2010.
   9
  10    This file is part of the Midnight Commander.
  11
  12    The Midnight Commander is free software: you can redistribute it
  13    and/or modify it under the terms of the GNU General Public License as
  14    published by the Free Software Foundation, either version 3 of the License,
  15    or (at your option) any later version.
  16
  17    The Midnight Commander is distributed in the hope that it will be useful,
  18    but WITHOUT ANY WARRANTY; without even the implied warranty of
  19    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20    GNU General Public License for more details.
  21
  22    You should have received a copy of the GNU General Public License
  23    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  24  */
  25
  26 #include <config.h>
  27
  28 #include <stdio.h>
  29 #include <stdlib.h>
  30 #include <errno.h>
  31
  32 #include "lib/global.h"
  33 #include "lib/fileloc.h"
  34 #include "lib/vfs/vfs.h"
  35 #include "lib/util.h"           /* unix_error_string() */
  36
  37 #include "lib/mcconfig.h"
  38
  39 /*** global variables ****************************************************************************/
  40
  41 /*** file scope macro definitions ****************************************************************/
  42
  43 #define MC_OLD_USERCONF_DIR ".mc"
  44
  45 /*** file scope type declarations ****************************************************************/
  46
  47 /*** file scope variables ************************************************************************/
  48
  49 static gboolean xdg_vars_initialized = FALSE;
  50 static char *mc_config_str = NULL;
  51 static char *mc_cache_str = NULL;
  52 static char *mc_data_str = NULL;
  53
  54 static const char *homedir = NULL;
  55 /* value of $MC_HOME */
  56 static const char *mc_home = NULL;
  57
  58 static gboolean config_dir_present = FALSE;
  59
  60 static const struct
  61 {
  62     const char *old_filename;
  63
  64     char **new_basedir;
  65     const char *new_filename;
  66 } mc_config_files_reference[] =
  67 {
  68     /* *INDENT-OFF* */
  69     /* config */
  70     { "ini",                                   &mc_config_str, MC_CONFIG_FILE},
  71     { "filehighlight.ini",                     &mc_config_str, MC_FHL_INI_FILE},
  72     { "hotlist",                               &mc_config_str, MC_HOTLIST_FILE},
  73     { "mc.keymap",                             &mc_config_str, GLOBAL_KEYMAP_FILE},
  74     { "menu",                                  &mc_config_str, MC_USERMENU_FILE},
  75     { "cedit" PATH_SEP_STR "Syntax",           &mc_config_str, EDIT_SYNTAX_FILE},
  76     { "cedit" PATH_SEP_STR "menu",             &mc_config_str, EDIT_HOME_MENU},
  77     { "cedit" PATH_SEP_STR "edit.indent.rc",   &mc_config_str, EDIT_DIR PATH_SEP_STR "edit.indent.rc"},
  78     { "cedit" PATH_SEP_STR "edit.spell.rc",    &mc_config_str, EDIT_DIR PATH_SEP_STR "edit.spell.rc"},
  79     { "panels.ini",                            &mc_config_str, MC_PANELS_FILE},
  80
  81     /* User should move this file with applying some changes in file */
  82     { "",                                      &mc_config_str, MC_FILEBIND_FILE},
  83
  84     /* data */
  85     { "skins",                                 &mc_data_str, MC_SKINS_SUBDIR},
  86     { "fish",                                  &mc_data_str, FISH_PREFIX},
  87     { "bashrc",                                &mc_data_str, "bashrc"},
  88     { "inputrc",                               &mc_data_str, "inputrc"},
  89     { "extfs.d",                               &mc_data_str, MC_EXTFS_DIR},
  90     { "history",                               &mc_data_str, MC_HISTORY_FILE},
  91     { "filepos",                               &mc_data_str, MC_FILEPOS_FILE},
  92     { "cedit" PATH_SEP_STR "cooledit.clip",    &mc_data_str, EDIT_CLIP_FILE},
  93     { "",                                      &mc_data_str, MC_MACRO_FILE},
  94
  95     /* cache */
  96     { "log",                                   &mc_cache_str, "mc.log"},
  97     { "Tree",                                  &mc_cache_str, MC_TREESTORE_FILE},
  98     { "cedit" PATH_SEP_STR "cooledit.temp",    &mc_cache_str, EDIT_TEMP_FILE},
  99     { "cedit" PATH_SEP_STR "cooledit.block",   &mc_cache_str, EDIT_BLOCK_FILE},
 100
 101     {NULL, NULL, NULL}
 102     /* *INDENT-ON* */
 103 };
 104
 105 #ifdef MC_HOMEDIR_XDG
 106 static const struct
 107 {
 108     char **old_basedir;
 109     const char *filename;
 110
 111     char **new_basedir;
 112 } mc_config_migrate_rules_fix[] =
 113 {
 114     /* *INDENT-OFF* */
 115     { &mc_data_str, MC_USERMENU_FILE,                       &mc_config_str},
 116     { &mc_data_str, EDIT_SYNTAX_FILE,                       &mc_config_str},
 117     { &mc_data_str, EDIT_HOME_MENU,                         &mc_config_str},
 118     { &mc_data_str, EDIT_DIR PATH_SEP_STR "edit.indent.rc", &mc_config_str},
 119     { &mc_data_str, EDIT_DIR PATH_SEP_STR "edit.spell.rc",  &mc_config_str},
 120     { &mc_data_str, MC_FILEBIND_FILE,                       &mc_config_str},
 121
 122     { &mc_cache_str, MC_HISTORY_FILE,                       &mc_data_str},
 123     { &mc_cache_str, MC_FILEPOS_FILE,                       &mc_data_str},
 124     { &mc_cache_str, EDIT_CLIP_FILE,                        &mc_data_str},
 125
 126     { &mc_cache_str, MC_PANELS_FILE,                        &mc_config_str},
 127
 128     {NULL, NULL, NULL}
 129     /* *INDENT-ON* */
 130 };
 131 #endif /* MC_HOMEDIR_XDG */
 132
 133 /*** file scope functions *********************************************************************** */
 134 /* --------------------------------------------------------------------------------------------- */
 135
 136 static void
 137 mc_config_mkdir (const char *directory_name, GError ** error)
 138 {
 139     if ((!g_file_test (directory_name, G_FILE_TEST_EXISTS | G_FILE_TEST_IS_DIR)) &&
 140         (g_mkdir_with_parents (directory_name, 0700) != 0))
 141     {
 142         g_propagate_error (error,
 143                            g_error_new (MC_ERROR, 0, _("Cannot create %s directory"),
 144                                         directory_name));
 145     }
 146 }
 147
 148 /* --------------------------------------------------------------------------------------------- */
 149
 150 static char *
 151 mc_config_init_one_config_path (const char *path_base, const char *subdir, GError ** error)
 152 {
 153     char *full_path;
 154
 155     full_path = g_build_filename (path_base, subdir, NULL);
 156
 157     if (g_file_test (full_path, G_FILE_TEST_EXISTS))
 158     {
 159         if (g_file_test (full_path, G_FILE_TEST_IS_DIR))
 160         {
 161             config_dir_present = TRUE;
 162         }
 163         else
 164         {
 165             fprintf (stderr, "%s %s\n", _("FATAL: not a directory:"), full_path);
 166             exit (EXIT_FAILURE);
 167         }
 168     }
 169
 170     mc_config_mkdir (full_path, error);
 171     if (error != NULL && *error != NULL)
 172     {
 173         g_free (full_path);
 174         full_path = NULL;
 175     }
 176     return full_path;
 177 }
 178
 179 /* --------------------------------------------------------------------------------------------- */
 180
 181 static char *
 182 mc_config_get_deprecated_path (void)
 183 {
 184     return g_build_filename (mc_config_get_home_dir (), MC_OLD_USERCONF_DIR, NULL);
 185 }
 186
 187 /* --------------------------------------------------------------------------------------------- */
 188
 189 static void
 190 mc_config_copy (const char *old_name, const char *new_name, GError ** error)
 191 {
 192     if (g_file_test (old_name, G_FILE_TEST_IS_REGULAR))
 193     {
 194         char *contents = NULL;
 195         size_t length;
 196
 197         if (g_file_get_contents (old_name, &contents, &length, error))
 198             g_file_set_contents (new_name, contents, length, error);
 199
 200         g_free (contents);
 201         return;
 202     }
 203
 204     if (g_file_test (old_name, G_FILE_TEST_IS_DIR))
 205     {
 206
 207         GDir *dir;
 208         const char *dir_name;
 209
 210         dir = g_dir_open (old_name, 0, error);
 211         if (dir == NULL)
 212             return;
 213
 214         if (g_mkdir_with_parents (new_name, 0700) == -1)
 215         {
 216             g_dir_close (dir);
 217             g_propagate_error (error,
 218                                g_error_new (MC_ERROR, 0,
 219                                             _
 220                                             ("An error occured while migrating user settings: %s"),
 221                                             unix_error_string (errno)));
 222             return;
 223         }
 224
 225         while ((dir_name = g_dir_read_name (dir)) != NULL)
 226         {
 227             char *old_name2, *new_name2;
 228
 229             old_name2 = g_build_filename (old_name, dir_name, NULL);
 230             new_name2 = g_build_filename (new_name, dir_name, NULL);
 231             mc_config_copy (old_name2, new_name2, error);
 232             g_free (new_name2);
 233             g_free (old_name2);
 234         }
 235     }
 236 }
 237
 238 /* --------------------------------------------------------------------------------------------- */
 239
 240 #if MC_HOMEDIR_XDG
 241 static void
 242 mc_config_fix_migrated_rules (void)
 243 {
 244     size_t rule_index;
 245
 246     for (rule_index = 0; mc_config_migrate_rules_fix[rule_index].old_basedir != NULL; rule_index++)
 247     {
 248         char *old_name;
 249
 250         old_name =
 251             g_build_filename (*mc_config_migrate_rules_fix[rule_index].old_basedir,
 252                               mc_config_migrate_rules_fix[rule_index].filename, NULL);
 253
 254         if (g_file_test (old_name, G_FILE_TEST_EXISTS))
 255         {
 256             char *new_name;
 257             const char *basedir = *mc_config_migrate_rules_fix[rule_index].new_basedir;
 258             const char *filename = mc_config_migrate_rules_fix[rule_index].filename;
 259
 260             new_name = g_build_filename (basedir, filename, NULL);
 261             rename (old_name, new_name);
 262             g_free (new_name);
 263         }
 264         g_free (old_name);
 265     }
 266 }
 267 #endif /* MC_HOMEDIR_XDG */
 268
 269 /* --------------------------------------------------------------------------------------------- */
 270 /*** public functions ****************************************************************************/
 271 /* --------------------------------------------------------------------------------------------- */
 272
 273 void
 274 mc_config_init_config_paths (GError ** error)
 275 {
 276     char *dir;
 277
 278     if (xdg_vars_initialized)
 279         return;
 280
 281     /* init mc_home and homedir if not yet */
 282     (void) mc_config_get_home_dir ();
 283
 284 #ifdef MC_HOMEDIR_XDG
 285     if (mc_home != NULL)
 286     {
 287         dir = g_build_filename (mc_home, ".config", (char *) NULL);
 288         mc_config_str = mc_config_init_one_config_path (dir, MC_USERCONF_DIR, error);
 289         g_free (dir);
 290
 291         dir = g_build_filename (mc_home, ".cache", (char *) NULL);
 292         mc_cache_str = mc_config_init_one_config_path (dir, MC_USERCONF_DIR, error);
 293         g_free (dir);
 294
 295         dir = g_build_filename (mc_home, ".local", "share", (char *) NULL);
 296         mc_data_str = mc_config_init_one_config_path (dir, MC_USERCONF_DIR, error);
 297         g_free (dir);
 298     }
 299     else
 300     {
 301         dir = (char *) g_get_user_config_dir ();
 302         if (dir != NULL && *dir != '\0')
 303             mc_config_str = mc_config_init_one_config_path (dir, MC_USERCONF_DIR, error);
 304         else
 305         {
 306             dir = g_build_filename (homedir, ".config", (char *) NULL);
 307             mc_config_str = mc_config_init_one_config_path (dir, MC_USERCONF_DIR, error);
 308             g_free (dir);
 309         }
 310
 311         dir = (char *) g_get_user_cache_dir ();
 312         if (dir != NULL && *dir != '\0')
 313             mc_cache_str = mc_config_init_one_config_path (dir, MC_USERCONF_DIR, error);
 314         else
 315         {
 316             dir = g_build_filename (homedir, ".cache", (char *) NULL);
 317             mc_cache_str = mc_config_init_one_config_path (dir, MC_USERCONF_DIR, error);
 318             g_free (dir);
 319         }
 320
 321         dir = (char *) g_get_user_data_dir ();
 322         if (dir != NULL && *dir != '\0')
 323             mc_data_str = mc_config_init_one_config_path (dir, MC_USERCONF_DIR, error);
 324         else
 325         {
 326             dir = g_build_filename (homedir, ".local", "share", (char *) NULL);
 327             mc_data_str = mc_config_init_one_config_path (dir, MC_USERCONF_DIR, error);
 328             g_free (dir);
 329         }
 330     }
 331
 332     mc_config_fix_migrated_rules ();
 333 #else /* MC_HOMEDIR_XDG */
 334     char *defined_userconf_dir;
 335
 336     defined_userconf_dir = tilde_expand (MC_USERCONF_DIR);
 337     if (g_path_is_absolute (defined_userconf_dir))
 338         dir = defined_userconf_dir;
 339     else
 340     {
 341         g_free (defined_userconf_dir);
 342         dir = g_build_filename (mc_config_get_home_dir (), MC_USERCONF_DIR, (char *) NULL);
 343     }
 344
 345     mc_data_str = mc_cache_str = mc_config_str = mc_config_init_one_config_path (dir, "", error);
 346
 347     g_free (dir);
 348 #endif /* MC_HOMEDIR_XDG */
 349
 350     xdg_vars_initialized = TRUE;
 351 }
 352
 353 /* --------------------------------------------------------------------------------------------- */
 354
 355 void
 356 mc_config_deinit_config_paths (void)
 357 {
 358     if (!xdg_vars_initialized)
 359         return;
 360
 361     g_free (mc_config_str);
 362 #ifdef MC_HOMEDIR_XDG
 363     g_free (mc_cache_str);
 364     g_free (mc_data_str);
 365 #endif /* MC_HOMEDIR_XDG */
 366
 367     g_free (mc_global.share_data_dir);
 368     g_free (mc_global.sysconfig_dir);
 369
 370     xdg_vars_initialized = FALSE;
 371 }
 372
 373 /* --------------------------------------------------------------------------------------------- */
 374
 375 const char *
 376 mc_config_get_data_path (void)
 377 {
 378     if (!xdg_vars_initialized)
 379         mc_config_init_config_paths (NULL);
 380
 381     return (const char *) mc_data_str;
 382 }
 383
 384 /* --------------------------------------------------------------------------------------------- */
 385
 386 const char *
 387 mc_config_get_cache_path (void)
 388 {
 389     if (!xdg_vars_initialized)
 390         mc_config_init_config_paths (NULL);
 391
 392     return (const char *) mc_cache_str;
 393 }
 394
 395 /* --------------------------------------------------------------------------------------------- */
 396
 397 const char *
 398 mc_config_get_home_dir (void)
 399 {
 400     if (homedir == NULL)
 401     {
 402         homedir = g_getenv ("MC_HOME");
 403         if (homedir == NULL || *homedir == '\0')
 404             homedir = g_getenv ("HOME");
 405         else
 406             mc_home = homedir;
 407         if (homedir == NULL || *homedir == '\0')
 408             homedir = g_get_home_dir ();
 409     }
 410     return homedir;
 411 }
 412
 413 /* --------------------------------------------------------------------------------------------- */
 414
 415 const char *
 416 mc_config_get_path (void)
 417 {
 418     if (!xdg_vars_initialized)
 419         mc_config_init_config_paths (NULL);
 420
 421     return (const char *) mc_config_str;
 422 }
 423
 424 /* --------------------------------------------------------------------------------------------- */
 425
 426 void
 427 mc_config_migrate_from_old_place (GError ** error)
 428 {
 429     char *old_dir;
 430     size_t rule_index;
 431
 432     old_dir = mc_config_get_deprecated_path ();
 433
 434     g_free (mc_config_init_one_config_path (mc_config_str, EDIT_DIR, error));
 435 #ifdef MC_HOMEDIR_XDG
 436     g_free (mc_config_init_one_config_path (mc_cache_str, EDIT_DIR, error));
 437     g_free (mc_config_init_one_config_path (mc_data_str, EDIT_DIR, error));
 438 #endif /* MC_HOMEDIR_XDG */
 439
 440     for (rule_index = 0; mc_config_files_reference[rule_index].old_filename != NULL; rule_index++)
 441     {
 442         char *old_name;
 443         if (*mc_config_files_reference[rule_index].old_filename == '\0')
 444             continue;
 445
 446         old_name =
 447             g_build_filename (old_dir, mc_config_files_reference[rule_index].old_filename, NULL);
 448
 449         if (g_file_test (old_name, G_FILE_TEST_EXISTS))
 450         {
 451             char *new_name;
 452             const char *basedir = *mc_config_files_reference[rule_index].new_basedir;
 453             const char *filename = mc_config_files_reference[rule_index].new_filename;
 454
 455             new_name = g_build_filename (basedir, filename, NULL);
 456             mc_config_copy (old_name, new_name, error);
 457             g_free (new_name);
 458         }
 459         g_free (old_name);
 460     }
 461
 462 #ifdef MC_HOMEDIR_XDG
 463     g_propagate_error (error,
 464                        g_error_new (MC_ERROR, 0,
 465                                     _
 466                                     ("Your old settings were migrated from %s\n"
 467                                      "to Freedesktop recommended dirs.\n"
 468                                      "To get more info, please visit\n"
 469                                      "http://standards.freedesktop.org/basedir-spec/basedir-spec-latest.html"),
 470                                     old_dir));
 471 #else /* MC_HOMEDIR_XDG */
 472     g_propagate_error (error,
 473                        g_error_new (MC_ERROR, 0,
 474                                     _
 475                                     ("Your old settings were migrated from %s\n"
 476                                      "to %s\n"), old_dir, mc_config_str));
 477 #endif /* MC_HOMEDIR_XDG */
 478
 479     g_free (old_dir);
 480 }
 481
 482 /* --------------------------------------------------------------------------------------------- */
 483
 484 gboolean
 485 mc_config_deprecated_dir_present (void)
 486 {
 487     char *old_dir;
 488     gboolean is_present;
 489
 490     old_dir = mc_config_get_deprecated_path ();
 491     is_present = g_file_test (old_dir, G_FILE_TEST_EXISTS | G_FILE_TEST_IS_DIR);
 492     g_free (old_dir);
 493
 494     return is_present && !config_dir_present;
 495 }
 496
 497 /* --------------------------------------------------------------------------------------------- */
 498 /**
 499  * Get full path to config file by short name.
 500  *
 501  * @param config_name short name
 502  * @return full path to config file
 503  */
 504
 505 char *
 506 mc_config_get_full_path (const char *config_name)
 507 {
 508     size_t rule_index;
 509
 510     if (config_name == NULL)
 511         return NULL;
 512
 513     if (!xdg_vars_initialized)
 514         mc_config_init_config_paths (NULL);
 515
 516     for (rule_index = 0; mc_config_files_reference[rule_index].old_filename != NULL; rule_index++)
 517     {
 518         if (strcmp (config_name, mc_config_files_reference[rule_index].new_filename) == 0)
 519         {
 520             return g_build_filename (*mc_config_files_reference[rule_index].new_basedir,
 521                                      mc_config_files_reference[rule_index].new_filename, NULL);
 522         }
 523     }
 524     return NULL;
 525 }
 526
 527 /* --------------------------------------------------------------------------------------------- */
 528 /**
 529  * Get full path to config file by short name.
 530  *
 531  * @param config_name short name
 532  * @return object with full path to config file
 533  */
 534
 535 vfs_path_t *
 536 mc_config_get_full_vpath (const char *config_name)
 537 {
 538     vfs_path_t *ret_vpath;
 539     char *str_path;
 540
 541     str_path = mc_config_get_full_path (config_name);
 542
 543     ret_vpath = vfs_path_from_str (str_path);
 544     g_free (str_path);
 545     return ret_vpath;
 546 }
 547
 548 /* --------------------------------------------------------------------------------------------- */