fog-maestrodev 1.7.0.20121114190951

data/tests/aws/requests/glacier/multipart_upload_tests.rb

@@ -0,0 +1,30 @@
+Shindo.tests('AWS::Glacier | glacier archive tests', ['aws']) do
+  pending if Fog.mocking?
+
+  Fog::AWS[:glacier].create_vault('Fog-Test-Vault-upload')
+
+  tests('initiate and abort') do
+    id = Fog::AWS[:glacier].initiate_multipart_upload('Fog-Test-Vault-upload', 1024*1024).headers['x-amz-multipart-upload-id']
+    returns(true){ Fog::AWS[:glacier].list_multipart_uploads('Fog-Test-Vault-upload').body['UploadsList'].collect {|item| item['MultipartUploadId']}.include?(id)}
+    Fog::AWS[:glacier].abort_multipart_upload('Fog-Test-Vault-upload', id)
+    returns(false){ Fog::AWS[:glacier].list_multipart_uploads('Fog-Test-Vault-upload').body['UploadsList'].collect {|item| item['MultipartUploadId']}.include?(id)}
+  end
+
+
+  tests('do multipart upload') do
+    hash = Fog::AWS::Glacier::TreeHash.new
+    id = Fog::AWS[:glacier].initiate_multipart_upload('Fog-Test-Vault-upload', 1024*1024).headers['x-amz-multipart-upload-id']
+    part = 't'*1024*1024
+    hash_for_part = hash.add_part(part)
+    Fog::AWS[:glacier].upload_part('Fog-Test-Vault-upload', id, part, 0, hash_for_part)
+
+    part_2 = 'u'*1024*1024
+    hash_for_part_2 = hash.add_part(part_2)
+    Fog::AWS[:glacier].upload_part('Fog-Test-Vault-upload', id, part_2, 1024*1024, hash_for_part_2)
+
+    archive = Fog::AWS[:glacier].complete_multipart_upload('Fog-Test-Vault-upload', id, 2*1024*1024, hash.hexdigest).headers['x-amz-archive-id']
+
+    Fog::AWS[:glacier].delete_archive('Fog-Test-Vault-upload', archive)    
+  #amazon won't let us delete the vault because it has been written to in the past day
+  end
+end

data/tests/aws/requests/glacier/tree_hash_tests.rb

@@ -0,0 +1,63 @@
+Shindo.tests('AWS::Glacier | glacier tree hash calcuation', ['aws']) do
+
+  tests('tree_hash(single part < 1MB)') do
+    returns(Digest::SHA256.hexdigest('')) { Fog::AWS::Glacier::TreeHash.digest('')}
+  end
+
+  tests('tree_hash(multibyte characters)') do
+    body = ("\xC2\xA1" * 1024*1024)
+    body.force_encoding('UTF-8') if body.respond_to? :encoding
+
+    expected = Digest::SHA256.hexdigest(
+                Digest::SHA256.digest("\xC2\xA1" * 1024*512) + Digest::SHA256.digest("\xC2\xA1" * 1024*512)
+              )
+    returns(expected) { Fog::AWS::Glacier::TreeHash.digest(body)}
+  end
+
+  tests('tree_hash(power of 2 number of parts)') do
+    body = ('x' * 1024*1024) + ('y'*1024*1024) + ('z'*1024*1024) + ('t'*1024*1024)
+    expected = Digest::SHA256.hexdigest(
+                 Digest::SHA256.digest(
+                    Digest::SHA256.digest('x' * 1024*1024) + Digest::SHA256.digest('y' * 1024*1024)
+                 ) +
+                 Digest::SHA256.digest(
+                   Digest::SHA256.digest('z' * 1024*1024) + Digest::SHA256.digest('t' * 1024*1024)
+                 )
+               )
+
+    returns(expected) { Fog::AWS::Glacier::TreeHash.digest(body)}
+  end
+
+  tests('tree_hash(non power of 2 number of parts)') do
+    body = ('x' * 1024*1024) + ('y'*1024*1024) + ('z'*1024*1024)
+    expected = Digest::SHA256.hexdigest(
+                 Digest::SHA256.digest(
+                    Digest::SHA256.digest('x' * 1024*1024) + Digest::SHA256.digest('y' * 1024*1024)
+                 ) +
+                 Digest::SHA256.digest('z' * 1024*1024)
+               )
+
+    returns(expected) { Fog::AWS::Glacier::TreeHash.digest(body)}
+  end
+
+  tests('multipart') do
+    tree_hash = Fog::AWS::Glacier::TreeHash.new
+    part = ('x' * 1024*1024) + ('y'*1024*1024)
+    returns(Fog::AWS::Glacier::TreeHash.digest(part)) { tree_hash.add_part part }
+
+    tree_hash.add_part('z'* 1024*1024 + 't'*1024*1024)
+
+    expected = Digest::SHA256.hexdigest(
+                 Digest::SHA256.digest(
+                    Digest::SHA256.digest('x' * 1024*1024) + Digest::SHA256.digest('y' * 1024*1024)
+                 ) +
+                 Digest::SHA256.digest(
+                   Digest::SHA256.digest('z' * 1024*1024) + Digest::SHA256.digest('t' * 1024*1024)
+                 )
+               )
+    returns(expected) { tree_hash.hexdigest}
+
+  end
+
+
+end

data/tests/aws/requests/glacier/vault_tests.rb

@@ -0,0 +1,35 @@
+Shindo.tests('AWS::Glacier | glacier vault requests', ['aws']) do
+  pending if Fog.mocking?
+
+  topic_arn = Fog::AWS[:sns].create_topic( 'fog_test_glacier_topic').body['TopicArn']
+  Fog::AWS[:glacier].create_vault('Fog-Test-Vault')
+
+  tests('list_vaults') do
+    returns(true){Fog::AWS[:glacier].list_vaults.body['VaultList'].collect {|data| data['VaultName']}.include?('Fog-Test-Vault')}
+  end
+
+  tests('describe_vault') do
+    returns('Fog-Test-Vault'){Fog::AWS[:glacier].describe_vault('Fog-Test-Vault').body['VaultName']}
+  end
+
+  tests('set_vault_notification_configuration') do
+    Fog::AWS[:glacier].set_vault_notification_configuration 'Fog-Test-Vault', topic_arn, ['ArchiveRetrievalCompleted']
+  end
+
+  tests('get_vault_notification_configuration') do
+    returns('SNSTopic' => topic_arn, 'Events' => ['ArchiveRetrievalCompleted']){ Fog::AWS[:glacier].get_vault_notification_configuration( 'Fog-Test-Vault').body}
+  end
+
+  tests('delete_vault_notification_configuration') do
+    Fog::AWS[:glacier].delete_vault_notification_configuration( 'Fog-Test-Vault')
+    raises(Excon::Errors::NotFound){Fog::AWS[:glacier].get_vault_notification_configuration( 'Fog-Test-Vault')}
+  end
+
+  tests('delete_vault') do
+    Fog::AWS[:glacier].delete_vault( 'Fog-Test-Vault')
+    raises(Excon::Errors::NotFound){Fog::AWS[:glacier].describe_vault( 'Fog-Test-Vault')}
+  end
+
+  Fog::AWS[:sns].delete_topic topic_arn
+
+end

data/tests/aws/requests/iam/access_key_tests.rb

@@ -0,0 +1,53 @@
+Shindo.tests('AWS::IAM | access key requests', ['aws']) do
+
+  Fog::AWS[:iam].create_user('fog_access_key_tests')
+
+  tests('success') do
+
+    @access_key_format = {
+      'AccessKey' => {
+        'AccessKeyId'     => String,
+        'UserName'        => String,
+        'SecretAccessKey' => String,
+        'Status'          => String
+      },
+      'RequestId' => String
+    }
+
+    tests("#create_access_key('UserName' => 'fog_access_key_tests')").formats(@access_key_format) do
+      data = Fog::AWS[:iam].create_access_key('UserName' => 'fog_access_key_tests').body
+      @access_key_id = data['AccessKey']['AccessKeyId']
+      data
+    end
+
+    @access_keys_format = {
+      'AccessKeys' => [{
+        'AccessKeyId' => String,
+        'Status'      => String
+      }],
+      'IsTruncated' => Fog::Boolean,
+      'RequestId'   => String
+    }
+
+    tests("#list_access_keys('Username' => 'fog_access_key_tests')").formats(@access_keys_format) do
+      Fog::AWS[:iam].list_access_keys('UserName' => 'fog_access_key_tests').body
+    end
+
+    tests("#update_access_key('#{@access_key_id}', 'Inactive', 'UserName' => 'fog_access_key_tests')").formats(AWS::IAM::Formats::BASIC) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].update_access_key(@access_key_id, 'Inactive', 'UserName' => 'fog_access_key_tests').body
+    end
+
+    tests("#delete_access_key('#{@access_key_id}', 'UserName' => 'fog_access_key_tests)").formats(AWS::IAM::Formats::BASIC) do
+      Fog::AWS[:iam].delete_access_key(@access_key_id, 'UserName' => 'fog_access_key_tests').body
+    end
+
+  end
+
+  tests('failure') do
+    test('failing conditions')
+  end
+
+  Fog::AWS[:iam].delete_user('fog_access_key_tests')
+
+end

data/tests/aws/requests/iam/group_policy_tests.rb

@@ -0,0 +1,42 @@
+Shindo.tests('AWS::IAM | group policy requests', ['aws']) do
+
+  unless Fog.mocking?
+    Fog::AWS[:iam].create_group('fog_group_policy_tests')
+  end
+
+  tests('success') do
+
+    @policy = {"Statement" => [{"Effect" => "Allow", "Action" => "*", "Resource" => "*"}]}
+
+    tests("#put_group_policy('fog_group_policy_tests', 'fog_policy', #{@policy.inspect})").formats(AWS::IAM::Formats::BASIC) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].put_group_policy('fog_group_policy_tests', 'fog_policy', @policy).body
+    end
+
+    @group_policies_format = {
+      'IsTruncated' => Fog::Boolean,
+      'PolicyNames' => [String],
+      'RequestId'   => String
+    }
+
+    tests("list_group_policies('fog_group_policy_tests')").formats(@group_policies_format) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].list_group_policies('fog_group_policy_tests').body
+    end
+
+    tests("#delete_group_policy('fog_group_policy_tests', 'fog_policy')").formats(AWS::IAM::Formats::BASIC) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].delete_group_policy('fog_group_policy_tests', 'fog_policy').body
+    end
+
+  end
+
+  tests('failure') do
+    test('failing conditions')
+  end
+
+  unless Fog.mocking?
+    Fog::AWS[:iam].delete_group('fog_group_policy_tests')
+  end
+
+end

data/tests/aws/requests/iam/group_tests.rb

@@ -0,0 +1,44 @@
+Shindo.tests('AWS::IAM | group requests', ['aws']) do
+
+  tests('success') do
+
+    @group_format = {
+      'Group' => {
+        'Arn'       => String,
+        'GroupId'   => String,
+        'GroupName' => String,
+        'Path'      => String
+      },
+      'RequestId' => String
+    }
+
+    tests("#create_group('fog_group')").formats(@group_format) do
+      Fog::AWS[:iam].create_group('fog_group').body
+    end
+
+    @groups_format = {
+      'Groups' => [{
+        'Arn'       => String,
+        'GroupId'   => String,
+        'GroupName' => String,
+        'Path'      => String
+      }],
+      'IsTruncated' => Fog::Boolean,
+      'RequestId'   => String
+    }
+
+    tests("#list_groups").formats(@groups_format) do
+      Fog::AWS[:iam].list_groups.body
+    end
+
+    tests("#delete_group('fog_group')").formats(AWS::IAM::Formats::BASIC) do
+      Fog::AWS[:iam].delete_group('fog_group').body
+    end
+
+  end
+
+  tests('failure') do
+    test('failing conditions')
+  end
+
+end

data/tests/aws/requests/iam/helper.rb

@@ -0,0 +1,104 @@
+class AWS
+
+  module IAM
+    # A self-signed test keypair. Generated using the command:
+    # openssl req -new -newkey rsa:1024 -days 3650 -nodes -x509 -keyout server-private.key -out server-public.crt
+    # NB: Amazon returns an error on extraneous linebreaks
+    SERVER_CERT_PUBLIC_KEY = %{-----BEGIN CERTIFICATE-----
+MIIDQzCCAqygAwIBAgIJAJaZ8wH+19AtMA0GCSqGSIb3DQEBBQUAMHUxCzAJBgNV
+BAYTAlVTMREwDwYDVQQIEwhOZXcgWW9yazERMA8GA1UEBxMITmV3IFlvcmsxHzAd
+BgNVBAoTFkZvZyBUZXN0IFNuYWtlb2lsIENlcnQxHzAdBgNVBAsTFkZvZyBUZXN0
+IFNuYWtlb2lsIENlcnQwHhcNMTEwNTA3MTc0MDU5WhcNMjEwNTA0MTc0MDU5WjB1
+MQswCQYDVQQGEwJVUzERMA8GA1UECBMITmV3IFlvcmsxETAPBgNVBAcTCE5ldyBZ
+b3JrMR8wHQYDVQQKExZGb2cgVGVzdCBTbmFrZW9pbCBDZXJ0MR8wHQYDVQQLExZG
+b2cgVGVzdCBTbmFrZW9pbCBDZXJ0MIGfMA0GCSqGSIb3DQEBAQUAA4GNADCBiQKB
+gQC0CR76sovjdmpWRmEaf8XaG+nGe7czhpdLKkau2b16VtSjkPctxPL5U4vaMxQU
+boLPr+9oL+9fSYN31VzDD4hyaeGoeI5fhnGeqk71kq5uHONBOQUMbZbBQ8PVd9Sd
+k+y9JJ6E5fC+GhLL5I+y2DK7syBzyymq1Wi6rPp1XXF7AQIDAQABo4HaMIHXMB0G
+A1UdDgQWBBRfqBkpU/jEV324748fq6GJM80iVTCBpwYDVR0jBIGfMIGcgBRfqBkp
+U/jEV324748fq6GJM80iVaF5pHcwdTELMAkGA1UEBhMCVVMxETAPBgNVBAgTCE5l
+dyBZb3JrMREwDwYDVQQHEwhOZXcgWW9yazEfMB0GA1UEChMWRm9nIFRlc3QgU25h
+a2VvaWwgQ2VydDEfMB0GA1UECxMWRm9nIFRlc3QgU25ha2VvaWwgQ2VydIIJAJaZ
+8wH+19AtMAwGA1UdEwQFMAMBAf8wDQYJKoZIhvcNAQEFBQADgYEAUV6NDdLHKNhl
+ACtzLycIhlMTmDr0xBeIBx3lpgw2K0+4oefMS8Z17eeZPeNodxnz56juJm81BZwt
+DF3qnnPyArLFx0HLB7wQdm9xYVIqQuLO+V6GRuOd+uSX//aDLDZhwbERf35hoyto
+Jfk4gX/qwuRFNy0vjQeTzdvhB1igG/w=
+-----END CERTIFICATE-----
+}
+
+    SERVER_CERT_PRIVATE_KEY = %{-----BEGIN RSA PRIVATE KEY-----
+MIICXAIBAAKBgQC0CR76sovjdmpWRmEaf8XaG+nGe7czhpdLKkau2b16VtSjkPct
+xPL5U4vaMxQUboLPr+9oL+9fSYN31VzDD4hyaeGoeI5fhnGeqk71kq5uHONBOQUM
+bZbBQ8PVd9Sdk+y9JJ6E5fC+GhLL5I+y2DK7syBzyymq1Wi6rPp1XXF7AQIDAQAB
+AoGANjjRBbwkeXs+h4Fm2W5GDmx9ufOkt3X/tvmilCKr+F6SaDjO2RAKBaFt62ea
+0pR9/UMFnaFiPJaNa9fsuirBcwId+RizruEp+7FGziM9mC5kcE7WKZrXgGGnLtqg
+4x5twVLArgp0ji7TA18q/74uTrI4az8H5iTY4n29ORlLmmkCQQDsGMuLEgGHgN5Y
+1c9ax1DT/rUXKxnqsIrijRkgbiTncHAArFJ88c3yykWqGvYnSFwMS8DSWiPyPaAI
+nNNlb/fPAkEAwzZ4CfvJ+OlE++rTPH9jemC89dnxC7EFGuWJmwdadnev8EYguvve
+cdGdGttD7QsZKpcz5mDngOUghbVm8vBELwJAMHfOoVgq9DRicP5DuTEdyMeLSZxR
+j7p6aJPqypuR++k7NQgrTvcc/nDD6G3shpf2PZf3l7dllb9M8TewtixMRQJBAIdX
+c0AQtoYBTJePxiYyd8i32ypkkK83ar+sFoxKO9jYwD1IkZax2xZ0aoTdMindQPR7
+Yjs+QiLmOHcbPqX+GHcCQERsSn0RjzKmKirDntseMB59BB/cEN32+gMDVsZuCfb+
+fOy2ZavFl13afnhbh2/AjKeDhnb19x/uXjF7JCUtwpA=
+-----END RSA PRIVATE KEY-----
+}
+
+    # openssl pkcs8 -nocrypt -topk8 -in SERVER_CERT_PRIVATE_KEY.key -outform pem
+    SERVER_CERT_PRIVATE_KEY_PKCS8 = %{-----BEGIN PRIVATE KEY-----
+MIICdgIBADANBgkqhkiG9w0BAQEFAASCAmAwggJcAgEAAoGBALQJHvqyi+N2alZG
+YRp/xdob6cZ7tzOGl0sqRq7ZvXpW1KOQ9y3E8vlTi9ozFBRugs+v72gv719Jg3fV
+XMMPiHJp4ah4jl+GcZ6qTvWSrm4c40E5BQxtlsFDw9V31J2T7L0knoTl8L4aEsvk
+j7LYMruzIHPLKarVaLqs+nVdcXsBAgMBAAECgYA2ONEFvCR5ez6HgWbZbkYObH25
+86S3df+2+aKUIqv4XpJoOM7ZEAoFoW3rZ5rSlH39QwWdoWI8lo1r1+y6KsFzAh35
+GLOu4Sn7sUbOIz2YLmRwTtYpmteAYacu2qDjHm3BUsCuCnSOLtMDXyr/vi5Osjhr
+PwfmJNjifb05GUuaaQJBAOwYy4sSAYeA3ljVz1rHUNP+tRcrGeqwiuKNGSBuJOdw
+cACsUnzxzfLKRaoa9idIXAxLwNJaI/I9oAic02Vv988CQQDDNngJ+8n46UT76tM8
+f2N6YLz12fELsQUa5YmbB1p2d6/wRiC6+95x0Z0a20PtCxkqlzPmYOeA5SCFtWby
+8EQvAkAwd86hWCr0NGJw/kO5MR3Ix4tJnFGPunpok+rKm5H76Ts1CCtO9xz+cMPo
+beyGl/Y9l/eXt2WVv0zxN7C2LExFAkEAh1dzQBC2hgFMl4/GJjJ3yLfbKmSQrzdq
+v6wWjEo72NjAPUiRlrHbFnRqhN0yKd1A9HtiOz5CIuY4dxs+pf4YdwJARGxKfRGP
+MqYqKsOe2x4wHn0EH9wQ3fb6AwNWxm4J9v587LZlq8WXXdp+eFuHb8CMp4OGdvX3
+H+5eMXskJS3CkA==
+-----END PRIVATE KEY-----
+}
+
+    SERVER_CERT_PRIVATE_KEY_MISMATCHED = %{-----BEGIN RSA PRIVATE KEY-----
+MIIEowIBAAKCAQEAyITMqYJMzkPMcaC+x0W2hnZVW99RXzLR8RYyD3xo2AotdJKx
+1DXR4ryegAjsnAhJVwVtxqzPcBMq/XS0hNtWFfKzf+vMZl7uAqotGjURUV8SRQPA
+8tT07MemD929xRSV2vTnVATiPn87vcu5igsZ01+Ewd6rGythmvcZD13vtZ4rx0c8
+kQJV3ok/CkFaIgDR6Or1NZBCtcIVK9nvqAmYMp6S5mWUMIsl/1qYPerpefrSJjlk
+J2+jyLp0LHarbzjkzzAdOkBRX1hPkk6cisBeQIpx35shLzfCe8U25XNqquP+ftcu
+JZ0Wjw+C4pTIzfgdGXmGGtBFY13BwiJvd4/i2wIDAQABAoIBABk8XWWX+IKdFcXX
+LSt3IpmZmvSNDniktLday8IXLjrCTSY2sBq9C0U159zFQsIAaPqCvGYcqZ65StfL
+MEzoLdVlTiHzUy4vFFVRhYue0icjh/EXn9jv5ENIfSXSCmgbRyDfYZ25X5/t817X
+nOo6q21mwBaGJ5KrywTtxEGi2OBKZrIbBrpJLhCXJc5xfuKT6DRa9X/OBSBiGKJP
+V9wHcZJkPG1HnC8izvQ37kNN/NyYE+8AGdYXQVNbTHq/emNLbEbdcR3tpGZamM9Q
+TwG5WsDPAnXnRsEEYvlVTOBI6DqdvkyBxM35iqd5aAc6i/Iu04Unfhhc5pAXmmIB
+a22GHcECgYEA7OheVHDDP8quO2qZjqaTlMbMnXnrFXJ41llFMoivTW9EmlTl9dOC
+fnkHEBcFCTPV0m6S2AQjt9QOgPqCFAq1r3J/xvEGBtl/UKnPRmjqXFgl0ENtGn5t
+w9wj/CsOPD05KkXXtXP+MyLPRD6gAxiQCTnXjvsLuVfP+E9BO2EQXScCgYEA2K2x
+QtcAAalrk3c0KzNVESzyFlf3ddEXThShVblSa7r6Ka9q9sxN/Xe2B+1oemPJm26G
+PfqKgxdKX0R0jl4f5pRBWKoarzWtUge/su8rx/xzbY/1hFKVuimtc6oTeU5xsOTS
+PVuCz4bxDTVhrbmKqbmMgqy17jfPA4BrF1FMRS0CgYBdMA4i4vQ6fIxKfOUIMsfs
+hsJn01RAbHXRwu2wMgnayMDQgEKwjtFO1GaN0rA9bXFXQ/1pET/HiJdn7qIKJihP
+aheO9rHrMdSdsx4AUTaWummtYUhiWobsuwRApeMEmQSKd0yhaI3+KVwkOQoSDbBi
+oKkE6gUzk7IPt4UuSUD5kwKBgQCjo/IGr8dieegz08gDhF4PfalLdJ4ATaxTHMOH
+sVFs6SY7Sy72Ou//qGRCcmsAW9KL35nkvw3S2Ukiz9lTGATxqC/93WIPxvMhy5Zc
+dcLT43XtXdanW5OWqBlGDEFu0O6OERIyoqUVRC1Ss2kUwdbWPbq/id5Qjbd7RoYa
+cxyt9QKBgF4bFLw1Iw2RBngQxIzoDbElEqme20FUyGGzyFQtxVwmwNr4OY5UzJzX
+7G6diyzGrvRX81Yw616ppKJUJVr/zRc13K+eRXXKtNpGkf35B+1NDDjjWZpIHqgx
+Xb9WSr07saxZQbxBPQyTlb0Q9Tu2djAq2/o/nYD1/50/fXUTuWMB
+-----END RSA PRIVATE KEY-----
+}
+
+    module Formats
+
+      BASIC = {
+        'RequestId' => String
+      }
+
+    end
+
+  end
+
+end

data/tests/aws/requests/iam/login_profile_tests.rb

@@ -0,0 +1,64 @@
+Shindo.tests('AWS::IAM | user requests', ['aws']) do
+
+  unless Fog.mocking?
+    Fog::AWS[:iam].create_user('fog_user')
+  end
+
+
+  tests('success') do
+    @login_profile_format = {
+      'LoginProfile' => {
+        'UserName'  => String,
+        'CreateDate'  => Time
+        
+      },
+      'RequestId' => String
+    }
+    
+    tests("#create_login_profile('fog_user')").formats(@login_profile_format) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].create_login_profile('fog_user', 'somepassword').body
+    end
+
+    tests("#get_login_profile('fog_user')").formats(@login_profile_format) do
+      pending if Fog.mocking?
+      result = Fog::AWS[:iam].get_login_profile('fog_user').body
+      returns('fog_user') {result['LoginProfile']['UserName']}
+      result
+    end
+
+    tests("#update_login_profile('fog_user')").formats(AWS::IAM::Formats::BASIC) do
+      pending if Fog.mocking?
+      begin
+        Fog::AWS[:iam].update_login_profile('fog_user', 'otherpassword').body
+      rescue Excon::Errors::Conflict #profile cannot be updated or deleted until it has finished creating; api provides no way of telling whether creation process complete
+        sleep 5
+        retry
+      end
+    end
+
+    tests("#delete_login_profile('fog_user')").formats(AWS::IAM::Formats::BASIC) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].delete_login_profile('fog_user').body
+    end
+
+    tests("#get_login_profile('fog_user')") do
+      pending if Fog.mocking?
+      raises(Excon::Errors::NotFound) {Fog::AWS[:iam].get_login_profile('fog_user')}
+    end
+
+  end
+
+  tests('failure') do
+    tests('get login profile for non existing user') do
+      pending if Fog.mocking?
+      raises(Fog::AWS::IAM::NotFound) { Fog::AWS[:iam].get_login_profile('idontexist')}
+      raises(Fog::AWS::IAM::NotFound) { Fog::AWS[:iam].delete_login_profile('fog_user')}
+    end
+  end
+
+
+  unless Fog.mocking?
+    Fog::AWS[:iam].delete_user('fog_user')
+  end
+end

data/tests/aws/requests/iam/role_tests.rb

@@ -0,0 +1,168 @@
+Shindo.tests('AWS::IAM | role requests', ['aws']) do
+  tests('success') do
+
+    @role = {
+        'Arn'       => String,
+        'AssumeRolePolicyDocument' => String,
+        'CreateDate' => Time,
+        'Path'      => String,
+        'RoleId'    => String,
+        'RoleName'  => String
+      }
+    @role_format = {
+      'Role' => @role,
+      'RequestId' => String
+    }
+    tests("#create_role('fogrole')").formats(@role_format) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].create_role('fogrole', Fog::AWS::IAM::EC2_ASSUME_ROLE_POLICY).body
+    end
+
+    tests("#get_role('fogrole')").formats(@role_format) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].get_role('fogrole').body
+    end
+
+    @list_roles_format = {
+      'Roles' => [{
+        'Arn'       => String,
+        'AssumeRolePolicyDocument' => String,
+        'CreateDate' => Time,
+        'Path'      => String,
+        'RoleId'    => String,
+        'RoleName'  => String
+      }],
+      'RequestId' => String,
+      'IsTruncated' => Fog::Boolean,
+    }
+
+    tests("#list_roles").formats(@list_roles_format) do
+      pending if Fog.mocking?
+      body = Fog::AWS[:iam].list_roles.body
+      returns(true){!! body['Roles'].detect {|role| role['RoleName'] == 'fogrole'}}
+      body
+    end
+
+    @profile_format = {
+      'InstanceProfile' => {
+        'Arn'       => String,
+        'CreateDate' => Time,
+        'Path'      => String,
+        'InstanceProfileId'    => String,
+        'InstanceProfileName'  => String,
+        'Roles' => [@role]
+      },
+      'RequestId' => String
+      
+    }
+    tests("#create_instance_profile('fogprofile')").formats(@profile_format) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].create_instance_profile('fogprofile').body
+    end
+
+    tests("#get_instance_profile('fogprofile')").formats(@profile_format) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].get_instance_profile('fogprofile').body
+    end
+
+    tests("#add_role_to_instance_profile('fogprofile','fogrole')").formats(AWS::IAM::Formats::BASIC) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].add_role_to_instance_profile('fogrole', 'fogprofile').body
+    end
+
+    @profiles_format = {
+      'InstanceProfiles' => [{
+        'Arn'       => String,
+        'CreateDate' => Time,
+        'Path'      => String,
+        'InstanceProfileId'    => String,
+        'InstanceProfileName'  => String,
+        'Roles' => [@role]
+      }],
+      'IsTruncated' => Fog::Boolean,
+      'RequestId' => String
+      
+    }
+    tests("list_instance_profiles_for_role('fogrole')").formats(@profiles_format) do
+      pending if Fog.mocking?
+      body = Fog::AWS[:iam].list_instance_profiles_for_role('fogrole').body
+      returns(['fogprofile']) { body['InstanceProfiles'].collect {|hash| hash['InstanceProfileName']}}      
+      body
+    end
+
+    tests("list_instance_profiles").formats(@profiles_format) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].list_instance_profiles.body
+    end
+
+    sample_policy = {"Statement" => [{"Effect" => "Allow", "Action" => "*", "Resource" => "*"}]}
+    
+    tests("put_role_policy").formats(AWS::IAM::Formats::BASIC) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].put_role_policy('fogrole', 'fogpolicy', sample_policy).body
+    end
+
+    @get_role_policy_format = {
+      'Policy' => {
+        'RoleName' => String, 
+        'PolicyName' => String,
+        'PolicyDocument' => Hash,
+      },
+      'RequestId' => String
+    }
+
+    tests("get_role_policy").formats(@get_role_policy_format) do
+      pending if Fog.mocking?
+      body = Fog::AWS[:iam].get_role_policy('fogrole','fogpolicy').body
+      returns('fogpolicy') {body['Policy']['PolicyName']}
+      returns(sample_policy){body['Policy']['PolicyDocument']}
+      body
+    end
+
+    @list_role_policies_format = {
+      'PolicyNames' => [String],
+      'IsTruncated' => Fog::Boolean,
+      'RequestId' => String      
+    }
+
+    tests("list_role_policies").formats(@list_role_policies_format) do
+      pending if Fog.mocking?
+      body = Fog::AWS[:iam].list_role_policies('fogrole').body
+
+      returns(['fogpolicy']) {body['PolicyNames']}
+      body
+    end
+
+    tests("delete_role_policy").formats(AWS::IAM::Formats::BASIC) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].delete_role_policy('fogrole', 'fogpolicy').body
+    end
+    
+    returns([]) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].list_role_policies('fogrole').body['PolicyNames']
+    end
+
+    tests("remove_role_from_instance_profile").formats(AWS::IAM::Formats::BASIC) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].remove_role_from_instance_profile('fogrole', 'fogprofile').body
+    end
+
+    returns([]) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].list_instance_profiles_for_role('fogrole').body['InstanceProfiles']
+    end
+
+    tests("#delete_instance_profile('fogprofile'").formats(AWS::IAM::Formats::BASIC) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].delete_instance_profile('fogprofile').body
+    end
+
+    tests("#delete_role('fogrole'").formats(AWS::IAM::Formats::BASIC) do
+      pending if Fog.mocking?
+      Fog::AWS[:iam].delete_role('fogrole').body
+    end
+  end
+
+end
+