main.c

Go to the documentation of this file.

 
#include "board.h"
#include "cassio.h"
#include "hash.h"
#include "obftest.h"
#include "options.h"
#include "perft.h"
#include "search.h"
#include "stats.h"
#include "ui.h"
#include "util.h"
 
#include <locale.h>
 
void version(void)
{
        fprintf(stderr, "Edax version " VERSION_STRING " " __DATE__ " " __TIME__);
 
#if defined(__linux__)
        fprintf(stderr, " for Linux\n");
#elif defined(_WIN32)
        fprintf(stderr, " for Windows\n");
#elif defined(__APPLE__)
        fprintf(stderr, " for Apple\n");
#else
        fprintf(stderr, "\n");
#endif
#ifdef DEBUG
    fprintf(stderr, " This is debug module.\n\n");
#endif
 
        fprintf(stderr, "copyright 1998 - 2017 Richard Delorme\n\n");
}
 
 
void usage(void)
{
        fprintf(stderr, "Usage: edax <protocol> <options>\n");
        fprintf(stderr, "User Interface Protocols:\n");
        fprintf(stderr, " -edax     Edax's user interface (default)\n");
        fprintf(stderr, " -ggs      Generic Game Server interface (play through internet)\n");
        fprintf(stderr, " -gtp      Go Text Protocol.\n");
        fprintf(stderr, " -xboard xboard/winboard protocol.\n");
        fprintf(stderr, " -nboard NBoard protocol.\n");
        fprintf(stderr, " -cassio Cassio protocol.\n");
        fprintf(stderr, " -solve <problem_file>    Automatic problem solver/checker.\n");
        fprintf(stderr, " -wtest <wthor_file>      Test edax using WThor's theoric score.\n");
        fprintf(stderr, " -count <level>           Count positions up to <level>.\n");
        options_usage();
}
 
int main(int argc, char **argv)
{
        UI *ui;
        int i, r, level = 0, size = 8;
        char *problem_file = NULL;
        char *wthor_file = NULL;
        char *count_type = NULL;
        int n_bench = 0;
 
        // options.n_task default to system cpu number
        options.n_task = get_cpu_number();
 
        // options from edax.ini
        options_parse("edax.ini");
 
        // allocate ui
        ui = (UI*) malloc(sizeof *ui);
        if (ui == NULL) fatal_error("Cannot allocate a user interface.\n");
        ui->type = UI_EDAX;
        ui->init = ui_init_edax;
        ui->free = ui_free_edax;
        ui->loop = ui_loop_edax;
 
        // parse arguments
        for (i = 1; i < argc; i++) {
                char *arg = argv[i];
                while (*arg == '-') ++arg;
                if (strcmp(arg, "v") == 0 || strcmp(arg, "version") == 0) version();
                else if (ui_switch(ui, arg)) ;
                else if ((r = (options_read(arg, argv[i + 1]))) > 0) i += r - 1;
                else if (strcmp(arg, "solve") == 0 && argv[i + 1]) problem_file = argv[++i];
                else if (strcmp(arg, "wtest") == 0 && argv[i + 1]) wthor_file = argv[++i];
                else if (strcmp(arg, "bench") == 0 && argv[i + 1]) n_bench = atoi(argv[++i]);
                else if (strcmp(arg, "count") == 0 && argv[i + 1]) {
                        count_type = argv[++i];
                        if (argv[i + 1]) level = string_to_int(argv[++i], 0);
                        if (argv[i + 1] && strcmp(argv[i + 1], "6x6") == 0) {
                                size = 6;
                                ++i;
                        }
                        
        
                }
                else usage();
        }
        options_bound();
 
        // initialize
        edge_stability_init();
        hash_code_init();
        hash_move_init();
        statistics_init();
        eval_open(options.eval_file);
        search_global_init();
 
        // solver & tester
        if (problem_file || wthor_file || n_bench) {
                Search search[1];
                search_init(search);
                search->options.header = " depth|score|       time   |  nodes (N)  |   N/s    | principal variation";
                search->options.separator = "------+-----+--------------+-------------+----------+---------------------";
                if (options.verbosity) version();
                if (problem_file) obf_test(search, problem_file, NULL);
                if (wthor_file) wthor_test(wthor_file, search);
                if (n_bench) obf_speed(search, n_bench);
                search_free(search);
 
        } else if (count_type){
                Board board[1];
                board_init(board);
                if (strcmp(count_type, "games") == 0) quick_count_games(board, level, size);            
                else if (strcmp(count_type, "positions") == 0) count_positions(board, level, size);             
                else if (strcmp(count_type, "shapes") == 0) count_shapes(board, level, size);           
 
        } else if (ui->type == UI_CASSIO) {
                engine_loop();
 
        // other protocols
        } else {
                ui_event_init(ui);
                ui->init(ui);
                ui->loop(ui);
                if (ui->free) ui->free(ui);
                ui_event_free(ui);
        }
 
        // display statistics
        statistics_print(stdout);
 
 
        // free;
        eval_close();
        options_free();
        free(ui);
 
        return 0;
}