internet_scrabble_club 0.1.1 → 0.2.0

data/lib/internet_scrabble_club/client/response_parsers.rb

@@ -0,0 +1,17 @@
+require_relative 'response_parsers/close'
+
+require_relative 'response_parsers/examine'
+require_relative 'response_parsers/examine/history'
+
+require_relative 'response_parsers/who'
+require_relative 'response_parsers/who/list'
+require_relative 'response_parsers/who/move'
+
+require_relative 'response_parsers/history'
+require_relative 'response_parsers/login'
+
+require_relative 'response_parsers/ping'
+require_relative 'response_parsers/ping/reply'
+
+require_relative 'response_parsers/seek'
+require_relative 'response_parsers/unseek'

data/lib/internet_scrabble_club/client/response_parsers/base.rb

@@ -0,0 +1,78 @@
+require 'parslet'
+require 'descendants_tracker'
+
+module InternetScrabbleClub
+  class Client
+    module ResponseParsers
+
+      class Base < Parslet::Parser
+        extend DescendantsTracker
+
+        root(:response)
+
+        rule(:response) { descendant_parsers.reduce(:|) or (digit >> space >>
+          ( command_with_sub_command_and_arguments |
+            command_with_arguments | command_with_sub_command)) }
+
+        rule(:command_with_arguments) { command.as(:command) >> space >>
+          arguments.as(:arguments) }
+
+        rule(:command_with_sub_command_and_arguments) { command_with_sub_command >>
+          space >> arguments.as(:arguments) }
+
+        rule(:command_with_sub_command) { command.as(:command) >>
+          space >> sub_command.as(:sub_command) }
+
+        rule(:command) { nothing }
+        rule(:sub_command) { nothing }
+        rule(:arguments) { nothing }
+
+        rule(:nothing) { str('') }
+
+        rule(:space) { str(' ') }
+        rule(:space?) { space.maybe }
+
+        rule(:newline) { match('\n') }
+        rule(:newline?) { newline.maybe }
+
+        rule(:colon) { str(':') }
+        rule(:semicolon) { str(';') }
+        rule(:minus) { str('-') }
+
+        rule(:digit) { match['0-9'] }
+        rule(:alpha) { match['A-Za-z'] }
+
+        rule(:int) { _int.as(:int) }
+        rule(:_int) { minus.maybe >> digit.repeat(1) }
+
+        rule(:dashes) { str('---').as(:dashes) }
+        rule(:null) { str('null').as(:null) }
+
+        rule(:word) { (digit | alpha).repeat(1).as(:word) }
+        rule(:sentence) { (match['^.'].repeat(1) >> str('.')).as(:sentence) }
+        rule(:text) { any.repeat(1).as(:text) }
+
+        rule(:tiles) { (alpha | str('?')).repeat(1).as(:tiles) }
+        rule(:rack) { dashes | tiles }
+
+        rule(:month_day) { digit.repeat(1, 2) }
+        rule(:short_month) { match['A-Z'] >> match['a-z'].repeat(2, 2) }
+        rule(:short_year) { digit >> digit }
+        rule(:date) { (delimited [month_day, short_month, short_year], colon).as(:date)  }
+
+        rule(:dictionary) { str('TWL') | str('SOWPODS') | str('ODS') | str('LOC') |
+          str('SWL') | str('PARO') | str('MULTI') }
+
+        def delimited(sequence, seperator = space)
+          seperators = Array.new(sequence.length - 1) { seperator }
+          sequence.zip(seperators).flatten(1).compact.inject(:>>)
+        end
+
+        private def descendant_parsers
+          @descendant_parsers ||= self.class.descendants.map(&:new)
+        end
+      end
+
+    end
+  end
+end

data/lib/internet_scrabble_club/client/response_parsers/close.rb

@@ -0,0 +1,14 @@
+require_relative 'base'
+
+module InternetScrabbleClub
+  class Client
+    module ResponseParsers
+
+      class Close < Base
+        rule(:command) { str('CLOSE') }
+        rule(:arguments) { text.as(:reason) }
+      end
+
+    end
+  end
+end

data/lib/internet_scrabble_club/client/response_parsers/examine.rb

@@ -0,0 +1,15 @@
+require_relative 'base'
+
+module InternetScrabbleClub
+  class Client
+    module ResponseParsers
+
+      class Examine < Base
+        rule(:command) { str('EXAMINE') }
+        rule(:command_with_sub_command_and_arguments) { command_with_sub_command >>
+          space? >> newline >> arguments.as(:arguments) }
+      end
+
+    end
+  end
+end

data/lib/internet_scrabble_club/client/response_parsers/examine/history.rb

@@ -0,0 +1,51 @@
+require_relative '../examine'
+
+module InternetScrabbleClub
+  class Client
+    module ResponseParsers
+
+      class Examine::History < Examine
+        rule(:sub_command) { str('HISTORY') }
+
+        rule(:arguments) { delimited([stats, settings,
+            (player_info.as(:info) >> newline_with_whitespace >> plays.as(:plays)
+            ).as(:first_player), str('STOP'),
+            (player_info.as(:info) >> newline_with_whitespace >> plays.as(:plays)
+            ).as(:second_player), str('STOP')
+          ], newline_with_whitespace) >> newline_with_whitespace }
+
+        rule(:newline_with_whitespace) { space.repeat >> newline >> space.repeat }
+
+        rule(:stats) { _int >> space >> date.as(:date) }
+        rule(:settings) { delimited [int.as(:dictionary_code), _int, _int, _int] }
+
+        rule(:player_info) { delimited [word.as(:nickname), int.as(:rating),
+            rack.as(:initial_rack), (int | null).as(:final_score)] }
+
+        rule(:plays) { ((move | change | pass) >> space?).repeat }
+
+        rule(:move) { delimited [str('MOVE').as(:word).as(:type), position.as(:position),
+            tiles.as(:word), int.as(:score), _int, _int, rack.as(:rack), _int] }
+
+        rule(:change) { delimited [str('CHANGE').as(:word).as(:type), rack.as(:rack),
+            _int, _int, (dashes | int).as(:swap_count)] }
+
+        rule(:pass) { delimited [str('PAS').as(:word).as(:type), _int, _int, (dashes |
+          suggestion).as(:suggestion)] }
+
+        rule(:suggestion) { delimited [position.as(:position), word.as(:word),
+          int.as(:score)], underscore }
+
+        rule(:underscore) { match('_') }
+        rule(:underscored_word) { word >> underscore >> word }
+
+        rule(:position) { horizontal_position.as(:horizontal) |
+          vertical_position.as(:vertical) }
+
+        rule(:horizontal_position) { alpha.as(:word).as(:column) >> int.as(:row) }
+        rule(:vertical_position) { int.as(:row) >> alpha.as(:word).as(:column) }
+      end
+
+    end
+  end
+end

data/lib/internet_scrabble_club/client/response_parsers/history.rb

@@ -0,0 +1,17 @@
+require_relative 'base'
+
+module InternetScrabbleClub
+  class Client
+    module ResponseParsers
+
+      class History < Base
+        rule(:command) { str('HISTORY') }
+        rule(:arguments) { word.as(:subject) >> space >> entries.as(:entries) }
+        rule(:entries) { (entry.as(:entry) >> space?).repeat(1) }
+        rule(:entry) { delimited [digit.as(:index), players, dictionary, _int, date.as(:date)] }
+        rule(:players) { delimited [_int, word.as(:first_player), _int, word.as(:second_player)] }
+      end
+
+    end
+  end
+end

data/lib/internet_scrabble_club/client/response_parsers/login.rb

@@ -0,0 +1,14 @@
+require_relative 'base'
+
+module InternetScrabbleClub
+  class Client
+    module ResponseParsers
+
+      class Login < Base
+        rule(:command) { str('LOGIN') }
+        rule(:arguments) { sentence.as(:greeting) }
+      end
+
+    end
+  end
+end

data/lib/internet_scrabble_club/client/response_parsers/ping.rb

@@ -0,0 +1,13 @@
+require_relative 'base'
+
+module InternetScrabbleClub
+  class Client
+    module ResponseParsers
+
+      class Ping < Base
+        rule(:command) { str('PING') }
+      end
+
+    end
+  end
+end

data/lib/internet_scrabble_club/client/response_parsers/ping/reply.rb

@@ -0,0 +1,12 @@
+require_relative '../ping'
+
+module InternetScrabbleClub
+  class Client
+    module ResponseParsers
+
+      class Ping::Reply < Ping
+        rule(:sub_command) { str('REPLY') }
+      end
+    end
+  end
+end

data/lib/internet_scrabble_club/client/response_parsers/seek.rb

@@ -0,0 +1,15 @@
+require_relative 'base'
+
+module InternetScrabbleClub
+  class Client
+    module ResponseParsers
+
+      class Seek < Base
+        rule(:command) { str('SEEK') }
+        rule(:arguments) { delimited [int.as(:rating), word.as(:nickname), settings] }
+        rule(:settings) { delimited([_int] * 7) }
+      end
+
+    end
+  end
+end

data/lib/internet_scrabble_club/client/response_parsers/unseek.rb

@@ -0,0 +1,14 @@
+require_relative 'base'
+
+module InternetScrabbleClub
+  class Client
+    module ResponseParsers
+
+      class Unseek < Base
+        rule(:command) { str('UNSEEK') }
+        rule(:arguments) { word.as(:nickname) }
+      end
+
+    end
+  end
+end

data/lib/internet_scrabble_club/client/response_parsers/who.rb

@@ -0,0 +1,13 @@
+require_relative 'base'
+
+module InternetScrabbleClub
+  class Client
+    module ResponseParsers
+
+      class Who < Base
+        rule(:command) { str('WHO') }
+      end
+
+    end
+  end
+end

data/lib/internet_scrabble_club/client/response_parsers/who/list.rb

@@ -0,0 +1,16 @@
+require_relative '../who'
+
+module InternetScrabbleClub
+  class Client
+    module ResponseParsers
+
+      class Who::List < Who
+        rule(:sub_command) { str('LIST') }
+        rule(:arguments) { int.as(:count) >> space >> space >> users.as(:users) }
+        rule(:users) { (user.as(:user) >> space?).repeat(1) }
+        rule(:user) { delimited [int.as(:rating), word.as(:nickname), any.as(:status), digit, digit] }
+      end
+
+    end
+  end
+end

data/lib/internet_scrabble_club/client/response_parsers/who/move.rb

@@ -0,0 +1,14 @@
+require_relative '../who'
+
+module InternetScrabbleClub
+  class Client
+    module ResponseParsers
+
+      class Who::Move< Who
+        rule(:sub_command) { str('MOVE') }
+        rule(:arguments) { delimited [_int, word.as(:nickname), alpha, _int, _int] }
+      end
+
+    end
+  end
+end

data/lib/internet_scrabble_club/client/response_transformers.rb

@@ -0,0 +1,2 @@
+require_relative 'response_transformers/base'
+require_relative 'response_transformers/examine/history'

data/lib/internet_scrabble_club/client/response_transformers/base.rb

@@ -0,0 +1,50 @@
+require 'date'
+require 'parslet'
+require 'descendants_tracker'
+
+module InternetScrabbleClub
+  class Client
+    class ResponseTransformers
+
+      class Base < Parslet::Transform
+        extend DescendantsTracker
+
+        rule(command: simple(:cmd), arguments: subtree(:args)) do
+          args.merge(command: cmd.to_s)
+        end
+
+        rule(command: simple(:cmd), sub_command: simple(:sub_cmd)) do
+          { command: cmd.to_s, sub_command: sub_cmd.to_s }
+        end
+
+        rule(command: simple(:cmd), sub_command: simple(:sub_cmd), arguments: subtree(:args)) do
+          args.merge(command: cmd.to_s, sub_command: sub_cmd.to_s)
+        end
+
+        rule(int: simple(:int)) { Integer(int) }
+
+        rule(word: simple(:word)) { word.to_s }
+        rule(sentence: simple(:sentence)) { sentence.to_s }
+        rule(text: simple(:text)) { text.to_s }
+
+        rule(date: simple(:date)) { Date.parse(date.to_s) }
+
+        rule(null: simple(:null)) { 0 }
+        rule(tiles: simple(:tiles)) { tiles.to_s }
+
+        rule(dashes: simple(:dashes)) { nil }
+
+        def apply(tree, context = nil)
+          descendent_transformers.reduce(super) do |tree, transformer|
+            transformer.apply(tree, context)
+          end
+        end
+
+        def descendent_transformers
+          @descendent_transformers ||= self.class.descendants.map(&:new)
+        end
+      end
+
+    end
+  end
+end

data/lib/internet_scrabble_club/client/response_transformers/examine/history.rb

@@ -0,0 +1,22 @@
+require 'ostruct'
+require_relative '../base'
+
+module InternetScrabbleClub
+  class Client
+    class ResponseTransformers
+      module Examine
+
+        class History < Base
+          rule(horizontal: { column: simple(:column), row: simple(:row) }) do
+            {direction: :horizontal, column: column, row: row}
+          end
+
+          rule(vertical: { column: simple(:column), row: simple(:row) }) do
+            {direction: :vertical, column: column, row: row}
+          end
+        end
+
+      end
+    end
+  end
+end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: internet_scrabble_club
 version: !ruby/object:Gem::Version 
-  version: 0.1.1
+  version: 0.2.0
 platform: ruby
 authors: 
 - Thomas Brus
@@ -9,7 +9,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2014-08-29 00:00:00 Z
+date: 2014-11-25 00:00:00 Z
 dependencies: 
 - !ruby/object:Gem::Dependency 
   name: bundler
@@ -94,8 +94,9 @@ dependencies:
 description: "Interact with the Internet Scrabble Club server. "
 email: 
 - thomas.brus@me.com
-executables: []
-
+executables: 
+- scraper.rb
+- spectator.rb
 extensions: []
 
 extra_rdoc_files: []
@@ -107,37 +108,36 @@ files:
 - LICENSE.txt
 - README.md
 - Rakefile
+- bin/scraper.rb
+- bin/spectator.rb
 - internet_scrabble_club.gemspec
 - lib/internet_scrabble_club.rb
 - lib/internet_scrabble_club/client.rb
-- lib/internet_scrabble_club/client/extensions/authentication.rb
-- lib/internet_scrabble_club/client/extensions/echo_ping.rb
-- lib/internet_scrabble_club/client/extensions/keep_alive.rb
+- lib/internet_scrabble_club/client/callback_queue.rb
 - lib/internet_scrabble_club/client/middleware.rb
-- lib/internet_scrabble_club/client/middleware/emit.rb
-- lib/internet_scrabble_club/client/middleware/parse.rb
-- lib/internet_scrabble_club/client/middleware/read.rb
-- lib/internet_scrabble_club/client/middleware/transform.rb
-- lib/internet_scrabble_club/message_parsers.rb
-- lib/internet_scrabble_club/message_parsers/base.rb
-- lib/internet_scrabble_club/message_parsers/close.rb
-- lib/internet_scrabble_club/message_parsers/examine.rb
-- lib/internet_scrabble_club/message_parsers/examine/history.rb
-- lib/internet_scrabble_club/message_parsers/history.rb
-- lib/internet_scrabble_club/message_parsers/login.rb
-- lib/internet_scrabble_club/message_parsers/ping.rb
-- lib/internet_scrabble_club/message_parsers/ping/reply.rb
-- lib/internet_scrabble_club/message_parsers/seek.rb
-- lib/internet_scrabble_club/message_parsers/unseek.rb
-- lib/internet_scrabble_club/message_parsers/who.rb
-- lib/internet_scrabble_club/message_parsers/who/list.rb
-- lib/internet_scrabble_club/message_parsers/who/move.rb
-- lib/internet_scrabble_club/message_transformers.rb
-- lib/internet_scrabble_club/message_transformers/base.rb
-- lib/internet_scrabble_club/message_transformers/examine/history.rb
-- lib/internet_scrabble_club/message_transformers/history.rb
-- lib/internet_scrabble_club/message_transformers/who/move.rb
-- lib/internet_scrabble_club/multi_queue.rb
+- lib/internet_scrabble_club/client/middleware/request/echo_ping.rb
+- lib/internet_scrabble_club/client/middleware/request/keep_alive.rb
+- lib/internet_scrabble_club/client/middleware/response/emit.rb
+- lib/internet_scrabble_club/client/middleware/response/parse.rb
+- lib/internet_scrabble_club/client/middleware/response/read.rb
+- lib/internet_scrabble_club/client/middleware/response/transform.rb
+- lib/internet_scrabble_club/client/response_parsers.rb
+- lib/internet_scrabble_club/client/response_parsers/base.rb
+- lib/internet_scrabble_club/client/response_parsers/close.rb
+- lib/internet_scrabble_club/client/response_parsers/examine.rb
+- lib/internet_scrabble_club/client/response_parsers/examine/history.rb
+- lib/internet_scrabble_club/client/response_parsers/history.rb
+- lib/internet_scrabble_club/client/response_parsers/login.rb
+- lib/internet_scrabble_club/client/response_parsers/ping.rb
+- lib/internet_scrabble_club/client/response_parsers/ping/reply.rb
+- lib/internet_scrabble_club/client/response_parsers/seek.rb
+- lib/internet_scrabble_club/client/response_parsers/unseek.rb
+- lib/internet_scrabble_club/client/response_parsers/who.rb
+- lib/internet_scrabble_club/client/response_parsers/who/list.rb
+- lib/internet_scrabble_club/client/response_parsers/who/move.rb
+- lib/internet_scrabble_club/client/response_transformers.rb
+- lib/internet_scrabble_club/client/response_transformers/base.rb
+- lib/internet_scrabble_club/client/response_transformers/examine/history.rb
 homepage: https://github.com/thomasbrus/internet-scrabble-club
 licenses: 
 - MIT
@@ -166,4 +166,3 @@ specification_version: 4
 summary: Fetches scrabble games from the Internet Scrabble Club.
 test_files: []
 
-has_rdoc: