-#endif
- }
-
- mutt_clear_error ();
- return (0);
- }
-
- return -1;
-}
-
-int mutt_update_list_file (char *filename, char *section, char *key,
- char *line)
-{
- FILE *ifp;
- FILE *ofp;
- char buf[HUGE_STRING];
- char oldfile[_POSIX_PATH_MAX];
- char *c;
- int ext = 0, done = 0, r = 0;
-
- snprintf (oldfile, sizeof (oldfile), "%s.bak", filename);
- dprint (1, (debugfile, "Renaming %s to %s\n", filename, oldfile));
-
- /* if file not exist, create it */
- if ((ifp = safe_fopen (filename, "a")))
- fclose (ifp);
- if (_mutt_rename_file (filename, oldfile, 1)) {
- mutt_perror (_("Unable to create backup file"));
-
- return (-1);
- }
- dprint (1, (debugfile, "Opening %s\n", oldfile));
- if (!(ifp = safe_fopen (oldfile, "r"))) {
- mutt_perror (_("Unable to open backup file for reading"));
-
- return (-1);
- }
- dprint (1, (debugfile, "Opening %s\n", filename));
- if (!(ofp = safe_fopen (filename, "w"))) {
- fclose (ifp);
- mutt_perror (_("Unable to open new file for writing"));
-
- return (-1);
- }
- if (mx_lock_file (filename, fileno (ofp), 1, 0, 1)) {
- fclose (ofp);
- fclose (ifp);
- mutt_error (_("Unable to lock %s, old file saved as %s"), filename,
- oldfile);
- return (-1);
- }
-
- if (section) {
- while (r != EOF && !done && fgets (buf, sizeof (buf), ifp)) {
- r = fputs (buf, ofp);
- c = buf;
- while (*c && *c != '\n')
- c++;
- c[0] = 0; /* strip EOL */
- if (!strncmp (buf, "#: ", 3) && !safe_strcasecmp (buf + 3, section))
- done++;
- }
- if (r != EOF && !done) {
- snprintf (buf, sizeof (buf), "#: %s\n", section);
- r = fputs (buf, ofp);
- }
- done = 0;
- }
-
- while (r != EOF && fgets (buf, sizeof (buf), ifp)) {
- if (ext) {
- c = buf;
- while (*c && (*c != '\r') && (*c != '\n'))
- c++;
- c--;
- if (*c != '\\')
- ext = 0;
- }
- else if ((section && !strncmp (buf, "#: ", 3))) {
- if (!done && line) {
- fputs (line, ofp);
- fputc ('\n', ofp);