2016-01-10 01:22:00 +01:00
package azurerm
2016-06-02 01:08:14 +02:00
import (
2016-10-25 20:29:24 +02:00
"context"
2016-06-02 01:08:14 +02:00
"fmt"
2016-07-27 23:57:02 +02:00
"log"
2016-06-02 01:08:14 +02:00
"net/http"
"regexp"
"strings"
2016-07-27 23:57:02 +02:00
"time"
2016-06-02 01:08:14 +02:00
"github.com/Azure/azure-sdk-for-go/arm/storage"
2016-07-27 23:57:02 +02:00
"github.com/hashicorp/terraform/helper/resource"
2016-06-02 01:08:14 +02:00
"github.com/hashicorp/terraform/helper/schema"
2016-10-17 18:49:07 +02:00
"github.com/hashicorp/terraform/helper/validation"
2016-06-02 01:08:14 +02:00
)
2016-10-05 16:22:28 +02:00
// The KeySource of storage.Encryption appears to require this value
// for Encryption services to work
var storageAccountEncryptionSource = "Microsoft.Storage"
2016-10-17 18:49:07 +02:00
const blobStorageAccountDefaultAccessTier = "Hot"
2016-06-02 01:08:14 +02:00
func resourceArmStorageAccount ( ) * schema . Resource {
return & schema . Resource {
Create : resourceArmStorageAccountCreate ,
Read : resourceArmStorageAccountRead ,
Update : resourceArmStorageAccountUpdate ,
Delete : resourceArmStorageAccountDelete ,
2016-07-13 13:08:44 +02:00
Importer : & schema . ResourceImporter {
State : schema . ImportStatePassthrough ,
} ,
2016-06-02 01:08:14 +02:00
Schema : map [ string ] * schema . Schema {
"name" : {
Type : schema . TypeString ,
Required : true ,
ForceNew : true ,
ValidateFunc : validateArmStorageAccountName ,
} ,
"resource_group_name" : {
2016-09-27 18:15:02 +02:00
Type : schema . TypeString ,
Required : true ,
ForceNew : true ,
DiffSuppressFunc : resourceAzurermResourceGroupNameDiffSuppress ,
2016-06-02 01:08:14 +02:00
} ,
"location" : {
Type : schema . TypeString ,
Required : true ,
ForceNew : true ,
StateFunc : azureRMNormalizeLocation ,
} ,
2016-10-17 18:49:07 +02:00
"account_kind" : {
Type : schema . TypeString ,
Optional : true ,
ForceNew : true ,
ValidateFunc : validation . StringInSlice ( [ ] string {
string ( storage . Storage ) ,
string ( storage . BlobStorage ) ,
} , true ) ,
Default : string ( storage . Storage ) ,
} ,
2016-06-02 01:08:14 +02:00
"account_type" : {
Type : schema . TypeString ,
Required : true ,
ValidateFunc : validateArmStorageAccountType ,
} ,
2016-10-17 18:49:07 +02:00
// Only valid for BlobStorage accounts, defaults to "Hot" in create function
"access_tier" : {
Type : schema . TypeString ,
Optional : true ,
Computed : true ,
ValidateFunc : validation . StringInSlice ( [ ] string {
string ( storage . Cool ) ,
string ( storage . Hot ) ,
} , true ) ,
} ,
2016-10-05 16:22:28 +02:00
"enable_blob_encryption" : {
Type : schema . TypeBool ,
Optional : true ,
} ,
2016-06-02 01:08:14 +02:00
"primary_location" : {
Type : schema . TypeString ,
Computed : true ,
} ,
"secondary_location" : {
Type : schema . TypeString ,
Computed : true ,
} ,
"primary_blob_endpoint" : {
Type : schema . TypeString ,
Computed : true ,
} ,
"secondary_blob_endpoint" : {
Type : schema . TypeString ,
Computed : true ,
} ,
"primary_queue_endpoint" : {
Type : schema . TypeString ,
Computed : true ,
} ,
"secondary_queue_endpoint" : {
Type : schema . TypeString ,
Computed : true ,
} ,
"primary_table_endpoint" : {
Type : schema . TypeString ,
Computed : true ,
} ,
"secondary_table_endpoint" : {
Type : schema . TypeString ,
Computed : true ,
} ,
// NOTE: The API does not appear to expose a secondary file endpoint
"primary_file_endpoint" : {
Type : schema . TypeString ,
Computed : true ,
} ,
"primary_access_key" : {
Type : schema . TypeString ,
Computed : true ,
} ,
"secondary_access_key" : {
Type : schema . TypeString ,
Computed : true ,
} ,
"tags" : tagsSchema ( ) ,
} ,
}
}
func resourceArmStorageAccountCreate ( d * schema . ResourceData , meta interface { } ) error {
2016-07-27 23:57:02 +02:00
client := meta . ( * ArmClient )
storageClient := client . storageServiceClient
2016-06-02 01:08:14 +02:00
resourceGroupName := d . Get ( "resource_group_name" ) . ( string )
storageAccountName := d . Get ( "name" ) . ( string )
2016-10-17 18:49:07 +02:00
accountKind := d . Get ( "account_kind" ) . ( string )
2016-06-02 01:08:14 +02:00
accountType := d . Get ( "account_type" ) . ( string )
2016-10-17 18:49:07 +02:00
2016-06-02 01:08:14 +02:00
location := d . Get ( "location" ) . ( string )
tags := d . Get ( "tags" ) . ( map [ string ] interface { } )
2016-10-05 16:22:28 +02:00
enableBlobEncryption := d . Get ( "enable_blob_encryption" ) . ( bool )
2016-06-02 01:08:14 +02:00
2016-06-30 16:36:08 +02:00
sku := storage . Sku {
Name : storage . SkuName ( accountType ) ,
}
2016-06-02 01:08:14 +02:00
opts := storage . AccountCreateParameters {
Location : & location ,
2016-06-30 16:36:08 +02:00
Sku : & sku ,
Tags : expandTags ( tags ) ,
2016-10-17 18:49:07 +02:00
Kind : storage . Kind ( accountKind ) ,
2016-10-05 16:22:28 +02:00
Properties : & storage . AccountPropertiesCreateParameters {
Encryption : & storage . Encryption {
Services : & storage . EncryptionServices {
Blob : & storage . EncryptionService {
Enabled : & enableBlobEncryption ,
} ,
} ,
KeySource : & storageAccountEncryptionSource ,
} ,
} ,
2016-06-02 01:08:14 +02:00
}
2016-10-17 18:49:07 +02:00
// AccessTier is only valid for BlobStorage accounts
if accountKind == string ( storage . BlobStorage ) {
accessTier , ok := d . GetOk ( "access_tier" )
if ! ok {
// default to "Hot"
accessTier = blobStorageAccountDefaultAccessTier
}
opts . Properties . AccessTier = storage . AccessTier ( accessTier . ( string ) )
}
2016-10-24 03:26:06 +02:00
// Create
2016-10-25 20:47:47 +02:00
cancelCtx , cancelFunc := context . WithTimeout ( client . StopContext , 1 * time . Hour )
2016-10-24 03:26:06 +02:00
_ , createErr := storageClient . Create (
2016-10-25 20:29:24 +02:00
resourceGroupName , storageAccountName , opts , cancelCtx . Done ( ) )
2016-10-25 20:47:47 +02:00
cancelFunc ( )
2016-06-02 01:08:14 +02:00
// The only way to get the ID back apparently is to read the resource again
2016-07-27 23:57:02 +02:00
read , err := storageClient . GetProperties ( resourceGroupName , storageAccountName )
2016-08-16 18:18:00 +02:00
// Set the ID right away if we have one
2016-08-16 18:49:54 +02:00
if err == nil && read . ID != nil {
2016-08-16 18:18:00 +02:00
log . Printf ( "[INFO] storage account %q ID: %q" , storageAccountName , * read . ID )
d . SetId ( * read . ID )
}
// If we had a create error earlier then we return with that error now.
// We do this later here so that we can grab the ID above is possible.
if createErr != nil {
return fmt . Errorf (
"Error creating Azure Storage Account '%s': %s" ,
storageAccountName , createErr )
}
2016-08-16 18:42:05 +02:00
// Check the read error now that we know it would exist without a create err
if err != nil {
return err
}
2016-08-16 18:18:00 +02:00
// If we got no ID then the resource group doesn't yet exist
2016-06-02 01:08:14 +02:00
if read . ID == nil {
return fmt . Errorf ( "Cannot read Storage Account %s (resource group %s) ID" ,
storageAccountName , resourceGroupName )
}
2016-07-27 23:57:02 +02:00
log . Printf ( "[DEBUG] Waiting for Storage Account (%s) to become available" , storageAccountName )
stateConf := & resource . StateChangeConf {
Pending : [ ] string { "Updating" , "Creating" } ,
Target : [ ] string { "Succeeded" } ,
Refresh : storageAccountStateRefreshFunc ( client , resourceGroupName , storageAccountName ) ,
Timeout : 30 * time . Minute ,
MinTimeout : 15 * time . Second ,
}
if _ , err := stateConf . WaitForState ( ) ; err != nil {
return fmt . Errorf ( "Error waiting for Storage Account (%s) to become available: %s" , storageAccountName , err )
}
2016-06-02 01:08:14 +02:00
return resourceArmStorageAccountRead ( d , meta )
}
// resourceArmStorageAccountUpdate is unusual in the ARM API where most resources have a combined
// and idempotent operation for CreateOrUpdate. In particular updating all of the parameters
// available requires a call to Update per parameter...
func resourceArmStorageAccountUpdate ( d * schema . ResourceData , meta interface { } ) error {
client := meta . ( * ArmClient ) . storageServiceClient
id , err := parseAzureResourceID ( d . Id ( ) )
if err != nil {
return err
}
storageAccountName := id . Path [ "storageAccounts" ]
resourceGroupName := id . ResourceGroup
d . Partial ( true )
if d . HasChange ( "account_type" ) {
accountType := d . Get ( "account_type" ) . ( string )
2016-06-30 16:36:08 +02:00
sku := storage . Sku {
Name : storage . SkuName ( accountType ) ,
}
2016-06-02 01:08:14 +02:00
opts := storage . AccountUpdateParameters {
2016-06-30 16:36:08 +02:00
Sku : & sku ,
2016-06-02 01:08:14 +02:00
}
_ , err := client . Update ( resourceGroupName , storageAccountName , opts )
if err != nil {
return fmt . Errorf ( "Error updating Azure Storage Account type %q: %s" , storageAccountName , err )
}
d . SetPartial ( "account_type" )
}
2016-10-17 18:49:07 +02:00
if d . HasChange ( "access_tier" ) {
accessTier := d . Get ( "access_tier" ) . ( string )
opts := storage . AccountUpdateParameters {
Properties : & storage . AccountPropertiesUpdateParameters {
AccessTier : storage . AccessTier ( accessTier ) ,
} ,
}
_ , err := client . Update ( resourceGroupName , storageAccountName , opts )
if err != nil {
return fmt . Errorf ( "Error updating Azure Storage Account access_tier %q: %s" , storageAccountName , err )
}
d . SetPartial ( "access_tier" )
}
2016-06-02 01:08:14 +02:00
if d . HasChange ( "tags" ) {
tags := d . Get ( "tags" ) . ( map [ string ] interface { } )
opts := storage . AccountUpdateParameters {
Tags : expandTags ( tags ) ,
}
_ , err := client . Update ( resourceGroupName , storageAccountName , opts )
if err != nil {
return fmt . Errorf ( "Error updating Azure Storage Account tags %q: %s" , storageAccountName , err )
}
d . SetPartial ( "tags" )
}
2016-10-05 16:22:28 +02:00
if d . HasChange ( "enable_blob_encryption" ) {
enableBlobEncryption := d . Get ( "enable_blob_encryption" ) . ( bool )
opts := storage . AccountUpdateParameters {
Properties : & storage . AccountPropertiesUpdateParameters {
Encryption : & storage . Encryption {
Services : & storage . EncryptionServices {
Blob : & storage . EncryptionService {
Enabled : & enableBlobEncryption ,
} ,
} ,
KeySource : & storageAccountEncryptionSource ,
} ,
} ,
}
_ , err := client . Update ( resourceGroupName , storageAccountName , opts )
if err != nil {
return fmt . Errorf ( "Error updating Azure Storage Account enable_blob_encryption %q: %s" , storageAccountName , err )
}
d . SetPartial ( "enable_blob_encryption" )
}
2016-06-02 01:08:14 +02:00
d . Partial ( false )
return nil
}
func resourceArmStorageAccountRead ( d * schema . ResourceData , meta interface { } ) error {
client := meta . ( * ArmClient ) . storageServiceClient
id , err := parseAzureResourceID ( d . Id ( ) )
if err != nil {
return err
}
name := id . Path [ "storageAccounts" ]
resGroup := id . ResourceGroup
resp , err := client . GetProperties ( resGroup , name )
if err != nil {
2016-09-30 18:57:59 +02:00
if resp . StatusCode == http . StatusNotFound {
d . SetId ( "" )
return nil
}
2016-06-02 01:08:14 +02:00
return fmt . Errorf ( "Error reading the state of AzureRM Storage Account %q: %s" , name , err )
}
keys , err := client . ListKeys ( resGroup , name )
if err != nil {
return err
}
2016-06-30 16:36:08 +02:00
accessKeys := * keys . Keys
2016-09-27 12:00:19 +02:00
d . Set ( "resource_group_name" , resGroup )
2016-07-16 15:36:15 +02:00
d . Set ( "primary_access_key" , accessKeys [ 0 ] . Value )
d . Set ( "secondary_access_key" , accessKeys [ 1 ] . Value )
2016-06-02 01:08:14 +02:00
d . Set ( "location" , resp . Location )
2016-10-17 18:49:07 +02:00
d . Set ( "account_kind" , resp . Kind )
2016-06-30 16:36:08 +02:00
d . Set ( "account_type" , resp . Sku . Name )
2016-06-02 01:08:14 +02:00
d . Set ( "primary_location" , resp . Properties . PrimaryLocation )
d . Set ( "secondary_location" , resp . Properties . SecondaryLocation )
2016-10-17 18:49:07 +02:00
if resp . Properties . AccessTier != "" {
d . Set ( "access_tier" , resp . Properties . AccessTier )
}
2016-06-02 01:08:14 +02:00
if resp . Properties . PrimaryEndpoints != nil {
d . Set ( "primary_blob_endpoint" , resp . Properties . PrimaryEndpoints . Blob )
d . Set ( "primary_queue_endpoint" , resp . Properties . PrimaryEndpoints . Queue )
d . Set ( "primary_table_endpoint" , resp . Properties . PrimaryEndpoints . Table )
d . Set ( "primary_file_endpoint" , resp . Properties . PrimaryEndpoints . File )
}
if resp . Properties . SecondaryEndpoints != nil {
if resp . Properties . SecondaryEndpoints . Blob != nil {
d . Set ( "secondary_blob_endpoint" , resp . Properties . SecondaryEndpoints . Blob )
} else {
d . Set ( "secondary_blob_endpoint" , "" )
}
if resp . Properties . SecondaryEndpoints . Queue != nil {
d . Set ( "secondary_queue_endpoint" , resp . Properties . SecondaryEndpoints . Queue )
} else {
d . Set ( "secondary_queue_endpoint" , "" )
}
if resp . Properties . SecondaryEndpoints . Table != nil {
d . Set ( "secondary_table_endpoint" , resp . Properties . SecondaryEndpoints . Table )
} else {
d . Set ( "secondary_table_endpoint" , "" )
}
}
2016-10-05 16:22:28 +02:00
if resp . Properties . Encryption != nil {
if resp . Properties . Encryption . Services . Blob != nil {
d . Set ( "enable_blob_encryption" , resp . Properties . Encryption . Services . Blob . Enabled )
}
}
2016-07-13 13:08:44 +02:00
d . Set ( "name" , resp . Name )
2016-06-02 01:08:14 +02:00
flattenAndSetTags ( d , resp . Tags )
return nil
}
func resourceArmStorageAccountDelete ( d * schema . ResourceData , meta interface { } ) error {
client := meta . ( * ArmClient ) . storageServiceClient
id , err := parseAzureResourceID ( d . Id ( ) )
if err != nil {
return err
}
name := id . Path [ "storageAccounts" ]
resGroup := id . ResourceGroup
_ , err = client . Delete ( resGroup , name )
if err != nil {
return fmt . Errorf ( "Error issuing AzureRM delete request for storage account %q: %s" , name , err )
}
return nil
}
func validateArmStorageAccountName ( v interface { } , k string ) ( ws [ ] string , es [ ] error ) {
input := v . ( string )
if ! regexp . MustCompile ( ` \A([a-z0-9] { 3,24})\z ` ) . MatchString ( input ) {
es = append ( es , fmt . Errorf ( "name can only consist of lowercase letters and numbers, and must be between 3 and 24 characters long" ) )
}
return
}
func validateArmStorageAccountType ( v interface { } , k string ) ( ws [ ] string , es [ ] error ) {
validAccountTypes := [ ] string { "standard_lrs" , "standard_zrs" ,
"standard_grs" , "standard_ragrs" , "premium_lrs" }
input := strings . ToLower ( v . ( string ) )
for _ , valid := range validAccountTypes {
if valid == input {
return
}
}
es = append ( es , fmt . Errorf ( "Invalid storage account type %q" , input ) )
return
}
2016-07-27 23:57:02 +02:00
func storageAccountStateRefreshFunc ( client * ArmClient , resourceGroupName string , storageAccountName string ) resource . StateRefreshFunc {
return func ( ) ( interface { } , string , error ) {
res , err := client . storageServiceClient . GetProperties ( resourceGroupName , storageAccountName )
if err != nil {
return nil , "" , fmt . Errorf ( "Error issuing read request in storageAccountStateRefreshFunc to Azure ARM for Storage Account '%s' (RG: '%s'): %s" , storageAccountName , resourceGroupName , err )
}
return res , string ( res . Properties . ProvisioningState ) , nil
}
}