rvs 0.1.0

data/MIT-LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2012 Makani Mason, Kem Mason
+
+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/lib/rvs/parse.rb

@@ -0,0 +1,102 @@
+require 'strscan'
+require 'bigdecimal'
+
+module RVS
+class Parser
+  def initialize(str)
+    @scan = StringScanner.new(str)
+  end
+
+  def run
+    parse_item
+  end
+
+  def parse_item
+    next_char = @scan.peek(1)
+    if next_char == '['
+      parse_array
+    elsif next_char == '{'
+      parse_hash
+    else
+      parse_value
+    end
+  end
+
+  def parse_array
+    # throw away the opening [
+    @scan.getch
+
+    retval = []
+    while !@scan.eos?
+      next_char = @scan.peek(1)
+      if next_char == ']'
+        # throw away the closing ]
+        @scan.getch
+        break
+      end
+      # throw away the ,
+      @scan.getch if next_char == ','
+      retval.push(parse_item)
+    end
+    retval
+  end
+
+  def parse_hash
+    # throw away the opening {
+    @scan.getch
+
+    retval = {}
+    curr_key = nil
+    while !@scan.eos?
+      next_char = @scan.peek(1)
+      if next_char == '}'
+        # throw away the closing }
+        @scan.getch
+        break
+      end
+      # throw away the comma , or >
+      @scan.getch if [',','>'].include?(next_char)
+
+      next_value = parse_item
+      if curr_key
+        retval[curr_key] = next_value
+        curr_key = nil
+      else
+        curr_key = next_value
+      end
+    end
+    retval
+  end
+
+  def parse_value
+    type_identifier = @scan.getch
+    if type_identifier == 'b'
+      @scan.getch == '1'
+    elsif type_identifier == 'd'
+      Date.strptime(get_chars(8), '%Y%m%d')
+    elsif type_identifier == 'e'
+      DateTime.strptime(get_chars(14), '%Y%m%d%H%M%S')
+    elsif type_identifier == 't'
+      Time.strptime(get_chars(14), '%Y%m%d%H%M%S')
+    elsif type_identifier == 's'
+      get_chars(@scan.scan_until(/:/).chop.to_i)
+    elsif type_identifier == 'w'
+      @scan.scan(/\d+/).to_i
+    elsif type_identifier == 'c'
+      BigDecimal(@scan.scan(/[0-9\.]+/))
+    else
+      raise "unexpected type identifier"
+    end
+  end
+
+  def get_chars(count)
+    retval = @scan.peek(count)
+    @scan.pos = @scan.pos + count
+    retval
+  end
+end
+
+def self.parse(str)
+  Parser.new(str).run
+end
+end

data/lib/rvs/to_rvs.rb

@@ -0,0 +1,76 @@
+require 'bigdecimal'
+require 'date'
+require 'time'
+
+class String
+  def to_rvs
+    "s#{size}:#{self}"
+  end
+end
+
+module WholeNumberToRvs
+  def to_rvs
+    "w#{self}"
+  end
+end
+
+class Fixnum
+  include WholeNumberToRvs
+end
+
+class Bignum
+  include WholeNumberToRvs
+end
+
+class FalseClass
+  def to_rvs
+    'b0'
+  end
+end
+
+class TrueClass
+  def to_rvs
+    'b1'
+  end
+end
+
+class BigDecimal
+  def to_rvs
+    "c#{to_s('F')}"
+  end
+end
+
+class Date
+  def to_rvs
+    "d#{strftime('%Y%m%d')}"
+  end
+end
+
+class DateTime
+  def to_rvs
+    "e#{strftime('%Y%m%d%H%M%S')}"
+  end
+end
+
+class Time
+  def to_rvs
+    "t#{strftime('%Y%m%d%H%M%S')}"
+  end
+end
+
+class Array
+  def to_rvs
+    inner = collect {|elem| elem.to_rvs }.join(',')
+    "[#{inner}]"
+  end
+end
+
+class Hash
+  def to_rvs
+    ary = []
+    each_pair do |key, value|
+      ary.push("#{key.to_rvs}>#{value.to_rvs}")
+    end
+    "{#{ary.join(',')}}"
+  end
+end

data/lib/rvs.rb

@@ -0,0 +1,2 @@
+require 'rvs/to_rvs'
+require 'rvs/parse'

data/test/rvs.dt.rb

@@ -0,0 +1,70 @@
+require_relative '../lib/rvs/parse'
+require_relative '../lib/rvs/to_rvs'
+
+class Test_rvs < DohTest::TestGroup
+  def verify(original_obj, expected_str)
+    actual_str = original_obj.to_rvs
+    assert_equal(expected_str, actual_str)
+    recreated_obj = RVS::parse(actual_str)
+    assert_equal(original_obj, recreated_obj)
+  end
+
+  def test_whole_numbers
+    fixnum = 1000
+    assert(fixnum.is_a?(Fixnum))
+    verify(fixnum, 'w1000')
+
+    bignum = 9999999999999999999999999999999
+    assert(bignum.is_a?(Bignum))
+    verify(bignum, 'w9999999999999999999999999999999')
+  end
+
+  def test_boolean
+    verify(true, 'b1')
+    verify(false, 'b0')
+  end
+
+  def test_bigdecimal
+    verify(BigDecimal('100'), 'c100.0')
+    verify(BigDecimal('100.14'), 'c100.14')
+    verify(BigDecimal('100.143912981212381923'), 'c100.143912981212381923')
+  end
+
+  def test_date
+    verify(Date.new(2012,2,9), 'd20120209')
+  end
+
+  def test_datetime
+    verify(DateTime.new(2012,2,9,1,5,7), 'e20120209010507')
+    verify(DateTime.new(2012,2,9,17,39,45), 'e20120209173945')
+  end
+
+  def test_time
+    verify(Time.new(2012,2,9,1,5,7), 't20120209010507')
+    verify(Time.new(2012,2,9,17,39,45), 't20120209173945')
+  end
+
+  def test_array
+    verify([1, 2], '[w1,w2]')
+    verify([1, [2,3]], '[w1,[w2,w3]]')
+    verify([1, [2,[3,4]]], '[w1,[w2,[w3,w4]]]')
+  end
+
+  def test_hash
+    verify({1 => 2}, '{w1>w2}')
+    verify({1 => 2, 3 => 4}, '{w1>w2,w3>w4}')
+    verify({1 => 2, 3 => {4 => 5}}, '{w1>w2,w3>{w4>w5}}')
+  end
+
+  def test_mixed
+    verify({1 => ['blah'], ['blee'] => {4 => 5}}, '{w1>[s4:blah],[s4:blee]>{w4>w5}}')
+  end
+
+  def test_string
+    verify('', 's0:')
+    verify('blah', 's4:blah')
+    verify('blahblee', 's8:blahblee')
+    verify('blahb\'lee', "s9:blahb'lee")
+    verify('blahb\'le"e', %q{s10:blahb'le"e})
+  end
+end

metadata

@@ -0,0 +1,66 @@
+--- !ruby/object:Gem::Specification
+name: rvs
+version: !ruby/object:Gem::Version
+  version: 0.1.0
+  prerelease: 
+platform: ruby
+authors:
+- Makani Mason
+- Kem Mason
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-02-23 00:00:00.000000000Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: dohutil
+  requirement: &70365557731000 !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: 0.1.4
+  type: :runtime
+  prerelease: false
+  version_requirements: *70365557731000
+description: serialization of common ruby value classes to ascii text
+email:
+- devinfo@atpsoft.com
+executables: []
+extensions: []
+extra_rdoc_files:
+- MIT-LICENSE
+files:
+- lib/rvs/parse.rb
+- lib/rvs/to_rvs.rb
+- lib/rvs.rb
+- test/rvs.dt.rb
+- MIT-LICENSE
+homepage: https://github.com/atpsoft/rvs
+licenses:
+- MIT
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: 1.9.2
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.15
+signing_key: 
+specification_version: 3
+summary: Ruby Values Serialization to ascii text
+test_files:
+- test/rvs.dt.rb
+has_rdoc: