r9984: Honour the NOEMIT conformance directive for entire IDL files.
authorTim Potter <tpot@samba.org>
Sat, 3 Sep 2005 02:08:25 +0000 (02:08 +0000)
committerGerald (Jerry) Carter <jerry@samba.org>
Wed, 10 Oct 2007 18:36:26 +0000 (13:36 -0500)
source/pidl/lib/Parse/Pidl/Ethereal/NDR.pm
source/pidl/pidl

index a0e8f4126b737d46586217defe0808e56d77ae31..dbaf12b572071f078878ab8c47483300d5a299a5 100644 (file)
@@ -707,6 +707,8 @@ sub Parse($$$$)
        my($ndr,$idl_file,$h_filename,$cnf_file) = @_;
        Initialize($cnf_file);
 
+       return (undef, undef) if defined($conformance->{noemit_dissector});
+
        $tabs = "";
 
        %res = (code=>"",def=>"",hdr=>"");
index a8631043b2cf04ae4f1e8a1bfd6d73a58a41fff6..c68ea6c1213389acf6d284edab8a9528bd74258b 100755 (executable)
@@ -326,8 +326,8 @@ $dcom
          $cnffile =~ s/\.idl$/\.cnf/;
 
          my ($dp, $dh) = Parse::Pidl::Ethereal::NDR::Parse($ndr, $idl_file, $eheader, $cnffile);
-         FileSave($eparser, $dp);
-         FileSave($eheader, $dh);
+         FileSave($eparser, $dp) if defined($dp);
+         FileSave($eheader, $dh) if defined($dh);
        }
 
        my $tdr_parser = ($opt_tdr_parser or "$outputdir/tdr_$basename.c");