exact-target-api 0.0.1

data/lib/exact-target-api/constructor.rb

@@ -0,0 +1,34 @@
+module ET
+  class Constructor
+    attr_accessor :status, :code, :message, :results, :request_id, :moreResults
+
+    def initialize(response = nil, rest = false)
+      @results = []
+      if !response.nil? && !rest
+        envelope = response.hash[:envelope]
+        @body = envelope[:body]
+
+        if !response.soap_fault? || !response.http_error?
+          @code = response.http.code
+          @status = true
+        elsif response.soap_fault?
+          @code = response.http.code
+          @message = @body[:fault][:faultstring]
+          @status = false
+        elsif response.http_error?
+          @code = response.http.code
+          @status = false
+        end
+      elsif (@code = response.code)
+
+        @status = @code == "200"
+
+        begin
+          @results = JSON.parse(response.body)
+        rescue
+          @message = response.body
+        end
+      end
+    end
+  end
+end

data/lib/exact-target-api/content_area.rb

@@ -0,0 +1,8 @@
+module ET
+  class ContentArea < ET::CUDSupport
+    def initialize
+      super
+      @obj = 'ContentArea'
+    end
+  end
+end

data/lib/exact-target-api/continue.rb

@@ -0,0 +1,33 @@
+module ET
+  class Continue < ET::Constructor
+    def initialize(authStub, request_id)
+      @results = []
+      authStub.refreshToken
+      obj = {'ContinueRequest' => request_id}
+      response = authStub.auth.call(:retrieve, :message => {'RetrieveRequest' => obj})
+
+      super(response)
+
+      if @status then
+        if @body[:retrieve_response_msg][:overall_status] != "OK" && @body[:retrieve_response_msg][:overall_status] != "MoreDataAvailable" then
+          @status = false
+          @message = @body[:retrieve_response_msg][:overall_status]
+        end
+
+        @moreResults = false
+        if @body[:retrieve_response_msg][:overall_status] == "MoreDataAvailable" then
+          @moreResults = true
+        end
+
+        if (!@body[:retrieve_response_msg][:results].is_a? Hash) && (!@body[:retrieve_response_msg][:results].nil?) then
+          @results = @results + @body[:retrieve_response_msg][:results]
+        elsif  (!@body[:retrieve_response_msg][:results].nil?)
+          @results.push(@body[:retrieve_response_msg][:results])
+        end
+
+        # Store the Last Request ID for use with continue
+        @request_id = @body[:retrieve_response_msg][:request_id]
+      end
+    end
+  end
+end

data/lib/exact-target-api/continue_rest.rb

@@ -0,0 +1,24 @@
+module ET
+  class ContinueRest < ET::Constructor
+    def initialize(authStub, endpoint, qs = nil)
+      authStub.refreshToken
+
+      if qs
+        qs['access_token'] = authStub.authToken
+      else
+        qs = {"access_token" => authStub.authToken}
+      end
+
+      uri = URI.parse(endpoint)
+      uri.query = URI.encode_www_form(qs)
+      http = Net::HTTP.new(uri.host, uri.port)
+      http.use_ssl = true
+      request = Net::HTTP::Get.new(uri.request_uri)
+      requestResponse = http.request(request)
+
+      @moreResults = false
+
+      super(requestResponse, true)
+    end
+  end
+end

data/lib/exact-target-api/create_wsdl.rb

@@ -0,0 +1,53 @@
+module ET
+  class CreateWSDL
+    def initialize(path)
+      # Get the header info for the correct wsdl
+      response = HTTPI.head(@wsdl)
+      if response && response.code >= 200 && response.code <= 400
+        header = response.headers
+        # Check when the WSDL was last modified
+        modifiedTime = Date.parse(header['last-modified'])
+        p = wsdl_file(path)
+        # Check if a local file already exists
+        if File.file?(p) && File.readable?(p) && !File.zero?(p)
+          createdTime = File.new(p).mtime.to_date
+
+          # Check if the locally created WSDL older than the production WSDL
+          createIt = createdTime < modifiedTime
+        else
+          createIt = true
+        end
+
+        if createIt
+          res = open(@wsdl).read
+          File.open(p, 'w+') do |f|
+            f.write(res)
+          end
+        end
+
+        @status = response.code
+      else
+        @status = response.code
+      end
+
+    end
+
+    def wsdl_file(path)
+      path + '/ExactTargetWSDL.xml'
+    end
+
+    def stringify_keys!(params)
+      params.keys.each do |key|
+        params[key.to_s] = params.delete(key)
+      end
+      params
+    end
+
+    def symbolize_keys!(params)
+      params.keys.each do |key|
+        params[key.to_sym] = params.delete(key)
+      end
+      params
+    end
+  end
+end

data/lib/exact-target-api/cud_support.rb

@@ -0,0 +1,19 @@
+module ET
+  class CUDSupport < ET::GetSupport
+    def initialize
+      super
+    end
+
+    def post(data)
+      ET::Post.new(@client, @obj, data)
+    end
+
+    def patch(data)
+      ET::Patch.new(@client, @obj, data)
+    end
+
+    def delete(data)
+      ET::Delete.new(@client, @obj, data)
+    end
+  end
+end

data/lib/exact-target-api/cud_support_rest.rb

@@ -0,0 +1,72 @@
+module ET
+  class CUDSupportRest < ET::GetSupportRest
+    def initialize
+      super
+    end
+
+    def post
+      completeURL = @endpoint
+
+      if @props and @props.is_a? Hash then
+        @props.each do |k,v|
+          if @urlProps.include?(k) then
+            completeURL.sub!("{#{k}}", v)
+          end
+        end
+      end
+
+      @urlPropsRequired.each do |value|
+        if !@props || !@props.has_key?(value) then
+          raise "Unable to process request due to missing required prop: #{value}"
+        end
+      end
+
+      # Clean Optional Parameters from Endpoint URL first
+      @urlProps.each do |value|
+        completeURL.sub!("/{#{value}}", "")
+      end
+
+      ET::PostRest.new(@authStub, completeURL, @props)
+    end
+
+    def patch
+      completeURL = @endpoint
+      # All URL Props are required when doing Patch
+      @urlProps.each do |value|
+        if !@props || !@props.has_key?(value) then
+          raise "Unable to process request due to missing required prop: #{value}"
+        end
+      end
+
+      if @props and @props.is_a? Hash then
+        @props.each do |k,v|
+          if @urlProps.include?(k) then
+            completeURL.sub!("{#{k}}", v)
+          end
+        end
+      end
+
+      ET::PatchRest.new(@authStub, completeURL, @props)
+    end
+
+    def delete
+      completeURL = @endpoint
+      # All URL Props are required when doing Patch
+      @urlProps.each do |value|
+        if !@props || !@props.has_key?(value) then
+          raise "Unable to process request due to missing required prop: #{value}"
+        end
+      end
+
+      if @props and @props.is_a? Hash then
+        @props.each do |k,v|
+          if @urlProps.include?(k) then
+            completeURL.sub!("{#{k}}", v)
+          end
+        end
+      end
+
+      ET::DeleteRest.new(@authStub, completeURL)
+    end
+  end
+end

data/lib/exact-target-api/data_extension.rb

@@ -0,0 +1,226 @@
+module ET
+  class DataExtension < ET::CUDSupport
+    attr_accessor :columns
+
+    def initialize
+      super
+      @obj = 'DataExtension'
+    end
+
+    def post
+      originalProps = @props
+
+      if @props.is_a? Array
+        multiDE = []
+        @props.each { |currentDE|
+          currentDE['Fields'] = {}
+          currentDE['Fields']['Field'] = []
+          currentDE['columns'].each { |key|
+            currentDE['Fields']['Field'].push(key)
+          }
+          currentDE.delete('columns')
+          multiDE.push(currentDE.dup)
+        }
+
+        @props = multiDE
+      else
+        @props['Fields'] = {'Field' => []}
+
+        @columns.each do |key|
+          @props['Fields']['Field'].push(key)
+        end
+      end
+
+      obj = super
+      @props = originalProps
+      obj
+    end
+
+    def patch
+      @props['Fields'] = {}
+      @props['Fields']['Field'] = []
+      @columns.each { |key|
+        @props['Fields']['Field'].push(key)
+      }
+      obj = super
+      @props.delete("Fields")
+      obj
+    end
+
+    class Column < ET::GetSupport
+      def initialize
+        super
+        @obj = 'DataExtensionField'
+      end
+
+      def get
+
+        if props and props.is_a? Array then
+          @props = props
+        end
+
+        if @props and @props.is_a? Hash then
+          @props = @props.keys
+        end
+
+        if filter and filter.is_a? Hash then
+          @filter = filter
+        end
+
+        fixCustomerKey = false
+        if filter and filter.is_a? Hash
+          @filter = filter
+          if @filter.has_key?("Property") && @filter["Property"] == "CustomerKey"
+            @filter["Property"]  = "DataExtension.CustomerKey"
+            fixCustomerKey = true
+          end
+        end
+
+        obj = ET::Get.new(@authStub, @obj, @props, @filter)
+        @lastRequestID = obj.request_id
+
+        if fixCustomerKey then
+          @filter["Property"] = "CustomerKey"
+        end
+
+        obj
+      end
+    end
+
+    class Row < ET::CUDSupport
+      attr_accessor :Name, :CustomerKey
+
+      def initialize
+        super
+        @obj = "DataExtensionObject"
+      end
+
+      def get
+        getName
+        if props and props.is_a? Array then
+          @props = props
+        end
+
+        if @props and @props.is_a? Hash then
+          @props = @props.keys
+        end
+
+        if filter and filter.is_a? Hash then
+          @filter = filter
+        end
+
+        obj = ET::Get.new(@authStub, "DataExtensionObject[#{@Name}]", @props, @filter)
+        @lastRequestID = obj.request_id
+
+        obj
+      end
+
+      def post
+        getCustomerKey
+        originalProps = @props
+        currentProp = {}
+        ## FIX THIS
+        if @props.is_a? Array then
+=begin
+				multiRow = []
+				@props.each { |currentDE|
+
+					currentDE['columns'].each { |key|
+						currentDE['Fields'] = {}
+						currentDE['Fields']['Field'] = []
+						currentDE['Fields']['Field'].push(key)
+					}
+					currentDE.delete('columns')
+					multiRow.push(currentDE.dup)
+				}
+
+				@props = multiRow
+=end
+        else
+          currentFields = []
+
+          @props.each { |key,value|
+            currentFields.push({"Name" => key, "Value" => value})
+          }
+          currentProp['CustomerKey'] = @CustomerKey
+          currentProp['Properties'] = {}
+          currentProp['Properties']['Property'] = currentFields
+        end
+
+        obj = ET::Post.new(@authStub, @obj, currentProp)
+        @props = originalProps
+        obj
+      end
+
+      def patch
+        getCustomerKey
+        currentFields = []
+        currentProp = {}
+
+        @props.each { |key,value|
+          currentFields.push({"Name" => key, "Value" => value})
+        }
+        currentProp['CustomerKey'] = @CustomerKey
+        currentProp['Properties'] = {}
+        currentProp['Properties']['Property'] = currentFields
+
+        ET::Patch.new(@authStub, @obj, currentProp)
+      end
+
+      def delete
+        getCustomerKey
+        currentFields = []
+        currentProp = {}
+
+        @props.each { |key,value|
+          currentFields.push({"Name" => key, "Value" => value})
+        }
+        currentProp['CustomerKey'] = @CustomerKey
+        currentProp['Keys'] = {}
+        currentProp['Keys']['Key'] = currentFields
+
+        ET::Delete.new(@authStub, @obj, currentProp)
+      end
+
+      private
+
+      def getCustomerKey
+        if @CustomerKey.nil?
+          if @CustomerKey.nil? && @Name.nil?
+            raise 'Unable to process DataExtension::Row request due to CustomerKey and Name not being defined on ET::DatExtension::row'
+          else
+            de = ET::DataExtension.new
+            de.authStub = @authStub
+            de.props = ["Name","CustomerKey"]
+            de.filter = {'Property' => 'CustomerKey','SimpleOperator' => 'equals','Value' => @Name}
+            getResponse = de.get
+            if getResponse.status && (getResponse.results.length == 1) then
+              @CustomerKey = getResponse.results[0][:customer_key]
+            else
+              raise 'Unable to process DataExtension::Row request due to unable to find DataExtension based on Name'
+            end
+          end
+        end
+      end
+
+      def getName
+        if @Name.nil?
+          if @CustomerKey.nil? && @Name.nil?
+            raise 'Unable to process DataExtension::Row request due to CustomerKey and Name not being defined on ET::DatExtension::row'
+          else
+            de = ET::DataExtension.new
+            de.authStub = @authStub
+            de.props = ["Name","CustomerKey"]
+            de.filter = {'Property' => 'CustomerKey','SimpleOperator' => 'equals','Value' => @CustomerKey}
+            getResponse = de.get
+            if getResponse.status && getResponse.results.length == 1
+              @Name = getResponse.results[0][:name]
+            else
+              raise 'Unable to process DataExtension::Row request due to unable to find DataExtension based on CustomerKey'
+            end
+          end
+        end
+      end
+    end
+  end
+end