betforker 1.0.1

data/lib/betforker/bookmakers/williamhill.rb

@@ -0,0 +1,115 @@
+module Betforker
+  module Bookmakers
+    module WilliamHill
+      module_function
+
+      def parse_live_page(html, sport)
+	nok = Nokogiri::HTML(html)
+	links = Hash.new
+	nok.css('#ip_sport_24_types .CentrePad a').each do |link|
+	  next unless link['href']
+	  href = link['href']
+	  players = link.text
+	  links[href] = concatenated_names players
+	end
+	links
+      end
+
+      def parse_event(event, sport)
+	result = Betforker::ParsedPage.new bookie: 'WilliamHill'
+	html = extract_html_from(event)
+	return event if html.nil?
+	nok = Nokogiri::HTML(html)
+	nok.css('script').remove
+	nok.css('#primaryCollectionContainer .marketHolderExpanded .tableData').each do |market|
+	  market.css('thead div').remove
+	  title = market.css('thead span').text
+	  next if title =~ /Total|Point|Deuce|Score/
+	  target_filler(market, title, 'home', result)
+	  target_filler(market, title, 'away', result)
+	end
+	result.home_player[:name] ||= 'HomePlayer'
+	result.away_player[:name] ||= 'AwayPlayer'
+	event.parsed_webpages << result
+      end
+
+      def extract_html_from(event)
+	arr = event.webpages.values_at 'williamhill'
+	arr.first
+      end
+
+      def concatenated_names(string)
+	w = []
+	if string.include?(' v ')
+	  string.split(' v ').each do |pl|
+	    w += second_names_finder(pl)
+	  end
+	else
+	  w += second_names_finder(string)
+	end
+	result = ""
+	w.sort.each {|wh| result << wh}
+	result
+      end
+
+      def second_names_finder(names)
+	w = []
+	names.gsub!('-', ' ')
+	if names.include? '/'
+	  names.split('/').each {|n| w << n.scan(/\w+/)[-1]}
+	elsif names.include?('Doubles')
+	  w << names.scan(/\w+/)[-2]
+	else
+	  w << names.scan(/\w+/)[-1]
+	end
+	w
+      end
+
+      def target_filler(market, title, home_away, result)
+	result = result
+	case home_away
+	when 'home'
+	  priceholder = '.eventpriceholder-left'
+	  pricecoeff = 'div.eventpriceup'
+	  player = result.home_player
+	when 'away'
+	  priceholder = '.eventpriceholder-right'
+	  pricecoeff = 'div.eventpricedown'
+	  player = result.away_player
+	end
+	chunk = market.css("tbody #{priceholder}").each do |pl|
+	  name = pl.css('div.eventselection').text.strip
+	  coeff = pl.css('div.eventprice').text.strip.to_f
+	  coeff = pl.css(pricecoeff).text.strip.to_f if coeff == 0.0
+	  unless coeff == 0.0
+	    player[:name] ||= concatenated_names name
+	    if title.include? 'Match Betting'
+	      player[:match] = coeff
+	    elsif title.include? ' Set - Game '
+	      player[:game] ||= {}
+	      player[:game].merge!({title.scan(/\w+/)[-1] => coeff})
+	    elsif title.include? ' Set Betting Live'
+	      player[:set] ||= {}
+	      player[:set].merge!({title.scan(/\w+/)[0].to_i.to_s => coeff})
+	    end
+	  end
+	end
+	result
+      end
+
+      def set_cookies
+	domain = Betforker::WILLIAMHILL_CHANGABLE.split('//').last.gsub('sports', '')
+	[{
+	  name: 'cust_lang',
+	  value: 'en-gb',
+	  attr: { domain: domain }
+	},
+	{
+	  name: 'cust_prefs',
+	  value: 'en|DECIMAL|form|TYPE|PRICE|||0|SB|0|0||0|en|0|TIME|TYPE|0|1|A|0||0|0||TYPE||-|0',
+	  attr: { domain: domain }
+	}]
+      end
+    end
+  end
+end

data/lib/betforker/comparer.rb

@@ -0,0 +1,176 @@
+module Betforker
+  module Comparer
+    UNREAL_PERCENT = 25
+    FAKE_PERCENT = -3.5
+
+    module_function
+
+    def compare(first, second)
+      return [] if first.bookie == second.bookie
+      forks = []
+      check_sorting first, second
+      return forks unless same_players? first, second
+
+      filtering, break_now = if $config[:filtering]
+			       [ true, is_a_break?(init_score(first, second)) ]
+			     else
+			       [ false, true ]
+			     end
+
+      forks << market_processing(:match, first, second, break_now)
+      forks << market_processing(:set, first, second, break_now)
+      forks << market_processing(:game, first, second)
+
+      forks = score_analyzer forks.flatten, filtering
+
+      forks.map do |f|
+	Fork.new f
+      end
+    end
+
+    def same_players?(first, second)
+      first.home_player[:name] == second.home_player[:name] && 
+	first.away_player[:name] == second.away_player[:name]
+    end
+
+    def change_names(object)
+      object.home_player, object.away_player =
+	object.away_player, object.home_player
+    end
+    
+    def check_sorting(first, second)
+      [first, second].each do |k|
+	if k.home_player[:name] > k.away_player[:name]
+	  change_names k
+	end
+      end
+    end
+
+    def init_score(first, second)
+      if first.score.empty? then second.score else first.score end
+    end
+
+    def fork_template(first, second)
+      {
+	bookmakers: "#{first.bookie} - #{second.bookie}",
+	players: "#{first.home_player[:name]}  VS  #{first.away_player[:name]}",
+	score: init_score(first, second)
+      }
+    end
+
+    def market_processing(market, first, second, break_now = true)
+      result = []
+      if first.home_player.key?(market) and second.home_player.key?(market) and break_now
+	respond = case market
+		  when :match then match_win first, second
+		  when :set then game_or_set_win :set, first, second
+		  when :game then game_or_set_win :game, first, second
+		  end
+	unless respond.empty? 
+	  if respond.instance_of? Array
+	    respond.each do |m|
+	      result << fork_template(first, second).merge(m)
+	    end
+	  else
+	    result << fork_template(first, second).merge(respond)
+	  end
+	end
+      end
+      result
+    end
+
+    def calculate(x, y)
+      return FAKE_PERCENT if x == 0.0 or y == 0.0
+      x_bet = 100.0
+      sum_of_win = x * x_bet
+      y_bet = sum_of_win / y
+      sum_of_bet = x_bet + y_bet
+      profit = sum_of_win - sum_of_bet
+      percent = (profit / sum_of_bet) * 100
+      percent = FAKE_PERCENT if percent >= UNREAL_PERCENT
+      percent
+    end
+
+    def match_win(first, second)
+      respond = {}
+      percent_straight = calculate(first.home_player[:match], second.away_player[:match])
+      percent_reverse = calculate(first.away_player[:match], second.home_player[:match])
+      percent = percent_straight > percent_reverse ? percent_straight : percent_reverse
+      if percent > $config[:min_percent]
+	respond[:what] = 'match'
+	respond[:percent] = percent.round(2).to_s
+      end
+      respond
+    end
+
+    def game_or_set_win(param, first, second)
+      respond = []
+      percent_straight = {}
+      percent_reverse = {}
+      first.home_player[param].each do |first_key, first_val|
+	second.away_player[param].each do |second_key, second_val|
+	  if first_key == second_key
+	    percent_straight[first_key] = calculate(first_val, second_val)
+	  end
+	end
+      end
+
+      first.away_player[param].each do |first_key, first_val|
+	second.home_player[param].each do |second_key, second_val|
+	  if first_key == second_key
+	    percent_reverse[first_key] = calculate(first_val, second_val)
+	  end
+	end
+      end
+
+      percent_straight.each do |key_str,val_str|
+	percent_reverse.each do |key_rev,val_rev|
+	  if key_str == key_rev
+	    percent = val_str > val_rev ? val_str : val_rev
+	    if percent > $config[:min_percent]
+	      respond << { what: (param.to_s + key_str), percent: percent.round(2).to_s }
+	    end
+	  end
+	end
+      end
+      respond
+    end
+
+    def is_a_break?(score)
+      g1, g2, s1, s2 = score_parser(score)
+      end_of_set = ((s1 + s2) == 12 and s1 != s2) || ((s1 == 6 and (s1 - s2) > 1) || (s2 == 6 and (s2 - s1) > 1))
+      if (g1 + g2) == 0 and ((s1 + s2) == 0 or (s1 + s2).odd? or end_of_set)
+	return true
+      else
+	return false
+      end
+    end
+
+    def score_analyzer(forks, filtering)
+      return forks if forks.empty? or not filtering
+      forks.each do |f|
+	next unless f[:what].include?('game')
+	g1, g2, s1, s2 = score_parser(f[:score])
+	game_in_fork = f[:what].scan(/\d+/)[0].to_i
+	not_a_time = game_in_fork > (s1 + s2 + 1) ? false : true
+	forks.delete(f) if not_a_time
+      end
+      forks
+    end
+
+    def score_parser(score)
+      s = score.split(/\(|\)|,/)
+      if s.size == 1 or score[0] == ' '
+	games = '0:0'
+	sets = s[0].strip
+      else
+	games = s[0].strip
+	sets = s[-1].strip
+      end
+      g1, g2 = games.scan(/\d+/)
+      s1, s2 = sets.scan(/\d+/)
+      return g1.to_i, g2.to_i, s1.to_i, s2.to_i
+    end
+
+  end
+end

data/lib/betforker/config.rb

@@ -0,0 +1,201 @@
+module Betforker
+  module Config
+    module_function
+
+    PERSONAL_CONFIG = "#{ENV['HOME']}/.betforker.conf.yml"
+
+    def config_initialization!
+      template= YAML.load File.open(File.dirname(__FILE__) + '/../../config.yml', 'r')
+      write_personal_config(template) unless File.exist? PERSONAL_CONFIG
+      personal= YAML.load File.open(PERSONAL_CONFIG, 'r')
+      $config = check_personal_configuration template, personal
+    end
+
+    def changable_addresses
+      config_initialization!
+      [$config[:marathon_changable],
+       $config[:williamhill_changable]]
+    end
+
+    def check_personal_configuration(template, personal)
+      same_values = []
+      2.times do
+	if template.keys == personal.keys
+	  template.values.each_with_index do |tempval, index|
+	    same_values << same_typeofs(tempval.class, personal.values[index].class)
+	  end
+	  if same_values.include? false
+	    new = {}
+	    template.each do |key, value|
+	      new[key] = if same_typeofs(value.class, personal[key].class)
+			   personal[key]
+			 else
+			   value
+			 end
+	    end
+	    personal = new
+	    write_personal_config(personal)
+	  end
+	  break
+	else
+	  new = {}
+	  template.each do |key, value|
+	    new[key] = if personal.key?(key) then personal[key] else value end
+	  end
+	  personal = new
+	  write_personal_config(personal)
+	end
+      end
+      personal
+    end
+
+    def same_typeofs(a, b)
+      (a == b) or (a == TrueClass and b == FalseClass) or
+      (a == FalseClass and b == TrueClass)
+    end
+
+    def write_personal_config(config)
+      File.open(PERSONAL_CONFIG, 'w') do |file|
+	yaml = YAML.dump config
+	file.write yaml
+      end
+    end
+
+    def update
+      print_current_config
+      change = true_or_false ask('Будешь что-нибудь менять? (y/N) ')
+      while change
+	new_values = manual_enter
+	update_config new_values
+	print_current_config
+	change = true_or_false ask('Что нибудь еще? (y/N) ')
+      end
+    end
+
+    def update_config(values)
+      values.each do |key, value|
+	$config[key] = value
+      end
+      write_personal_config $config
+    end
+
+    def print_current_config
+      puts 'Текущая конфигурация:'
+      $config.each do |key, value|
+	puts "   #{translate key} => #{value}"
+      end
+    end
+
+    def manual_enter
+      result = {}
+      $config.each_with_index do |value, index|
+	puts "   #{index} - #{translate value.first}"
+      end
+      puts "   #{$config.size} - поменять все"
+      entry = ask('Выбери то, что хочешь изменить (число): ', Integer) { |q| q.in = 0..$config.size }
+      result.merge case entry
+		   when 0 then set_marathon_changable
+		   when 1 then set_williamhill_changable
+		   when 2 then set_min_percent
+		   when 3 then set_filtering
+		   when 4 then set_sound_notification
+		   when 5 then set_sport
+		   when 6 then set_bookmakers
+		   when 7 then set_log
+		   when 8 then set_time_of_notification
+		   when 9 then set_download_timeout
+		   when 10 then set_phantomjs_logger
+		   else all_fields
+		   end
+    end
+
+  #!!!!!!!!!!!!!!! ^ and V should be synchronized !!!!!!!!!!!!!!
+    def all_fields
+      config = {}
+      config.merge! set_marathon_changable
+      config.merge! set_williamhill_changable
+      config.merge! set_min_percent
+      config.merge! set_filtering
+      config.merge! set_sound_notification
+      config.merge! set_sport
+      config.merge! set_bookmakers
+      config.merge! set_log
+      config.merge! set_time_of_notification
+      config.merge! set_download_timeout
+      config.merge! set_phantomjs_logger
+      config
+    end
+
+    def translate(config_key)
+      case config_key
+      when :marathon_changable then 'адрес marathon'
+      when :williamhill_changable then 'адрес williamhill'
+      when :download_timeout then 'download timeout'
+      when :min_percent then 'минимальный процент вилки'
+      when :time_of_notification then 'время показа найденной вилки в секундах'
+      when :filtering then 'показ только тех вилок, что можно поставить'
+      when :sound_notification then 'звук сообщений'
+      when :log then 'показ событий в терминале'
+      when :phantomjs_logger then 'phantomjs logs'
+      when :sport then 'виды спорта'
+      when :bookmakers then 'список букмекеров'
+      else config_key
+      end
+    end
+
+    def set_marathon_changable
+      address = ask("Впиши новый адрес формата https://www.mirrorofmarathon.com > ")
+      { marathon_changable: address }
+    end
+
+    def set_williamhill_changable
+      address = ask("Впиши новый адрес формата http://sports.mirrorofwilliamhill.com > ")
+      { williamhill_changable: address }
+    end
+
+    def set_download_timeout
+      timeout = ask("downloader timeout > ", Integer)
+      { download_timeout: timeout }
+    end
+
+    def set_min_percent
+      percent = ask("минимальный процент (число) > ", Float) do |q|
+	q.in = Betforker::Comparer::FAKE_PERCENT...Betforker::Comparer::UNREAL_PERCENT
+      end
+      { min_percent: percent }
+    end
+
+    def set_time_of_notification
+      time = ask("время показа вилки в секундах > ", Integer) { |q| q.in = 1..120 }
+      { time_of_notification: time }
+    end
+
+    def set_filtering
+      { filtering: true_or_false(ask("показывать вилки ТОЛЬКО в перерывах (y/N) > ")) }
+    end
+
+    def set_sound_notification
+      { sound_notification: true_or_false(ask("включить звук (y/N) > ")) }
+    end
+
+    def set_log
+      { log: true_or_false(ask("показывать в терминале, что происходит (y/N) > ")) }
+    end
+
+    def set_phantomjs_logger
+      { phantomjs_logger: true_or_false(ask("показывать логи phantomjs (y/N) > ")) }
+    end
+
+    def set_sport
+      { sport: 'tennis' }
+    end
+
+    def set_bookmakers
+      { bookmakers: ['Marathon', 'WilliamHill'] }
+    end
+
+    def true_or_false(answer)
+      if answer =~ /^y/i then true else false end
+    end
+  end
+end