acpc_dealer 2.4.1 → 3.0.0

data/vendor/project_acpc_server/LICENCE

@@ -1,23 +0,0 @@
-Copyright (C) 2011 by the Computer Poker Research Group, University of Alberta
-
-Permission is hereby granted, free of charge, to any person obtaining a copy of
-this software and associated documentation files (the "Software"), to deal in
-the Software without restriction, including without limitation the rights to
-use, copy, modify, merge, publish, distribute, sublicence, and/or sell copies
-of the Software, and to permit persons to whom the Software is furnished to do
-so, subject to the following conditions:
-
-The above copyright notice and this permission notice shall be included in all
-copies or substantial portions of the Software.
-
-Except as contained in this notice, the name(s) of the above copyright holders
-shall not be used in advertising or otherwise to promote the sale, use or other
-dealings in this Software without prior written authorization.
-
-THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
-IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
-FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
-AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
-LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
-OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
-SOFTWARE.

data/vendor/project_acpc_server/Makefile

@@ -1,35 +0,0 @@
-
-THIS_DIR := $(dir $(lastword $(MAKEFILE_LIST)))
-
-CC = gcc
-CFLAGS = -O3 -Wall
-
-KUHN_3P_E_BASE = kuhn_3p_equilibrium_player
-KUHN_3P_E_PLAYER := $(KUHN_3P_E_BASE)
-KUHN_3P_E_DIR := $(KUHN_3P_E_BASE)
-
-PROGRAMS = bm_server bm_widget dealer example_player
-
-all: $(PROGRAMS) $(KUHN_3P_E_DIR)/$(KUHN_3P_E_PLAYER)
-
-clean:
-	rm -f $(PROGRAMS) && cd $(KUHN_3P_E_DIR) && make clean
-
-
-bm_server: bm_server.c game.c game.h rng.c rng.h net.c net.h
-	$(CC) $(CFLAGS) -o $@ bm_server.c game.c rng.c net.c
-
-bm_widget: bm_widget.c net.c net.h
-	$(CC) $(CFLAGS) -o $@ bm_widget.c net.c
-
-bm_run_matches: bm_run_matches.c net.c net.h
-	$(CC) $(CFLAGS) -o $@ bm_run_matches.c net.c
-
-dealer: game.c game.h evalHandTables rng.c rng.h dealer.c net.c net.h
-	$(CC) $(CFLAGS) -o $@ game.c rng.c dealer.c net.c
-
-example_player: game.c game.h evalHandTables rng.c rng.h example_player.c net.c net.h
-	$(CC) $(CFLAGS) -o $@ game.c rng.c example_player.c net.c
-
-$(KUHN_3P_E_DIR)/$(KUHN_3P_E_PLAYER):
-	cd $(KUHN_3P_E_DIR) && make

data/vendor/project_acpc_server/README

@@ -1,113 +0,0 @@
-This README contains information about the server code for the Annual Computer
-Poker Competition.  Please see the LICENCE file for information regarding the
-code's licence.
-
-===== Software Requirements =====
-
-This code was developed and tested for use on Unix based systems.  Though it
-may work on other platforms, there are no guarantees.
-
-You will need standard Unix developer tools to build the software including
-gcc, and make.
-
-===== Getting Started =====
-
-* Building the code
-
-The Makefile provides instructions for compiling the code.  Running 'make' from
-the command line will compile the required programs.
-
-
-* The programs
-
-dealer - Communicates with agents connected over sockets to play a game
-example_player - A sample player implemented in C
-play_match.pl - A perl script for running matches with the dealer
-
-Usage information for each of the programs is available by running the
-executable without any arguments.
-
-
-* Playing a match
-
-The fastest way to start a match is through the play_match.pl script.  An
-example follows:
-
-$ ./play_match.pl matchName holdem.limit.2p.reverse_blinds.game 1000 0 Alice ./example_player.limit.2p.sh Bob ./example_player.limit.2p.sh
-
-After play_match.pl finishes running, there will be two output files for the
-dealer and two output files for each player in the game:
-
-matchName.err - The stderr from dealer including the messages sent to players
-matchName.log - The log for the hands played during the match
-matchName.playerN.std - stdout from player N
-matchName.playerN.err - stderr from player N
-
-Note, play_match.pl expects player executables that take exactly two arguments:
-the server IP followed by the port number.  The executable must be specified
-such that it is either a path or the executable name if it can be found in your
-$PATH.
-
-If you need to pass specific arguments to you agent, we suggest wrapping it in
-another script.  play_match.pl will pass any extra arguments to dealer.
-Matches can also be started by calling dealer and starting the players
-manually.  More information on this is contained in the dealer section below.
-
-
-* dealer
-
-Running dealer will start a process that waits for other players to connect to
-it.  After starting dealer, it will output something similar to the following:
-
-$ ./dealer matchName holdem.limit.2p.reverse_blinds.game 1000 0 Alice Bob
-16177 48777
-# name/game/hands/seed matchName holdem.limit.2p.reverse_blinds.game 1000 0
-#--t_response 10000
-#--t_hand 600000
-#--t_per_hand 6000
-
-On the first line of output there should be as many numbers as there are
-players in the game (in this case, "16177" and "48777").  These are the ports
-the dealer is listening on for players.  Note that these ports are specific to
-the positions for players in the game.
-
-Once all the players have connected to the game, the dealer will begin playing
-the game and outputting the messages sent to each player.  After the end of the
-match, you should have a log file called matchName.log in the directory where
-dealer was started with the hands that were played.
-
-Matches can also be started by starting the dealer and connecting the
-executables by hand.  This can be useful if you want to start your own program
-in a way that is difficult to script (such as running it in a debugger).
-
-
-==== Game Definitions ====
-
-The dealer takes game definition files to determine which game of poker it
-plays.  Please see the included game definitions for some examples.  The code
-for handling game definitions is found in game.c and game.h.
-
-Game definitions can have the following fields (case is ignored):
-
-gamedef - the starting tag for a game definition 
-end gamedef - ending tag for a game definition
-stack - the stack size for each player at the start of each hand (for no-limit)
-blind - the size of the blinds for each player (relative to the dealer)
-raisesize - the size of raises on each round (for limit games)
-limit - specifies a limit game
-nolimit - specifies a no-limit game
-numplayers - number of players in the game
-numrounds - number of betting rounds per hand of the game
-firstplayer - the player that acts first (relative to the dealer) on each round
-maxraises - the maximum number of raises on each round
-numsuits - the number of different suits in the deck
-numranks - the number of different ranks in the deck
-numholecards - the number of private cards to deal to each player
-numboardcards - the number of cards revealed on each round
-
-Empty lines or lines with '#' as the very first character will be ignored
-
-If you are creating your own game definitions, please note that game.h defines
-some constants for maximums in games (e.g., number of rounds).  These may need
-to be changed for games outside of the what is being run for the Annual
-Computer Poker Competition.

data/vendor/project_acpc_server/README.submission

@@ -1,42 +0,0 @@
-#############################################################
-# Please fill out the following information about your team 
-#############################################################
-
-Team Name:
-Agent Name (can be the same as team name):
-
-For each team member, please list the following:
-Name, Team leader (y/n)?, e-mail, Academic (y/n, position - e.g., PhD student)?, University/Business affiliation, Location (city, province/state, country)
-
-Was this submission part of an academic class project?  What level of class
-(undergraduate/graduate)?
-
-
-###########################################################################
-# Please provide as much information about your agent as possible as the
-# competition organizers are very interested in knowing more about the
-# techniques used by our competitors.
-###########################################################################
-
-1) Is your agent dynamic?  That is, does its strategy change throughout the
-course of a match, or is the strategy played the same throughout the match?
-
-2) Does your agent use a (approximate) Nash equilibrium strategy?
-
-3) Does your agent attempt to model your opponents?  If so, does it do so
-online during the competition or offline from data (e.g., using logs of play or
-the benchmark server)?
-
-4) Does your agent use techniques that would benefit from additional CPU time
-during the competition?
-
-5) Does your agent use techniques that would benefit from additional RAM during
-the competition?
-
-6) Would you agent benefit from additional disk space?
-
-One/Two Paragraph Summary of Technique
-
-
-References to relevant papers, if any
-

data/vendor/project_acpc_server/acpc_play_match.pl

@@ -1,101 +0,0 @@
-#!/usr/bin/perl
-
-# Copyright (C) 2011 by the Computer Poker Research Group, University of Alberta
-
-use Socket;
-use File::Basename;
-
-$hostname = `hostname` or die "could not get hostname";
-chomp $hostname;
-@hostent = gethostbyname( $hostname );
-$#hostent >= 4 or die "could not look up $hostname";
-$hostip = inet_ntoa( $hostent[ 4 ] );
-
-$#ARGV >= 3 or die "usage: play_match.pl matchName gameDefFile #Hands rngSeed player1name player1exe player2name player2exe ... [options]";
-
-$numPlayers = -1;
-open FILE, '<', $ARGV[ 1 ] or die "couldn't open game definition $ARGV[ 1 ]";
-while( $_ = <FILE> ) {
-
-    @_ = split;
-
-    if( uc( $_[ 0 ] ) eq 'NUMPLAYERS' ) {
-	$numPlayers = $_[ $#_ ];
-    }
-}
-close FILE;
-
-$numPlayers > 1 or die "couldn't get number of players from $ARGV[ 1 ]";
-
-
-$#ARGV >= 3 + $numPlayers * 2 or die "too few players on command line";
-
-pipe STDINREADPIPE, STDINWRITEPIPE or die "couldn't create stdin pipe";
-pipe STDOUTREADPIPE, STDOUTWRITEPIPE or die "couldn't create stdout pipe";
-
-$dealerPID = fork();
-if( $dealerPID == 0 ) {
-    # we're the child
-
-    # replace standard in and standard out with pipe
-    close STDINWRITEPIPE;
-    close STDOUTREADPIPE;
-    open STDIN, '<&STDINREADPIPE' or die "can't dup STDIN";
-    open STDOUT, '>&STDOUTWRITEPIPE' or die "can't dup STDOUT";
-    open STDERR, ">>$ARGV[ 0 ].err" or die "can't open log file $ARGV[ 0 ].err";
-
-    @args = ( "dealer", $ARGV[ 0 ], $ARGV[ 1 ],
-	      $ARGV[ 2 ], $ARGV[ 3 ] );
-
-    # add names to the arguments
-    for( $p = 0; $p < $numPlayers; ++$p ) {
-	push @args, $ARGV[ 4 + $p * 2 ];
-    }
-
-    # add any extra arguments (options?) to the arguments
-    for( $i = 4 + $numPlayers * 2; $i <= $#ARGV; ++$i ) {
-	push @args, $ARGV[ $i ];
-    }
-    exec { "./dealer" } @args or die "Couldn't run dealer";
-}
-
-close STDINREADPIPE;
-close STDOUTWRITEPIPE;
-
-$_ = <STDOUTREADPIPE> or die "couldn't read port description from dealer";
-@_ = split;
-$#_ + 1 >= $numPlayers or die "couldn't get enough ports from $_";
-
-for( $p = 0; $p < $numPlayers; ++$p ) {
-
-    $playerPID[ $p ] = fork();
-
-    if( $playerPID[ $p ] == 0 ) {
-	# we're the child
-
-	# log standard out and standard error
-	open STDOUT, ">$ARGV[ 0 ].player$p.std"
-	    or die "can't dup player $p STDOUT";
-	open STDERR, ">$ARGV[ 0 ].player$p.err"
-	    or die "can't dup player $p STDERR";
-
-	($playerExec, $playerDir) = fileparse( $ARGV[ 4 + $p * 2 + 1 ] );
-	chdir $playerDir or die "Can't cd to $playerDir: $!\n";
-	exec { "./$playerExec" } ( "./$playerExec", $hostip, $_[ $p ] )
-	    or die "couldn't run $playerExec from $playerDir for player $p";
-    }
-}
-
-$_ = <STDOUTREADPIPE>;
-
-for( $p = 0; $p < $numPlayers; ++$p ) {
-    waitpid( $playerPID[ $p ], 0 );
-}
-
-waitpid( $dealerPID, 0 );
-
-$_ or die "couldn't get values from dealer";
-
-print $_;
-
-exit( 0 );

data/vendor/project_acpc_server/bm_run_matches.c

@@ -1,238 +0,0 @@
-#include <stdlib.h>
-#include <stdio.h>
-#define __STDC_FORMAT_MACROS
-#include <inttypes.h>
-#include <assert.h>
-#include <string.h>
-#include <unistd.h>
-#include <netdb.h>
-#include <sys/socket.h>
-#include <netinet/in.h>
-#include <netinet/tcp.h>
-#include <sys/wait.h>
-#include <errno.h>
-#include "net.h"
-
-#define ARG_SERVERNAME 1
-#define ARG_SERVERPORT 2
-#define ARG_BOT_COMMAND 7
-#define ARG_MIN_ARGS 6
-
-static void printUsage( FILE *file )
-{
-  fprintf( file, "Sample usages:\n" );
-  fprintf( file, "  bm_run_matches <bm_hostname> <bm_port> <username> <pw> "
-	   "games\n" );
-  fprintf( file, "    See a list of possible opponents\n" );
-  fprintf( file, "  bm_run_matches <bm_hostname> <bm_port> <username> <pw> "
-	   "run 2pl <local script> <# runs> <tag> <seed> <player1> "
-	   "<player2>\n" );
-  fprintf( file, "    Run two-player limit matches\n" );
-  fprintf( file, "  bm_run_matches <bm_hostname> <bm_port> <username> <pw> "
-	   "run 2pn <local script> <# runs> <tag> <seed> <player1> "
-	   "<player2>\n" );
-  fprintf( file, "    Run two-player no-limit matches\n" );
-  fprintf( file, "  bm_run_matches <bm_hostname> <bm_port> <username> <pw> "
-	   "run 3pl <local script> <# runs> <tag> <seed> <player1> <player2> "
-	   "<player3>\n" );
-  fprintf( file, "    Run three-player limit matches\n" );
-  fprintf( file, "  bm_run_matches <bm_hostname> <bm_port> <username> <pw> "
-	   "rerun 2pl <local script> <match index> <tag> <seed> <player1> "
-	   "<player2> (<player3>)\n" );
-  fprintf( file, "    Rerun a match that failed\n" );
-  fprintf( file, "\n" );
-  fprintf( file, "<username> is your benchmark server username assigned to "
-	   "you by the competition chair\n" );
-  fprintf( file, "<pw> is your benchmark server password assigned to you by "
-	   "the competition chair\n" );
-  fprintf( file, "<local script> is the script that runs your agent locally.  "
-	   "It must take a hostname/IP and a port\n" );
-  fprintf( file, "<num runs> is the number of matches you want to run\n" );
-  fprintf( file, "<tag> is a name for this set of matches which will appear "
-	   "in the names of the log files\n" );
-  fprintf( file, "<seed> is a seed used to generate the random seeds that "
-	   "determine the cards in each match\n" );
-  fprintf( file, "<player-n> is either the name of an opponent or \"local\" "
-	   "for your local agent\n" );
-  fprintf( file, "\n" );
-  fprintf( file, "To run N duplicate heads-up matches, do one run of N "
-	   "matches with a given seed, then run a second set of N matches "
-	   "with the same seed but the order of the players reversed\n" );
-  fprintf( file, "\n" );
-  fprintf( file, "If one match in a set fails, you can use the \"rerun\" "
-	   "command to rerun the specified match with the specified seed.  "
-	   "For example, if you tried to run twenty matches with seed 0 and "
-	   "the last match failed, you could use the \"rerun\" command with "
-	   "seed 0 and match index 19.\n" );
-}
-
-int main( int argc, char **argv )
-{
-  int sock, i;
-  pid_t childPID;
-  uint16_t port;
-  ReadBuf *fromServer;
-  fd_set readfds;
-  char line[ READBUF_LEN ];
-
-  if( argc < ARG_MIN_ARGS ) {
-
-    printUsage( stderr );
-    exit( EXIT_FAILURE );
-  }
-
-  /* connect to the server */
-  if( sscanf( argv[ ARG_SERVERPORT ], "%"SCNu16, &port ) < 1 ) {
-
-    fprintf( stderr, "ERROR: invalid port %s\n", argv[ ARG_SERVERPORT ] );
-    exit( EXIT_FAILURE );
-  }
-  sock = connectTo( argv[ ARG_SERVERNAME ], port );
-  if( sock < 0 ) {
-
-    exit( EXIT_FAILURE );
-  }
-
-  // EJ additions 9/3/2012
-  // Turn on keep-alive for socket connection with more frequent checking
-  // than the Linux default.  What I've observed is that if a socket
-  // connection is idle for long enough it gets dropped.  This only
-  // happens for some users.
-  int on = 1;
-  if (setsockopt(sock, SOL_SOCKET, SO_KEEPALIVE, &on, sizeof(on)) == -1) {
-    fprintf( stderr, "ERROR: setsockopt failed; errno %i\n", errno );
-    exit( EXIT_FAILURE );
-  }
-  // Not sure what this should be
-  int num_before_failure = 2;
-  if (setsockopt(sock, SOL_TCP, TCP_KEEPCNT, &num_before_failure,
-		 sizeof(num_before_failure)) == -1) {
-    fprintf( stderr, "ERROR: setsockopt failed; errno %i\n", errno );
-    exit( EXIT_FAILURE );
-  }
-  // First check after 60 seconds
-  int initial_secs = 60;
-  if (setsockopt(sock, SOL_TCP, TCP_KEEPIDLE, &initial_secs,
-		 sizeof(initial_secs)) == -1) {
-    fprintf( stderr, "ERROR: setsockopt failed; errno %i\n", errno );
-    exit( EXIT_FAILURE );
-  }
-  // Thereafter, also check every 60 seconds
-  int interval_secs = 60;
-  if (setsockopt(sock, SOL_TCP, TCP_KEEPINTVL, &interval_secs,
-		 sizeof(interval_secs)) == -1) {
-    fprintf( stderr, "ERROR: setsockopt failed; errno %i\n", errno );
-    exit( EXIT_FAILURE );
-  }
-
-  /* set up read buffers */
-  fromServer = createReadBuf( sock );
-
-  /* write to server */
-  line[0] = 0;
-  for( i = 3; i < argc; ++i ) {
-    strcat( line, argv[i] );
-    if ( i < argc - 1 ) {
-      strcat( line, " " );
-    }
-  }
-  strcat( line, "\n" );
-  int len = strlen(line);
-  if( write( sock, line, len ) < 0 ) {
-    
-    fprintf( stderr, "ERROR: failed while sending to server\n" );
-    exit( EXIT_FAILURE );
-  }
-
-  /* main loop */
-  while( 1 ) {
-
-    /* clean up any children */
-    while( waitpid( -1, NULL, WNOHANG ) > 0 );
-
-    /* wait for input */
-    FD_ZERO( &readfds );
-    FD_SET( sock, &readfds );
-    i = select( sock + 1, &readfds, NULL, NULL, NULL );
-    if( i < 0 ) {
-
-      fprintf( stderr, "ERROR: select failed\n" );
-      exit( EXIT_FAILURE );
-    }
-    if( i == 0 ) {
-      /* nothing ready - shouldn't happen without timeout */
-
-      continue;
-    }
-
-    /* handle server messages */
-    if( FD_ISSET( sock, &readfds ) ) {
-
-      /* get the input */
-      while( ( i = getLine( fromServer, READBUF_LEN, line, 0 ) ) >= 0 ) {
-
-	if( i == 0 ) {
-
-	  /* This could be an error or could just signify successful
-	     completion of all matches */
-	  fprintf( stderr, "Server closed connection\n" );
-	  exit( EXIT_SUCCESS );
-	}
-
-	/* check for server commands */
-	if( strncasecmp( line, "run ", 4 ) == 0 ) {
-
-	  /* split the rest of the line into name ' ' port */
-	  for( i = 4; line[ i ]; ++i ) {
-
-	    if( line[ i ] == ' ' ) {
-	      /* found the separator */
-
-	      line[ i ] = 0;
-	      break;
-	    }
-	  }
-
-	  printf( "starting match %s:%s", &line[ 4 ], &line[ i + 1 ] );
-	  fflush( stdout );
-
-	  /* run `command machine port` */
-	  childPID = fork();
-	  if( childPID < 0 ) {
-
-	    fprintf( stderr, "ERROR: fork() failed\n" );
-	    exit( EXIT_FAILURE );
-	  }
-	  if( childPID == 0 ) {
-	    /* child runs the command */
-
-	    execl( argv[ ARG_BOT_COMMAND ],
-		   argv[ ARG_BOT_COMMAND ],
-		   &line[ 4 ],
-		   &line[ i + 1 ],
-		   NULL );
-	    fprintf( stderr,
-		     "ERROR: could not run %s\n",
-		     argv[ ARG_BOT_COMMAND ] );
-	    exit( EXIT_FAILURE );
-	  }
-	} else {
-	  /* just a message, print it out */
-
-	  if( fwrite( line, 1, i, stdout ) < 0 ) {
-
-	    fprintf( stderr, "ERROR: failed while printing server message\n" );
-	    exit( EXIT_FAILURE );
-	  }
-	  fflush( stdout );
-
-	  if( ! strcmp( line, "Matches finished\n") ) {
-	    exit( EXIT_SUCCESS );
-	  }
-	}
-      }
-    }
-  }
-
-  return EXIT_SUCCESS;
-}