rpoker 0.1.0

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: 14c1fe8bbdb62e78f7cf12668b8c4c96392fb18c
+  data.tar.gz: c09fbd0fa370841e8fa10bb54308b5f1a6e0975f
+SHA512:
+  metadata.gz: 1804d821324d68dec6fcc5604991244505bf18dbb1120cdbae2c585df6b1f9b99c9d8926aa24d2ee8ceb4a2a2a11ae9be0ad3f667a86b06a19274d1f5ef23d34
+  data.tar.gz: 92bec40a278e09dc0916ceb590bda945f9921e61c75551c036033db9a6334297685bc2e950fc317bc39fb632553dfe85c3a91a0b0645383c4340d865fd215a98

data/lib/rpoker/card.rb

@@ -0,0 +1,28 @@
+class Card
+  attr_reader :value, :suit
+
+  FACE_VALUES = {
+    "T" => 10,
+    "J" => 11,
+    "Q" => 12,
+    "K" => 13,
+    "A" => 14
+  }
+
+  def initialize(string)
+    chars = string.split("")
+    @value, @suit = [chars.first.upcase, chars.last.downcase]
+  end
+
+  def to_s
+    "#{@value}#{@suit}"
+  end
+
+  def face_card?
+    value.to_i.to_s != value
+  end
+
+  def num_value
+    face_card? ? FACE_VALUES[value] : value.to_i
+  end
+end

data/lib/rpoker/hand.rb

@@ -0,0 +1,115 @@
+class Hand
+  include Comparable
+  attr_reader :cards
+
+  TYPES = %w(
+    straight_flush
+    four_of_a_kind
+    full_house
+    flush
+    straight
+    three_of_a_kind
+    two_pair
+    pair
+  )
+
+  def initialize(cards)
+    @cards =
+      case cards
+      when Array
+        cards.map { |card| card.is_a?(Card) ? card : Card.new(card) }
+      when String
+        cards.split(" ").map {|s| Card.new(s)}
+      end
+  end
+
+  def <=>(other_hand)
+    winner = Matchup.new(self, other_hand).winner
+    return  1 if winner == self
+    return  0 if winner == nil
+    return -1 if winner == other_hand
+  end
+
+  def display
+    print cards.map { |card| card.to_s }.join(" ")
+  end
+
+  def suits
+    @suits ||= cards.map(&:suit)
+  end
+
+  def values
+    @values ||= cards.map(&:value)
+  end
+
+  def num_values
+    @num_values ||= cards.map(&:num_value)
+  end
+
+  def sorted_values
+    @sorted_values ||= num_values.sort.reverse
+  end
+
+  # sort card values by their multiplicity in descending order
+  # e.g. for the hand Js 2s Jh 4s 2c the method returns [11, 11, 2, 2, 4]
+  def values_sorted_by_count
+    @values_sorted_by_count ||=
+      [4,3,2,1].inject([]) { |sorted, n|
+        sorted += sorted_values.select { |value| sorted_values.count(value) == n } }
+  end
+
+  # sort distinct card values by their multiplicity in descending order
+  # e.g. for the hand Js 2s Jh 4s 2c the method returns [11, 2, 4]
+  def uniq_values_sorted_by_count
+    @uniq_values_sorted_by_count ||= values_sorted_by_count.uniq
+  end
+
+  def num_uniq_values
+    @num_uniq_values ||= values.uniq.size
+  end
+
+  def same_values_in_sorted?(start, stop)
+    values_slice = values_sorted_by_count[start..stop]
+    values_slice.all? { |value| value == values_slice.first }
+  end
+
+  def wheel?
+    sorted_values == [14, 5, 4, 3, 2]
+  end
+
+  def flush?
+    suits.all? { |suit| suit == suits.first }
+  end
+
+  def straight?
+    wheel? || (sorted_values.first == sorted_values.last + 4 && num_uniq_values == 5)
+  end
+
+  def straight_flush?
+    flush? && straight?
+  end
+
+  def full_house?
+    same_values_in_sorted?(0, 2) && same_values_in_sorted?(3, 4)
+  end
+
+  def four_of_a_kind?
+    same_values_in_sorted?(0, 3)
+  end
+
+  def three_of_a_kind?
+    same_values_in_sorted?(0, 2) && num_uniq_values == 3
+  end
+
+  def two_pair?
+    same_values_in_sorted?(0, 1) && same_values_in_sorted?(2, 3) && num_uniq_values == 3
+  end
+
+  def pair?
+    same_values_in_sorted?(0, 1) && num_uniq_values == 4
+  end
+
+  def rank
+    (TYPES.find { |type| send("#{type}?".to_sym) } || "high_card").gsub('_', ' ')
+  end
+end

data/lib/rpoker/matchup.rb

@@ -0,0 +1,54 @@
+class Matchup
+  attr_reader :hand1, :hand2
+
+  def initialize(hand1, hand2)
+    @hand1, @hand2 = hand1, hand2
+  end
+
+  def winner
+    Hand::TYPES.each do |type|
+      # build the boolean type check method
+      is_type = "#{type}?".to_sym
+
+      # check whether either hand is of the type
+      if hand1.send(is_type) && hand2.send(is_type)
+        return same_type_winner
+      elsif hand1.send(is_type)
+        return hand1
+      elsif hand2.send(is_type)
+        return hand2
+      end
+    end
+
+    # both hands are high card rank and can be compared by
+    # comparing values
+    return same_type_winner
+  end
+
+  private
+  # for two hands of the same type (straight, flush, etc):
+  # returns the winner by sorting the hands' numeric values
+  # and then comparing value pairs in descending order
+  def same_type_winner
+
+    # check for the special case where one hand is a wheel
+    if hand1.wheel? && hand2.wheel?
+      return nil
+    elsif hand1.wheel?
+      return hand1
+    elsif hand2.wheel?
+      return hand2
+    end
+
+    # compare the numeric value pairs
+    values1, values2 = [hand1, hand2].map(&:uniq_values_sorted_by_count)
+    values1.zip(values2).each do |v1, v2|
+      if v1 > v2
+        return hand1
+      elsif v2 > v1
+        return hand2
+      end
+    end
+    return nil
+  end
+end

data/lib/rpoker.rb

@@ -0,0 +1,3 @@
+require "rpoker/hand"
+require "rpoker/card"
+require "rpoker/matchup"

metadata

@@ -0,0 +1,48 @@
+--- !ruby/object:Gem::Specification
+name: rpoker
+version: !ruby/object:Gem::Version
+  version: 0.1.0
+platform: ruby
+authors:
+- Ben Cornelis
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2015-09-17 00:00:00.000000000 Z
+dependencies: []
+description: 
+email: bencornelis02@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- lib/rpoker.rb
+- lib/rpoker/card.rb
+- lib/rpoker/hand.rb
+- lib/rpoker/matchup.rb
+homepage: http://rubygems.org/gems/rpoker
+licenses:
+- MIT
+metadata: {}
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  requirements:
+  - - ">="
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 2.4.8
+signing_key: 
+specification_version: 4
+summary: Ruby library for comparing and ranking poker hands
+test_files: []
+has_rdoc: