dlls/webservices/listener.c

   1 /*
   2  * Copyright 2017 Hans Leidekker for CodeWeavers
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Lesser General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2.1 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Lesser General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Lesser General Public
  15  * License along with this library; if not, write to the Free Software
  16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  17  */
  18
  19 #include <stdarg.h>
  20
  21 #include "windef.h"
  22 #include "winbase.h"
  23 #include "webservices.h"
  24
  25 #include "wine/debug.h"
  26 #include "wine/heap.h"
  27 #include "wine/list.h"
  28 #include "wine/unicode.h"
  29 #include "webservices_private.h"
  30 #include "sock.h"
  31
  32 WINE_DEFAULT_DEBUG_CHANNEL(webservices);
  33
  34 HINSTANCE webservices_instance;
  35
  36 static BOOL winsock_loaded;
  37
  38 static BOOL WINAPI winsock_startup( INIT_ONCE *once, void *param, void **ctx )
  39 {
  40     int ret;
  41     WSADATA data;
  42     if (!(ret = WSAStartup( MAKEWORD(1,1), &data ))) winsock_loaded = TRUE;
  43     else ERR( "WSAStartup failed: %d\n", ret );
  44     return TRUE;
  45 }
  46
  47 void winsock_init(void)
  48 {
  49     static INIT_ONCE once = INIT_ONCE_STATIC_INIT;
  50     InitOnceExecuteOnce( &once, winsock_startup, NULL, NULL );
  51 }
  52
  53 /******************************************************************
  54  *      DllMain (webservices.@)
  55  */
  56 BOOL WINAPI DllMain( HINSTANCE hinst, DWORD reason, void *reserved )
  57 {
  58     switch (reason)
  59     {
  60     case DLL_PROCESS_ATTACH:
  61         webservices_instance = hinst;
  62         DisableThreadLibraryCalls( hinst );
  63         break;
  64
  65     case DLL_PROCESS_DETACH:
  66         if (reserved) break;
  67         if (winsock_loaded) WSACleanup();
  68         break;
  69     }
  70     return TRUE;
  71 }
  72
  73 static const struct prop_desc listener_props[] =
  74 {
  75     { sizeof(ULONG), FALSE },                               /* WS_LISTENER_PROPERTY_LISTEN_BACKLOG */
  76     { sizeof(WS_IP_VERSION), FALSE },                       /* WS_LISTENER_PROPERTY_IP_VERSION */
  77     { sizeof(WS_LISTENER_STATE), TRUE },                    /* WS_LISTENER_PROPERTY_STATE */
  78     { sizeof(WS_CALLBACK_MODEL), FALSE },                   /* WS_LISTENER_PROPERTY_ASYNC_CALLBACK_MODEL */
  79     { sizeof(WS_CHANNEL_TYPE), TRUE },                      /* WS_LISTENER_PROPERTY_CHANNEL_TYPE */
  80     { sizeof(WS_CHANNEL_BINDING), TRUE },                   /* WS_LISTENER_PROPERTY_CHANNEL_BINDING */
  81     { sizeof(ULONG), FALSE },                               /* WS_LISTENER_PROPERTY_CONNECT_TIMEOUT */
  82     { sizeof(BOOL), FALSE },                                /* WS_LISTENER_PROPERTY_IS_MULTICAST */
  83     { 0, FALSE },                                           /* WS_LISTENER_PROPERTY_MULTICAST_INTERFACES */
  84     { sizeof(BOOL), FALSE },                                /* WS_LISTENER_PROPERTY_MULTICAST_LOOPBACK */
  85     { sizeof(ULONG), FALSE },                               /* WS_LISTENER_PROPERTY_CLOSE_TIMEOUT */
  86     { sizeof(ULONG), FALSE },                               /* WS_LISTENER_PROPERTY_TO_HEADER_MATCHING_OPTIONS */
  87     { sizeof(ULONG), FALSE },                               /* WS_LISTENER_PROPERTY_TRANSPORT_URL_MATCHING_OPTIONS */
  88     { sizeof(WS_CUSTOM_LISTENER_CALLBACKS), FALSE },        /* WS_LISTENER_PROPERTY_CUSTOM_LISTENER_CALLBACKS */
  89     { 0, FALSE },                                           /* WS_LISTENER_PROPERTY_CUSTOM_LISTENER_PARAMETERS */
  90     { sizeof(void *), TRUE },                               /* WS_LISTENER_PROPERTY_CUSTOM_LISTENER_INSTANCE */
  91     { sizeof(WS_DISALLOWED_USER_AGENT_SUBSTRINGS), FALSE }  /* WS_LISTENER_PROPERTY_DISALLOWED_USER_AGENT */
  92 };
  93
  94 struct listener
  95 {
  96     ULONG                   magic;
  97     CRITICAL_SECTION        cs;
  98     WS_CHANNEL_TYPE         type;
  99     WS_CHANNEL_BINDING      binding;
 100     WS_LISTENER_STATE       state;
 101     HANDLE                  wait;
 102     HANDLE                  cancel;
 103     WS_CHANNEL             *channel;
 104     union
 105     {
 106         struct
 107         {
 108             SOCKET socket;
 109         } tcp;
 110         struct
 111         {
 112             SOCKET socket;
 113         } udp;
 114     } u;
 115     ULONG                   prop_count;
 116     struct prop             prop[ARRAY_SIZE( listener_props )];
 117 };
 118
 119 #define LISTENER_MAGIC (('L' << 24) | ('I' << 16) | ('S' << 8) | 'T')
 120
 121 static struct listener *alloc_listener(void)
 122 {
 123     static const ULONG count = ARRAY_SIZE( listener_props );
 124     struct listener *ret;
 125     ULONG size = sizeof(*ret) + prop_size( listener_props, count );
 126
 127     if (!(ret = heap_alloc_zero( size ))) return NULL;
 128
 129     ret->magic = LISTENER_MAGIC;
 130     if (!(ret->wait = CreateEventW( NULL, FALSE, FALSE, NULL )))
 131     {
 132         heap_free( ret );
 133         return NULL;
 134     }
 135     if (!(ret->cancel = CreateEventW( NULL, FALSE, FALSE, NULL )))
 136     {
 137         CloseHandle( ret->wait );
 138         heap_free( ret );
 139         return NULL;
 140     }
 141     InitializeCriticalSection( &ret->cs );
 142 #ifndef __MINGW32__
 143     ret->cs.DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": listener.cs");
 144 #endif
 145
 146     prop_init( listener_props, count, ret->prop, &ret[1] );
 147     ret->prop_count = count;
 148     return ret;
 149 }
 150
 151 static void reset_listener( struct listener *listener )
 152 {
 153     listener->state = WS_LISTENER_STATE_CREATED;
 154     SetEvent( listener->cancel );
 155     listener->channel = NULL;
 156
 157     switch (listener->binding)
 158     {
 159     case WS_TCP_CHANNEL_BINDING:
 160         closesocket( listener->u.tcp.socket );
 161         listener->u.tcp.socket = -1;
 162         break;
 163
 164     case WS_UDP_CHANNEL_BINDING:
 165         closesocket( listener->u.udp.socket );
 166         listener->u.udp.socket = -1;
 167         break;
 168
 169     default: break;
 170     }
 171 }
 172
 173 static void free_listener( struct listener *listener )
 174 {
 175     reset_listener( listener );
 176
 177     CloseHandle( listener->wait );
 178     CloseHandle( listener->cancel );
 179
 180 #ifndef __MINGW32__
 181     listener->cs.DebugInfo->Spare[0] = 0;
 182 #endif
 183     DeleteCriticalSection( &listener->cs );
 184     heap_free( listener );
 185 }
 186
 187 static HRESULT create_listener( WS_CHANNEL_TYPE type, WS_CHANNEL_BINDING binding,
 188                                 const WS_LISTENER_PROPERTY *properties, ULONG count, struct listener **ret )
 189 {
 190     struct listener *listener;
 191     HRESULT hr;
 192     ULONG i;
 193
 194     if (!(listener = alloc_listener())) return E_OUTOFMEMORY;
 195
 196     for (i = 0; i < count; i++)
 197     {
 198         hr = prop_set( listener->prop, listener->prop_count, properties[i].id, properties[i].value,
 199                        properties[i].valueSize );
 200         if (hr != S_OK)
 201         {
 202             free_listener( listener );
 203             return hr;
 204         }
 205     }
 206
 207     listener->type    = type;
 208     listener->binding = binding;
 209
 210     switch (listener->binding)
 211     {
 212     case WS_TCP_CHANNEL_BINDING:
 213         listener->u.tcp.socket = -1;
 214         break;
 215
 216     case WS_UDP_CHANNEL_BINDING:
 217         listener->u.udp.socket = -1;
 218         break;
 219
 220     default: break;
 221     }
 222
 223     *ret = listener;
 224     return S_OK;
 225 }
 226
 227 /**************************************************************************
 228  *          WsCreateListener            [webservices.@]
 229  */
 230 HRESULT WINAPI WsCreateListener( WS_CHANNEL_TYPE type, WS_CHANNEL_BINDING binding,
 231                                  const WS_LISTENER_PROPERTY *properties, ULONG count,
 232                                  const WS_SECURITY_DESCRIPTION *desc, WS_LISTENER **handle,
 233                                  WS_ERROR *error )
 234 {
 235     struct listener *listener;
 236     HRESULT hr;
 237
 238     TRACE( "%u %u %p %u %p %p %p\n", type, binding, properties, count, desc, handle, error );
 239     if (error) FIXME( "ignoring error parameter\n" );
 240     if (desc) FIXME( "ignoring security description\n" );
 241
 242     if (!handle) return E_INVALIDARG;
 243
 244     if (type != WS_CHANNEL_TYPE_DUPLEX_SESSION && type != WS_CHANNEL_TYPE_DUPLEX)
 245     {
 246         FIXME( "channel type %u not implemented\n", type );
 247         return E_NOTIMPL;
 248     }
 249     if (binding != WS_TCP_CHANNEL_BINDING && binding != WS_UDP_CHANNEL_BINDING)
 250     {
 251         FIXME( "channel binding %u not implemented\n", binding );
 252         return E_NOTIMPL;
 253     }
 254
 255     if ((hr = create_listener( type, binding, properties, count, &listener )) != S_OK) return hr;
 256
 257     TRACE( "created %p\n", listener );
 258     *handle = (WS_LISTENER *)listener;
 259     return S_OK;
 260 }
 261
 262 /**************************************************************************
 263  *          WsFreeListener              [webservices.@]
 264  */
 265 void WINAPI WsFreeListener( WS_LISTENER *handle )
 266 {
 267     struct listener *listener = (struct listener *)handle;
 268
 269     TRACE( "%p\n", handle );
 270
 271     if (!listener) return;
 272
 273     EnterCriticalSection( &listener->cs );
 274
 275     if (listener->magic != LISTENER_MAGIC)
 276     {
 277         LeaveCriticalSection( &listener->cs );
 278         return;
 279     }
 280
 281     listener->magic = 0;
 282
 283     LeaveCriticalSection( &listener->cs );
 284     free_listener( listener );
 285 }
 286
 287 HRESULT resolve_hostname( const WCHAR *host, USHORT port, struct sockaddr *addr, int *addr_len, int flags )
 288 {
 289     static const WCHAR fmtW[] = {'%','u',0};
 290     WCHAR service[6];
 291     ADDRINFOW hints, *res, *info;
 292     HRESULT hr = WS_E_ADDRESS_NOT_AVAILABLE;
 293
 294     memset( &hints, 0, sizeof(hints) );
 295     hints.ai_flags  = flags;
 296     hints.ai_family = AF_INET;
 297
 298     *addr_len = 0;
 299     sprintfW( service, fmtW, port );
 300     if (GetAddrInfoW( host, service, &hints, &res )) return HRESULT_FROM_WIN32( WSAGetLastError() );
 301
 302     info = res;
 303     while (info && info->ai_family != AF_INET) info = info->ai_next;
 304     if (info)
 305     {
 306         memcpy( addr, info->ai_addr, info->ai_addrlen );
 307         *addr_len = info->ai_addrlen;
 308         hr = S_OK;
 309     }
 310
 311     FreeAddrInfoW( res );
 312     return hr;
 313 }
 314
 315 HRESULT parse_url( const WS_STRING *str, WS_URL_SCHEME_TYPE *scheme, WCHAR **host, USHORT *port )
 316 {
 317     WS_HEAP *heap;
 318     WS_NETTCP_URL *url;
 319     HRESULT hr;
 320
 321     if ((hr = WsCreateHeap( 1 << 8, 0, NULL, 0, &heap, NULL )) != S_OK) return hr;
 322     if ((hr = WsDecodeUrl( str, 0, heap, (WS_URL **)&url, NULL )) != S_OK)
 323     {
 324         WsFreeHeap( heap );
 325         return hr;
 326     }
 327
 328     if (url->host.length == 1 && (url->host.chars[0] == '+' || url->host.chars[0] == '*')) *host = NULL;
 329     else
 330     {
 331         if (!(*host = heap_alloc( (url->host.length + 1) * sizeof(WCHAR) )))
 332         {
 333             WsFreeHeap( heap );
 334             return E_OUTOFMEMORY;
 335         }
 336         memcpy( *host, url->host.chars, url->host.length * sizeof(WCHAR) );
 337         (*host)[url->host.length] = 0;
 338     }
 339     *scheme = url->url.scheme;
 340     *port = url->port;
 341
 342     WsFreeHeap( heap );
 343     return hr;
 344 }
 345
 346 static HRESULT open_listener_tcp( struct listener *listener, const WS_STRING *url )
 347 {
 348     struct sockaddr_storage storage;
 349     struct sockaddr *addr = (struct sockaddr *)&storage;
 350     int addr_len, on = 1;
 351     WS_URL_SCHEME_TYPE scheme;
 352     WCHAR *host;
 353     USHORT port;
 354     HRESULT hr;
 355
 356     if ((hr = parse_url( url, &scheme, &host, &port )) != S_OK) return hr;
 357     if (scheme != WS_URL_NETTCP_SCHEME_TYPE)
 358     {
 359         heap_free( host );
 360         return WS_E_INVALID_ENDPOINT_URL;
 361     }
 362
 363     winsock_init();
 364
 365     hr = resolve_hostname( host, port, addr, &addr_len, AI_PASSIVE );
 366     heap_free( host );
 367     if (hr != S_OK) return hr;
 368
 369     if ((listener->u.tcp.socket = socket( addr->sa_family, SOCK_STREAM, 0 )) == -1)
 370         return HRESULT_FROM_WIN32( WSAGetLastError() );
 371
 372     if (setsockopt( listener->u.tcp.socket, SOL_SOCKET, SO_REUSEADDR, (char *)&on, sizeof(on) ) < 0)
 373     {
 374         closesocket( listener->u.tcp.socket );
 375         listener->u.tcp.socket = -1;
 376         return HRESULT_FROM_WIN32( WSAGetLastError() );
 377     }
 378
 379     if (bind( listener->u.tcp.socket, addr, addr_len ) < 0)
 380     {
 381         closesocket( listener->u.tcp.socket );
 382         listener->u.tcp.socket = -1;
 383         return HRESULT_FROM_WIN32( WSAGetLastError() );
 384     }
 385
 386     if (listen( listener->u.tcp.socket, 0 ) < 0)
 387     {
 388         closesocket( listener->u.tcp.socket );
 389         listener->u.tcp.socket = -1;
 390         return HRESULT_FROM_WIN32( WSAGetLastError() );
 391     }
 392
 393     listener->state = WS_LISTENER_STATE_OPEN;
 394     return S_OK;
 395 }
 396
 397 static HRESULT open_listener_udp( struct listener *listener, const WS_STRING *url )
 398 {
 399     struct sockaddr_storage storage;
 400     struct sockaddr *addr = (struct sockaddr *)&storage;
 401     int addr_len;
 402     WS_URL_SCHEME_TYPE scheme;
 403     WCHAR *host;
 404     USHORT port;
 405     HRESULT hr;
 406
 407     if ((hr = parse_url( url, &scheme, &host, &port )) != S_OK) return hr;
 408     if (scheme != WS_URL_SOAPUDP_SCHEME_TYPE)
 409     {
 410         heap_free( host );
 411         return WS_E_INVALID_ENDPOINT_URL;
 412     }
 413
 414     winsock_init();
 415
 416     hr = resolve_hostname( host, port, addr, &addr_len, AI_PASSIVE );
 417     heap_free( host );
 418     if (hr != S_OK) return hr;
 419
 420     if ((listener->u.udp.socket = socket( addr->sa_family, SOCK_DGRAM, 0 )) == -1)
 421         return HRESULT_FROM_WIN32( WSAGetLastError() );
 422
 423     if (bind( listener->u.udp.socket, addr, addr_len ) < 0)
 424     {
 425         closesocket( listener->u.udp.socket );
 426         listener->u.udp.socket = -1;
 427         return HRESULT_FROM_WIN32( WSAGetLastError() );
 428     }
 429
 430     listener->state = WS_LISTENER_STATE_OPEN;
 431     return S_OK;
 432 }
 433
 434 static HRESULT open_listener( struct listener *listener, const WS_STRING *url )
 435 {
 436     switch (listener->binding)
 437     {
 438     case WS_TCP_CHANNEL_BINDING:
 439         return open_listener_tcp( listener, url );
 440
 441     case WS_UDP_CHANNEL_BINDING:
 442         return open_listener_udp( listener, url );
 443
 444     default:
 445         ERR( "unhandled binding %u\n", listener->binding );
 446         return E_NOTIMPL;
 447     }
 448 }
 449
 450 /**************************************************************************
 451  *          WsOpenListener              [webservices.@]
 452  */
 453 HRESULT WINAPI WsOpenListener( WS_LISTENER *handle, WS_STRING *url, const WS_ASYNC_CONTEXT *ctx, WS_ERROR *error )
 454 {
 455     struct listener *listener = (struct listener *)handle;
 456     HRESULT hr;
 457
 458     TRACE( "%p %s %p %p\n", handle, url ? debugstr_wn(url->chars, url->length) : "null", ctx, error );
 459     if (error) FIXME( "ignoring error parameter\n" );
 460     if (ctx) FIXME( "ignoring ctx parameter\n" );
 461
 462     if (!listener || !url) return E_INVALIDARG;
 463
 464     EnterCriticalSection( &listener->cs );
 465
 466     if (listener->magic != LISTENER_MAGIC)
 467     {
 468         LeaveCriticalSection( &listener->cs );
 469         return E_INVALIDARG;
 470     }
 471
 472     if (listener->state != WS_LISTENER_STATE_CREATED) hr = WS_E_INVALID_OPERATION;
 473     else hr = open_listener( listener, url );
 474
 475     LeaveCriticalSection( &listener->cs );
 476     TRACE( "returning %08x\n", hr );
 477     return hr;
 478 }
 479
 480 static void close_listener( struct listener *listener )
 481 {
 482     reset_listener( listener );
 483     listener->state = WS_LISTENER_STATE_CLOSED;
 484 }
 485
 486 /**************************************************************************
 487  *          WsCloseListener             [webservices.@]
 488  */
 489 HRESULT WINAPI WsCloseListener( WS_LISTENER *handle, const WS_ASYNC_CONTEXT *ctx, WS_ERROR *error )
 490 {
 491     struct listener *listener = (struct listener *)handle;
 492     HRESULT hr = S_OK;
 493
 494     TRACE( "%p %p %p\n", handle, ctx, error );
 495     if (error) FIXME( "ignoring error parameter\n" );
 496     if (ctx) FIXME( "ignoring ctx parameter\n" );
 497
 498     if (!listener) return E_INVALIDARG;
 499
 500     EnterCriticalSection( &listener->cs );
 501
 502     if (listener->magic != LISTENER_MAGIC)
 503     {
 504         LeaveCriticalSection( &listener->cs );
 505         return E_INVALIDARG;
 506     }
 507
 508     close_listener( listener );
 509
 510     LeaveCriticalSection( &listener->cs );
 511     TRACE( "returning %08x\n", hr );
 512     return hr;
 513 }
 514
 515 /**************************************************************************
 516  *          WsResetListener             [webservices.@]
 517  */
 518 HRESULT WINAPI WsResetListener( WS_LISTENER *handle, WS_ERROR *error )
 519 {
 520     struct listener *listener = (struct listener *)handle;
 521     HRESULT hr = S_OK;
 522
 523     TRACE( "%p %p\n", handle, error );
 524     if (error) FIXME( "ignoring error parameter\n" );
 525
 526     if (!listener) return E_INVALIDARG;
 527
 528     EnterCriticalSection( &listener->cs );
 529
 530     if (listener->magic != LISTENER_MAGIC)
 531     {
 532         LeaveCriticalSection( &listener->cs );
 533         return E_INVALIDARG;
 534     }
 535
 536     if (listener->state != WS_LISTENER_STATE_CREATED && listener->state != WS_LISTENER_STATE_CLOSED)
 537         hr = WS_E_INVALID_OPERATION;
 538     else
 539         reset_listener( listener );
 540
 541     LeaveCriticalSection( &listener->cs );
 542     TRACE( "returning %08x\n", hr );
 543     return hr;
 544 }
 545
 546 /**************************************************************************
 547  *          WsGetListenerProperty               [webservices.@]
 548  */
 549 HRESULT WINAPI WsGetListenerProperty( WS_LISTENER *handle, WS_LISTENER_PROPERTY_ID id, void *buf,
 550                                       ULONG size, WS_ERROR *error )
 551 {
 552     struct listener *listener = (struct listener *)handle;
 553     HRESULT hr = S_OK;
 554
 555     TRACE( "%p %u %p %u %p\n", handle, id, buf, size, error );
 556     if (error) FIXME( "ignoring error parameter\n" );
 557
 558     if (!listener) return E_INVALIDARG;
 559
 560     EnterCriticalSection( &listener->cs );
 561
 562     if (listener->magic != LISTENER_MAGIC)
 563     {
 564         LeaveCriticalSection( &listener->cs );
 565         return E_INVALIDARG;
 566     }
 567
 568     switch (id)
 569     {
 570     case WS_LISTENER_PROPERTY_STATE:
 571         if (!buf || size != sizeof(listener->state)) hr = E_INVALIDARG;
 572         else *(WS_LISTENER_STATE *)buf = listener->state;
 573         break;
 574
 575     case WS_LISTENER_PROPERTY_CHANNEL_TYPE:
 576         if (!buf || size != sizeof(listener->type)) hr = E_INVALIDARG;
 577         else *(WS_CHANNEL_TYPE *)buf = listener->type;
 578         break;
 579
 580     case WS_LISTENER_PROPERTY_CHANNEL_BINDING:
 581         if (!buf || size != sizeof(listener->binding)) hr = E_INVALIDARG;
 582         else *(WS_CHANNEL_BINDING *)buf = listener->binding;
 583         break;
 584
 585     default:
 586         hr = prop_get( listener->prop, listener->prop_count, id, buf, size );
 587     }
 588
 589     LeaveCriticalSection( &listener->cs );
 590     TRACE( "returning %08x\n", hr );
 591     return hr;
 592 }
 593
 594 /**************************************************************************
 595  *          WsSetListenerProperty               [webservices.@]
 596  */
 597 HRESULT WINAPI WsSetListenerProperty( WS_LISTENER *handle, WS_LISTENER_PROPERTY_ID id, const void *value,
 598                                       ULONG size, WS_ERROR *error )
 599 {
 600     struct listener *listener = (struct listener *)handle;
 601     HRESULT hr;
 602
 603     TRACE( "%p %u %p %u\n", handle, id, value, size );
 604     if (error) FIXME( "ignoring error parameter\n" );
 605
 606     if (!listener) return E_INVALIDARG;
 607
 608     EnterCriticalSection( &listener->cs );
 609
 610     if (listener->magic != LISTENER_MAGIC)
 611     {
 612         LeaveCriticalSection( &listener->cs );
 613         return E_INVALIDARG;
 614     }
 615
 616     hr = prop_set( listener->prop, listener->prop_count, id, value, size );
 617
 618     LeaveCriticalSection( &listener->cs );
 619     TRACE( "returning %08x\n", hr );
 620     return hr;
 621 }
 622
 623 /**************************************************************************
 624  *          WsAcceptChannel             [webservices.@]
 625  */
 626 HRESULT WINAPI WsAcceptChannel( WS_LISTENER *handle, WS_CHANNEL *channel_handle, const WS_ASYNC_CONTEXT *ctx,
 627                                 WS_ERROR *error )
 628 {
 629     struct listener *listener = (struct listener *)handle;
 630     HRESULT hr = E_NOTIMPL;
 631     HANDLE wait, cancel;
 632
 633     TRACE( "%p %p %p %p\n", handle, channel_handle, ctx, error );
 634     if (error) FIXME( "ignoring error parameter\n" );
 635     if (ctx) FIXME( "ignoring ctx parameter\n" );
 636
 637     if (!listener || !channel_handle) return E_INVALIDARG;
 638
 639     EnterCriticalSection( &listener->cs );
 640
 641     if (listener->magic != LISTENER_MAGIC)
 642     {
 643         LeaveCriticalSection( &listener->cs );
 644         return E_INVALIDARG;
 645     }
 646
 647     if (listener->state != WS_LISTENER_STATE_OPEN || listener->channel) hr = WS_E_INVALID_OPERATION;
 648     else
 649     {
 650         wait = listener->wait;
 651         cancel = listener->cancel;
 652         listener->channel = channel_handle;
 653
 654         switch (listener->binding)
 655         {
 656         case WS_TCP_CHANNEL_BINDING:
 657         {
 658             SOCKET socket = listener->u.tcp.socket;
 659
 660             LeaveCriticalSection( &listener->cs );
 661             hr = channel_accept_tcp( socket, wait, cancel, channel_handle );
 662             TRACE( "returning %08x\n", hr );
 663             return hr;
 664         }
 665         case WS_UDP_CHANNEL_BINDING:
 666         {
 667             SOCKET socket = listener->u.udp.socket;
 668
 669             LeaveCriticalSection( &listener->cs );
 670             hr = channel_accept_udp( socket, wait, cancel, channel_handle );
 671             TRACE( "returning %08x\n", hr );
 672             return hr;
 673         }
 674         default:
 675             FIXME( "listener binding %u not supported\n", listener->binding );
 676             break;
 677         }
 678     }
 679
 680     LeaveCriticalSection( &listener->cs );
 681     TRACE( "returning %08x\n", hr );
 682     return hr;
 683 }