Subversion Repositories Games.Chess Giants

   AppendMenu (hDropDownMenu, MF_SEPARATOR, 0, NULL);

   AppendMenu (hDropDownMenu, MF_STRING, MENUID_HELP_REPORTAPROBLEM, LOCALIZE (L"Menu_HelpReportAProblem"));

}

bool Debug_SendLogToAuthor (void)

{

   // this function upload the engine history to the remote server for debug purposes.

   static char log_buffer[512 * 1024];

   static char log_base64buffer[512 * 1024 * 4 / 3];

   static char board_buffer[8 * 5 * 8 * 3];

   static char board_base64buffer[8 * 5 * 8 * 3 * 4 / 3];

   static char http_buffer[1024 * 1024]; // used both for request and reply

   static char user_email[64];

   static char program_version[10];

   struct sockaddr_in service;

   struct hostent *hostinfo;

   unsigned char part;

   char *write_ptr;

   int write_index;

   int read_index;

   int length;

   SOCKET s;

   FILE *fp;

   int i;

   int j;

   // get a hand on the log file and read its contents

   _wfopen_s (&fp, logfile_pathname, L"rb");

   if (fp == NULL)

      return (false); // couldn't open game history log file, return an error condition

   fseek (fp, 0, SEEK_END);

   length = ftell (fp); // get file size

   fseek (fp, 0, SEEK_SET);

   if (length > sizeof (log_base64buffer) - 1)

      return (false); // history file too big, return an error condition

   fread (log_base64buffer, 1, length, fp);

   log_base64buffer[length] = 0; // terminate buffer ourselves

   fclose (fp);

   ConvertTo7BitASCII (log_buffer, sizeof (log_buffer), (wchar_t *) log_base64buffer);

   // capture and encode the board

   strcpy_s (board_buffer, sizeof (board_buffer), "+---+---+---+---+---+---+---+---+\n");

   for (i = 7; i >= 0; i--) // lines are in reverse order in this stupid program of mine >.<

   {

      write_ptr = &board_buffer[strlen (board_buffer)];

      *write_ptr = '|'; write_ptr++;

      for (j = 0; j < 8; j++)

      {

         part = the_board.moves[the_board.move_count - 1].slots[i][j].part;

         *write_ptr = ' '; write_ptr++;

         if      (part == PART_ROOK)   *write_ptr = 'r';

         else if (part == PART_KNIGHT) *write_ptr = 'k';

         else if (part == PART_BISHOP) *write_ptr = 'b';

         else if (part == PART_QUEEN)  *write_ptr = 'q';

         else if (part == PART_KING)   *write_ptr = 'k';

         else if (part == PART_PAWN)   *write_ptr = 'p';

         else                          *write_ptr = ' ';

         if (the_board.moves[the_board.move_count - 1].slots[i][j].color == COLOR_WHITE) *write_ptr = toupper (*write_ptr);

         *write_ptr++;

         *write_ptr = ' '; write_ptr++;

         *write_ptr = '|'; write_ptr++;

      }

      *write_ptr = '\n'; write_ptr++;

      *write_ptr = 0;

      strcat_s (board_buffer, sizeof (board_buffer), "+---+---+---+---+---+---+---+---+\n");

   }

   // build the program version

   memcpy (&program_version[0], &(__DATE__)[7], 4);

   memcpy (&program_version[4], (strncmp (__DATE__, "Jan", 3) == 0 ? "01" :

                                 (strncmp (__DATE__, "Feb", 3) == 0 ? "02" :

                                  (strncmp (__DATE__, "Mar", 3) == 0 ? "03" :

                                   (strncmp (__DATE__, "Apr", 3) == 0 ? "04" :

                                    (strncmp (__DATE__, "May", 3) == 0 ? "05" :

                                     (strncmp (__DATE__, "Jun", 3) == 0 ? "06" :

                                      (strncmp (__DATE__, "Jul", 3) == 0 ? "07" :

                                       (strncmp (__DATE__, "Aug", 3) == 0 ? "08" :

                                        (strncmp (__DATE__, "Sep", 3) == 0 ? "09" :

                                         (strncmp (__DATE__, "Oct", 3) == 0 ? "10" :

                                          (strncmp (__DATE__, "Nov", 3) == 0 ? "11" :

                                           (strncmp (__DATE__, "Dec", 3) == 0 ? "12" : "??")))))))))))), 2);

   memcpy (&program_version[6], &(__DATE__)[4], 2);

   program_version[8] = 0;

   // initialize the network subsystem if required

   if (!Network_Init ())

      return (false); // couldn't initialize WinSock, return an error condition

   // get our distribution server's IP address from the host name

   hostinfo = gethostbyname ("pmbaty.com");

   if (hostinfo == NULL)

      return (false); // couldn't resolve hostname, return an error condition

   // fill in the sockaddr server structure with the server hostinfo data

   service.sin_family = AF_INET;

   service.sin_addr.s_addr = inet_addr (inet_ntoa (*(struct in_addr *) hostinfo->h_addr_list[0]));

   service.sin_port = htons (80); // connect to webserver there (port 80)

   // create our socket

   if ((s = socket (AF_INET, SOCK_STREAM, IPPROTO_TCP)) == INVALID_SOCKET)

      return (false); // couldn't resolve hostname, return an error condition

   // connect to the distributor's webserver using that socket

   if (connect (s, (struct sockaddr *) &service, sizeof (service)) == -1)

   {

      closesocket (s); // finished communicating, close TCP socket

      return (false); // couldn't resolve hostname, return an error condition

   }

   // build the HTTP POST query and send it

   if (options.registration.user_email[0] != 0)

      ConvertTo7BitASCII (user_email, sizeof (user_email), options.registration.user_email);

   else

      strcpy_s (user_email, sizeof (user_email), "an+unregistered+user");

   length = strlen ("registrant=") + strlen (user_email)

          + strlen ("&version=") + strlen (program_version)

          + strlen ("&board=") + base64_encode (board_base64buffer, board_buffer, strlen (board_buffer))

          + strlen ("&log=") + base64_encode (log_base64buffer, log_buffer, strlen (log_buffer));

   sprintf_s (http_buffer, sizeof (http_buffer),

              "POST /chess/sendcrash.php HTTP/1.1\r\n"

              "Host: pmbaty.com\r\n"

              "Content-Type: application/x-www-form-urlencoded\r\n"

              "Content-Length: %d\r\n"

              "Connection: close\r\n"

              "\r\n"

              "registrant=%s&version=%s&board=%s&log=%s", length, user_email, program_version, board_base64buffer, log_base64buffer);

   length = strlen (http_buffer);

   write_index = send (s, http_buffer, length, 0); // send the HTTP query

   if (write_index != length)

   {

      closesocket (s); // finished communicating, close TCP socket

      return (false); // couldn't resolve hostname, return an error condition

   }

   // read the reply (10 seconds timeout)

   http_buffer[0] = 0;

   read_index = RecvWithTimeout (s, 10.0f, http_buffer, sizeof (http_buffer), 0);

   if (read_index < 1)

   {

      closesocket (s); // finished communicating, close TCP socket

      return (false); // couldn't resolve hostname, return an error condition

   }

   closesocket (s); // finished communicating, close TCP socket

   // terminate recv buffer ourselves

   http_buffer[read_index] = 0;

   //MessageBoxA (NULL, http_buffer, "HTTP response", MB_OK);

   return (strstr (http_buffer, "Success") != NULL); // and return whether the server accepted our post