soar_sr 0.1.3

checksums.yaml

@@ -0,0 +1,7 @@
+---
+SHA1:
+  metadata.gz: c3885966ad4efc683dff78fe7e7ed1f5241dc9f2
+  data.tar.gz: 3dde17feea00287e828f5ba120f5c2f2df5646d2
+SHA512:
+  metadata.gz: f93c51e6fdd6259da50944ea10012edd26ad1f4264e660300544c4608f1ed6c494c6e75dea260b935804234131239e17de25edf1bc61097640fe50aabcc4e784
+  data.tar.gz: 6c80ad0090793d19b97b33053e14921f1b684600b6cb85de296b02018214fbfad26b196cc5266855b17f7249464b31e53d40516277067ae2edd0bbfe001630aa

data/.gitignore

@@ -0,0 +1,10 @@
+/.bundle/
+/.yardoc
+/Gemfile.lock
+/_yardoc/
+/coverage/
+/doc/
+/pkg/
+/spec/reports/
+/tmp/
+*.gem

data/.rspec

@@ -0,0 +1,2 @@
+--format documentation
+--color

data/.travis.yml

@@ -0,0 +1,4 @@
+language: ruby
+rvm:
+  - 2.0.0
+before_install: gem install bundler -v 1.10.6

data/Gemfile

@@ -0,0 +1,4 @@
+source 'https://rubygems.org'
+
+# Specify your gem's dependencies in soar_sr.gemspec
+gemspec

data/LICENSE.txt

@@ -0,0 +1,21 @@
+The MIT License (MIT)
+
+Copyright (c) 2015 Ernst van Graan
+
+Permission is hereby granted, free of charge, to any person obtaining a copy
+of this software and associated documentation files (the "Software"), to deal
+in the Software without restriction, including without limitation the rights
+to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+copies of the Software, and to permit persons to whom the Software is
+furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in
+all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+THE SOFTWARE.

data/README.md

@@ -0,0 +1,41 @@
+# SoarSr
+
+Welcome to your new gem! In this directory, you'll find the files you need to be able to package up your Ruby library into a gem. Put your Ruby code in the file `lib/soar_sr`. To experiment with that code, run `bin/console` for an interactive prompt.
+
+TODO: Delete this and the text above, and describe your gem
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+```ruby
+gem 'soar_sr'
+```
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install soar_sr
+
+## Usage
+
+TODO: Write usage instructions here
+
+## Development
+
+After checking out the repo, run `bin/setup` to install dependencies. Then, run `rake spec` to run the tests. You can also run `bin/console` for an interactive prompt that will allow you to experiment.
+
+To install this gem onto your local machine, run `bundle exec rake install`. To release a new version, update the version number in `version.rb`, and then run `bundle exec rake release`, which will create a git tag for the version, push git commits and tags, and push the `.gem` file to [rubygems.org](https://rubygems.org).
+
+## Contributing
+
+Bug reports and pull requests are welcome on GitHub at https://github.com/[USERNAME]/soar_sr. This project is intended to be a safe, welcoming space for collaboration, and contributors are expected to adhere to the [Contributor Covenant](contributor-covenant.org) code of conduct.
+
+
+## License
+
+The gem is available as open source under the terms of the [MIT License](http://opensource.org/licenses/MIT).
+

data/Rakefile

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

data/bin/console

@@ -0,0 +1,14 @@
+#!/usr/bin/env ruby
+
+require "bundler/setup"
+require "soar_sr"
+
+# You can add fixtures and/or initialization code here to make experimenting
+# with your gem easier. You can also use a different console, if you like.
+
+# (If you use this, don't forget to add pry to your Gemfile!)
+# require "pry"
+# Pry.start
+
+require "irb"
+IRB.start

data/bin/setup

@@ -0,0 +1,7 @@
+#!/bin/bash
+set -euo pipefail
+IFS=$'\n\t'
+
+bundle install
+
+# Do any other automated setup that you need to do here

data/lib/soar_sr/associations.rb

@@ -0,0 +1,125 @@
+require 'jsender'
+require 'soap4juddi'
+
+module SoarSr
+  class Associations < SoarSr::Handler
+    include Jsender
+
+    def service_component_has_domain_perspective_associations?(service_component)_{
+      provided?(service_component, 'service component')
+      service_component_id = compile_domain_id('service-components', service_component)
+      domain_perspectives = @registry.domain_perspectives.list_domain_perspectives['data']['domain_perspectives']
+      domain_perspectives.each do |name, detail|
+        service_components = domain_perspective_associations(name)['data']['associations']['service_components']
+        service_components.each do |id, value|
+          return true if (id == service_component_id) and (value)
+        end
+      end
+      false      
+    }end
+
+    def associate_service_component_with_service(service, access_point, description = '')_{
+      authorize
+      provided?(service, 'service') and provided?(access_point, 'access point') and uri?(access_point)
+      result = @uddi.add_service_uri(service, access_point)
+      authorized?(result) and identifier?(result, 'service')
+      success('service or access point')         
+    }end
+
+    def domain_perspective_associations(domain_perspective)_{
+      # byebug
+      provided?(domain_perspective, 'domain perspective')
+      meta = @registry.domain_perspectives.meta_for_domain_perspective('domains', domain_perspective)
+      meta = @registry.domain_perspectives.meta_for_domain_perspective('teams', domain_perspective) if no_meta?(meta)
+      success_data(meta)
+    }end
+
+    def domain_perspective_has_associations?(domain_perspective)
+      associations = domain_perspective_associations(domain_perspective)['data']['associations']
+      (associations['service_components'].size > 0) or (associations['services'].size > 0)
+    end
+
+    def associate_service_component_with_domain_perspective(service_component, domain_perspective)_{
+      provided?(domain_perspective, 'domain perspective') and registered?(domain_perspective, 'domain perspective')
+      provided?(service_component, 'service component') and registered?(service_component, 'service component')
+
+      service_component_id = compile_domain_id('service-components', service_component)
+      meta = @registry.domain_perspectives.meta_for_domain_perspective('domains', domain_perspective)
+
+      raise ValidationError, 'already associated' if meta['associations']['service_components'][service_component_id]
+
+      meta['associations']['service_components'][service_component_id] = true
+      result = @registry.domain_perspectives.configure_meta_for_domain_perspective('domains', domain_perspective, meta)
+      authorized?(result) and identifier?(result, 'domain perspective')
+      success
+    }end
+
+    def associate_service_with_domain_perspective(service, domain_perspective)_{
+      provided?(domain_perspective, 'domain perspective') and registered?(domain_perspective, 'domain perspective')
+      provided?(service, 'service') and registered?(service, 'service')
+
+      service_id = compile_domain_id('services', service)
+      meta = @registry.domain_perspectives.meta_for_domain_perspective('domains', domain_perspective)
+
+      raise ValidationError, 'already associated' if meta['associations']['services'][service_id]
+
+      meta['associations']['services'][service_id] = true
+      result = @registry.domain_perspectives.configure_meta_for_domain_perspective('domains', domain_perspective, meta)
+      authorized?(result) and identifier?(result, 'domain perspective')
+      success
+    }end
+
+    def disassociate_service_component_from_domain_perspective(domain_perspective, service_component)_{
+      # byebug
+      provided?(domain_perspective, 'domain perspective') and registered?(domain_perspective, 'domain perspective')
+      provided?(service_component, 'service component') and registered?(service_component, 'service component')
+
+      service_component_id = compile_domain_id('service-components', service_component)
+      meta = @registry.domain_perspectives.meta_for_domain_perspective('domains', domain_perspective)
+    
+      raise ValidationError, 'not associated' if not meta['associations']['service_components'][service_component_id]
+
+      meta['associations']['service_components'].delete(service_component_id)
+      result = @registry.domain_perspectives.configure_meta_for_domain_perspective('domains', domain_perspective, meta)
+      authorized?(result) and identifier?(result, 'domain perspective')
+      success
+    }end
+
+    def disassociate_service_from_domain_perspective(domain_perspective, service)_{
+      # byebug
+      provided?(domain_perspective, 'domain perspective') and registered?(domain_perspective, 'domain perspective')
+      provided?(service, 'service') and registered?(service, 'service')
+
+      service_id = compile_domain_id('services', service)
+      meta = @registry.domain_perspectives.meta_for_domain_perspective('domains', domain_perspective)
+
+      raise ValidationError, 'not associated' if not meta['associations']['services'][service_id]
+
+      meta['associations']['services'].delete(service_id)
+      result = @registry.domain_perspectives.configure_meta_for_domain_perspective('domains', domain_perspective, meta)
+      authorized?(result) and identifier?(result, 'domain perspective')
+      success
+    }end
+
+    def delete_all_domain_perspective_associations(domain_perspective)_{
+      # byebug
+      provided?(domain_perspective, 'domain perspective')
+      associations = domain_perspective_associations(domain_perspective)['data']['associations']
+      associations['service_components'] ||= {}
+      associations['services'] ||= {}
+      associations['service_components'].each do |id, value|
+        disassociate_service_component_from_domain_perspective(domain_perspective, extract_domain_name('service-components', id))
+      end
+      associations['services'].each do |id, value|
+        disassociate_service_from_domain_perspective(domain_perspective, extract_domain_name('services', id))
+      end
+      success
+    }end
+
+    private
+
+    def no_meta?(meta)
+      (meta['associations']['service_components'] == {}) and (meta['associations']['services'] == {})
+    end
+  end
+end

data/lib/soar_sr/contacts.rb

@@ -0,0 +1,77 @@
+module SoarSr
+	class Contacts < SoarSr::Handler
+      def add_contact_to_domain_perspective(domain_perspective, contact)_{
+        authorize
+        provided?(domain_perspective, 'domain perspective') and any_registered?(domain_perspective)
+        provided?(contact, 'contact details') and contact?(contact)
+        details = {}.merge!(contact)
+        details = ensure_required_contact_details(details)
+
+        result = @registry.domain_perspectives.domain_perspective_registered?(domain_perspective)
+        result =  @registry.teams.team_registered?(domain_perspective) if result['data']['id'].nil?
+
+        id = result['data']['id']
+        domain_perspective = @uddi.get_business(id)['data'].first[1]
+
+        domain_perspective['contacts'] ||= []
+
+        return fail('contact already exists - remove first to update') if contacts_include?(domain_perspective['contacts'], details)
+
+        domain_perspective['contacts'] << details
+
+        @uddi.save_business(id, domain_perspective['name'], domain_perspective['description'], domain_perspective['contacts'])
+      }end
+
+      def contact_details_for_domain(domain_perspective)_{
+        provided?(domain_perspective, 'domain perspective') and any_registered?(domain_perspective)
+        result = @registry.domain_perspectives.domain_perspective_registered?(domain_perspective)
+        result =  @registry.teams.team_registered?(domain_perspective) if result['data']['id'].nil?
+        id = result['data']['id']
+        domain_perspective = @uddi.get_business(id)['data'].first[1]
+        domain_perspective['contacts'] ||= []
+        domain_perspective['contacts'].each do |contact|
+          contact['description'] = '' if contact['description'] == 'n/a'
+          contact['email'] = '' if contact['email'] == 'n/a'
+          contact['phone'] = '' if contact['phone'] == 'n/a'
+        end
+        success_data('contacts' => domain_perspective['contacts'])
+      }end
+
+      def remove_contact_from_domain_perspective(domain_perspective, contact)_{
+        authorize
+        provided?(domain_perspective, 'domain perspective') and any_registered?(domain_perspective)
+        provided?(contact, 'contact details') and contact?(contact)
+
+        result = @registry.domain_perspectives.domain_perspective_registered?(domain_perspective)
+        result =  @registry.teams.team_registered?(domain_perspective) if result['data']['id'].nil?
+
+        id = result['data']['id']
+        domain_perspective = @uddi.get_business(id)['data'].first[1]
+
+        domain_perspective['contacts'] ||= []
+
+        return fail('unknown contact') if not contacts_include?(domain_perspective['contacts'], contact)
+
+        domain_perspective['contacts'].delete(contact)
+        domain_perspective['contacts'] = nil if domain_perspective['contacts'] == []
+
+        @uddi.save_business(id, domain_perspective['name'], domain_perspective['description'], domain_perspective['contacts'])
+      }end
+      
+      private
+
+      def ensure_required_contact_details(details)
+        details['description'] = 'n/a' if details['description'].nil? or details['description'].strip == ""
+        details['email'] = 'n/a' if details['email'].nil? or details['email'].strip == ""
+        details['phone'] = 'n/a' if details['phone'].nil? or details['phone'].strip == ""
+        details
+      end
+
+      def contacts_include?(contacts, contact)
+        contacts.each do |compare|
+          return true if (compare['name'] == contact['name']) and (compare['email'] == contact['email']) and (compare['description'] == contact['description']) and (compare['phone'] == contact['phone'])
+        end
+        false
+      end
+	end
+end

data/lib/soar_sr/domain_perspectives.rb

@@ -0,0 +1,164 @@
+require 'jsender'
+require 'soap4juddi'
+require 'json'
+# require 'byebug'
+
+module SoarSr
+  class DomainPerspectives < SoarSr::Handler
+    include Jsender
+
+    def delete_all_domain_perspectives()_{
+      authorize
+      result = list_domain_perspectives
+      if has_data?(result, 'domain_perspectives') 
+        result['data']['domain_perspectives'].each do |name, detail|
+          @uddi.delete_business(detail['id'])
+        end
+      end
+    }end
+
+    def domain_perspective_by_name(type, domain_perspective)
+      provided?(domain_perspective, 'domain perspective')
+      @uddi.get_business(compile_domain_id(type, domain_perspective))
+    end
+
+    def list_domain_perspectives()_{
+      result = @uddi.find_businesses
+      result['data']['domain_perspectives'] = {}
+
+      if has_data?(result, 'businesses')
+        result['data']['businesses'].each do |business, detail|
+          hetz = false
+          SoarSr::DOMAIN_TYPES.each do |type|
+            hetz = true if detail['id'].include?(type)
+          end
+          result['data']['domain_perspectives'][business] = detail if hetz
+        end
+      end
+      result['data'].delete('businesses')
+      result
+    }end
+
+    def domain_perspective_registered?(domain_perspective)_{
+      domain_registered?('domains', domain_perspective)
+    }end
+
+    def register_domain_perspective(domain_perspective)_{
+      register_domain('domains', domain_perspective)
+    }end
+
+    def deregister_domain_perspective(domain_perspective)_{
+      deregister_domain('domains', domain_perspective)
+    }end
+
+    def configure_meta_for_domain_perspective(type, domain_perspective, meta)_{
+        authorize
+        provided?(domain_perspective, 'domain perspective') and registered?(domain_perspective, 'domain perspective')
+        provided?(type, 'element type') and type?(type)
+        provided?(meta, 'meta') and meta?(meta)
+        
+        detail = extract_detail_for_domain_perspective(type, domain_perspective)
+        descriptions = extract_non_meta_descriptions_for_domain_perspective(detail)
+        # byebug
+        detail['description'] = compile_meta_into_descriptions(descriptions, meta)
+
+        result = @uddi.save_business(detail['id'], detail['name'], detail['description'])
+        authorized?(result) and identifier?(result, 'domain perspective')
+        success('meta updated', result['data'])
+    }end
+
+    def meta_for_domain_perspective(type, domain_perspective)_{
+      provided?(domain_perspective, 'domain perspective') and registered?(domain_perspective, 'domain perspective')
+      provided?(type, 'element type') and type?(type)
+      
+      meta = extract_meta_for_domain_perspective(extract_detail_for_domain_perspective(type, domain_perspective))
+      meta['associations'] ||= {}
+      meta['associations']['service_components'] ||= {}
+      meta['associations']['services'] ||= {}
+      meta     
+    }end
+
+    protected
+
+    def domain_registered?(type, domain_perspective)
+      provided?(domain_perspective, 'domain perspective')
+      result = @uddi.find_businesses(domain_perspective)
+      registered = false
+      id = nil
+      if has_data?(result, 'businesses')
+        result['data']['businesses'].each do |business, detail|
+          if (domain_perspective.downcase == business.downcase) and (detail['id'].include?(type))
+            registered = true
+            id = detail['id']
+          end
+        end
+      end
+      success_data({'registered' => registered, 'id' => id})
+    end    
+
+    def register_domain(type, domain_perspective)_{
+      authorize
+      provided?(domain_perspective, 'domain perspective') and not_registered?(domain_perspective, 'domain perspective')
+      id = compile_domain_id(type, domain_perspective)
+      result = @uddi.save_business(id, domain_perspective)
+      authorized?(result) and identifier?(result, 'domain perspective')
+      success('domain perspective registered')
+    }end
+
+    def deregister_domain(type, domain_perspective)_{
+      authorize
+      provided?(domain_perspective, 'domain perspective') and registered?(domain_perspective, 'domain perspective')
+      raise ValidationError, 'domain perspective has associations' if @registry.associations.domain_perspective_has_associations?(domain_perspective)
+      result = @uddi.delete_business(compile_domain_id(type, domain_perspective))
+      authorized?(result) and identifier?(result, 'domain perspective')
+      success('domain perspective deregistered')
+    }end    
+
+    private
+
+    def extract_non_meta_descriptions_for_domain_perspective(detail)
+      descriptions = []
+      detail['description'] ||= []        
+      detail['description'].each do |desc|
+        descriptions << desc if not description_is_meta?(desc)
+      end
+      descriptions
+    end
+
+    def extract_detail_for_domain_perspective(type, domain_perspective)
+      provided?(domain_perspective, 'domain perspective') and provided?(type, 'domain type')
+      id = compile_domain_id(type, domain_perspective)
+      detail = @uddi.get_business(id)['data'][domain_perspective]      
+      detail ||= {}
+      detail['id'] = id
+      detail
+    end
+
+    def extract_meta_for_domain_perspective(detail)
+      meta = {}
+      if detail['description']
+        detail['description'].each do |desc|
+          meta.merge!(JSON.parse(CGI.unescape(desc))) if (description_is_meta?(desc))
+        end
+      end
+      meta
+    end
+
+    def compile_meta_into_descriptions(descriptions, meta)
+      associations = {}
+      associations.merge!(meta['associations']) if meta['associations']
+      associations['service_components'] ||= {}
+      associations['services'] ||= {}
+      meta.delete('associations')
+      associations['service_components'].each do |id, value|
+        descriptions << CGI.escape({'associations' => {'service_components' => {id => value}}}.to_json)
+      end
+      associations['services'].each do |id, value|
+        descriptions << CGI.escape({'associations' => {'services' => {id => value}}}.to_json)
+      end
+
+      descriptions << CGI.escape(meta.to_json) if meta.count > 0
+      descriptions
+    end
+  end
+end

data/lib/soar_sr/failure_error.rb

@@ -0,0 +1,3 @@
+module SoarSr
+  class FailureErrorError < StandardError end
+end

data/lib/soar_sr/handler.rb

@@ -0,0 +1,56 @@
+require 'jsender'
+require 'soap4juddi'
+
+module SoarSr
+	class Handler < Validator
+		include Jsender
+
+    attr_accessor :registry
+
+    def initialize(urns, uddi, credentials, registry)
+    	@urns = urns
+    	@uddi = uddi
+    	@credentials = credentials
+      @registry = registry
+    	validate
+    end
+
+    def authorize
+      @uddi.broker.authenticate(@credentials['username'], @credentials['password'])
+    end
+
+    protected
+
+    def _(&block)
+    	yield
+    rescue => ex
+    	# byebug
+      return fail(ex.message) if ex.is_a? ValidationError
+      return error('request could not be completed')      	
+    end
+
+    def description_is_meta?(meta)
+      JSON.parse(CGI.unescape(meta))
+      true
+    rescue => ex
+      false
+    end
+
+    def is_registered?(result)
+      has_data?(result, 'registered') and result['data']['registered']
+    end
+
+    def validate
+    	provided?(@urns, "urns") and provided?(@uddi, "UDDI provider") and credentials?(@credentials)
+    end
+
+    def compile_domain_id(type, element)
+      return element if element.include?(@urns[type])
+      "#{@urns[type]}#{element}"
+    end        
+
+    def extract_domain_name(type, element)
+      element.gsub("#{@urns[type]}", "")
+    end
+  end
+end