2 * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
3 * Copyright (C) 1999-2012 Hiroyuki Yamamoto and 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/>.
22 #include "claws-features.h"
33 static gboolean prefs_is_readonly (const gchar *path);
36 *\brief Open preferences file for reading
38 *\param path Filename with path of preferences file to read
40 *\return PrefFile * preferences file struct
42 PrefFile *prefs_read_open(const gchar *path)
47 cm_return_val_if_fail(path != NULL, NULL);
49 if ((fp = g_fopen(path, "rb")) == NULL) {
50 FILE_OP_ERROR(path, "fopen");
54 pfile = g_new(PrefFile, 1);
56 pfile->orig_fp = NULL;
57 pfile->path = g_strdup(path);
58 pfile->writing = FALSE;
64 *\brief Open preferences file for writing
65 * Prefs are written to a temp file: Call prefs_file_close()
66 * to rename this to the final filename
68 *\param path Filename with path of preferences file to write
70 *\return PrefFile * preferences file struct
72 PrefFile *prefs_write_open(const gchar *path)
78 cm_return_val_if_fail(path != NULL, NULL);
80 if (prefs_is_readonly(path)) {
81 g_warning("no write permission on '%s'", path);
85 tmppath = g_strconcat(path, ".tmp", NULL);
86 if ((fp = g_fopen(tmppath, "wb")) == NULL) {
87 FILE_OP_ERROR(tmppath, "fopen");
92 if (change_file_mode_rw(fp, tmppath) < 0)
93 FILE_OP_ERROR(tmppath, "chmod");
97 pfile = g_new(PrefFile, 1);
99 pfile->orig_fp = NULL;
100 pfile->path = g_strdup(path);
101 pfile->writing = TRUE;
106 gboolean prefs_common_get_flush_metadata (void);
109 *\brief Close and free preferences file
110 * Creates final file from temp, creates backup
112 *\param pfile Preferences file struct
114 *\return 0 on success, -1 on failure
116 gint prefs_file_close(PrefFile *pfile)
121 gchar *bakpath = NULL;
124 cm_return_val_if_fail(pfile != NULL, -1);
127 orig_fp = pfile->orig_fp;
130 if (!pfile->writing) {
138 while (fgets(buf, sizeof(buf), orig_fp) != NULL) {
141 if (fputs(buf, fp) == EOF) {
142 g_warning("failed to write configuration to file");
143 prefs_file_close_revert(pfile);
151 while (fgets(buf, sizeof(buf), orig_fp) != NULL)
152 if (fputs(buf, fp) == EOF) {
153 g_warning("failed to write configuration to file");
154 prefs_file_close_revert(pfile);
161 tmppath = g_strconcat(path, ".tmp", NULL);
163 if (safe_fclose(fp) == EOF) {
164 FILE_OP_ERROR(tmppath, "fclose");
165 claws_unlink(tmppath);
171 if (is_file_exist(path)) {
172 bakpath = g_strconcat(path, ".bak", NULL);
174 claws_unlink(bakpath);
176 if (g_rename(path, bakpath) < 0) {
177 FILE_OP_ERROR(path, "rename");
178 claws_unlink(tmppath);
189 if (g_rename(tmppath, path) < 0) {
190 FILE_OP_ERROR(tmppath, "rename");
191 claws_unlink(tmppath);
206 *\brief Close and free preferences file, delete temp file
208 *\param pfile Preferences file struct
210 gint prefs_file_close_revert(PrefFile *pfile)
212 gchar *tmppath = NULL;
214 cm_return_val_if_fail(pfile != NULL, -1);
217 fclose(pfile->orig_fp);
219 tmppath = g_strconcat(pfile->path, ".tmp", NULL);
221 if (pfile->writing) {
222 if (claws_unlink(tmppath) < 0) FILE_OP_ERROR(tmppath, "unlink");
232 *\brief Check if "path" is a file and readonly
234 static gboolean prefs_is_readonly(const gchar * path)
239 return (access(path, W_OK) != 0 && access(path, F_OK) == 0);
243 *\brief Check if "rcfile" is in rcdir, a file and readonly
245 gboolean prefs_rc_is_readonly(const gchar * rcfile)
253 rcpath = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S, rcfile, NULL);
254 result = prefs_is_readonly(rcpath);
261 *\brief Selects current section in preferences file
262 * Creates section if file is written
264 *\param pfile Preferences file struct
266 *\return 0 on success, -1 on failure
268 gint prefs_set_block_label(PrefFile *pfile, const gchar *label)
273 block_label = g_strdup_printf("[%s]", label);
274 if (!pfile->writing) {
275 while (fgets(buf, sizeof(buf), pfile->fp) != NULL) {
278 val = strncmp(buf, block_label, strlen(block_label));
280 debug_print("Found %s\n", block_label);
285 if ((pfile->orig_fp = g_fopen(pfile->path, "rb")) != NULL) {
286 gboolean block_matched = FALSE;
288 while (fgets(buf, sizeof(buf), pfile->orig_fp) != NULL) {
291 val = strncmp(buf, block_label, strlen(block_label));
293 debug_print("Found %s\n", block_label);
294 block_matched = TRUE;
297 if (fputs(buf, pfile->fp) == EOF) {
298 g_warning("failed to write configuration to file");
299 prefs_file_close_revert(pfile);
307 if (!block_matched) {
308 fclose(pfile->orig_fp);
309 pfile->orig_fp = NULL;
313 if (fputs(block_label, pfile->fp) == EOF ||
314 fputc('\n', pfile->fp) == EOF) {
315 g_warning("failed to write configuration to file");
316 prefs_file_close_revert(pfile);