iotas 0.0.2

data/Rakefile

@@ -0,0 +1,6 @@
+require 'bundler/gem_tasks'
+
+require 'rspec/core/rake_task'
+RSpec::Core::RakeTask.new
+
+task :default => :spec

data/iotas.gemspec

@@ -0,0 +1,28 @@
+#! /usr/bin/env ruby
+# -*- coding: UTF-8 -*-
+#
+$:.push File.expand_path("../lib", __FILE__)
+require 'version'
+#
+Gem::Specification.new do |s|
+    s.name = "iotas"
+    s.version = Iotas::VERSION
+    s.authors = ["Jérémy Zurcher"]
+    s.email = ["jeremy@asynk.ch"]
+    s.homepage = "http://github.com/jeremyz/iotas"
+    s.summary = %q{ruby rewrite of C++ application framework evenja (http://www.revena.com/evenja)}
+    s.description = %q{Evenja propose a data centric paradigm. A traditional programm composed of many functions
+    is decomposed into small autonomous modifications applied on the data implemented in different instances of Door base class.
+    Routing between these doors is handled through links or user application destinations.}
+
+    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"]
+
+    s.add_runtime_dependency "json"
+    s.add_development_dependency "rspec", ["~> 2.6"]
+    s.add_development_dependency "rake"
+end
+#
+# EOF

data/lib/iotas/board.rb

@@ -0,0 +1,69 @@
+#! /usr/bin/env ruby
+# -*- coding: UTF-8 -*-
+#
+# Copyright 2012 Jérémy Zurcher <jeremy@asynk.ch>
+#
+# This file is part of iotas.
+#
+# iotas is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# iotas is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with iotas.  If not, see <http://www.gnu.org/licenses/>.
+
+#
+module Iotas
+    #
+    ACT_FOLLOW = 'follow'.freeze
+    #
+    class Board < Door
+        #
+        def initialize n, p
+            super n, p
+            @postponed = {}
+        end
+        #
+        def to_json *a
+            {
+                'kls'       => self.class.name,
+                'name'      => @name,
+                'postponed' => @postponed
+            }.merge(hibernate!).to_json *a
+        end
+        #
+        def self.json_create o
+            raise Iotas::Exception.new "JSON #{o['kls']} != #{self.name}" if o['kls'] != self.name
+            board = self.new o['name'], o['parent']
+            o['postponed'].each do |link_value,particle|
+                board.process_p Iotas::Particle.json_create(particle.merge!('spin'=>board.spin))
+            end
+            board.resume! o
+            board
+        end
+        #
+        def process_p p
+            @viewer.receive_p p if @viewer
+            if p.action!=Iotas::ACT_ERROR
+                p2 = @postponed[p.link_value] ||= p
+                return if p2==p
+                @postponed.delete p.link_value
+                p,p2 = p2,p if p.action==Iotas::ACT_FOLLOW
+                p.merge! p2
+            end
+            @saved = p
+            receive_p p
+            garbage if not @saved.nil?
+        end
+        #
+    end
+    #
+end
+#
+# EOF

data/lib/iotas/door.rb

@@ -0,0 +1,91 @@
+#! /usr/bin/env ruby
+# -*- coding: UTF-8 -*-
+#
+# Copyright 2012 Jérémy Zurcher <jeremy@asynk.ch>
+#
+# This file is part of iotas.
+#
+# iotas is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# iotas is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with iotas.  If not, see <http://www.gnu.org/licenses/>.
+
+#
+module Iotas
+    #
+    class Door < Iota
+        #
+        def initialize n, p
+            super n, p
+            @saved = nil
+        end
+        #
+        def to_json *a
+            {
+                'kls'   => self.class.name,
+                'name'  => @name
+            }.merge(hibernate!).to_json *a
+        end
+        #
+        def self.json_create o
+            raise Iotas::Exception.new "JSON #{o['kls']} != #{self.name}" if o['kls'] != self.name
+            door = self.new o['name'], o['parent']
+            door.resume! o
+            door
+        end
+        #
+        def require_p p_kls
+            p = @spin.require_p p_kls
+            p.src = self
+            p
+        end
+        #
+        def release_p p
+            @saved=nil if @saved==p     # particle is released, all is good
+            @spin.release_p p
+        end
+        #
+        def garbage
+            puts " ! #{path} didn't give back #{@saved}" if @spin.debug_errors
+            puts "\t#{@saved.data Iotas::FIELD_ERROR_MSG}" if @saved.action==Iotas::ACT_ERROR
+            release_p @saved
+            @saved = nil
+        end
+        #
+        def process_p p
+            @viewer.receive_p p if @viewer
+            @saved = p
+            receive_p p
+            garbage if not @saved.nil?
+        end
+        #
+        def process_sys_p p
+            # nothing todo with it now
+            @spin.release_p p
+        end
+        #
+        def send_p p
+            p.src = self
+            @saved=nil if @saved==p # particle is sent back the data, all is good
+            @parent.send_p p        # daddy will know what to do
+        end
+        #
+        def send_sys_p p
+            p.src = self
+            @saved=nil if @saved==p # particle is sent back the data, all is good
+            @parent.send_sys_p p    # daddy will know what to do
+        end
+        #
+    end
+    #
+end
+#
+# EOF

data/lib/iotas/iota.rb

@@ -0,0 +1,64 @@
+#! /usr/bin/env ruby
+# -*- coding: UTF-8 -*-
+#
+# Copyright 2012 Jérémy Zurcher <jeremy@asynk.ch>
+#
+# This file is part of iotas.
+#
+# iotas is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# iotas is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with iotas.  If not, see <http://www.gnu.org/licenses/>.
+
+#
+module Iotas
+    #
+    class Iota
+        #
+        def initialize n, p
+            @name   = n     # unique in it's room
+            @parent = p     # single direct parent
+            @viewer = nil   # particle going through that position will be sent there readonly
+            @path = ( @parent ? @parent.path+Iotas::PATH_SEP : '') + @name
+            @spin = ( @parent ? @parent.spin : self )
+            @parent.add_iota self if @parent
+            raise Iotas::Exception.new "Iota name #{name} is not valid" if @name.include? Iotas::PATH_SEP
+        end
+        #
+        attr_reader :name, :path, :spin
+        attr_accessor :viewer, :parent
+        #
+        def start!
+            # override this to initialize your object on system start
+        end
+        #
+        def stop!
+            # override this to initialize your object on system stop
+        end
+        #
+        def hibernate!
+            # override this to save your object state on hibernate
+            {}
+        end
+        #
+        def resume! o
+            # override this to restore your object state on resume
+        end
+        #
+        def receive_p p
+            raise NoMethodError.new "receive_p(p) must be overridden"
+        end
+        #
+    end
+    #
+end
+#
+# EOF

data/lib/iotas/link.rb

@@ -0,0 +1,70 @@
+#! /usr/bin/env ruby
+# -*- coding: UTF-8 -*-
+#
+# Copyright 2012 Jérémy Zurcher <jeremy@asynk.ch>
+#
+# This file is part of iotas.
+#
+# iotas is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# iotas is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with iotas.  If not, see <http://www.gnu.org/licenses/>.
+
+#
+module Iotas
+    #
+    LNK_SRC     = 'edoors_lnk_src'.freeze
+    LNK_DSTS    = 'edoors_lnk_dsts'.freeze
+    LNK_FIELDS  = 'edoors_lnk_fields'.freeze
+    LNK_CONDF   = 'edoors_lnk_condf'.freeze
+    LNK_CONDV   = 'edoors_lnk_condv'.freeze
+    #
+    class Link
+        #
+        def initialize src, dsts, fields=nil, cond_fields=nil, cond_value=nil
+            @src = src                      # link source name
+            @dsts = dsts                    # , separated destinations to apply to the particle on linking success
+            @fields = fields                # , separated fields to apply to the particle on linking success
+            @cond_fields = cond_fields      # , separated fields used to generate the link value with particle payload
+            @cond_value = cond_value        # value which will be compared to the particle link value to link or not
+            @door = nil                     # pointer to the source
+        end
+        #
+        def to_json *a
+            {
+                'kls'           => self.class.name,
+                'src'           => @src,
+                'dsts'          => @dsts,
+                'fields'        => @fields,
+                'cond_fields'   => @cond_fields,
+                'cond_value'    => @cond_value
+            }.to_json *a
+        end
+        #
+        def self.json_create o
+            raise Iotas::Exception.new "JSON #{o['kls']} != #{self.name}" if o['kls'] != self.name
+            self.new o['src'], o['dsts'], o['fields'], o['cond_fields'], o['cond_value']
+        end
+        #
+        def self.from_particle_data p
+            Iotas::Link.new(p.get_data(Iotas::LNK_SRC), p.get_data(Iotas::LNK_DSTS),
+                                p.get_data(Iotas::LNK_FIELDS), p.get_data(Iotas::LNK_CONDF),
+                                p.get_data(Iotas::LNK_CONDV))
+        end
+        #
+        attr_accessor :door
+        attr_reader :src, :dsts, :fields, :cond_fields, :cond_value
+        #
+    end
+    #
+end
+#
+# EOF

data/lib/iotas/particle.rb

@@ -0,0 +1,213 @@
+#! /usr/bin/env ruby
+# -*- coding: UTF-8 -*-
+#
+# Copyright 2012 Jérémy Zurcher <jeremy@asynk.ch>
+#
+# This file is part of iotas.
+#
+# iotas is free software: you can redistribute it and/or modify
+# it under the terms of the GNU Affero General Public License as published by
+# the Free Software Foundation, either version 3 of the License, or
+# (at your option) any later version.
+#
+# iotas is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU Affero General Public License for more details.
+#
+# You should have received a copy of the GNU Affero General Public License
+# along with iotas.  If not, see <http://www.gnu.org/licenses/>.
+
+require 'time'
+#
+module Iotas
+    #
+    class Particle
+        #
+        def initialize o={}
+            @ts = Time.now      # creation time
+            @src = nil          # Iota where it's originated from
+            @dst = nil          # Iota where it's heading to
+            @room = nil         # Room path part of the current destination
+            @door = nil         # Door path part of the current destination
+            @action = nil       # action part of the current destination
+            @link_value = nil   # the value computed with the link_fields values extracted from the payload
+                                # used for pearing Particles in Boards and linking in routing process
+            @dsts = []          # fifo of path?action strings where to travel to
+            @link_fields = []   # the fields used to generate the link value
+            @payload = {}       # the actual data carried by this particle
+            @merged = []        # list of merged particles
+            #
+            if not o.empty?
+                @ts = Time.parse(o['ts']) if o['ts']
+                @room = o['room']
+                @door = o['door']
+                @action = o['action']
+                @payload = o['payload']||{}
+                @src = o['spin'].search_down o['src'] if o['src']
+                @dst = o['spin'].search_down o['dst'] if o['dst']
+                o['dsts'].each do |dst| add_dsts dst end if o['dsts']
+                set_link_fields *o['link_fields'] if o['link_fields']
+                o['merged'].each do |particle|
+                    merge! Particle.json_create(particle.merge!('spin'=>o['spin']))
+                end if o['merged']
+            end
+        end
+        #
+        def to_json *a
+            {
+                'kls'           => self.class.name,
+                'ts'            => @ts,
+                'src'           => (@src ? @src.path : nil ),
+                'dst'           => (@dst ? @dst.path : nil ),
+                'room'          => @room,
+                'door'          => @door,
+                'action'        => @action,
+                'dsts'          => @dsts,
+                'link_fields'   => @link_fields,
+                'payload'       => @payload,
+                'merged'        => @merged
+            }.to_json *a
+        end
+        #
+        def self.json_create o
+            raise Iotas::Exception.new "JSON #{o['kls']} != #{self.name}" if o['kls'] != self.name
+            self.new o
+        end
+        #
+        def reset!
+            @ts = Time.now
+            @src = @dst = @room = @door = @action = @link_value = nil
+            @dsts.clear
+            @link_fields.clear
+            @payload.clear
+            @merged.clear
+        end
+        #
+        attr_accessor :src
+        attr_reader :ts, :dst, :room, :door, :action, :link_value, :payload
+        #
+        # routing
+        #
+        def next_dst
+            @dsts[0]
+        end
+        #
+        def clear_dsts!
+            @dsts.clear
+        end
+        #
+        def add_dsts dsts
+            dsts.split(Iotas::LINK_SEP).each do |dst|
+                if dst.empty? or dst[0]==Iotas::PATH_SEP or dst[0]==Iotas::PATH_SEP  or dst=~/\/\?/\
+                    or dst=~/\/{2,}/ or dst=~/\s+/ or dst==Iotas::ACT_SEP
+                    raise Iotas::Exception.new "destination #{dst} is not acceptable"
+                end
+                @dsts << dst
+            end
+        end
+        #
+        def set_dst! a, d=''
+            @dst = @room = @door = @action = nil
+            clear_dsts!
+            add_dsts d+Iotas::ACT_SEP+a
+        end
+        #
+        def split_dst!
+            @dst = @room = @door = @action = nil
+            return if (n = next_dst).nil?
+            p, @action = n.split Iotas::ACT_SEP
+            i = p.rindex Iotas::PATH_SEP
+            if i.nil?
+                @room = nil
+                @door = p
+            else
+                @room = p[0..i-1]
+                @door = p[i+1..-1]
+            end
+            @door = nil if @door.empty?
+        end
+        #
+        def dst_routed! dst
+            @dst = dst
+            @dsts.shift
+        end
+        #
+        def error! e, dst=nil
+            @action = Iotas::ACT_ERROR
+            @dst = dst||@src
+            @payload[Iotas::FIELD_ERROR_MSG]=e
+        end
+        #
+        def apply_link! lnk
+            @src = lnk.door
+            clear_dsts!
+            add_dsts lnk.dsts
+            set_link_fields lnk.fields
+        end
+        #
+        # data manipulation
+        #
+        def []=  k, v
+            @payload[k]=v
+            compute_link_value! if @link_fields.include? k
+        end
+        #
+        def set_data k, v
+            @payload[k] = v
+            compute_link_value! if @link_fields.include? k
+        end
+        #
+        def []  k
+            @payload[k]
+        end
+        #
+        def get_data k
+            @payload[k]
+        end
+        alias :data :get_data
+        #
+        def clone_data p
+            @payload = p.payload.clone
+        end
+        #
+        # link value and fields
+        #
+        def set_link_fields *args
+            @link_fields.clear if not @link_fields.empty?
+            args.compact!
+            args.each do |lfs|
+                lfs.split(',').each do |lf|
+                    @link_fields << lf
+                end
+            end
+            compute_link_value!
+        end
+        #
+        def compute_link_value!
+            @link_value = @link_fields.inject('') { |s,lf| s+=@payload[lf].to_s if @payload[lf]; s }
+        end
+        #
+        # merge particles management
+        #
+        def merge! p
+            @merged << p
+        end
+        #
+        def merged i
+            @merged[i]
+        end
+        #
+        def merged_shift
+            @merged.shift
+        end
+        #
+        def clear_merged!
+            @merged.clear
+        end
+        #
+    end
+    #
+end
+#
+# EOF