webservices: Add traces.

dlls/webservices/channel.c

@@ -304,6 +304,7 @@ HRESULT WINAPI WsCreateChannel( WS_CHANNEL_TYPE type, WS_CHANNEL_BINDING binding
 
     if ((hr = create_channel( type, binding, properties, count, &channel )) != S_OK) return hr;
 
+    TRACE( "created %p\n", channel );
     *handle = (WS_CHANNEL *)channel;
     return S_OK;
 }
@@ -332,6 +333,7 @@ HRESULT WINAPI WsCreateChannelForListener( WS_LISTENER *listener_handle, const W
 
     if ((hr = create_channel( type, binding, properties, count, &channel )) != S_OK) return hr;
 
+    TRACE( "created %p\n", channel );
     *handle = (WS_CHANNEL *)channel;
     return S_OK;
 }

dlls/webservices/error.c

@@ -102,6 +102,7 @@ HRESULT WINAPI WsCreateError( const WS_ERROR_PROPERTY *properties, ULONG count,
         }
     }
 
+    TRACE( "created %p\n", error );
     *handle = (WS_ERROR *)error;
     return S_OK;
 }

dlls/webservices/heap.c

@@ -208,6 +208,7 @@ HRESULT WINAPI WsCreateHeap( SIZE_T max_size, SIZE_T trim_size, const WS_HEAP_PR
     prop_set( heap->prop, heap->prop_count, WS_HEAP_PROPERTY_MAX_SIZE, &max_size, sizeof(max_size) );
     prop_set( heap->prop, heap->prop_count, WS_HEAP_PROPERTY_TRIM_SIZE, &trim_size, sizeof(trim_size) );
 
+    TRACE( "created %p\n", heap );
     *handle = (WS_HEAP *)heap;
     return S_OK;
 }
@@ -363,6 +364,7 @@ HRESULT WINAPI WsCreateXmlBuffer( WS_HEAP *heap, const WS_XML_BUFFER_PROPERTY *p
         return WS_E_QUOTA_EXCEEDED;
     }
 
+    TRACE( "created %p\n", xmlbuf );
     *handle = (WS_XML_BUFFER *)xmlbuf;
     return S_OK;
 }

dlls/webservices/listener.c

@@ -227,6 +227,7 @@ HRESULT WINAPI WsCreateListener( WS_CHANNEL_TYPE type, WS_CHANNEL_BINDING bindin
 
     if ((hr = create_listener( type, binding, properties, count, &listener )) != S_OK) return hr;
 
+    TRACE( "created %p\n", listener );
     *handle = (WS_LISTENER *)listener;
     return S_OK;
 }

dlls/webservices/msg.c

@@ -214,6 +214,8 @@ HRESULT WINAPI WsCreateMessage( WS_ENVELOPE_VERSION env_version, WS_ADDRESSING_V
                                 const WS_MESSAGE_PROPERTY *properties, ULONG count, WS_MESSAGE **handle,
                                 WS_ERROR *error )
 {
+    HRESULT hr;
+
     TRACE( "%u %u %p %u %p %p\n", env_version, addr_version, properties, count, handle, error );
     if (error) FIXME( "ignoring error parameter\n" );
 
@@ -222,7 +224,10 @@ HRESULT WINAPI WsCreateMessage( WS_ENVELOPE_VERSION env_version, WS_ADDRESSING_V
     {
         return E_INVALIDARG;
     }
-    return create_msg( env_version, addr_version, properties, count, handle );
+
+    if ((hr = create_msg( env_version, addr_version, properties, count, handle )) != S_OK) return hr;
+    TRACE( "created %p\n", *handle );
+    return S_OK;
 }
 
 /**************************************************************************
@@ -248,7 +253,9 @@ HRESULT WINAPI WsCreateMessageForChannel( WS_CHANNEL *channel_handle, const WS_M
                                     sizeof(version_addr), NULL )) != S_OK || !version_addr)
         version_addr = WS_ADDRESSING_VERSION_1_0;
 
-    return create_msg( version_env, version_addr, properties, count, handle );
+    if ((hr = create_msg( version_env, version_addr, properties, count, handle )) != S_OK) return hr;
+    TRACE( "created %p\n", *handle );
+    return S_OK;
 }
 
 /**************************************************************************

dlls/webservices/proxy.c

@@ -135,9 +135,13 @@ HRESULT WINAPI WsCreateServiceProxy( const WS_CHANNEL_TYPE type, const WS_CHANNE
                                NULL )) != S_OK) return hr;
 
     if ((hr = create_proxy( channel, proxy_props, proxy_props_count, handle )) != S_OK)
+    {
         WsFreeChannel( channel );
+        return hr;
+    }
 
-    return hr;
+    TRACE( "created %p\n", *handle );
+    return S_OK;
 }
 
 /**************************************************************************
@@ -194,8 +198,14 @@ HRESULT WINAPI WsCreateServiceProxyFromTemplate( WS_CHANNEL_TYPE channel_type,
     if ((hr = WsCreateChannel( channel_type, binding, channel_props, channel_props_count, NULL,
                                &channel, NULL )) != S_OK) return hr;
 
-    if ((hr = create_proxy( channel, properties, count, handle )) != S_OK) WsFreeChannel( channel );
-    return hr;
+    if ((hr = create_proxy( channel, properties, count, handle )) != S_OK)
+    {
+        WsFreeChannel( channel );
+        return hr;
+    }
+
+    TRACE( "created %p\n", *handle );
+    return S_OK;
 }
 
 /**************************************************************************

dlls/webservices/reader.c

@@ -558,6 +558,7 @@ HRESULT WINAPI WsCreateReader( const WS_XML_READER_PROPERTY *properties, ULONG c
         return hr;
     }
 
+    TRACE( "created %p\n", reader );
     *handle = (WS_XML_READER *)reader;
     return S_OK;
 }

dlls/webservices/writer.c

@@ -236,6 +236,7 @@ HRESULT WINAPI WsCreateWriter( const WS_XML_WRITER_PROPERTY *properties, ULONG c
         return hr;
     }
 
+    TRACE( "created %p\n", writer );
     *handle = (WS_XML_WRITER *)writer;
     return S_OK;
 }