Return to formatpg.c CVS log

Up to [CSRG BSD Unix] / 43BSD / ingres / source / iutil

Annotation of 43BSD/ingres/source/iutil/formatpg.c, revision 1.1

1.1     ! root        1: # include      <ingres.h>
        !             2: # include      <access.h>
        !             3: # include      <sccs.h>
        !             4: 
        !             5: SCCSID(@(#)formatpg.c  8.2     2/8/85)
        !             6: 
        !             7: /*
        !             8: **     FORMATPG - write n pages to a buffer
        !             9: **
        !            10: **
        !            11: **     Parameters:
        !            12: **             d - descriptor
        !            13: **             n - number of pages
        !            14: **
        !            15: **
        !            16: **     Return Codes:
        !            17: **             0 - successful
        !            18: **             -2 - failure when setting file ptr
        !            19: **             -3, -4 - failure when writing page to buffer
        !            20: **                     -4 is for last page
        !            21: **
        !            22: **     Called by:
        !            23: **             create()
        !            24: **             modify()
        !            25: **             resetrel()
        !            26: **
        !            27: */
        !            28: formatpg(d, n)
        !            29: DESC   *d;
        !            30: long   n;
        !            31: {
        !            32:        struct accbuf   buf;
        !            33:        register char   *p;
        !            34:        extern long     lseek();
        !            35: 
        !            36:        if (Acc_head == 0)
        !            37:                acc_init();
        !            38:        if (lseek(d->relfp, 0l, 0) == -1)
        !            39:                return (-2);
        !            40:        buf.rel_tupid = d->reltid.ltid;
        !            41:        buf.filedesc = d->relfp;
        !            42:        for (p = (char *) &buf; p <= (char *) buf.linetab; p++)
        !            43:                *p = NULL;
        !            44:        buf.nxtlino = 0;
        !            45:        buf.linetab[0] = (int) buf.firstup - (int) &buf;
        !            46:        buf.ovflopg = 0;
        !            47:        for (buf.mainpg = 1; buf.mainpg < n; (buf.mainpg)++)
        !            48:        {
        !            49:                if (write(buf.filedesc, (char *) &buf, PGSIZE) != PGSIZE)
        !            50:                        return (-3);
        !            51:        }
        !            52:        buf.mainpg = 0;
        !            53:        if (write(buf.filedesc, (char *) &buf, PGSIZE) != PGSIZE)
        !            54:                return (-4);
        !            55:        Accuwrite += n;
        !            56:        return (0);
        !            57: }

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