Return to trace9.c CVS log

Up to [Research Unix] / researchv10no / cmd / trace

Annotation of researchv10no/cmd/trace/trace9.c, revision 1.1.1.1

1.1       root        1: #include <stdio.h>
                      2: #include "trace.h"
                      3: #include "trace.d"
                      4: 
                      5:  extern int nrprocs, *processes, *state;
                      6: 
                      7:  char *Realloc(), *Emalloc(), *Smalloc();
                      8: 
                      9:  unsigned short **pstates;
                     10:  int pgrowth = 32;
                     11:  int nrpstates = 0;
                     12:  int pbound = 0;
                     13: 
                     14: growPtable()
                     15: { int p = pbound + pgrowth;
                     16: 
                     17:        if (p == pgrowth)
                     18:                pstates = (unsigned short **)
                     19:                        Emalloc(p * sizeof(unsigned short *));
                     20:        else
                     21:                pstates = (unsigned  short **)
                     22:                        Realloc(pstates, p * sizeof(unsigned short *));
                     23:        pbound = p;
                     24: }
                     25: 
                     26: unsigned short *
                     27: Pinsert()
                     28: { unsigned short *try;
                     29:   register int i;
                     30: 
                     31:        if (nrpstates >= pbound)
                     32:                growPtable();
                     33: 
                     34:        try = (unsigned  short *)
                     35:                Smalloc(nrprocs * sizeof(unsigned  short));
                     36: 
                     37:        for (i = 0; i < nrprocs; i++)
                     38:                try[i] = (unsigned short) (state[i] + (processes[i]<<10));
                     39: 
                     40:        pstates[nrpstates++] = try;
                     41: 
                     42:        return try;
                     43: }
                     44: 
                     45: unsigned  short *
                     46: inPtable()
                     47: { register int i;
                     48: 
                     49:        for (i = 0; i < nrpstates; i++)
                     50:                if (sameP(pstates[i]))
                     51:                        return pstates[i];
                     52: 
                     53:        return Pinsert();
                     54: }
                     55: 
                     56: sameP(at)
                     57:        unsigned  short *at;
                     58: { register int i;
                     59: 
                     60:        for (i = 0; i < nrprocs; i++)
                     61:        {       if ((at[i]&1023) != (unsigned short) state[i]
                     62:                ||   at[i]>>10   != (unsigned short) processes[i])
                     63:                        return 0;
                     64:        }
                     65:        return 1;
                     66: }

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