diplodocus.org Git - nmh/blob - sbr/seq_save.c

   1
   2 /*
   3  * seq_save.c -- 1) synchronize sequences
   4  *            -- 2) save public sequences
   5  *
   6  * This code is Copyright (c) 2002, by the authors of nmh.  See the
   7  * COPYRIGHT file in the root directory of the nmh distribution for
   8  * complete copyright information.
   9  */
  10
  11 #include <h/mh.h>
  12 #include <h/signals.h>
  13
  14
  15 /*
  16  * 1.  If sequence is public and folder is readonly,
  17  *     then change it to be private
  18  * 2a. If sequence is public, then add it to the sequences file
  19  *     in folder (name specified by mh-sequences profile entry).
  20  * 2b. If sequence is private, then add it to the
  21  *     context file.
  22  */
  23
  24 void
  25 seq_save (struct msgs *mp)
  26 {
  27     int i;
  28     char flags, *cp, attr[BUFSIZ], seqfile[PATH_MAX];
  29     FILE *fp;
  30     sigset_t set, oset;
  31
  32     /* check if sequence information has changed */
  33     if (!(mp->msgflags & SEQMOD)) {
  34         if (mp->seqhandle) {
  35             lkfclosedata (mp->seqhandle, mp->seqname);
  36             mp->seqhandle = NULL;
  37             free(mp->seqname);
  38             mp->seqname = NULL;
  39         }
  40         return;
  41     }
  42     mp->msgflags &= ~SEQMOD;
  43
  44     fp = NULL;
  45     flags = mp->msgflags;       /* record folder flags */
  46
  47     /*
  48      * If no mh-sequences file is defined, or if a mh-sequences file
  49      * is defined but empty (*mh_seq == '\0'), then pretend folder
  50      * is readonly.  This will force all sequences to be private.
  51      */
  52     if (mh_seq == NULL || *mh_seq == '\0')
  53         set_readonly (mp);
  54     else
  55         snprintf (seqfile, sizeof(seqfile), "%s/%s", mp->foldpath, mh_seq);
  56
  57     for (i = 0; mp->msgattrs[i]; i++) {
  58         snprintf (attr, sizeof(attr), "atr-%s-%s", mp->msgattrs[i], mp->foldpath);
  59
  60         /* get space separated list of sequence ranges */
  61         if (!(cp = seq_list(mp, mp->msgattrs[i]))) {
  62             context_del (attr);                 /* delete sequence from context */
  63             continue;
  64         }
  65
  66         if (is_readonly(mp) || is_seq_private(mp, i)) {
  67 priv:
  68             /*
  69              * sequence is private
  70              */
  71             context_replace (attr, cp);         /* update sequence in context   */
  72         } else {
  73             /*
  74              * sequence is public
  75              */
  76             context_del (attr);                 /* delete sequence from context */
  77
  78             if (!fp) {
  79                 /*
  80                  * Attempt to open file for public sequences.
  81                  * If that fails (probably because folder is
  82                  * readonly), then make sequence private.
  83                  */
  84
  85                 if (mp->seqhandle) {
  86                     fp = mp->seqhandle;
  87                     mp->seqhandle = NULL;
  88                     free(mp->seqname);
  89                     mp->seqname = NULL;
  90                     rewind(fp);
  91                     ftruncate(fileno(fp), 0);
  92                 } else if ((fp = lkfopendata (seqfile, "w")) == NULL
  93                         && (unlink (seqfile) == -1 ||
  94                             (fp = lkfopendata (seqfile, "w")) == NULL)) {
  95                     admonish (attr, "unable to write");
  96                     goto priv;
  97                 }
  98
  99                 /* block a few signals */
 100                 sigemptyset (&set);
 101                 sigaddset(&set, SIGHUP);
 102                 sigaddset(&set, SIGINT);
 103                 sigaddset(&set, SIGQUIT);
 104                 sigaddset(&set, SIGTERM);
 105                 sigprocmask (SIG_BLOCK, &set, &oset);
 106             }
 107             fprintf (fp, "%s: %s\n", mp->msgattrs[i], cp);
 108         }
 109     }
 110
 111     if (fp) {
 112         lkfclosedata (fp, seqfile);
 113         sigprocmask (SIG_SETMASK, &oset, &set);  /* reset signal mask */
 114     } else {
 115         /*
 116          * If folder is not readonly, and we didn't save any
 117          * public sequences, then remove that file.
 118          */
 119         if (!is_readonly(mp))
 120             unlink (seqfile);
 121     }
 122
 123     /*
 124      * Reset folder flag, since we may be
 125      * pretending that folder is readonly.
 126      */
 127     mp->msgflags = flags;
 128 }