universe@0: /*
universe@0:  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
universe@0:  *
universe@55:  * Copyright 2016 Mike Becker. All rights reserved.
universe@0:  *
universe@0:  * Redistribution and use in source and binary forms, with or without
universe@0:  * modification, are permitted provided that the following conditions are met:
universe@0:  *
universe@0:  *   1. Redistributions of source code must retain the above copyright
universe@0:  *      notice, this list of conditions and the following disclaimer.
universe@0:  *
universe@0:  *   2. Redistributions in binary form must reproduce the above copyright
universe@0:  *      notice, this list of conditions and the following disclaimer in the
universe@0:  *      documentation and/or other materials provided with the distribution.
universe@0:  *
universe@0:  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
universe@0:  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
universe@0:  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
universe@0:  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
universe@0:  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
universe@0:  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
universe@0:  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
universe@0:  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
universe@0:  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
universe@0:  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
universe@0:  * POSSIBILITY OF SUCH DAMAGE.
universe@0:  *
universe@0:  */
universe@0: 
universe@1: #include "terminal-chess.h"
universe@7: #include "game.h"
universe@7: #include "input.h"
universe@35: #include "colors.h"
universe@1: #include <string.h>
universe@2: #include <time.h>
universe@7: #include <getopt.h>
universe@69: #include <locale.h>
universe@1: 
universe@1: int get_settings(int argc, char **argv, Settings *settings) {
universe@1:     char *valid;
universe@2:     unsigned long int time, port;
universe@2:     uint8_t timeunit = 60;
universe@2:     size_t len;
universe@1:     
universe@69:     for (int opt ; (opt = getopt(argc, argv, "a:bc:hp:rsS:t:Uv")) != -1 ;) {
universe@1:         switch (opt) {
universe@47:         case 'c':
universe@47:             settings->continuepgn = optarg;
universe@47:             break;
universe@2:         case 'b':
universe@2:             settings->gameinfo.servercolor = BLACK;
universe@2:             break;
universe@2:         case 'r':
universe@7:             settings->gameinfo.servercolor = rand() & 1 ? WHITE : BLACK;
universe@2:             break;
universe@26:         case 's':
universe@26:             settings->singlemachine = 1;
universe@26:             break;
universe@50:         case 'S':
universe@50:             settings->analyzepgn = optarg;
universe@50:             break;
universe@69:         case 'U':
universe@69:             settings->unicode = 0;
universe@69:             break;
universe@2:         case 't':
universe@2:         case 'a':
universe@2:             len = strlen(optarg);
universe@2:             if (optarg[len-1] == 's') {
universe@2:                 optarg[len-1] = '\0';
universe@2:                 timeunit = 1;
universe@2:             }
universe@2:             
universe@30:             if ((time = strtoul(optarg, &valid, 10))*timeunit > UINT16_MAX
universe@2:                 || *valid != '\0') {
universe@30:                 fprintf(stderr, "Specified time is invalid (%s)"
universe@30:                     "- Maximum: 65535 seconds (1092 minutes)\n", optarg);
universe@2:                 return 1;
universe@2:             } else {
universe@30:                 settings->gameinfo.timecontrol = 1;
universe@2:                 if (opt=='t') {
universe@2:                     settings->gameinfo.time = timeunit * time;
universe@1:                 } else {
universe@2:                     settings->gameinfo.addtime = time;
universe@1:                 }
universe@2:             }
universe@2:             break;
universe@2:         case 'p':
universe@2:             port = strtol(optarg, &valid, 10);
universe@2:             if (port < 1025 || port > 65535 || *valid != '\0') {
universe@2:                 fprintf(stderr,
universe@2:                     "Invalid port number (%s) - choose a number between "
universe@2:                     "1025 and 65535\n",
universe@2:                     optarg);
universe@2:                 return 1;
universe@2:             } else {
universe@2:                 settings->port = optarg;
universe@2:             }
universe@2:             break;
universe@52:         case 'v':
universe@52:             printf("terminal-chess : Version %s (Netcode Version %d)\n",
universe@52:                 PROGRAM_VERSION, NETCODE_VERSION);
universe@52:             exit(0);
universe@2:         case 'h':
universe@2:         case '?':
universe@52:             printf(
universe@52: "Usage: terminal-chess [OPTION]... [HOST]\n"
universe@52: "Starts/joins a network chess game\n"
universe@52: "\nGeneral options\n"
universe@52: "  -c <PGN file> Continue the specified game\n"
universe@52: "  -h            This help page\n"
universe@52: "  -p            TCP port to use (default: 27015)\n"
universe@52: // TODO: implement and activate feature
universe@52: //"  -S <PGN file> Compute and print statistics for the specified game\n"
universe@52: "  -v            Print version information and exists\n"
universe@52: "\nServer options\n"
universe@52: "  -a <time>     Specifies the time to add after each move\n"
universe@52: "  -b            Server plays black pieces (default: white)\n"
universe@52: "  -r            Distribute color randomly\n"
universe@52: "  -s            Single machine mode\n"
universe@52: "  -t <time>     Specifies time limit (default: no limit)\n"
universe@69: "  -U            Disables unicode pieces\n"
universe@52: "\nNotes\n"
universe@52: "The time unit for -a is seconds and for -t minutes by default. To "
universe@52: "specify\nseconds for the -t option, use the s suffix.\n"
universe@52: "Example: -t 150s\n\n"
universe@52: "Use '-' for PGN files to read PGN data from standard input\n"
universe@52:             );
universe@52:             exit(0);
universe@1:         }
universe@1:     }
universe@1:     
universe@1:     if (optind == argc - 1) {
universe@1:         settings->serverhost = argv[optind];
universe@1:     } else if (optind < argc - 1) {
universe@1:         fprintf(stderr, "Too many arguments\n");
universe@1:         return 1;
universe@1:     }
universe@1:     
universe@50:         
universe@50:     if (settings->continuepgn) {
universe@50:         if (settings->serverhost) {
universe@50:             fprintf(stderr, "Can't continue a game when joining a server.\n");
universe@50:             return 1;
universe@50:         }
universe@50:         if (settings->analyzepgn) {
universe@50:             fprintf(stderr, "The options -c and -S are mutually exclusive\n");
universe@50:             return 1;
universe@50:         }
universe@50:     }
universe@50:     
universe@1:     return 0;
universe@1: }
universe@1: 
universe@55: static Settings default_settings() {
universe@1:     Settings settings;
universe@1:     memset(&settings, 0, sizeof(Settings));
universe@2:     settings.gameinfo.servercolor = WHITE;
universe@1:     settings.port = "27015";
universe@69:     settings.unicode = !!setlocale(LC_CTYPE, "C.UTF-8");
universe@1:     return settings;
universe@1: }
universe@1: 
universe@30: void dump_gameinfo(GameInfo *gameinfo) {
universe@2:     int serverwhite = gameinfo->servercolor == WHITE;
universe@3:     attron(A_UNDERLINE);
universe@3:     printw("Game details\n");
universe@3:     attroff(A_UNDERLINE);
universe@3:     printw("  Server:     %s\n  Client:     %s\n",
universe@33:         serverwhite?"White":"Black", serverwhite?"Black":"White"
universe@2:     );
universe@30:     if (gameinfo->timecontrol) {
universe@2:         if (gameinfo->time % 60) {
universe@3:             printw("  Time limit: %ds + %ds\n",
universe@2:                 gameinfo->time, gameinfo->addtime);
universe@2:         } else {
universe@3:             printw("  Time limit: %dm + %ds\n",
universe@2:                 gameinfo->time/60, gameinfo->addtime);
universe@2:         }
universe@2:     } else {
universe@3:         printw("  No time limit\n");
universe@2:     }
universe@3:     refresh();
universe@2: }
universe@2: 
universe@51: void dump_moveinfo(GameState *gamestate) {
universe@51:     int i = 1;
universe@51:     for (MoveList *movelist = gamestate->movelist ;
universe@51:         movelist ; movelist = movelist->next) {        
universe@51:         if (++i % 2 == 0) {
universe@51:             printw("%d. %s", i/2, movelist->move.string);
universe@51:         } else {
universe@51:             printw(" %s", movelist->move.string);
universe@51:         }
universe@51:         if (i % 20)  {
universe@51:             addch(' ');
universe@51:         } else {
universe@51:             addch('\n');
universe@51:         }
universe@51:     }
universe@51:     refresh();
universe@51: }
universe@51: 
universe@0: int main(int argc, char **argv) {
universe@2:     srand(time(NULL));
universe@1:     
universe@1:     Settings settings = default_settings();
universe@2:     if (get_settings(argc, argv, &settings)) {
universe@2:         return 1;
universe@2:     }
universe@52: 
universe@23:     initscr();
universe@34:     halfdelay(1);
universe@29:     keypad(stdscr, TRUE);
universe@7:     if (has_colors()) {
universe@7:         start_color();
universe@7:         init_colorpairs();
universe@35:         bkgd(COLOR_PAIR(COL_APP));
universe@7:     } else {
universe@7:         fprintf(stderr, "Non-colored terminals are not supported yet.");
universe@7:         endwin();
universe@7:         return EXIT_FAILURE;
universe@7:     }
universe@55:     atexit((void(*)())endwin);
universe@3:     
universe@46:     int exitcode;
universe@26:     if (settings.singlemachine) {
universe@26:         game_start_singlemachine(&settings);
universe@46:         exitcode = EXIT_SUCCESS;
universe@50:     } else if (settings.analyzepgn) {
universe@50:         printw("Not implemented yet.\n");
universe@50:         exitcode = EXIT_SUCCESS;
universe@26:     } else {
universe@46:         exitcode = is_server(&settings) ?
universe@26:             server_run(&settings) : client_run(&settings);
universe@26:     }
universe@46:     
universe@46:     mvaddstr(getmaxy(stdscr)-1, 0,
universe@46:         "Game has ended. Press any key to leave...");
universe@50:     clrtoeol();
universe@46:     refresh();
universe@46:     cbreak();
universe@46:     flushinp();
universe@46:     getch();
universe@46:     
universe@46:     return exitcode;
universe@0: }
universe@0: