Add Python flow to bindings generation, move dummy-generating IDL files over

Source/bindings/scripts/deprecated_generate_bindings.pl

 #!/usr/bin/perl -w
 #
 # Copyright (C) 2005 Apple Computer, Inc.
 # Copyright (C) 2006 Anders Carlsson <andersca@mac.com>
-# 
+#

[Nils Barth (inactive), 2013/07/09 08:48:16]

Presubmit check complained about trailing whitespace, so fix. =P

 # This file is part of WebKit
-# 
+#
 # This library is free software; you can redistribute it and/or
 # modify it under the terms of the GNU Library General Public
 # License as published by the Free Software Foundation; either
 # version 2 of the License, or (at your option) any later version.
-# 
+#
 # This library is distributed in the hope that it will be useful,
 # but WITHOUT ANY WARRANTY; without even the implied warranty of
 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 # Library General Public License for more details.
-# 
+#
 # You should have received a copy of the GNU Library General Public License
 # along with this library; see the file COPYING.LIB.  If not, write to
 # the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
 # Boston, MA 02110-1301, USA.
-# 
-
-# This script is a temporary hack. 
-# Files are generated in the source directory, when they really should go
-# to the DerivedSources directory.
-# This should also eventually be a build rule driven off of .idl files
-# however a build rule only solution is blocked by several radars:
-# <rdar://problems/4251781&4251785>
+#
 
 use strict;
 
 use File::Path;
 use File::Basename;
 use Getopt::Long;
 use Text::ParseWords;
 use Cwd;
 
-use IDLParser;
-use CodeGeneratorV8;
-use IDLSerializer;
+use deprecated_idl_parser;
+use deprecated_code_generator_v8;
+use deprecated_idl_serializer;
 
 my @idlDirectories;
 my $outputDirectory;
-my $defines;
-my $filename;
 my $preprocessor;
 my $verbose;
 my $supplementalDependencyFile;
 my $additionalIdlFiles;
 my $idlAttributesFile;
 my $writeFileOnlyIfChanged;
 
 GetOptions('include=s@' => \@idlDirectories,
            'outputDir=s' => \$outputDirectory,
-           'defines=s' => \$defines,
-           'filename=s' => \$filename,
            'preprocessor=s' => \$preprocessor,
            'verbose' => \$verbose,
            'supplementalDependencyFile=s' => \$supplementalDependencyFile,
            'additionalIdlFiles=s' => \$additionalIdlFiles,
            'idlAttributesFile=s' => \$idlAttributesFile,
            'write-file-only-if-changed=s' => \$writeFileOnlyIfChanged);
 
 my $targetIdlFile = $ARGV[0];
 
 die('Must specify input file.') unless defined($targetIdlFile);
 die('Must specify output directory.') unless defined($outputDirectory);
-$defines = "" unless defined($defines);
 
 $targetIdlFile = Cwd::realpath($targetIdlFile);
 if ($verbose) {
     print "$targetIdlFile\n";
 }
 my $targetInterfaceName = fileparse(basename($targetIdlFile), ".idl");
 
 my $idlFound = 0;
 my @supplementedIdlFiles;
 if ($supplementalDependencyFile) {
@@ skipping 28 matching lines @@
     }
 
     if (!$idlFound) {
         # We generate empty .h and .cpp files just to tell build scripts that .h and .cpp files are created.
         generateEmptyHeaderAndCpp($targetInterfaceName, $outputDirectory);
         exit 0;
     }
 }
 
 # Parse the target IDL file.
-my $targetParser = IDLParser->new(!$verbose);
-my $targetDocument = $targetParser->Parse($targetIdlFile, $defines, $preprocessor);
+my $targetParser = deprecated_idl_parser->new(!$verbose);
+my $targetDocument = $targetParser->Parse($targetIdlFile, $preprocessor);
 
 if ($idlAttributesFile) {
     my $idlAttributes = loadIDLAttributes($idlAttributesFile);
     checkIDLAttributes($idlAttributes, $targetDocument, basename($targetIdlFile));
 }
 
 foreach my $idlFile (@supplementedIdlFiles) {
     next if $idlFile eq $targetIdlFile;
 
     my $interfaceName = fileparse(basename($idlFile), ".idl");
-    my $parser = IDLParser->new(!$verbose);
-    my $document = $parser->Parse($idlFile, $defines, $preprocessor);
+    my $parser = deprecated_idl_parser->new(!$verbose);
+    my $document = $parser->Parse($idlFile, $preprocessor);
 
     foreach my $interface (@{$document->interfaces}) {
         if (!$interface->isPartial || $interface->name eq $targetInterfaceName) {
             my $targetDataNode;
             foreach my $interface (@{$targetDocument->interfaces}) {
                 if ($interface->name eq $targetInterfaceName) {
                     $targetDataNode = $interface;
                     last;
                 }
             }
@@ skipping 30 matching lines @@
                 applyInterfaceExtendedAttributes($interface, $constant->extendedAttributes);
 
                 push(@{$targetDataNode->constants}, $constant);
             }
         } else {
             die "$idlFile is not a supplemental dependency of $targetIdlFile. There maybe a bug in the the supplemental dependency generator (preprocess_idls.py).\n";
         }
     }
 }
 
-# FIXME: This code will be removed once IDLParser.pm and CodeGeneratorV8.pm
-# are connected via JSON files. See http://crbug.com/242795
+# Serialize to and from JSON to ensure Perl and Python parsers are equivalent,
+# as part of porting compiler to Python. See http://crbug.com/242795
 $targetDocument = deserializeJSON(serializeJSON($targetDocument));
 
 # Generate desired output for the target IDL file.
 my @dependentIdlFiles = ($targetDocument->fileName(), @supplementedIdlFiles);
-my $codeGenerator = CodeGeneratorV8->new($targetDocument, \@idlDirectories, $preprocessor, $defines, $verbose, \@dependentIdlFiles, $writeFileOnlyIfChanged);
+my $codeGenerator = deprecated_code_generator_v8->new($targetDocument, \@idlDirectories, $preprocessor, $verbose, \@dependentIdlFiles, $writeFileOnlyIfChanged);
 my $interfaces = $targetDocument->interfaces;
 foreach my $interface (@$interfaces) {
     print "Generating bindings code for IDL interface \"" . $interface->name . "\"...\n" if $verbose;
     $codeGenerator->GenerateInterface($interface);
     $codeGenerator->WriteData($interface, $outputDirectory);
 }
 
 sub generateEmptyHeaderAndCpp
 {
     my ($targetInterfaceName, $outputDirectory) = @_;
@@ skipping 102 matching lines @@
                 last OUTER;
             }
         }
     }
     if ($error) {
         die "IDL ATTRIBUTE CHECKER ERROR: $error
 If you want to add a new IDL attribute, you need to add it to bindings/scripts/IDLAttributes.txt and add explanations to the Blink IDL document (http://chromium.org/blink/webidl).
 ";
     }
 }