git.notmuchmail.org Git - notmuch/blob - lib/open.cc

   1 #include <unistd.h>
   2 #include <libgen.h>
   3
   4 #include "database-private.h"
   5 #include "parse-time-vrp.h"
   6 #include "path-util.h"
   7
   8 #if HAVE_XAPIAN_DB_RETRY_LOCK
   9 #define DB_ACTION (Xapian::DB_CREATE_OR_OPEN | Xapian::DB_RETRY_LOCK)
  10 #else
  11 #define DB_ACTION Xapian::DB_CREATE_OR_OPEN
  12 #endif
  13
  14 notmuch_status_t
  15 notmuch_database_open (const char *path,
  16                        notmuch_database_mode_t mode,
  17                        notmuch_database_t **database)
  18 {
  19     char *status_string = NULL;
  20     notmuch_status_t status;
  21
  22     status = notmuch_database_open_verbose (path, mode, database,
  23                                             &status_string);
  24
  25     if (status_string) {
  26         fputs (status_string, stderr);
  27         free (status_string);
  28     }
  29
  30     return status;
  31 }
  32
  33 notmuch_status_t
  34 notmuch_database_open_verbose (const char *path,
  35                                notmuch_database_mode_t mode,
  36                                notmuch_database_t **database,
  37                                char **status_string)
  38 {
  39     return notmuch_database_open_with_config (path, mode, "", NULL,
  40                                               database, status_string);
  41 }
  42
  43 static const char *
  44 _xdg_dir (void *ctx,
  45           const char *xdg_root_variable,
  46           const char *xdg_prefix,
  47           const char *profile_name)
  48 {
  49     const char *xdg_root = getenv (xdg_root_variable);
  50
  51     if (! xdg_root) {
  52         const char *home = getenv ("HOME");
  53
  54         if (! home) return NULL;
  55
  56         xdg_root = talloc_asprintf (ctx,
  57                                     "%s/%s",
  58                                     home,
  59                                     xdg_prefix);
  60     }
  61
  62     if (! profile_name)
  63         profile_name = getenv ("NOTMUCH_PROFILE");
  64
  65     if (! profile_name)
  66         profile_name = "default";
  67
  68     return talloc_asprintf (ctx,
  69                             "%s/notmuch/%s",
  70                             xdg_root,
  71                             profile_name);
  72 }
  73
  74 static notmuch_status_t
  75 _choose_dir (notmuch_database_t *notmuch,
  76              const char *profile,
  77              notmuch_config_key_t key,
  78              const char *xdg_var,
  79              const char *xdg_subdir,
  80              const char *subdir,
  81              char **message = NULL)
  82 {
  83     const char *parent;
  84     const char *dir;
  85     struct stat st;
  86     int err;
  87
  88     dir = notmuch_config_get (notmuch, key);
  89
  90     if (dir)
  91         return NOTMUCH_STATUS_SUCCESS;
  92
  93     parent = _xdg_dir (notmuch, xdg_var, xdg_subdir, profile);
  94     if (! parent)
  95         return NOTMUCH_STATUS_PATH_ERROR;
  96
  97     dir = talloc_asprintf (notmuch, "%s/%s", parent, subdir);
  98
  99     err = stat (dir, &st);
 100     if (err) {
 101         if (errno == ENOENT) {
 102             char *notmuch_path = dirname (talloc_strdup (notmuch, notmuch->xapian_path));
 103             dir = talloc_asprintf (notmuch, "%s/%s", notmuch_path, subdir);
 104         } else {
 105             IGNORE_RESULT (asprintf (message, "Error: Cannot stat %s: %s.\n",
 106                                      dir, strerror (errno)));
 107             return NOTMUCH_STATUS_FILE_ERROR;
 108         }
 109     }
 110
 111     _notmuch_config_cache (notmuch, key, dir);
 112
 113     return NOTMUCH_STATUS_SUCCESS;
 114 }
 115
 116 static notmuch_status_t
 117 _load_key_file (notmuch_database_t *notmuch,
 118                 const char *path,
 119                 const char *profile,
 120                 GKeyFile **key_file)
 121 {
 122     notmuch_status_t status = NOTMUCH_STATUS_SUCCESS;
 123
 124     if (path && EMPTY_STRING (path))
 125         goto DONE;
 126
 127     if (! path)
 128         path = getenv ("NOTMUCH_CONFIG");
 129
 130     if (path)
 131         path = talloc_strdup (notmuch, path);
 132     else {
 133         const char *dir = _xdg_dir (notmuch, "XDG_CONFIG_HOME", ".config", profile);
 134
 135         if (dir) {
 136             path = talloc_asprintf (notmuch, "%s/config", dir);
 137             if (access (path, R_OK) != 0)
 138                 path = NULL;
 139         }
 140     }
 141
 142     if (! path) {
 143         const char *home = getenv ("HOME");
 144
 145         path = talloc_asprintf (notmuch, "%s/.notmuch-config", home);
 146
 147         if (! profile)
 148             profile = getenv ("NOTMUCH_PROFILE");
 149
 150         if (profile)
 151             path = talloc_asprintf (notmuch, "%s.%s", path, profile);
 152     }
 153
 154     *key_file = g_key_file_new ();
 155     if (! g_key_file_load_from_file (*key_file, path, G_KEY_FILE_NONE, NULL)) {
 156         status = NOTMUCH_STATUS_NO_CONFIG;
 157     }
 158
 159   DONE:
 160     if (path)
 161         notmuch->config_path = path;
 162
 163     return status;
 164 }
 165
 166 static notmuch_status_t
 167 _db_dir_exists (const char *database_path, char **message)
 168 {
 169     struct stat st;
 170     int err;
 171
 172     err = stat (database_path, &st);
 173     if (err) {
 174         IGNORE_RESULT (asprintf (message, "Error: Cannot open database at %s: %s.\n",
 175                                  database_path, strerror (errno)));
 176         return NOTMUCH_STATUS_FILE_ERROR;
 177     }
 178
 179     if (! S_ISDIR (st.st_mode)) {
 180         IGNORE_RESULT (asprintf (message, "Error: Cannot open database at %s: "
 181                                  "Not a directory.\n",
 182                                  database_path));
 183         return NOTMUCH_STATUS_FILE_ERROR;
 184     }
 185
 186     return NOTMUCH_STATUS_SUCCESS;
 187 }
 188
 189 static notmuch_status_t
 190 _choose_database_path (void *ctx,
 191                        const char *profile,
 192                        GKeyFile *key_file,
 193                        const char **database_path,
 194                        bool *split,
 195                        char **message)
 196 {
 197     if (! *database_path) {
 198         *database_path = getenv ("NOTMUCH_DATABASE");
 199     }
 200
 201     if (! *database_path && key_file) {
 202         char *path = g_key_file_get_value (key_file, "database", "path", NULL);
 203         if (path) {
 204             if (path[0] == '/')
 205                 *database_path = talloc_strdup (ctx, path);
 206             else
 207                 *database_path = talloc_asprintf (ctx, "%s/%s", getenv ("HOME"), path);
 208             g_free (path);
 209         }
 210     }
 211     if (! *database_path) {
 212         notmuch_status_t status;
 213
 214         *database_path = _xdg_dir (ctx, "XDG_DATA_HOME", ".local/share", profile);
 215         status = _db_dir_exists (*database_path, message);
 216         if (status) {
 217             *database_path = NULL;
 218         } else {
 219             *split = true;
 220         }
 221     }
 222
 223     if (! *database_path) {
 224         notmuch_status_t status;
 225
 226         *database_path = talloc_asprintf (ctx, "%s/mail", getenv ("HOME"));
 227         status = _db_dir_exists (*database_path, message);
 228         if (status) {
 229             *database_path = NULL;
 230         }
 231     }
 232
 233     if (*database_path == NULL) {
 234         *message = strdup ("Error: could not locate database.\n");
 235         return NOTMUCH_STATUS_NO_DATABASE;
 236     }
 237
 238     if (*database_path[0] != '/') {
 239         *message = strdup ("Error: Database path must be absolute.\n");
 240         return NOTMUCH_STATUS_PATH_ERROR;
 241     }
 242     return NOTMUCH_STATUS_SUCCESS;
 243 }
 244
 245 static notmuch_database_t *
 246 _alloc_notmuch ()
 247 {
 248     notmuch_database_t *notmuch;
 249
 250     notmuch = talloc_zero (NULL, notmuch_database_t);
 251     if (! notmuch)
 252         return NULL;
 253
 254     notmuch->exception_reported = false;
 255     notmuch->status_string = NULL;
 256     notmuch->writable_xapian_db = NULL;
 257     notmuch->config_path = NULL;
 258     notmuch->atomic_nesting = 0;
 259     notmuch->view = 1;
 260     return notmuch;
 261 }
 262
 263 static notmuch_status_t
 264 _trial_open (const char *xapian_path, char **message_ptr)
 265 {
 266     try {
 267         Xapian::Database db (xapian_path);
 268     } catch (const Xapian::DatabaseOpeningError &error) {
 269         IGNORE_RESULT (asprintf (message_ptr,
 270                                  "Cannot open Xapian database at %s: %s\n",
 271                                  xapian_path,
 272                                  error.get_msg ().c_str ()));
 273         return NOTMUCH_STATUS_PATH_ERROR;
 274     } catch (const Xapian::Error &error) {
 275         IGNORE_RESULT (asprintf (message_ptr,
 276                                  "A Xapian exception occurred opening database: %s\n",
 277                                  error.get_msg ().c_str ()));
 278         return NOTMUCH_STATUS_XAPIAN_EXCEPTION;
 279     }
 280     return NOTMUCH_STATUS_SUCCESS;
 281 }
 282
 283 notmuch_status_t
 284 _notmuch_choose_xapian_path (void *ctx, const char *database_path,
 285                              const char **xapian_path, char **message_ptr)
 286 {
 287     notmuch_status_t status;
 288     const char *trial_path, *notmuch_path;
 289
 290     status = _db_dir_exists (database_path, message_ptr);
 291     if (status)
 292         goto DONE;
 293
 294     trial_path = talloc_asprintf (ctx, "%s/xapian", database_path);
 295     status = _trial_open (trial_path, message_ptr);
 296     if (status != NOTMUCH_STATUS_PATH_ERROR)
 297         goto DONE;
 298
 299     if (*message_ptr)
 300         free (*message_ptr);
 301
 302     notmuch_path = talloc_asprintf (ctx, "%s/.notmuch", database_path);
 303     status = _db_dir_exists (notmuch_path, message_ptr);
 304     if (status)
 305         goto DONE;
 306
 307     trial_path = talloc_asprintf (ctx, "%s/xapian", notmuch_path);
 308     status = _trial_open (trial_path, message_ptr);
 309
 310   DONE:
 311     if (status == NOTMUCH_STATUS_SUCCESS)
 312         *xapian_path = trial_path;
 313     return status;
 314 }
 315
 316 static void
 317 _set_database_path (notmuch_database_t *notmuch,
 318                     const char *database_path)
 319 {
 320     char *path = talloc_strdup (notmuch, database_path);
 321
 322     strip_trailing (path, '/');
 323
 324     _notmuch_config_cache (notmuch, NOTMUCH_CONFIG_DATABASE_PATH, path);
 325 }
 326
 327 static void
 328 _load_database_state (notmuch_database_t *notmuch)
 329 {
 330     std::string last_thread_id;
 331     std::string last_mod;
 332
 333     notmuch->last_doc_id = notmuch->xapian_db->get_lastdocid ();
 334     last_thread_id = notmuch->xapian_db->get_metadata ("last_thread_id");
 335     if (last_thread_id.empty ()) {
 336         notmuch->last_thread_id = 0;
 337     } else {
 338         const char *str;
 339         char *end;
 340
 341         str = last_thread_id.c_str ();
 342         notmuch->last_thread_id = strtoull (str, &end, 16);
 343         if (*end != '\0')
 344             INTERNAL_ERROR ("Malformed database last_thread_id: %s", str);
 345     }
 346
 347     /* Get current highest revision number. */
 348     last_mod = notmuch->xapian_db->get_value_upper_bound (
 349         NOTMUCH_VALUE_LAST_MOD);
 350     if (last_mod.empty ())
 351         notmuch->revision = 0;
 352     else
 353         notmuch->revision = Xapian::sortable_unserialise (last_mod);
 354     notmuch->uuid = talloc_strdup (
 355         notmuch, notmuch->xapian_db->get_uuid ().c_str ());
 356 }
 357
 358 static notmuch_status_t
 359 _finish_open (notmuch_database_t *notmuch,
 360               const char *profile,
 361               notmuch_database_mode_t mode,
 362               GKeyFile *key_file,
 363               char **message_ptr)
 364 {
 365     notmuch_status_t status = NOTMUCH_STATUS_SUCCESS;
 366     char *incompat_features;
 367     char *message = NULL;
 368     unsigned int version;
 369     const char *database_path = notmuch_database_get_path (notmuch);
 370
 371     try {
 372
 373         if (mode == NOTMUCH_DATABASE_MODE_READ_WRITE) {
 374             notmuch->writable_xapian_db = new Xapian::WritableDatabase (notmuch->xapian_path,
 375                                                                         DB_ACTION);
 376             notmuch->xapian_db = notmuch->writable_xapian_db;
 377         } else {
 378             notmuch->xapian_db = new Xapian::Database (notmuch->xapian_path);
 379         }
 380
 381         /* Check version.  As of database version 3, we represent
 382          * changes in terms of features, so assume a version bump
 383          * means a dramatically incompatible change. */
 384         version = notmuch_database_get_version (notmuch);
 385         if (version > NOTMUCH_DATABASE_VERSION) {
 386             IGNORE_RESULT (asprintf (&message,
 387                                      "Error: Notmuch database at %s\n"
 388                                      "       has a newer database format version (%u) than supported by this\n"
 389                                      "       version of notmuch (%u).\n",
 390                                      database_path, version, NOTMUCH_DATABASE_VERSION));
 391             notmuch_database_destroy (notmuch);
 392             notmuch = NULL;
 393             status = NOTMUCH_STATUS_FILE_ERROR;
 394             goto DONE;
 395         }
 396
 397         /* Check features. */
 398         incompat_features = NULL;
 399         notmuch->features = _notmuch_database_parse_features (
 400             notmuch, notmuch->xapian_db->get_metadata ("features").c_str (),
 401             version, mode == NOTMUCH_DATABASE_MODE_READ_WRITE ? 'w' : 'r',
 402             &incompat_features);
 403         if (incompat_features) {
 404             IGNORE_RESULT (asprintf (&message,
 405                                      "Error: Notmuch database at %s\n"
 406                                      "       requires features (%s)\n"
 407                                      "       not supported by this version of notmuch.\n",
 408                                      database_path, incompat_features));
 409             notmuch_database_destroy (notmuch);
 410             notmuch = NULL;
 411             status = NOTMUCH_STATUS_FILE_ERROR;
 412             goto DONE;
 413         }
 414
 415         _load_database_state (notmuch);
 416
 417         notmuch->query_parser = new Xapian::QueryParser;
 418         notmuch->term_gen = new Xapian::TermGenerator;
 419         notmuch->term_gen->set_stemmer (Xapian::Stem ("english"));
 420         notmuch->value_range_processor = new Xapian::NumberRangeProcessor (NOTMUCH_VALUE_TIMESTAMP);
 421         notmuch->date_range_processor = new ParseTimeRangeProcessor (NOTMUCH_VALUE_TIMESTAMP,
 422                                                                      "date:");
 423         notmuch->last_mod_range_processor = new Xapian::NumberRangeProcessor (NOTMUCH_VALUE_LAST_MOD,
 424                                                                               "lastmod:");
 425         notmuch->query_parser->set_default_op (Xapian::Query::OP_AND);
 426         notmuch->query_parser->set_database (*notmuch->xapian_db);
 427         notmuch->query_parser->set_stemmer (Xapian::Stem ("english"));
 428         notmuch->query_parser->set_stemming_strategy (Xapian::QueryParser::STEM_SOME);
 429         notmuch->query_parser->add_rangeprocessor (notmuch->value_range_processor);
 430         notmuch->query_parser->add_rangeprocessor (notmuch->date_range_processor);
 431         notmuch->query_parser->add_rangeprocessor (notmuch->last_mod_range_processor);
 432
 433         /* Configuration information is needed to set up query parser */
 434         status = _notmuch_config_load_from_database (notmuch);
 435         if (status)
 436             goto DONE;
 437
 438         if (key_file)
 439             status = _notmuch_config_load_from_file (notmuch, key_file);
 440         if (status)
 441             goto DONE;
 442
 443         status = _choose_dir (notmuch, profile,
 444                               NOTMUCH_CONFIG_HOOK_DIR,
 445                               "XDG_CONFIG_HOME",
 446                               ".config",
 447                               "hooks",
 448                               &message);
 449         if (status)
 450             goto DONE;
 451
 452         status = _choose_dir (notmuch, profile,
 453                               NOTMUCH_CONFIG_BACKUP_DIR,
 454                               "XDG_DATA_HOME",
 455                               ".local/share",
 456                               "backups",
 457                               &message);
 458         if (status)
 459             goto DONE;
 460         status = _notmuch_config_load_defaults (notmuch);
 461         if (status)
 462             goto DONE;
 463
 464         status = _notmuch_database_setup_standard_query_fields (notmuch);
 465         if (status)
 466             goto DONE;
 467
 468         status = _notmuch_database_setup_user_query_fields (notmuch);
 469         if (status)
 470             goto DONE;
 471
 472     } catch (const Xapian::Error &error) {
 473         IGNORE_RESULT (asprintf (&message, "A Xapian exception occurred opening database: %s\n",
 474                                  error.get_msg ().c_str ()));
 475         notmuch_database_destroy (notmuch);
 476         notmuch = NULL;
 477         status = NOTMUCH_STATUS_XAPIAN_EXCEPTION;
 478     }
 479   DONE:
 480     if (message_ptr)
 481         *message_ptr = message;
 482     return status;
 483 }
 484
 485 notmuch_status_t
 486 notmuch_database_open_with_config (const char *database_path,
 487                                    notmuch_database_mode_t mode,
 488                                    const char *config_path,
 489                                    const char *profile,
 490                                    notmuch_database_t **database,
 491                                    char **status_string)
 492 {
 493     notmuch_status_t status = NOTMUCH_STATUS_SUCCESS;
 494     void *local = talloc_new (NULL);
 495     notmuch_database_t *notmuch = NULL;
 496     char *message = NULL;
 497     GKeyFile *key_file = NULL;
 498     bool split = false;
 499
 500     _notmuch_init ();
 501
 502     notmuch = _alloc_notmuch ();
 503     if (! notmuch) {
 504         status = NOTMUCH_STATUS_OUT_OF_MEMORY;
 505         goto DONE;
 506     }
 507
 508     status = _load_key_file (notmuch, config_path, profile, &key_file);
 509     if (status) {
 510         message = strdup ("Error: cannot load config file.\n");
 511         goto DONE;
 512     }
 513
 514     if ((status = _choose_database_path (local, profile, key_file,
 515                                          &database_path, &split,
 516                                          &message)))
 517         goto DONE;
 518
 519     status = _db_dir_exists (database_path, &message);
 520     if (status)
 521         goto DONE;
 522
 523     _set_database_path (notmuch, database_path);
 524
 525     status = _notmuch_choose_xapian_path (notmuch, database_path,
 526                                           &notmuch->xapian_path, &message);
 527     if (status)
 528         goto DONE;
 529
 530     status = _finish_open (notmuch, profile, mode, key_file, &message);
 531
 532   DONE:
 533     talloc_free (local);
 534
 535     if (key_file)
 536         g_key_file_free (key_file);
 537
 538     if (message) {
 539         if (status_string)
 540             *status_string = message;
 541         else
 542             free (message);
 543     }
 544
 545     if (database)
 546         *database = notmuch;
 547     else
 548         talloc_free (notmuch);
 549
 550     if (notmuch)
 551         notmuch->open = true;
 552
 553     return status;
 554 }
 555
 556 notmuch_status_t
 557 notmuch_database_create (const char *path, notmuch_database_t **database)
 558 {
 559     char *status_string = NULL;
 560     notmuch_status_t status;
 561
 562     status = notmuch_database_create_verbose (path, database,
 563                                               &status_string);
 564
 565     if (status_string) {
 566         fputs (status_string, stderr);
 567         free (status_string);
 568     }
 569
 570     return status;
 571 }
 572
 573 notmuch_status_t
 574 notmuch_database_create_verbose (const char *path,
 575                                  notmuch_database_t **database,
 576                                  char **status_string)
 577 {
 578     return notmuch_database_create_with_config (path, "", NULL, database, status_string);
 579 }
 580
 581 notmuch_status_t
 582 notmuch_database_create_with_config (const char *database_path,
 583                                      const char *config_path,
 584                                      const char *profile,
 585                                      notmuch_database_t **database,
 586                                      char **status_string)
 587 {
 588     notmuch_status_t status = NOTMUCH_STATUS_SUCCESS;
 589     notmuch_database_t *notmuch = NULL;
 590     const char *notmuch_path = NULL;
 591     char *message = NULL;
 592     GKeyFile *key_file = NULL;
 593     void *local = talloc_new (NULL);
 594     int err;
 595     bool split = false;
 596
 597     _notmuch_init ();
 598
 599     notmuch = _alloc_notmuch ();
 600     if (! notmuch) {
 601         status = NOTMUCH_STATUS_OUT_OF_MEMORY;
 602         goto DONE;
 603     }
 604
 605     status = _load_key_file (notmuch, config_path, profile, &key_file);
 606     if (status) {
 607         message = strdup ("Error: cannot load config file.\n");
 608         goto DONE;
 609     }
 610
 611     if ((status = _choose_database_path (local, profile, key_file,
 612                                          &database_path, &split, &message)))
 613         goto DONE;
 614
 615     status = _db_dir_exists (database_path, &message);
 616     if (status)
 617         goto DONE;
 618
 619     _set_database_path (notmuch, database_path);
 620
 621     if (key_file && ! split) {
 622         char *mail_root = notmuch_canonicalize_file_name (
 623             g_key_file_get_value (key_file, "database", "mail_root", NULL));
 624         char *db_path = notmuch_canonicalize_file_name (database_path);
 625
 626         split = (mail_root && (0 != strcmp (mail_root, db_path)));
 627
 628         free (mail_root);
 629         free (db_path);
 630     }
 631
 632     if (split) {
 633         notmuch_path = database_path;
 634     } else {
 635         if (! (notmuch_path = talloc_asprintf (local, "%s/%s", database_path, ".notmuch"))) {
 636             status = NOTMUCH_STATUS_OUT_OF_MEMORY;
 637             goto DONE;
 638         }
 639
 640         err = mkdir (notmuch_path, 0755);
 641         if (err) {
 642             if (errno == EEXIST) {
 643                 status = NOTMUCH_STATUS_DATABASE_EXISTS;
 644                 talloc_free (notmuch);
 645                 notmuch = NULL;
 646             } else {
 647                 IGNORE_RESULT (asprintf (&message, "Error: Cannot create directory %s: %s.\n",
 648                                          notmuch_path, strerror (errno)));
 649                 status = NOTMUCH_STATUS_FILE_ERROR;
 650             }
 651             goto DONE;
 652         }
 653     }
 654
 655     if (! (notmuch->xapian_path = talloc_asprintf (notmuch, "%s/%s", notmuch_path, "xapian"))) {
 656         status = NOTMUCH_STATUS_OUT_OF_MEMORY;
 657         goto DONE;
 658     }
 659
 660     status = _trial_open (notmuch->xapian_path, &message);
 661     if (status == NOTMUCH_STATUS_SUCCESS) {
 662         notmuch_database_destroy (notmuch);
 663         notmuch = NULL;
 664         status = NOTMUCH_STATUS_DATABASE_EXISTS;
 665         goto DONE;
 666     }
 667
 668     if (message)
 669         free (message);
 670
 671     status = _finish_open (notmuch,
 672                            profile,
 673                            NOTMUCH_DATABASE_MODE_READ_WRITE,
 674                            key_file,
 675                            &message);
 676     if (status)
 677         goto DONE;
 678
 679     /* Upgrade doesn't add these feature to existing databases, but
 680      * new databases have them. */
 681     notmuch->features |= NOTMUCH_FEATURE_FROM_SUBJECT_ID_VALUES;
 682     notmuch->features |= NOTMUCH_FEATURE_INDEXED_MIMETYPES;
 683     notmuch->features |= NOTMUCH_FEATURE_UNPREFIX_BODY_ONLY;
 684
 685     status = notmuch_database_upgrade (notmuch, NULL, NULL);
 686     if (status) {
 687         notmuch_database_close (notmuch);
 688         notmuch = NULL;
 689     }
 690
 691   DONE:
 692     talloc_free (local);
 693
 694     if (key_file)
 695         g_key_file_free (key_file);
 696
 697     if (message) {
 698         if (status_string)
 699             *status_string = message;
 700         else
 701             free (message);
 702     }
 703     if (database)
 704         *database = notmuch;
 705     else
 706         talloc_free (notmuch);
 707     return status;
 708 }
 709
 710 notmuch_status_t
 711 notmuch_database_reopen (notmuch_database_t *notmuch,
 712                          notmuch_database_mode_t new_mode)
 713 {
 714     notmuch_database_mode_t cur_mode = _notmuch_database_mode (notmuch);
 715
 716     if (notmuch->xapian_db == NULL) {
 717         _notmuch_database_log (notmuch, "Cannot reopen closed or nonexistent database\n");
 718         return NOTMUCH_STATUS_ILLEGAL_ARGUMENT;
 719     }
 720
 721     try {
 722         if (cur_mode == new_mode &&
 723             new_mode == NOTMUCH_DATABASE_MODE_READ_ONLY) {
 724             notmuch->xapian_db->reopen ();
 725         } else {
 726             notmuch->xapian_db->close ();
 727
 728             delete notmuch->xapian_db;
 729             notmuch->xapian_db = NULL;
 730             /* no need to free the same object twice */
 731             notmuch->writable_xapian_db = NULL;
 732
 733             if (new_mode == NOTMUCH_DATABASE_MODE_READ_WRITE) {
 734                 notmuch->writable_xapian_db = new Xapian::WritableDatabase (notmuch->xapian_path,
 735                                                                             DB_ACTION);
 736                 notmuch->xapian_db = notmuch->writable_xapian_db;
 737             } else {
 738                 notmuch->xapian_db = new Xapian::Database (notmuch->xapian_path,
 739                                                            DB_ACTION);
 740             }
 741         }
 742
 743         _load_database_state (notmuch);
 744     } catch (const Xapian::Error &error) {
 745         if (! notmuch->exception_reported) {
 746             _notmuch_database_log (notmuch, "Error: A Xapian exception reopening database: %s\n",
 747                                    error.get_msg ().c_str ());
 748             notmuch->exception_reported = true;
 749         }
 750         return NOTMUCH_STATUS_XAPIAN_EXCEPTION;
 751     }
 752
 753     notmuch->view++;
 754     notmuch->open = true;
 755     return NOTMUCH_STATUS_SUCCESS;
 756 }
 757
 758 static notmuch_status_t
 759 _maybe_load_config_from_database (notmuch_database_t *notmuch,
 760                                   GKeyFile *key_file,
 761                                   const char *database_path,
 762                                   const char *profile)
 763 {
 764     char *message; /* ignored */
 765
 766     if (_db_dir_exists (database_path, &message))
 767         return NOTMUCH_STATUS_NO_DATABASE;
 768
 769     _set_database_path (notmuch, database_path);
 770
 771     if (_notmuch_choose_xapian_path (notmuch, database_path, &notmuch->xapian_path, &message))
 772         return NOTMUCH_STATUS_NO_DATABASE;
 773
 774     (void) _finish_open (notmuch, profile, NOTMUCH_DATABASE_MODE_READ_ONLY, key_file, &message);
 775
 776     return NOTMUCH_STATUS_SUCCESS;
 777 }
 778
 779 notmuch_status_t
 780 notmuch_database_load_config (const char *database_path,
 781                               const char *config_path,
 782                               const char *profile,
 783                               notmuch_database_t **database,
 784                               char **status_string)
 785 {
 786     notmuch_status_t status = NOTMUCH_STATUS_SUCCESS, warning = NOTMUCH_STATUS_SUCCESS;
 787     void *local = talloc_new (NULL);
 788     notmuch_database_t *notmuch = NULL;
 789     char *message = NULL;
 790     GKeyFile *key_file = NULL;
 791     bool split = false;
 792
 793     _notmuch_init ();
 794
 795     notmuch = _alloc_notmuch ();
 796     if (! notmuch) {
 797         status = NOTMUCH_STATUS_OUT_OF_MEMORY;
 798         goto DONE;
 799     }
 800
 801     status = _load_key_file (notmuch, config_path, profile, &key_file);
 802     switch (status) {
 803     case NOTMUCH_STATUS_SUCCESS:
 804         break;
 805     case NOTMUCH_STATUS_NO_CONFIG:
 806         warning = status;
 807         break;
 808     default:
 809         message = strdup ("Error: cannot load config file.\n");
 810         goto DONE;
 811     }
 812
 813     status = _choose_database_path (local, profile, key_file,
 814                                     &database_path, &split, &message);
 815     switch (status) {
 816     case NOTMUCH_STATUS_NO_DATABASE:
 817     case NOTMUCH_STATUS_SUCCESS:
 818         if (! warning)
 819             warning = status;
 820         break;
 821     default:
 822         goto DONE;
 823     }
 824
 825
 826     if (database_path) {
 827         status = _maybe_load_config_from_database (notmuch, key_file, database_path, profile);
 828         switch (status) {
 829         case NOTMUCH_STATUS_NO_DATABASE:
 830         case NOTMUCH_STATUS_SUCCESS:
 831             if (! warning)
 832                 warning = status;
 833             break;
 834         default:
 835             goto DONE;
 836         }
 837     }
 838
 839     if (key_file) {
 840         status = _notmuch_config_load_from_file (notmuch, key_file);
 841         if (status)
 842             goto DONE;
 843     }
 844     status = _notmuch_config_load_defaults (notmuch);
 845     if (status)
 846         goto DONE;
 847
 848   DONE:
 849     talloc_free (local);
 850
 851     if (status_string)
 852         *status_string = message;
 853
 854     if (database)
 855         *database = notmuch;
 856
 857     if (status)
 858         return status;
 859     else
 860         return warning;
 861 }