open_ehr 0.6.1 → 0.9.0

data/Gemfile

@@ -6,9 +6,17 @@ gem 'locale'
 gem 'builder'
 gem 'jeweler'
 gem 'i18n'
+gem 'treetop'
+gem 'polyglot'
+gem 'rdoc'
 
-group :development do
+group :development, :test do
   gem 'rspec'
   gem 'guard-rspec'
-  gem 'spork'
+  gem 'ruby-debug19'
+  gem 'spork', '>=0.9.0.rc2'
+  gem 'guard-spork'
+  gem 'simplecov'
+  gem 'rb-inotify'
+  gem 'libnotify'
 end

data/Gemfile.lock

@@ -1,32 +1,64 @@
 GEM
   remote: http://rubygems.org/
   specs:
-    activesupport (3.0.7)
+    activesupport (3.1.0)
+      multi_json (~> 1.0)
+    archive-tar-minitar (0.5.2)
     builder (3.0.0)
-    diff-lcs (1.1.2)
+    columnize (0.3.4)
+    diff-lcs (1.1.3)
+    ffi (1.0.9)
     git (1.2.5)
-    guard (0.3.4)
+    guard (0.7.0)
       thor (~> 0.14.6)
-    guard-rspec (0.3.1)
+    guard-rspec (0.4.5)
+      guard (>= 0.4.0)
+    guard-spork (0.2.1)
       guard (>= 0.2.2)
-    i18n (0.5.0)
-    jeweler (1.6.0)
-      bundler (~> 1.0.0)
+      spork (>= 0.8.4)
+    i18n (0.6.0)
+    jeweler (1.6.4)
+      bundler (~> 1.0)
       git (>= 1.2.5)
       rake
+    libnotify (0.5.7)
+    linecache19 (0.5.12)
+      ruby_core_source (>= 0.1.4)
     locale (2.0.5)
-    rake (0.8.7)
-    rspec (2.5.0)
-      rspec-core (~> 2.5.0)
-      rspec-expectations (~> 2.5.0)
-      rspec-mocks (~> 2.5.0)
-    rspec-core (2.5.2)
-    rspec-expectations (2.5.0)
+    multi_json (1.0.3)
+    polyglot (0.3.2)
+    rake (0.9.2)
+    rb-inotify (0.8.6)
+      ffi (>= 0.5.0)
+    rdoc (3.9.4)
+    rspec (2.6.0)
+      rspec-core (~> 2.6.0)
+      rspec-expectations (~> 2.6.0)
+      rspec-mocks (~> 2.6.0)
+    rspec-core (2.6.4)
+    rspec-expectations (2.6.0)
       diff-lcs (~> 1.1.2)
-    rspec-mocks (2.5.0)
-    spork (0.8.4)
+    rspec-mocks (2.6.0)
+    ruby-debug-base19 (0.11.25)
+      columnize (>= 0.3.1)
+      linecache19 (>= 0.5.11)
+      ruby_core_source (>= 0.1.4)
+    ruby-debug19 (0.11.6)
+      columnize (>= 0.3.1)
+      linecache19 (>= 0.5.11)
+      ruby-debug-base19 (>= 0.11.19)
+    ruby_core_source (0.1.5)
+      archive-tar-minitar (>= 0.5.2)
+    simplecov (0.5.3)
+      multi_json (~> 1.0.3)
+      simplecov-html (~> 0.5.3)
+    simplecov-html (0.5.3)
+    spork (0.9.0.rc9)
     thor (0.14.6)
-    xml-simple (1.0.15)
+    treetop (1.4.10)
+      polyglot
+      polyglot (>= 0.3.1)
+    xml-simple (1.1.0)
 
 PLATFORMS
   ruby
@@ -35,9 +67,17 @@ DEPENDENCIES
   activesupport
   builder
   guard-rspec
+  guard-spork
   i18n
   jeweler
+  libnotify
   locale
+  polyglot
+  rb-inotify
+  rdoc
   rspec
-  spork
+  ruby-debug19
+  simplecov
+  spork (>= 0.9.0.rc2)
+  treetop
   xml-simple

data/Guardfile

@@ -2,8 +2,9 @@ guard 'rspec' do
   watch(%r{^spec/.+_spec\.rb})
   watch(%r{^lib/(.+)\.rb})     { |m| "spec/lib/#{m[1]}_spec.rb" }
   watch('spec/spec_helper.rb') { "spec" }
+  watch(%r{^lib/open_ehr/parser/.+\.tt}) { "spec/lib/open_ehr/parser" }
 end
 
-guard 'spork' do
+guard 'spork', :wait => 30, :cucumber => false do
   watch('spec/spec_helper.rb')
 end

data/History.txt

@@ -1,4 +1,11 @@
-=== 0.0.1 2011-04-26
+=== 0.6.1 2011-05-09
+
+* First gem package release
+
+=== 0.6.2 2011-05-09
+* Fixed some package hierachy
+
+=== 0.7.0 2011-05
+* Fixed ADL parser library
+
 
-* 1 major enhancement:
-  * Initial release

data/Manifest.txt

@@ -1,16 +1,14 @@
+Gemfile
+Guardfile
 History.txt
 Manifest.txt
 PostInstall.txt
 README.rdoc
 Rakefile
-bin/open_ehr
+VERSION
 lib/open_ehr.rb
 lib/open_ehr/cli.rb
-script/console
-script/destroy
-script/generate
 spec/open_ehr_cli_spec.rb
 spec/open_ehr_spec.rb
 spec/spec.opts
 spec/spec_helper.rb
-tasks/rspec.rake

data/README.rdoc

@@ -5,62 +5,66 @@ Ruby openEHR implementation project.
 
 = Version
 
-Release-0.6.0
+Release-0.9.0b
 
 = Requirements
 
-* Ruby 1.8.7 or higher, 1.9.2 reccomended
+* Ruby 1.9.2 reccomended
 * RubyGems
 * Tested with Ruby 1.9.2 on Linux and FreeBSD.
-* If you use Ruby 1.6, you should prepare racc 
-  runtime environment and some adjustment
+* If you use early version of Ruby 1.8, you should
+  prepare racc runtime environment and some
+  adjustment. We do not support Ruby 1.6 anymore.
 * It should work on other platforms with Ruby
   support as well.
 
 == DESCRIPTION:
 
- This is the version 0.6.0 release of Ruby openEHR implementation
+This is the beta version 0.9.0 release of Ruby openEHR implementation
 project. This release is still experimental preview of our work based
-on openEHR specification release 1.0.2. We implemented almost half of
-the specifications of the openEHR.  The work is still in progress. The
-intention is to have complete implementation of openEHR Reference
-Model and some of the Archetype Object Models, with support for
-archetype based object creation and validation.
+on openEHR specification release 1.0.2. We implemented almost of the
+specifications of the openEHR.  The work is still in progress. The
+intention is to have a sample EHR to utilize all over the world
+quickly with Ruby on Rails.
 
-Parser and Seriarizer are also primitive, we are challanging to
-descrive archetype as another formalism such as YAML, instead of ADL.
+Parser is nearly performing completely. We now consider to descrive
+archetype as another formalism such as YAML, instead of ADL.
 
-Almost all classes passed the test constructed by rspec or
-test/unit. This test cases are under /spec.
+Almost all classes passed the test constructed by rspec2 (formaly used
+test/unit). These test specification are under /spec.
 
-Some specifications are not well determined yet, such as
-rm/security and so on. We postponed to implement such
-classes.
+Some specifications are not well determined yet, such as rm/security
+and so on. We postponed to implement such classes.
 
-Terminology and Demographic server will be implemented in
-other project.
+Terminology and Demographic server will be implemented in other
+project.
 
 = Authors
 Akimichi Tatsukawa, Shinji Kobayashi
+
 openEHR.jp, <http://openehr.jp>
 
 = Copyright
-The software, including all files in this directory 
-and subdirectories is copyrighted to the original 
-authors and contributors, 2008
+The software, including all files in this directory and
+subdirectories is copyrighted to the original authors and
+contributors, 2011.
+
 All Rights Reserved.
 
 = License
 
 This product is under openEHR Open Source Software License
 
-The openEHR Foundation uses the Mozilla Tri-license 1.1 on
-all software copyrighted to the Foundation. This licence
-essentially provides the user a choice of licence conditions
-under which to operate with any given piece of software,
-being: the Mozilla Public licence (MPL), and the Free
-Software Foundation GNU General Public Licence (GPL) and
-Lesser GNU General Public Licence (LGPL). See the Mozilla
-relicensing FAQ for details of this license. This in no way
-constrains the way in which software created by other
-organisations is licenced.  
+The openEHR Foundation has used the Mozilla Tri-license 1.1 on all
+software copyrighted to the Foundation. Therefore, we release this
+product under Mozilla Tri-license at now, but the openEHR foundation
+is discussing about lincense for the resouces. We would change our
+license for this package after the decision. The Mozilla tri-licence
+essentially provides the user a choice of licence conditionsunder
+which to operate with any given piece of software, being: the Mozilla
+Public licence (MPL), and the Free Software Foundation GNU General
+Public Licence (GPL) and Lesser GNU General Public Licence (LGPL). See
+the Mozilla relicensing FAQ for details of this license. This in no
+way constrains the way in which software created by other
+organisations is licenced.
+

data/Rakefile

@@ -38,7 +38,7 @@ end
 
 task :default => :spec
 
-require 'rake/rdoctask'
+require 'rdoc/task'
 Rake::RDocTask.new do |rdoc|
   version = File.exist?('VERSION') ? File.read('VERSION') : ""
 

data/VERSION

@@ -1 +1 @@
-0.6.1
+0.9.0

data/bin/adl_validator.rb

@@ -0,0 +1,84 @@
+#!/usr/bin/env ruby
+require 'rubygems'
+require "adl_parser"
+require 'readline'
+require 'optparse'
+require 'net/http'
+
+module OpenEhr
+  module CommandLine
+    class Arguments < Hash
+      def initialize(args)
+        super() # default values
+        opts = ::OptionParser.new do |opts|
+          opts.banner = "Usage: #$0 [file|http://location.to.adl]* [options]"
+          opts.on('-v', '--verbose', 'display verbose message(Not Implemented Yet)') do
+            self[:verbose] = true
+          end
+          opts.on_tail('-h', '--help', 'display this help') do
+            puts opts
+            exit
+          end
+        end
+        opts.parse!(args)
+      end
+    end
+
+    class ADLValidator
+      def initialize(arguments)
+        @debug = false
+        @adl_validator = ::OpenEHR::Application::ADLValidator.new(::OpenEHR::ADL::Validator.new(::OpenEHR::ADL::Parser.new))
+      end
+
+      def run
+        while argv = ARGV.shift
+          begin
+            input = nil
+            name = nil
+            case argv
+            when /\A(http:\/\/.*)/
+              name = $1
+              input = case response = Net::HTTP.get_response(Uri.parse($1))
+                      when Net::HTTPSuccess   
+                        response.body
+                      when Net::HTTPRedirection
+                        name = response['location']
+                        fetch(response['location'], limit - 1)
+                      else
+                        response.error!
+                      end
+            when /\A("[^"]*)"/
+              name = argv
+              input = argv
+            else # assumes file name
+              name = argv
+              input = File.new(argv)
+            end
+            @adl_validator.run(input, name)
+          rescue SocketError => message
+            puts "SocketError: #{message}"
+          rescue Racc::ParseError => message
+            puts "ParseError: #{message}"
+          else
+            puts "Accepted '#{argv}'"
+          ensure
+#            input.close if input.kind_of? IO
+          end
+        end
+      end
+    end
+  end # of CommandLine
+end # of OpenEHR
+
+if __FILE__ == $0
+  begin
+    arguments = OpenEhr::CommandLine::Arguments.new(ARGV)
+    validator = OpenEhr::CommandLine::ADLValidator.new(arguments)
+    validator.run
+  end
+end
+
+
+
+
+

data/lib/open_ehr/am/archetype/constraint_model/primitive.rb

@@ -5,19 +5,21 @@ module OpenEHR
       module ConstraintModel
         module Primitive
           class CPrimitive
-            attr_reader :default_value
-            attr_accessor :assumed_value
+            attr_reader :type
+            attr_accessor :assumed_value, :default_value
 
             def initialize(args = { })
               self.default_value = args[:default_value]
               self.assumed_value = args[:assumed_value]
+              self.type = args[:type]
+              @type ||= 'ANY'
             end
 
-            def default_value=(default_value)
-              if default_value.nil?
-                raise ArgumentError, 'default_value is mandatory'
+            def type=(type)
+              if !type.nil? && type.empty?
+                raise ArgumentError, 'type should not be empty'
               end
-              @default_value = default_value
+              @type = type
             end
 
             def has_assumed_value?
@@ -129,7 +131,9 @@ module OpenEHR
           end
 
           class CReal < CInteger
-
+            def initialize(args = { })
+              super
+            end
           end
 
           module CDateModule

data/lib/open_ehr/am/archetype/constraint_model.rb

@@ -89,11 +89,10 @@ module OpenEHR
           attr_reader :rm_type_name, :node_id, :occurrences
 
           def initialize(args = { })
-            super(args)
+            super
             self.rm_type_name = args[:rm_type_name]
             self.node_id = args[:node_id]
             self.occurrences = args[:occurrences]
-
           end
 
           def rm_type_name=(rm_type_name)
@@ -104,7 +103,7 @@ module OpenEHR
           end
 
           def node_id=(node_id)
-            if node_id.nil? || node_id.empty?
+            if !node_id.nil? && node_id.empty?
               raise ArgumentError, 'invalid node_id'
             end
             @node_id = node_id
@@ -145,7 +144,7 @@ module OpenEHR
           end
 
           def existence=(existence)
-            if existence.nil? || existence.lower < 0 || existence.upper > 1
+            if !existence.nil? && (existence.lower < 0 || existence.upper > 1)
               raise ArgumentError, 'invalid existence'
             end
             @existence = existence
@@ -309,29 +308,18 @@ module OpenEHR
           end
 
           def alternatives=(alternatives)
-            if alternatives.nil?
-              raise ArgumentError, 'alternatives are mandatory'
-            end
             @alternatives = alternatives
           end
         end
 
         class CMultipleAttribute < CAttribute
-          attr_accessor :members
-          attr_reader :cardinality
+          attr_accessor :members, :cardinality
           
           def initialize(args = { })
             super
             self.members = args[:members]
             self.cardinality = args[:cardinality]
           end
-
-          def cardinality=(cardinality)
-            if cardinality.nil?
-              raise ArgumentError, 'cardinality is mandatory'
-            end
-            @cardinality = cardinality
-          end
         end
       end # of ConstraintModel
     end # of Archetype

data/lib/open_ehr/am/archetype/ontology.rb

@@ -3,14 +3,16 @@ module OpenEHR
     module Archetype
       module Ontology
         class ArchetypeOntology
-          attr_accessor :constraint_definitions, :specialisation_depth
+          attr_accessor :specialisation_depth
           attr_accessor :term_attribute_names, :term_bindings
-          attr_reader :terminologies_available, :term_definitions
+          attr_reader :term_definitions, :constraint_definitions
 
           def initialize(args = { })
             self.specialisation_depth = args[:specialisation_depth]
             self.term_definitions = args[:term_definitions]
-            self.constraint_definitions = args[:constraint_definitions]
+            if args[:constraint_definitions]
+              self.constraint_definitions = args[:constraint_definitions]
+            end
             self.term_bindings = args[:term_bindings]
           end
 
@@ -18,6 +20,7 @@ module OpenEHR
             if term_definitions.nil?
               raise ArgumentError, 'term_definitions is mandatory'
             end
+            @term_definition_map = definition_mapper(term_definitions)
             @term_definitions = term_definitions
           end
 
@@ -40,21 +43,45 @@ module OpenEHR
           end
 
           def constraint_binding(a_terminology, a_code)
+            
+          end
+
+          def constraint_definitions=(constraint_definitions)
+            @constraint_definition_map = definition_mapper(constraint_definitions)
+            @constraint_definitions = constraint_definitions
           end
 
-          def constraint_definition(a_lang, a_code)
+          def constraint_definition(args = {})
+            return @constraint_definition_map[args[:lang]][args[:code]]
           end
 
           def has_language?(a_lang)
+            return @term_definition_map.has_key? a_lang
           end
 
           def has_terminology?(a_terminology)
+            return @term_bindings.has_key? a_terminology
+          end
+
+          def term_binding(args = { })
+            
           end
 
-          def term_binding(a_terminology, a_code)
+          def term_definition(args = { })
+            return @term_definition_map[args[:lang]][args[:code]]
           end
 
-          def term_definition(a_lang, a_code)
+          private
+          def definition_mapper(definitions)
+            map = { }
+            definitions.each do |lang, defs|
+              defs_map = { }
+              defs.each do |d|
+                defs_map[d.code] = d.items
+              end
+              map[lang] = defs_map
+            end
+            return map
           end
         end
 
@@ -85,6 +112,10 @@ module OpenEHR
               return Set.new(@items.keys)
             end
           end
+
+          def method_missing(key)
+            return @items[key.to_sym]
+          end
         end
 
         class ARCHETYPE_TERM < ArchetypeTerm

data/lib/open_ehr/am/archetype.rb

@@ -4,6 +4,10 @@ include OpenEHR::RM::Common::Resource
 module OpenEHR
   module AM
     module Archetype
+      autoload :Assertion, 'archetype/assertion'
+      autoload :ConstraintModel, 'archetype/constraint_model'
+      autoload :Ontology, 'archetype/ontology'
+
       module ADLDefinition
         include OpenEHR::RM::Support::Terminology
 #        include OpenEHR::RM::Support::Terminology::OpenEHR_Code_Set_Identifier
@@ -64,7 +68,7 @@ module OpenEHR
         end
 
         def concept_name(a_lang)
-          
+          return @ontology.term_definition(:lang => a_lang, :code => @concept)[:text]
         end
 
         def constraint_references_valid?
@@ -79,7 +83,7 @@ module OpenEHR
         def is_valid?
         end
 
-        def logical_paths(a_lang)          
+        def logical_paths(a_lang) 
         end
 
         def node_ids_vaild?
@@ -124,11 +128,6 @@ module OpenEHR
           @value = value
         end
       end
-
-      autoload :Assertion, 'archetype/assertion'
-      autoload :ConstraintModel, 'archetype/constraint_model'
-      autoload :Ontology, 'archetype/ontology'
-
     end # of Archetype
   end # of AM
 end # of OpenEHR

data/lib/open_ehr/am/open_ehr_profile/data_types/text.rb

@@ -1,6 +1,9 @@
-module OpenEhr
+$:.unshift(File.dirname(__FILE__)) unless
+  $:.include?(File.dirname(__FILE__)) || $:.include?(File.expand_path(File.dirname(__FILE__)))
+
+module OpenEHR
   module AM
-    module OpenEHR_Profile
+    module OpenEHRProfile
       module DataTypes
         module Text
           class C_CODE_PHASE < OpenEhr::AM::Archetype::Constraint_Model::C_DOMAIN_TYPE

data/lib/open_ehr/parser/adl.rb

@@ -0,0 +1,19 @@
+module OpenEHR
+  module Parser
+    module ADLGrammar
+      class Base < Treetop::Runtime::SyntaxNode
+
+      end
+
+      class ArchLanguage < Base
+        def original_language
+          lang.value[:original_language]
+        end
+
+        def translations
+          lang.value[:translations]
+        end
+      end
+    end
+  end
+end