summaryrefslogtreecommitdiff
path: root/bin/vc_filter.pl
diff options
context:
space:
mode:
Diffstat (limited to 'bin/vc_filter.pl')
-rwxr-xr-xbin/vc_filter.pl56
1 files changed, 0 insertions, 56 deletions
diff --git a/bin/vc_filter.pl b/bin/vc_filter.pl
deleted file mode 100755
index 0a497380245..00000000000
--- a/bin/vc_filter.pl
+++ /dev/null
@@ -1,56 +0,0 @@
-# $Id$
-#
-# A perl script that filers length VC output into a concise html report.
-
-# Define html tags.
-$header = "<html><head>
-<title>Error/Warning Summary of Daily Build</title>
-</head>
-
-<body bgcolor=\"white\">
-<h1>Error/Warning Summary of Daily Build</h1><TT>\n";
-$trailer = "</TT></body></html>";
-
-$kosher_b = "";
-$kosher_e = "";
-
-$in_sin_b = "<FONT COLOR=\"RED\">";
-$in_sin_e = "</FONT>";
-
-$new_build_b = "<P>";
-$new_build_e = "";
-
-# Get filename.
-$fname = $ARGV[0];
-open (fp, "$fname");
-
-print $header ;
-
-while ($line = <fp>)
-{
- print "$new_build_b $line $new_build_e<BR>" if ($line =~/^--------------------Configuration:/);
-
- if ($line =~/^[A-Z_a-z0-9.]+ - [0-9]+ error\(s\), +[0-9]+ warning\(s\)/)
- {
- if ($line =~/0 error\(s\), 0 warning\(s\)/)
- {
- print "$kosher_b $line $kosher_e<BR>";
- }
- else
- {
- print "$in_sin_b $line $in_sin_e<BR>";
- }
- }
-
- print "$in_sin_b $line $in_sin_e<BR>"
- if ($line =~/^[-A-Z_a-z0-9.\/\\:]+\([0-9]+\) : / ||
- $line =~/^[-A-Z_a-z0-9.\/\\:]+.*, line [0-9]+: / ||
- $line =~/^[-A-Z_a-z0-9.\\:]+\.obj : / ||
- $line =~/^fatal error/ ||
- $line =~/^Error executing/ ||
- $line =~/^4NT: / ||
- $line =~/^LINK : /);
-
-}
-
-print $trailer;