Force windows to regenerate COM DOM bindings.
authorweinig@apple.com <weinig@apple.com@268f45cc-cd09-0410-ab3c-d52691b4dbfc>
Sun, 16 Dec 2007 00:07:31 +0000 (00:07 +0000)
committerweinig@apple.com <weinig@apple.com@268f45cc-cd09-0410-ab3c-d52691b4dbfc>
Sun, 16 Dec 2007 00:07:31 +0000 (00:07 +0000)
        * WebCore.vcproj/build-generated-files.sh: Add license.
        * bindings/scripts/CodeGeneratorCOM.pm: Use shared WK_ucfirst.

git-svn-id: https://svn.webkit.org/repository/webkit/trunk@28761 268f45cc-cd09-0410-ab3c-d52691b4dbfc

WebCore/ChangeLog
WebCore/WebCore.vcproj/build-generated-files.sh
WebCore/bindings/scripts/CodeGeneratorCOM.pm

index 8a68cbad02363a9e48d542bae45e72a78fa634b2..b0c8b1f529a4fcf0e6b38aa34b4be175582f7807 100644 (file)
@@ -1,3 +1,10 @@
+2007-12-15  Sam Weinig  <sam@webkit.org>
+
+        Force windows to regenerate COM DOM bindings.
+
+        * WebCore.vcproj/build-generated-files.sh: Add license. 
+        * bindings/scripts/CodeGeneratorCOM.pm: Use shared WK_ucfirst.
+
 2007-12-15  Sam Weinig  <sam@webkit.org>
 
         Fix Windows and wx builds.
index eeda972da7ecd5d59d2f3f28a4c0ad2f22884f7c..445c91fe2fcf4e0b1afec2093fca51fa20c5de0d 100644 (file)
@@ -1,5 +1,31 @@
 #!/usr/bin/bash
 
+# Copyright (C) 2007 Apple 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. 
+# 3.  Neither the name of Apple puter, Inc. ("Apple") nor the names of
+#     its contributors may be used to endorse or promote products derived
+#     from this software without specific prior written permission.
+#
+# THIS SOFTWARE IS PROVIDED BY APPLE AND ITS CONTRIBUTORS "AS IS" AND ANY
+# EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
+# WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
+# DISCLAIMED. IN NO EVENT SHALL APPLE OR ITS CONTRIBUTORS BE LIABLE FOR ANY
+# DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
+# (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
+# LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
+# ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+# (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
+# THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+
 NUMCPUS=`../../WebKitTools/Scripts/num-cpus`
 
 XSRCROOT="`pwd`/.."
index ebaec678c179437cb2f0a761b06ee1e36afafaab..b86cf43cb0abf3f8e61f0c665a40169e07160052 100644 (file)
@@ -116,16 +116,6 @@ sub finish
     my $object = shift;
 }
 
-# Uppercase the first letter, while respecting WebKit style guidelines.
-# E.g., xmlEncoding becomes XMLEncoding, but xmlllang becomes Xmllang.
-sub WK_ucfirst
-{
-    my $param = shift;
-    my $ret = ucfirst($param);
-    $ret =~ s/Xml/XML/ if $ret =~ /^Xml[^a-z]/;
-    return $ret;
-}
-
 # Params: 'domClass' struct
 sub GenerateInterface
 {
@@ -402,7 +392,7 @@ sub GenerateIDL
 
             unless ($attributeIsReadonly) {
                 # Setter
-                my $setterName = "set" . WK_ucfirst($attributeName);
+                my $setterName = "set" . $codeGenerator->WK_ucfirst($attributeName);
                 my $setter = "    HRESULT " . $setterName . "([in] " . $attributeTypeIn . ");\n";
                 push(@IDLContent, $setter);
             }
@@ -507,7 +497,7 @@ sub GenerateCPPAttributeSignature
 
     unless ($isReadonly) {
         my $attributeTypeIn = GetCOMTypeIn($attribute->signature->type);
-        my $setterName = "set" . WK_ucfirst($attributeName);
+        my $setterName = "set" . $codeGenerator->WK_ucfirst($attributeName);
         my $setter = $indent . $virtual . "HRESULT STDMETHODCALLTYPE ". $class . $setterName . "(";
         $setter .= $joiner . "/* [in] */ ${attributeTypeIn} ${attributeName})" . $semicolon . $newline;
         if ($forwarder) {
@@ -560,7 +550,7 @@ sub GenerateCPPAttribute
         push(@setterImplementation, $signatures{"Setter"});
         push(@setterImplementation, "{\n");
 
-        my $setterName = "set" . WK_ucfirst($attributeName);
+        my $setterName = "set" . $codeGenerator->WK_ucfirst($attributeName);
 
         my @setterParams = ();
         if ($attributeTypeIsString) {
@@ -746,7 +736,7 @@ sub GenerateCPPFunction
 
             my $paramTypeCOMClassName = GetClassName($paramIDLType);
             my $paramTypeImplementationWithoutNamespace = StripNamespace(IDLTypeToImplementationType($paramIDLType));
-            my $ptrName = "ptrFor" . WK_ucfirst($paramName);
+            my $ptrName = "ptrFor" . $codeGenerator->WK_ucfirst($paramName);
             my $paramInit = "    COMPtr<${paramTypeCOMClassName}> ${ptrName}(Query, ${paramName});\n";
             $paramInit .= "    if (!${ptrName})\n";
             $paramInit .= "        return E_NOINTERFACE;";