Return to tup_len.c CVS log

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

Annotation of 42BSD/ingres/source/iutil/tup_len.c, revision 1.1.1.1

1.1       root        1: # include      <ingres.h>
                      2: # include      <access.h>
                      3: # include      <sccs.h>
                      4: 
                      5: SCCSID(@(#)tup_len.c   7.1     2/5/81)
                      6: 
                      7: /*
                      8: **     Tup_len finds the amount of space occupied by the
                      9: **     tuple specified by "tid"
                     10: */
                     11: 
                     12: tup_len(tid)
                     13: TID    *tid;
                     14: {
                     15:        register short  *lp;
                     16:        register int    nextoff, off;
                     17:        int             lineoff, i;
                     18: 
                     19: 
                     20:        /* point to line number table */
                     21:        lp = (short *) Acc_head->linetab;
                     22: 
                     23:        /* find offset for tid */
                     24:        lineoff = lp[-(tid->line_id & I1MASK)];
                     25: 
                     26:        /* assume next line number follows lineoff */
                     27:        nextoff = lp[-Acc_head->nxtlino];
                     28: 
                     29:        /* look for the line offset following lineoff */
                     30:        for (i = 0; i < Acc_head->nxtlino; i++)
                     31:        {
                     32:                off = *lp--;
                     33: 
                     34:                if (off <= lineoff)
                     35:                        continue;
                     36: 
                     37:                if (off < nextoff)
                     38:                        nextoff = off;
                     39:        }
                     40: #      ifdef xATR3
                     41:        if (tTf(27, 8))
                     42:                printf("tup_len ret %d\n", nextoff - lineoff);
                     43: #      endif
                     44:        return (nextoff - lineoff);
                     45: }

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