Return to mapvars.c CVS log

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

Annotation of 42BSD/ingres/source/ctlmod/mapvars.c, revision 1.1

1.1     ! root        1: # include      <ingres.h>
        !             2: # include      <symbol.h>
        !             3: # include      <tree.h>
        !             4: # include      <sccs.h>
        !             5: 
        !             6: SCCSID(@(#)mapvars.c   7.1     2/5/81)
        !             7: 
        !             8: /*
        !             9: **  MAPVARS -- remap varno's to be unique in 'tree' tree
        !            10: **
        !            11: **     A tree is scanned for VAR nodes; when found, the
        !            12: **     mapping defined in Qt.qt_remap[] is applied.  This is done so that
        !            13: **     varno's as defined in trees in the 'tree' catalog will be
        !            14: **     unique with respect to varno's in the user's query tree.  For
        !            15: **     example, if the view definition uses variable 1 and the user's
        !            16: **     query also uses variable 1, the routine 'readqry' will (after
        !            17: **     calling 'declare' to assign a new slot), put the index of this
        !            18: **     new slot into the corresponding entry of Qt.qt_remap;
        !            19: **     in this example, Qt.qt_remap[1] == 3.  This routine does the actual
        !            20: **     mapping in the tree.
        !            21: **
        !            22: **     Parameters:
        !            23: **             tree -- pointer to tree to be remapped.
        !            24: **
        !            25: **     Returns:
        !            26: **             none
        !            27: **
        !            28: **     Side Effects:
        !            29: **             the tree pointed to by 'tree' is modified according
        !            30: **             to Qt.qt_remap[].
        !            31: **
        !            32: **     Trace Flags:
        !            33: **             7.4-7.7
        !            34: */
        !            35: 
        !            36: mapvars(tree)
        !            37: QTREE  *tree;
        !            38: {
        !            39:        register QTREE  *t;
        !            40:        register int    i;
        !            41: 
        !            42:        t = tree;
        !            43: #      ifdef xQTR3
        !            44:        if (tTf(7, 4) && t != NULL && t->sym.type == ROOT)
        !            45:        {
        !            46:                printf("mapvars:");
        !            47:                treepr(t);
        !            48:                for (i = 0; i < MAXVAR + 1; i++)
        !            49:                        if (Qt.qt_rangev[i].rngvdesc != NULL && Qt.qt_remap[i] >= 0)
        !            50:                                printf("\t%d => %d\n", i, Qt.qt_remap[i]);
        !            51:        }
        !            52: #      endif
        !            53: 
        !            54:        while (t != NULL)
        !            55:        {
        !            56:                /* map right subtree */
        !            57:                mapvars(t->right);
        !            58: 
        !            59:                /* check this node */
        !            60:                if (t->sym.type == VAR)
        !            61:                        t->sym.value.sym_var.varno = Qt.qt_remap[t->sym.value.sym_var.varno];
        !            62: 
        !            63:                /* map left subtree (iteratively) */
        !            64:                t = t->left;
        !            65:        }
        !            66: }

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