Return to spos.c CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / B / src / bed

Annotation of 43BSD/contrib/B/src/bed/spos.c, revision 1.1

1.1     ! root        1: /* Copyright (c) Stichting Mathematisch Centrum, Amsterdam, 1985. */
        !             2: 
        !             3: /*
        !             4:   $Header: spos.c,v 1.1 85/08/22 15:50:07 timo Exp $
        !             5: */
        !             6: 
        !             7: /*
        !             8:  * B editor -- Save and restore focus position.
        !             9:  */
        !            10: 
        !            11: #include "b.h"
        !            12: #include "bobj.h"
        !            13: #include "feat.h"
        !            14: #include "file.h"
        !            15: 
        !            16: #ifdef SAVEPOS
        !            17: #define MAXPATHLEN 1024 /* See getwd(3) */
        !            18: #define MAXSAVE 50 /* Maximum number of entries kept in SAVEPOSFILE */
        !            19: 
        !            20: #define strval(v) Str(v)
        !            21: 
        !            22: /*
        !            23:  * Keep a simple database of file name vs. line number, so that
        !            24:  * when an edit session is stopped and later continued, the focus
        !            25:  * is restored exactly.
        !            26:  * The database is kept in most-recently-used-first order.
        !            27:  * When it is rewritten, only its first MAXSAVE lines are saved,
        !            28:  * thus limiting the amount of disk space wasted by files
        !            29:  * that were once edited but then removed, renamed or forgotten.
        !            30:  */
        !            31: 
        !            32: 
        !            33: Visible int
        !            34: getpos(file)
        !            35:        register string file;
        !            36: {
        !            37:        register FILE *fp = fopen(posfile, "r");
        !            38:        char buf[BUFSIZ];
        !            39:        auto int l1;
        !            40:        int nread;
        !            41:        register int len = strlen(file);
        !            42: 
        !            43:        if (!fp)
        !            44:                return 0;
        !            45:        while (fgets(buf, sizeof buf, fp) != NULL) {
        !            46:                if (strncmp(buf, file, len) == 0
        !            47:                        && (buf[len] == '\t' || buf[len] == ' ')) {
        !            48:                        nread= sscanf(buf+len+1, "%d", &l1);
        !            49:                        if (nread >= 1) {
        !            50:                                fclose(fp);
        !            51:                                return l1;
        !            52:                        }
        !            53:                }
        !            54:        }
        !            55:        fclose(fp);
        !            56:        return 0;
        !            57: }
        !            58: 
        !            59: 
        !            60: /*
        !            61:  * Save focus position for file 'file'.
        !            62:  * Return Yes if save succeeded.
        !            63:  */
        !            64: 
        !            65: Visible bool
        !            66: savepos(file, line)
        !            67:        register string file;
        !            68:        int line;
        !            69: {
        !            70:        register int nsave = 0;
        !            71:        register int i;
        !            72:        register FILE *fp = fopen(posfile, "r");
        !            73:        char buf[BUFSIZ];
        !            74:        register int len = strlen(file);
        !            75:        value saved[MAXSAVE];
        !            76: 
        !            77:        if (fp) {
        !            78:                while (fgets(buf, sizeof buf, fp) != NULL && nsave < MAXSAVE) {
        !            79:                        if (strncmp(file, buf, len) == 0
        !            80:                                && (buf[len] == ' ' || buf[len] == '\t'))
        !            81:                                continue;
        !            82:                        saved[nsave] = mk_text(buf);
        !            83:                        ++nsave;
        !            84:                }
        !            85:                fclose(fp);
        !            86:        }
        !            87:        fp = fopen(posfile, "w");
        !            88:        if (fp == NULL)
        !            89:                return No;
        !            90:        fprintf(fp, "%s\t%d\n", file, line);
        !            91:        for (i = 0; i < nsave; ++i) {
        !            92:                fputs(strval(saved[i]), fp);
        !            93:                release(saved[i]);
        !            94:        }
        !            95:        if (fclose(fp) == EOF) return No;
        !            96:        return Yes;
        !            97: }
        !            98: 
        !            99: #endif SAVEPOS

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