weskit 0.0.2

data/.gitignore

@@ -0,0 +1,5 @@
+.bundle
+*.gem
+.redcar/
+Gemfile.lock
+pkg/*

data/Gemfile

@@ -0,0 +1,2 @@
+source "http://rubygems.org"
+gemspec

data/README

@@ -0,0 +1,2 @@
+Pls do me a favor and do not look at sources if you dont have to. Thx!
+

data/Rakefile

@@ -0,0 +1 @@
+require "bundler/gem_tasks"

data/lib/weskit.rb

@@ -0,0 +1,3 @@
+require 'weskit/lobby'
+require 'weskit/version'
+require 'weskit/wml'

data/lib/weskit/lobby.rb

@@ -0,0 +1,11 @@
+module Weskit
+  module Lobby
+  end
+end
+
+directory = File.dirname __FILE__
+files     = File.join directory, 'lobby', '*.rb'
+
+Dir[files].each do |file|
+  require file
+end

data/lib/weskit/lobby/bot.rb

@@ -0,0 +1,85 @@
+require 'weskit/wml'
+
+module Weskit::Lobby
+  require 'socket'
+  require 'stringio'
+  require 'zlib'
+
+  class Bot
+    def initialize nickname, options = {}
+      defaults = {
+        :debug   => false,
+        :port    => 15000,
+        :server  => 'server.wesnoth.org',
+        :version => '1.10.0'
+      }
+      options = defaults.merge options
+
+      @server  = options[:server]
+      @port    = options[:port]
+      @version = options[:version]
+
+      @reader   = Weskit::WML::Reader.new
+      @nickname = nickname
+    end
+      
+    def connect_and &operations
+      @socket = TCPSocket.new @server, @port
+      basic_communication
+      response = read_wml
+      @socket.close
+
+      @socket = TCPSocket.new response.redirect[:host], response.redirect[:port]
+      basic_communication
+
+      raise "Server send node other than 'mustlogin'" if read_wml.mustlogin.nil?
+      send_wml 'login', :selective_ping => 1, :username => @nickname
+      raise "Server send node other than 'join_lobby'" if read_wml.join_lobby.nil?
+
+      result = yield self
+
+      sleep 3
+      @socket.close
+      result
+    end
+
+    def read_wml
+      wml = @reader.read_str read_str
+      puts "\e[0;33mRecieve MWL\e[0m:\n#{wml}" if @debug
+      wml
+    end
+
+    def send_wml node, contents = {}
+      wml = @reader.read_hsh({node => contents}).to_s
+      puts "\e[0;32mSend MWL\e[0m:\n#{wml}" if @debug
+      send_str wml
+    end
+
+    private
+
+    def basic_communication
+      handshake
+      raise "Server send node other than 'version'" if read_wml.version.empty?
+      send_wml 'version', :version => @version
+    end
+
+    def handshake
+      @socket.send "\x00" * 4, 0
+      @socket.read 4
+    end
+
+    def read_str
+      msg_size = @socket.read(4).unpack('N').first
+      msg_data = @socket.read(msg_size)
+      Zlib::GzipReader.new(StringIO.new(msg_data)).read
+    end
+
+    def send_str msg
+      gzw = Zlib::GzipWriter.new StringIO.new
+      gzw.write msg.to_s
+      gzm = gzw.close
+      size = [gzm.size].pack('N')
+      @socket.send(size + gzm.string, 0)
+    end
+  end
+end

data/lib/weskit/lobby/bot_error.rb

@@ -0,0 +1,3 @@
+module Weskit::Lobby
+  class BotError < StandardError ; end
+end

data/lib/weskit/version.rb

@@ -0,0 +1,3 @@
+module Weskit
+  VERSION = "0.0.2"
+end

data/lib/weskit/wml.rb

@@ -0,0 +1,11 @@
+module Weskit
+  module WML
+  end
+end
+
+directory = File.dirname __FILE__
+files     = File.join directory, 'wml', '*.rb'
+
+Dir[files].each do |file|
+  require file
+end

data/lib/weskit/wml/node.rb

@@ -0,0 +1,76 @@
+module Weskit::WML
+  class Node
+    FALSE_ATTR_VALS = ["no", "false", "off", "uninitialized"]
+    TRUE_ATTR_VALS  = ["yes", "true", "on"]
+
+    attr_reader :name, :parent
+
+    def add element
+      return false unless element.kind_of? Node
+      @nodes << element ; true
+    end
+
+    def self.create name = '', parent = nil
+      new name, parent
+    end
+
+    def initialize name = '', parent = nil
+      name = normalize name
+      name = (name.empty?) ? 'root' : name
+      raise(NodeError, "Node name can consist only of '#{StringExtensions::VALID_CHARS}'") unless name =~ /^#{StringExtensions::VALID_CHARS}+$/
+      raise(NodeError, "Attempt to set inproper parent node") unless parent.kind_of? Node or parent == nil
+      @attributes, @name, @nodes, @parent = {}, name, [], parent
+    end
+
+    def method_missing method
+      nodes = @nodes.select {|node| node.name == normalize(method)}
+      NodeArray.new.replace nodes
+    end
+
+    def to_ary
+    end
+
+    def to_s indent_width = 1
+      indent_width -= 1 if @name == 'root'
+
+      base_indentation = " " * 4
+      contents_indentation = base_indentation * indent_width
+      closing_tag_indentation = base_indentation * (indent_width > 0 ? indent_width - 1 : 0)
+
+      attr_str = @attributes.keys.sort.inject('') {|string, key| string << "#{contents_indentation}#{key}=\"#{@attributes[key]}\"\n"}
+      node_str = @nodes.inject('') {|string, node| string << "#{contents_indentation}#{node.to_s(indent_width + 1)}\n"}
+
+      (@name == 'root') ? "#{attr_str}#{node_str}" : "[#{name}]\n#{attr_str}#{node_str}#{closing_tag_indentation}[/#{name}]"
+    end
+
+    def [] key
+      value = @attributes[normalize key]
+
+      if FALSE_ATTR_VALS.include? value then false
+      elsif TRUE_ATTR_VALS.include? value then true
+      else value
+      end
+    end
+
+    def []= key, value
+      key, value = normalize(key), value.to_s
+
+      # This one can cause problems as looks there is no escaping strategy on the server side
+      #unless value == '"'
+      #  single_quotes, double_quotes = value.scan('"').size, value.scan('""').size
+      #  if (single_quotes > 0) and ((double_quotes == 0) or (single_quotes.to_f % double_quotes.to_f > 0))
+      #    raise(NodeError, "Found unescaped double quotes inside attribute value") 
+      #  end
+      #  @attributes[key] = value.gsub('"', '""')
+      #end
+
+      @attributes[key] = value
+    end
+
+    private
+
+    def normalize name
+      name.to_s.strip
+    end
+  end
+end

data/lib/weskit/wml/node_array.rb

@@ -0,0 +1,25 @@
+module Weskit::WML
+  class NodeArray < Array
+    def [] key
+      unless key.is_a? Integer
+        return first[key] unless empty?
+        nil
+      else
+        super key
+      end
+    end
+
+    def []= key, value
+      (key.is_a? Integer) ? super(key, value) : (first[key] = value) unless empty?
+    end
+
+    def method_missing method
+      nodes = inject([]) {|array, element| array + element.send(method) if element.kind_of? Node}
+      NodeArray.new.replace nodes
+    end
+
+    def to_wml
+      inject('') {|string, item| string << "#{item}\n" if item.kind_of? Node}
+    end
+  end
+end

data/lib/weskit/wml/node_error.rb

@@ -0,0 +1,3 @@
+module Weskit::WML
+  class NodeError < StandardError ; end
+end

data/lib/weskit/wml/reader.rb

@@ -0,0 +1,67 @@
+module Weskit::WML
+  class Reader
+    def read_hsh hash, name = '', parent = nil
+      current_node = Node.new name, parent
+      hash.each {|key,val| (val.kind_of? Hash) ? current_node.add(read_hsh(val, key, current_node)) : current_node[key] = val}
+      current_node
+    end
+
+    def read_str string
+      parse string
+    end
+
+    def read_uri uri
+      require 'open-uri'
+      require 'stringio'
+      require 'zlib'
+
+      begin
+        content = open(uri) {|u| u.read}
+      rescue
+        raise ReaderError, "Failed to open specified uri"
+      ensure
+        content = Zlib::GzipReader.new(StringIO.new(content)).read rescue content
+      end
+
+      parse content
+    end
+
+    private
+
+    def parse content
+      current_node, node_stack = Node.new, []
+      multiline_mode, multiline_name, multiline_value = false, '', []
+
+      content.strip.each_line do |line|
+        line = line.chomp.extend StringExtensions
+
+        if multiline_mode
+          if line.end_of_attr?
+            multiline_value << line.rstrip.chomp('"')
+            multiline_value = multiline_value.join("\n")
+            current_node[multiline_name] = multiline_value
+            multiline_mode, multiline_name, multiline_value = false, '', []
+          else
+            multiline_value << line
+          end
+        elsif line.attribute?
+          if line.multiline_attr?
+            multiline_mode, multiline_name = true, line.attribute_name
+            multiline_value << line.attribute_value
+          else
+            current_node[line.attribute_name] = line.attribute_value
+          end
+        elsif line.opening_tag?
+          node_stack.push current_node
+          current_node = Node.create line.tag_name, node_stack.last
+        elsif line.closing_tag?
+          raise(ReaderError, "Opening tag '#{current_node.name}' does not match closing tag '#{line.tag_name}'") if current_node.name != line.tag_name
+          node_stack.last.add current_node
+          current_node = node_stack.pop
+        end
+      end
+
+      current_node
+    end
+  end
+end

data/lib/weskit/wml/reader_error.rb

@@ -0,0 +1,3 @@
+module Weskit::WML
+  class ReaderError < StandardError ; end
+end

data/lib/weskit/wml/string_extensions.rb

@@ -0,0 +1,59 @@
+module Weskit::WML
+  module StringExtensions
+    VALID_CHARS = '[A-Za-z0-9_]'
+
+    def attribute_name
+      @values[0]
+    end
+
+    def attribute_value
+      @values[1]
+    end
+
+    def multiline_attr?
+      return true if include?('="') and (last_character != '"')
+      false
+    end
+
+    def end_of_attr?
+      return true if (last_character == '"')
+      false
+    end
+
+    def last_character
+      rstrip[-1,1]
+    end
+
+    def tag_name
+      @values[0]
+    end
+
+    def opening_tag?
+      wml_check(/^\[(#{VALID_CHARS}+?)\]$/)
+    end
+
+    def closing_tag?
+      wml_check(/^\[\/(#{VALID_CHARS}+?)\]$/)
+    end
+
+    def attribute?
+      # If there is unallowed char in fron of '=' line wont be considereda as an attribute
+      # Multiline attributes need to have double quotes next to equal sign
+      wml_check(/^(#{VALID_CHARS}+?)="?(.+?)"?$/)
+    end
+
+    private
+
+    def wml_check expression
+      matches = self.strip.match expression
+
+      if matches
+        @values = [matches[1], matches[2]]
+        return true
+      else
+        @values = [nil, nil]
+        return false
+      end
+    end
+  end
+end

data/weskit.gemspec

@@ -0,0 +1,24 @@
+# -*- encoding: utf-8 -*-
+$:.push File.expand_path('../lib', __FILE__)
+require 'weskit/version'
+
+Gem::Specification.new do |s|
+  s.name        = 'weskit'
+  s.version     = Weskit::VERSION
+  s.authors     = ['f6p']
+  s.email       = ['filip.pyda@gmail.com']
+  s.homepage    = 'https://github.com/f6p/weskit'
+  s.summary     = 'Ruby utilies for BfW'
+  s.description = 'Pls do me a favor and do not look at sources if you dont have to. Thx!'
+
+  # s.rubyforge_project = 'weskit'
+
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.require_paths = ['lib']
+
+  # specify any dependencies here; for example:
+  # s.add_development_dependency 'rspec'
+  # s.add_runtime_dependency 'rest-client'
+end

metadata

@@ -0,0 +1,82 @@
+--- !ruby/object:Gem::Specification 
+name: weskit
+version: !ruby/object:Gem::Version 
+  hash: 27
+  prerelease: 
+  segments: 
+  - 0
+  - 0
+  - 2
+  version: 0.0.2
+platform: ruby
+authors: 
+- f6p
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2012-03-15 00:00:00 Z
+dependencies: []
+
+description: Pls do me a favor and do not look at sources if you dont have to. Thx!
+email: 
+- filip.pyda@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- .gitignore
+- Gemfile
+- README
+- Rakefile
+- lib/weskit.rb
+- lib/weskit/lobby.rb
+- lib/weskit/lobby/bot.rb
+- lib/weskit/lobby/bot_error.rb
+- lib/weskit/version.rb
+- lib/weskit/wml.rb
+- lib/weskit/wml/node.rb
+- lib/weskit/wml/node_array.rb
+- lib/weskit/wml/node_error.rb
+- lib/weskit/wml/reader.rb
+- lib/weskit/wml/reader_error.rb
+- lib/weskit/wml/string_extensions.rb
+- weskit.gemspec
+homepage: https://github.com/f6p/weskit
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.8.11
+signing_key: 
+specification_version: 3
+summary: Ruby utilies for BfW
+test_files: []
+