erlang_config 0.0.1

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: 3c1d8a480081ceebd90788f93f858aacc667db9c
+  data.tar.gz: 2c76272040f67ac0faaea00ca8e5a4330a3fdf42
+SHA512:
+  metadata.gz: 5a2334d755fd7f58aff33969b4f41080bcb4f97d21ee885248c692ec4078a12d2933865d4c7ffec503ce884f846679d5fd901ac6ea2b22854a9a76b99e61d275
+  data.tar.gz: 1a266ea8a96f67b060098c19ce39935d4884ee784592aa6387ba42f4128cad7f60d348da8b6ad3591dbb533185ffb95e601fa6b49d724464a1940b8935bf12eb

data/.gitignore

@@ -0,0 +1,17 @@
+*.gem
+*.rbc
+.bundle
+.config
+.yardoc
+Gemfile.lock
+InstalledFiles
+_yardoc
+coverage
+doc/
+lib/bundler/man
+pkg
+rdoc
+spec/reports
+test/tmp
+test/version_tmp
+tmp

data/Gemfile

@@ -0,0 +1,4 @@
+source 'https://rubygems.org'
+
+# Specify your gem's dependencies in erlang_config.gemspec
+gemspec

data/LICENSE.txt

@@ -0,0 +1,22 @@
+Copyright (c) 2014 Roman Gaufman
+
+MIT License
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.md

@@ -0,0 +1,29 @@
+# Erlang::Config
+
+TODO: Write a gem description
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+    gem 'erlang_config'
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install erlang_config
+
+## Usage
+
+TODO: Write usage instructions here
+
+## Contributing
+
+1. Fork it ( http://github.com/<my-github-username>/erlang_config/fork )
+2. Create your feature branch (`git checkout -b my-new-feature`)
+3. Commit your changes (`git commit -am 'Add some feature'`)
+4. Push to the branch (`git push origin my-new-feature`)
+5. Create new Pull Request

data/Rakefile

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

data/erlang_config.gemspec

@@ -0,0 +1,24 @@
+# coding: utf-8
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'erlang_config/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = "erlang_config"
+  spec.version       = ErlangConfig::VERSION
+  spec.authors       = ["Roman Gaufman"]
+  spec.email         = ["roman@xanview.com"]
+  spec.summary       = %q{Encode and Decode Erlang style configuration files.}
+  spec.description   = %q{See summery}
+  spec.homepage      = ""
+  spec.license       = "MIT"
+
+  spec.files         = `git ls-files -z`.split("\x0")
+  spec.executables   = spec.files.grep(%r{^bin/}) { |f| File.basename(f) }
+  spec.test_files    = spec.files.grep(%r{^(test|spec|features)/})
+  spec.require_paths = ["lib"]
+
+  spec.add_development_dependency "bundler", "~> 1.5"
+  spec.add_development_dependency "rake", "~> 10.1"
+  spec.add_development_dependency "rspec", "~> 2.14"
+end

data/lib/erlang_config.rb

@@ -0,0 +1,26 @@
+require "erlang_config/erlterm"
+require "erlang_config/erlatom"
+require "erlang_config/erlbinary"
+require "erlang_config/erlnumeration"
+require "erlang_config/erllist"
+require "erlang_config/erlpid"
+require "erlang_config/erlref"
+require "erlang_config/erlstring"
+require "erlang_config/erltuple"
+
+ERL_CLOSE_STRS  = {"["=>"]", "{"=>"}", '"'=>'"', "'"=>"'", '<<'=>'>>', "#Ref<"=>">", "<"=>">"}
+
+module ErlangConfig
+
+  def self.decode(str)
+    str.gsub!(/[\n\r]/,"")
+    erl_obj = ErlTerm.decode(str)
+    erl_obj.parse if erl_obj.is_a?(ErlEnumeration)
+    erl_obj.to_ruby
+  end
+
+  def self.encode(hash)
+    puts "Sorry, this has not been written yet, pull requests are welcome :)"
+  end
+
+end

data/lib/erlang_config/erlatom.rb

@@ -0,0 +1,7 @@
+module ErlangConfig
+  class ErlAtom < ErlTerm
+    def to_ruby
+      self.str.gsub(/'/,"")
+    end
+  end
+end

data/lib/erlang_config/erlbinary.rb

@@ -0,0 +1,16 @@
+module ErlangConfig
+  class ErlBinary < ErlTerm
+    def to_ruby
+      self.str.gsub!(/[<>]/,"")
+      bin_els = self.str.split(",")
+      els = bin_els.map { |el|
+        if el[/^[0-9]+$/]
+          el.to_i
+        elsif el[/^"/]
+          el.gsub(/"/,"")
+        end
+      }
+      els.length > 1 ? els : els[0]
+    end
+  end
+end

data/lib/erlang_config/erllist.rb

@@ -0,0 +1,9 @@
+module ErlangConfig
+  class ErlList < ErlEnumeration
+    def to_ruby
+      @elements.map {|el|
+        (el.is_a?(ErlTerm) || el.is_a?(ErlEnumeration))? el.to_ruby : el
+      }
+    end
+  end
+end

data/lib/erlang_config/erlnumeration.rb

@@ -0,0 +1,72 @@
+module ErlangConfig
+  class ErlEnumeration
+    attr_accessor :str, :elements
+    def initialize(str)
+      @str = str
+      @elements = []
+    end
+
+    def parse
+      strs = get_element_strs
+      @elements = parse_element_strs(strs)
+    end
+
+    def pos_close_str(str, open_str)
+      close_str = ERL_CLOSE_STRS[open_str]
+      if open_str == close_str
+        return str.index(close_str,1)
+      else
+        open_count = 1
+        for i in ((str.index(open_str)+1)..(str.length))
+          opened = (str[i,open_str.length ] == open_str)
+          open_count += 1 if opened
+          closed = (str[i,close_str.length] == close_str)
+          open_count -= 1 if closed
+          return i if (closed && open_count==0)
+        end
+        raise "Parse error, not found matching close of #{open_str} in #{str}"
+      end
+    end
+
+    def parse_first_term(str_to_parse)
+      open_str = str_to_parse[/^(\[|\{|\"|\'|<<|#Ref|<)/,1]
+      if open_str
+        close_str = ERL_CLOSE_STRS[open_str]
+        pos_open_str = str_to_parse.index(open_str)
+        pos_close_str = pos_close_str(str_to_parse,open_str)
+        term_str = str_to_parse[pos_open_str..(pos_close_str+close_str.length-1)]
+        new_str_to_parse = str_to_parse[(pos_close_str+close_str.length), str.length]
+      else
+        pos_open_str = 0
+        pos_close_str = str_to_parse.index(",") || str_to_parse.length
+        term_str = str_to_parse[pos_open_str..(pos_close_str-1)]
+        new_str_to_parse = str_to_parse[pos_close_str+1, str.length]
+      end
+      new_str_to_parse = "" if new_str_to_parse.nil?
+      [term_str, new_str_to_parse.gsub(/^[,\s]+/,"")]
+    end
+
+    #parse @str to elements to the end of @str, and each elements must be separated by ","
+    def get_element_strs
+      element_strs=[]
+      str_to_parse = @str[1,@str.length-2].strip  # between [ and ], or { and }
+      until str_to_parse == ""
+        term_str, new_str_to_parse = parse_first_term(str_to_parse)
+        element_strs << term_str
+        str_to_parse = new_str_to_parse
+      end
+      element_strs
+    end
+
+    def parse_element_strs(strs)
+      strs.map {|term_str|
+        term = ErlTerm.decode(term_str)
+        if term.is_a?(ErlTuple) or term.is_a?(ErlList)
+          term_strs = term.get_element_strs
+          term.elements = term.parse_element_strs(term_strs)
+        end
+        term
+      }
+    end
+  end
+end

data/lib/erlang_config/erlpid.rb

@@ -0,0 +1,8 @@
+module ErlangConfig
+  class ErlPid < ErlTerm
+    def to_ruby
+      self.str.gsub!(/<>/,"")
+      bin_els = self.str.split(".")
+    end
+  end
+end

data/lib/erlang_config/erlref.rb

@@ -0,0 +1,8 @@
+module ErlangConfig
+  class ErlRef < ErlTerm
+    def to_ruby
+      self.str.gsub!(/#Ref<|>/,"")
+      bin_els = self.str.split(".")
+    end
+  end
+end

data/lib/erlang_config/erlstring.rb

@@ -0,0 +1,7 @@
+module ErlangConfig
+  class ErlString < ErlTerm
+    def to_ruby
+      self.str.gsub(/"/,"")
+    end
+  end
+end

data/lib/erlang_config/erlterm.rb

@@ -0,0 +1,36 @@
+module ErlangConfig
+  class ErlTerm
+    attr_accessor :str
+    def initialize(str)
+      @str = str
+    end
+
+    def self.decode(str)
+      str.strip!
+      term_open_str = str[/^(\[|\{|\"|\'|<<|#Ref|<)/,1]
+      if term_open_str.nil? # integer,float, or, atom
+        matches = /^(([-0-9\.]+)|([a-z][a-z0-9_]*))/.match(str)
+        term = case
+          when (matches[2] && str[/\./]) then str.to_f
+          when matches[2] then str.to_i
+          when matches[3] then str.to_sym
+        end
+      else
+        term_close_str = ERL_CLOSE_STRS[term_open_str]
+        re_ends_with_close_str = Regexp.new(Regexp.escape("#{term_close_str}")+"$")
+        raise "Parse error, Invalid erlang term #{str}" unless re_ends_with_close_str.match(str)
+        term = case term_open_str
+          when '[' then ErlList.new(str)
+          when '{' then ErlTuple.new(str)
+          when '"' then ErlString.new(str)
+          when "'" then ErlAtom.new(str)
+          when "<<" then ErlBinary.new(str)
+          when "#Ref" then ErlRef.new(str)
+          when "<" then ErlPid.new(str)
+          else raise "Parse error with #{term_open_str}"
+        end
+      end
+      term
+    end
+  end
+end

data/lib/erlang_config/erltuple.rb

@@ -0,0 +1,11 @@
+module ErlangConfig
+  class ErlTuple < ErlEnumeration
+    def to_ruby
+      arr = @elements.map {|el|
+        (el.is_a?(ErlTerm) || el.is_a?(ErlEnumeration))? el.to_ruby : el
+      }
+      key = arr.delete_at(0)
+      hash = {key => ( arr.length>1 ? arr: arr[0])}
+    end
+  end
+end

data/lib/erlang_config/version.rb

@@ -0,0 +1,3 @@
+module ErlangConfig
+  VERSION = "0.0.1"
+end

data/spec/data/rabbitmq_status.txt

@@ -0,0 +1,52 @@
+[{pid,53721},
+ {running_applications,
+     [{rabbitmq_management_visualiser,"RabbitMQ Visualiser","3.2.3"},
+      {rabbitmq_federation_management,"RabbitMQ Federation Management",
+          "3.2.3"},
+      {rabbitmq_management,"RabbitMQ Management Console","3.2.3"},
+      {rabbitmq_web_dispatch,"RabbitMQ Web Dispatcher","3.2.3"},
+      {webmachine,"webmachine","1.10.3-rmq3.2.3-gite9359c7"},
+      {mochiweb,"MochiMedia Web Server","2.7.0-rmq3.2.3-git680dba8"},
+      {rabbitmq_mqtt,"RabbitMQ MQTT Adapter","3.2.3"},
+      {rabbitmq_federation,"RabbitMQ Federation","3.2.3"},
+      {rabbitmq_stomp,"Embedded Rabbit Stomp Adapter","3.2.3"},
+      {rabbitmq_management_agent,"RabbitMQ Management Agent","3.2.3"},
+      {rabbitmq_amqp1_0,"AMQP 1.0 support for RabbitMQ","3.2.3"},
+      {rabbit,"RabbitMQ","3.2.3"},
+      {os_mon,"CPO  CXC 138 46","2.2.13"},
+      {inets,"INETS  CXC 138 49","5.9.6"},
+      {mnesia,"MNESIA  CXC 138 12","4.10"},
+      {amqp_client,"RabbitMQ AMQP Client","3.2.3"},
+      {xmerl,"XML parser","1.3.4"},
+      {sasl,"SASL  CXC 138 11","2.3.3"},
+      {stdlib,"ERTS  CXC 138 10","1.19.3"},
+      {kernel,"ERTS  CXC 138 10","2.16.3"}]},
+ {os,{unix,darwin}},
+ {erlang_version,
+     "Erlang R16B02 (erts-5.10.3) [source] [smp:4:4] [async-threads:30] [hipe] [kernel-poll:true]\n"},
+ {memory,
+     [{total,26591584},
+      {connection_procs,2888},
+      {queue_procs,24800},
+      {plugins,193876},
+      {other_proc,8954688},
+      {mnesia,46916},
+      {mgmt_db,33156},
+      {msg_index,27588},
+      {other_ets,704724},
+      {binary,1619408},
+      {code,11103864},
+      {atom,568805},
+      {other_system,3310871}]},
+ {vm_memory_high_watermark,0.4},
+ {vm_memory_limit,858993459},
+ {disk_free_limit,50000000},
+ {disk_free,28775735296},
+ {file_descriptors,
+     [{total_limit,2460},
+      {total_used,5},
+      {sockets_limit,2212},
+      {sockets_used,3}]},
+ {processes,[{limit,1048576},{used,225}]},
+ {run_queue,0},
+ {uptime,11277}]

data/spec/erlang_config_spec.rb

@@ -0,0 +1,27 @@
+require 'spec_helper'
+
+describe ErlangConfig do
+  context "when decoding an erlang config" do
+    it "should decode simple stuff correctly" do
+      erlang_string = '[{"x-max-hops",1},{"x-internal-purpose","federation"}]'
+      expect = [{"x-max-hops"=>1}, {"x-internal-purpose"=>"federation"}]
+      ErlangConfig.decode(erlang_string).should == expect
+    end
+
+    it "should decode rabbitmq status message without errors" do
+      erlang_string = File.read(File.expand_path('../data/rabbitmq_status.txt', __FILE__))
+      expect {
+        decoded = ErlangConfig.decode(erlang_string)
+      }.not_to raise_error
+    end
+  end
+
+  context "when encoding from a ruby hash" do
+    it "should encode correctly" do
+      ruby_hash = [{"x-max-hops"=>1}, {"x-internal-purpose"=>"federation"}]
+      expect = '[{"x-max-hops",1},{"x-internal-purpose","federation"}]'
+      # Erlang::Config.encode(ruby_hash).should == expect
+      pending "Encoding has not been implemented yet, pull requests welcome!"
+    end
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,7 @@
+require 'rubygems'
+require 'bundler/setup'
+require "erlang_config"
+
+RSpec.configure do |config|
+  # some (optional) config here
+end

metadata

@@ -0,0 +1,110 @@
+--- !ruby/object:Gem::Specification
+name: erlang_config
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+platform: ruby
+authors:
+- Roman Gaufman
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2014-02-20 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.5'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.5'
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '10.1'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '10.1'
+- !ruby/object:Gem::Dependency
+  name: rspec
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '2.14'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '2.14'
+description: See summery
+email:
+- roman@xanview.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- ".gitignore"
+- Gemfile
+- LICENSE.txt
+- README.md
+- Rakefile
+- erlang_config.gemspec
+- lib/erlang_config.rb
+- lib/erlang_config/erlatom.rb
+- lib/erlang_config/erlbinary.rb
+- lib/erlang_config/erllist.rb
+- lib/erlang_config/erlnumeration.rb
+- lib/erlang_config/erlpid.rb
+- lib/erlang_config/erlref.rb
+- lib/erlang_config/erlstring.rb
+- lib/erlang_config/erlterm.rb
+- lib/erlang_config/erltuple.rb
+- lib/erlang_config/version.rb
+- spec/data/rabbitmq_status.txt
+- spec/erlang_config_spec.rb
+- spec/spec_helper.rb
+homepage: ''
+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.2.0
+signing_key: 
+specification_version: 4
+summary: Encode and Decode Erlang style configuration files.
+test_files:
+- spec/data/rabbitmq_status.txt
+- spec/erlang_config_spec.rb
+- spec/spec_helper.rb
+has_rdoc: