add credentials click to s3 setup (#753)

Author: yapishu

goseg/click/hoon.go

@@ -71,3 +71,13 @@ func storageAction(key, value string) string {
 	})
 	return hoon
 }
+
+func storageToggleService(service string) string {
+	hoon := joinGap([]string{
+		";<",
+		"~",
+		"bind:m",
+		fmt.Sprintf("(poke [our %%storage] %%storage-action !>([%%toggle-service %s]))", service),
+	})
+	return hoon
+}

goseg/click/storage.go

@@ -11,6 +11,9 @@ import (
 ;<    our=@p
     bind:m
   get-our
+;<    ~
+    bind:m
+  (poke [our %storage] %storage-action !>([%toggle-service %credentials]))
 ;<    ~
     bind:m
   (poke [our %storage] %storage-action !>([%set-endpoint '{payload['endpoint']}']))
@@ -66,6 +69,7 @@ func linkStorage(patp, endpoint string, svcAccount structs.MinIOServiceAccount)
 	hoon := joinGap([]string{
 		"=/", "m", "(strand ,vase)",
 		";<", "our=@p", "bind:m", "get-our",
+		storageToggleService("%credentials"),
 		storageAction("%set-endpoint", endpoint),
 		storageAction("%set-access-key-id", svcAccount.AccessKey),
 		storageAction("%set-secret-access-key", svcAccount.SecretKey),