Return to main.c CVS log

Up to [CSRG BSD Unix] / 3BSD / cmd / sdb

Annotation of 3BSD/cmd/sdb/main.c, revision 1.1

1.1     ! root        1: #
        !             2: /*
        !             3:  *
        !             4:  *     UNIX debugger
        !             5:  *
        !             6:  */
        !             7: 
        !             8: #include       "head.h"
        !             9: #include       <signal.h>
        !            10: #include       <stdio.h>
        !            11: #include       <sys/stat.h>
        !            12: 
        !            13: INT            mkfault;
        !            14: INT            executing;
        !            15: CHAR           *lp;
        !            16: L_INT          maxoff;
        !            17: L_INT          maxpos;
        !            18: ADDR           sigint;
        !            19: ADDR           sigqit;
        !            20: INT            wtflag;
        !            21: L_INT          maxfile;
        !            22: L_INT          maxstor;
        !            23: L_INT          txtsiz;
        !            24: L_INT          datsiz;
        !            25: L_INT          datbas;
        !            26: L_INT          stksiz;
        !            27: STRING         errflg;
        !            28: INT            magic;
        !            29: L_INT          entrypt;
        !            30: 
        !            31: CHAR           lastc;
        !            32: 
        !            33: STRING         symfil;
        !            34: STRING         corfil;
        !            35: INT            argcount;
        !            36: int    fpe();
        !            37: 
        !            38: 
        !            39: 
        !            40: #ifndef STD
        !            41: char *mktemp(), *tfn;
        !            42: int tfd;
        !            43: #endif
        !            44: 
        !            45: main(argc, argv)
        !            46: REG STRING     *argv;
        !            47: REG INT                argc;
        !            48: {
        !            49:        register char *p;
        !            50:        struct stat stbuf;
        !            51: 
        !            52:        maxfile=1L<<24; maxstor=1L<<31;
        !            53: 
        !            54:        setbuf(stdout, NULL);
        !            55:        setbuf(stderr, NULL);
        !            56: 
        !            57:        WHILE argc>1
        !            58:        DO      IF eqstr("-w",argv[1])
        !            59:                THEN    wtflag=2; argc--; argv++;
        !            60:                ELSE    break;
        !            61:                FI
        !            62:        OD
        !            63: 
        !            64:        IF argc>1 THEN symfil = argv[1]; FI
        !            65:        IF argc>2 THEN corfil = argv[2]; FI
        !            66:        fp = filework;
        !            67:        if (argc > 3) {
        !            68:                for (p = argv[3]; *p; *fp++ = *p++) ;
        !            69:                *fp++ = '/';
        !            70:        }
        !            71:        argcount=argc;
        !            72: 
        !            73:        if (stat(symfil, &stbuf) == -1) {
        !            74:                printf("`%s' does not exist\n", symfil);
        !            75:                exit(4);
        !            76:        }
        !            77:        symtime = stbuf.st_mtime;
        !            78:        if (stat(corfil, &stbuf) != -1) {
        !            79:                if (symtime > stbuf.st_mtime)
        !            80:                        printf("Warning: `%s' newer than `%s'\n",
        !            81:                                symfil, corfil);
        !            82:        }
        !            83: 
        !            84:        setsym(); setcor();
        !            85:        initfp();
        !            86: 
        !            87:        /* set up variables for user */
        !            88:        maxoff=MAXOFF; maxpos=MAXPOS;
        !            89:        gtty(2, &sdbttym);
        !            90:        IF (sigint= (ADDR) signal(SIGINT,01))!=01
        !            91:        THEN    sigint= (ADDR) fault; signal(SIGINT,fault);
        !            92:        FI
        !            93:        sigqit= (ADDR) signal(SIGQUIT,1);
        !            94:        signal(SIGILL, fpe);
        !            95: #ifdef VAX135
        !            96:        tfn = "/usr/hpk/sdblog/XXXXXX";
        !            97: #endif
        !            98: #ifdef UCBVAX
        !            99:        tfn = "/usr/staff/hpk/sdblog/XXXXXX";
        !           100: #endif
        !           101: #ifndef STD
        !           102:        tfn = mktemp(tfn);
        !           103:        tfd = open(tfn);
        !           104:        if (tfd < 0)
        !           105:                tfd = creat(tfn, 0666);
        !           106:        lseek(tfd, 0l, 2);
        !           107: #endif
        !           108: 
        !           109:        setjmp(env);
        !           110:        if (debug) printf("Sdb restarted\n");
        !           111:        gtty(2, &userttym);
        !           112:        if (sdbttym.sg_flags != userttym.sg_flags)
        !           113:                stty(2, &sdbttym);
        !           114:        IF executing THEN delbp(); FI
        !           115:        executing=FALSE;
        !           116: 
        !           117:        for (;;) {
        !           118:                mkfault = 0;
        !           119:                printf("*");
        !           120:                if (decode(readline(stdin)) == 1) {
        !           121:                        printf("Error; try again\n");
        !           122:                        continue;
        !           123:                }
        !           124: 
        !           125:        if (debug) {
        !           126:                printf("cmd %c:\n", cmd);
        !           127:                printf("%s:%s\n", proc, var);
        !           128:                printf("args-%s;re-%s;integ-%d\n", args, re, integ);
        !           129:                printf("scallf-%d;reflg-%d\n\n", scallf, reflag);
        !           130:        }
        !           131: 
        !           132: #ifndef STD
        !           133:                write(tfd, &cmd, 1);
        !           134: #endif
        !           135: 
        !           136:                docommand();
        !           137:        }
        !           138: }
        !           139: 
        !           140: 
        !           141: fault(a)
        !           142: {
        !           143:        signal(a,fault);
        !           144:        mkfault++;
        !           145:        printf("\n");
        !           146:        longjmp(env, 0);
        !           147: }
        !           148: 
        !           149: fpe() {
        !           150:        signal(SIGILL, fpe);
        !           151:        error("Illegal floating constant");
        !           152:        longjmp(env, 0);
        !           153: }

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