(file) Return to sock.c CVS log (file) (dir) Up to [RizwankCVS] / wine4 / wine / dlls / winsock / tests

   1 cs130_tom 1.1 /*
   2                * Unit test suite for winsock functions
   3                *
   4                * Copyright 2002 Martin Wilck
   5 cs130_tom 1.3  * select() server Copyright 2005 Thomas Kho
   6 cs130_tom 1.1  *
   7                * This library is free software; you can redistribute it and/or
   8                * modify it under the terms of the GNU Lesser General Public
   9                * License as published by the Free Software Foundation; either
  10                * version 2.1 of the License, or (at your option) any later version.
  11                *
  12                * This library is distributed in the hope that it will be useful,
  13                * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14                * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15                * Lesser General Public License for more details.
  16                *
  17                * You should have received a copy of the GNU Lesser General Public
  18                * License along with this library; if not, write to the Free Software
  19                * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  20                */
  21               
  22               #include <stdarg.h>
  23               
  24               #include <windef.h>
  25               #include <winbase.h>
  26               #include <winsock2.h>
  27 cs130_tom 1.1 #include <mswsock.h>
  28               #include "wine/test.h"
  29               #include <winnt.h>
  30               #include <winerror.h>
  31               
  32               #define MAX_CLIENTS 4      /* Max number of clients */
  33 cs130_tom 1.2 #define NUM_TESTS   3      /* Number of tests performed */
  34 cs130_tom 1.1 #define FIRST_CHAR 'A'     /* First character in transferred pattern */
  35               #define BIND_SLEEP 10      /* seconds to wait between attempts to bind() */
  36               #define BIND_TRIES 6       /* Number of bind() attempts */
  37               #define TEST_TIMEOUT 30    /* seconds to wait before killing child threads
  38                                             after server initialization, if something hangs */
  39               
  40               #define wsa_ok(op, cond, msg) \
  41                  do { \
  42                       int tmp, err = 0; \
  43                       tmp = op; \
  44                       if ( !(cond tmp) ) err = WSAGetLastError(); \
  45                       ok ( cond tmp, msg, GetCurrentThreadId(), err); \
  46                  } while (0);
  47               
  48               
  49               /**************** Structs and typedefs ***************/
  50               
  51               typedef struct thread_info
  52               {
  53                   HANDLE thread;
  54                   DWORD id;
  55 cs130_tom 1.1 } thread_info;
  56               
  57               /* Information in the server about open client connections */
  58               typedef struct sock_info
  59               {
  60                   SOCKET                 s;
  61                   struct sockaddr_in     addr;
  62                   struct sockaddr_in     peer;
  63                   char                  *buf;
  64 cs130_tom 1.4     int                    n_recvd;
  65 cs130_tom 1.7     int                    n_sent;
  66 cs130_tom 1.1 } sock_info;
  67               
  68               /* Test parameters for both server & client */
  69               typedef struct test_params
  70               {
  71                   int          sock_type;
  72                   int          sock_prot;
  73                   const char  *inet_addr;
  74                   short        inet_port;
  75                   int          chunk_size;
  76                   int          n_chunks;
  77                   int          n_clients;
  78               } test_params;
  79               
  80               /* server-specific test parameters */
  81               typedef struct server_params
  82               {
  83                   test_params   *general;
  84                   DWORD          sock_flags;
  85                   int            buflen;
  86               } server_params;
  87 cs130_tom 1.1 
  88               /* client-specific test parameters */
  89               typedef struct client_params
  90               {
  91                   test_params   *general;
  92                   DWORD          sock_flags;
  93                   int            buflen;
  94               } client_params;
  95               
  96               /* This type combines all information for setting up a test scenario */
  97               typedef struct test_setup
  98               {
  99                   test_params              general;
 100                   LPVOID                   srv;
 101                   server_params            srv_params;
 102                   LPVOID                   clt;
 103                   client_params            clt_params;
 104               } test_setup;
 105               
 106               /* Thread local storage for server */
 107               typedef struct server_memory
 108 cs130_tom 1.1 {
 109                   SOCKET                  s;
 110                   struct sockaddr_in      addr;
 111                   sock_info               sock[MAX_CLIENTS];
 112               } server_memory;
 113               
 114               /* Thread local storage for client */
 115               typedef struct client_memory
 116               {
 117                   SOCKET s;
 118                   struct sockaddr_in      addr;
 119                   char                   *send_buf;
 120                   char                   *recv_buf;
 121               } client_memory;
 122               
 123               /**************** Static variables ***************/
 124               
 125               static DWORD      tls;              /* Thread local storage index */
 126               static HANDLE     thread[1+MAX_CLIENTS];
 127               static DWORD      thread_id[1+MAX_CLIENTS];
 128               static HANDLE     server_ready;
 129 cs130_tom 1.1 static HANDLE     client_ready[MAX_CLIENTS];
 130               static int        client_id;
 131               
 132               /**************** General utility functions ***************/
 133               
 134               static void set_so_opentype ( BOOL overlapped )
 135               {
 136                   int optval = !overlapped, newval, len = sizeof (int);
 137               
 138                   ok ( setsockopt ( INVALID_SOCKET, SOL_SOCKET, SO_OPENTYPE,
 139                                     (LPVOID) &optval, sizeof (optval) ) == 0,
 140                        "setting SO_OPENTYPE failed\n" );
 141                   ok ( getsockopt ( INVALID_SOCKET, SOL_SOCKET, SO_OPENTYPE,
 142                                     (LPVOID) &newval, &len ) == 0,
 143                        "getting SO_OPENTYPE failed\n" );
 144                   ok ( optval == newval, "failed to set SO_OPENTYPE\n" );
 145               }
 146               
 147               static int set_blocking ( SOCKET s, BOOL blocking )
 148               {
 149                   u_long val = !blocking;
 150 cs130_tom 1.1     return ioctlsocket ( s, FIONBIO, &val );
 151               }
 152               
 153               static void fill_buffer ( char *buf, int chunk_size, int n_chunks )
 154               {
 155                   char c, *p;
 156                   for ( c = FIRST_CHAR, p = buf; c < FIRST_CHAR + n_chunks; c++, p += chunk_size )
 157                       memset ( p, c, chunk_size );
 158               }
 159               
 160               static char* test_buffer ( char *buf, int chunk_size, int n_chunks )
 161               {
 162                   char c, *p;
 163                   int i;
 164                   for ( c = FIRST_CHAR, p = buf; c < FIRST_CHAR + n_chunks; c++, p += chunk_size )
 165                   {
 166                       for ( i = 0; i < chunk_size; i++ )
 167                           if ( p[i] != c ) return p + i;
 168                   }
 169                   return NULL;
 170               }
 171 cs130_tom 1.1 
 172               /*
 173                * This routine is called when a client / server does not expect any more data,
 174                * but needs to acknowedge the closing of the connection (by reasing 0 bytes).
 175                */
 176               static void read_zero_bytes ( SOCKET s )
 177               {
 178                   char buf[256];
 179                   int tmp, n = 0;
 180                   while ( ( tmp = recv ( s, buf, 256, 0 ) ) > 0 )
 181                       n += tmp;
 182                   ok ( n <= 0, "garbage data received: %d bytes\n", n );
 183               }
 184               
 185               static int do_synchronous_send ( SOCKET s, char *buf, int buflen, int sendlen )
 186               {
 187                   char* last = buf + buflen, *p;
 188                   int n = 1;
 189                   for ( p = buf; n > 0 && p < last; p += n )
 190                       n = send ( s, p, min ( sendlen, last - p ), 0 );
 191                   wsa_ok ( n, 0 <=, "do_synchronous_send (%lx): error %d\n" );
 192 cs130_tom 1.1     return p - buf;
 193               }
 194               
 195               static int do_synchronous_recv ( SOCKET s, char *buf, int buflen, int recvlen )
 196               {
 197                   char* last = buf + buflen, *p;
 198                   int n = 1;
 199                   for ( p = buf; n > 0 && p < last; p += n )
 200                       n = recv ( s, p, min ( recvlen, last - p ), 0 );
 201                   wsa_ok ( n, 0 <=, "do_synchronous_recv (%lx): error %d:\n" );
 202                   return p - buf;
 203               }
 204               
 205               /*
 206                *  Call this routine right after thread startup.
 207                *  SO_OPENTYPE must by 0, regardless what the server did.
 208                */
 209               static void check_so_opentype (void)
 210               {
 211                   int tmp = 1, len;
 212                   len = sizeof (tmp);
 213 cs130_tom 1.1     getsockopt ( INVALID_SOCKET, SOL_SOCKET, SO_OPENTYPE, (LPVOID) &tmp, &len );
 214                   ok ( tmp == 0, "check_so_opentype: wrong startup value of SO_OPENTYPE: %d\n", tmp );
 215               }
 216               
 217               /**************** Server utility functions ***************/
 218               
 219               /*
 220                *  Even if we have closed our server socket cleanly,
 221                *  the OS may mark the address "in use" for some time -
 222                *  this happens with native Linux apps, too.
 223                */
 224               static void do_bind ( SOCKET s, struct sockaddr* addr, int addrlen )
 225               {
 226                   int err, wsaerr = 0, n_try = BIND_TRIES;
 227               
 228                   while ( ( err = bind ( s, addr, addrlen ) ) != 0 &&
 229                           ( wsaerr = WSAGetLastError () ) == WSAEADDRINUSE &&
 230                           n_try-- >= 0)
 231                   {
 232                       trace ( "address in use, waiting ...\n" );
 233                       Sleep ( 1000 * BIND_SLEEP );
 234 cs130_tom 1.1     }
 235                   ok ( err == 0, "failed to bind: %d\n", wsaerr );
 236               }
 237               
 238               static void server_start ( server_params *par )
 239               {
 240                   int i;
 241                   test_params *gen = par->general;
 242                   server_memory *mem = (LPVOID) LocalAlloc ( LPTR, sizeof (server_memory));
 243               
 244                   TlsSetValue ( tls, mem );
 245                   mem->s = WSASocketA ( AF_INET, gen->sock_type, gen->sock_prot,
 246                                         NULL, 0, par->sock_flags );
 247                   ok ( mem->s != INVALID_SOCKET, "Server: WSASocket failed\n" );
 248               
 249                   mem->addr.sin_family = AF_INET;
 250                   mem->addr.sin_addr.s_addr = inet_addr ( gen->inet_addr );
 251                   mem->addr.sin_port = htons ( gen->inet_port );
 252               
 253                   for (i = 0; i < MAX_CLIENTS; i++)
 254                   {
 255 cs130_tom 1.1         mem->sock[i].s = INVALID_SOCKET;
 256                       mem->sock[i].buf = (LPVOID) LocalAlloc ( LPTR, gen->n_chunks * gen->chunk_size );
 257 cs130_tom 1.4         mem->sock[i].n_recvd = 0;
 258 cs130_tom 1.6         mem->sock[i].n_sent = 0;
 259 cs130_tom 1.1     }
 260               
 261                   if ( gen->sock_type == SOCK_STREAM )
 262                       do_bind ( mem->s, (struct sockaddr*) &mem->addr, sizeof (mem->addr) );
 263               }
 264               
 265               static void server_stop (void)
 266               {
 267                   int i;
 268                   server_memory *mem = TlsGetValue ( tls );
 269               
 270                   for (i = 0; i < MAX_CLIENTS; i++ )
 271                   {
 272                       LocalFree ( (HANDLE) mem->sock[i].buf );
 273                       if ( mem->sock[i].s != INVALID_SOCKET )
 274                           closesocket ( mem->sock[i].s );
 275                   }
 276                   ok ( closesocket ( mem->s ) == 0, "closesocket failed\n" );
 277                   LocalFree ( (HANDLE) mem );
 278                   ExitThread ( GetCurrentThreadId () );
 279               }
 280 cs130_tom 1.1 
 281               /**************** Client utilitiy functions ***************/
 282               
 283               static void client_start ( client_params *par )
 284               {
 285                   test_params *gen = par->general;
 286                   client_memory *mem = (LPVOID) LocalAlloc (LPTR, sizeof (client_memory));
 287               
 288                   TlsSetValue ( tls, mem );
 289               
 290                   WaitForSingleObject ( server_ready, INFINITE );
 291               
 292                   mem->s = WSASocketA ( AF_INET, gen->sock_type, gen->sock_prot,
 293                                         NULL, 0, par->sock_flags );
 294               
 295                   mem->addr.sin_family = AF_INET;
 296                   mem->addr.sin_addr.s_addr = inet_addr ( gen->inet_addr );
 297                   mem->addr.sin_port = htons ( gen->inet_port );
 298               
 299                   ok ( mem->s != INVALID_SOCKET, "Client: WSASocket failed\n" );
 300               
 301 cs130_tom 1.1     mem->send_buf = (LPVOID) LocalAlloc ( LPTR, 2 * gen->n_chunks * gen->chunk_size );
 302                   mem->recv_buf = mem->send_buf + gen->n_chunks * gen->chunk_size;
 303                   fill_buffer ( mem->send_buf, gen->chunk_size, gen->n_chunks );
 304               
 305                   SetEvent ( client_ready[client_id] );
 306                   /* Wait for the other clients to come up */
 307                   WaitForMultipleObjects ( min ( gen->n_clients, MAX_CLIENTS ), client_ready, TRUE, INFINITE );
 308               }
 309               
 310               static void client_stop (void)
 311               {
 312                   client_memory *mem = TlsGetValue ( tls );
 313                   wsa_ok ( closesocket ( mem->s ), 0 ==, "closesocket error (%lx): %d\n" );
 314                   LocalFree ( (HANDLE) mem->send_buf );
 315                   LocalFree ( (HANDLE) mem );
 316                   ExitThread(0);
 317               }
 318               
 319               /**************** Servers ***************/
 320               
 321               /*
 322 cs130_tom 1.1  * simple_server: A very basic server doing synchronous IO.
 323                */
 324               static VOID WINAPI simple_server ( server_params *par )
 325               {
 326                   test_params *gen = par->general;
 327                   server_memory *mem;
 328                   int n_recvd, n_sent, n_expected = gen->n_chunks * gen->chunk_size, tmp, i,
 329                       id = GetCurrentThreadId();
 330                   char *p;
 331               
 332 cs130_tom 1.14     trace ( "simple_server (%x) starting\n", id );
 333 cs130_tom 1.1  
 334                    set_so_opentype ( FALSE ); /* non-overlapped */
 335                    server_start ( par );
 336                    mem = TlsGetValue ( tls );
 337                
 338                    wsa_ok ( set_blocking ( mem->s, TRUE ), 0 ==, "simple_server (%lx): failed to set blocking mode: %d\n");
 339                    wsa_ok ( listen ( mem->s, SOMAXCONN ), 0 ==, "simple_server (%lx): listen failed: %d\n");
 340                
 341 cs130_tom 1.14     trace ( "simple_server (%x) ready\n", id );
 342 cs130_tom 1.1      SetEvent ( server_ready ); /* notify clients */
 343                
 344                    for ( i = 0; i < min ( gen->n_clients, MAX_CLIENTS ); i++ )
 345                    {
 346 cs130_tom 1.14         trace ( "simple_server (%x): waiting for client\n", id );
 347 cs130_tom 1.1  
 348                        /* accept a single connection */
 349                        tmp = sizeof ( mem->sock[0].peer );
 350                        mem->sock[0].s = accept ( mem->s, (struct sockaddr*) &mem->sock[0].peer, &tmp );
 351                        wsa_ok ( mem->sock[0].s, INVALID_SOCKET !=, "simple_server (%lx): accept failed: %d\n" );
 352                
 353                        ok ( mem->sock[0].peer.sin_addr.s_addr == inet_addr ( gen->inet_addr ),
 354                             "simple_server (%x): strange peer address\n", id );
 355                
 356                        /* Receive data & check it */
 357                        n_recvd = do_synchronous_recv ( mem->sock[0].s, mem->sock[0].buf, n_expected, par->buflen );
 358                        ok ( n_recvd == n_expected,
 359                             "simple_server (%x): received less data than expected: %d of %d\n", id, n_recvd, n_expected );
 360                        p = test_buffer ( mem->sock[0].buf, gen->chunk_size, gen->n_chunks );
 361                        ok ( p == NULL, "simple_server (%x): test pattern error: %d\n", id, p - mem->sock[0].buf);
 362                
 363                        /* Echo data back */
 364                        n_sent = do_synchronous_send ( mem->sock[0].s, mem->sock[0].buf, n_expected, par->buflen );
 365                        ok ( n_sent == n_expected,
 366                             "simple_server (%x): sent less data than expected: %d of %d\n", id, n_sent, n_expected );
 367                
 368 cs130_tom 1.1          /* cleanup */
 369                        read_zero_bytes ( mem->sock[0].s );
 370                        wsa_ok ( closesocket ( mem->sock[0].s ),  0 ==, "simple_server (%lx): closesocket error: %d\n" );
 371                        mem->sock[0].s = INVALID_SOCKET;
 372                    }
 373                
 374 cs130_tom 1.14     trace ( "simple_server (%x) exiting\n", id );
 375 cs130_tom 1.1      server_stop ();
 376                }
 377                
 378 cs130_tom 1.2  /*
 379                 * select_server: A non-blocking server.
 380                 */
 381                static VOID WINAPI select_server ( server_params *par )
 382                {
 383                    test_params *gen = par->general;
 384                    server_memory *mem;
 385 cs130_tom 1.4      int n_expected = gen->n_chunks * gen->chunk_size, tmp, i,
 386 cs130_tom 1.15         id = GetCurrentThreadId(), n_connections = 0, n_sent, n_recvd,
 387                        n_set, delta, n_ready;
 388 cs130_tom 1.2      char *p;
 389 cs130_tom 1.15     struct timeval timeout = {0,10}; /* wait for 10 milliseconds */
 390 cs130_tom 1.3      fd_set fds_recv, fds_send, fds_openrecv, fds_opensend;
 391 cs130_tom 1.2  
 392 cs130_tom 1.5      trace ( "select_server (%x) starting\n", id );
 393 cs130_tom 1.2  
 394                    set_so_opentype ( FALSE ); /* non-overlapped */
 395                    server_start ( par );
 396                    mem = TlsGetValue ( tls );
 397                
 398                    wsa_ok ( set_blocking ( mem->s, FALSE ), 0 ==, "select_server (%lx): failed to set blocking mode: %d\n");
 399                    wsa_ok ( listen ( mem->s, SOMAXCONN ), 0 ==, "select_server (%lx): listen failed: %d\n");
 400                
 401 cs130_tom 1.5      trace ( "select_server (%x) ready\n", id );
 402 cs130_tom 1.2      SetEvent ( server_ready ); /* notify clients */
 403                
 404 cs130_tom 1.3      FD_ZERO ( &fds_openrecv );
 405                    FD_ZERO ( &fds_recv );
 406                    FD_ZERO ( &fds_send );
 407                    FD_ZERO ( &fds_opensend );
 408 cs130_tom 1.5  
 409 cs130_tom 1.3      FD_SET ( mem->s, &fds_openrecv );
 410 cs130_tom 1.2  
 411                    while(1)
 412                    {
 413 cs130_tom 1.3          fds_recv = fds_openrecv;
 414                        fds_send = fds_opensend;
 415 cs130_tom 1.2  
 416 cs130_tom 1.15         n_set = 0;
 417                
 418                        wsa_ok ( ( n_ready = select ( 0, &fds_recv, &fds_send, NULL, &timeout ) ), SOCKET_ERROR !=, 
 419 cs130_tom 1.12             "select_server (%lx): select() failed: %d\n" );
 420 cs130_tom 1.2  
 421                        /* check for incoming requests */
 422 cs130_tom 1.3          if ( FD_ISSET ( mem->s, &fds_recv ) ) {
 423 cs130_tom 1.15             n_set += 1;
 424                
 425 cs130_tom 1.2              trace ( "select_server (%x): accepting client connection\n", id );
 426                
 427                            /* accept a single connection */
 428 cs130_tom 1.13             tmp = sizeof ( mem->sock[n_connections].peer );
 429                            mem->sock[n_connections].s = accept ( mem->s, (struct sockaddr*) &mem->sock[n_connections].peer, &tmp );
 430                            wsa_ok ( mem->sock[n_connections].s, INVALID_SOCKET !=, "select_server (%lx): accept() failed: %d\n" );
 431 cs130_tom 1.2  
 432 cs130_tom 1.13             ok ( mem->sock[n_connections].peer.sin_addr.s_addr == inet_addr ( gen->inet_addr ),
 433 cs130_tom 1.2                  "select_server (%x): strange peer address\n", id );
 434                
 435                            /* add to list of open connections */
 436 cs130_tom 1.13             FD_SET ( mem->sock[n_connections].s, &fds_openrecv );
 437                            FD_SET ( mem->sock[n_connections].s, &fds_opensend );
 438 cs130_tom 1.2  
 439 cs130_tom 1.3              n_connections++;
 440 cs130_tom 1.2          }
 441                
 442                        /* handle open requests */
 443                
 444                        for ( i = 0; i < n_connections; i++ )
 445                        {
 446 cs130_tom 1.15             if ( FD_ISSET( mem->sock[i].s, &fds_recv ) ) {
 447                                n_set += 1;
 448 cs130_tom 1.2  
 449 cs130_tom 1.15                 if ( mem->sock[i].n_recvd < n_expected ) {
 450                                    /* Receive data & check it */
 451                                    n_recvd = recv ( mem->sock[i].s, mem->sock[i].buf + mem->sock[i].n_recvd, min ( n_expected - mem->sock[i].n_recvd, par->buflen ), 0 );
 452                                    ok ( n_recvd != SOCKET_ERROR, "select_server (%x): error in recv(): %d\n", id, WSAGetLastError() );
 453                                    mem->sock[i].n_recvd += n_recvd;
 454                
 455                                    if ( mem->sock[i].n_recvd == n_expected ) {
 456                                        p = test_buffer ( mem->sock[i].buf, gen->chunk_size, gen->n_chunks );
 457                                        ok ( p == NULL, "select_server (%x): test pattern error: %d\n", id, p - mem->sock[i].buf );
 458                                        FD_CLR ( mem->sock[i].s, &fds_openrecv );
 459                                    }
 460                
 461                                    ok ( mem->sock[i].n_recvd <= n_expected, "select_server (%x): received too many bytes: %d\n", id, mem->sock[i].n_recvd );
 462 cs130_tom 1.2                  }
 463 cs130_tom 1.15             }
 464 cs130_tom 1.2  
 465 cs130_tom 1.15             /* only echo back what we've received */
 466                            delta = mem->sock[i].n_recvd - mem->sock[i].n_sent;
 467 cs130_tom 1.8  
 468 cs130_tom 1.15             if ( FD_ISSET ( mem->sock[i].s, &fds_send ) ) {
 469                                n_set += 1;
 470 cs130_tom 1.5  
 471 cs130_tom 1.15                 if ( ( delta > 0 ) && ( mem->sock[i].n_sent < n_expected ) ) {
 472                                    /* Echo data back */
 473                                    n_sent = send ( mem->sock[i].s, mem->sock[i].buf + mem->sock[i].n_sent, min ( delta, par->buflen ), 0 );
 474                                    ok ( n_sent != SOCKET_ERROR, "select_server (%x): error in send(): %d\n", id, WSAGetLastError() );
 475                                    mem->sock[i].n_sent += n_sent;
 476                
 477                                    if ( mem->sock[i].n_sent == n_expected ) {
 478                                        FD_CLR ( mem->sock[i].s, &fds_opensend );
 479                                    }
 480 cs130_tom 1.2  
 481 cs130_tom 1.15                     ok ( mem->sock[i].n_sent <= n_expected, "select_server (%x): sent too many bytes: %d\n", id, mem->sock[i].n_sent );
 482 cs130_tom 1.3                  }
 483                            }
 484 cs130_tom 1.4          }
 485 cs130_tom 1.15 
 486                        /* check that select returned the correct number of ready sockets */
 487                        ok ( ( n_set == n_ready ), "select_server (%x): select() returns wrong number of ready sockets\n", id );
 488 cs130_tom 1.2  
 489 cs130_tom 1.4          /* check if all clients are done */
 490                        if ( ( fds_opensend.fd_count == 0 ) 
 491 cs130_tom 1.9              && ( fds_openrecv.fd_count == 1 ) /* initial socket that accepts clients */
 492 cs130_tom 1.4              && ( n_connections  == min ( gen->n_clients, MAX_CLIENTS ) ) ) {
 493 cs130_tom 1.5              break;
 494 cs130_tom 1.2          }
 495                    }
 496                
 497                    for ( i = 0; i < min ( gen->n_clients, MAX_CLIENTS ); i++ )
 498                    {
 499                        /* cleanup */
 500                        read_zero_bytes ( mem->sock[i].s );
 501                        wsa_ok ( closesocket ( mem->sock[i].s ),  0 ==, "select_server (%lx): closesocket error: %d\n" );
 502                        mem->sock[i].s = INVALID_SOCKET;
 503                    }
 504                
 505                    trace ( "select_server (%x) exiting\n", id );
 506                    server_stop ();
 507                }
 508                
 509 cs130_tom 1.1  /**************** Clients ***************/
 510                
 511                /*
 512                 * simple_client: A very basic client doing synchronous IO.
 513                 */
 514                static VOID WINAPI simple_client ( client_params *par )
 515                {
 516                    test_params *gen = par->general;
 517                    client_memory *mem;
 518                    int n_sent, n_recvd, n_expected = gen->n_chunks * gen->chunk_size, id;
 519                    char *p;
 520                
 521                    id = GetCurrentThreadId();
 522                    trace ( "simple_client (%x): starting\n", id );
 523                    /* wait here because we want to call set_so_opentype before creating a socket */
 524                    WaitForSingleObject ( server_ready, INFINITE );
 525                    trace ( "simple_client (%x): server ready\n", id );
 526                
 527                    check_so_opentype ();
 528                    set_so_opentype ( FALSE ); /* non-overlapped */
 529                    client_start ( par );
 530 cs130_tom 1.1      mem = TlsGetValue ( tls );
 531                
 532                    /* Connect */
 533                    wsa_ok ( connect ( mem->s, (struct sockaddr*) &mem->addr, sizeof ( mem->addr ) ),
 534                             0 ==, "simple_client (%lx): connect error: %d\n" );
 535                    ok ( set_blocking ( mem->s, TRUE ) == 0,
 536                         "simple_client (%x): failed to set blocking mode\n", id );
 537                    trace ( "simple_client (%x) connected\n", id );
 538                
 539                    /* send data to server */
 540                    n_sent = do_synchronous_send ( mem->s, mem->send_buf, n_expected, par->buflen );
 541                    ok ( n_sent == n_expected,
 542                         "simple_client (%x): sent less data than expected: %d of %d\n", id, n_sent, n_expected );
 543                
 544                    /* shutdown send direction */
 545                    wsa_ok ( shutdown ( mem->s, SD_SEND ), 0 ==, "simple_client (%lx): shutdown failed: %d\n" );
 546                
 547                    /* Receive data echoed back & check it */
 548                    n_recvd = do_synchronous_recv ( mem->s, mem->recv_buf, n_expected, par->buflen );
 549                    ok ( n_recvd == n_expected,
 550                         "simple_client (%x): received less data than expected: %d of %d\n", id, n_recvd, n_expected );
 551 cs130_tom 1.1  
 552                    /* check data */
 553                    p = test_buffer ( mem->recv_buf, gen->chunk_size, gen->n_chunks );
 554                    ok ( p == NULL, "simple_client (%x): test pattern error: %d\n", id, p - mem->recv_buf);
 555                
 556                    /* cleanup */
 557                    read_zero_bytes ( mem->s );
 558                    trace ( "simple_client (%x) exiting\n", id );
 559                    client_stop ();
 560                }
 561                
 562                /*
 563                 * event_client: An event-driven client
 564                 */
 565                static void WINAPI event_client ( client_params *par )
 566                {
 567                    test_params *gen = par->general;
 568                    client_memory *mem;
 569                    int id = GetCurrentThreadId(), n_expected = gen->n_chunks * gen->chunk_size,
 570                        tmp, err, n;
 571                    HANDLE event;
 572 cs130_tom 1.1      WSANETWORKEVENTS wsa_events;
 573                    char *send_last, *recv_last, *send_p, *recv_p;
 574                    long mask = FD_READ | FD_WRITE | FD_CLOSE;
 575                
 576                    trace ( "event_client (%x): starting\n", id );
 577                    client_start ( par );
 578                    trace ( "event_client (%x): server ready\n", id );
 579                
 580                    mem = TlsGetValue ( tls );
 581                
 582                    /* Prepare event notification for connect, makes socket nonblocking */
 583                    event = WSACreateEvent ();
 584                    WSAEventSelect ( mem->s, event, FD_CONNECT );
 585                    tmp = connect ( mem->s, (struct sockaddr*) &mem->addr, sizeof ( mem->addr ) );
 586                    if ( tmp != 0 && ( err = WSAGetLastError () ) != WSAEWOULDBLOCK )
 587                        ok ( 0, "event_client (%x): connect error: %d\n", id, err );
 588                
 589                    tmp = WaitForSingleObject ( event, INFINITE );
 590                    ok ( tmp == WAIT_OBJECT_0, "event_client (%x): wait for connect event failed: %d\n", id, tmp );
 591                    err = WSAEnumNetworkEvents ( mem->s, event, &wsa_events );
 592                    wsa_ok ( err, 0 ==, "event_client (%lx): WSAEnumNetworkEvents error: %d\n" );
 593 cs130_tom 1.1  
 594                    err = wsa_events.iErrorCode[ FD_CONNECT_BIT ];
 595                    ok ( err == 0, "event_client (%x): connect error: %d\n", id, err );
 596                    if ( err ) goto out;
 597                
 598                    trace ( "event_client (%x) connected\n", id );
 599                
 600                    WSAEventSelect ( mem->s, event, mask );
 601                
 602                    recv_p = mem->recv_buf;
 603                    recv_last = mem->recv_buf + n_expected;
 604                    send_p = mem->send_buf;
 605                    send_last = mem->send_buf + n_expected;
 606                
 607                    while ( TRUE )
 608                    {
 609                        err = WaitForSingleObject ( event, INFINITE );
 610                        ok ( err == WAIT_OBJECT_0, "event_client (%x): wait failed\n", id );
 611                
 612                        err = WSAEnumNetworkEvents ( mem->s, event, &wsa_events );
 613                        wsa_ok ( err, 0 ==, "event_client (%lx): WSAEnumNetworkEvents error: %d\n" );
 614 cs130_tom 1.1  
 615                        if ( wsa_events.lNetworkEvents & FD_WRITE )
 616                        {
 617                            err = wsa_events.iErrorCode[ FD_WRITE_BIT ];
 618                            ok ( err == 0, "event_client (%x): FD_WRITE error code: %d\n", id, err );
 619                
 620                            if ( err== 0 )
 621                                do
 622                                {
 623                                    n = send ( mem->s, send_p, min ( send_last - send_p, par->buflen ), 0 );
 624                                    if ( n < 0 )
 625                                    {
 626                                        err = WSAGetLastError ();
 627                                        ok ( err == WSAEWOULDBLOCK, "event_client (%x): send error: %d\n", id, err );
 628                                    }
 629                                    else
 630                                        send_p += n;
 631                                }
 632                                while ( n >= 0 && send_p < send_last );
 633                
 634                            if ( send_p == send_last )
 635 cs130_tom 1.1              {
 636                                trace ( "event_client (%x): all data sent - shutdown\n", id );
 637                                shutdown ( mem->s, SD_SEND );
 638                                mask &= ~FD_WRITE;
 639                                WSAEventSelect ( mem->s, event, mask );
 640                            }
 641                        }
 642                        if ( wsa_events.lNetworkEvents & FD_READ )
 643                        {
 644                            err = wsa_events.iErrorCode[ FD_READ_BIT ];
 645                            ok ( err == 0, "event_client (%x): FD_READ error code: %d\n", id, err );
 646                            if ( err != 0 ) break;
 647                            
 648                            /* First read must succeed */
 649                            n = recv ( mem->s, recv_p, min ( recv_last - recv_p, par->buflen ), 0 );
 650                            wsa_ok ( n, 0 <=, "event_client (%lx): recv error: %d\n" );
 651                
 652                            while ( n >= 0 ) {
 653                                recv_p += n;
 654                                if ( recv_p == recv_last )
 655                                {
 656 cs130_tom 1.1                      mask &= ~FD_READ;
 657                                    trace ( "event_client (%x): all data received\n", id );
 658                                    WSAEventSelect ( mem->s, event, mask );
 659                                    break;
 660                                }
 661                                n = recv ( mem->s, recv_p, min ( recv_last - recv_p, par->buflen ), 0 );
 662                                if ( n < 0 && ( err = WSAGetLastError()) != WSAEWOULDBLOCK )
 663                                    ok ( 0, "event_client (%x): read error: %d\n", id, err );
 664                                
 665                            }
 666                        }   
 667                        if ( wsa_events.lNetworkEvents & FD_CLOSE )
 668                        {
 669                            trace ( "event_client (%x): close event\n", id );
 670                            err = wsa_events.iErrorCode[ FD_CLOSE_BIT ];
 671                            ok ( err == 0, "event_client (%x): FD_CLOSE error code: %d\n", id, err );
 672                            break;
 673                        }
 674                    }
 675                
 676                    ok ( send_p == send_last,
 677 cs130_tom 1.1           "simple_client (%x): sent less data than expected: %d of %d\n",
 678                         id, send_p - mem->send_buf, n_expected );
 679                    ok ( recv_p == recv_last,
 680                         "simple_client (%x): received less data than expected: %d of %d\n",
 681                         id, recv_p - mem->recv_buf, n_expected );
 682                    recv_p = test_buffer ( mem->recv_buf, gen->chunk_size, gen->n_chunks );
 683                    ok ( recv_p == NULL, "event_client (%x): test pattern error: %d\n", id, recv_p - mem->recv_buf);
 684                
 685                out:
 686                    WSACloseEvent ( event );
 687                    trace ( "event_client (%x) exiting\n", id );
 688                    client_stop ();
 689                }
 690                
 691                /**************** Main program utility functions ***************/
 692                
 693                static void Init (void)
 694                {
 695                    WORD ver = MAKEWORD (2, 2);
 696                    WSADATA data;
 697                
 698 cs130_tom 1.1      ok ( WSAStartup ( ver, &data ) == 0, "WSAStartup failed\n" );
 699                    tls = TlsAlloc();
 700                }
 701                
 702                static void Exit (void)
 703                {
 704                    TlsFree ( tls );
 705                    ok ( WSACleanup() == 0, "WSACleanup failed\n" );
 706                }
 707                
 708                static void StartServer (LPTHREAD_START_ROUTINE routine,
 709                                         test_params *general, server_params *par)
 710                {
 711                    par->general = general;
 712                    thread[0] = CreateThread ( NULL, 0, routine, par, 0, &thread_id[0] );
 713                    ok ( thread[0] != NULL, "Failed to create server thread\n" );
 714                }
 715                
 716                static void StartClients (LPTHREAD_START_ROUTINE routine,
 717                                          test_params *general, client_params *par)
 718                {
 719 cs130_tom 1.1      int i;
 720                    par->general = general;
 721                    for ( i = 1; i <= min ( general->n_clients, MAX_CLIENTS ); i++ )
 722                    {
 723                        client_id = i - 1;
 724                        thread[i] = CreateThread ( NULL, 0, routine, par, 0, &thread_id[i] );
 725                        ok ( thread[i] != NULL, "Failed to create client thread\n" );
 726                        /* Make sure the client is up and running */
 727                        WaitForSingleObject ( client_ready[client_id], INFINITE );
 728                    };
 729                }
 730                
 731                static void do_test( test_setup *test )
 732                {
 733                    DWORD i, n = min (test->general.n_clients, MAX_CLIENTS);
 734                    DWORD wait;
 735                
 736                    server_ready = CreateEventW ( NULL, TRUE, FALSE, NULL );
 737                    for (i = 0; i <= n; i++)
 738                        client_ready[i] = CreateEventW ( NULL, TRUE, FALSE, NULL );
 739                
 740 cs130_tom 1.1      StartServer ( test->srv, &test->general, &test->srv_params );
 741                    StartClients ( test->clt, &test->general, &test->clt_params );
 742                    WaitForSingleObject ( server_ready, INFINITE );
 743                
 744                    wait = WaitForMultipleObjects ( 1 + n, thread, TRUE, 1000 * TEST_TIMEOUT );
 745                    ok ( wait >= WAIT_OBJECT_0 && wait <= WAIT_OBJECT_0 + n , 
 746                         "some threads have not completed: %lx\n", wait );
 747                
 748                    if ( ! ( wait >= WAIT_OBJECT_0 && wait <= WAIT_OBJECT_0 + n ) )
 749                    {
 750                        for (i = 0; i <= n; i++)
 751                        {
 752                            trace ("terminating thread %08lx\n", thread_id[i]);
 753                            if ( WaitForSingleObject ( thread[i], 0 ) != WAIT_OBJECT_0 )
 754                                TerminateThread ( thread [i], 0 );
 755                        }
 756                    }
 757                    CloseHandle ( server_ready );
 758                    for (i = 0; i <= n; i++)
 759                        CloseHandle ( client_ready[i] );
 760                }
 761 cs130_tom 1.1  
 762                /********* some tests for getsockopt(setsockopt(X)) == X ***********/
 763                /* optname = SO_LINGER */
 764                LINGER linger_testvals[] = {
 765                    {0,0},
 766                    {0,73}, 
 767                    {1,0},
 768                    {5,189}
 769                };
 770                
 771                /* optname = SO_RCVTIMEO, SOSNDTIMEO */
 772                #define SOCKTIMEOUT1 63000 /* 63 seconds. Do not test fractional part because of a
 773                                        bug in the linux kernel (fixed in 2.6.8) */ 
 774                #define SOCKTIMEOUT2 997000 /* 997 seconds */
 775                
 776                static void test_set_getsockopt()
 777                {
 778                    SOCKET s;
 779                    int i, err;
 780                    int timeout;
 781                    LINGER lingval;
 782 cs130_tom 1.1      int size;
 783                
 784                    s = socket(AF_INET, SOCK_STREAM, 0);
 785                    ok(s!=INVALID_SOCKET, "socket() failed error: %d\n", WSAGetLastError());
 786                    if( s == INVALID_SOCKET) return;
 787                    /* SO_RCVTIMEO */
 788                    timeout = SOCKTIMEOUT1;
 789                    size = sizeof(timeout);
 790                    err = setsockopt(s, SOL_SOCKET, SO_RCVTIMEO, (char *) &timeout, size); 
 791                    if( !err)
 792                        err = getsockopt(s, SOL_SOCKET, SO_RCVTIMEO, (char *) &timeout, &size); 
 793                    ok( !err, "get/setsockopt(SO_RCVTIMEO) failed error: %d\n", WSAGetLastError());
 794                    ok( timeout == SOCKTIMEOUT1, "getsockopt(SO_RCVTIMEO) returned wrong value %d\n", timeout);
 795                    /* SO_SNDTIMEO */
 796                    timeout = SOCKTIMEOUT2; /* 54 seconds. See remark above */ 
 797                    size = sizeof(timeout);
 798                    err = setsockopt(s, SOL_SOCKET, SO_SNDTIMEO, (char *) &timeout, size); 
 799                    if( !err)
 800                        err = getsockopt(s, SOL_SOCKET, SO_SNDTIMEO, (char *) &timeout, &size); 
 801                    ok( !err, "get/setsockopt(SO_SNDTIMEO) failed error: %d\n", WSAGetLastError());
 802                    ok( timeout == SOCKTIMEOUT2, "getsockopt(SO_SNDTIMEO) returned wrong value %d\n", timeout);
 803 cs130_tom 1.1      /* SO_LINGER */
 804                    for( i = 0; i < sizeof(linger_testvals)/sizeof(LINGER);i++) {
 805                        size =  sizeof(lingval);
 806                        lingval = linger_testvals[i];
 807                        err = setsockopt(s, SOL_SOCKET, SO_LINGER, (char *) &lingval, size); 
 808                        if( !err)
 809                            err = getsockopt(s, SOL_SOCKET, SO_LINGER, (char *) &lingval, &size); 
 810                        ok( !err, "get/setsockopt(SO_LINGER) failed error: %d\n", WSAGetLastError());
 811                        ok( !lingval.l_onoff == !linger_testvals[i].l_onoff &&
 812                                (lingval.l_linger == linger_testvals[i].l_linger ||
 813                                 (!lingval.l_linger && !linger_testvals[i].l_onoff))
 814                                , "getsockopt(SO_LINGER #%d) returned wrong value %d,%d not %d,%d \n", i, 
 815                                 lingval.l_onoff, lingval.l_linger,
 816                                 linger_testvals[i].l_onoff, linger_testvals[i].l_linger);
 817                    }
 818                    closesocket(s);
 819                }
 820                
 821                static void test_so_reuseaddr()
 822                {
 823                    struct sockaddr_in saddr;
 824 cs130_tom 1.1      SOCKET s1,s2;
 825                    unsigned int rc,reuse,size;
 826                
 827                    saddr.sin_family      = AF_INET;
 828                    saddr.sin_port        = htons(9375);
 829                    saddr.sin_addr.s_addr = inet_addr("127.0.0.1");
 830                
 831                    s1=socket(AF_INET, SOCK_STREAM, 0);
 832                    ok(s1!=INVALID_SOCKET, "socket() failed error: %d\n", WSAGetLastError());
 833                    rc = bind(s1, (struct sockaddr*)&saddr, sizeof(saddr));
 834                    ok(rc!=SOCKET_ERROR, "bind(s1) failed error: %d\n", WSAGetLastError());
 835                
 836                    s2=socket(AF_INET, SOCK_STREAM, 0);
 837                    ok(s2!=INVALID_SOCKET, "socket() failed error: %d\n", WSAGetLastError());
 838                
 839                    reuse=0x1234;
 840                    size=sizeof(reuse);
 841                    rc=getsockopt(s2, SOL_SOCKET, SO_REUSEADDR, (char*)&reuse, &size );
 842                    ok(rc==0 && reuse==0,"wrong result in getsockopt(SO_REUSEADDR): rc=%d reuse=%d\n",rc,reuse);
 843                
 844                    rc = bind(s2, (struct sockaddr*)&saddr, sizeof(saddr));
 845 cs130_tom 1.1      ok(rc==SOCKET_ERROR, "bind() succeeded\n");
 846                
 847                    reuse = 1;
 848                    rc = setsockopt(s2, SOL_SOCKET, SO_REUSEADDR, (char*)&reuse, sizeof(reuse));
 849                    ok(rc==0, "setsockopt() failed error: %d\n", WSAGetLastError());
 850                
 851                    todo_wine {
 852                    rc = bind(s2, (struct sockaddr*)&saddr, sizeof(saddr));
 853                    ok(rc==0, "bind() failed error: %d\n", WSAGetLastError());
 854                    }
 855                
 856                    closesocket(s2);
 857                    closesocket(s1);
 858                }
 859                
 860                /************* Array containing the tests to run **********/
 861                
 862                #define STD_STREAM_SOCKET \
 863                            SOCK_STREAM, \
 864                            0, \
 865                            "127.0.0.1", \
 866 cs130_tom 1.1              9374
 867                
 868                static test_setup tests [NUM_TESTS] =
 869                {
 870                    /* Test 0: synchronous client and server */
 871                    {
 872                        {
 873                            STD_STREAM_SOCKET,
 874                            2048,
 875                            16,
 876                            2
 877                        },
 878                        simple_server,
 879                        {
 880                            NULL,
 881                            0,
 882                            64
 883                        },
 884                        simple_client,
 885                        {
 886                            NULL,
 887 cs130_tom 1.1              0,
 888                            128
 889                        }
 890                    },
 891                    /* Test 1: event-driven client, synchronous server */
 892                    {
 893                        {
 894                            STD_STREAM_SOCKET,
 895                            2048,
 896                            16,
 897                            2
 898                        },
 899                        simple_server,
 900 cs130_tom 1.2          {
 901                            NULL,
 902                            0,
 903                            64
 904                        },
 905                        event_client,
 906                        {
 907                            NULL,
 908                            WSA_FLAG_OVERLAPPED,
 909                            128
 910                        }
 911                    },
 912 cs130_tom 1.6      /* Test 2: synchronous client, non-blocking server via select() */
 913 cs130_tom 1.2      {
 914                        {
 915                            STD_STREAM_SOCKET,
 916                            2048,
 917                            16,
 918                            2
 919                        },
 920                        select_server,
 921 cs130_tom 1.1          {
 922                            NULL,
 923                            0,
 924                            64
 925                        },
 926 cs130_tom 1.3          simple_client,
 927 cs130_tom 1.1          {
 928                            NULL,
 929 cs130_tom 1.3              0,
 930 cs130_tom 1.1              128
 931                        }
 932                    }
 933                };
 934                
 935                static void test_WSAAddressToStringA()
 936                {
 937                    INT ret;
 938                    DWORD len;
 939                    SOCKADDR_IN sockaddr;
 940                    CHAR address[22]; /* 12 digits + 3 dots + ':' + 5 digits + '\0' */
 941                
 942                    CHAR expect1[] = "0.0.0.0";
 943                    CHAR expect2[] = "255.255.255.255";
 944                    CHAR expect3[] = "0.0.0.0:65535";
 945                    CHAR expect4[] = "255.255.255.255:65535";
 946                
 947                    len = 0;
 948                
 949                    sockaddr.sin_family = AF_INET;
 950                    sockaddr.sin_port = 0;
 951 cs130_tom 1.1      sockaddr.sin_addr.s_addr = 0;
 952                
 953                    ret = WSAAddressToStringA( (SOCKADDR*)&sockaddr, sizeof(sockaddr), NULL, address, &len );
 954                    ok( ret == SOCKET_ERROR, "WSAAddressToStringA() succeeded unexpectedly: %d\n", WSAGetLastError() );
 955                
 956                    len = sizeof(address);
 957                
 958                    sockaddr.sin_family = AF_INET;
 959                    sockaddr.sin_port = 0;
 960                    sockaddr.sin_addr.s_addr = 0;
 961                
 962                    ret = WSAAddressToStringA( (SOCKADDR*)&sockaddr, sizeof(sockaddr), NULL, address, &len );
 963                    ok( !ret, "WSAAddressToStringA() failed unexpectedly: %d\n", WSAGetLastError() );
 964                
 965                    ok( !strcmp( address, expect1 ), "Expected: %s, got: %s\n", expect1, address );
 966                
 967                    len = sizeof(address);
 968                
 969                    sockaddr.sin_family = AF_INET;
 970                    sockaddr.sin_port = 0;
 971                    sockaddr.sin_addr.s_addr = 0xffffffff;
 972 cs130_tom 1.1  
 973                    ret = WSAAddressToStringA( (SOCKADDR*)&sockaddr, sizeof(sockaddr), NULL, address, &len );
 974                    ok( !ret, "WSAAddressToStringA() failed unexpectedly: %d\n", WSAGetLastError() );
 975                
 976                    ok( !strcmp( address, expect2 ), "Expected: %s, got: %s\n", expect2, address );
 977                
 978                    len = sizeof(address);
 979                
 980                    sockaddr.sin_family = AF_INET;
 981                    sockaddr.sin_port = 0xffff;
 982                    sockaddr.sin_addr.s_addr = 0;
 983                
 984                    ret = WSAAddressToStringA( (SOCKADDR*)&sockaddr, sizeof(sockaddr), NULL, address, &len );
 985                    ok( !ret, "WSAAddressToStringA() failed unexpectedly: %d\n", WSAGetLastError() );
 986                
 987                    ok( !strcmp( address, expect3 ), "Expected: %s, got: %s\n", expect3, address );
 988                
 989                    len = sizeof(address);
 990                
 991                    sockaddr.sin_family = AF_INET;
 992                    sockaddr.sin_port = 0xffff;
 993 cs130_tom 1.1      sockaddr.sin_addr.s_addr = 0xffffffff;
 994                
 995                    ret = WSAAddressToStringA( (SOCKADDR*)&sockaddr, sizeof(sockaddr), NULL, address, &len );
 996                    ok( !ret, "WSAAddressToStringA() failed unexpectedly: %d\n", WSAGetLastError() );
 997                
 998                    ok( !strcmp( address, expect4 ), "Expected: %s, got: %s\n", expect4, address );
 999                }
1000                
1001                static void test_WSAAddressToStringW()
1002                {
1003                    INT ret;
1004                    DWORD len;
1005                    SOCKADDR_IN sockaddr;
1006                    WCHAR address[22]; /* 12 digits + 3 dots + ':' + 5 digits + '\0' */
1007                
1008                    WCHAR expect1[] = { '0','.','0','.','0','.','0', 0 };
1009                    WCHAR expect2[] = { '2','5','5','.','2','5','5','.','2','5','5','.','2','5','5', 0 };
1010                    WCHAR expect3[] = { '0','.','0','.','0','.','0', ':', '6', '5', '5', '3', '5', 0 };
1011                    WCHAR expect4[] = { '2','5','5','.','2','5','5','.','2','5','5','.','2','5','5', ':',
1012                                        '6', '5', '5', '3', '5', 0 };
1013                
1014 cs130_tom 1.1      len = 0;
1015                
1016                    sockaddr.sin_family = AF_INET;
1017                    sockaddr.sin_port = 0;
1018                    sockaddr.sin_addr.s_addr = 0;
1019                
1020                    ret = WSAAddressToStringW( (SOCKADDR*)&sockaddr, sizeof(sockaddr), NULL, address, &len );
1021                    ok( ret == SOCKET_ERROR, "WSAAddressToStringW() succeeded unexpectedly: %x\n", WSAGetLastError() );
1022                
1023                    len = sizeof(address);
1024                
1025                    sockaddr.sin_family = AF_INET;
1026                    sockaddr.sin_port = 0;
1027                    sockaddr.sin_addr.s_addr = 0;
1028                
1029                    ret = WSAAddressToStringW( (SOCKADDR*)&sockaddr, sizeof(sockaddr), NULL, address, &len );
1030                    ok( !ret, "WSAAddressToStringW() failed unexpectedly: %x\n", WSAGetLastError() );
1031                
1032                    ok( !lstrcmpW( address, expect1 ), "Expected different address string\n" );
1033                
1034                    len = sizeof(address);
1035 cs130_tom 1.1  
1036                    sockaddr.sin_family = AF_INET;
1037                    sockaddr.sin_port = 0;
1038                    sockaddr.sin_addr.s_addr = 0xffffffff;
1039                
1040                    ret = WSAAddressToStringW( (SOCKADDR*)&sockaddr, sizeof(sockaddr), NULL, address, &len );
1041                    ok( !ret, "WSAAddressToStringW() failed unexpectedly: %x\n", WSAGetLastError() );
1042                
1043                    ok( !lstrcmpW( address, expect2 ), "Expected different address string\n" );
1044                
1045                    len = sizeof(address);
1046                
1047                    sockaddr.sin_family = AF_INET;
1048                    sockaddr.sin_port = 0xffff;
1049                    sockaddr.sin_addr.s_addr = 0;
1050                
1051                    ret = WSAAddressToStringW( (SOCKADDR*)&sockaddr, sizeof(sockaddr), NULL, address, &len );
1052                    ok( !ret, "WSAAddressToStringW() failed unexpectedly: %x\n", WSAGetLastError() );
1053                
1054                    ok( !lstrcmpW( address, expect3 ), "Expected different address string\n" );
1055                
1056 cs130_tom 1.1      len = sizeof(address);
1057                
1058                    sockaddr.sin_family = AF_INET;
1059                    sockaddr.sin_port = 0xffff;
1060                    sockaddr.sin_addr.s_addr = 0xffffffff;
1061                
1062                    ret = WSAAddressToStringW( (SOCKADDR*)&sockaddr, sizeof(sockaddr), NULL, address, &len );
1063                    ok( !ret, "WSAAddressToStringW() failed unexpectedly: %x\n", WSAGetLastError() );
1064                
1065                    ok( !lstrcmpW( address, expect4 ), "Expected different address string\n" );
1066                }
1067                
1068                static void test_WSAStringToAddressA()
1069                {
1070                    INT ret, len;
1071                    SOCKADDR_IN sockaddr;
1072                
1073                    CHAR address1[] = "0.0.0.0";
1074                    CHAR address2[] = "127.127.127.127";
1075                    CHAR address3[] = "255.255.255.255";
1076                    CHAR address4[] = "127.127.127.127:65535";
1077 cs130_tom 1.1      CHAR address5[] = "255.255.255.255:65535";
1078                
1079                    len = 0;
1080                    sockaddr.sin_family = AF_INET;
1081                
1082                    ret = WSAStringToAddressA( address1, AF_INET, NULL, (SOCKADDR*)&sockaddr, &len );
1083                    ok( ret == SOCKET_ERROR, "WSAStringToAddressA() succeeded unexpectedly: %x\n",
1084                        WSAGetLastError() );
1085                
1086                    len = sizeof(sockaddr);
1087                    sockaddr.sin_port = 0;
1088                    sockaddr.sin_addr.s_addr = 0;
1089                
1090                    ret = WSAStringToAddressA( address1, AF_INET, NULL, (SOCKADDR*)&sockaddr, &len );
1091                    ok( !ret && sockaddr.sin_addr.s_addr == 0,
1092                        "WSAStringToAddressA() failed unexpectedly: %d\n", WSAGetLastError() );
1093                
1094                    len = sizeof(sockaddr);
1095                    sockaddr.sin_port = 0;
1096                    sockaddr.sin_addr.s_addr = 0;
1097                
1098 cs130_tom 1.1      ret = WSAStringToAddressA( address2, AF_INET, NULL, (SOCKADDR*)&sockaddr, &len );
1099                    ok( !ret && sockaddr.sin_addr.s_addr == 0x7f7f7f7f,
1100                        "WSAStringToAddressA() failed unexpectedly: %d\n", WSAGetLastError() );
1101                
1102                    len = sizeof(sockaddr);
1103                
1104                    ret = WSAStringToAddressA( address3, AF_INET, NULL, (SOCKADDR*)&sockaddr, &len );
1105                    ok( ret, "WSAStringToAddressA() succeeded unexpectedly: %d\n", WSAGetLastError() );
1106                
1107                    len = sizeof(sockaddr);
1108                    sockaddr.sin_port = 0;
1109                    sockaddr.sin_addr.s_addr = 0;
1110                
1111                    ret = WSAStringToAddressA( address4, AF_INET, NULL, (SOCKADDR*)&sockaddr, &len );
1112                    ok( !ret && sockaddr.sin_addr.s_addr == 0x7f7f7f7f && sockaddr.sin_port == 0xffff,
1113                        "WSAStringToAddressA() failed unexpectedly: %d\n", WSAGetLastError() );
1114                
1115                    len = sizeof(sockaddr);
1116                
1117                    ret = WSAStringToAddressA( address5, AF_INET, NULL, (SOCKADDR*)&sockaddr, &len );
1118                    ok( ret, "WSAStringToAddressA() succeeded unexpectedly: %d\n", WSAGetLastError() );
1119 cs130_tom 1.1  }
1120                
1121                static void test_WSAStringToAddressW()
1122                {
1123                    INT ret, len;
1124                    SOCKADDR_IN sockaddr;
1125                
1126                    WCHAR address1[] = { '0','.','0','.','0','.','0', 0 };
1127                    WCHAR address2[] = { '1','2','7','.','1','2','7','.','1','2','7','.','1','2','7', 0 };
1128                    WCHAR address3[] = { '2','5','5','.','2','5','5','.','2','5','5','.','2','5','5', 0 };
1129                    WCHAR address4[] = { '1','2','7','.','1','2','7','.','1','2','7','.','1','2','7',
1130                                         ':', '6', '5', '5', '3', '5', 0 };
1131                    WCHAR address5[] = { '2','5','5','.','2','5','5','.','2','5','5','.','2','5','5', ':',
1132                                         '6', '5', '5', '3', '5', 0 };
1133                
1134                    len = 0;
1135                    sockaddr.sin_family = AF_INET;
1136                
1137                    ret = WSAStringToAddressW( address1, AF_INET, NULL, (SOCKADDR*)&sockaddr, &len );
1138                    ok( ret == SOCKET_ERROR, "WSAStringToAddressW() failed unexpectedly: %d\n",
1139                        WSAGetLastError() );
1140 cs130_tom 1.1  
1141                    len = sizeof(sockaddr);
1142                    sockaddr.sin_port = 0;
1143                    sockaddr.sin_addr.s_addr = 0;
1144                
1145                    ret = WSAStringToAddressW( address1, AF_INET, NULL, (SOCKADDR*)&sockaddr, &len );
1146                    ok( !ret && sockaddr.sin_addr.s_addr == 0,
1147                        "WSAStringToAddressW() failed unexpectedly: %d\n", WSAGetLastError() );
1148                
1149                    len = sizeof(sockaddr);
1150                
1151                    sockaddr.sin_port = 0;
1152                    sockaddr.sin_addr.s_addr = 0;
1153                
1154                    ret = WSAStringToAddressW( address2, AF_INET, NULL, (SOCKADDR*)&sockaddr, &len );
1155                    ok( !ret && sockaddr.sin_addr.s_addr == 0x7f7f7f7f,
1156                        "WSAStringToAddressW() failed unexpectedly: %d\n", WSAGetLastError() );
1157                
1158                    len = sizeof(sockaddr);
1159                
1160                    ret = WSAStringToAddressW( address3, AF_INET, NULL, (SOCKADDR*)&sockaddr, &len );
1161 cs130_tom 1.1      ok( ret, "WSAStringToAddressW() failed unexpectedly: %d\n", WSAGetLastError() );
1162                
1163                    len = sizeof(sockaddr);
1164                    sockaddr.sin_port = 0;
1165                    sockaddr.sin_addr.s_addr = 0;
1166                
1167                    ret = WSAStringToAddressW( address4, AF_INET, NULL, (SOCKADDR*)&sockaddr, &len );
1168                    ok( !ret && sockaddr.sin_addr.s_addr == 0x7f7f7f7f && sockaddr.sin_port == 0xffff,
1169                        "WSAStringToAddressW() failed unexpectedly: %d\n", WSAGetLastError() );
1170                
1171                    len = sizeof(sockaddr);
1172                
1173                    ret = WSAStringToAddressW( address5, AF_INET, NULL, (SOCKADDR*)&sockaddr, &len );
1174                    ok( ret, "WSAStringToAddressW() succeeded unexpectedly: %d\n", WSAGetLastError() );
1175                }
1176                
1177                /**************** Main program  ***************/
1178                
1179                START_TEST( sock )
1180                {
1181                    int i;
1182 cs130_tom 1.1      Init();
1183                
1184                    test_set_getsockopt();
1185                    test_so_reuseaddr();
1186                
1187                    for (i = 0; i < NUM_TESTS; i++)
1188                    {
1189                        trace ( " **** STARTING TEST %d **** \n", i );
1190                        do_test (  &tests[i] );
1191                        trace ( " **** TEST %d COMPLETE **** \n", i );
1192                    }
1193                
1194                    test_WSAAddressToStringA();
1195                    test_WSAAddressToStringW();
1196                
1197                    test_WSAStringToAddressA();
1198                    test_WSAStringToAddressW();
1199                
1200                    Exit();
1201                }

Rizwan Kassim
Powered by
ViewCVS 0.9.2