text: /* TEMPLATE GENERATED TESTCASE FILE
  Filename: CWE761_Free_Pointer_Not_At_Start_Of_Buffer__char_listen_socket_32.c
  Label Definition File: CWE761_Free_Pointer_Not_At_Start_Of_Buffer.label.xml
  Template File: source-sinks-32.tmpl.c
  */
  /*
   * @description
   * CWE: 761 Free Pointer Not At Start of Buffer
   * BadSource: listen_socket Read data using a listen socket (server side)
   * Sinks:
   *    GoodSink: free() memory correctly at the start of the buffer
   *    BadSink : free() memory not at the start of the buffer
   * Flow Variant: 32 Data flow: two pointers to the same value within the same function
   *
   * */
  
  #include "std_testcase.h"
  
  #include <wchar.h>
  
  #define SEARCH_CHAR 'S'
  #define BAD_SRC_FIXED "Fixed String" /* MAINTENANCE NOTE: This string must contain the SEARCH_CHAR */
  
  #ifdef _WIN32
  # include <winsock2.h>
  # include <windows.h>
  # include <direct.h>
  # define PATH_SZ 100
  # pragma comment(lib, "ws2_32") /* include ws2_32.lib when linking */
  # define CLOSE_SOCKET closesocket
  #else
  # define PATH_SZ PATH_MAX
  # define INVALID_SOCKET -1
  # define SOCKET_ERROR -1
  # define CLOSE_SOCKET close
  # define SOCKET int
  #endif
  
  #define TCP_PORT 27015
  #define LISTEN_BACKLOG 5
  
  #ifndef OMITBAD
  
  void CWE761_Free_Pointer_Not_At_Start_Of_Buffer__char_listen_socket_32_bad()
  {
      char * data;
      char * *data_ptr1 = &data;
      char * *data_ptr2 = &data;
      data = (char *)malloc(100*sizeof(char));
      data[0] = '\0';
      {
          char * data = *data_ptr1;
          {
  #ifdef _WIN32
              WSADATA wsa_data;
              int wsa_data_init = 0;
  #endif
              int recv_rv;
              struct sockaddr_in s_in;
              char *replace;
              SOCKET listen_socket = INVALID_SOCKET;
              SOCKET accept_socket = INVALID_SOCKET;
              size_t data_len = strlen(data);
              do
              {
  #ifdef _WIN32
                  if (WSAStartup(MAKEWORD(2,2), &wsa_data) != NO_ERROR) break;
                  wsa_data_init = 1;
  #endif
                  listen_socket = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
                  if (listen_socket == INVALID_SOCKET) break;
                  memset(&s_in, 0, sizeof(s_in));
                  s_in.sin_family = AF_INET;
                  s_in.sin_addr.s_addr = INADDR_ANY;
                  s_in.sin_port = htons(TCP_PORT);
                  if (bind(listen_socket, (struct sockaddr*)&s_in, sizeof(s_in)) == SOCKET_ERROR) break;
                  if (listen(listen_socket, LISTEN_BACKLOG) == SOCKET_ERROR) break;
                  accept_socket = accept(listen_socket, NULL, NULL);
                  if (accept_socket == SOCKET_ERROR) break;
                  /* Abort on error or the connection was closed */
                  recv_rv = recv(accept_socket, (char *)data+data_len, (int)(100-data_len-1), 0);
                  if (recv_rv == SOCKET_ERROR || recv_rv == 0) break;
                  /* Append null terminator */
                  data[recv_rv] = '\0';
                  /* Eliminate CRLF */
                  replace = strchr(data, '\r');
                  if (replace) *replace = '\0';
                  replace = strchr(data, '\n');
                  if (replace) *replace = '\0';
              }
              while (0);
              if (listen_socket != INVALID_SOCKET) CLOSE_SOCKET(listen_socket);
              if (accept_socket != INVALID_SOCKET) CLOSE_SOCKET(accept_socket);
  #ifdef _WIN32
              if (wsa_data_init) WSACleanup();
  #endif
          }
          *data_ptr1 = data;
      }
      {
          char * data = *data_ptr2;
          /* FLAW: We are incrementing the pointer in the loop - this will cause us to free the
           * memory block not at the start of the buffer */
          for (; *data != '\0'; data++)
          {
              if (*data == SEARCH_CHAR)
              {
                  printLine("We have a match!");
                  break;
              }
          }
          free(data);
      }
  }
  
  #endif /* OMITBAD */
  
  #ifndef OMITGOOD
  
  /* goodB2G() uses the BadSource with the GoodSink */
  static void goodB2G()
  {
      char * data;
      char * *data_ptr1 = &data;
      char * *data_ptr2 = &data;
      data = (char *)malloc(100*sizeof(char));
      data[0] = '\0';
      {
          char * data = *data_ptr1;
          {
  #ifdef _WIN32
              WSADATA wsa_data;
              int wsa_data_init = 0;
  #endif
              int recv_rv;
              struct sockaddr_in s_in;
              char *replace;
              SOCKET listen_socket = INVALID_SOCKET;
              SOCKET accept_socket = INVALID_SOCKET;
              size_t data_len = strlen(data);
              do
              {
  #ifdef _WIN32
                  if (WSAStartup(MAKEWORD(2,2), &wsa_data) != NO_ERROR) break;
                  wsa_data_init = 1;
  #endif
                  listen_socket = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
                  if (listen_socket == INVALID_SOCKET) break;
                  memset(&s_in, 0, sizeof(s_in));
                  s_in.sin_family = AF_INET;
                  s_in.sin_addr.s_addr = INADDR_ANY;
                  s_in.sin_port = htons(TCP_PORT);
                  if (bind(listen_socket, (struct sockaddr*)&s_in, sizeof(s_in)) == SOCKET_ERROR) break;
                  if (listen(listen_socket, LISTEN_BACKLOG) == SOCKET_ERROR) break;
                  accept_socket = accept(listen_socket, NULL, NULL);
                  if (accept_socket == SOCKET_ERROR) break;
                  /* Abort on error or the connection was closed */
                  recv_rv = recv(accept_socket, (char *)data+data_len, (int)(100-data_len-1), 0);
                  if (recv_rv == SOCKET_ERROR || recv_rv == 0) break;
                  /* Append null terminator */
                  data[recv_rv] = '\0';
                  /* Eliminate CRLF */
                  replace = strchr(data, '\r');
                  if (replace) *replace = '\0';
                  replace = strchr(data, '\n');
                  if (replace) *replace = '\0';
              }
              while (0);
              if (listen_socket != INVALID_SOCKET) CLOSE_SOCKET(listen_socket);
              if (accept_socket != INVALID_SOCKET) CLOSE_SOCKET(accept_socket);
  #ifdef _WIN32
              if (wsa_data_init) WSACleanup();
  #endif
          }
          *data_ptr1 = data;
      }
      {
          char * data = *data_ptr2;
          {
              size_t i;
              /* FIX: Use a loop variable to traverse through the string pointed to by data */
              for (i=0; i < strlen(data); i++)
              {
                  if (data[i] == SEARCH_CHAR)
                  {
                      printLine("We have a match!");
                      break;
                  }
              }
              free(data);
          }
      }
  }
  
  void CWE761_Free_Pointer_Not_At_Start_Of_Buffer__char_listen_socket_32_good()
  {
      goodB2G();
  }
  
  #endif /* OMITGOOD */
  
  /* Below is the main(). It is only used when building this testcase on
     its own for testing or for building a binary to use in testing binary
     analysis tools. It is not used when compiling all the testcases as one
     application, which is how source code analysis tools are tested. */
  
  #ifdef INCLUDEMAIN
  
  int main(int argc, char * argv[])
  {
      /* seed randomness */
      srand( (unsigned)time(NULL) );
  #ifndef OMITGOOD
      printLine("Calling good()...");
      CWE761_Free_Pointer_Not_At_Start_Of_Buffer__char_listen_socket_32_good();
      printLine("Finished good()");
  #endif /* OMITGOOD */
  #ifndef OMITBAD
      printLine("Calling bad()...");
      CWE761_Free_Pointer_Not_At_Start_Of_Buffer__char_listen_socket_32_bad();
      printLine("Finished bad()");
  #endif /* OMITBAD */
      return 0;
  }
  
  #endif
  