poker 0.0.1

data/test/poker/card_test.rb

@@ -0,0 +1,35 @@
+require File.dirname(__FILE__) + '/../test_helper.rb'
+
+module Poker
+  class CardTest < Test::Unit::TestCase
+    context "A card" do
+      setup do
+        @card = Card.new("As") # Ace of Spades
+      end
+
+      should "have a rank" do
+        assert_equal "A", @card.rank
+      end
+
+      should "have a rank value" do
+        assert_equal 12, @card.rank_value
+      end
+
+      should "have a suit" do
+        assert_equal "s", @card.suit
+      end
+
+      should "have a suit value" do
+        assert_equal 3, @card.suit_value
+      end
+
+      should "have a value" do
+        assert_equal 268442665, @card.value
+      end
+
+      should "respond to #to_s" do
+        assert_equal "As", @card.to_s
+      end
+    end
+  end
+end

data/test/poker/deck_test.rb

@@ -0,0 +1,27 @@
+require File.dirname(__FILE__) + '/../test_helper.rb'
+
+module Poker
+  class DeckTest < Test::Unit::TestCase
+    context "A Deck" do
+      setup do
+        @deck = Deck.new
+      end
+
+      should "have 52 elements" do
+        assert_equal 52, @deck.size
+      end
+
+      should "have cards" do
+        assert_kind_of Card, @deck.first
+      end
+
+      should "have 13 ranks" do
+        assert_equal 13, @deck.map { |c| c.rank }.uniq.size
+      end
+
+      should "have 4 suits" do
+        assert_equal 4, @deck.map { |c| c.suit }.uniq.size
+      end
+    end
+  end
+end

data/test/poker/hand_test.rb

@@ -0,0 +1,79 @@
+require File.dirname(__FILE__) + '/../test_helper.rb'
+
+module Poker
+  class HandTest < Test::Unit::TestCase
+    def self.should_recognize_value(expected, cards)
+      should "recognize value of #{cards}" do
+        assert_equal expected, Hand.new(cards).value
+      end
+    end
+
+    def self.should_recognize_rank(expected, cards)
+      should "recognize rank of #{cards}" do
+        assert_equal expected, Hand.new(cards).rank
+      end
+    end
+
+    context "A hand" do
+      setup do
+        @hand = Hand.new("As Ks Qs Js Ts")
+      end
+
+      should "have a size" do
+        assert_equal 5, @hand.size
+      end
+
+      should "have cards" do
+        assert_kind_of Card, @hand[0]
+      end
+
+      should "be comparable" do
+        assert @hand > Hand.new("5s 4s 3s 2s As")
+        assert @hand == Hand.new("Ad Kd Qd Jd Td")
+      end
+
+      should "respond to #to_s" do
+        assert_equal "As Ks Qs Js Ts", @hand.to_s
+      end
+    end
+
+    should "initialize with array of cards" do
+      @hand = Hand.new(Card.new("As"), Card.new("Ks"))
+      assert "A", @hand[0].rank
+      assert "K", @hand[1].rank
+    end
+
+    should "initialize with array of strings" do
+      @hand = Hand.new(*%w{As Ks})
+      assert "A", @hand[0].rank
+      assert "K", @hand[1].rank
+    end
+
+    should_recognize_value(1, "As Ks Qs Js Ts")
+    should_recognize_value(2, "Ks Qs Js Ts 9s")
+
+    should_recognize_rank "Royal Flush",    "As Ks Qs Js Ts"
+    should_recognize_rank "Straight Flush", "Ks Qs Js Ts 9s"
+    should_recognize_rank "Four of a Kind", "Ac Ad Ah As Ks"
+
+    should "get the best 5-card hand from 7 cards" do
+      cards = %w{ 2c 3c 4c Ac Ad Ah As }
+      assert_equal "Four of a Kind", Hand.best(cards).rank
+    end
+
+    should "display cards with order" do
+      assert_equal "Ac Ad Qc Qd Kc", Hand.new("Kc Qd Ac Qc Ad").to_s
+      assert_equal "Ac Ad Qc Qd Kc", Hand.new("Kc Qc Ad Qd Ac").to_s
+      assert_equal "Ac Ad Qc Qd Kc", Hand.new("Kc Ad Ac Qc Qd").to_s
+      assert_equal "Tc Td Ac Qd 2c", Hand.new("2c Qd Ac Td Tc").to_s
+      assert_equal "Tc Td Ac Kd Qc", Hand.new("Qc Kd Ac Td Tc").to_s
+      assert_equal "Tc Td Ts Ac Qc", Hand.new("Ts Qc Ac Td Tc").to_s
+      assert_equal "Tc Td Ts Ac Ad", Hand.new("Ts Ad Ac Td Tc").to_s
+      assert_equal "Ac Ad As Tc Td", Hand.new("As Td Tc Ad Ac").to_s
+      assert_equal "2c 2d 2h 2s Ad", Hand.new("2s Ad 2d 2c 2h").to_s
+      assert_equal "5c 4c 3c 2c Ad", Hand.new("2c 4c Ad 5c 3c").to_s
+      assert_equal "Ac Tc 4c 3c 2c", Hand.new("2c 4c Tc Ac 3c").to_s
+      assert_equal "2c 2d 2s 5c 5d", Hand.new("2s 2d 2c 5d 5c").to_s
+    end
+  end
+end

data/test/test_helper.rb

@@ -0,0 +1,7 @@
+require 'test/unit'
+require 'rubygems'
+require 'shoulda'
+require 'redgreen'
+
+$: << File.dirname(__FILE__) + '/../lib'
+require 'poker'

metadata

@@ -0,0 +1,74 @@
+--- !ruby/object:Gem::Specification
+name: poker
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+  prerelease: 
+platform: ruby
+authors:
+- Wojciech Mach
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-02-09 00:00:00.000000000 Z
+dependencies: []
+description: Poker hand evaluator
+email:
+- wojtekmach1@gmail.com
+executables: []
+extensions:
+- ext/handeval/extconf.rb
+extra_rdoc_files: []
+files:
+- .gitignore
+- Gemfile
+- README
+- Rakefile
+- example/aces_equity.rb
+- example/random_hu.rb
+- ext/handeval/Makefile
+- ext/handeval/arrays.h
+- ext/handeval/extconf.rb
+- ext/handeval/handeval.c
+- ext/handeval/poker.h
+- ext/handeval/pokerlib.c
+- lib/poker.rb
+- lib/poker/card.rb
+- lib/poker/deck.rb
+- lib/poker/hand.rb
+- lib/poker/version.rb
+- poker.gemspec
+- test/poker/card_test.rb
+- test/poker/deck_test.rb
+- test/poker/hand_test.rb
+- test/test_helper.rb
+homepage: http://rubygems.org/gems/poker
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+- ext
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: poker
+rubygems_version: 1.8.11
+signing_key: 
+specification_version: 3
+summary: Poker hand evaluator
+test_files:
+- test/poker/card_test.rb
+- test/poker/deck_test.rb
+- test/poker/hand_test.rb
+- test/test_helper.rb
+has_rdoc: