Return to setflags.c CVS log

Up to [Research Unix] / researchv9 / jerq / sgs / strip

Annotation of researchv9/jerq/sgs/strip/setflags.c, revision 1.1

1.1     ! root        1: /* UNIX HEADER */
        !             2: #include       <stdio.h>
        !             3: 
        !             4: /* SGS SPECIFIC HEADER */
        !             5: #include       "sgs.h"
        !             6: 
        !             7: /* STRIP HEADER */
        !             8: #include       "defs.h"
        !             9: 
        !            10: /* EXTERNAL VARIABLES DEFINED */
        !            11: int    lflag = OFF;
        !            12: int    xflag = OFF;
        !            13: int    bflag = OFF;
        !            14: int    rflag = OFF;
        !            15: int    sflag = OFF;
        !            16: int    fflag = OFF;
        !            17: 
        !            18: 
        !            19:     /*  setflags(flagc, flagv)
        !            20:      *
        !            21:      *  scans the command line for flags (arguments beginning with a '-')
        !            22:      *  sets the appropriate flags and removes the flag arguments from the
        !            23:      *  command line
        !            24:      *
        !            25:      *  defines:
        !            26:      *      - lflag = OFF by default
        !            27:      *             = ON if -l appears in the command line:  strip line nos only
        !            28:      *      - xflag = OFF by default
        !            29:      *             = ON if -x appears in command line:  strip local symbols and
        !            30:      *               line numbers only
        !            31:      *     - bflag = OFF by default
        !            32:      *             = ON if -b appears in command line: strip all local symbols
        !            33:      *               except beginning and end of block (.bb and .eb) and 
        !            34:      *               beginning and end of function (.bf and .ef).
        !            35:      *      - rflag = OFF by default
        !            36:      *         = ON if -r appears in command line: strip all but static
        !            37:      *           externs, .bf, and .ef
        !            38:      *     - fflag = OFF by default
        !            39:      *         = ON if -f appears in the command line, same as xflag plus
        !            40:      *           strip relocation information for sections not of type
        !            41:      *           type copy, for DMERT only
        !            42:      *
        !            43:      *  prints an error message if any unknown flag shows up
        !            44:      *
        !            45:      *  returns the number of arguments remaining in argv (they are repositioned
        !            46:      *  in filev and are presumed to be object files).
        !            47:      */
        !            48: 
        !            49: 
        !            50: int
        !            51: setflags(flagc, flagv)
        !            52: 
        !            53: int    flagc;
        !            54: char   **flagv;
        !            55: 
        !            56: {
        !            57:     /* UNIX FUNCTIONS CALLED */
        !            58:     extern     fprintf( );
        !            59: 
        !            60:     /* EXTERNAL VARIABLES USED */
        !            61:     extern int         lflag;
        !            62:     extern int         xflag;
        !            63:     extern int         bflag;
        !            64:     extern int         rflag;
        !            65:     extern int         sflag;
        !            66: #if !UNIX
        !            67:     extern int         fflag;
        !            68: #endif
        !            69: 
        !            70:     /* LOCAL VARIABLES */
        !            71:     int                filec;
        !            72:     char       **filev;
        !            73: 
        !            74: 
        !            75:     for (filec = 0, filev = flagv; flagc > 0; --flagc, ++flagv) {
        !            76:        if (**flagv == '-') {
        !            77:            while(*++*flagv != '\0') {
        !            78:                switch(**flagv) {
        !            79:                    case 'l':
        !            80:                        lflag = ON;
        !            81:                        break;
        !            82: 
        !            83:                    case 'x':
        !            84:                        xflag = ON;
        !            85:                        break;
        !            86: 
        !            87:                    case 'b':
        !            88:                        bflag = ON;
        !            89:                        break;
        !            90: 
        !            91:                    case 'r':
        !            92:                        rflag = ON;
        !            93:                        break;
        !            94: #if !UNIX
        !            95:                    case 's':
        !            96:                        sflag = ON;
        !            97:                        break;
        !            98: #endif
        !            99: 
        !           100: #if !UNIX
        !           101:                    case 'f':
        !           102:                        fflag = ON;
        !           103:                        rflag = ON;
        !           104:                        break;
        !           105: #endif
        !           106:                    case 'V':
        !           107:                        fprintf(stderr,"%s: strip -%s\n",SGSNAME,RELEASE);
        !           108:                        break;
        !           109: 
        !           110:                    default:
        !           111:                        fprintf(stderr,
        !           112:                                "%sstrip:  unknown option \"%c\" ignored\n",
        !           113:                                SGS, **flagv);
        !           114:                        break;
        !           115:                }
        !           116:            }
        !           117:        } else {
        !           118:            *filev++ = *flagv;
        !           119:            ++filec;
        !           120:        }
        !           121:     }
        !           122: 
        !           123: 
        !           124:        if (lflag && sflag)
        !           125:        {
        !           126:                fprintf( stderr, "%sstrip: -l and -s are incompatible options\n", SGS );
        !           127:                exit(1);
        !           128:        }
        !           129:        if ((xflag || bflag) && rflag)
        !           130:        {
        !           131:                fprintf( stderr, "%sstrip: -x and -r are incompatible options\n", SGS );
        !           132:                exit(1);
        !           133:        }
        !           134:        if (lflag)
        !           135:                xflag = bflag = rflag = fflag = sflag = OFF;
        !           136: 
        !           137:     return(filec);
        !           138: }
        !           139: /*
        !           140:  *     @(#)setflags.c  1.6 11/11/83;
        !           141:  */

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