fixed-layout-mapper 0.0.1

data/.gitignore

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

data/Gemfile

@@ -0,0 +1,4 @@
+source "http://rubygems.org"
+
+# Specify your gem's dependencies in fixed-layout-mapper.gemspec
+gemspec

data/README.md

@@ -0,0 +1,26 @@
+    require 'pp'
+    require 'fixed-layout-mapper'
+    
+    mapper = FixedLayoutMapper::Mapper.define_layout do
+      layout :sub_layout do
+        col :sub_f1, 1
+        col :sub_f2, 2
+      end
+    
+      col :f1, 5 
+      col :f2, :sub_layout
+      col :f3, [2] * 3
+      col :f4, [1, 2, :sub_layout]
+      col :f5, 3 do |v|
+        v * 2
+      end
+    end
+    
+    data = %w(12345 a bb 00 11 22 a bb c dd 123)
+    pp mapper.map(data.join)
+    #=> #<struct 
+    #    f1="12345",
+    #    f2=#<struct  sub_f1="a", sub_f2="bb">,
+    #    f3=["00", "11", "22"],
+    #    f4=["a", "bb", #<struct  sub_f1="c", sub_f2="dd">],
+    #    f5="123123">

data/Rakefile

@@ -0,0 +1,8 @@
+require "bundler/gem_tasks"
+
+require 'rspec/core'
+require 'rspec/core/rake_task'
+
+RSpec::Core::RakeTask.new(:spec) do |spec|
+  spec.pattern = FileList['test/**/*_spec.rb']
+end

data/fixed-layout-mapper.gemspec

@@ -0,0 +1,24 @@
+# -*- encoding: utf-8 -*-
+$:.push File.expand_path("../lib", __FILE__)
+require "fixed-layout-mapper/version"
+
+Gem::Specification.new do |s|
+  s.name        = "fixed-layout-mapper"
+  s.version     = FixedLayoutMapper::VERSION
+  s.authors     = ["pocari"]
+  s.email       = ["caffelattenonsugar@gmail.com"]
+  s.homepage    = "https://github.com/pocari"
+  s.summary     = %q{Mapping fixed layout record to ruby's Struct or Array object.}
+  s.description = ""
+
+  s.rubyforge_project = "fixed-layout-mapper"
+
+  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

data/lib/fixed-layout-mapper/version.rb

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

data/lib/fixed-layout-mapper.rb

@@ -0,0 +1,250 @@
+require "fixed-layout-mapper/version"
+
+module FixedLayoutMapper
+  LENGTH_CONDITION_STRICT = :strict
+  LENGTH_CONDITION_ALLOW_LONG = :allow_long
+  
+  class Mapper
+    class ColumnMapper
+      attr_accessor :layout_mapper, :converter
+      def initialize(layout_mapper, converter = nil)
+        @layout_mapper = layout_mapper
+        @converter = converter
+      end
+
+      def convert(value)
+        if @converter
+          @converter.(value)
+        else
+          value
+        end
+      end
+    end
+
+    class SimpleMapper < ColumnMapper
+      def initialize(layout_mapper, len, converter = nil)
+        super layout_mapper, converter
+        @len = len
+      end
+      
+      def length
+        @len
+      end
+      
+      def map(bytes)
+        value = bytes.take(@len).pack("C*").force_encoding(layout_mapper.encoding)
+        #value = converter.(value) if converter
+        [convert(value), bytes.drop(@len)]
+      end
+    end
+
+    class SubLayoutMapper < ColumnMapper
+      def initialize(layout_mapper, layout_id, converter = nil)
+        super layout_mapper, converter
+        @layout_id = layout_id
+      end
+
+      def map(bytes)
+        value, rest = layout_mapper.get_layout(@layout_id).map(bytes, layout_mapper.get_result_class(@layout_id))
+        [convert(value), rest]
+      end
+      
+      def length
+        layout_mapper.get_layout(@layout_id).length
+      end
+    end
+
+    class ArrayMapper < ColumnMapper
+      def initialize(layout_mapper, mappers, converter = nil)
+        super layout_mapper, converter
+        @mappers = mappers
+      end
+
+      def map(bytes)
+        ret = []
+        rest = @mappers.inject(bytes) do |acc, mapper|
+          value, acc = mapper.map(acc)
+          ret << value
+          acc
+        end
+        [convert(ret), rest]
+      end
+      
+      def length
+        @mappers.inject(0) do |acc, m|
+          acc += m.length
+        end
+      end
+    end
+
+    class Layout
+      def initialize(length_condition)
+        @length_condition = length_condition
+        @layout = []
+        @length = nil
+      end
+
+      def syms
+        @layout.map{|e| e[0]}
+      end
+
+      def add(sym, mapper)
+        @layout << [sym, mapper]
+      end
+      
+      def length
+        @length ||= calc_length
+      end
+      
+      def calc_length
+        @layout.inject(0) do |acc, (sym, mapper)|
+          acc += mapper.length
+        end
+      end
+      
+      def map(bytes, result_class)
+        case @length_condition
+        when LENGTH_CONDITION_STRICT
+          raise "byte length is invalid" unless bytes.length == length
+        when LENGTH_CONDITION_ALLOW_LONG
+          raise "byte length is too short" if bytes.length < length
+        else
+          raise "unknown LENGTH_CONDIGION #{@length_condition}"
+        end
+        
+        obj = result_class.new
+        rest = @layout.inject(bytes) do |acc, (sym, mapper)|
+          value, acc = mapper.map(acc)
+          obj[sym] = value
+          acc
+        end
+        [obj, rest]
+      end
+    end
+
+    class << self
+      def define_layout(opts = {:encoding => Encoding.default_external}, &block)
+        obj = Mapper.new(opts)
+        obj.define_layout(&block)
+        obj
+      end
+    end
+
+    attr_reader :encoding, :length_condition
+    def initialize(opts = {:encoding => Encoding.default_external})
+      @current_layout = :default_layout
+      @current_length_condition = LENGTH_CONDITION_ALLOW_LONG
+      @layouts = {}
+      @result_class = {}
+      @length_conditions = {}
+      @encoding = opts[:encoding]
+    end
+
+    def define_layout(&block)
+      instance_eval(&block)
+      build_layout
+    end
+
+    def map(data, layout_id = @current_layout)
+      obj, = @layouts[layout_id].map(data.unpack("C*"), @result_class[layout_id])
+      obj
+    end
+
+    def get_layout(layout_id = @current_layout)
+      @layouts[layout_id]
+    end
+
+    def get_result_class(layout_id)
+      @result_class[layout_id]
+    end
+    
+    def length_condigion(value)
+      @length_condition = value
+    end
+    
+    private
+    def build_layout
+      @layouts.each do |layout_id, layout|
+        @result_class[layout_id] = Struct.new(*layout.syms) do
+          def to_hash
+            each_pair.inject({}) do |acc, (key, value)|
+              case
+              when value.respond_to?(:to_hash)
+                acc[key] = value.to_hash
+              when Array === value
+                acc[key] = value.map{|e|
+                  if e.respond_to?(:to_hash)
+                    e.to_hash
+                  else
+                    e
+                  end
+                }
+              else
+                acc[key] = value
+              end
+              acc
+            end
+          end
+        end
+      end
+    end
+
+    def layout(layout_id, length_condition = LENGTH_CONDITION_ALLOW_LONG, &block)
+      change_current_layout(layout_id, length_condition) do
+        instance_eval(&block)
+      end
+    end
+
+    def col(sym, map_info, layout_id = @current_layout, &block)
+      case map_info
+      when Numeric
+        col_len(sym, map_info, layout_id, block)
+      when Symbol
+        col_from_sub_layout(sym, map_info, layout_id, block)
+      when Array
+        col_array(sym, map_info, layout_id, block)
+      end
+    end
+    
+    def create_layout
+      Layout.new(@current_length_condition)
+    end
+    
+    def col_len(sym, len, layout_id = @current_layout, block)
+      @layouts[layout_id] ||= create_layout
+      @layouts[layout_id].add(sym, SimpleMapper.new(self, len, block))
+    end
+
+    def col_from_sub_layout(sym, sub_layout, layout_id = @current_layout, block)
+      @layouts[layout_id] ||= create_layout
+      @layouts[layout_id].add(sym, SubLayoutMapper.new(self, sub_layout, block))
+    end
+
+    def col_array(sym, array_param, layout_id = @current_layout, block)
+      @layouts[layout_id] ||= create_layout
+      @layouts[layout_id].add(sym, ArrayMapper.new(self,
+        array_param.map{|arg|
+          case arg
+          when Numeric
+            mapper_class = SimpleMapper
+          when Symbol
+            mapper_class = SubLayoutMapper
+          else
+            raise "elements must be Numeric or Symbol"
+          end
+          mapper_class.new(self, arg)
+        }, block)
+      )
+    end
+
+    def change_current_layout(layout, length_condition)
+      tmp = @current_layout
+      tmp = @current_length_condition
+      @current_layout = layout
+      @current_length_condition = length_condition
+      yield
+      @current_layout = tmp
+      @current_length_condition = tmp
+    end
+  end
+end

data/test/fixed_layout_mapper_spec.rb

@@ -0,0 +1,241 @@
+#coding: Windows-31J
+
+$LOAD_PATH << File.expand_path(File.dirname(__FILE__) + '/../lib')
+require File.expand_path(File.dirname(__FILE__) + '/../lib/fixed-layout-mapper')
+require 'rspec'
+
+describe FixedLayoutMapper::Mapper do
+  def define_layout(&block)
+    FixedLayoutMapper::Mapper.define_layout(&block)
+  end
+  
+  def genstr(ary)
+    ary.join
+  end
+  
+  it "�T�C�Y�w��ŃJ�������`�ł��邱��" do
+    mapper = define_layout do
+      col :field1, 2
+      col :field2, 1
+    end
+    rt = mapper.map(%w(12 3).join)
+    rt.field1.should == "12"
+    rt.field2.should == "3"
+  end
+  
+  it "�T�C�Y�̔z��ŃJ�������`����Ƃ��̌��ŕ������ꂽ�z��ɂȂ邱��" do
+    mapper = define_layout do
+      col :f1, 2
+      col :f2, [1, 2, 3]
+      col :f3, [4] * 2
+    end
+    
+    rt = mapper.map(%w(12 a bb ccc 1234 5678).join)
+    rt.f1.should == "12"
+    rt.f2.should == %w(a bb ccc)
+    rt.f3.should == %w(1234 5678)
+  end
+  
+  it "���C�A�E�g�ɖ��O���‚����邱��" do
+    mapper = define_layout do
+      layout :layout1 do
+        col :f1, 2
+        col :f2, 1
+      end
+    end
+    rt = mapper.map(%w(12 3).join, :layout1)
+    rt.f1.should == "12"
+    rt.f2.should == "3"
+  end
+  
+  it "���C�A�E�g�����w�肵�Ă��Ȃ��ꍇ:default_layout�Œ�`����Ă��邱��" do
+    mapper = define_layout do
+      col :f1, 2
+    end
+    
+    rt = mapper.map(%w(12).join, :default_layout)
+    rt.f1.should == "12"
+  end
+  
+  it "���郌�C�A�E�g�ŕʂ̃��C�A�E�g(�ȉ��T�u���C�A�E�g)���g���邱��" do
+    mapper = define_layout do
+      layout :layout1 do
+        col :f1, 2
+        col :f2, 1
+      end
+      
+      col :f, :layout1
+    end
+    rt = mapper.map(%w(12 3).join)
+    rt.f.f1.should == "12"
+    rt.f.f2.should == "3"
+  end
+  
+  it "�T�u���C�A�E�g�̔z�����`�ł��邱��" do
+    mapper = define_layout do
+      layout :layout1 do
+        col :f1, 2
+        col :f2, 1
+      end
+      
+      col :f, [:layout1, :layout1]
+    end
+    rt = mapper.map(%w(12 3 ab c).join)
+    rt.f[0].f1.should == "12"
+    rt.f[0].f2.should == "3"
+    rt.f[1].f1.should == "ab"
+    rt.f[1].f2.should == "c"
+  end
+  
+  it "�z��ɂ̓T�C�Y�ł��T�u���C�A�E�g�ł��w��ł��邱��" do
+    mapper = define_layout do
+      layout :layout1 do
+        col :f1, 2
+        col :f2, 1
+      end
+      
+      col :f, [:layout1, 1, 2]
+    end
+    rt = mapper.map(%w(12 3 a bc).join)
+    rt.f[0].f1.should == "12"
+    rt.f[0].f2.should == "3"
+    rt.f[1].should == "a"
+    rt.f[2].should == "bc"
+  end
+  
+  it "�����̃��C�A�E�g���`�ł��邱��" do
+    mapper = define_layout do
+      layout :layout1 do
+        col :f1, 1
+      end
+      
+      layout :layout2 do
+        col :f2, 2
+      end
+    end
+    rt = mapper.map(%w(1).join, :layout1)
+    rt.f1.should == "1"
+    
+    rt = mapper.map(%w(ab).join, :layout2)
+    rt.f2.should == "ab"
+  end
+  
+  it "�ϊ����ɃA�N�V�������`�����ꍇ���̖߂�l�Ń}�b�s���O����邱��" do
+    mapper = define_layout do
+      col :f1, 2 do |v|
+        v + v
+      end
+    end
+    
+    rt = mapper.map(%w(12).join, :default_layout)
+    rt.f1.should == "1212"
+  end
+  
+  it "�����O�X�w��̃��C�A�E�g�̃����O�X���擾�ł��邱��" do
+    mapper = define_layout do
+      col :f1, 2 
+    end
+    
+    mapper.get_layout.length.should == 2
+  end
+  
+  it "�z��w��̃��C�A�E�g�̃����O�X���擾�ł��邱��" do
+    mapper = define_layout do
+      col :f1, [1, 2, 3]
+    end
+    
+    mapper.get_layout.length.should == 6
+  end
+  
+  it "�T�u���C�A�E�g�w��̃��C�A�E�g�̃����O�X���擾�ł��邱��" do
+    mapper = define_layout do
+      layout :layout1 do
+        col :f, 1
+      end
+      
+      layout :layout2 do
+        col :f ,3
+      end
+      
+      col :f1, :layout1
+      col :f2, :layout2
+    end
+    
+    mapper.get_layout.length.should == 4
+  end
+  
+  it "�z��+�T�u���C�A�E�g�w��̃��C�A�E�g�̃����O�X���擾�ł��邱��" do
+    mapper = define_layout do
+      layout :layout1 do
+        col :f, 1
+      end
+      col :f1, [10, :layout1, 1]
+    end
+    mapper.get_layout.length.should == 12
+  end
+  
+  it "���C�A�E�g�Ƀ����O�X����(���Ȃ��Ƃ��f�[�^�̂ق�������)���w�肳�ꂽ�ꍇ�f�[�^�̃����O�X�̕��������Ă��G���[�ɂȂ�Ȃ�����" do
+    mapper = define_layout do
+      layout :layout1, FixedLayoutMapper::LENGTH_CONDITION_ALLOW_LONG do
+        col :f, 2
+      end
+    end
+    rt = mapper.map("12345", :layout1)
+    rt.f.should == "12"
+  end
+
+  it "���C�A�E�g�Ƀ����O�X����(���Ȃ��Ƃ��f�[�^�̂ق�������)���w�肳�ꂽ�ꍇ�f�[�^�̃����O�X�̕����Z���ꍇ��O���������邱��" do
+    mapper = define_layout do
+      layout :layout1, FixedLayoutMapper::LENGTH_CONDITION_ALLOW_LONG do
+        col :f, 2
+      end
+    end
+    proc {
+      mapper.map("1", :layout1)
+    }.should raise_error
+  end
+  
+  it "���C�A�E�g�Ƀ����O�X����(�f�[�^�����Ɠ���)���w�肳�ꂽ�ꍇ�f�[�^�̃����O�X�̕��������ƃG���[�ɂȂ邱��" do
+    mapper = define_layout do
+      layout :layout1, FixedLayoutMapper::LENGTH_CONDITION_STRICT do
+        col :f, 2
+      end
+    end
+    proc {
+      mapper.map("12345", :layout1)
+    }.should raise_error
+  end
+  
+  it "���C�A�E�g�Ƀ����O�X����(�f�[�^�����Ɠ���)���w�肳�ꂽ�ꍇ�f�[�^�̃����O�X�̕����Z���ƃG���[�ɂȂ邱��" do
+    mapper = define_layout do
+      layout :layout1, FixedLayoutMapper::LENGTH_CONDITION_STRICT do
+        col :f, 2
+      end
+    end
+    proc {
+      mapper.map("1", :layout1)
+    }.should raise_error
+  end
+  
+  it "���C�A�E�g�Ƀ����O�X����(�f�[�^�����Ɠ���)���w�肳�ꂽ�ꍇ�f�[�^�̃����O�X�Ɠ����ꍇ�̓G���[���������Ȃ�����" do
+    mapper = define_layout do
+      layout :layout1, FixedLayoutMapper::LENGTH_CONDITION_STRICT do
+        col :f, 2
+      end
+    end
+    
+    rt = mapper.map("12", :layout1)
+    rt.f.should == "12"
+  end
+  
+  it "���C�A�E�g�Ƀ����O�X����(�f�[�^�������͒���)���w�肳�ꂽ�ꍇ�f�[�^�̃����O�X�̕����Z���ƃG���[�ɂȂ邱��" do
+    mapper = define_layout do
+      layout :layout1, FixedLayoutMapper::LENGTH_CONDITION_ALLOW_LONG do
+        col :f, 2
+      end
+    end
+    proc {
+      mapper.map("1", :layout1)
+    }.should raise_error
+  end
+end

metadata

@@ -0,0 +1,53 @@
+--- !ruby/object:Gem::Specification
+name: fixed-layout-mapper
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+  prerelease: 
+platform: ruby
+authors:
+- pocari
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-10-15 00:00:00.000000000 Z
+dependencies: []
+description: ''
+email:
+- caffelattenonsugar@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- .gitignore
+- Gemfile
+- README.md
+- Rakefile
+- fixed-layout-mapper.gemspec
+- lib/fixed-layout-mapper.rb
+- lib/fixed-layout-mapper/version.rb
+- test/fixed_layout_mapper_spec.rb
+homepage: https://github.com/pocari
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: fixed-layout-mapper
+rubygems_version: 1.8.23
+signing_key: 
+specification_version: 3
+summary: Mapping fixed layout record to ruby's Struct or Array object.
+test_files: []