From a519d2ef8580600bc04560a3e1e7988303df7071 Mon Sep 17 00:00:00 2001
From: Rupak Ganguly <rupakg@gmail.com>
Date: Wed, 15 Jun 2011 02:13:18 -0400
Subject: [PATCH] Add a storage service implementation to the HP provider.

---
 lib/fog/storage/hp.rb | 135 ++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 135 insertions(+)
 create mode 100644 lib/fog/storage/hp.rb

diff --git a/lib/fog/storage/hp.rb b/lib/fog/storage/hp.rb
new file mode 100644
index 000000000..6775e1dcf
--- /dev/null
+++ b/lib/fog/storage/hp.rb
@@ -0,0 +1,135 @@
+module Fog
+  module HP
+    class Storage < Fog::Service
+
+      requires    :hp_password, :hp_username
+      recognizes  :hp_auth_url, :hp_servicenet, :hp_cdn_ssl, :persistent
+      recognizes  :provider # remove post deprecation
+
+#      model_path 'fog/storage/models/hp'
+#      model       :directory
+#      collection  :directories
+#      model       :file
+#      collection  :files
+
+      request_path 'fog/storage/requests/hp'
+      request :delete_container
+#      request :delete_object
+      request :get_container
+      request :get_containers
+#      request :get_object
+#      request :head_container
+#      request :head_containers
+#      request :head_object
+      request :put_container
+#      request :put_object
+
+      module Utils
+
+        def cdn
+          @cdn ||= Fog::CDN.new(
+            :provider     => 'HP',
+            :hp_password  => @hp_password,
+            :hp_username  => @hp_username
+          )
+        end
+
+      end
+
+      class Mock
+        include Utils
+
+        def self.data
+          @data ||= Hash.new do |hash, key|
+            hash[key] = {}
+          end
+        end
+
+        def self.reset
+          @data = nil
+        end
+
+        def initialize(options={})
+          unless options.delete(:provider)
+            location = caller.first
+            warning = "[yellow][WARN] Fog::HP::Storage.new is deprecated, use Fog::Storage.new(:provider => 'HP') instead[/]"
+            warning << " [light_black](" << location << ")[/] "
+            Formatador.display_line(warning)
+          end
+
+          require 'mime/types'
+          @hp_password = options[:hp_password]
+          @hp_username = options[:hp_username]
+        end
+
+        def data
+          self.class.data[@hp_username]
+        end
+
+        def reset_data
+          self.class.data.delete(@hp_username)
+        end
+
+      end
+
+      class Real
+        include Utils
+        attr_reader :hp_cdn_ssl
+
+        def initialize(options={})
+          unless options.delete(:provider)
+            location = caller.first
+            warning = "[yellow][WARN] Fog::HP::Storage.new is deprecated, use Fog::Storage.new(:provider => 'HP') instead[/]"
+            warning << " [light_black](" << location << ")[/] "
+            Formatador.display_line(warning)
+          end
+
+          require 'mime/types'
+          require 'json'
+          @hp_password = options[:hp_password]
+          @hp_username = options[:hp_username]
+          @hp_cdn_ssl = options[:hp_cdn_ssl]
+          credentials = Fog::HP.authenticate(options)
+          @auth_token = credentials['X-Auth-Token']
+
+          uri = URI.parse(credentials['X-Storage-Url'])
+          @host   = options[:hp_servicenet] == true ? "snet-#{uri.host}" : uri.host
+          @path   = uri.path
+          @port   = uri.port
+          @scheme = uri.scheme
+          Excon.ssl_verify_peer = false if options[:hp_servicenet] == true
+          @connection = Fog::Connection.new("#{@scheme}://#{@host}:#{@port}", options[:persistent])
+        end
+
+        def reload
+          @connection.reset
+        end
+
+        def request(params, parse_json = true, &block)
+          begin
+            response = @connection.request(params.merge!({
+              :headers  => {
+                'Content-Type' => 'application/json',
+                'X-Auth-Token' => @auth_token
+              }.merge!(params[:headers] || {}),
+              :host     => @host,
+              :path     => "#{@path}/#{params[:path]}",
+            }), &block)
+          rescue Excon::Errors::HTTPStatusError => error
+            raise case error
+            when Excon::Errors::NotFound
+              Fog::HP::Storage::NotFound.slurp(error)
+            else
+              error
+            end
+          end
+          if !response.body.empty? && parse_json && response.headers['Content-Type'] =~ %r{application/json}
+            response.body = JSON.parse(response.body)
+          end
+          response
+        end
+
+      end
+    end
+  end
+end