Platon Technologies
neprihlásený Prihlásiť Registrácia
SlovakEnglish
open source software development oslavujeme 10 rokov vývoja otvoreného softvéru! Utorok, 16. júl 2024

Súbor: [Platon] / yaadfat / stats.sh (stiahnutie)

Revízia 1.1.1.1, Sun Feb 23 17:43:01 2003 UTC (21 years, 4 months ago) by yenar


Zmeny od 1.1: +0 -0 [lines]

initial import of yaadfat into platon cvs

#!/bin/sh
# copyright 2002 yenar@host.sk
# covered by GNU LGPL

tl=0
tb=0
filter=$1

if [ -z "$filter" ]; then
    filter="cat"
fi

for d in $(find -type d -not -name CVS -not -name .libs -not -name .deps); do
    dl=0
    db=0
    for f in $(cd $d && echo *.c *.h); do
        fl=$(cat $d/$f 2>/dev/null | $filter | wc -l)
        fb=$(cat $d/$f 2>/dev/null | $filter | wc -c)
        fl=$(($fl))
        fb=$(($fb))
        if [ "$fb" != "0" ] && ! echo $f | grep '\*' >& /dev/null; then
            echo -e "$d/$f:\t$fl\t$fb" | expand -t 30
        fi
        dl=$(($dl+$fl))
        db=$(($db+$fb))
    done
    if [ $db != 0 ]; then
        dirs="$dirs\n$d:\t$dl\t$db"
        echo
    fi
    tl=$(($tl+$dl))
    tb=$(($tb+$db))
done
echo -e $dirs | expand -t 30
echo -e "\ntotal:\t$tl\t$tb" | expand -t 30;

Platon Group <platon@platon.sk> http://platon.sk/
Copyright © 2002-2006 Platon Group
Stránka používa redakčný systém Metafox
Na začiatok