/**************************************************************************
* WsCreateServiceProxy [webservices.@]
*/
HRESULT WINAPI WsCreateServiceProxy( const WS_CHANNEL_TYPE type, const WS_CHANNEL_BINDING binding,
const WS_SECURITY_DESCRIPTION *desc,
const WS_PROXY_PROPERTY *proxy_props, ULONG proxy_props_count,
const WS_CHANNEL_PROPERTY *channel_props,
const ULONG channel_props_count, WS_SERVICE_PROXY **handle,
WS_ERROR *error )
{
WS_CHANNEL *channel;
HRESULT hr;
TRACE( "%u %u %p %p %u %p %u %p %p\n", type, binding, desc, proxy_props, proxy_props_count,
channel_props, channel_props_count, handle, error );
if (error) FIXME( "ignoring error parameter\n" );
if (desc) FIXME( "ignoring security description\n" );
if (!handle) return E_INVALIDARG;
if ((hr = WsCreateChannel( type, binding, channel_props, channel_props_count, NULL, &channel,
NULL )) != S_OK) return hr;
if ((hr = create_proxy( channel, proxy_props, proxy_props_count, handle )) != S_OK)
{
WsFreeChannel( channel );
return hr;
}
TRACE( "created %p\n", *handle );
return S_OK;
}
/**************************************************************************
* WsCreateServiceProxyFromTemplate [webservices.@]
*/
HRESULT WINAPI WsCreateServiceProxyFromTemplate( WS_CHANNEL_TYPE channel_type,
const WS_PROXY_PROPERTY *properties, const ULONG count,
WS_BINDING_TEMPLATE_TYPE type, void *value, ULONG size,
const void *desc, ULONG desc_size, WS_SERVICE_PROXY **handle,
WS_ERROR *error )
{
const WS_CHANNEL_PROPERTY *channel_props = NULL;
ULONG channel_props_count = 0;
WS_CHANNEL_BINDING binding;
WS_CHANNEL *channel;
HRESULT hr;
TRACE( "%u %p %u %u %p %u %p %u %p %p\n", channel_type, properties, count, type, value, size, desc,
desc_size, handle, error );
if (error) FIXME( "ignoring error parameter\n" );
if (!desc || !handle) return E_INVALIDARG;
FIXME( "ignoring description\n" );
switch (type)
{
case WS_HTTP_BINDING_TEMPLATE_TYPE:
{
WS_HTTP_BINDING_TEMPLATE *http = value;
if (http)
{
channel_props = http->channelProperties.properties;
channel_props_count = http->channelProperties.propertyCount;
}
binding = WS_HTTP_CHANNEL_BINDING;
break;
}
case WS_HTTP_SSL_BINDING_TEMPLATE_TYPE:
{
WS_HTTP_SSL_BINDING_TEMPLATE *https = value;
if (https)
{
channel_props = https->channelProperties.properties;
channel_props_count = https->channelProperties.propertyCount;
}
binding = WS_HTTP_CHANNEL_BINDING;
break;
}
default:
FIXME( "template type %u not implemented\n", type );
return E_NOTIMPL;
}
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;
}
TRACE( "created %p\n", *handle );
return S_OK;
}
static HRESULT create_channel( int port, WS_CHANNEL **ret )
{
static const WCHAR fmt[] =
{'h','t','t','p',':','/','/','1','2','7','.','0','.','0','.','1',':','%','u',0};
WS_CHANNEL_PROPERTY prop[2];
WS_ENVELOPE_VERSION env_version = WS_ENVELOPE_VERSION_SOAP_1_1;
WS_ADDRESSING_VERSION addr_version = WS_ADDRESSING_VERSION_TRANSPORT;
WS_CHANNEL *channel;
WS_ENDPOINT_ADDRESS addr;
WCHAR buf[64];
HRESULT hr;
prop[0].id = WS_CHANNEL_PROPERTY_ENVELOPE_VERSION;
prop[0].value = &env_version;
prop[0].valueSize = sizeof(env_version);
prop[1].id = WS_CHANNEL_PROPERTY_ADDRESSING_VERSION;
prop[1].value = &addr_version;
prop[1].valueSize = sizeof(addr_version);
*ret = NULL;
hr = WsCreateChannel( WS_CHANNEL_TYPE_REQUEST, WS_HTTP_CHANNEL_BINDING, prop, 2, NULL, &channel, NULL );
if (hr != S_OK) return hr;
addr.url.length = wsprintfW( buf, fmt, port );
addr.url.chars = buf;
addr.headers = NULL;
addr.extensions = NULL;
addr.identity = NULL;
hr = WsOpenChannel( channel, &addr, NULL, NULL );
if (hr == S_OK) *ret = channel;
else WsFreeChannel( channel );
return hr;
}
// Main entry point
int __cdecl wmain()
{
HRESULT hr = S_OK;
WS_ERROR* error = NULL;
WS_CHANNEL* channel = NULL;
WS_MESSAGE* requestMessage = NULL;
WS_MESSAGE* replyMessage = NULL;
WS_HEAP* heap = NULL;
static const WS_STRING serviceUrl = WS_STRING_VALUE(L"http://localhost/example");
WS_ENDPOINT_ADDRESS address = {};
// Create an error object for storing rich error information
hr = WsCreateError(
NULL,
0,
&error);
if (FAILED(hr))
{
goto Exit;
}
// Set up a property indicating streamined input and output
WS_TRANSFER_MODE transferMode = WS_STREAMED_TRANSFER_MODE;
WS_CHANNEL_PROPERTY transferModeProperty;
transferModeProperty.id = WS_CHANNEL_PROPERTY_TRANSFER_MODE;
transferModeProperty.value = &transferMode;
transferModeProperty.valueSize = sizeof(transferMode);
// Create a HTTP request channel
hr = WsCreateChannel(
WS_CHANNEL_TYPE_REQUEST,
WS_HTTP_CHANNEL_BINDING,
&transferModeProperty,
1,
NULL,
&channel,
error);
if (FAILED(hr))
{
goto Exit;
}
// Initialize address of service
address.url = serviceUrl;
// Open channel to address
hr = WsOpenChannel(
channel,
&address,
NULL,
error);
if (FAILED(hr))
{
goto Exit;
}
hr = WsCreateMessageForChannel(
channel,
NULL,
0,
&requestMessage,
error);
if (FAILED(hr))
{
goto Exit;
}
hr = WsCreateMessageForChannel(
channel,
NULL,
0,
&replyMessage,
error);
if (FAILED(hr))
{
goto Exit;
}
// Create a heap to store deserialized data
hr = WsCreateHeap(
/*maxSize*/ 2048,
/*trimSize*/ 512,
NULL,
0,
&heap,
error);
if (FAILED(hr))
{
goto Exit;
}
// Send request messages and receive reply messages
for (int i = 0; i < 10; i++)
{
// Initialize message headers of the request message
hr = WsInitializeMessage(
requestMessage,
WS_BLANK_MESSAGE,
NULL,
error);
if (FAILED(hr))
{
goto Exit;
}
// Add the action header to the request message
hr = WsSetHeader(
requestMessage,
WS_ACTION_HEADER,
WS_XML_STRING_TYPE,
WS_WRITE_REQUIRED_VALUE,
PurchaseOrder_wsdl.messages.PurchaseOrder.action,
sizeof(*PurchaseOrder_wsdl.messages.PurchaseOrder.action),
error);
if (FAILED(hr))
{
goto Exit;
}
// Generate a unique message ID that will be used for the request message
WS_UNIQUE_ID messageID;
ZeroMemory(
&messageID,
sizeof(messageID));
DWORD status = UuidCreate(
&messageID.guid);
if (status != RPC_S_OK)
{
hr = E_FAIL;
goto Exit;
}
// Add the message ID to the request message
hr = WsSetHeader(
requestMessage,
WS_MESSAGE_ID_HEADER,
WS_UNIQUE_ID_TYPE,
WS_WRITE_REQUIRED_VALUE,
&messageID,
sizeof(messageID),
error);
if (FAILED(hr))
{
goto Exit;
}
// Send the message headers of the request message
hr = WsWriteMessageStart(
channel,
requestMessage,
NULL,
error);
if (FAILED(hr))
{
goto Exit;
}
// Stream out some purchase orders
for (int j = 0; j < 10; j++)
{
// Initialize body data
_PurchaseOrderType purchaseOrder;
purchaseOrder.quantity = 1;
purchaseOrder.productName = L"Pencil";
// Serialize body data into message
hr = WsWriteBody(
requestMessage,
&PurchaseOrder_wsdl.globalElements.PurchaseOrderType,
WS_WRITE_REQUIRED_VALUE,
&purchaseOrder,
sizeof(purchaseOrder),
error);
if (FAILED(hr))
{
goto Exit;
}
// Send accumulated message data once at least 4096 bytes have been accumulated
hr = WsFlushBody(
requestMessage,
4096,
NULL,
error);
if (FAILED(hr))
{
goto Exit;
}
}
// Send the end of the request message
hr = WsWriteMessageEnd(
channel,
requestMessage,
NULL,
error);
if (FAILED(hr))
{
goto Exit;
}
// Receive the headers of the reply message
hr = WsReadMessageStart(
channel,
replyMessage,
NULL,
error);
if (FAILED(hr))
{
goto Exit;
}
// Stream in all the confirmations
for (;;)
{
// Make sure we have at least once confirmation buffered. Each confirmation
// may be up to 1024 bytes in size.
hr = WsFillBody(
replyMessage,
1024,
NULL,
error);
if (FAILED(hr))
{
goto Exit;
}
// Try to deserialize a confirmation into the heap
_OrderConfirmationType* orderConfirmation;
hr = WsReadBody(
replyMessage,
&PurchaseOrder_wsdl.globalElements.OrderConfirmationType,
WS_READ_OPTIONAL_POINTER,
heap,
&orderConfirmation,
sizeof(orderConfirmation),
error);
if (FAILED(hr))
{
goto Exit;
}
// If there are no more confirmations, break out of the loop
if (orderConfirmation == NULL)
{
break;
}
// Print out confirmation contents
wprintf(L"%s\n",
orderConfirmation->expectedShipDate);
// Reset the heap which frees the confirmation data that was deserialized
hr = WsResetHeap(
heap,
error);
if (FAILED(hr))
{
goto Exit;
}
}
// Receive the end of the reply message
hr = WsReadMessageEnd(
channel,
replyMessage,
NULL,
error);
if (FAILED(hr))
{
goto Exit;
}
// Reset message so it can be used again
hr = WsResetMessage(
replyMessage,
error);
if (FAILED(hr))
{
goto Exit;
}
// Reset message so it can be used again
hr = WsResetMessage(
requestMessage,
error);
if (FAILED(hr))
{
goto Exit;
}
}
Exit:
if (FAILED(hr))
{
// Print out the error
PrintError(hr, error);
}
if (channel != NULL)
{
// Close the channel
WsCloseChannel(channel, NULL, error);
}
if (requestMessage != NULL)
{
WsFreeMessage(requestMessage);
}
if (replyMessage != NULL)
{
WsFreeMessage(replyMessage);
}
if (channel != NULL)
{
WsFreeChannel(channel);
}
if (error != NULL)
{
WsFreeError(error);
}
if (heap != NULL)
{
WsFreeHeap(heap);
}
fflush(stdout);
return SUCCEEDED(hr) ? 0 : -1;
}
// Main entry point
int __cdecl wmain()
{
HRESULT hr = S_OK;
WS_ERROR* error = NULL;
WS_CHANNEL* channel = NULL;
WS_MESSAGE* message = NULL;
HANDLE receiverThreadHandle = NULL;
static const WS_STRING serviceUrl = WS_STRING_VALUE(L"soap.udp://[FF02::C]:809");
static const WS_STRING toUrl = WS_STRING_VALUE(L"http://localhost/request");
ULONG addressFamily = AF_INET6;
ULONG retVal = 0;
IP_ADAPTER_ADDRESSES* adapterAddresses = NULL;
// To get list of adapters GetAdaptersAddresses is called twice - first to get size of the list
// and second to get the actual list. As the number of adapters may change between these two calls
// to GetAdaptersAddresses, we retry up to 4 times.
for (ULONG i = 0; i < 4; i++)
{
// Free memory if it was not big enough
if (adapterAddresses != NULL)
{
HeapFree(GetProcessHeap(), 0, adapterAddresses);
adapterAddresses = NULL;
}
// First see how much space is needed for adapter addresses
ULONG adapterBufferSize = 0;
retVal = GetAdaptersAddresses(addressFamily, 0, NULL, NULL, &adapterBufferSize);
if (retVal != ERROR_BUFFER_OVERFLOW)
{
hr = HRESULT_FROM_WIN32(retVal);
goto Exit;
}
// Allocate space for information about adapters
adapterAddresses = (IP_ADAPTER_ADDRESSES*)HeapAlloc(GetProcessHeap(), 0, adapterBufferSize);
if (adapterAddresses == NULL)
{
hr = E_OUTOFMEMORY;
goto Exit;
}
// Get list of adapters
retVal = GetAdaptersAddresses(
AF_INET6,
0, NULL, adapterAddresses, &adapterBufferSize);
if (retVal != ERROR_BUFFER_OVERFLOW)
{
break;
}
// number of adapter have changed between calls to GetAdaptersAddresses, retry.
}
if (retVal != 0)
{
hr = HRESULT_FROM_WIN32(retVal);
goto Exit;
}
// Create an error object for storing rich error information
hr = WsCreateError(
NULL,
0,
&error);
if (FAILED(hr))
{
goto Exit;
}
WS_IP_VERSION ipVersion = WS_IP_VERSION_6;
WS_CHANNEL_PROPERTY ipVersionProperty;
ipVersionProperty.id = WS_CHANNEL_PROPERTY_IP_VERSION;
ipVersionProperty.value = &ipVersion;
ipVersionProperty.valueSize = sizeof(ipVersion);
// Create a UDP duplex channel for IPv6 addressing
hr = WsCreateChannel(
WS_CHANNEL_TYPE_DUPLEX,
WS_UDP_CHANNEL_BINDING,
&ipVersionProperty,
1,
NULL,
&channel,
error);
if (FAILED(hr))
{
goto Exit;
}
// Initialize address to the multicast address to send to
WS_ENDPOINT_ADDRESS address;
address.url = serviceUrl;
address.headers = NULL;
address.extensions = NULL;
address.identity = NULL;
// Open channel to address
hr = WsOpenChannel(channel, &address, NULL, error);
if (FAILED(hr))
{
goto Exit;
}
// Generate a unique message ID that will be used for all messages
WS_UNIQUE_ID messageID;
ZeroMemory(&messageID, sizeof(messageID));
if (UuidCreate(&messageID.guid) != RPC_S_OK)
{
hr = E_FAIL;
goto Exit;
}
// Create a thread that will receive messages
THREAD_INFO receiverThreadInfo;
receiverThreadInfo.channel = channel;
receiverThreadHandle = CreateThread(NULL, 0, ReceiverThread, &receiverThreadInfo, 0, NULL);
if (receiverThreadHandle == NULL)
{
hr = HRESULT_FROM_WIN32(GetLastError());
goto Exit;
}
hr = WsCreateMessageForChannel(
channel,
NULL,
0,
&message,
error);
if (FAILED(hr))
{
goto Exit;
}
// Initialize body data
_PurchaseOrderType purchaseOrder;
purchaseOrder.quantity = 100;
purchaseOrder.productName = L"Pencil";
// Send the same message twice
for (int i = 0; i < 2; i++)
{
// For each adapter
for (IP_ADAPTER_ADDRESSES* adapterAddress = adapterAddresses;
adapterAddress != NULL; adapterAddress = adapterAddress->Next)
{
// Only send on the loopback adapter
if (adapterAddress->IfType != IF_TYPE_SOFTWARE_LOOPBACK)
{
continue;
}
// Get multicast interface index
ULONG interfaceIndex = adapterAddress->Ipv6IfIndex;
// Set property on channel which controls which multicast adapater address
// is used when sending to a multicast address.
hr = WsSetChannelProperty(channel, WS_CHANNEL_PROPERTY_MULTICAST_INTERFACE,
&interfaceIndex, sizeof(interfaceIndex), error);
if (FAILED(hr))
{
goto Exit;
}
// Initialize message headers
hr = WsInitializeMessage(message, WS_BLANK_MESSAGE, NULL, error);
if (FAILED(hr))
{
goto Exit;
}
// Add the action header
hr = WsSetHeader(
message,
WS_ACTION_HEADER,
WS_XML_STRING_TYPE,
WS_WRITE_REQUIRED_VALUE,
PurchaseOrder_wsdl.messages.PurchaseOrder.action,
sizeof(*PurchaseOrder_wsdl.messages.PurchaseOrder.action),
error);
if (FAILED(hr))
{
goto Exit;
}
// Add the message ID
hr = WsSetHeader(
message,
WS_MESSAGE_ID_HEADER,
WS_UNIQUE_ID_TYPE,
WS_WRITE_REQUIRED_VALUE,
&messageID,
sizeof(messageID),
error);
if (FAILED(hr))
{
goto Exit;
}
// Set the reply to address to be a anonymous URI (modeled as a 0 length URI), which
// indicates to the receiver that they should reply using the source IP address.
WS_ENDPOINT_ADDRESS replyTo;
ZeroMemory(&replyTo, sizeof(replyTo));
hr = WsSetHeader(
message,
WS_REPLY_TO_HEADER,
WS_ENDPOINT_ADDRESS_TYPE,
WS_WRITE_REQUIRED_VALUE,
&replyTo,
sizeof(replyTo),
error);
if (FAILED(hr))
{
goto Exit;
}
// Address the message to differ from the destination. When the message
// is addressed manually, the endpoint address specified at open time
// will only be used to determine the destination of the message (not
// to determine the value of the To header). In this case, the message is
// addressed to a stable address.
WS_ENDPOINT_ADDRESS to;
ZeroMemory(&to, sizeof(to));
to.url = toUrl;
hr = WsAddressMessage(message, &to, error);
if (FAILED(hr))
{
goto Exit;
}
// Write the message headers
hr = WsWriteMessageStart(channel, message, NULL, error);
if (FAILED(hr))
{
goto Exit;
}
// Write the body data
hr = WsWriteBody(
message,
&PurchaseOrder_wsdl.globalElements.PurchaseOrderType,
WS_WRITE_REQUIRED_VALUE,
&purchaseOrder,
sizeof(purchaseOrder),
error);
if (FAILED(hr))
{
goto Exit;
}
// Send the entire message
hr = WsWriteMessageEnd(channel, message, NULL, error);
if (FAILED(hr))
{
goto Exit;
}
// Reset message so it can used again
hr = WsResetMessage(message, error);
if (FAILED(hr))
{
goto Exit;
}
}
}
// Wait for replies to be processed by the receiver thread
Sleep(1000);
Exit:
if (FAILED(hr))
{
// Print out the error
PrintError(hr, error);
}
if (receiverThreadHandle != NULL)
{
// Abort the channel. This will cause the next receive to fail.
WsAbortChannel(channel, error);
// Wait for the receive thread to exit, and clean up the handle.
WaitForSingleObject(receiverThreadHandle, INFINITE);
CloseHandle(receiverThreadHandle);
}
if (channel != NULL)
{
// Close the channel
WsCloseChannel(channel, NULL, error);
}
if (message != NULL)
{
WsFreeMessage(message);
}
if (channel != NULL)
{
WsFreeChannel(channel);
}
if (error != NULL)
{
WsFreeError(error);
}
if (adapterAddresses != NULL)
{
HeapFree(GetProcessHeap(), 0, adapterAddresses);
}
fflush(stdout);
return SUCCEEDED(hr) ? 0 : -1;
}
// Main entry point
int __cdecl wmain()
{
HRESULT hr = S_OK;
WS_ERROR* error = NULL;
WS_CHANNEL* channel = NULL;
WS_MESSAGE* requestMessage = NULL;
WS_MESSAGE* replyMessage = NULL;
WS_HEAP* heap = NULL;
WS_ENDPOINT_ADDRESS address;
static const WS_STRING serviceUrl = WS_STRING_VALUE(L"http://localhost/example");
// Create an error object for storing rich error information
hr = WsCreateError(
NULL,
0,
&error);
if (FAILED(hr))
{
goto Exit;
}
// Create a heap to store deserialized data
hr = WsCreateHeap(
/*maxSize*/ 2048,
/*trimSize*/ 512,
NULL,
0,
&heap,
error);
if (FAILED(hr))
{
goto Exit;
}
// Create a channel
hr = WsCreateChannel(
WS_CHANNEL_TYPE_REQUEST,
WS_HTTP_CHANNEL_BINDING,
NULL,
0,
NULL,
&channel,
error);
if (FAILED(hr))
{
goto Exit;
}
hr = WsCreateMessageForChannel(
channel,
NULL,
0,
&requestMessage,
error);
if (FAILED(hr))
{
goto Exit;
}
hr = WsCreateMessageForChannel(
channel,
NULL,
0,
&replyMessage,
error);
if (FAILED(hr))
{
goto Exit;
}
// Initialize address of service
address.url = serviceUrl;
address.headers = NULL;
address.extensions = NULL;
address.identity = NULL;
// Open channel to address
hr = WsOpenChannel(channel, &address, NULL, error);
if (FAILED(hr))
{
goto Exit;
}
// Send some request-replies
for (int i = 0; i < 100; i++)
{
// Initialize purchase order
_PurchaseOrderType purchaseOrder;
purchaseOrder.quantity = 100;
purchaseOrder.productName = L"Pencil";
_OrderConfirmationType orderConfirmation;
// Send purchase order, get order confirmation
hr = WsRequestReply(
channel,
requestMessage,
&PurchaseOrder_wsdl.messages.PurchaseOrder,
WS_WRITE_REQUIRED_VALUE,
&purchaseOrder,
sizeof(purchaseOrder),
replyMessage,
&PurchaseOrder_wsdl.messages.OrderConfirmation,
WS_READ_REQUIRED_VALUE,
heap,
&orderConfirmation,
sizeof(orderConfirmation),
NULL,
error);
if (FAILED(hr))
{
goto Exit;
}
// Print out confirmation contents
wprintf(L"Expected ship date for order %lu is %s\n",
orderConfirmation.orderID,
orderConfirmation.expectedShipDate);
// Reset the message so it can be used again
hr = WsResetMessage(requestMessage, error);
if (FAILED(hr))
{
goto Exit;
}
// Reset the message so it can be used again
hr = WsResetMessage(replyMessage, error);
if (FAILED(hr))
{
goto Exit;
}
// Initialize request for order status
_GetOrderStatusType getOrderStatus;
getOrderStatus.orderID = orderConfirmation.orderID;
_GetOrderStatusResponseType getOrderStatusResponse;
// Send order status request, get order status reply
hr = WsRequestReply(
channel,
requestMessage,
&PurchaseOrder_wsdl.messages.GetOrderStatus,
WS_WRITE_REQUIRED_VALUE,
&getOrderStatus,
sizeof(getOrderStatus),
replyMessage,
&PurchaseOrder_wsdl.messages.GetOrderStatusResponse,
WS_READ_REQUIRED_VALUE,
heap,
&getOrderStatusResponse,
sizeof(getOrderStatusResponse),
NULL,
error);
if (FAILED(hr))
{
goto Exit;
}
// Print out order status
wprintf(L"Order status for order %lu is: %s\n",
getOrderStatusResponse.orderID,
getOrderStatusResponse.status);
// Reset the message so it can be used again
hr = WsResetMessage(requestMessage, error);
if (FAILED(hr))
{
goto Exit;
}
// Reset the message so it can be used again
hr = WsResetMessage(replyMessage, error);
if (FAILED(hr))
{
goto Exit;
}
// Make same request, but this time with an invalid order ID
getOrderStatus.orderID = 321;
hr = WsRequestReply(
channel,
requestMessage,
&PurchaseOrder_wsdl.messages.GetOrderStatus,
WS_WRITE_REQUIRED_VALUE,
&getOrderStatus,
sizeof(getOrderStatus),
replyMessage,
&PurchaseOrder_wsdl.messages.GetOrderStatusResponse,
WS_READ_REQUIRED_VALUE,
heap,
&getOrderStatusResponse,
sizeof(getOrderStatusResponse),
NULL,
error);
// Check to see if we got a fault
if (hr == WS_E_ENDPOINT_FAULT_RECEIVED)
{
// Print the strings in the error object
PrintError(hr, error);
static const WS_XML_STRING _faultDetailName = WS_XML_STRING_VALUE("OrderNotFound");
static const WS_XML_STRING _faultDetailNs = WS_XML_STRING_VALUE("http://example.com");
static const WS_XML_STRING _faultAction = WS_XML_STRING_VALUE("http://example.com/fault");
static const WS_ELEMENT_DESCRIPTION _faultElementDescription =
{
(WS_XML_STRING*)&_faultDetailName,
(WS_XML_STRING*)&_faultDetailNs,
WS_UINT32_TYPE,
NULL
};
static const WS_FAULT_DETAIL_DESCRIPTION orderNotFoundFaultTypeDescription =
{
(WS_XML_STRING*)&_faultAction,
(WS_ELEMENT_DESCRIPTION*)&_faultElementDescription
};
// Try to get the fault detail from the error object
_OrderNotFoundFaultType* orderNotFound;
hr = WsGetFaultErrorDetail(
error,
&orderNotFoundFaultTypeDescription,
WS_READ_OPTIONAL_POINTER,
heap,
&orderNotFound,
sizeof(orderNotFound));
if (FAILED(hr))
{
goto Exit;
}
if (orderNotFound != NULL)
{
// Print out the fault detail
wprintf(L"Order %lu was not found\n", orderNotFound->orderID);
}
// Reset error so it can be used again
hr = WsResetError(error);
if (FAILED(hr))
{
goto Exit;
}
}
if (FAILED(hr))
{
goto Exit;
}
// Reset the message so it can be used again
hr = WsResetMessage(requestMessage, error);
if (FAILED(hr))
{
goto Exit;
}
// Reset the message so it can be used again
hr = WsResetMessage(replyMessage, error);
if (FAILED(hr))
{
goto Exit;
}
wprintf(L"\n");
// Reset the heap
hr = WsResetHeap(heap, error);
if (FAILED(hr))
{
goto Exit;
}
}
Exit:
if (FAILED(hr))
{
// Print out the error
PrintError(hr, error);
}
if (channel != NULL)
{
// Close the channel
WsCloseChannel(channel, NULL, error);
}
if (requestMessage != NULL)
{
WsFreeMessage(requestMessage);
}
if (replyMessage != NULL)
{
WsFreeMessage(replyMessage);
}
if (channel != NULL)
{
WsFreeChannel(channel);
}
if (error != NULL)
{
WsFreeError(error);
}
if (heap != NULL)
{
WsFreeHeap(heap);
}
fflush(stdout);
return SUCCEEDED(hr) ? 0 : -1;
}
// Messages are sent from this thread to the relay thread
DWORD WINAPI SenderThread(void* parameter)
{
UNREFERENCED_PARAMETER(parameter);
HRESULT hr;
WS_ERROR* error = NULL;
WS_CHANNEL* sendChannel = NULL;
WS_MESSAGE* sendMessage = NULL;
// Create an error object for storing rich error information
hr = WsCreateError(
NULL,
0,
&error);
if (FAILED(hr))
{
goto Exit;
}
// Create a TCP duplex session channel
hr = WsCreateChannel(WS_CHANNEL_TYPE_DUPLEX_SESSION,
WS_TCP_CHANNEL_BINDING, NULL, 0, NULL, &sendChannel, error);
if (FAILED(hr))
{
goto Exit;
}
// Initialize address of service
WS_ENDPOINT_ADDRESS address;
address.url = relayUrl;
address.headers = NULL;
address.extensions = NULL;
address.identity = NULL;
// Open channel to address
hr = WsOpenChannel(sendChannel, &address, NULL, error);
if (FAILED(hr))
{
goto Exit;
}
hr = WsCreateMessageForChannel(
sendChannel,
NULL,
0,
&sendMessage,
error);
if (FAILED(hr))
{
goto Exit;
}
// Send some messages
for (ULONG i = 0; i < 100; i++)
{
// Initialize send message
hr = WsInitializeMessage(sendMessage, WS_BLANK_MESSAGE, NULL, error);
if (FAILED(hr))
{
goto Exit;
}
// Add the action header
hr = WsSetHeader(
sendMessage,
WS_ACTION_HEADER,
WS_XML_STRING_TYPE,
WS_WRITE_REQUIRED_VALUE,
PurchaseOrder_wsdl.messages.PurchaseOrder.action,
sizeof(*PurchaseOrder_wsdl.messages.PurchaseOrder.action),
error);
if (FAILED(hr))
{
goto Exit;
}
// Send message start
hr = WsWriteMessageStart(sendChannel, sendMessage, NULL, error);
if (FAILED(hr))
{
goto Exit;
}
// Initialize purchase order
_PurchaseOrderType purchaseOrderToWrite;
purchaseOrderToWrite.quantity = 100;
purchaseOrderToWrite.productName = L"Pencil";
// Write purchase order as the body of the message
hr = WsWriteBody(
sendMessage,
&PurchaseOrder_wsdl.globalElements.PurchaseOrderType,
WS_WRITE_REQUIRED_VALUE,
&purchaseOrderToWrite,
sizeof(purchaseOrderToWrite),
error);
if (FAILED(hr))
{
goto Exit;
}
// Send message end
hr = WsWriteMessageEnd(sendChannel, sendMessage, NULL, error);
if (FAILED(hr))
{
goto Exit;
}
// Reset message to enable reuse
hr = WsResetMessage(sendMessage, error);
if (FAILED(hr))
{
goto Exit;
}
}
Exit:
if (FAILED(hr))
{
// Print out the error
PrintError(hr, error);
}
fflush(
stdout);
if (sendChannel != NULL)
{
// Close the channel
WsCloseChannel(sendChannel, NULL, error);
}
if (sendMessage != NULL)
{
WsFreeMessage(sendMessage);
}
if (sendChannel != NULL)
{
WsFreeChannel(sendChannel);
}
if (error != NULL)
{
WsFreeError(error);
}
return 1;
}
// Messages are relayed from the sender thread to the receiver thread by this thread
DWORD WINAPI RelayThread(void* parameter)
{
HRESULT hr;
THREADINFO* threadInfo = (THREADINFO*)parameter;
HANDLE relayReadyEvent = threadInfo->event;
WS_ERROR* error = NULL;
WS_CHANNEL* sendChannel = NULL;
WS_CHANNEL* receiveChannel = NULL;
WS_MESSAGE* sendMessage = NULL;
WS_MESSAGE* receiveMessage = NULL;
WS_LISTENER* listener = NULL;
// Create an error object for storing rich error information
hr = WsCreateError(
NULL,
0,
&error);
if (FAILED(hr))
{
goto Exit;
}
// Create a listener
hr = WsCreateListener(WS_CHANNEL_TYPE_DUPLEX_SESSION, WS_TCP_CHANNEL_BINDING, NULL, 0, NULL, &listener, error);
if (FAILED(hr))
{
goto Exit;
}
// Open listener using TCP duplex session
hr = WsOpenListener(listener, &relayUrl, NULL, error);
if (FAILED(hr))
{
goto Exit;
}
// Create a TCP duplex session channel
hr = WsCreateChannel(WS_CHANNEL_TYPE_DUPLEX_SESSION,
WS_TCP_CHANNEL_BINDING, NULL, 0, NULL, &sendChannel, error);
if (FAILED(hr))
{
goto Exit;
}
// Initialize address of service
WS_ENDPOINT_ADDRESS address;
address.url = serviceUrl;
address.headers = NULL;
address.extensions = NULL;
address.identity = NULL;
// Open channel to address
hr = WsOpenChannel(sendChannel, &address, NULL, error);
if (FAILED(hr))
{
goto Exit;
}
// Create a channel
hr = WsCreateChannelForListener(listener, NULL, 0, &receiveChannel, error);
if (FAILED(hr))
{
goto Exit;
}
// Notify that thread is ready
threadInfo->hr = NOERROR;
SetEvent(relayReadyEvent);
// Accept a channel from the client
hr = WsAcceptChannel(listener, receiveChannel, NULL, error);
if (FAILED(hr))
{
goto Exit;
}
hr = WsCreateMessageForChannel(
receiveChannel,
NULL,
0,
&receiveMessage,
error);
if (FAILED(hr))
{
goto Exit;
}
hr = WsCreateMessageForChannel(
sendChannel,
NULL,
0,
&sendMessage,
error);
if (FAILED(hr))
{
goto Exit;
}
// Forward all messages
for (;;)
{
// Receive start of message (headers)
hr = WsReadMessageStart(receiveChannel, receiveMessage, NULL, error);
if (FAILED(hr))
{
goto Exit;
}
if (hr == WS_S_END)
{
// No more messages on this channel
break;
}
// Copy headers from received message
hr = WsInitializeMessage(sendMessage, WS_DUPLICATE_MESSAGE, receiveMessage, error);
if (FAILED(hr))
{
goto Exit;
}
// Send message start (headers)
hr = WsWriteMessageStart(sendChannel, sendMessage, NULL, error);
if (FAILED(hr))
{
goto Exit;
}
// Get reader for receive message
WS_XML_READER* xmlReader;
hr = WsGetMessageProperty(receiveMessage, WS_MESSAGE_PROPERTY_BODY_READER, &xmlReader, sizeof(xmlReader), error);
if (FAILED(hr))
{
goto Exit;
}
// Get writer for send message
WS_XML_WRITER* xmlWriter;
hr = WsGetMessageProperty(sendMessage, WS_MESSAGE_PROPERTY_BODY_WRITER, &xmlWriter, sizeof(xmlWriter), error);
if (FAILED(hr))
{
goto Exit;
}
// Read and write contents of body
for (;;)
{
const WS_XML_NODE* node;
hr = WsGetReaderNode(xmlReader, &node, error);
if (FAILED(hr))
{
goto Exit;
}
if (node->nodeType == WS_XML_NODE_TYPE_END_ELEMENT)
{
break;
}
hr = WsCopyNode(xmlWriter, xmlReader, error);
if (FAILED(hr))
{
goto Exit;
}
}
// Receive message end
hr = WsReadMessageEnd(receiveChannel, receiveMessage, NULL, error);
if (FAILED(hr))
{
goto Exit;
}
// Send message end
hr = WsWriteMessageEnd(sendChannel, sendMessage, NULL, error);
if (FAILED(hr))
{
goto Exit;
}
// Reset message to enable reuse
hr = WsResetMessage(sendMessage, error);
if (FAILED(hr))
{
goto Exit;
}
// Reset message to enable reuse
hr = WsResetMessage(receiveMessage, error);
if (FAILED(hr))
{
goto Exit;
}
}
Exit:
if (FAILED(hr))
{
// Print out the error
PrintError(hr, error);
}
fflush(
stdout);
if (sendChannel != NULL)
{
// Close the channel
WsCloseChannel(sendChannel, NULL, error);
}
if (sendChannel != NULL)
{
WsFreeChannel(sendChannel);
}
if (receiveChannel != NULL)
{
// Close the channel
WsCloseChannel(receiveChannel, NULL, error);
}
if (receiveChannel != NULL)
{
WsFreeChannel(receiveChannel);
}
if (listener != NULL)
{
// Close the listener if it was opened
WsCloseListener(listener, NULL, error);
}
if (listener != NULL)
{
WsFreeListener(listener);
}
if (receiveMessage != NULL)
{
WsFreeMessage(receiveMessage);
}
if (sendMessage != NULL)
{
WsFreeMessage(sendMessage);
}
if (error != NULL)
{
WsFreeError(error);
}
if (FAILED(hr))
{
// Notify that thread is ready
threadInfo->hr = hr;
SetEvent(relayReadyEvent);
}
return 1;
}
// Main entry point
int __cdecl wmain()
{
HRESULT hr = S_OK;
WS_ERROR* error = NULL;
WS_CHANNEL* channel = NULL;
WS_MESSAGE* message = NULL;
static const WS_STRING serviceUrl = WS_STRING_VALUE(L"soap.udp://localhost:809");
// Create an error object for storing rich error information
hr = WsCreateError(
NULL,
0,
&error);
if (FAILED(hr))
{
goto Exit;
}
// Create a UDP duplex channel
hr = WsCreateChannel(
WS_CHANNEL_TYPE_DUPLEX,
WS_UDP_CHANNEL_BINDING,
NULL,
0,
NULL,
&channel,
error);
if (FAILED(hr))
{
goto Exit;
}
// Initialize address of service
WS_ENDPOINT_ADDRESS address;
address.url = serviceUrl;
address.headers = NULL;
address.extensions = NULL;
address.identity = NULL;
// Open channel to address
hr = WsOpenChannel(channel, &address, NULL, error);
if (FAILED(hr))
{
goto Exit;
}
hr = WsCreateMessageForChannel(
channel,
NULL,
0,
&message,
error);
if (FAILED(hr))
{
goto Exit;
}
// Send some messages
for (int i = 0; i < 5; i++)
{
// Initialize body data
_PurchaseOrderType purchaseOrder;
purchaseOrder.quantity = 100;
purchaseOrder.productName = L"Pencil";
// Send a message
hr = WsSendMessage(
channel,
message,
&PurchaseOrder_wsdl.messages.PurchaseOrder,
WS_WRITE_REQUIRED_VALUE,
&purchaseOrder,
sizeof(purchaseOrder),
NULL,
error);
if (FAILED(hr))
{
goto Exit;
}
// Reset message so it can be used again
hr = WsResetMessage(message, error);
if (FAILED(hr))
{
goto Exit;
}
}
Exit:
if (FAILED(hr))
{
// Print out the error
PrintError(hr, error);
}
if (channel != NULL)
{
// Close the channel
WsCloseChannel(channel, NULL, error);
}
if (message != NULL)
{
WsFreeMessage(message);
}
if (channel != NULL)
{
WsFreeChannel(channel);
}
if (error != NULL)
{
WsFreeError(error);
}
fflush(stdout);
return SUCCEEDED(hr) ? 0 : -1;
}
// Main entry point
int __cdecl wmain()
{
HRESULT hr = S_OK;
WS_ERROR* error = NULL;
WS_CHANNEL* channel = NULL;
WS_MESSAGE* requestMessage = NULL;
WS_MESSAGE* replyMessage = NULL;
WS_HEAP* heap = NULL;
// declare and initialize a windows credential
WS_DEFAULT_WINDOWS_INTEGRATED_AUTH_CREDENTIAL windowsCredential = {}; // zero out the struct
windowsCredential.credential.credentialType = WS_DEFAULT_WINDOWS_INTEGRATED_AUTH_CREDENTIAL_TYPE; // set the credential type
ULONG impersonation = SecurityImpersonation;
// declare and initialize properties to change the impersonation level from the default
WS_SECURITY_BINDING_PROPERTY tcpSspiBindingProperties[1] =
{
{ WS_SECURITY_BINDING_PROPERTY_ALLOWED_IMPERSONATION_LEVEL, &impersonation, sizeof(impersonation) }
};
// declare and initialize an Windows SSPI transport security binding
WS_TCP_SSPI_TRANSPORT_SECURITY_BINDING tcpSspiBinding = {}; // zero out the struct
tcpSspiBinding.binding.bindingType = WS_TCP_SSPI_TRANSPORT_SECURITY_BINDING_TYPE; // set the binding type
tcpSspiBinding.binding.properties = tcpSspiBindingProperties;
tcpSspiBinding.binding.propertyCount = WsCountOf(tcpSspiBindingProperties);
tcpSspiBinding.clientCredential = &windowsCredential.credential;
// declare and initialize the array of all security bindings
WS_SECURITY_BINDING* securityBindings[1] = { &tcpSspiBinding.binding };
// declare and initialize the security description
WS_SECURITY_DESCRIPTION securityDescription = {}; // zero out the struct
securityDescription.securityBindings = securityBindings;
securityDescription.securityBindingCount = WsCountOf(securityBindings);
// Create an error object for storing rich error information
hr = WsCreateError(
NULL,
0,
&error);
if (FAILED(hr))
{
goto Exit;
}
// Create a heap to store deserialized data
hr = WsCreateHeap(
/*maxSize*/ 2048,
/*trimSize*/ 512,
NULL,
0,
&heap,
error);
if (FAILED(hr))
{
goto Exit;
}
// Create a TCP duplex session channel
hr = WsCreateChannel(
WS_CHANNEL_TYPE_DUPLEX_SESSION,
WS_TCP_CHANNEL_BINDING,
NULL,
0,
&securityDescription,
&channel,
error);
if (FAILED(hr))
{
goto Exit;
}
// Initialize address of service
WS_ENDPOINT_ADDRESS address;
address.url.chars = L"net.tcp://localhost/example";
address.url.length = (ULONG)::wcslen(address.url.chars);
address.headers = NULL;
address.extensions = NULL;
address.identity = NULL;
// Open channel to address
hr = WsOpenChannel(
channel,
&address,
NULL,
error);
if (FAILED(hr))
{
goto Exit;
}
hr = WsCreateMessageForChannel(
channel,
NULL,
0,
&requestMessage,
error);
if (FAILED(hr))
{
goto Exit;
}
hr = WsCreateMessageForChannel(
channel,
NULL,
0,
&replyMessage,
error);
if (FAILED(hr))
{
goto Exit;
}
// Send some request-replies
for (int i = 0; i < 100; i++)
{
// Initialize purchase order
_PurchaseOrderType purchaseOrder;
purchaseOrder.quantity = 100;
purchaseOrder.productName = L"Pencil";
_OrderConfirmationType orderConfirmation;
// Send purchase order, get order confirmation
hr = WsRequestReply(
channel,
requestMessage,
&PurchaseOrder_wsdl.messages.PurchaseOrder,
WS_WRITE_REQUIRED_VALUE,
&purchaseOrder,
sizeof(purchaseOrder),
replyMessage,
&PurchaseOrder_wsdl.messages.OrderConfirmation,
WS_READ_REQUIRED_VALUE,
heap,
&orderConfirmation,
sizeof(orderConfirmation),
NULL,
error);
if (FAILED(hr))
{
goto Exit;
}
// Print out confirmation contents
wprintf(L"Expected ship date for order %lu is %s\n",
orderConfirmation.orderID,
orderConfirmation.expectedShipDate);
// Reset the message so it can be used again
hr = WsResetMessage(requestMessage, error);
if (FAILED(hr))
{
goto Exit;
}
// Reset the message so it can be used again
hr = WsResetMessage(replyMessage, error);
if (FAILED(hr))
{
goto Exit;
}
// Initialize request for order status
_GetOrderStatusType getOrderStatus;
getOrderStatus.orderID = orderConfirmation.orderID;
_GetOrderStatusResponseType getOrderStatusResponse;
// Send order status request, get order status reply
hr = WsRequestReply(
channel,
requestMessage,
&PurchaseOrder_wsdl.messages.GetOrderStatus,
WS_WRITE_REQUIRED_VALUE,
&getOrderStatus,
sizeof(getOrderStatus),
replyMessage,
&PurchaseOrder_wsdl.messages.GetOrderStatusResponse,
WS_READ_REQUIRED_VALUE,
heap,
&getOrderStatusResponse,
sizeof(getOrderStatusResponse),
NULL,
error);
if (FAILED(hr))
{
goto Exit;
}
// Print out order status
wprintf(L"Order status for order %lu is: %s\n",
getOrderStatusResponse.orderID,
getOrderStatusResponse.status);
// Reset the message so it can be used again
hr = WsResetMessage(requestMessage, error);
if (FAILED(hr))
{
goto Exit;
}
// Reset the message so it can be used again
hr = WsResetMessage(replyMessage, error);
if (FAILED(hr))
{
goto Exit;
}
// Make same request, but this time with an invalid order ID
getOrderStatus.orderID = 321;
hr = WsRequestReply(
channel,
requestMessage,
&PurchaseOrder_wsdl.messages.GetOrderStatus,
WS_WRITE_REQUIRED_VALUE,
&getOrderStatus,
sizeof(getOrderStatus),
replyMessage,
&PurchaseOrder_wsdl.messages.GetOrderStatusResponse,
WS_READ_REQUIRED_VALUE,
heap,
&getOrderStatusResponse,
sizeof(getOrderStatusResponse),
NULL,
error);
// Check to see if we got a fault
if (hr == WS_E_ENDPOINT_FAULT_RECEIVED)
{
// Print the strings in the error object
PrintError(hr, error);
static const WS_XML_STRING _faultDetailName = WS_XML_STRING_VALUE("OrderNotFound");
static const WS_XML_STRING _faultDetailNs = WS_XML_STRING_VALUE("http://example.com");
static const WS_XML_STRING _faultAction = WS_XML_STRING_VALUE("http://example.com/fault");
static const WS_ELEMENT_DESCRIPTION _faultElementDescription =
{
(WS_XML_STRING*)&_faultDetailName,
(WS_XML_STRING*)&_faultDetailNs,
WS_UINT32_TYPE,
NULL
};
static const WS_FAULT_DETAIL_DESCRIPTION orderNotFoundFaultTypeDescription =
{
(WS_XML_STRING*)&_faultAction,
(WS_ELEMENT_DESCRIPTION*)&_faultElementDescription
};
// Try to get the fault detail from the error object
_OrderNotFoundFaultType* orderNotFound;
hr = WsGetFaultErrorDetail(
error,
&orderNotFoundFaultTypeDescription,
WS_READ_OPTIONAL_POINTER,
heap,
&orderNotFound,
sizeof(orderNotFound));
if (FAILED(hr))
{
goto Exit;
}
if (orderNotFound != NULL)
{
// Print out the fault detail
wprintf(L"Order %lu was not found\n", orderNotFound->orderID);
}
// Reset error so it can be used again
hr = WsResetError(error);
if (FAILED(hr))
{
goto Exit;
}
}
if (FAILED(hr))
{
goto Exit;
}
// Reset the message so it can be used again
hr = WsResetMessage(requestMessage, error);
if (FAILED(hr))
{
goto Exit;
}
// Reset the message so it can be used again
hr = WsResetMessage(replyMessage, error);
if (FAILED(hr))
{
goto Exit;
}
wprintf(L"\n");
// Reset the heap
hr = WsResetHeap(heap, error);
if (FAILED(hr))
{
goto Exit;
}
}
Exit:
if (FAILED(hr))
{
// Print out the error
PrintError(hr, error);
}
if (channel != NULL)
{
// Close the channel
WsCloseChannel(channel, NULL, error);
}
if (requestMessage != NULL)
{
WsFreeMessage(requestMessage);
}
if (replyMessage != NULL)
{
WsFreeMessage(replyMessage);
}
if (channel != NULL)
{
WsFreeChannel(channel);
}
if (error != NULL)
{
WsFreeError(error);
}
if (heap != NULL)
{
WsFreeHeap(heap);
}
fflush(stdout);
return SUCCEEDED(hr) ? 0 : -1;
}