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 #include <locale.h>
  21
  22 #include "windef.h"
  23 #include "winbase.h"
  24 #include "webservices.h"
  25
  26 #include "wine/debug.h"
  27 #include "wine/heap.h"
  28 #include "wine/list.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 _locale_t c_locale;
  54
  55 /******************************************************************
  56  *      DllMain (webservices.@)
  57  */
  58 BOOL WINAPI DllMain( HINSTANCE hinst, DWORD reason, void *reserved )
  59 {
  60     switch (reason)
  61     {
  62     case DLL_PROCESS_ATTACH:
  63         webservices_instance = hinst;
  64         DisableThreadLibraryCalls( hinst );
  65         c_locale = _create_locale( LC_ALL, "C" );
  66         break;
  67
  68     case DLL_PROCESS_DETACH:
  69         if (reserved) break;
  70         if (winsock_loaded) WSACleanup();
  71         _free_locale( c_locale );
  72         break;
  73     }
  74     return TRUE;
  75 }
  76
  77 static const struct prop_desc listener_props[] =
  78 {
  79     { sizeof(ULONG), FALSE },                               /* WS_LISTENER_PROPERTY_LISTEN_BACKLOG */
  80     { sizeof(WS_IP_VERSION), FALSE },                       /* WS_LISTENER_PROPERTY_IP_VERSION */
  81     { sizeof(WS_LISTENER_STATE), TRUE },                    /* WS_LISTENER_PROPERTY_STATE */
  82     { sizeof(WS_CALLBACK_MODEL), FALSE },                   /* WS_LISTENER_PROPERTY_ASYNC_CALLBACK_MODEL */
  83     { sizeof(WS_CHANNEL_TYPE), TRUE },                      /* WS_LISTENER_PROPERTY_CHANNEL_TYPE */
  84     { sizeof(WS_CHANNEL_BINDING), TRUE },                   /* WS_LISTENER_PROPERTY_CHANNEL_BINDING */
  85     { sizeof(ULONG), FALSE },                               /* WS_LISTENER_PROPERTY_CONNECT_TIMEOUT */
  86     { sizeof(BOOL), FALSE },                                /* WS_LISTENER_PROPERTY_IS_MULTICAST */
  87     { 0, FALSE },                                           /* WS_LISTENER_PROPERTY_MULTICAST_INTERFACES */
  88     { sizeof(BOOL), FALSE },                                /* WS_LISTENER_PROPERTY_MULTICAST_LOOPBACK */
  89     { sizeof(ULONG), FALSE },                               /* WS_LISTENER_PROPERTY_CLOSE_TIMEOUT */
  90     { sizeof(ULONG), FALSE },                               /* WS_LISTENER_PROPERTY_TO_HEADER_MATCHING_OPTIONS */
  91     { sizeof(ULONG), FALSE },                               /* WS_LISTENER_PROPERTY_TRANSPORT_URL_MATCHING_OPTIONS */
  92     { sizeof(WS_CUSTOM_LISTENER_CALLBACKS), FALSE },        /* WS_LISTENER_PROPERTY_CUSTOM_LISTENER_CALLBACKS */
  93     { 0, FALSE },                                           /* WS_LISTENER_PROPERTY_CUSTOM_LISTENER_PARAMETERS */
  94     { sizeof(void *), TRUE },                               /* WS_LISTENER_PROPERTY_CUSTOM_LISTENER_INSTANCE */
  95     { sizeof(WS_DISALLOWED_USER_AGENT_SUBSTRINGS), FALSE }  /* WS_LISTENER_PROPERTY_DISALLOWED_USER_AGENT */
  96 };
  97
  98 struct listener
  99 {
 100     ULONG                   magic;
 101     CRITICAL_SECTION        cs;
 102     WS_CHANNEL_TYPE         type;
 103     WS_CHANNEL_BINDING      binding;
 104     WS_LISTENER_STATE       state;
 105     HANDLE                  wait;
 106     HANDLE                  cancel;
 107     WS_CHANNEL             *channel;
 108     union
 109     {
 110         struct
 111         {
 112             SOCKET socket;
 113         } tcp;
 114         struct
 115         {
 116             SOCKET socket;
 117         } udp;
 118     } u;
 119     ULONG                   prop_count;
 120     struct prop             prop[ARRAY_SIZE( listener_props )];
 121 };
 122
 123 #define LISTENER_MAGIC (('L' << 24) | ('I' << 16) | ('S' << 8) | 'T')
 124
 125 static struct listener *alloc_listener(void)
 126 {
 127     static const ULONG count = ARRAY_SIZE( listener_props );
 128     struct listener *ret;
 129     ULONG size = sizeof(*ret) + prop_size( listener_props, count );
 130
 131     if (!(ret = heap_alloc_zero( size ))) return NULL;
 132
 133     ret->magic = LISTENER_MAGIC;
 134     if (!(ret->wait = CreateEventW( NULL, FALSE, FALSE, NULL )))
 135     {
 136         heap_free( ret );
 137         return NULL;
 138     }
 139     if (!(ret->cancel = CreateEventW( NULL, FALSE, FALSE, NULL )))
 140     {
 141         CloseHandle( ret->wait );
 142         heap_free( ret );
 143         return NULL;
 144     }
 145     InitializeCriticalSection( &ret->cs );
 146     ret->cs.DebugInfo->Spare[0] = (DWORD_PTR)(__FILE__ ": listener.cs");
 147
 148     prop_init( listener_props, count, ret->prop, &ret[1] );
 149     ret->prop_count = count;
 150     return ret;
 151 }
 152
 153 static void reset_listener( struct listener *listener )
 154 {
 155     listener->state = WS_LISTENER_STATE_CREATED;
 156     SetEvent( listener->cancel );
 157     listener->channel = NULL;
 158
 159     switch (listener->binding)
 160     {
 161     case WS_TCP_CHANNEL_BINDING:
 162         closesocket( listener->u.tcp.socket );
 163         listener->u.tcp.socket = -1;
 164         break;
 165
 166     case WS_UDP_CHANNEL_BINDING:
 167         closesocket( listener->u.udp.socket );
 168         listener->u.udp.socket = -1;
 169         break;
 170
 171     default: break;
 172     }
 173 }
 174
 175 static void free_listener( struct listener *listener )
 176 {
 177     reset_listener( listener );
 178
 179     CloseHandle( listener->wait );
 180     CloseHandle( listener->cancel );
 181
 182     listener->cs.DebugInfo->Spare[0] = 0;
 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     WCHAR service[6];
 290     ADDRINFOW hints, *res, *info;
 291     HRESULT hr = WS_E_ADDRESS_NOT_AVAILABLE;
 292
 293     memset( &hints, 0, sizeof(hints) );
 294     hints.ai_flags  = flags;
 295     hints.ai_family = AF_INET;
 296
 297     *addr_len = 0;
 298     swprintf( service, ARRAY_SIZE(service), L"%u", port );
 299     if (GetAddrInfoW( host, service, &hints, &res )) return HRESULT_FROM_WIN32( WSAGetLastError() );
 300
 301     info = res;
 302     while (info && info->ai_family != AF_INET) info = info->ai_next;
 303     if (info)
 304     {
 305         memcpy( addr, info->ai_addr, info->ai_addrlen );
 306         *addr_len = info->ai_addrlen;
 307         hr = S_OK;
 308     }
 309
 310     FreeAddrInfoW( res );
 311     return hr;
 312 }
 313
 314 HRESULT parse_url( const WS_STRING *str, WS_URL_SCHEME_TYPE *scheme, WCHAR **host, USHORT *port )
 315 {
 316     WS_HEAP *heap;
 317     WS_NETTCP_URL *url;
 318     HRESULT hr;
 319
 320     if ((hr = WsCreateHeap( 1 << 8, 0, NULL, 0, &heap, NULL )) != S_OK) return hr;
 321     if ((hr = WsDecodeUrl( str, 0, heap, (WS_URL **)&url, NULL )) != S_OK)
 322     {
 323         WsFreeHeap( heap );
 324         return hr;
 325     }
 326
 327     if (url->host.length == 1 && (url->host.chars[0] == '+' || url->host.chars[0] == '*')) *host = NULL;
 328     else
 329     {
 330         if (!(*host = heap_alloc( (url->host.length + 1) * sizeof(WCHAR) )))
 331         {
 332             WsFreeHeap( heap );
 333             return E_OUTOFMEMORY;
 334         }
 335         memcpy( *host, url->host.chars, url->host.length * sizeof(WCHAR) );
 336         (*host)[url->host.length] = 0;
 337     }
 338     *scheme = url->url.scheme;
 339     *port = url->port;
 340
 341     WsFreeHeap( heap );
 342     return hr;
 343 }
 344
 345 static HRESULT open_listener_tcp( struct listener *listener, const WS_STRING *url )
 346 {
 347     struct sockaddr_storage storage;
 348     struct sockaddr *addr = (struct sockaddr *)&storage;
 349     int addr_len, on = 1;
 350     WS_URL_SCHEME_TYPE scheme;
 351     WCHAR *host;
 352     USHORT port;
 353     HRESULT hr;
 354
 355     if ((hr = parse_url( url, &scheme, &host, &port )) != S_OK) return hr;
 356     if (scheme != WS_URL_NETTCP_SCHEME_TYPE)
 357     {
 358         heap_free( host );
 359         return WS_E_INVALID_ENDPOINT_URL;
 360     }
 361
 362     winsock_init();
 363
 364     hr = resolve_hostname( host, port, addr, &addr_len, AI_PASSIVE );
 365     heap_free( host );
 366     if (hr != S_OK) return hr;
 367
 368     if ((listener->u.tcp.socket = socket( addr->sa_family, SOCK_STREAM, 0 )) == -1)
 369         return HRESULT_FROM_WIN32( WSAGetLastError() );
 370
 371     if (setsockopt( listener->u.tcp.socket, SOL_SOCKET, SO_REUSEADDR, (char *)&on, sizeof(on) ) < 0)
 372     {
 373         closesocket( listener->u.tcp.socket );
 374         listener->u.tcp.socket = -1;
 375         return HRESULT_FROM_WIN32( WSAGetLastError() );
 376     }
 377
 378     if (bind( listener->u.tcp.socket, addr, addr_len ) < 0)
 379     {
 380         closesocket( listener->u.tcp.socket );
 381         listener->u.tcp.socket = -1;
 382         return HRESULT_FROM_WIN32( WSAGetLastError() );
 383     }
 384
 385     if (listen( listener->u.tcp.socket, 0 ) < 0)
 386     {
 387         closesocket( listener->u.tcp.socket );
 388         listener->u.tcp.socket = -1;
 389         return HRESULT_FROM_WIN32( WSAGetLastError() );
 390     }
 391
 392     listener->state = WS_LISTENER_STATE_OPEN;
 393     return S_OK;
 394 }
 395
 396 static HRESULT open_listener_udp( struct listener *listener, const WS_STRING *url )
 397 {
 398     struct sockaddr_storage storage;
 399     struct sockaddr *addr = (struct sockaddr *)&storage;
 400     int addr_len;
 401     WS_URL_SCHEME_TYPE scheme;
 402     WCHAR *host;
 403     USHORT port;
 404     HRESULT hr;
 405
 406     if ((hr = parse_url( url, &scheme, &host, &port )) != S_OK) return hr;
 407     if (scheme != WS_URL_SOAPUDP_SCHEME_TYPE)
 408     {
 409         heap_free( host );
 410         return WS_E_INVALID_ENDPOINT_URL;
 411     }
 412
 413     winsock_init();
 414
 415     hr = resolve_hostname( host, port, addr, &addr_len, AI_PASSIVE );
 416     heap_free( host );
 417     if (hr != S_OK) return hr;
 418
 419     if ((listener->u.udp.socket = socket( addr->sa_family, SOCK_DGRAM, 0 )) == -1)
 420         return HRESULT_FROM_WIN32( WSAGetLastError() );
 421
 422     if (bind( listener->u.udp.socket, addr, addr_len ) < 0)
 423     {
 424         closesocket( listener->u.udp.socket );
 425         listener->u.udp.socket = -1;
 426         return HRESULT_FROM_WIN32( WSAGetLastError() );
 427     }
 428
 429     listener->state = WS_LISTENER_STATE_OPEN;
 430     return S_OK;
 431 }
 432
 433 static HRESULT open_listener( struct listener *listener, const WS_STRING *url )
 434 {
 435     switch (listener->binding)
 436     {
 437     case WS_TCP_CHANNEL_BINDING:
 438         return open_listener_tcp( listener, url );
 439
 440     case WS_UDP_CHANNEL_BINDING:
 441         return open_listener_udp( listener, url );
 442
 443     default:
 444         ERR( "unhandled binding %u\n", listener->binding );
 445         return E_NOTIMPL;
 446     }
 447 }
 448
 449 /**************************************************************************
 450  *          WsOpenListener              [webservices.@]
 451  */
 452 HRESULT WINAPI WsOpenListener( WS_LISTENER *handle, WS_STRING *url, const WS_ASYNC_CONTEXT *ctx, WS_ERROR *error )
 453 {
 454     struct listener *listener = (struct listener *)handle;
 455     HRESULT hr;
 456
 457     TRACE( "%p %s %p %p\n", handle, url ? debugstr_wn(url->chars, url->length) : "null", ctx, error );
 458     if (error) FIXME( "ignoring error parameter\n" );
 459     if (ctx) FIXME( "ignoring ctx parameter\n" );
 460
 461     if (!listener || !url) return E_INVALIDARG;
 462
 463     EnterCriticalSection( &listener->cs );
 464
 465     if (listener->magic != LISTENER_MAGIC)
 466     {
 467         LeaveCriticalSection( &listener->cs );
 468         return E_INVALIDARG;
 469     }
 470
 471     if (listener->state != WS_LISTENER_STATE_CREATED) hr = WS_E_INVALID_OPERATION;
 472     else hr = open_listener( listener, url );
 473
 474     LeaveCriticalSection( &listener->cs );
 475     TRACE( "returning %08x\n", hr );
 476     return hr;
 477 }
 478
 479 static void close_listener( struct listener *listener )
 480 {
 481     reset_listener( listener );
 482     listener->state = WS_LISTENER_STATE_CLOSED;
 483 }
 484
 485 /**************************************************************************
 486  *          WsCloseListener             [webservices.@]
 487  */
 488 HRESULT WINAPI WsCloseListener( WS_LISTENER *handle, const WS_ASYNC_CONTEXT *ctx, WS_ERROR *error )
 489 {
 490     struct listener *listener = (struct listener *)handle;
 491     HRESULT hr = S_OK;
 492
 493     TRACE( "%p %p %p\n", handle, ctx, error );
 494     if (error) FIXME( "ignoring error parameter\n" );
 495     if (ctx) FIXME( "ignoring ctx parameter\n" );
 496
 497     if (!listener) return E_INVALIDARG;
 498
 499     EnterCriticalSection( &listener->cs );
 500
 501     if (listener->magic != LISTENER_MAGIC)
 502     {
 503         LeaveCriticalSection( &listener->cs );
 504         return E_INVALIDARG;
 505     }
 506
 507     close_listener( listener );
 508
 509     LeaveCriticalSection( &listener->cs );
 510     TRACE( "returning %08x\n", hr );
 511     return hr;
 512 }
 513
 514 /**************************************************************************
 515  *          WsResetListener             [webservices.@]
 516  */
 517 HRESULT WINAPI WsResetListener( WS_LISTENER *handle, WS_ERROR *error )
 518 {
 519     struct listener *listener = (struct listener *)handle;
 520     HRESULT hr = S_OK;
 521
 522     TRACE( "%p %p\n", handle, error );
 523     if (error) FIXME( "ignoring error parameter\n" );
 524
 525     if (!listener) return E_INVALIDARG;
 526
 527     EnterCriticalSection( &listener->cs );
 528
 529     if (listener->magic != LISTENER_MAGIC)
 530     {
 531         LeaveCriticalSection( &listener->cs );
 532         return E_INVALIDARG;
 533     }
 534
 535     if (listener->state != WS_LISTENER_STATE_CREATED && listener->state != WS_LISTENER_STATE_CLOSED)
 536         hr = WS_E_INVALID_OPERATION;
 537     else
 538         reset_listener( listener );
 539
 540     LeaveCriticalSection( &listener->cs );
 541     TRACE( "returning %08x\n", hr );
 542     return hr;
 543 }
 544
 545 /**************************************************************************
 546  *          WsGetListenerProperty               [webservices.@]
 547  */
 548 HRESULT WINAPI WsGetListenerProperty( WS_LISTENER *handle, WS_LISTENER_PROPERTY_ID id, void *buf,
 549                                       ULONG size, WS_ERROR *error )
 550 {
 551     struct listener *listener = (struct listener *)handle;
 552     HRESULT hr = S_OK;
 553
 554     TRACE( "%p %u %p %u %p\n", handle, id, buf, size, error );
 555     if (error) FIXME( "ignoring error parameter\n" );
 556
 557     if (!listener) return E_INVALIDARG;
 558
 559     EnterCriticalSection( &listener->cs );
 560
 561     if (listener->magic != LISTENER_MAGIC)
 562     {
 563         LeaveCriticalSection( &listener->cs );
 564         return E_INVALIDARG;
 565     }
 566
 567     switch (id)
 568     {
 569     case WS_LISTENER_PROPERTY_STATE:
 570         if (!buf || size != sizeof(listener->state)) hr = E_INVALIDARG;
 571         else *(WS_LISTENER_STATE *)buf = listener->state;
 572         break;
 573
 574     case WS_LISTENER_PROPERTY_CHANNEL_TYPE:
 575         if (!buf || size != sizeof(listener->type)) hr = E_INVALIDARG;
 576         else *(WS_CHANNEL_TYPE *)buf = listener->type;
 577         break;
 578
 579     case WS_LISTENER_PROPERTY_CHANNEL_BINDING:
 580         if (!buf || size != sizeof(listener->binding)) hr = E_INVALIDARG;
 581         else *(WS_CHANNEL_BINDING *)buf = listener->binding;
 582         break;
 583
 584     default:
 585         hr = prop_get( listener->prop, listener->prop_count, id, buf, size );
 586     }
 587
 588     LeaveCriticalSection( &listener->cs );
 589     TRACE( "returning %08x\n", hr );
 590     return hr;
 591 }
 592
 593 /**************************************************************************
 594  *          WsSetListenerProperty               [webservices.@]
 595  */
 596 HRESULT WINAPI WsSetListenerProperty( WS_LISTENER *handle, WS_LISTENER_PROPERTY_ID id, const void *value,
 597                                       ULONG size, WS_ERROR *error )
 598 {
 599     struct listener *listener = (struct listener *)handle;
 600     HRESULT hr;
 601
 602     TRACE( "%p %u %p %u\n", handle, id, value, size );
 603     if (error) FIXME( "ignoring error parameter\n" );
 604
 605     if (!listener) return E_INVALIDARG;
 606
 607     EnterCriticalSection( &listener->cs );
 608
 609     if (listener->magic != LISTENER_MAGIC)
 610     {
 611         LeaveCriticalSection( &listener->cs );
 612         return E_INVALIDARG;
 613     }
 614
 615     hr = prop_set( listener->prop, listener->prop_count, id, value, size );
 616
 617     LeaveCriticalSection( &listener->cs );
 618     TRACE( "returning %08x\n", hr );
 619     return hr;
 620 }
 621
 622 /**************************************************************************
 623  *          WsAcceptChannel             [webservices.@]
 624  */
 625 HRESULT WINAPI WsAcceptChannel( WS_LISTENER *handle, WS_CHANNEL *channel_handle, const WS_ASYNC_CONTEXT *ctx,
 626                                 WS_ERROR *error )
 627 {
 628     struct listener *listener = (struct listener *)handle;
 629     HRESULT hr = E_NOTIMPL;
 630     HANDLE wait, cancel;
 631
 632     TRACE( "%p %p %p %p\n", handle, channel_handle, ctx, error );
 633     if (error) FIXME( "ignoring error parameter\n" );
 634     if (ctx) FIXME( "ignoring ctx parameter\n" );
 635
 636     if (!listener || !channel_handle) return E_INVALIDARG;
 637
 638     EnterCriticalSection( &listener->cs );
 639
 640     if (listener->magic != LISTENER_MAGIC)
 641     {
 642         LeaveCriticalSection( &listener->cs );
 643         return E_INVALIDARG;
 644     }
 645
 646     if (listener->state != WS_LISTENER_STATE_OPEN || (listener->channel && listener->channel != channel_handle))
 647     {
 648         hr = WS_E_INVALID_OPERATION;
 649     }
 650     else
 651     {
 652         wait = listener->wait;
 653         cancel = listener->cancel;
 654         listener->channel = channel_handle;
 655
 656         switch (listener->binding)
 657         {
 658         case WS_TCP_CHANNEL_BINDING:
 659         {
 660             SOCKET socket = listener->u.tcp.socket;
 661
 662             LeaveCriticalSection( &listener->cs );
 663             hr = channel_accept_tcp( socket, wait, cancel, channel_handle );
 664             TRACE( "returning %08x\n", hr );
 665             return hr;
 666         }
 667         case WS_UDP_CHANNEL_BINDING:
 668         {
 669             SOCKET socket = listener->u.udp.socket;
 670
 671             LeaveCriticalSection( &listener->cs );
 672             hr = channel_accept_udp( socket, wait, cancel, channel_handle );
 673             TRACE( "returning %08x\n", hr );
 674             return hr;
 675         }
 676         default:
 677             FIXME( "listener binding %u not supported\n", listener->binding );
 678             break;
 679         }
 680     }
 681
 682     LeaveCriticalSection( &listener->cs );
 683     TRACE( "returning %08x\n", hr );
 684     return hr;
 685 }