SNS ListSubscriptions

lib/fog/aws/parsers/sns/list_subscriptions.rb

@@ -0,0 +1,29 @@
+module Fog
+  module Parsers
+    module AWS
+      module SNS
+
+        class ListSubscriptions < Fog::Parsers::Base
+
+          def reset
+            @response = { 'Subscriptions' => [] }
+            @subscription = {}
+          end
+
+          def end_element(name)
+            case name
+            when "TopicArn", "Protocol", "SubscriptionArn", "Owner", "Endpoint"
+              @subscription[name] = @value
+            when "member"
+              @response['Subscriptions'] << @subscription
+              @subscription = {}
+            when 'RequestId', 'NextToken'
+              @response[name] = @value
+            end
+          end
+        end
+
+      end
+    end
+  end
+end

lib/fog/aws/requests/sns/list_subscriptions.rb

@@ -0,0 +1,27 @@
+module Fog
+  module AWS
+    class SNS
+      class Real
+
+        require 'fog/aws/parsers/sns/list_subscriptions'
+
+        def list_subscriptions(options = {})
+          request({
+            'Action' => 'ListSubscriptions',
+            :parser  => Fog::Parsers::AWS::SNS::ListSubscriptions.new
+          }.merge!(options))
+        end
+
+      end
+
+      class Mock
+
+        def list_subscriptions
+          Fog::Mock.not_implemented
+        end
+
+      end
+
+    end
+  end
+end

lib/fog/aws/sns.rb

@@ -6,8 +6,9 @@ module Fog
       recognizes :host, :path, :port, :scheme, :persistent
 
       request_path 'fog/aws/requests/sns'
-      request :list_topics
       request :get_topic_attributes
+      request :list_subscriptions
+      request :list_topics
 
       class Mock