r2corba 1.4.1-x86-mingw32 → 1.5.1-x86-mingw32

data/lib/corba/cbase/Values.rb

@@ -1,129 +1,129 @@
-#--------------------------------------------------------------------
-# Values.rb - C++/Value CORBA Value and ValueBox support
-#
-# Author: Martin Corino
-#
-# This program is free software; you can redistribute it and/or
-# modify it under the terms of the R2CORBA LICENSE which is
-# included with this program.
-#
-# Copyright (c) Remedy IT Expertise BV
-# Chamber of commerce Rotterdam nr.276339, The Netherlands
-#--------------------------------------------------------------------
-
-module R2CORBA
-  module CORBA
-    module AbstractValueBase
-      def self.included(mod)
-        mod.module_eval do
-          def self.===(obj)
-            obj.kind_of?(self)
-          end
-        end
-      end
-    end
-    module ValueBase
-      def self.included(mod)
-        mod.module_eval do
-          include CORBA::AbstractValueBase unless self.include?(CORBA::AbstractValueBase)
-
-          alias :org_kind_of? :kind_of?
-          def kind_of?(mod)
-            if mod < CORBA::AbstractValueBase && mod.const_defined?(:Intf)
-              org_kind_of?(mod::Intf)
-              #super(mod::Intf)   ## problematic with Ruby 1.9.2 (known bug)
-            else
-              org_kind_of?(mod)
-              #super              ## problematic with Ruby 1.9.2 (known bug)
-            end
-          end
-          alias :is_a? :kind_of?
-        end
-      end
-
-      def _marshal_with(os, &block)
-        self.pre_marshal(os)
-        self.instance_eval(&block)
-        self.post_marshal(os)
-      end
-
-      def _unmarshal_with(is, &block)
-        self.pre_unmarshal(is)
-        self.instance_eval(&block)
-        self.post_unmarshal(is)
-      end
-    end # ValueBase
-
-    module Portable
-      class ValueFactoryBase
-
-        def self.inherited(value_factory_base)
-          # value_factory_base is the <valuetype>Factory base class
-          # generated from IDL
-          value_factory_base.module_eval do
-            def self.value_id
-              self::VALUE_ID
-            end
-          end
-        end
-
-        def self._check_factory
-          f = self._lookup_value_factory(self.value_id)
-          self._register_value_factory(self.value_id(), self.new) if f.nil?
-        end
-
-      end # ValueFactoryBase
-
-      module CustomValueBase
-        def self.included(mod)
-          mod.module_eval do
-            include CORBA::ValueBase unless self.include?(CORBA::ValueBase)
-
-            def do_marshal(os)
-              self.pre_marshal(os)
-              self.marshal(os)
-              self.post_marshal(os)
-            end
-
-            def do_unmarshal(is)
-              self.pre_unmarshal(is)
-              self.unmarshal(is)
-              self.post_unmarshal(is)
-            end
-          end
-        end
-      end # CustomValueBase
-
-      module BoxedValueBase
-        class FactoryBase < CORBA::Portable::ValueFactoryBase
-          ## generic factory base
-        end
-        def self.included(mod)
-          mod.module_eval do
-            include CORBA::ValueBase unless self.include?(CORBA::ValueBase)
-
-            def marshal(os)
-              os.write_member(self.class._tc.content_type.resolved_tc, self.value)
-            end
-
-            def unmarshal(is)
-              self.value = is.read_member(self.class._tc.content_type.resolved_tc)
-            end
-
-            self.const_set(:Factory, Class.new(CORBA::Portable::BoxedValueBase::FactoryBase))
-            self::Factory.class_eval(%Q{
-              def self.value_id
-                #{self.name}::TRUNCATABLE_IDS.first
-              end
-
-              def _create_default
-                #{self.name}.new
-              end
-            })
-          end
-        end
-      end
-
-    end # Portable
-  end # CORBA
-end # R2CORBA
+#--------------------------------------------------------------------
+# Values.rb - C++/Value CORBA Value and ValueBox support
+#
+# Author: Martin Corino
+#
+# This program is free software; you can redistribute it and/or
+# modify it under the terms of the R2CORBA LICENSE which is
+# included with this program.
+#
+# Copyright (c) Remedy IT Expertise BV
+# Chamber of commerce Rotterdam nr.276339, The Netherlands
+#--------------------------------------------------------------------
+
+module R2CORBA
+  module CORBA
+    module AbstractValueBase
+      def self.included(mod)
+        mod.module_eval do
+          def self.===(obj)
+            obj.kind_of?(self)
+          end
+        end
+      end
+    end
+    module ValueBase
+      def self.included(mod)
+        mod.module_eval do
+          include CORBA::AbstractValueBase unless self.include?(CORBA::AbstractValueBase)
+
+          alias :org_kind_of? :kind_of?
+          def kind_of?(mod)
+            if mod < CORBA::AbstractValueBase && mod.const_defined?(:Intf)
+              org_kind_of?(mod::Intf)
+              #super(mod::Intf)   ## problematic with Ruby 1.9.2 (known bug)
+            else
+              org_kind_of?(mod)
+              #super              ## problematic with Ruby 1.9.2 (known bug)
+            end
+          end
+          alias :is_a? :kind_of?
+        end
+      end
+
+      def _marshal_with(os, &block)
+        self.pre_marshal(os)
+        self.instance_eval(&block)
+        self.post_marshal(os)
+      end
+
+      def _unmarshal_with(is, &block)
+        self.pre_unmarshal(is)
+        self.instance_eval(&block)
+        self.post_unmarshal(is)
+      end
+    end # ValueBase
+
+    module Portable
+      class ValueFactoryBase
+
+        def self.inherited(value_factory_base)
+          # value_factory_base is the <valuetype>Factory base class
+          # generated from IDL
+          value_factory_base.module_eval do
+            def self.value_id
+              self::VALUE_ID
+            end
+          end
+        end
+
+        def self._check_factory
+          f = self._lookup_value_factory(self.value_id)
+          self._register_value_factory(self.value_id(), self.new) if f.nil?
+        end
+
+      end # ValueFactoryBase
+
+      module CustomValueBase
+        def self.included(mod)
+          mod.module_eval do
+            include CORBA::ValueBase unless self.include?(CORBA::ValueBase)
+
+            def do_marshal(os)
+              self.pre_marshal(os)
+              self.marshal(os)
+              self.post_marshal(os)
+            end
+
+            def do_unmarshal(is)
+              self.pre_unmarshal(is)
+              self.unmarshal(is)
+              self.post_unmarshal(is)
+            end
+          end
+        end
+      end # CustomValueBase
+
+      module BoxedValueBase
+        class FactoryBase < CORBA::Portable::ValueFactoryBase
+          ## generic factory base
+        end
+        def self.included(mod)
+          mod.module_eval do
+            include CORBA::ValueBase unless self.include?(CORBA::ValueBase)
+
+            def marshal(os)
+              os.write_member(self.class._tc.content_type.resolved_tc, self.value)
+            end
+
+            def unmarshal(is)
+              self.value = is.read_member(self.class._tc.content_type.resolved_tc)
+            end
+
+            self.const_set(:Factory, Class.new(CORBA::Portable::BoxedValueBase::FactoryBase))
+            self::Factory.class_eval(%Q{
+              def self.value_id
+                #{self.name}::TRUNCATABLE_IDS.first
+              end
+
+              def _create_default
+                #{self.name}.new
+              end
+            })
+          end
+        end
+      end
+
+    end # Portable
+  end # CORBA
+end # R2CORBA

data/lib/corba/cbase/exception.rb

@@ -1,66 +1,66 @@
-#--------------------------------------------------------------------
-# exception.rb - C++/TAO ORB specific CORBA Exception definitions
-#
-# Author: Martin Corino
-#
-# This program is free software; you can redistribute it and/or
-# modify it under the terms of the R2CORBA LICENSE which is
-# included with this program.
-#
-# Copyright (c) Remedy IT Expertise BV
-# Chamber of commerce Rotterdam nr.276339, The Netherlands
-#--------------------------------------------------------------------
-
-# import all java CORBA exceptions into the R2CORBA::CORBA namespace
-module R2CORBA
-  module CORBA
-
-    class Exception
-      def self.native2r(nex)
-        raise nex
-      end
-    end
-
-    class InternalError
-      def initialize(ex_or_str)
-        if ex_or_str.is_a?(String)
-          super(ex_or_str)
-        else
-          @ex_ = ex_or_str
-          super(@ex_.message)
-          self.set_backtrace(@ex_.backtrace)
-        end
-      end
-    end
-
-    class SystemException
-      def SystemException._raise(id, reason, minor, completed)
-        name = id.to_s.split(':')[1]
-        exklass = name.split('/').last
-        exklass = CORBA.const_defined?(exklass) ? CORBA.const_get(exklass) : nil
-        if exklass.nil? || !(CORBA::SystemException > exklass)
-          Kernel.raise InternalError,
-                "Unknown SystemException raised: " +
-                id.to_s+' ['+reason.to_s+']'
-        else
-          Kernel.raise exklass.new(reason,minor,completed)
-        end
-      end
-      def initialize(reason="", minor=0, completed=nil)
-        super(reason)
-        @minor = minor
-        @completed = completed
-        @ids = [self.class::Id]
-      end
-      attr_accessor :ids
-      def _ids; @ids; end
-      def _interface_repository_id
-        self.class::Id
-      end
-    end
-
-  end # CORBA
-end # R2CORBA
-
-# NativeException mockup for JRuby compatibility
-NativeException = Exception
+#--------------------------------------------------------------------
+# exception.rb - C++/TAO ORB specific CORBA Exception definitions
+#
+# Author: Martin Corino
+#
+# This program is free software; you can redistribute it and/or
+# modify it under the terms of the R2CORBA LICENSE which is
+# included with this program.
+#
+# Copyright (c) Remedy IT Expertise BV
+# Chamber of commerce Rotterdam nr.276339, The Netherlands
+#--------------------------------------------------------------------
+
+# import all java CORBA exceptions into the R2CORBA::CORBA namespace
+module R2CORBA
+  module CORBA
+
+    class Exception
+      def self.native2r(nex)
+        raise nex
+      end
+    end
+
+    class InternalError
+      def initialize(ex_or_str)
+        if ex_or_str.is_a?(String)
+          super(ex_or_str)
+        else
+          @ex_ = ex_or_str
+          super(@ex_.message)
+          self.set_backtrace(@ex_.backtrace)
+        end
+      end
+    end
+
+    class SystemException
+      def SystemException._raise(id, reason, minor, completed)
+        name = id.to_s.split(':')[1]
+        exklass = name.split('/').last
+        exklass = CORBA.const_defined?(exklass) ? CORBA.const_get(exklass) : nil
+        if exklass.nil? || !(CORBA::SystemException > exklass)
+          Kernel.raise InternalError,
+                "Unknown SystemException raised: " +
+                id.to_s+' ['+reason.to_s+']'
+        else
+          Kernel.raise exklass.new(reason,minor,completed)
+        end
+      end
+      def initialize(reason="", minor=0, completed=nil)
+        super(reason)
+        @minor = minor
+        @completed = completed
+        @ids = [self.class::Id]
+      end
+      attr_accessor :ids
+      def _ids; @ids; end
+      def _interface_repository_id
+        self.class::Id
+      end
+    end
+
+  end # CORBA
+end # R2CORBA
+
+# NativeException mockup for JRuby compatibility
+NativeException = Exception

data/lib/corba/cbase/poa.rb

@@ -1,23 +1,23 @@
-#--------------------------------------------------------------------
-# poa.rb - C++/TAO R2CORBA POA loader
-#
-# Author: Martin Corino
-#
-# This program is free software; you can redistribute it and/or
-# modify it under the terms of the R2CORBA LICENSE which is
-# included with this program.
-#
-# Copyright (c) Remedy IT Expertise BV
-# Chamber of commerce Rotterdam nr.276339, The Netherlands
-#--------------------------------------------------------------------
-
-require 'corba/common/Servant.rb'
-require 'corba/idl/POAC.rb'
-require 'corba/idl/IORTableC'
-
-begin
-  require RUBY_PLATFORM =~ /mingw32/ ? "librpoaw" : "librpoa"
-rescue LoadError
-  $stderr.puts $!.to_s if $VERBOSE
-  raise
-end
+#--------------------------------------------------------------------
+# poa.rb - C++/TAO R2CORBA POA loader
+#
+# Author: Martin Corino
+#
+# This program is free software; you can redistribute it and/or
+# modify it under the terms of the R2CORBA LICENSE which is
+# included with this program.
+#
+# Copyright (c) Remedy IT Expertise BV
+# Chamber of commerce Rotterdam nr.276339, The Netherlands
+#--------------------------------------------------------------------
+
+require 'corba/common/Servant.rb'
+require 'corba/idl/POAC.rb'
+require 'corba/idl/IORTableC'
+
+begin
+  require RUBY_PLATFORM =~ /mingw32/ ? "librpoaw" : "librpoa"
+rescue LoadError
+  $stderr.puts $!.to_s if $VERBOSE
+  raise
+end

data/lib/corba/cbase/policies.rb

@@ -1,78 +1,78 @@
-#--------------------------------------------------------------------
-# policies.rb - C++/TAO R2CORBA Policy support loader
-#
-# Author: Martin Corino
-#
-# This program is free software; you can redistribute it and/or
-# modify it under the terms of the R2CORBA LICENSE which is
-# included with this program.
-#
-# Copyright (c) Remedy IT Expertise BV
-# Chamber of commerce Rotterdam nr.276339, The Netherlands
-#--------------------------------------------------------------------
-require 'corba/idl/TAO_ExtC'
-
-begin
-  require RUBY_PLATFORM =~ /mingw32/ ? "librpolw" : "librpol"
-rescue LoadError
-  $stderr.puts $!.to_s if $VERBOSE
-  raise
-end
-
-module R2CORBA
-
-  module CORBA
-
-    module ORB
-      def create_policy(type, val)
-        raise CORBA::BAD_PARAM.new('Any expected',0,CORBA::COMPLETED_NO) unless CORBA::Any === val
-        begin
-          self.orb_.create_policy(type.to_i, val)
-        rescue ::NativeException
-          CORBA::Exception.native2r($!)
-        end
-      end
-    end # ORB
-
-    module Object
-      def _get_policy(policy_type)
-        raise CORBA::INV_OBJREF.new if self._is_nil?()
-        begin
-          pol = self.objref_._get_policy(policy_type)
-        rescue ::NativeException
-          CORBA::Exception.native2r($!)
-        end
-        raise CORBA::INV_POLICY if CORBA.is_nil(pol) # provide spec compliance
-      end
-
-      def _set_policy_overrides(policies, set_add)
-        raise CORBA::INV_OBJREF.new if self._is_nil?()
-        begin
-          CORBA::Object._wrap_native(self.objref_._set_policy_overrides(policies, set_add))
-        rescue ::NativeException
-          CORBA::Exception.native2r($!)
-        end
-      end
-
-      def _get_policy_overrides(types)
-        raise CORBA::INV_OBJREF.new if self._is_nil?()
-        begin
-          self.objref_._get_policy_overrides(types)
-        rescue ::NativeException
-          CORBA::Exception.native2r($!)
-        end
-      end
-
-      def _validate_connection(inconsistent_policies)
-        raise CORBA::INV_OBJREF.new if self._is_nil?()
-        begin
-          self.objref_._validate_connection(inconsistent_policies)
-        rescue ::NativeException
-          CORBA::Exception.native2r($!)
-        end
-      end
-    end # Object
-
-  end # CORBA
-
+#--------------------------------------------------------------------
+# policies.rb - C++/TAO R2CORBA Policy support loader
+#
+# Author: Martin Corino
+#
+# This program is free software; you can redistribute it and/or
+# modify it under the terms of the R2CORBA LICENSE which is
+# included with this program.
+#
+# Copyright (c) Remedy IT Expertise BV
+# Chamber of commerce Rotterdam nr.276339, The Netherlands
+#--------------------------------------------------------------------
+require 'corba/idl/TAO_ExtC'
+
+begin
+  require RUBY_PLATFORM =~ /mingw32/ ? "librpolw" : "librpol"
+rescue LoadError
+  $stderr.puts $!.to_s if $VERBOSE
+  raise
+end
+
+module R2CORBA
+
+  module CORBA
+
+    module ORB
+      def create_policy(type, val)
+        raise CORBA::BAD_PARAM.new('Any expected',0,CORBA::COMPLETED_NO) unless CORBA::Any === val
+        begin
+          self.orb_.create_policy(type.to_i, val)
+        rescue ::NativeException
+          CORBA::Exception.native2r($!)
+        end
+      end
+    end # ORB
+
+    module Object
+      def _get_policy(policy_type)
+        raise CORBA::INV_OBJREF.new if self._is_nil?()
+        begin
+          pol = self.objref_._get_policy(policy_type)
+        rescue ::NativeException
+          CORBA::Exception.native2r($!)
+        end
+        raise CORBA::INV_POLICY if CORBA.is_nil(pol) # provide spec compliance
+      end
+
+      def _set_policy_overrides(policies, set_add)
+        raise CORBA::INV_OBJREF.new if self._is_nil?()
+        begin
+          CORBA::Object._wrap_native(self.objref_._set_policy_overrides(policies, set_add))
+        rescue ::NativeException
+          CORBA::Exception.native2r($!)
+        end
+      end
+
+      def _get_policy_overrides(types)
+        raise CORBA::INV_OBJREF.new if self._is_nil?()
+        begin
+          self.objref_._get_policy_overrides(types)
+        rescue ::NativeException
+          CORBA::Exception.native2r($!)
+        end
+      end
+
+      def _validate_connection(inconsistent_policies)
+        raise CORBA::INV_OBJREF.new if self._is_nil?()
+        begin
+          self.objref_._validate_connection(inconsistent_policies)
+        rescue ::NativeException
+          CORBA::Exception.native2r($!)
+        end
+      end
+    end # Object
+
+  end # CORBA
+
 end # R2CORBA