acpc_dealer 0.0.1

data/README.md

@@ -0,0 +1,33 @@
+# AcpcDealer
+
+TODO: Write a gem description
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+    gem 'acpc_dealer'
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install acpc_dealer
+
+## Usage
+
+TODO: Write usage instructions here
+
+## Logging
+
+For every match, two files will be logged: `<match name>.log` containing the match results and `<match name>.actions.log` containing the sequence of messages to and from the dealer over the course of the match. The location of these files can be customized with the :log_directory option. By default, they will be populated in the working directory of the calling process.
+
+## Contributing
+
+1. Fork it
+2. Create your feature branch (`git checkout -b my-new-feature`)
+3. Commit your changes (`git commit -am 'Added some feature'`)
+4. Push to the branch (`git push origin my-new-feature`)
+5. Create new Pull Request

data/Rakefile

@@ -0,0 +1,20 @@
+require "bundler/gem_tasks"
+require 'rake'
+require 'rake/extensiontask'
+require 'rake/testtask'
+
+require File.expand_path('../lib/acpc_dealer/version', __FILE__)
+
+Rake::ExtensionTask.new('hand_evaluator')
+
+desc 'Build gem'
+task :default => :build
+
+task :build => :compile
+
+Rake::TestTask.new do |t|
+  t.libs << "lib" << 'spec/support'
+  t.test_files = FileList['spec/**/*_spec.rb']
+  t.verbose = true
+  t.warning = true
+end

data/acpc_dealer.gemspec

@@ -0,0 +1,29 @@
+# -*- encoding: utf-8 -*-
+require File.expand_path('../lib/acpc_dealer/version', __FILE__)
+
+Gem::Specification.new do |gem|
+  gem.name          = "acpc_dealer"
+  gem.version       = AcpcDealer::VERSION
+  gem.authors       = ["Dustin Morrill"]
+  gem.email         = ["morrill@ualberta.ca"]
+  gem.description   = %q{Annual Computer Poker Competition Dealer}
+  gem.summary       = %q{Ruby interface to the Annual Computer Poker Competition's dealer program.}
+  gem.homepage      = "https://github.com/dmorrill10/acpc_dealer"
+
+  gem.add_dependency 'clive'
+  gem.add_dependency 'dmorrill10-utils', '~>1.0.0'
+  gem.add_dependency 'rake-compiler'
+
+  gem.add_development_dependency 'piston'
+
+  gem.add_development_dependency 'mocha'
+  gem.add_development_dependency 'simplecov'
+  gem.add_development_dependency 'turn'
+
+  gem.files         = Dir.glob("lib/**/*") + Dir.glob("ext/**/*") + Dir.glob('*.gemspec') +
+    %w(Rakefile README.md) + Dir.glob('spec/**/*') + Dir.glob("vendor/**/*")
+  gem.test_files    = gem.files.grep(%r{^(test|spec|features)/})
+  gem.extensions    = Dir.glob("ext/**/extconf.rb")
+  gem.require_paths = ["lib"]
+  gem.executables   << 'acpc_dealer'
+end

data/bin/acpc_dealer

@@ -0,0 +1,168 @@
+#!/usr/bin/env ruby
+
+require 'dmorrill10-utils/process_runner'
+
+require 'fileutils'
+
+require 'clive'
+
+require File.expand_path('../../lib/acpc_dealer', __FILE__)
+
+class AcpcDealerCli < Clive
+
+  def self.print_usage(command_symbol)
+    puts AcpcDealerCli.find_command(command_symbol).help
+    exit
+  end
+
+  def self.game_def_from_components(number_of_players, betting_type)
+    begin
+      game_def = AcpcDealer::GAME_DEFINITION_FILE_PATHS[number_of_players][betting_type]
+      raise unless game_def
+    rescue
+      puts "Unable to find game definition for #{number_of_players} players with betting type '#{betting_type}'"
+      puts "Available game definitions:"
+      AcpcDealer::GAME_DEFINITION_FILE_PATHS.each do |num_players, game_defs|
+        game_defs.each do |type, path|
+          puts "    #{num_players} #{type}"
+        end
+      end
+      exit
+    end
+
+    game_def
+  end
+
+  command :compile, 'Compiles the ACPC Dealer program' do
+    opt :c, :clean, 'Do a clean and full recompile' do
+      print 'Cleaning...'
+      FileUtils.cd AcpcDealer::DEALER_DIRECTORY do
+        system "make clean"
+      end
+      puts 'Done'
+    end
+
+    action do
+      print 'Compiling...'
+      FileUtils.cd AcpcDealer::DEALER_DIRECTORY do
+        system "make"
+      end
+      puts 'Done'
+    end
+  end
+
+  command :dealer, 'Runs the ACPC Dealer' do
+    desc 'The name of the match, defaults to <number_of_players>p.<betting_type>.h<hands>.r<random_seed>'
+    opt :m, :name, arg: '<name>', as: String
+    
+    desc 'Parameters that determine which game definition to use'
+    opt :g, :game_def, args: '<number_of_players> <betting_type>', as: [Integer, Symbol]
+    
+    opt :n, :hands, 'The number of hands to play', arg: '<hands>', as: Integer
+    
+    desc 'The random seed to determine how the cards are dealt, defaults to a random random seed'
+    opt :r, :random_seed, arg: '<random_seed>', as: Integer
+    
+    desc 'The names of the players participating in the match, defaults to "p1", "p2", ...'
+    opt :p, :player_names, args: '<p1_name>...', as: [String]
+    
+    opt :l, :log_directory, 'Directory where logs will be placed', arg: '<log_directory>', as: String
+
+    opt :t_response, 'Maximum time per response', arg: '<t_response_milliseconds>', as: Integer
+    
+    opt :t_hand, 'Maximum player time per hand', arg: '<t_hand_milliseconds>', as: Integer
+    
+    opt :t_per_hand, 'Maximum average player time for match', arg: '<t_per_hand_milliseconds>', as: Integer 
+    
+    desc 'Maximum time to wait for players to connect, defaults to no timeout'
+    opt :start_timeout, arg: '<start_timeout_milliseconds>', as: Integer
+
+    action do
+      AcpcDealerCli.print_usage(:dealer) unless get(:game_def)
+      AcpcDealerCli.print_usage(:dealer) unless get(:hands)
+
+      (number_of_players, betting_type) = get(:game_def)
+      game_def = AcpcDealerCli.game_def_from_components(number_of_players, betting_type)
+
+      random_seed = if get(:random_seed)
+        get(:random_seed)
+      else
+        random_float = rand
+        (random_float * 10**random_float.to_s.length).to_i
+      end
+
+      name = if get(:name)
+        get(:name) 
+      else 
+        "#{number_of_players}p.#{betting_type}.h#{get(:hands)}.r#{random_seed}"
+      end
+
+      player_names = if get(:player_names) 
+        get(:player_names)
+      else
+        []
+      end
+      
+      while player_names.length < get(:game_def).first
+          player_names << "p#{player_names.length+1}"
+      end
+
+      arguments = {
+        match_name: name, 
+        game_def_file_name: game_def, 
+        hands: get(:hands).to_s, 
+        random_seed: random_seed.to_s,
+        player_names: player_names.join(' ')
+      }
+
+      # Append to produce behavior of previous dealer version
+      options = ['-a']
+      options << "--t_response #{get(:t_response_milliseconds)}" if get(:t_response_milliseconds)
+      options << "--t_hand #{get(:t_hand_milliseconds)}" if get(:t_hand_milliseconds)
+      options << "--t_per_hand #{get(:t_per_hand_milliseconds)}" if get(:t_per_hand_milliseconds)
+      options << "--start_timeout #{get(:start_timeout_milliseconds)}" if get(:start_timeout_milliseconds)
+
+      arguments[:options] = options
+
+      AcpcDealerCli.run(['compile']) unless File.exists? AcpcDealer::DEALER_PATH
+
+      dealer_result = DealerRunner.start(arguments, get(:log_directory))
+      puts "Dealer pid: #{dealer_result[:pid]}, ports: #{dealer_result[:port_numbers].join(' ')}, log directory: #{dealer_result[:log_directory]}"
+    end
+  end
+
+  command :example_player, 'Starts an example player' do
+    desc 'Parameters that determine which type of player to use, same format as that for the dealer command'
+    opt :g, :game_def, args: '<number_of_players> <betting_type>', as: [Integer, Symbol]
+
+    desc 'The host name of the running dealer, defaults to "localhost"'
+    opt :o, :host_name, arg: '<host_name>', as: String
+
+    desc 'The port on which this player will try to connect to the dealer'
+    opt :p, :port, arg: '<port>', as: String
+
+    action do
+      AcpcDealerCli.print_usage(:example_player) unless get(:game_def)
+      AcpcDealerCli.print_usage(:example_player) unless get(:port)
+
+      (number_of_players, betting_type) = get(:game_def)
+      # Check that a game def for the specified parameters exists
+      AcpcDealerCli.game_def_from_components(number_of_players, betting_type)
+
+      host_name = if get(:host_name) then get(:host_name) else 'localhost' end
+
+      player = AcpcDealer::EXAMPLE_PLAYERS[number_of_players][betting_type]
+      players_directory = File.dirname(player)
+      FileUtils.cd players_directory
+      ProcessRunner.go [player, host_name, get(:port)]
+
+      puts "Example player for #{number_of_players} player #{betting_type}, connected to dealer on #{host_name}:#{get(:port)}"
+    end
+  end
+end
+
+if ARGV.empty?
+  puts AcpcDealerCli.help
+else  
+  AcpcDealerCli.run
+end

data/ext/hand_evaluator/extconf.rb

@@ -0,0 +1,5 @@
+
+#Run 'ruby -r mkmf extconf.rb' to generate a Makefile
+
+require 'mkmf'
+create_makefile("hand_evaluator")

data/ext/hand_evaluator/hand_evaluator.c

@@ -0,0 +1,38 @@
+// Ruby includes
+#include <ruby.h>
+#include <ruby/io.h>
+
+// ACPC includes
+#include "../../vendor/project_acpc_server/game.h"
+#include "../../vendor/project_acpc_server/evalHandTables"
+
+static VALUE cHandEvaluator;
+
+/*
+ * @param [VALUE] self The class from which this method was called.  This is
+ *    an implicit argument.
+ * @param [VALUE] ruby_card_list The list of numeric ACPC represented cards in
+ *    a Ruby array.
+ * @return [int] The rank of the hand.
+ */
+static VALUE rank_hand(VALUE self, VALUE ruby_card_list) {
+   VALUE* card_list = RARRAY_PTR(ruby_card_list);
+   int card_list_length = RARRAY_LEN(ruby_card_list);
+  
+   int card;
+   Cardset card_set = emptyCardset();
+   
+   int i;
+   for(i = 0; i < card_list_length; ++i) {
+      card = NUM2INT(card_list[i]);
+      addCardToCardset(&card_set, suitOfCard(card),
+         rankOfCard(card));
+   }
+ 
+   return INT2NUM(rankCardset(card_set));
+}
+
+void Init_hand_evaluator() {
+   cHandEvaluator = rb_define_module("HandEvaluator");
+   rb_define_module_function(cHandEvaluator, "rank_hand", rank_hand, 1);
+}

data/lib/acpc_dealer/2p.limit.h5.r0.logs/2p.limit.h5.r0.actions.log

@@ -0,0 +1,5 @@
+# name/game/hands/seed 2p.limit.h5.r0 /home/dmorrill/workspace/ualberta_poker_group/acpc_dealer/vendor/project_acpc_server/holdem.limit.2p.reverse_blinds.game 5 0
+#--t_response 600000
+#--t_hand 600000
+#--t_per_hand 7000
+Terminated

data/lib/acpc_dealer/dealer_runner.rb

@@ -0,0 +1,72 @@
+
+require 'socket'
+
+require 'dmorrill10-utils/process_runner'
+
+class DealerRunner
+
+  # @return [Array<Symbol>] The format of the dealer command. The symbols in this
+  # => array should correspond to those in the +dealer_arguments+ of ::start.
+  # => (see ::start)
+  DEALER_COMMAND_FORMAT = [
+    # @note The name of the match to start.
+    :match_name, 
+    # @note The path of the game definition to use.
+    :game_def_file_name, 
+    # @note The number of hands to play.
+    :hands,
+    # @note The random seed to use.
+    :random_seed, 
+    # @note The names of the players in the game. Should be specified as a space delimited string of names.
+    :player_names,
+    # @note Should be specified as an option string that the dealer will understand.
+    :options 
+  ]
+
+  # @param [Array] dealer_arguments Arguments to the new dealer instance.
+  # @param [String] log_directory The directory in which logs will be placed.
+  # => Defaults to +<dealer_arguments[:match_name]>.logs+.
+  # @param [Array] port_numbers The port numbers to which each player will connect.
+  # => Defaults to random.
+  # @return [Hash] The process ID of the started dealer (key +:pid+) and the array of ports that players may 
+  # => use to connect to the new dealer instance (key +:port_numbers+).
+  # @raise (see ProcessRunner::go)
+  # @raise (see FileUtils::mkdir_p)
+  def self.start(dealer_arguments, log_directory=nil, port_numbers=nil)
+    dealer_start_command = DEALER_COMMAND_FORMAT.inject([AcpcDealer::DEALER_PATH]) do |command, parameter|
+      command << dealer_arguments[parameter].to_s
+    end 
+    dealer_start_command << "-p #{port_numbers.join(',')}" if port_numbers
+
+    unless log_directory
+      log_directory = File.expand_path("../#{dealer_arguments[:match_name]}.logs", __FILE__)
+    end
+
+    FileUtils.mkdir_p log_directory
+
+    IO.pipe do |read_io, write_io|
+      pid = ProcessRunner.go(
+        dealer_start_command, 
+        err: [
+          "#{dealer_arguments[:match_name]}.actions.log", 
+          File::CREAT|File::WRONLY
+        ],
+        out: write_io,
+        chdir: log_directory
+      )
+
+      {pid: pid, port_numbers: read_io.gets.split, log_directory: log_directory}
+    end
+  end
+
+  # @todo How could ports be reserved without starting a server? Would +::ports_for_players+ even want to do that?
+
+  # @return [Array<Integer>] List of random open ports. Does NOT reserve the ports though,
+  # => so it's possible that the ports will come into use between calling this method and
+  # => using them.
+  def self.ports_for_players(number_of_players)
+    number_of_players.times.inject([]) do |ports, i|
+      ports << TCPServer.open('localhost', 0) { |s| s.addr[1] }
+    end
+  end
+end

data/lib/acpc_dealer/version.rb

@@ -0,0 +1,3 @@
+module AcpcDealer
+  VERSION = "0.0.1"
+end

data/lib/acpc_dealer.rb

@@ -0,0 +1,33 @@
+require File.expand_path('../hand_evaluator', __FILE__)
+require File.expand_path("../acpc_dealer/dealer_runner", __FILE__)
+
+module AcpcDealer
+  DEALER_DIRECTORY = File.expand_path('../../vendor/project_acpc_server', __FILE__)
+  GAME_DEFINITION_FILE_PATHS =
+  {
+    2 =>
+    {
+      limit: "#{DEALER_DIRECTORY}/holdem.limit.2p.reverse_blinds.game",
+      nolimit: "#{DEALER_DIRECTORY}/holdem.nolimit.2p.reverse_blinds.game"
+    },
+    3 =>
+    {
+      limit: "#{DEALER_DIRECTORY}/holdem.limit.3p.game",
+      nolimit: "#{DEALER_DIRECTORY}/holdem.nolimit.3p.game"
+    }
+  }
+  DEALER_PATH = "#{DEALER_DIRECTORY}/dealer"
+  EXAMPLE_PLAYERS =
+  {
+    2 =>
+    {
+      limit: "#{DEALER_DIRECTORY}/example_player.limit.2p.sh",
+      nolimit: "#{DEALER_DIRECTORY}/example_player.nolimit.2p.sh"
+    },
+    3 =>
+    {
+      limit: "#{DEALER_DIRECTORY}/example_player.limit.3p.sh",
+      nolimit: "#{DEALER_DIRECTORY}/example_player.nolimit.3p.sh"
+    }
+  }
+end

data/spec/coverage/assets/0.5.3/app.js

@@ -0,0 +1,88 @@
+$(document).ready(function() {
+  // Configuration for fancy sortable tables for source file groups
+  $('.file_list').dataTable({
+    "aaSorting": [[ 1, "asc" ]],
+    "bPaginate": false,
+    "bJQueryUI": true,
+    "aoColumns": [
+			null,
+		  { "sType": "percent" },
+			null,
+			null,
+			null,
+			null,
+      null
+		]
+  });
+  
+  // Syntax highlight all files up front - deactivated
+  // $('.source_table pre code').each(function(i, e) {hljs.highlightBlock(e, '  ')});
+  
+  // Syntax highlight source files on first toggle of the file view popup
+  $("a.src_link").click(function() {
+    // Get the source file element that corresponds to the clicked element
+    var source_table = $($(this).attr('href'));
+    
+    // If not highlighted yet, do it!
+    if (!source_table.hasClass('highlighted')) {
+      source_table.find('pre code').each(function(i, e) {hljs.highlightBlock(e, '  ')});
+      source_table.addClass('highlighted');
+    };
+  });
+  
+  // Set-up of popup for source file views
+  $("a.src_link").fancybox({
+		'hideOnContentClick': true,
+		'centerOnScroll': true,
+		'width': '90%',
+		'padding': 0,
+		'transitionIn': 'elastic'
+  });
+	
+	// Hide src files and file list container after load
+  $('.source_files').hide();
+  $('.file_list_container').hide();
+  
+  // Add tabs based upon existing file_list_containers
+  $('.file_list_container h2').each(function(){
+    var container_id = $(this).parent().attr('id');
+    var group_name = $(this).find('.group_name').first().html();
+    var covered_percent = $(this).find('.covered_percent').first().html();
+    
+    $('.group_tabs').append('<li><a href="#' + container_id + '">' + group_name + ' ('+ covered_percent +')</a></li>');
+  });
+
+  $('.group_tabs a').each( function() {
+    $(this).addClass($(this).attr('href').replace('#', ''));
+  });
+  
+  // Make sure tabs don't get ugly focus borders when active
+  $('.group_tabs a').live('focus', function() { $(this).blur(); });
+  
+  var favicon_path = $('link[rel="shortcut icon"]').attr('href');
+  $('.group_tabs a').live('click', function(){
+    if (!$(this).parent().hasClass('active')) {
+      $('.group_tabs a').parent().removeClass('active');
+      $(this).parent().addClass('active');
+      $('.file_list_container').hide();
+      $(".file_list_container" + $(this).attr('href')).show();
+      window.location.href = window.location.href.split('#')[0] + $(this).attr('href').replace('#', '#_');
+      
+      // Force favicon reload - otherwise the location change containing anchor would drop the favicon...
+      // Works only on firefox, but still... - Anyone know a better solution to force favicon on local file?
+      $('link[rel="shortcut icon"]').remove();
+      $('head').append('<link rel="shortcut icon" type="image/png" href="'+ favicon_path +'" />');
+    };
+    return false;
+  });
+  
+  if (jQuery.url.attr('anchor')) {
+    $('.group_tabs a.'+jQuery.url.attr('anchor').replace('_', '')).click();
+  } else {
+    $('.group_tabs a:first').click();
+  };
+  
+  $("abbr.timeago").timeago();
+  $('#loading').fadeOut();
+  $('#wrapper').show();
+});