scripts/cfd at stuff · dcollins4096/scripts · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
#! /bin/tcsh

# CheckForDifferences: differences two code versions
# args:
#  v: after each file, prints the line count of diff
#  v v: writes the diff out
# d1 = src
# d2 = whatever's in the file ./dir

set d1 = "src"

#diff args
set DA = "-wc"

#if( $1 == "" || $1 == "v" || $1 == "c") then
#    set d2 = "../"`cat dir`
#else
#    set d2 = "../"$1
#endif

# Better ways to find the

cd $1
set d1 = `pwd`
cd -
cd $2
set d2 = `pwd`
cd -

# hack:
#set d1 = '0501_Good'
#set d2 = '0501_StillDivLessSegFaults'
#

echo $d1 " " $d2

cd $d1

set NewFiles = 0
set NewLinesThisFile = 0
set NewLinesNewFiles = 0
set NewLinesOldFiles = 0
set AllNewLines = 0

#set files = " *.C *.h *.src "
set files = " *.C *.src *.h"
#set files = " * "
foreach i ( $files )

    if(  -e $d2/$i ) then
	if( `diff -w $i $d2/$i |wc -l` != 0 ) then

	    if( $1 == "v" && $2 == "v" ) then
		    echo "ooo"
		    diff $i $d2/$i
	    endif
	    if( $1 == "v" ) then
		    diff $i $d2/$i |wc -l
	    endif

	    set Lines1 = `wc -l $i | awk '{print $1}' `
	    set Lines2 = `wc -l $d2/$i | awk '{print $1}' `
	    @ NewLinesOldFiles = $NewLinesOldFiles + $Lines1 - $Lines2
	    @ NewLinesThisFile = $Lines1 - $Lines2
	    echo $i $NewLinesThisFile $NewLinesOldFiles

	endif
    else
	echo XXXXXXXXXXXXXX $d2/$i doesnt exist
	@ NewLinesNewFiles = $NewLinesNewFiles + `wc -l $i | awk '{print $1}'`
	@ NewFiles = $NewFiles + 1
	echo $NewLinesNewFiles
    endif
end

    echo New Lines, New Files = $NewLinesNewFiles
    echo New Files            = $NewFiles
    echo New Lines, Old Files = $NewLinesOldFiles
    @ AllNewLines = $NewLinesNewFiles + $NewLinesOldFiles
    echo new Lines, Total     = $AllNewLines

cd $d2

foreach i ( $files )

    if( ! (-e $d1/$i) ) then

	echo YYYYYYYYYYYYYY $d1/$i doesnt exist

    endif

end

#end