Return to main.c CVS log

Up to [CSRG BSD Unix] / 43BSDReno / bin / sh

Annotation of 43BSDReno/bin/sh/main.c, revision 1.1

1.1     ! root        1: #ifndef lint
        !             2: static char sccsid[] = "@(#)main.c     4.4 5/8/89";
        !             3: #endif
        !             4: 
        !             5: #
        !             6: /*
        !             7:  * UNIX shell
        !             8:  *
        !             9:  * S. R. Bourne
        !            10:  * Bell Telephone Laboratories
        !            11:  *
        !            12:  */
        !            13: 
        !            14: #include       <sys/types.h>
        !            15: #include       <sys/stat.h>
        !            16: #include       <sgtty.h>
        !            17: #include       <signal.h>
        !            18: #include       "defs.h"
        !            19: #include       "sym.h"
        !            20: #include       "timeout.h"
        !            21: #include       "pathnames.h"
        !            22: 
        !            23: UFD            output = 2;
        !            24: LOCAL BOOL     beenhere = FALSE;
        !            25: CHAR           tmpout[20] = _PATH_TMPOUT;
        !            26: FILEBLK                stdfile;
        !            27: FILE           standin = &stdfile;
        !            28: #ifdef stupid
        !            29: #include       <execargs.h>
        !            30: #endif
        !            31: 
        !            32: PROC VOID      exfile();
        !            33: 
        !            34: 
        !            35: 
        !            36: 
        !            37: main(c, v)
        !            38:        INT             c;
        !            39:        STRING          v[];
        !            40: {
        !            41:        REG INT         rflag=ttyflg;
        !            42: 
        !            43:        /* initialise storage allocation */
        !            44:        stdsigs();
        !            45:        setbrk(BRKINCR);
        !            46:        addblok((POS)0);
        !            47: 
        !            48:        /* set names from userenv */
        !            49:        setupenv();
        !            50: 
        !            51:        /* look for restricted */
        !            52: /*     IF c>0 ANDF any('r', *v) THEN rflag=0 FI */
        !            53: 
        !            54:        /* look for options */
        !            55:        dolc=options(c,v);
        !            56:        IF dolc<2 THEN flags |= stdflg FI
        !            57:        IF (flags&stdflg)==0
        !            58:        THEN    dolc--;
        !            59:        FI
        !            60:        dolv=v+c-dolc; dolc--;
        !            61: 
        !            62:        /* return here for shell file execution */
        !            63:        setjmp(subshell);
        !            64: 
        !            65:        /* number of positional parameters */
        !            66:        assnum(&dolladr,dolc);
        !            67:        cmdadr=dolv[0];
        !            68: 
        !            69:        /* set pidname */
        !            70:        assnum(&pidadr, getpid());
        !            71: 
        !            72:        /* set up temp file names */
        !            73:        settmp();
        !            74: 
        !            75:        /* default ifs */
        !            76:        dfault(&ifsnod, sptbnl);
        !            77: 
        !            78:        IF (beenhere++)==FALSE
        !            79:        THEN    /* ? profile */
        !            80:                IF *cmdadr=='-'
        !            81:                    ANDF (input=pathopen(nullstr, profile))>=0
        !            82:                THEN    exfile(rflag); flags &= ~ttyflg;
        !            83:                FI
        !            84:                IF rflag==0 THEN flags |= rshflg FI
        !            85: 
        !            86:                /* open input file if specified */
        !            87:                IF comdiv
        !            88:                THEN    estabf(comdiv); input = -1;
        !            89:                ELSE    input=((flags&stdflg) ? 0 : chkopen(cmdadr));
        !            90:                        comdiv--;
        !            91:                FI
        !            92: #ifdef stupid
        !            93:        ELSE    *execargs=dolv; /* for `ps' cmd */
        !            94: #endif
        !            95:        FI
        !            96: 
        !            97:        exfile(0);
        !            98:        done();
        !            99: }
        !           100: 
        !           101: LOCAL VOID     exfile(prof)
        !           102: BOOL           prof;
        !           103: {
        !           104:        REG L_INT       mailtime = 0;
        !           105:        REG INT         userid;
        !           106:        struct stat     statb;
        !           107: 
        !           108:        /* move input */
        !           109:        IF input>0
        !           110:        THEN    Ldup(input,INIO);
        !           111:                input=INIO;
        !           112:        FI
        !           113: 
        !           114:        /* move output to safe place */
        !           115:        IF output==2
        !           116:        THEN    Ldup(dup(2),OTIO);
        !           117:                output=OTIO;
        !           118:        FI
        !           119: 
        !           120:        userid=getuid();
        !           121: 
        !           122:        /* decide whether interactive */
        !           123:        IF (flags&intflg) ORF ((flags&oneflg)==0 ANDF gtty(output,&statb)==0 ANDF gtty(input,&statb)==0)
        !           124:        THEN    dfault(&ps1nod, (userid?stdprompt:supprompt));
        !           125:                dfault(&ps2nod, readmsg);
        !           126:                flags |= ttyflg|prompt; ignsig(KILL);
        !           127: /*
        !           128:                {
        !           129:        #include <signal.h>
        !           130:                signal(SIGTTIN, SIG_IGN);
        !           131:                signal(SIGTTOU, SIG_IGN);
        !           132:                signal(SIGTSTP, SIG_IGN);
        !           133:                }
        !           134: */
        !           135:        ELSE    flags |= prof; flags &= ~prompt;
        !           136:        FI
        !           137: 
        !           138:        IF setjmp(errshell) ANDF prof
        !           139:        THEN    close(input); return;
        !           140:        FI
        !           141: 
        !           142:        /* error return here */
        !           143:        loopcnt=breakcnt=peekc=0; iopend=0;
        !           144:        IF input>=0 THEN initf(input) FI
        !           145: 
        !           146:        /* command loop */
        !           147:        LOOP    tdystak(0);
        !           148:                stakchk(); /* may reduce sbrk */
        !           149:                exitset();
        !           150:                IF (flags&prompt) ANDF standin->fstak==0 ANDF !eof
        !           151:                THEN    IF mailnod.namval
        !           152:                            ANDF stat(mailnod.namval,&statb)>=0 ANDF statb.st_size
        !           153:                            ANDF (statb.st_mtime != mailtime)
        !           154:                            ANDF mailtime
        !           155:                        THEN    prs(mailmsg)
        !           156:                        FI
        !           157:                        mailtime=statb.st_mtime;
        !           158:                        prs(ps1nod.namval);
        !           159:                FI
        !           160: 
        !           161:                trapnote=0; peekc=readc();
        !           162:                IF eof
        !           163:                THEN    return;
        !           164:                FI
        !           165:                execute(cmd(NL,MTFLG),0);
        !           166:                eof |= (flags&oneflg);
        !           167:        POOL
        !           168: }
        !           169: 
        !           170: chkpr(eor)
        !           171: char eor;
        !           172: {
        !           173:        IF (flags&prompt) ANDF standin->fstak==0 ANDF eor==NL
        !           174:        THEN    prs(ps2nod.namval);
        !           175:        FI
        !           176: }
        !           177: 
        !           178: settmp()
        !           179: {
        !           180:        itos(getpid()); serial=0;
        !           181:        tmpnam=movstr(numbuf,&tmpout[TMPNAM]);
        !           182: }
        !           183: 
        !           184: Ldup(fa, fb)
        !           185:        REG INT         fa, fb;
        !           186: {
        !           187:        dup2(fa, fb);
        !           188:        close(fa);
        !           189:        ioctl(fb, FIOCLEX, 0);
        !           190: }

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