acpc_dealer 2.4.1 → 3.0.0

data/vendor/project_acpc_server/kuhn_3p_equilibrium_player/src/kuhn_3p_equilibrium_player.h

@@ -1,108 +0,0 @@
-/*
-Copyright (C) 2013 by the Computer Poker Research Group, University of Alberta
-*/
-
-#ifndef __KUHN_3P_EQUILIBRIUM_PLAYER_H__
-#define __KUHN_3P_EQUILIBRIUM_PLAYER_H__
-
-#include <game.h>
-#include <rng.h>
-#include <net.h>
-
-// Types ----------------
-typedef enum {
-  C11_INDEX = 0,
-  B11_INDEX,
-  B21_INDEX,
-  B23_INDEX,
-  B32_INDEX,
-  B33_INDEX,
-  B41_INDEX,
-  C21_INDEX,
-  C33_INDEX,
-  C34_INDEX,
-  NUM_PARAMS
-} ParameterIndex;
-
-typedef struct {
-  uint32_t seed;
-  rng_state_t get_action_rng;
-  const Game* game_def;
-  double params[NUM_PARAMS];
-} Kuhn3pEquilibriumPlayer;
-
-typedef enum{JACK_RANK = 9, QUEEN_RANK, KING_RANK, ACE_RANK} CardRank;
-
-typedef enum{A_POSITION = 0, B_POSITION, C_POSITION, NUM_PLAYERS} PlayerPosition;
-
-// Constants -------------
-#define KUHN_SUIT 3
-#define JACK makeCard(JACK_RANK, KUHN_SUIT)
-#define QUEEN makeCard(QUEEN_RANK, KUHN_SUIT)
-#define KING makeCard(KING_RANK, KUHN_SUIT)
-#define ACE makeCard(ACE_RANK, KUHN_SUIT)
-#define NUM_CARDS 4
-
-#define KAPPA (1/24.0)
-
-static const int SUB_FAMILY_1_INDEPENDENT_PARAMS[] = {
-    B11_INDEX, B21_INDEX, B32_INDEX, C33_INDEX, C34_INDEX
-};
-
-static const int SUB_FAMILY_2_INDEPENDENT_PARAMS[] = {
-    B11_INDEX, B21_INDEX, B23_INDEX, B32_INDEX, C33_INDEX, C34_INDEX
-};
-
-static const int SUB_FAMILY_3_INDEPENDENT_PARAMS[] = {
-    B11_INDEX, B32_INDEX, C33_INDEX, C34_INDEX
-};
-
-// Necessary params for P1
-static const double A[][4] = {
-    {0.0, 0.0, 0.0,   0.0},
-    {0.0, 0.0, 0.0,   0.0},
-    {0.0, 0.0, 1/2.0, 0.0},
-    {0.0, 1.0, 1.0,   1.0}
-};
-
-// Necessary params for P2
-#define B12 0.0
-#define B13 0.0
-#define B14 0.0
-#define B22 0.0
-#define B24 0.0
-#define B31 0.0
-#define B34 0.0
-#define B42 1.0
-#define B43 1.0
-#define B44 1.0
-
-// Necessary params for P3
-#define C12 0.0
-#define C13 0.0
-#define C14 0.0
-#define C22 0.0
-#define C23 0.0
-#define C24 0.0
-#define C31 0.0
-#define C32 0.0
-static const double C4[] = {1.0, 1.0, 1.0, 1.0};
-
-// Functions -----------------
-double beta(const Kuhn3pEquilibriumPlayer* kuhn_3p_e_player);
-Kuhn3pEquilibriumPlayer new_kuhn_3p_equilibrium_player(
-    const Game* game_def,
-    const double* params,
-    uint32_t seed
-);
-Action action(
-    Kuhn3pEquilibriumPlayer* player,
-    MatchState view
-);
-void action_probs(
-    const Kuhn3pEquilibriumPlayer* player,
-    MatchState view,
-    double* probs
-);
-
-#endif

data/vendor/project_acpc_server/kuhn_3p_equilibrium_player/src/main.c

@@ -1,84 +0,0 @@
-/*
-Copyright (C) 2013 by the Computer Poker Research Group, University of Alberta
-*/
-
-#include <stdlib.h>
-#include <assert.h>
-#include <netdb.h>
-#include <sys/socket.h>
-#include <netinet/in.h>
-#include <netinet/tcp.h>
-#include "game.h"
-#include "rng.h"
-#include "net.h"
-#include "kuhn_3p_equilibrium_player.h"
-#include "player_config.h"
-
-int main(int argc, char **argv)
-{
-  PlayerConfig config = new_player_config_from_argv(argc, argv);
-
-  connect_to_dealer(&config.dealer);
-
-  int len, r;
-  MatchState state;
-  char line[ MAX_LINE_LEN ];
-
-  Kuhn3pEquilibriumPlayer player = new_kuhn_3p_equilibrium_player(
-      config.game,
-      config.params,
-      config.seed
-  );
-
-  /* play the game! */
-  while( fgets( line, MAX_LINE_LEN, config.dealer.fromServer ) ) {
-    /* ignore comments */
-    if( line[ 0 ] == '#' || line[ 0 ] == ';' ) {
-      continue;
-    }
-
-    len = readMatchState( line, config.game, &state );
-    if( len < 0 ) {
-      fprintf( stderr, "ERROR: could not read state %s", line );
-      exit( EXIT_FAILURE );
-    }
-
-    if(stateFinished( &state.state)) {
-      /* ignore the game over message */
-      continue;
-    }
-
-    if(currentPlayer(config.game, &state.state) != state.viewingPlayer) {
-      /* we're not acting */
-      continue;
-    }
-
-    /* add a colon (guaranteed to fit because we read a new-line in fgets) */
-    line[ len ] = ':';
-    ++len;
-
-    Action action_to_send = action(&player, state);
-
-        /* do the action! */
-    assert(isValidAction(config.game, &state.state, 0, &action_to_send));
-    r = printAction(config.game, &action_to_send, MAX_LINE_LEN - len - 2, &line[len]);
-
-    if( r < 0 ) {
-      fprintf( stderr, "ERROR: line too long after printing action\n" );
-      exit( EXIT_FAILURE );
-    }
-    len += r;
-    line[ len ] = '\r';
-    ++len;
-    line[ len ] = '\n';
-    ++len;
-
-    if( fwrite(line, 1, len, config.dealer.toServer) != len ) {
-      fprintf( stderr, "ERROR: could not get send response to server\n" );
-      exit(EXIT_FAILURE);
-    }
-    fflush(config.dealer.toServer);
-  }
-
-  return EXIT_SUCCESS;
-}

data/vendor/project_acpc_server/kuhn_3p_equilibrium_player/src/player_config.c

@@ -1,253 +0,0 @@
-/*
-Copyright (C) 2013 by the Computer Poker Research Group, University of Alberta
-*/
-
-#include <stdlib.h>
-#include <assert.h>
-#include <string.h>
-#include <stdio.h>
-#include <stdarg.h>
-#include <unistd.h>
-#include <sys/time.h>
-#include "rng.h"
-#include "commander.h"
-#include "player_config.h"
-
-static void parse(
-    const char* to_parse,
-    const char* template,
-    const char* error_message,
-    size_t num_targets,
-    ...
-)
-{
-  va_list scan_targets;
-  va_start(scan_targets, num_targets);
-
-  if(vsscanf(to_parse, template, scan_targets) < num_targets) {
-    fprintf(stderr, "ERROR: %s: %s\n", error_message, to_parse);
-    exit(EXIT_FAILURE);
-  }
-  va_end(scan_targets);
-}
-
-static void c11(command_t *self) {
-  assert(self->data);
-
-  PlayerConfig* config = self->data;
-  parse(
-      self->arg,
-      "%lf",
-      "Invalid C11 parameter",
-      1,
-      &config->params[C11_INDEX]
-  );
-}
-
-static void b11(command_t *self) {
-  assert(self->data);
-  PlayerConfig* config = self->data;
-  parse(
-      self->arg,
-      "%lf",
-      "Invalid B11 parameter",
-      1,
-      &config->params[B11_INDEX]
-  );
-}
-
-static void b21(command_t *self) {
-  assert(self->data);
-  PlayerConfig* config = self->data;
-  parse(
-      self->arg,
-      "%lf",
-      "Invalid B21 parameter",
-      1,
-      &config->params[B21_INDEX]
-  );
-}
-
-static void b23(command_t *self) {
-  assert(self->data);
-  PlayerConfig* config = self->data;
-  parse(
-      self->arg,
-      "%lf",
-      "Invalid B23 parameter",
-      1,
-      &config->params[B23_INDEX]
-  );
-}
-
-static void b32(command_t *self) {
-  assert(self->data);
-  PlayerConfig* config = self->data;
-  parse(
-      self->arg,
-      "%lf",
-      "Invalid B32 parameter",
-      1,
-      &config->params[B32_INDEX]
-  );
-}
-
-static void c33(command_t *self) {
-  assert(self->data);
-  PlayerConfig* config = self->data;
-  parse(
-      self->arg,
-      "%lf",
-      "Invalid C33 parameter",
-      1,
-      &config->params[C33_INDEX]
-  );
-}
-
-static void c34(command_t *self) {
-  assert(self->data);
-  PlayerConfig* config = self->data;
-  parse(
-      self->arg,
-      "%lf",
-      "Invalid C34 parameter",
-      1,
-      &config->params[C34_INDEX]
-  );
-}
-
-static void r(command_t *self) {
-  assert(self->data);
-  PlayerConfig* config = self->data;
-  parse(
-      self->arg,
-      "%"SCNu32,
-      "Invalid random seed",
-      1,
-      &config->seed
-  );
-}
-
-static void parse_game_def(command_t *self)
-{
-  assert(self->data);
-
-  PlayerConfig* config = self->data;
-
-  FILE* file = fopen(self->arg, "r");
-  if (!file) {
-    fprintf( stderr, "ERROR: could not open game %s\n", self->arg );
-    exit( EXIT_FAILURE );
-  }
-
-  config->game = readGame( file );
-  if (!config->game) {
-    fprintf( stderr, "ERROR: could not read game %s\n", self->arg );
-    exit( EXIT_FAILURE );
-  }
-  fclose( file );
-}
-
-static void get_host(command_t *self)
-{
-  if (!self->arg) {
-    return;
-  }
-  assert(self->data);
-
-  PlayerConfig* config = self->data;
-
-  memset(config->dealer.host, 0,
-         _POSIX_HOST_NAME_MAX * sizeof(*config->dealer.host));
-  strncpy(config->dealer.host, self->arg, _POSIX_HOST_NAME_MAX);
-}
-
-static void get_port(command_t *self)
-{
-  assert(self->data);
-
-  PlayerConfig* config = self->data;
-
-  parse(
-      self->arg,
-      "%"SCNu16,
-      "Invalid port",
-      1,
-      &config->dealer.port
-  );
-}
-
-PlayerConfig new_player_config()
-{
-  // If no random seed is given, initialize the player's random number seed
-  // using time
-  struct timeval tv;
-  gettimeofday(&tv, NULL);
-  rng_state_t rng;
-  init_genrand(&rng, tv.tv_usec);
-
-  PlayerConfig this = {
-      .dealer = new_dealer_connection(),
-      .game = NULL,
-      .params = {0},
-      .seed = genrand_int32(&rng)
-  };
-
-  return this;
-}
-
-PlayerConfig new_player_config_from_argv(int argc, char** argv)
-{
-  command_t cmd;
-  command_init(&cmd, argv[0], "0.0.1");
-
-  command_option(
-      &cmd,
-      "-n",
-      "--host [host name]",
-      "Name of the host on which dealer is running (defaults to 'localhost')",
-      get_host
-  );
-  command_option(
-      &cmd,
-      "-p",
-      "--port <port number>",
-      "Port number to connect to dealer",
-      get_port
-  );
-  command_option(
-      &cmd,
-      "-g",
-      "--game <file name>",
-      "Game definition file name",
-      parse_game_def
-  );
-  command_option(
-      &cmd,
-      "-r",
-      "--seed [non-negative integer]",
-      "Random seed, defaults to a random random seed based on system time.",
-      r
-  );
-
-  command_option(&cmd, "-0", "--c11 <probability>", "C11 value", c11);
-  command_option(&cmd, "-1", "--b11 <probability>", "B11 value", b11);
-  command_option(&cmd, "-2", "--b21 [probability]", "B21 value", b21);
-  command_option(&cmd, "-3", "--b23 [probability]", "B23 value", b23);
-  command_option(&cmd, "-4", "--b32 <probability>", "B32 value", b32);
-  command_option(&cmd, "-8", "--c33 <probability>", "C33 value", c33);
-  command_option(&cmd, "-9", "--c34 <probability>", "C34 value", c34);
-
-  if( argc < 14 ) {
-    command_help(&cmd);
-    exit(EXIT_SUCCESS);
-  }
-
-  PlayerConfig config = new_player_config();
-  cmd.data = &config;
-
-  command_parse(&cmd, argc, argv);
-  command_free(&cmd);
-
-  return config;
-}

data/vendor/project_acpc_server/kuhn_3p_equilibrium_player/src/player_config.h

@@ -1,21 +0,0 @@
-/*
-Copyright (C) 2013 by the Computer Poker Research Group, University of Alberta
-*/
-
-#ifndef __PLAYER_CONFIG_H__
-#define __PLAYER_CONFIG_H__
-
-#include "dealer_connection.h"
-#include "kuhn_3p_equilibrium_player.h"
-
-typedef struct {
-  DealerConnection dealer;
-  Game *game;
-  double params[NUM_PARAMS];
-  uint32_t seed;
-} PlayerConfig;
-
-PlayerConfig new_player_config();
-PlayerConfig new_player_config_from_argv(int argc, char** argv);
-
-#endif