Return to strldbg.c CVS log

Up to [MW Coherent from dump] / coherent / g / usr / bin / vi

Annotation of coherent/g/usr/bin/vi/strldbg.c, revision 1.1

1.1     ! root        1: /* strldgb.c - debugging version of strlen */
        !             2: 
        !             3: #include <fcntl.h>
        !             4: 
        !             5: int fddb = -1;
        !             6: 
        !             7: /*
        !             8:  * stack:
        !             9:  *     Arg
        !            10:  *     Return Addr
        !            11:  */
        !            12: int strlen(cp)
        !            13: char * cp;
        !            14: {
        !            15:        int * dbp;
        !            16:        char buf[80];
        !            17: 
        !            18:        if (fddb == -1) {
        !            19:                fddb = open("/dev/console", O_RDWR);
        !            20:        }
        !            21: 
        !            22:        dbp = (int *)&cp;
        !            23:        dbp--;
        !            24:        sprintf(buf, "from %08x: strlen(%08x)\n", *dbp, cp);
        !            25:        write(fddb, buf, stl(buf));
        !            26:        return stl(cp);
        !            27: }
        !            28: 
        !            29: int stl(cp)
        !            30: char * cp;
        !            31: {
        !            32:        int ret = 0;
        !            33:        while (*cp++)
        !            34:                ret++;
        !            35:        return ret;
        !            36: }

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