From baa6cf4e45571e9d7d537960d98c71e6424118d8 Mon Sep 17 00:00:00 2001
From: Even Holthe <even.holthe@me.com>
Date: Fri, 4 Oct 2019 21:13:54 +0200
Subject: [PATCH] azuread_application: homepage now accepts HTTP/HTTPS

Fixes #149
---
 azuread/resource_application.go      |  2 +-
 azuread/resource_application_test.go | 41 ++++++++++++++++++++++++++++
 2 files changed, 42 insertions(+), 1 deletion(-)

diff --git a/azuread/resource_application.go b/azuread/resource_application.go
index 860dfa95bd..2b04ca99de 100644
--- a/azuread/resource_application.go
+++ b/azuread/resource_application.go
@@ -54,7 +54,7 @@ func resourceApplication() *schema.Resource {
 				Type:         schema.TypeString,
 				Optional:     true,
 				Computed:     true,
-				ValidateFunc: validate.URLIsHTTPS,
+				ValidateFunc: validate.URLIsHTTPOrHTTPS,
 			},
 
 			"identifier_uris": {
diff --git a/azuread/resource_application_test.go b/azuread/resource_application_test.go
index 47622b0da2..592784e58d 100644
--- a/azuread/resource_application_test.go
+++ b/azuread/resource_application_test.go
@@ -44,6 +44,38 @@ func TestAccAzureADApplication_basic(t *testing.T) {
 	})
 }
 
+func TestAccAzureADApplication_http_homepage(t *testing.T) {
+	resourceName := "azuread_application.test"
+	id := uuid.New().String()
+
+	resource.ParallelTest(t, resource.TestCase{
+		PreCheck:     func() { testAccPreCheck(t) },
+		Providers:    testAccProviders,
+		CheckDestroy: testCheckADApplicationDestroy,
+		Steps: []resource.TestStep{
+			{
+				Config: testAccADApplication_http_homepage(id),
+				Check: resource.ComposeTestCheckFunc(
+					testCheckADApplicationExists(resourceName),
+					resource.TestCheckResourceAttr(resourceName, "name", fmt.Sprintf("acctestApp-%s", id)),
+					resource.TestCheckResourceAttr(resourceName, "homepage", fmt.Sprintf("http://homepage-%s", id)),
+					resource.TestCheckResourceAttr(resourceName, "oauth2_allow_implicit_flow", "false"),
+					resource.TestCheckResourceAttr(resourceName, "type", "webapp/api"),
+					resource.TestCheckResourceAttr(resourceName, "oauth2_permissions.#", "1"),
+					resource.TestCheckResourceAttr(resourceName, "oauth2_permissions.0.admin_consent_description", fmt.Sprintf("Allow the application to access %s on behalf of the signed-in user.", fmt.Sprintf("acctestApp-%s", id))),
+					resource.TestCheckResourceAttrSet(resourceName, "application_id"),
+					resource.TestCheckResourceAttrSet(resourceName, "object_id"),
+				),
+			},
+			{
+				ResourceName:      resourceName,
+				ImportState:       true,
+				ImportStateVerify: true,
+			},
+		},
+	})
+}
+
 func TestAccAzureADApplication_complete(t *testing.T) {
 	resourceName := "azuread_application.test"
 	id := uuid.New().String()
@@ -494,6 +526,15 @@ resource "azuread_application" "test" {
 `, id)
 }
 
+func testAccADApplication_http_homepage(id string) string {
+	return fmt.Sprintf(`
+resource "azuread_application" "test" {
+  name      = "acctestApp-%s"
+  homepage  = "http://homepage-%s"
+}
+`, id, id)
+}
+
 func testAccADApplication_publicClient(id string) string {
 	return fmt.Sprintf(`
 resource "azuread_application" "test" {