Return to li CVS log

Up to [Research Unix] / researchv10no / cmd / cflow

Annotation of researchv10no/cmd/cflow/li, revision 1.1.1.1

1.1       root        1: L=/src/cmd/lint
                      2: LL="$L $HOME/lib"
                      3: 
                      4: H=/usr/tmp/hlint$$     # header buffer file
                      5: O="-C -Dlint"          # cpp options
                      6: P=unix
                      7: PATH=/bin:/usr/bin 
                      8: S=/usr/tmp/slint$$     # string buffer file
                      9: T=/usr/tmp/lint.$$     # intermediate file
                     10: X=
                     11: 
                     12: trap "rm -f $T $H $S; exit" 1 2 3 15
                     13: 
                     14: for A in $*
                     15: do
                     16:        case $A in
                     17:        -[IDU]*)        O="$O $A" ;;
                     18:        -L*)    LL="`expr $A : '-L\(.*\)'` $LL";;
                     19:        -l*)    ln=llib$A.ln
                     20:                LN=
                     21:                for ll in $LL
                     22:                do
                     23:                        if [ -f $ll/$ln ]
                     24:                        then LN=$ll/$ln
                     25:                        fi
                     26:                done
                     27:                if [ "$LN" ]
                     28:                then cat $LN >> $T
                     29:                else echo "$0: $ln: not found"
                     30:                fi ;;
                     31:        -*n*)   P=""  X="$X$A" ;; 
                     32:        -*p*)   P="port"  X="$X$A" ;;
                     33:        -*)     X="$X$A" ;;
                     34:        *.c)    (/lib/cpp $O $A | $L/lint1 $X -H$H -S$S $A >>$T)2>&1 ;;
                     35:        *.ln)   cat $A >> $T;;
                     36:        *)      echo "$0: bad file or option ignored: $A" ;;
                     37:        esac
                     38: done
                     39: 
                     40: case $P in
                     41:        unix)   cat $L/llib-lc.ln >>$T ;;
                     42:        port)   cat $L/llib-port.ln >>$T ;;
                     43: esac
                     44: 
                     45: if [ -s $H ]
                     46: then
                     47:        $L/lint2 -T$T $X -H$H -S$S
                     48: fi
                     49: 
                     50: rm -f $T $H $S

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