simatic 0.0.1

data/lib/simatic/types/bool.rb

@@ -0,0 +1,18 @@
+require 'simatic/types/simatic_type'
+
+module Simatic
+  module Types
+    class Bool < SimaticType
+      LENGTH = 1
+
+      def self.parse_one raw_data
+        super
+        raw_data.unpack('b*').first.index('1') ? true : false
+      end
+
+      def self.serialize value
+        [value ? 1 : 0].pack('c')
+      end
+    end
+  end
+end

data/lib/simatic/types/byte.rb

@@ -0,0 +1,10 @@
+require 'simatic/types/simatic_simple_type'
+
+module Simatic
+  module Types
+    class Byte < SimaticSimpleType
+      LENGTH = 1
+      PATTERN = 'C'
+    end
+  end
+end

data/lib/simatic/types/char.rb

@@ -0,0 +1,15 @@
+require 'simatic/types/simatic_simple_type'
+
+module Simatic
+  module Types
+    class Char < SimaticSimpleType
+      LENGTH = 1
+      PATTERN = 'a'
+
+      def self.serialize value
+        raise "Value must be String class (value: #{value})" unless value.kind_of? String
+        [value].pack(self::PATTERN)
+      end
+    end
+  end
+end

data/lib/simatic/types/date_and_time.rb

@@ -0,0 +1,43 @@
+require 'time'
+require 'simatic/types/simatic_type'
+
+module Simatic
+  module Types
+    class DateAndTime < SimaticType
+      LENGTH = 8
+      def self.parse_one raw_value
+        super
+        array = raw_value.unpack('H*').first
+
+        year = array[0,2].to_i + (array[0,2].to_i <= 89 ? 2000 : 1900)
+        month = array[2,2].to_i
+        day = array[4,2].to_i
+        hour = array[6,2].to_i
+        min = array[8,2].to_i
+        sec = array[10,2].to_i
+
+        microsecond = array[12,3].to_i * 1000
+
+        Time.utc(year, month, day, hour, min, sec, microsecond)
+      end
+
+      def self.serialize value
+        raise "Value must be Time class" unless value.kind_of? Time
+
+        hex_string = 
+          '%02d' % (value.year - ((value.year >= 2000) ? 2000 : 1900)) +
+          '%02d' % value.month +
+          '%02d' % value.day +
+          '%02d' % value.hour +
+          '%02d' % value.min +
+          '%02d' % value.sec +
+          '%03d' % (value.usec/1000.0).to_i +
+          '%01d' % (value.wday+1)
+
+          # puts hex_string
+          
+          [hex_string].pack('H*')
+      end
+    end
+  end
+end

data/lib/simatic/types/dint.rb

@@ -0,0 +1,10 @@
+require 'simatic/types/simatic_type'
+
+module Simatic
+  module Types
+    class Dint < SimaticSimpleType
+      LENGTH = 4
+      PATTERN = 'l>'
+    end
+  end
+end

data/lib/simatic/types/dword.rb

@@ -0,0 +1,10 @@
+require 'simatic/types/simatic_simple_type'
+
+module Simatic
+  module Types
+    class Dword < SimaticSimpleType
+      LENGTH = 4
+      PATTERN = 'L>'
+    end
+  end
+end

data/lib/simatic/types/iec_date.rb

@@ -0,0 +1,20 @@
+require 'date'
+require 'simatic/types/word'
+
+module Simatic
+  module Types
+    class IECDate < Word
+      LENGTH = 2
+      def self.parse_one raw_value
+        days = super # days since 1990-01-01
+        Date.new(1990,1,1)+days
+      end
+
+      def self.serialize value
+        raise "Value #{value} must be Date class instead of #{value.class}" unless value.kind_of? Date
+        days = value - Date.new(1990,01,01)
+        super days
+      end
+    end
+  end
+end

data/lib/simatic/types/iec_time.rb

@@ -0,0 +1,16 @@
+require 'simatic/types/dword'
+
+module Simatic
+  module Types
+    class IECTime < Dword
+      def self.parse_one raw_value
+        super / 1000.0 # seconds
+      end
+
+      def self.serialize value
+        raise "Value must be numeric in seconds" unless value.kind_of? Numeric
+        super (value * 1000.0).to_i # convert to milliseconds and write
+      end
+    end
+  end
+end

data/lib/simatic/types/int.rb

@@ -0,0 +1,10 @@
+require 'simatic/types/simatic_simple_type'
+
+module Simatic
+  module Types
+    class Int < SimaticSimpleType
+      LENGTH = 2
+      PATTERN = 's>'
+    end
+  end
+end

data/lib/simatic/types/real.rb

@@ -0,0 +1,10 @@
+require 'simatic/types/simatic_simple_type'
+
+module Simatic
+  module Types
+    class Real < SimaticSimpleType
+      LENGTH = 4
+      PATTERN = 'g'
+    end
+  end
+end

data/lib/simatic/types/s5_time.rb

@@ -0,0 +1,47 @@
+require 'simatic/types/simatic_type'
+
+module Simatic
+  module Types
+    class S5time < SimaticType
+      LENGTH = 2
+      def self.parse_one raw_value
+        super
+        hex_string = raw_value.unpack('h*').first
+        time_base = hex_string[0].to_i
+        time_value = hex_string[1,3].to_i
+        case time_base
+        when 0 # 10 ms
+          time_value * 100.0
+        when 1 # 100 ms
+          time_value * 10.0
+        when 2 # 1 s
+          time_value * 1.0
+        when 3 # 10 s
+          time_value / 10.0
+        end
+      end
+
+      def self.serialize value
+        raise "Value must be numeric in seconds" unless value.kind_of? Numeric
+
+        params = case value.round(2)
+        when 0.00...9.99
+          [0, 100.0]
+        when 9.99...99.9
+          [1, 10.0]
+        when 99.9...999.0
+          [2, 1.0]
+        when 999.0..9990.0
+          [3, 0.1]
+        else
+          raise "Value is to large"
+        end
+
+        time_base = params.first.to_s
+        time_value = (value*params.last).to_i.to_s
+
+        [time_base+time_value].pack('h*')
+      end
+    end
+  end
+end

data/lib/simatic/types/s7_string.rb

@@ -0,0 +1,38 @@
+require 'simatic/types/simatic_type'
+
+module Simatic
+  module Types
+    class S7String < SimaticType
+      def initialize value, size = nil
+        @size = size
+        @value = value
+      end
+
+      def self.serialize value, size
+        raise "Value must be String class" unless value.kind_of? String
+        size = size || value.length
+        [size, value.length, value].pack("CCa#{size}x")
+      end
+      
+      def serialize
+        if @value.kind_of? Array
+          @value.map { |single_val| self.class.serialize single_val, @size }
+        else
+          self.class.serialize @value, @size
+        end
+      end
+
+      def self.parse_one raw_value
+        res = raw_value.unpack('CCa*')
+
+        buf_size = res[0]
+        string_size = res[1]
+        string = res[2]
+
+        raise "S7String is broken, cant parse" if buf_size.nil? || string_size.nil? || string.nil? || buf_size < string_size
+
+        string[0, string_size]
+      end
+    end
+  end
+end

data/lib/simatic/types/simatic_simple_type.rb

@@ -0,0 +1,20 @@
+require 'simatic/types/simatic_type'
+
+module Simatic
+  module Types
+    class SimaticSimpleType < SimaticType
+      def self.parse_one raw_value
+        super
+        raw_value.unpack(self::PATTERN).first
+      end
+
+      def self.serialize value
+        raise "Value must be numeric (value: #{value} type: #{value.class})" unless value.kind_of? Numeric
+
+        # puts "class #{self::PATTERN}"
+        # puts " PATTERN #{self::PATTERN} LENGTH #{self::LENGTH}"
+        [value].pack(self::PATTERN)
+      end
+    end
+  end
+end

data/lib/simatic/types/simatic_type.rb

@@ -0,0 +1,34 @@
+module Simatic
+  module Types
+    class SimaticType
+      def initialize value
+        @value = value
+      end
+
+      def self.parse raw_data
+        if raw_data.kind_of? Array
+          # puts "raw_data #{raw_data}"
+          raw_data.map { |raw_value| self.parse_one raw_value } 
+        else
+          parse_one raw_data
+        end
+      end
+
+      def self.parse_one raw_value
+          raw_value_length = raw_value.length
+          if raw_value_length != self::LENGTH
+            raise "Cant parse, cause raw data length #{raw_value_length} (must be #{self::LENGTH})."
+          end
+          raw_value
+      end
+
+      def serialize
+        if @value.kind_of? Array
+          @value.map { |single_val| self.class.serialize single_val }
+        else
+          self.class.serialize @value
+        end
+      end
+    end
+  end
+end

data/lib/simatic/types/time_of_day.rb

@@ -0,0 +1,8 @@
+require 'simatic/types/iec_time'
+
+module Simatic
+  module Types
+    class TimeOfDay < IECTime    
+    end
+  end
+end

data/lib/simatic/types/word.rb

@@ -0,0 +1,10 @@
+require 'simatic/types/simatic_simple_type'
+
+module Simatic
+  module Types
+    class Word < SimaticSimpleType
+      LENGTH = 2
+      PATTERN = 'S>'
+    end
+  end
+end

data/lib/simatic/version.rb

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

data/simatic.gemspec

@@ -0,0 +1,27 @@
+# coding: utf-8
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'simatic/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = "simatic"
+  spec.version       = Simatic::VERSION
+  spec.authors       = ["Konstantin Ryzhov"]
+  spec.email         = ["konstantin.ryzhov@gmail.com"]
+
+  spec.summary       = %q{Ruby library for Siemens Simatic S7-300 PLC data exchange.}
+  spec.description   = %q{Ruby library for Siemens Simatic S7-300 PLC data exchange.}
+  spec.homepage      = "https://github.com/konstantin-ryzhov/ruby_s7plc"
+  spec.license       = "MIT"
+
+  spec.files         = `git ls-files -z`.split("\x0").reject { |f| f.match(%r{^(test|spec|features)/}) }
+  spec.executables   = ['read']
+  spec.require_paths = ["lib"]
+
+  if spec.respond_to?(:metadata)
+    spec.metadata['allowed_push_host'] = "https://rubygems.org"
+  end
+
+  spec.add_development_dependency "bundler", "~> 1.9"
+  # spec.add_development_dependency "rake", "~> 10.0"
+end

metadata

@@ -0,0 +1,94 @@
+--- !ruby/object:Gem::Specification
+name: simatic
+version: !ruby/object:Gem::Version
+  version: 0.0.1
+platform: ruby
+authors:
+- Konstantin Ryzhov
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2015-07-14 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.9'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    requirements:
+    - - "~>"
+      - !ruby/object:Gem::Version
+        version: '1.9'
+description: Ruby library for Siemens Simatic S7-300 PLC data exchange.
+email:
+- konstantin.ryzhov@gmail.com
+executables:
+- read
+extensions: []
+extra_rdoc_files: []
+files:
+- ".gitignore"
+- Gemfile
+- README.md
+- Rakefile
+- bin/read
+- lib/simatic.rb
+- lib/simatic/memory_mapper.rb
+- lib/simatic/plc.rb
+- lib/simatic/sessions.rb
+- lib/simatic/sessions/exchange_session.rb
+- lib/simatic/sessions/open_session.rb
+- lib/simatic/sessions/read_session.rb
+- lib/simatic/sessions/session.rb
+- lib/simatic/sessions/setup_session.rb
+- lib/simatic/sessions/write_session.rb
+- lib/simatic/types.rb
+- lib/simatic/types/bool.rb
+- lib/simatic/types/byte.rb
+- lib/simatic/types/char.rb
+- lib/simatic/types/date_and_time.rb
+- lib/simatic/types/dint.rb
+- lib/simatic/types/dword.rb
+- lib/simatic/types/iec_date.rb
+- lib/simatic/types/iec_time.rb
+- lib/simatic/types/int.rb
+- lib/simatic/types/real.rb
+- lib/simatic/types/s5_time.rb
+- lib/simatic/types/s7_string.rb
+- lib/simatic/types/simatic_simple_type.rb
+- lib/simatic/types/simatic_type.rb
+- lib/simatic/types/time_of_day.rb
+- lib/simatic/types/word.rb
+- lib/simatic/version.rb
+- simatic.gemspec
+homepage: https://github.com/konstantin-ryzhov/ruby_s7plc
+licenses:
+- MIT
+metadata:
+  allowed_push_host: https://rubygems.org
+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.3
+signing_key: 
+specification_version: 4
+summary: Ruby library for Siemens Simatic S7-300 PLC data exchange.
+test_files: []