Start putting absolute paths in generated files.

Source/bindings/scripts/CodeGenerator.pm

 #
 # WebKit IDL parser
 #
 # Copyright (C) 2005 Nikolas Zimmermann <wildfox@kde.org>
 # Copyright (C) 2006 Samuel Weinig <sam.weinig@gmail.com>
 # Copyright (C) 2007, 2008, 2009, 2010 Apple Inc. All rights reserved.
 # Copyright (C) 2009 Cameron McCormack <cam@mcc.id.au>
 # Copyright (C) Research In Motion Limited 2010. All rights reserved.
 #
 # This library is free software; you can redistribute it and/or
@@ skipping 246 matching lines @@
         my $wanted = sub {
             $idlFiles->{$1} = $File::Find::name if /^([A-Z].*)\.idl$/;
             $File::Find::prune = 1 if /^\../;
         };
         find($wanted, @directories);
     }
 
     return $idlFiles->{$interfaceName};
 }
 
+sub HFileForInterface
+{
+    my $object = shift;
+    my $interfaceName = shift;
+
+    my $idlFilename = $object->IDLFileForInterface($interfaceName)
+        or die("Could NOT find IDL file for interface \"$interfaceName\"!\n");
+
+    my $sourceRoot = $ENV{SOURCE_ROOT};
+    if ($idlFilename =~ /^$sourceRoot/) {
+      $idlFilename = substr($idlFilename, length($sourceRoot) + 1);
+    }
+    $idlFilename = "bindings/" . $idlFilename;
+    #print "${interfaceName}, ${idlFilename}, ${sourceRoot}\n";
+    $idlFilename =~ s/idl$/h/;
+    return $idlFilename;
+}
+
 sub ParseInterface
 {
     my $object = shift;
     my $interfaceName = shift;
 
     return undef if $interfaceName eq 'Object';
 
     if (exists $cachedInterfaces->{$interfaceName}) {
         return $cachedInterfaces->{$interfaceName};
     }
@@ skipping 485 matching lines @@
         if ($currentInterface->extendedAttributes->{$extendedAttribute}) {
             $found = 1;
         }
         return 1 if $found;
     }, 0);
 
     return $found;
 }
 
 1;