+++ /dev/null
-#!/usr/bin/perl\r
-\r
-my $nTabsFound = 0;\r
-\r
-brush() ;\r
-\r
-print "Tabs found: $nTabsFound\n" ;\r
-print "Done\n" ;\r
-\r
-exit ;\r
-\r
-sub brush() \r
-{\r
- processDir( "./cds" ) ;\r
- processDir( "./src" ) ;\r
- processDir( "./tests/test-hdr" ) ;\r
- processDir( "./tests/unit" ) ;\r
- processDir( "./tests/cppunit" ) ;\r
-}\r
-\r
-sub processDir( $ )\r
-{\r
- my $dirName = shift ;\r
- print "Process $dirName directory...\n";\r
- \r
- opendir(my $dh, $dirName) || die "can't opendir $dirName: $!";\r
- my @files = grep { /^[^\.]/ } readdir($dh);\r
- closedir $dh;\r
- \r
- foreach my $file ( @files ) {\r
- if ( -d "$dirName/$file" ) {\r
- processDir("$dirName/$file") ;\r
- }\r
- elsif ( $file =~ /\.(h|cpp)$/ ) {\r
- processFile( "$dirName/$file" ) ;\r
- }\r
- }\r
-}\r
-\r
-sub processFile( $ ) \r
-{\r
- my $file = shift ;\r
-\r
- \r
- if ( open( my $fh, $file )) {\r
- binmode $fh ;\r
- my $str = '' ;\r
- while (<$fh>) {\r
- $nTabsFound += $_ =~ s/\t/ /g;\r
- $_ =~ s/\s+$// ;\r
- $_ =~ s/\s+;$/;/;\r
- $str .= $_ ;\r
- $str .= "\n" ;\r
- }\r
- close $fh ;\r
- \r
- if ( open( my $fh, ">$file" )) {\r
- binmode $fh ;\r
- print $fh $str ;\r
- close $fh ;\r
- }\r
- }\r
-}\r
-\r
-\r
-\r
+++ /dev/null
-rm -fr doc\r
-md doc\r
-set DOXYPRJ_ROOT=.\r
-%DOXYGEN_PATH%\bin\doxygen doxygen\cds.doxy > doxygen\doxygen.log 2>&1\r
-cp -f doxygen/index.html doc/index.html\r
-\r
--- /dev/null
+#!/usr/bin/perl\r
+\r
+my $nTabsFound = 0;\r
+\r
+brush() ;\r
+\r
+print "Tabs found: $nTabsFound\n" ;\r
+print "Done\n" ;\r
+\r
+exit ;\r
+\r
+sub brush() \r
+{\r
+ processDir( "../cds" ) ;\r
+ processDir( "../src" ) ;\r
+ processDir( "../tests/test-hdr" ) ;\r
+ processDir( "../tests/unit" ) ;\r
+ processDir( "../tests/cppunit" ) ;\r
+}\r
+\r
+sub processDir( $ )\r
+{\r
+ my $dirName = shift ;\r
+ print "Process $dirName directory...\n";\r
+ \r
+ opendir(my $dh, $dirName) || die "can't opendir $dirName: $!";\r
+ my @files = grep { /^[^\.]/ } readdir($dh);\r
+ closedir $dh;\r
+ \r
+ foreach my $file ( @files ) {\r
+ if ( -d "$dirName/$file" ) {\r
+ processDir("$dirName/$file") ;\r
+ }\r
+ elsif ( $file =~ /\.(h|cpp)$/ ) {\r
+ processFile( "$dirName/$file" ) ;\r
+ }\r
+ }\r
+}\r
+\r
+sub processFile( $ ) \r
+{\r
+ my $file = shift ;\r
+\r
+ \r
+ if ( open( my $fh, $file )) {\r
+ binmode $fh ;\r
+ my $str = '' ;\r
+ while (<$fh>) {\r
+ $nTabsFound += $_ =~ s/\t/ /g;\r
+ $_ =~ s/\s+$// ;\r
+ $_ =~ s/\s+;$/;/;\r
+ $str .= $_ ;\r
+ $str .= "\n" ;\r
+ }\r
+ close $fh ;\r
+ \r
+ if ( open( my $fh, ">$file" )) {\r
+ binmode $fh ;\r
+ print $fh $str ;\r
+ close $fh ;\r
+ }\r
+ }\r
+}\r
+\r
+\r
+\r
--- /dev/null
+rm -fr doc\r
+md doc\r
+set DOXYPRJ_ROOT=.\r
+%DOXYGEN_PATH%\bin\doxygen ..\doxygen\cds.doxy > ..\doxygen\doxygen.log 2>&1\r
+cp -f ../doxygen/index.html ../doc/index.html\r