soar_sr 0.1.3

data/lib/soar_sr/juddi_provider.rb

@@ -0,0 +1,172 @@
+require 'jsender'
+require 'soap4juddi'
+require 'persistent-cache'
+
+module SoarSr
+  class JUDDIProvider
+    def initialize(urns, broker, cache_freshness)
+      @urns = urns
+      @broker = broker
+      @cache = Persistent::Cache.new("uddi-broker", cache_freshness, Persistent::Cache::STORAGE_RAM)
+    end
+
+    def broker
+      @broker
+    end
+
+    def assign_service_to_business(name, business_key = @urns['company'])
+      @broker.authorize
+      result = get_service(name)
+      service = result['data']
+      @broker.save_service_element(service['name'], service['description'], service['definition'], @urns['services'], business_key)
+    end
+
+    def assign_service_component_to_business(name, business_key = @urns['company'])
+      @broker.authorize
+      result = get_service_component(name)
+      service = result['data']
+      @broker.save_service_element(service['name'], service['description'], service['definition'], @urns['service-components'], business_key)
+    end
+
+    def get_service(name)
+      cached = @cache["get_service:#{name}"]; return cached if cached
+      value = @broker.get_service_element(name, @urns['services'])
+      @cache["get_service:#{name}"] = value
+      value
+    end
+
+    def save_service(name, description = nil, definition = nil)
+      @broker.authorize
+      @broker.save_service_element(name, description.is_a?(Array) ? description : [description], definition, @urns['services'], @urns['company'])
+    end
+
+    def delete_service(name)
+      @broker.authorize
+      @broker.delete_service_element(name, @urns['services'])
+    end
+
+    def find_services(pattern = nil)
+      pattern = pattern.nil? ? '%' : "%#{pattern}%"
+
+      cached = @cache["find_services:#{pattern}"]; return cached if cached
+      value = @broker.find_services(pattern)
+      @cache["find_services:#{pattern}"] = value
+      value
+    end
+
+    def add_service_uri(service, uri)
+      result = remove_service_uri(service, uri)
+      result = save_service_uri(service, uri) if result['status'] == 'success'
+      result
+    end
+
+    def remove_service_uri(service, uri)
+      @broker.authorize
+      result = service_uris(service)
+      existing_id = has_existing_binding?(result['data']['bindings'], uri) if has_bindings?(result)
+      result = @broker.delete_binding(existing_id) if existing_id
+      result
+    end
+
+    def service_uris(service)
+      cached = @cache["service_uris:#{service}"]; return cached if cached
+      value = @broker.find_element_bindings(service, @urns['services'])
+      @cache["service_uris:#{service}"] = value
+      value
+    end
+
+    def get_service_component(name)
+      cached = @cache["get_service_component:#{name}"]; return cached if cached
+      value = @broker.get_service_element(name, @urns['service-components'])
+      @cache["get_service_component:#{name}"] = value
+      value
+    end
+
+    def save_service_component(name, description = nil, definition = nil)
+      @broker.authorize
+      @broker.save_service_element(name, description.is_a?(Array) ? description : [description], definition, @urns['service-components'], @urns['company'])
+    end
+
+    def delete_service_component(name)
+      @broker.authorize
+      @broker.delete_service_element(name, @urns['service-components'])
+    end
+
+    def find_service_components(pattern = nil)
+      pattern = pattern.nil? ? '%' : "%#{pattern}%"
+      cached = @cache["find_service_components:#{pattern}"]; return cached if cached
+
+      value = @broker.find_service_components(pattern)
+      @cache["find_service_components:#{pattern}"] = value
+      value
+    end
+
+    def save_service_component_uri(service_component, uri)
+      @broker.authorize
+      result = @broker.find_element_bindings(service_component, @urns['service-components'])
+      # only one binding for service components
+      delete_existing_bindings(result['data']['bindings']) if has_bindings?(result)
+      @broker.save_element_bindings(service_component, [uri], @urns['service-components'], "service component")
+    end
+
+    def delete_existing_bindings(bindings)
+      bindings.each do |binding, detail|
+        @broker.delete_binding(binding)
+      end
+    end
+
+    def find_service_component_uri(service_component)
+      cached = @cache["find_service_component_uri:#{service_component}"]; return cached if cached
+      value = @broker.find_element_bindings(service_component, @urns['service-components'])
+      @cache["find_service_component_uri:#{service_component}"] = value
+      value
+    end
+
+    def save_business(key, name, description = nil, contacts = nil)
+      @broker.authorize
+      @broker.save_business(key, name, description, contacts)
+    end
+
+    def get_business(key)
+      cached = @cache["get_business:#{key}"]; return cached if cached
+      value = @broker.get_business(key)
+      @cache["get_business:#{key}"] = value
+      value
+    end
+
+    def find_businesses(pattern = nil)
+      pattern = pattern.nil? ? '%' : "%#{pattern}%"
+      cached = @cache["find_businesses:#{pattern}"]; return cached if cached
+      value = @broker.find_business(pattern)
+      @cache["find_businesses:#{pattern}"] = value
+      value
+    end
+
+    def delete_business(key)
+      @broker.authorize
+      @broker.delete_business(key)
+    end
+
+    def business_eq?(business, comparison)
+      business == "#{@urns['domains']}#{comparison}"
+    end    
+
+    private
+
+    def has_bindings?(result)
+      result and result['data'] and result['data']['bindings'] and (result['data']['bindings'].size > 0)
+    end
+
+    def has_existing_binding?(bindings, uri)
+      bindings.each do |binding, detail|
+        return binding if detail['access_point'] == uri
+      end
+      nil
+    end
+
+    def save_service_uri(service, uri)
+      @broker.authorize
+      @broker.save_element_bindings(service, [uri], @urns['services'], "service uri") 
+    end
+  end
+end

data/lib/soar_sr/search.rb

@@ -0,0 +1,104 @@
+require 'jsender'
+require 'soap4juddi'
+
+module SoarSr
+  class Search < SoarSr::Handler
+    include Jsender
+    
+    def query_service_by_pattern(pattern)_{
+      provided?(pattern, 'pattern')
+      result = @uddi.find_services
+      list = {}        
+      if has_data?(result, 'services')
+        result['data']['services'].each do |service, name|
+          detail = @uddi.get_service(service)
+          if has_data?(detail, 'description')
+            found = false
+            dss = nil
+            detail['data']['description'].each do |description|
+              found = true if (description and description.include?(pattern))
+              dss = description.gsub("dss:", "").strip if (description and description.include?('dss:'))
+            end
+            list[service] = detail if ((dss and (@dss and check_dss(service))) or (not dss)) and found
+          end
+        end
+      end
+
+      success_data({ 'services' => list })
+    }end
+
+    def search_for_service_by_name(name)
+      search_for_service(name, false, false)
+    end
+
+    def search_for_service(pattern, include_service_components = true, full_text = true)_{
+      provided?(pattern, 'pattern') and length_at_least?(pattern, 4, 'pattern')
+
+      services = {}
+      service_components = {}
+      services_list = @uddi.find_services(pattern)['data']['services'] if not include_service_components
+      services_list, service_components_list = @registry.services.find_services_and_service_components(nil) if include_service_components
+      services_list.each do |service, detail|
+        service_name = extract_domain_name('services', service)
+        if full_text
+          data = @uddi.get_service(service)['data'] if full_text
+          if search_for_pattern_in_hash_values(data, pattern)
+            services[service_name] = data
+            services[service_name]['uris'] = @registry.services.service_uris(service_name)['data']['bindings']
+          end
+        else
+          if service_name == service
+            services[service_name] = detail
+            services[service_name]['uris'] = @registry.services.service_uris(service_name)['data']['bindings']
+          end
+        end
+      end
+      if (include_service_components)
+        service_components_list.each do |service_component, detail|
+          service_name = extract_domain_name('services-components', service_component)
+          if full_text
+            data = @uddi.get_service_component(service_component)['data']
+            service_components[service_name] = data if search_for_pattern_in_hash_values(data, pattern)
+          else
+            service_components[service_name] = detail if service_name == service_component
+          end
+        end
+      end
+      found = services.merge!(service_components)
+
+      success_data({'services' => found})
+    }end
+
+    def search_domain_perspective(domain_perspective, pattern)_{
+      provided?(domain_perspective, 'domain perspective') and registered?(domain_perspective, 'domain perspective')
+
+      found = {}
+      data = @registry.associations.domain_perspective_associations(domain_perspective)['data']['associations']
+      services = {}
+      service_components = {}
+      services_list = data['services']
+      service_components_list = data['service_components']
+      services_list.each do |service, detail|
+        data = @uddi.get_service(service)['data']
+        services[extract_domain_name('services', service)] = data if search_for_pattern_in_hash_values(data, pattern)
+      end
+      service_components_list.each do |service_component, detail|
+        data = @uddi.get_service_component(service_component)['data']
+        service_components[extract_domain_name('services-components', service_component)] = data if search_for_pattern_in_hash_values(data, pattern)
+      end
+      found = services.merge!(service_components)
+      success_data({'services' => found})
+    }end
+
+    private
+
+    def search_for_pattern_in_hash_values(data, pattern)
+      data.keys.each do |key|
+        value = data[key]
+        return true if (not value.is_a?(Hash)) and (value.to_s.include?(pattern))
+        return true if (value.is_a?(Hash)) and (search_for_pattern_in_hash_values(value, pattern))
+      end
+      return false
+    end
+  end
+end

data/lib/soar_sr/service_components.rb

@@ -0,0 +1,92 @@
+require 'jsender'
+require 'soap4juddi'
+
+module SoarSr
+  class ServiceComponents < SoarSr::Handler
+    include Jsender
+    
+    def delete_all_service_components()_{
+      authorize
+      result = list_service_components
+      if has_data?(result, 'service_components') 
+        result['data']['service_components'].each do |name, detail|
+          @uddi.delete_service_component(name)
+        end
+      end
+    }end
+
+    def list_service_components(domain_perspective = nil)_{
+      return fail('unknown domain perspective provided') if domain_perspective and (not is_registered?(@registry.domain_perspectives.domain_perspective_registered?(domain_perspective)))
+
+      result = @uddi.find_service_components
+      service_components = has_data?(result, 'services') ? result['data']['services'] : {}
+      found = []
+
+      if not domain_perspective.nil?
+        associations = @registry.associations.domain_perspective_associations(domain_perspective)['data']['associations']['service_components']
+        return success_data({'service_components' => []}) if associations.count == 0
+        
+        associations.each do |id, associated|
+          if associated
+            service_components.each do |sid, service_component|
+              found << sid if compile_domain_id('service-components', sid) == id
+            end
+          end
+        end
+      else
+        service_components.each do |sid, service_component|
+          found << sid
+        end
+      end
+
+      success_data('service_components' => found)
+    }end
+
+    def service_component_registered?(service_component)_{
+      result = @uddi.find_service_components(service_component)
+      registered = false
+      if has_data?(result, 'services')
+        result['data']['services'].each do |service_key, description|
+          registered = (service_component.downcase == service_key.downcase)
+        end
+      end
+      success_data({'registered' => registered})
+    }end
+
+    def register_service_component(service_component)_{
+        authorize
+        provided?(service_component, 'service component') and not_registered?(service_component, 'service component')
+
+        result = @uddi.save_service_component(service_component)
+        authorized?(result) and identifier?(result, 'service component')
+        success('service component registered')        
+    }end
+
+    def deregister_service_component(service_component)_{
+      # byebug
+      authorize
+      provided?(service_component, 'service component') and registered?(service_component, 'service component')
+      raise ValidationError, 'service component has domain perspective associations' if @registry.associations.service_component_has_domain_perspective_associations?(service_component)
+      result = @uddi.delete_service_component(service_component)
+      authorized?(result) and identifier?(result, 'service component')
+      success('service component deregistered') 
+    }end
+
+    def configure_service_component_uri(service_component, uri)_{
+      authorize
+      provided?(service_component, 'service component') and provided?(uri, 'URI') and uri?(uri) and registered?(service_component, 'service component')
+      result = @uddi.save_service_component_uri(service_component, uri)
+      authorized?(result) and identifier?(result, 'service component')
+      success
+    }end
+
+    def service_component_uri(service_component)_{
+      provided?(service_component, 'service component') and registered?(service_component, 'service component')
+      result = @uddi.find_service_component_uri(service_component)
+      identifier?(result, 'service component')
+      uri = (has_data?(result, 'bindings') and (result['data']['bindings'].size > 0)) ? result['data']['bindings'].first[1]['access_point'] : nil
+      result['data']['uri'] = uri
+      success_data(result['data'])
+    }end
+  end
+end

data/lib/soar_sr/service_definitions.rb

@@ -0,0 +1,39 @@
+require 'jsender'
+require 'soap4juddi'
+
+module SoarSr
+  class ServiceDefinitions < SoarSr::Handler
+    include Jsender
+    
+    def register_service_definition(service, definition)_{
+      authorize 
+      provided?(service, 'service') and registered?(service, 'service') and provided?(definition, 'service definition') and wadl?(definition)
+      result = @uddi.get_service(service)
+      service = result['data']
+      service['definition'] = definition
+      result = @uddi.save_service(service['name'], service['description'], service['definition'])
+      authorized?(result) and identifier?(result, 'service')
+      success('service definition registered')
+    }end
+
+    def service_definition_for_service(service)_{
+      # byebug
+      provided?(service, 'service') and registered?(service, 'service')
+      result = @uddi.get_service(service)['data']
+      identifier?(result, 'service')
+      return fail('service has no definition') if (result['definition'].nil?) or (result['definition'] == "")
+      success_data({'definition' => result['definition']})
+    }end
+
+    def deregister_service_definition(service)_{
+      authorize
+      provided?(service, 'service') and registered?(service, 'service')
+      result = @uddi.get_service(service)
+      service = result['data']
+      service['definition'] = ""
+      result = @uddi.save_service(service['name'], service['description'], service['definition'])
+      authorized?(result) and identifier?(result, 'service')
+      success('service definition deregistered')
+    }end
+  end
+end

data/lib/soar_sr/service_registry.rb

@@ -0,0 +1,71 @@
+require 'jsender'
+require 'soap4juddi'
+
+module SoarSr
+  class ServiceRegistry
+    attr_reader :services
+    attr_reader :service_definitions
+    attr_reader :service_components
+    attr_reader :domain_perspectives
+    attr_reader :teams
+    attr_reader :associations
+    attr_reader :search
+    attr_reader :broker
+    attr_reader :contacts
+
+    def initialize(uri, company, company_name, credentials, cache_freshness = 60)
+      @urns = initialize_urns(company, company_name)
+      @uddi = initialize_uddi_provider(uri, @urns, credentials, cache_freshness)
+      initialize_handlers(@urns, @uddi, credentials)
+    end
+
+    def check_dss(name)
+    end
+
+    private
+
+    def initialize_urns(fqdn, company_name)
+      base = "uddi:#{fqdn}"
+      @urns = { 'base' => base,
+                'company' => "#{base}:#{company_name}",
+                'domains' => "#{base}:domains-",
+                'teams' => "#{base}:teams-",
+                'services' => "#{base}:services:",
+                'service-components' => "#{base}:service-components:" }
+      @urns
+    end
+
+    def initialize_uddi_provider(uri, urns, credentials, cache_freshness)
+      @broker = ::Soap4juddi::Broker.new(urns)
+      @broker.set_uri(uri)
+      @uddi = ::SoarSr::JUDDIProvider.new(urns, @broker, cache_freshness)
+    end
+
+    def initialize_handlers(urns, uddi, credentials)
+      initialize_service_handlers(urns, uddi, credentials)
+      initialize_domain_handlers(urns, uddi, credentials)
+      initialize_associations_and_search(urns, uddi, credentials)
+      initialize_contacts(urns, uddi, credentials)
+    end    
+
+    def initialize_service_handlers(urns, uddi, credentials)
+      @services = SoarSr::Services.new(urns, uddi, credentials, self)
+      @service_definitions = SoarSr::ServiceDefinitions.new(urns, uddi, credentials, self)
+      @service_components = SoarSr::ServiceComponents.new(urns, uddi, credentials, self)
+    end
+
+    def initialize_domain_handlers(urns, uddi, credentials)
+      @domain_perspectives = SoarSr::DomainPerspectives.new(urns, uddi, credentials, self)
+      @teams = SoarSr::Teams.new(urns, uddi, credentials, self)
+    end
+
+    def initialize_associations_and_search(urns, uddi, credentials)
+      @associations = SoarSr::Associations.new(urns, uddi, credentials, self)
+      @search = SoarSr::Search.new(urns, uddi, credentials, self)
+    end      
+
+    def initialize_contacts(urns, uddi, credentials)
+      @contacts = SoarSr::Contacts.new(urns, uddi, credentials, self)
+    end      
+  end
+end

data/lib/soar_sr/services.rb

@@ -0,0 +1,157 @@
+require 'jsender'
+require 'soap4juddi'
+require 'json'
+require 'byebug'
+
+module SoarSr
+  class Services < SoarSr::Handler
+    include Jsender
+
+    def register_service(service, description = nil)_{
+      authorize
+      key_provided?(service, 'name', 'service') and not_registered?(service['name'], 'service')
+      result = @uddi.save_service(service['name'], extract_description_and_meta(service, description), service['definition'])
+      authorized?(result) and identifier?(result, 'service')
+      success('service registered')
+    }end
+
+    def deregister_service(service)_{
+      authorize
+      provided?(service, 'service') and registered?(service, 'service')
+      result = @uddi.delete_service(service)
+      authorized?(result) and identifier?(result, 'service')
+      success('service deregistered')
+    }end
+
+    def service_registered?(service)_{
+      registered = false
+      if present?(service)
+        result = @uddi.find_services(service)      
+        registered = find_matching_service(service, result) if has_data?(result, 'services')
+      end
+      success_data({'registered' => (registered ||= false)})
+    }end
+
+    def add_service_uri(service, uri)_{
+      authorize
+      provided?(service, 'service') and provided?(uri, 'URI') and uri?(uri) and registered?(service, 'service')
+      result = @uddi.add_service_uri(service, uri)
+      authorized?(result) and identifier?(result, 'service')
+      success
+    }end
+
+    def service_uris(service)_{
+      authorize
+      provided?(service, 'service') and registered?(service, 'service')
+      result = @uddi.service_uris(service)
+      authorized?(result) and identifier?(result, 'service')
+      success_data(result['data'])
+    }end
+
+    def remove_uri_from_service(service, uri)_{
+      authorize
+      provided?(service, 'service') and provided?(uri, 'URI') and uri?(uri) and registered?(service, 'service')
+      result = @uddi.remove_service_uri(service, uri)
+      authorized?(result) and identifier?(result, 'service')
+      success
+    }end
+
+    def configure_meta_for_service(service, meta)_{
+      authorize
+      provided?(service, 'service') and provided?(meta, 'meta') and meta?(meta) and registered?(service, 'service')
+
+      descriptions = merge_meta_with_service_descriptions(service, meta)
+      result = update_service_descriptions(service, descriptions)
+
+      authorized?(result) and identifier?(result, 'meta')
+      success('meta updated', result['data'])
+    }end
+
+    def meta_for_service(service)
+      provided?(service, "service") and registered?(service, 'service')
+        detail = @uddi.get_service(service)['data']
+        if detail['description']
+          detail['description'].each do |desc|
+            return JSON.parse(CGI.unescape(desc)) if (description_is_meta?(desc))
+          end
+        end
+        {}      
+    end
+
+    def service_by_name(name)_{
+      provided?(name, "service")
+      services = search_for_service(name)
+      return extract_service_by_name_from_services_list(services, name) if has_data?(services, 'services')
+      raise FailureErrorError, 'failure finding service by name'
+    }end
+
+    def find_services_and_service_components(pattern)
+      services = @uddi.find_services(pattern)['data']['services']
+      service_components = @uddi.find_service_components(pattern)['data']['services']
+      services ||= {}
+      service_components ||= {}
+      return services, service_components
+    end    
+
+    private
+
+    def update_service_descriptions(service, descriptions)
+      detail = @uddi.get_service(service)['data']
+      detail['description'] = descriptions
+      @uddi.save_service(detail['name'], detail['description'], detail['definition'])
+    end
+
+    def merge_meta_with_service_descriptions(service, meta)
+      descriptions = []
+      detail = @uddi.get_service(service)['data']
+      detail['description'] ||= {}
+      detail['description'].each do |desc|
+        descriptions << desc if not description_is_meta?(desc)
+      end
+      descriptions << CGI.escape(meta.to_json)
+      descriptions
+    end
+
+    def find_matching_service(service, result)
+      registered = false
+      result['data']['services'].each do |service_key, description|
+        registered = (service.downcase == service_key.downcase)
+      end
+      registered
+    end
+
+    def extract_description_and_meta(service, description = nil)
+      result = []
+      result << service['description'] if service['description'] and description.nil?
+      result << description if not description.nil?
+      result << service['meta'] if service['meta']
+      result
+    end
+
+    def search_for_service(pattern)
+      provided?(pattern, "pattern") and length_at_least?(pattern, 4, "pattern")
+
+      services, service_components = find_services_and_service_components(pattern)
+      services = map_service_uris(services)
+      found = services.merge!(service_components)
+
+      success_data({'services' => found})
+    end 
+
+    def map_service_uris(services)
+      services_detailed = {}
+      services.each do |id, service|
+        service['uris'] = service_uris(service['name'])['data']['bindings']
+      end      
+    end
+
+    def extract_service_by_name_from_services_list(result, name)
+      result['data']['services'].each do |sname, service|
+        compare_service = "#{@urns['services']}#{name}" == sname
+        compare_service_component = "#{@urns['service-components']}#{name}" == sname
+        return success_data({ 'services' => { sname => service }}) if compare_service or compare_service_component or (name == sname)
+      end
+      success_data({ 'services' => {}})      
+    end    
+  end
+end

data/lib/soar_sr/teams.rb

@@ -0,0 +1,20 @@
+require 'jsender'
+require 'soap4juddi'
+
+module SoarSr
+  class Teams < SoarSr::DomainPerspectives
+    include Jsender
+    
+      def team_registered?(domain_perspective)_{
+        domain_registered?('teams', domain_perspective)
+      }end
+
+      def register_team(domain_perspective)_{
+        register_domain('teams', domain_perspective)
+      }end
+
+      def deregister_team(domain_perspective)_{
+        deregister_domain('teams', domain_perspective)
+      }end      
+  end
+end

data/lib/soar_sr/validation_error.rb

@@ -0,0 +1,4 @@
+module SoarSr
+  class ValidationError < StandardError
+  end
+end