text: /* TEMPLATE GENERATED TESTCASE FILE
  Filename: CWE400_Resource_Exhaustion__listen_socket_fwrite_18.c
  Label Definition File: CWE400_Resource_Exhaustion.label.xml
  Template File: sources-sinks-18.tmpl.c
  */
  /*
   * @description
   * CWE: 400 Resource Exhaustion
   * BadSource: listen_socket Read data using a listen socket (server side)
   * GoodSource: Assign count to be a relatively small number
   * Sinks: fwrite
   *    GoodSink: Write to a file count number of times, but first validate count
   *    BadSink : Write to a file count number of times
   * Flow Variant: 18 Control flow: goto statements
   *
   * */
  
  #include "std_testcase.h"
  
  #ifdef _WIN32
  #include <winsock2.h>
  #include <windows.h>
  #include <direct.h>
  #pragma comment(lib, "ws2_32") /* include ws2_32.lib when linking */
  #define CLOSE_SOCKET closesocket
  #else
  #include <sys/types.h>
  #include <sys/socket.h>
  #include <netinet/in.h>
  #include <arpa/inet.h>
  #include <unistd.h>
  #define INVALID_SOCKET -1
  #define SOCKET_ERROR -1
  #define CLOSE_SOCKET close
  #define SOCKET int
  #endif
  
  #define TCP_PORT 27015
  #define LISTEN_BACKLOG 5
  #define CHAR_ARRAY_SIZE (3 * sizeof(count) + 2)
  
  #define SENTENCE "This is the sentence we are printing to the file. "
  
  #ifndef OMITBAD
  
  void CWE400_Resource_Exhaustion__listen_socket_fwrite_18_bad()
  {
      int count;
      /* Initialize count */
      count = -1;
      goto source;
  source:
      {
  #ifdef _WIN32
          WSADATA wsaData;
          int wsaDataInit = 0;
  #endif
          int recvResult;
          struct sockaddr_in service;
          SOCKET listenSocket = INVALID_SOCKET;
          SOCKET acceptSocket = INVALID_SOCKET;
          char inputBuffer[CHAR_ARRAY_SIZE];
          do
          {
  #ifdef _WIN32
              if (WSAStartup(MAKEWORD(2,2), &wsaData) != NO_ERROR)
              {
                  break;
              }
              wsaDataInit = 1;
  #endif
              /* POTENTIAL FLAW: Read count using a listen socket */
              listenSocket = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
              if (listenSocket == INVALID_SOCKET)
              {
                  break;
              }
              memset(&service, 0, sizeof(service));
              service.sin_family = AF_INET;
              service.sin_addr.s_addr = INADDR_ANY;
              service.sin_port = htons(TCP_PORT);
              if (bind(listenSocket, (struct sockaddr*)&service, sizeof(service)) == SOCKET_ERROR)
              {
                  break;
              }
              if (listen(listenSocket, LISTEN_BACKLOG) == SOCKET_ERROR)
              {
                  break;
              }
              acceptSocket = accept(listenSocket, NULL, NULL);
              if (acceptSocket == SOCKET_ERROR)
              {
                  break;
              }
              /* Abort on error or the connection was closed */
              recvResult = recv(acceptSocket, inputBuffer, CHAR_ARRAY_SIZE - 1, 0);
              if (recvResult == SOCKET_ERROR || recvResult == 0)
              {
                  break;
              }
              /* NUL-terminate the string */
              inputBuffer[recvResult] = '\0';
              /* Convert to int */
              count = atoi(inputBuffer);
          }
          while (0);
          if (listenSocket != INVALID_SOCKET)
          {
              CLOSE_SOCKET(listenSocket);
          }
          if (acceptSocket != INVALID_SOCKET)
          {
              CLOSE_SOCKET(acceptSocket);
          }
  #ifdef _WIN32
          if (wsaDataInit)
          {
              WSACleanup();
          }
  #endif
      }
      goto sink;
  sink:
      {
          size_t i = 0;
          FILE *pFile = NULL;
          const char *filename = "output_bad.txt";
          pFile = fopen(filename, "w+");
          if (pFile == NULL)
          {
              exit(1);
          }
          /* POTENTIAL FLAW: For loop using count as the loop variant and no validation
           * This can cause a file to become very large */
          for (i = 0; i < (size_t)count; i++)
          {
              if (strlen(SENTENCE) != fwrite(SENTENCE, sizeof(char), strlen(SENTENCE), pFile))
              {
                  exit(1);
              }
          }
          if (pFile)
          {
              fclose(pFile);
          }
      }
  }
  
  #endif /* OMITBAD */
  
  #ifndef OMITGOOD
  
  /* goodB2G() - use badsource and goodsink by reversing the blocks on the second goto statement */
  static void goodB2G()
  {
      int count;
      /* Initialize count */
      count = -1;
      goto source;
  source:
      {
  #ifdef _WIN32
          WSADATA wsaData;
          int wsaDataInit = 0;
  #endif
          int recvResult;
          struct sockaddr_in service;
          SOCKET listenSocket = INVALID_SOCKET;
          SOCKET acceptSocket = INVALID_SOCKET;
          char inputBuffer[CHAR_ARRAY_SIZE];
          do
          {
  #ifdef _WIN32
              if (WSAStartup(MAKEWORD(2,2), &wsaData) != NO_ERROR)
              {
                  break;
              }
              wsaDataInit = 1;
  #endif
              /* POTENTIAL FLAW: Read count using a listen socket */
              listenSocket = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);
              if (listenSocket == INVALID_SOCKET)
              {
                  break;
              }
              memset(&service, 0, sizeof(service));
              service.sin_family = AF_INET;
              service.sin_addr.s_addr = INADDR_ANY;
              service.sin_port = htons(TCP_PORT);
              if (bind(listenSocket, (struct sockaddr*)&service, sizeof(service)) == SOCKET_ERROR)
              {
                  break;
              }
              if (listen(listenSocket, LISTEN_BACKLOG) == SOCKET_ERROR)
              {
                  break;
              }
              acceptSocket = accept(listenSocket, NULL, NULL);
              if (acceptSocket == SOCKET_ERROR)
              {
                  break;
              }
              /* Abort on error or the connection was closed */
              recvResult = recv(acceptSocket, inputBuffer, CHAR_ARRAY_SIZE - 1, 0);
              if (recvResult == SOCKET_ERROR || recvResult == 0)
              {
                  break;
              }
              /* NUL-terminate the string */
              inputBuffer[recvResult] = '\0';
              /* Convert to int */
              count = atoi(inputBuffer);
          }
          while (0);
          if (listenSocket != INVALID_SOCKET)
          {
              CLOSE_SOCKET(listenSocket);
          }
          if (acceptSocket != INVALID_SOCKET)
          {
              CLOSE_SOCKET(acceptSocket);
          }
  #ifdef _WIN32
          if (wsaDataInit)
          {
              WSACleanup();
          }
  #endif
      }
      goto sink;
  sink:
      {
          size_t i = 0;
          FILE *pFile = NULL;
          const char *filename = "output_good.txt";
          /* FIX: Validate count before using it as the for loop variant to write to a file */
          if (count > 0 && count <= 20)
          {
              pFile = fopen(filename, "w+");
              if (pFile == NULL)
              {
                  exit(1);
              }
              for (i = 0; i < (size_t)count; i++)
              {
                  if (strlen(SENTENCE) != fwrite(SENTENCE, sizeof(char), strlen(SENTENCE), pFile)) exit(1);
              }
              if (pFile)
              {
                  fclose(pFile);
              }
          }
      }
  }
  
  /* goodG2B() - use goodsource and badsink by reversing the blocks on the first goto statement */
  static void goodG2B()
  {
      int count;
      /* Initialize count */
      count = -1;
      goto source;
  source:
      /* FIX: Use a relatively small number */
      count = 20;
      goto sink;
  sink:
      {
          size_t i = 0;
          FILE *pFile = NULL;
          const char *filename = "output_bad.txt";
          pFile = fopen(filename, "w+");
          if (pFile == NULL)
          {
              exit(1);
          }
          /* POTENTIAL FLAW: For loop using count as the loop variant and no validation
           * This can cause a file to become very large */
          for (i = 0; i < (size_t)count; i++)
          {
              if (strlen(SENTENCE) != fwrite(SENTENCE, sizeof(char), strlen(SENTENCE), pFile))
              {
                  exit(1);
              }
          }
          if (pFile)
          {
              fclose(pFile);
          }
      }
  }
  
  void CWE400_Resource_Exhaustion__listen_socket_fwrite_18_good()
  {
      goodB2G();
      goodG2B();
  }
  
  #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()...");
      CWE400_Resource_Exhaustion__listen_socket_fwrite_18_good();
      printLine("Finished good()");
  #endif /* OMITGOOD */
  #ifndef OMITBAD
      printLine("Calling bad()...");
      CWE400_Resource_Exhaustion__listen_socket_fwrite_18_bad();
      printLine("Finished bad()");
  #endif /* OMITBAD */
      return 0;
  }
  
  #endif
  