mm_json_client 0.1.0

data/fixtures/vcr_cassettes/MmJsonClient_GenericType/basic_server_interaction/responds_with_a_server_error_on_bad_auth.yml

@@ -0,0 +1,39 @@
+---
+http_interactions:
+- request:
+    method: post
+    uri: http://test-ipam.local/_mmwebext/mmwebext.dll?Soap
+    body:
+      encoding: UTF-8
+      string: '{"jsonrpc":"2.0","method":"Login","params":{"loginName":"testuser","password":"badpadd","server":"test-ipam.local"}}'
+    headers:
+      Accept-Encoding:
+      - gzip;q=1.0,deflate;q=0.6,identity;q=0.3
+      Accept:
+      - application/json
+      User-Agent:
+      - Ruby
+      Content-Type:
+      - application/json
+  response:
+    status:
+      code: 200
+      message: OK
+    headers:
+      Content-Length:
+      - '100'
+      Content-Type:
+      - application/json; charset=utf-8
+      Server:
+      - Microsoft-IIS/8.5
+      X-Powered-By:
+      - ASP.NET
+      Date:
+      - Mon, 11 Jul 2016 17:56:42 GMT
+    body:
+      encoding: UTF-8
+      string: '{"jsonrpc": "2.0", "error": {"code": 16394, "message": "Invalid username
+        or password."}, "id": null}'
+    http_version: 
+  recorded_at: Mon, 11 Jul 2016 17:56:45 GMT
+recorded_with: VCR 3.0.3

data/fixtures/vcr_cassettes/MmJsonClient_GenericType/multiple_proxy_servers/connects_to_another_proxy_when_one_is_disabled.yml

@@ -0,0 +1,72 @@
+---
+http_interactions:
+- request:
+    method: post
+    uri: http://test-ipam02.local/_mmwebext/mmwebext.dll?Soap
+    body:
+      encoding: UTF-8
+      string: '{"jsonrpc":"2.0","method":"Login","params":{"loginName":"testuser","password":"testpass","server":"localhost"}}'
+    headers:
+      Accept-Encoding:
+      - gzip;q=1.0,deflate;q=0.6,identity;q=0.3
+      Accept:
+      - application/json
+      User-Agent:
+      - Ruby
+      Content-Type:
+      - application/json
+  response:
+    status:
+      code: 200
+      message: OK
+    headers:
+      Content-Length:
+      - '209'
+      Content-Type:
+      - application/json; charset=utf-8
+      Server:
+      - Microsoft-IIS/8.5
+      Date:
+      - Wed, 13 Jul 2016 18:28:45 GMT
+    body:
+      encoding: UTF-8
+      string: '{"jsonrpc": "2.0", "error": {"code": 1037, "message": "Incoming requests
+        have been disabled on this server. Please select a server that is in a mode
+        that accepts incoming requests and try again."}, "id": null}'
+    http_version: 
+  recorded_at: Wed, 13 Jul 2016 18:28:28 GMT
+- request:
+    method: post
+    uri: http://test-ipam01.local/_mmwebext/mmwebext.dll?Soap
+    body:
+      encoding: UTF-8
+      string: '{"jsonrpc":"2.0","method":"Login","params":{"loginName":"testuser","password":"testpass","server":"localhost"}}'
+    headers:
+      Accept-Encoding:
+      - gzip;q=1.0,deflate;q=0.6,identity;q=0.3
+      Accept:
+      - application/json
+      User-Agent:
+      - Ruby
+      Content-Type:
+      - application/json
+  response:
+    status:
+      code: 200
+      message: OK
+    headers:
+      Content-Length:
+      - '76'
+      Content-Type:
+      - application/json; charset=utf-8
+      Server:
+      - Microsoft-IIS/8.5
+      Date:
+      - Wed, 13 Jul 2016 18:28:50 GMT
+    body:
+      encoding: UTF-8
+      string: '{"jsonrpc": "2.0", "result": {"session":"RV7qXnC0fbZBNrgjIhQh"}, "id":
+        null}'
+    http_version: 
+  recorded_at: Wed, 13 Jul 2016 18:28:34 GMT
+recorded_with: VCR 3.0.3

data/fixtures/vcr_cassettes/MmJsonClient_GenericType/proxy_options/allows_a_separate_proxy_to_be_defined.yml

@@ -0,0 +1,75 @@
+---
+http_interactions:
+- request:
+    method: post
+    uri: http://test-ipam.local/_mmwebext/mmwebext.dll?Soap
+    body:
+      encoding: UTF-8
+      string: '{"jsonrpc":"2.0","method":"Login","params":{"loginName":"testuser","password":"testpass","server":"localhost"}}'
+    headers:
+      Accept-Encoding:
+      - gzip;q=1.0,deflate;q=0.6,identity;q=0.3
+      Accept:
+      - application/json
+      User-Agent:
+      - Ruby
+      Content-Type:
+      - application/json
+  response:
+    status:
+      code: 200
+      message: OK
+    headers:
+      Content-Length:
+      - '76'
+      Content-Type:
+      - application/json; charset=utf-8
+      Server:
+      - Microsoft-IIS/8.5
+      X-Powered-By:
+      - ASP.NET
+      Date:
+      - Mon, 11 Jul 2016 17:57:38 GMT
+    body:
+      encoding: UTF-8
+      string: '{"jsonrpc": "2.0", "result": {"session":"4bnH7Tn73YMX5DgiP6oU"}, "id":
+        null}'
+    http_version: 
+  recorded_at: Mon, 11 Jul 2016 17:57:41 GMT
+- request:
+    method: post
+    uri: http://test-ipam.local/_mmwebext/mmwebext.dll?Soap
+    body:
+      encoding: UTF-8
+      string: '{"jsonrpc":"2.0","method":"Login","params":{"loginName":"testuser","password":"testpass","server":"localhost"}}'
+    headers:
+      Accept-Encoding:
+      - gzip;q=1.0,deflate;q=0.6,identity;q=0.3
+      Accept:
+      - application/json
+      User-Agent:
+      - Ruby
+      Content-Type:
+      - application/json
+  response:
+    status:
+      code: 200
+      message: OK
+    headers:
+      Content-Length:
+      - '76'
+      Content-Type:
+      - application/json; charset=utf-8
+      Server:
+      - Microsoft-IIS/8.5
+      X-Powered-By:
+      - ASP.NET
+      Date:
+      - Wed, 13 Jul 2016 13:05:19 GMT
+    body:
+      encoding: UTF-8
+      string: '{"jsonrpc": "2.0", "result": {"session":"kTq5p3frEk8eb3mAjHMC"}, "id":
+        null}'
+    http_version: 
+  recorded_at: Wed, 13 Jul 2016 13:05:27 GMT
+recorded_with: VCR 3.0.3

data/fixtures/vcr_cassettes/MmJsonClient_GenericType/ssl_options/allows_ignoring_bad_certificates.yml

@@ -0,0 +1,74 @@
+---
+http_interactions:
+- request:
+    method: post
+    uri: https://test-ipam.local/_mmwebext/mmwebext.dll?Soap
+    body:
+      encoding: UTF-8
+      string: '{"jsonrpc":"2.0","method":"Login","params":{"loginName":"testuser","password":"testpass","server":"test-ipam.local"}}'
+    headers:
+      Accept-Encoding:
+      - gzip;q=1.0,deflate;q=0.6,identity;q=0.3
+      Accept:
+      - application/json
+      User-Agent:
+      - Ruby
+      Content-Type:
+      - application/json
+  response:
+    status:
+      code: 200
+      message: OK
+    headers:
+      Content-Length:
+      - '76'
+      Content-Type:
+      - application/json; charset=utf-8
+      Server:
+      - Microsoft-IIS/8.5
+      X-Powered-By:
+      - ASP.NET
+      Date:
+      - Mon, 11 Jul 2016 18:03:12 GMT
+    body:
+      encoding: UTF-8
+      string: '{"jsonrpc": "2.0", "result": {"session":"brtghA7dQ0D6jBRqQS8h"}, "id":
+        null}'
+    http_version: 
+  recorded_at: Mon, 11 Jul 2016 18:03:14 GMT
+- request:
+    method: post
+    uri: https://test-ipam.local/_mmwebext/mmwebext.dll?Soap
+    body:
+      encoding: UTF-8
+      string: '{"jsonrpc":"2.0","method":"Logout","params":{"session":"brtghA7dQ0D6jBRqQS8h"}}'
+    headers:
+      Accept-Encoding:
+      - gzip;q=1.0,deflate;q=0.6,identity;q=0.3
+      Accept:
+      - application/json
+      User-Agent:
+      - Ruby
+      Content-Type:
+      - application/json
+  response:
+    status:
+      code: 200
+      message: OK
+    headers:
+      Content-Length:
+      - '44'
+      Content-Type:
+      - application/json; charset=utf-8
+      Server:
+      - Microsoft-IIS/8.5
+      X-Powered-By:
+      - ASP.NET
+      Date:
+      - Mon, 11 Jul 2016 18:03:17 GMT
+    body:
+      encoding: UTF-8
+      string: '{"jsonrpc": "2.0", "result": "", "id": null}'
+    http_version: 
+  recorded_at: Mon, 11 Jul 2016 18:03:20 GMT
+recorded_with: VCR 3.0.3

data/generators/enum_def_generator.rb

@@ -0,0 +1,22 @@
+require 'erb'
+require 'json'
+require 'wasabi'
+require_relative 'wasabi_extension'
+
+module MmJsonClient
+  module Generators
+    # Read in a WSDL and output an API definition file for enumerations.
+    class EnumDefGenerator
+      def generate(in_file, out_file)
+        enumerations = {}
+        doc = Wasabi.document(File.read(in_file))
+        doc.parser.parse_enumerations
+        doc.parser.enumerations.each do |enumeration, data|
+          enumerations[enumeration] = data['values']
+        end
+
+        File.write(out_file, enumerations.to_json)
+      end
+    end
+  end
+end

data/generators/method_def_generator.rb

@@ -0,0 +1,20 @@
+require 'erb'
+require 'json'
+require 'wasabi'
+
+module MmJsonClient
+  module Generators
+    # Read in a WSDL and output an API definition file for methods.
+    class MethodDefGenerator
+      def generate(in_file, out_file)
+        methods = {}
+        doc = Wasabi.document(File.read(in_file))
+        doc.operations.each do |_method, definition|
+          methods[definition[:input]] = definition[:output]
+        end
+
+        File.write(out_file, methods.to_json)
+      end
+    end
+  end
+end

data/generators/type_def_generator.rb

@@ -0,0 +1,50 @@
+require 'erb'
+require 'json'
+require 'wasabi'
+
+module MmJsonClient
+  module Generators
+    # Read in a WSDL and output an API definition file for complex types.
+    class TypeDefGenerator
+      def generate(in_file, out_file)
+        types = {}
+        doc = Wasabi.document(File.read(in_file))
+        doc.parser.types.each do |type, data|
+          types[type] = {}
+          if array_type?(type, data)
+            ns_type = array_type(data)
+            types[type] = [type_from_ns_type(ns_type)]
+          else
+            type_fields(data).each do |element, definition|
+              types[type][element] = type_from_ns_type(definition[:type])
+            end
+          end
+        end
+
+        File.write(out_file, types.to_json)
+      end
+
+      private
+
+      def array_type(data)
+        type_fields(data).first[1][:type]
+      end
+
+      def type_fields(data)
+        data.select { |x| x.class == String }
+      end
+
+      def type_from_ns_type(ns_type)
+        ns_type.split(':').last
+      end
+
+      # I would prefer not to do this quite as hackily, but there are
+      # other elements in the WSDL that look like have maxOccurs = unbounded,
+      # but are not actually array parameters.
+      def array_type?(type, _data)
+        return true if type =~ /^ArrayOf/
+        false
+      end
+    end
+  end
+end

data/generators/wasabi_extension.rb

@@ -0,0 +1,45 @@
+module Wasabi
+  # Extend the parser to find M&M API enumerations.
+  class Parser
+    attr_accessor :enumerations
+
+    def parse_enumerations
+      @enumerations = {}
+      schemas.each do |schema|
+        schema_namespace = schema['targetNamespace']
+
+        schema.element_children.each do |node|
+          namespace = schema_namespace || @namespace
+
+          case node.name
+          when 'element'
+            simple_type = node.at_xpath('./xs:simpleType', 'xs' => XSD)
+            if simple_type && enumeration?(simple_type)
+              process_enumeration namespace, complex_type, node['name'].to_s
+            end
+          when 'simpleType'
+            if enumeration?(node)
+              process_enumeration namespace, node, node['name'].to_s
+            end
+          end
+        end
+      end
+    end
+
+    def process_enumeration(namespace, enum, name)
+      @enumerations[name] = { namespace: namespace }
+      @enumerations[name]['values'] = []
+      enum.xpath('./xs:restriction/xs:enumeration', 'xs' => XSD).each do |value|
+        @enumerations[name]['values'] << value['value']
+      end
+    end
+
+    def enumeration?(node)
+      if node.at_xpath('./xs:restriction/xs:enumeration', 'xs' => XSD)
+        true
+      else
+        false
+      end
+    end
+  end
+end

data/lib/core_ext/hash_extension.rb

@@ -0,0 +1,43 @@
+require 'core_ext/string_extension.rb'
+
+# Extend hash with helpers specificic to this gem.
+class Hash
+  # Convert the keys of hashes and arrays of hashes using mm_underscore
+  def mm_underscore_keys
+    keys_to_mm_underscore(self)
+  end
+
+  # Convert the keys of hashes and arrays of hashes using mm_camelize
+  def mm_camelize_keys
+    keys_to_mm_camel(self)
+  end
+
+  def mm_values_to_h
+    mm_values_to_hashes(self)
+  end
+
+  private
+
+  # Convert the keys of hashes and arrays of hashes to mm_underscore
+  def keys_to_mm_underscore(value)
+    case value
+    when Array
+      value.map { |v| keys_to_mm_underscore(v) }
+    when Hash
+      Hash[value.map { |k, v| [k.mm_underscore, keys_to_mm_underscore(v)] }]
+    else
+      value
+    end
+  end
+
+  def keys_to_mm_camel(value)
+    case value
+    when Array
+      value.map { |v| keys_to_mm_camel(v) }
+    when Hash
+      Hash[value.map { |k, v| [k.mm_camelize, keys_to_mm_camel(v)] }]
+    else
+      value
+    end
+  end
+end