Return to annosbr.c CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / mh / uip

Annotation of 43BSD/contrib/mh/uip/annosbr.c, revision 1.1.1.1

1.1       root        1: /* annosbr.c - prepend annotation to messages */
                      2: 
                      3: #include "../h/mh.h"
                      4: #include "../zotnet/tws.h"
                      5: #include <errno.h>
                      6: #include <stdio.h>
                      7: #include <sys/types.h>
                      8: #include <sys/stat.h>
                      9: 
                     10: 
                     11: extern int  errno;
                     12: 
                     13: long lseek ();
                     14: 
                     15: /*  */
                     16: 
                     17: annotate (file, comp, text, inplace)
                     18: register char   *file,
                     19:                *comp,
                     20:                *text;
                     21: int     inplace;
                     22: {
                     23:     int     i,
                     24:             fd;
                     25: 
                     26:     if ((fd = lkopen (file, 2)) == NOTOK) {
                     27:        switch (errno) {
                     28:            case ENOENT: 
                     29:                break;
                     30: 
                     31:            default: 
                     32:                admonish (file, "unable to lock and open");
                     33:                break;
                     34:        }
                     35:        return 1;
                     36:     }
                     37: 
                     38:     i = annosbr (fd, file, comp, text, inplace);
                     39: 
                     40:     (void) lkclose (fd, file);
                     41: 
                     42:     return i;
                     43: }
                     44: 
                     45: /*  */
                     46: 
                     47: static annosbr (src, file, comp, text, inplace)
                     48: register char  *file,
                     49:               *comp,
                     50:               *text;
                     51: int     src,
                     52:        inplace;
                     53: {
                     54:     int     mode,
                     55:             fd;
                     56:     register char  *cp,
                     57:                    *sp;
                     58:     char    buffer[BUFSIZ],
                     59:             tmpfil[BUFSIZ];
                     60:     struct stat st;
                     61:     register    FILE *tmp;
                     62: 
                     63:     mode = fstat (src, &st) != NOTOK ? (st.st_mode & 0777) : m_gmprot ();
                     64: 
                     65:     (void) strcpy (tmpfil, m_scratch (file, "annotate"));
                     66: 
                     67:     if ((tmp = fopen (tmpfil, "w")) == NULL) {
                     68:        admonish (tmpfil, "unable to create");
                     69:        return 1;
                     70:     }
                     71:     (void) chmod (tmpfil, mode);
                     72: 
                     73:     fprintf (tmp, "%s: %s\n", comp, dtimenow ());
                     74:     if (cp = text) {
                     75:        do {
                     76:            while (*cp == ' ' || *cp == '\t')
                     77:                cp++;
                     78:            sp = cp;
                     79:            while (*cp && *cp++ != '\n')
                     80:                continue;
                     81:            if (cp - sp)
                     82:                fprintf (tmp, "%s: %*.*s", comp, cp - sp, cp - sp, sp);
                     83:        } while (*cp);
                     84:        if (cp[-1] != '\n' && cp != text)
                     85:            (void) putc ('\n', tmp);
                     86:     }
                     87:     (void) fflush (tmp);
                     88:     cpydata (src, fileno (tmp), file, tmpfil);
                     89:     (void) fclose (tmp);
                     90: 
                     91:     if (inplace) {
                     92:        if ((fd = open (tmpfil, 0)) == NOTOK)
                     93:            adios (tmpfil, "unable to open for re-reading");
                     94:        (void) lseek (src, 0L, 0);
                     95:        cpydata (fd, src, tmpfil, file);
                     96:        (void) close (fd);
                     97:        (void) unlink (tmpfil);
                     98:     }
                     99:     else {
                    100:        (void) strcpy (buffer, m_backup (file));
                    101:        if (rename (file, buffer) == NOTOK) {
                    102:            admonish (buffer, "unable to rename %s to", file);
                    103:            return 1;
                    104:        }
                    105:        if (rename (tmpfil, file) == NOTOK) {
                    106:            admonish (file, "unable to rename %s to", tmpfil);
                    107:            return 1;
                    108:        }
                    109:     }
                    110: 
                    111:     return 0;
                    112: }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.