Fixes to make scripts generate includes with paths.

Source/core/scripts/InFilesCompiler.pm

 #!/usr/bin/perl -w
 
 # Copyright (C) 2011 Adam Barth <abarth@webkit.org>
 #
 # Redistribution and use in source and binary forms, with or without
 # modification, are permitted provided that the following conditions
 # are met:
 # 1. Redistributions of source code must retain the above copyright
 #    notice, this list of conditions and the following disclaimer.
 # 2. Redistributions in binary form must reproduce the above copyright
@@ skipping 14 matching lines @@
 #
 
 use strict;
 
 use Config;
 use Getopt::Long;
 use File::Path;
 use File::Spec;
 use IO::File;
 use InFilesParser;
+use idltopath;
 
 require Config;
 
 package InFilesCompiler;
 
 my $inputFile = "";
 my $outputDir = ".";
+my $idlToPathFile = "";
 my $defaultItemFactory;
 
 my %parsedItems;
 my %parsedItemPaths;
 my %parsedParameters;
 
 sub itemHandler($$$)
 {
     my ($itemName, $property, $value) = @_;
 
@@ skipping 32 matching lines @@
 
     bless($reference, $object);
     return $reference;
 }
 
 sub initializeFromCommandLine()
 {
     ::GetOptions(
         'input=s' => \$inputFile,
         'outputDir=s' => \$outputDir,
+        'idltopathfile=s' => \$idlToPathFile,
     );
 
     die "You must specify --input <file>" unless length($inputFile);
 
+    die "You must specify --idltopathfile" unless length($idlToPathFile);
+
+    idltopath::initIdlToPath($idlToPathFile);
     ::mkpath($outputDir);
 
     # FIXME: Should we provide outputDir via an accessor?
     return $outputDir;
 }
 
 sub compile()
 {
     my $object = shift;
     my $generateCode = shift;
 
     my $file = new IO::File;
     open($file, $inputFile) or die "Failed to open file: $!";
 
     my $InParser = InFilesParser->new();
     $InParser->parse($file, \&parameterHandler, \&itemHandler);
 
     close($file);
     die "Failed to read from file: $inputFile" if (keys %parsedItems == 0);
 
     &$generateCode(\%parsedParameters, \%parsedItems, \%parsedItemPaths);
 }
 
 sub license()
 {
     return "/*
  * THIS FILE WAS AUTOMATICALLY GENERATED, DO NOT EDIT.
  *
+ * This file was generated by the make_names.pl/InFilesCompiler.pm script.
+ *
  * Copyright (C) 2011 Google Inc.  All rights reserved.
  *
  * Redistribution and use in source and binary forms, with or without
  * modification, are permitted provided that the following conditions
  * are met:
  * 1. Redistributions of source code must retain the above copyright
  *    notice, this list of conditions and the following disclaimer.
  * 2. Redistributions in binary form must reproduce the above copyright
  *    notice, this list of conditions and the following disclaimer in the
  *    documentation and/or other materials provided with the distribution.
@@ skipping 143 matching lines @@
 
     for my $itemName (sort keys %parsedItems) {
         my $conditional = $parsedItems{$itemName}{"conditional"};
         my $interfaceName = $object->interfaceForItem($itemName);
 
         next if defined($includedInterfaces{$interfaceName});
         $includedInterfaces{$interfaceName} = 1;
 
         print F "#if " . $object->conditionalStringFromAttributeValue($conditional) . "\n" if $conditional;
         my $path = "$interfaceName.h";
+        if (!defined($parsedItemPaths{$itemName})) {
+            print("Warning: Missing path for interface headers for " . $itemName . " in InFilesCompiler.pm\n");
+            my $path = idltopath::idlToPath($itemName);
+            # Removing trailing '/' since we'll add it again here.
+            chop($path);
+            $parsedItemPaths{$itemName} = $path;
+        }
+#        die "Unknown idl path for " . $itemName unless defined($parsedItemPaths{$itemName});
         $path = $parsedItemPaths{$itemName} . "/" . $path if defined($parsedItemPaths{$itemName});
-        print F "#include \"$path\"\n";
+        print F "#include \"./$path\"\n";
         print F "#include \"V8$interfaceName.h\"\n";
         print F "#endif\n" if $conditional;
     }
 
     print F "\n";
     print F "#endif // ${namespace}Headers_h\n";
 
     close F;
 }
 
 1;