src/hg/encode/encodeValidate/doEncodeValidate.pl 1.142

Index: src/hg/encode/encodeValidate/doEncodeValidate.pl
===================================================================
RCS file: /projects/compbio/cvsroot/kent/src/hg/encode/encodeValidate/doEncodeValidate.pl,v
retrieving revision 1.141
retrieving revision 1.142
diff -b -B -U 4 -r1.141 -r1.142
--- src/hg/encode/encodeValidate/doEncodeValidate.pl	7 Feb 2009 03:09:59 -0000	1.141
+++ src/hg/encode/encodeValidate/doEncodeValidate.pl	13 Feb 2009 04:19:13 -0000	1.142
@@ -316,8 +316,12 @@
     gappedPeak => \&validateGappedPeak,
     fastq => \&validateFastQ,
     csfasta => \&validateCsfasta,
     csqual  => \&validateCsqual,
+    rpkm  => \&validateRpkm,
+    fasta  => \&validateFasta,
+    bowtie  => \&validateBowtie,
+    psl  => \&validatePsl,
     cBiP => \&validateFreepass,  # TODO: this is a dodge, because bed file is for different species, so chrom violations
     );
 
 sub openUtil
@@ -847,8 +851,52 @@
     doTime("done validateCsqual", $line) if $opt_timing;
     return ();
 }
 
+sub validateRpkm
+{
+    my ($path, $file, $type) = @_;
+    doTime("beginning validateRpkm") if $opt_timing;
+#    my $fh = openUtil($path, $file);
+    my $line = 0;
+    HgAutomate::verbose(2, "File \'$file\' passed $type validation\n");
+    doTime("done validateRpkm", $line) if $opt_timing;
+    return ();
+}
+
+sub validateFasta
+{
+    my ($path, $file, $type) = @_;
+    doTime("beginning validateFasta") if $opt_timing;
+#    my $fh = openUtil($path, $file);
+    my $line = 0;
+    HgAutomate::verbose(2, "File \'$file\' passed $type validation\n");
+    doTime("done validateFasta", $line) if $opt_timing;
+    return ();
+}
+
+sub validateBowtie
+{
+    my ($path, $file, $type) = @_;
+    doTime("beginning validateBowtie") if $opt_timing;
+#    my $fh = openUtil($path, $file);
+    my $line = 0;
+    HgAutomate::verbose(2, "File \'$file\' passed $type validation\n");
+    doTime("done validateBowtie", $line) if $opt_timing;
+    return ();
+}
+
+sub validatePsl
+{
+    my ($path, $file, $type) = @_;
+    doTime("beginning validatePsl") if $opt_timing;
+#    my $fh = openUtil($path, $file);
+    my $line = 0;
+    HgAutomate::verbose(2, "File \'$file\' passed $type validation\n");
+    doTime("done validatePsl", $line) if $opt_timing;
+    return ();
+}
+
 
 ############################################################################
 # Misc subroutines