Skip to content

Commit 7a5583c

Browse files
fridrichovskyfridrichovsky
committed
feat: Added function Create-SaasUrl
1 parent fe02421 commit 7a5583c

16 files changed

+61
-155
lines changed

‎BC.NuGetHelper.psm1

+1
Original file line numberDiff line numberDiff line change
@@ -10,4 +10,5 @@ param(
1010
-moduleDependencies @( 'BC.HelperFunctions' )
1111

1212
. (Join-Path $PSScriptRoot "HelperFunctions.ps1")
13+
. (Join-Path $PSScriptRoot "SaaSHelperFunctions.ps1")
1314
. (Join-Path $PSScriptRoot "BC.NuGetHelper.ps1")

‎BC.SaasHelper.module.json

+1
Original file line numberDiff line numberDiff line change
@@ -14,6 +14,7 @@
1414
"files": [
1515
"InitializeModule.ps1",
1616
"HelperFunctions.ps1",
17+
"SaaSHelperFunctions.ps1",
1718
"BC.SaasHelper.ps1",
1819
"Saas\\*"
1920
]

‎BC.SaasHelper.psm1

+1
Original file line numberDiff line numberDiff line change
@@ -10,4 +10,5 @@ param(
1010
-moduleDependencies @( 'BC.HelperFunctions' )
1111

1212
. (Join-Path $PSScriptRoot "HelperFunctions.ps1")
13+
. (Join-Path $PSScriptRoot "SaaSHelperFunctions.ps1")
1314
. (Join-Path $PSScriptRoot "BC.SaasHelper.ps1")

‎BcContainerHelper.psm1

+3-3
Original file line numberDiff line numberDiff line change
@@ -49,7 +49,7 @@ function VolumeOrPath {
4949
if (!($path.Contains(':') -or $path.Contains('\') -or $path.Contains('/'))) {
5050
$volumes = @(docker volume ls --format "{{.Name}}")
5151
if ($volumes -notcontains $path) {
52-
docker volume create $path
52+
docker volume create $path
5353
}
5454
$inspect = (docker volume inspect $path) | ConvertFrom-Json
5555
return $inspect.MountPoint
@@ -61,7 +61,7 @@ function VolumeOrPath {
6161

6262
$bcContainerHelperConfig.bcartifactsCacheFolder = VolumeOrPath $bcContainerHelperConfig.bcartifactsCacheFolder
6363
$bcContainerHelperConfig.hostHelperFolder = VolumeOrPath $bcContainerHelperConfig.HostHelperFolder
64-
$usedContainerHelperConfigFile = $bcContainerHelperConfigFile
64+
$usedContainerHelperConfigFile = $bcContainerHelperConfigFile
6565

6666
$ENV:DOCKER_SCAN_SUGGEST = "$($bcContainerHelperConfig.DOCKER_SCAN_SUGGEST)".ToLowerInvariant()
6767

@@ -75,7 +75,7 @@ if (!(Test-Path -Path $extensionsFolder -PathType Container)) {
7575
New-Item -Path $extensionsFolder -ItemType Container -Force | Out-Null
7676

7777
if ($isWindows -and !$isAdministrator) {
78-
$rule = New-Object System.Security.AccessControl.FileSystemAccessRule($myUsername,'FullControl', 3, 'InheritOnly', 'Allow')
78+
$rule = New-Object System.Security.AccessControl.FileSystemAccessRule($myUsername, 'FullControl', 3, 'InheritOnly', 'Allow')
7979
$acl = Get-Acl -Path $bcContainerHelperConfig.hostHelperFolder
8080
$acl.AddAccessRule($rule)
8181
Set-Acl -Path $bcContainerHelperConfig.hostHelperFolder -AclObject $acl | Out-Null

‎SaaSHelperFunctions.ps1

+30
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,30 @@
1+
function Create-SaasUrl {
2+
Param(
3+
[Parameter(Mandatory = $true)]
4+
[Hashtable] $bcAuthContext,
5+
[string] $applicationFamily = ('', 'BusinessCentral')[$PSBoundParameters.ContainsKey('environment')],
6+
[string] $environment = "",
7+
[string] $apiVersion = "v2.15",
8+
[string] $endPoint = ""
9+
)
10+
11+
$bcAuthContext = Renew-BcAuthContext -bcAuthContext $bcAuthContext
12+
$bearerAuthValue = "Bearer $($bcAuthContext.AccessToken)"
13+
$headers = @{ "Authorization" = $bearerAuthValue }
14+
15+
$endPointURL = "$($bcContainerHelperConfig.apiBaseUrl.TrimEnd('/'))/admin/$apiVersion"
16+
if ($applicationFamily) {
17+
$endPointURL += "/applications/$applicationFamily"
18+
}
19+
if ($environment) {
20+
$endPointURL += "/environments/$environment"
21+
}
22+
else {
23+
$endPointURL += "/environments"
24+
}
25+
if ($endPoint) {
26+
$endPointURL += "/$endPoint"
27+
}
28+
29+
return $bcAuthContext, $headers, $endPointURL
30+
}

‎Saas/Copy-BcEnvironment.ps1

+3-17
Original file line numberDiff line numberDiff line change
@@ -45,9 +45,9 @@ function Copy-BcEnvironment {
4545

4646
$telemetryScope = InitTelemetryScope -name $MyInvocation.InvocationName -parameterValues $PSBoundParameters -includeParameters @()
4747
try {
48+
$bcAuthContext = Renew-BcAuthContext -bcAuthContext $bcAuthContext
4849
Wait-BcEnvironmentsReady -environments @($environment, $sourceEnvironment) -bcAuthContext $bcAuthContext -apiVersion $apiVersion -applicationFamily $applicationFamily
4950

50-
$bcAuthContext = Renew-BcAuthContext -bcAuthContext $bcAuthContext
5151
$bcEnvironments = Get-BcEnvironments -bcAuthContext $bcAuthContext -applicationFamily $applicationFamily -apiVersion $apiVersion
5252
$bcEnvironment = $bcEnvironments | Where-Object { $_.name -eq $sourceEnvironment }
5353
if (!($bcEnvironment)) {
@@ -62,11 +62,8 @@ function Copy-BcEnvironment {
6262
Remove-BcEnvironment -bcAuthContext $bcAuthContext -environment $environment -applicationFamily $applicationFamily -apiVersion $apiVersion
6363
}
6464

65+
$bcAuthContext, $headers, $endPointURL = Create-SaasUrl -bcAuthContext $authContext -endPoint "copy" -environment $sourceEnvironment -applicationFamily $applicationFamily -apiVersion $apiVersion
6566

66-
$bearerAuthValue = "Bearer $($bcAuthContext.AccessToken)"
67-
$headers = @{
68-
"Authorization" = $bearerAuthValue
69-
}
7067
$type = $environmentType
7168
$environmentName = $environment
7269
$body = @{}
@@ -79,18 +76,6 @@ function Copy-BcEnvironment {
7976
}
8077
}
8178

82-
$endPointURL = "$($bcContainerHelperConfig.apiBaseUrl.TrimEnd('/'))/admin/$apiVersion"
83-
if (($null -ne $applicationFamily) -and ($applicationFamily -ne "")) {
84-
$endPointURL += "/applications/$applicationFamily"
85-
}
86-
if (($null -ne $sourceEnvironment) -and ($sourceEnvironment -ne "")) {
87-
$endPointURL += "/environments/$sourceEnvironment"
88-
}
89-
else {
90-
$endPointURL += "/environments"
91-
}
92-
$endPointURL += "/copy"
93-
9479
Write-Host "Submitting copy environment request for $applicationFamily/$sourceEnvironment to $applicationFamily/$environmentName"
9580
$body | ConvertTo-Json | Out-Host
9681
try {
@@ -106,6 +91,7 @@ function Copy-BcEnvironment {
10691
do {
10792
Start-Sleep -Seconds 2
10893
Write-Host -NoNewline "."
94+
$bcAuthContext = Renew-BcAuthContext -bcAuthContext $bcAuthContext
10995
$Operation = (Get-BcEnvironmentsOperations -bcAuthContext $bcAuthContext | Where-Object { ($_.productFamily -eq $applicationFamily) -and ($_.type -eq $environmentResult.type) -and ($_.id -eq $environmentResult.id) })
11096
} while ($Operation.status -in "queued", "scheduled", "running")
11197
Write-Host $Operation.status

‎Saas/Get-BcDatabaseExportHistory.ps1

+1-1
Original file line numberDiff line numberDiff line change
@@ -38,7 +38,7 @@ function Get-BcDatabaseExportHistory {
3838
$bearerAuthValue = "Bearer $($bcAuthContext.AccessToken)"
3939
$headers = @{ "Authorization" = $bearerAuthValue }
4040
try {
41-
(Invoke-RestMethod -Method Get -Uri "$($bcContainerHelperConfig.apiBaseUrl.TrimEnd('/'))/admin/$apiVersion/exports/history?start=$startTime&end=$endTime" -Headers $headers).value | Where-Object { $_.environmentName -like $environment }
41+
(Invoke-RestMethod -Method Get -Uri "$($bcContainerHelperConfig.apiBaseUrl.TrimEnd('/'))/admin/$apiVersion/exports/history?start=$startTime&end=$endTime" -Headers $headers).value | Where-Object { $_.environmentName -like $environment }
4242
}
4343
catch {
4444
throw (GetExtendedErrorMessage $_)

‎Saas/Get-BcEnvironments.ps1

+1-18
Original file line numberDiff line numberDiff line change
@@ -30,24 +30,7 @@ function Get-BcEnvironments {
3030

3131
$telemetryScope = InitTelemetryScope -name $MyInvocation.InvocationName -parameterValues $PSBoundParameters -includeParameters @()
3232
try {
33-
$bcAuthContext = Renew-BcAuthContext -bcAuthContext $bcAuthContext
34-
$bearerAuthValue = "Bearer $($bcAuthContext.AccessToken)"
35-
$headers = @{ "Authorization" = $bearerAuthValue }
36-
37-
$endPointURL = "$($bcContainerHelperConfig.apiBaseUrl.TrimEnd('/'))/admin/$apiVersion"
38-
if (($null -ne $applicationFamily) -and ($applicationFamily -ne "")) {
39-
$endPointURL += "/applications/$applicationFamily"
40-
}
41-
else {
42-
$endPointURL += "/applications"
43-
}
44-
if (($null -ne $environment) -and ($environment -ne "")) {
45-
$endPointURL += "/environments/$environment"
46-
}
47-
else {
48-
$endPointURL += "/environments"
49-
}
50-
33+
$bcAuthContext, $headers, $endPointURL = Create-SaasUrl -bcAuthContext $authContext -environment $environment -applicationFamily $applicationFamily -apiVersion $apiVersion
5134
try {
5235
$Result = (Invoke-RestMethod -Method Get -UseBasicParsing -Uri $endPointURL -Headers $headers)
5336
if ($null -ne $Result.Value) {

‎Saas/Get-BcEnvironmentsAvailableRestorePeriods.ps1

+1-17
Original file line numberDiff line numberDiff line change
@@ -29,23 +29,7 @@ function Get-BcEnvironmentsAvailableRestorePeriods {
2929

3030
$telemetryScope = InitTelemetryScope -name $MyInvocation.InvocationName -parameterValues $PSBoundParameters -includeParameters @()
3131
try {
32-
33-
$bcAuthContext = Renew-BcAuthContext -bcAuthContext $bcAuthContext
34-
$bearerAuthValue = "Bearer $($bcAuthContext.AccessToken)"
35-
$headers = @{ "Authorization" = $bearerAuthValue }
36-
37-
$endPointURL = "$($bcContainerHelperConfig.apiBaseUrl.TrimEnd('/'))/admin/$apiVersion"
38-
if (($null -ne $applicationFamily) -and ($applicationFamily -ne "")) {
39-
$endPointURL += "/applications/$applicationFamily"
40-
}
41-
if (($null -ne $environment) -and ($environment -ne "")) {
42-
$endPointURL += "/environments/$environment"
43-
}
44-
else {
45-
$endPointURL += "/environments"
46-
}
47-
$endPointURL += "/availableRestorePeriods"
48-
32+
$bcAuthContext, $headers, $endPointURL = Create-SaasUrl -bcAuthContext $authContext -endPoint "availableRestorePeriods" -environment $environment -applicationFamily $applicationFamily -apiVersion $apiVersion
4933
try {
5034
$Result = (Invoke-RestMethod -Method Get -UseBasicParsing -Uri $endPointURL -Headers $headers)
5135
if ($null -ne $Result.Value) {

‎Saas/Get-BcEnvironmentsOperations.ps1

+1-17
Original file line numberDiff line numberDiff line change
@@ -33,23 +33,7 @@ function Get-BcEnvironmentsOperations {
3333
if (($null -eq $environment) -or ($environment -eq "")) {
3434
$applicationFamily = ''
3535
}
36-
37-
$bcAuthContext = Renew-BcAuthContext -bcAuthContext $bcAuthContext
38-
$bearerAuthValue = "Bearer $($bcAuthContext.AccessToken)"
39-
$headers = @{ "Authorization" = $bearerAuthValue }
40-
41-
$endPointURL = "$($bcContainerHelperConfig.apiBaseUrl.TrimEnd('/'))/admin/$apiVersion"
42-
if (($null -ne $applicationFamily) -and ($applicationFamily -ne "")) {
43-
$endPointURL += "/applications/$applicationFamily"
44-
}
45-
if (($null -ne $environment) -and ($environment -ne "")) {
46-
$endPointURL += "/environments/$environment"
47-
}
48-
else {
49-
$endPointURL += "/environments"
50-
}
51-
$endPointURL += "/operations"
52-
36+
$bcAuthContext, $headers, $endPointURL = Create-SaasUrl -bcAuthContext $authContext -endPoint "operations" -environment $environment -applicationFamily $applicationFamily -apiVersion $apiVersion
5337
try {
5438
$Result = (Invoke-RestMethod -Method Get -UseBasicParsing -Uri $endPointURL -Headers $headers)
5539
if ($null -ne $Result.Value) {

‎Saas/Get-BcEnvironmentsUsedStorage.ps1

+1-17
Original file line numberDiff line numberDiff line change
@@ -33,23 +33,7 @@ function Get-BcEnvironmentsUsedStorage {
3333
if (($null -eq $environment) -or ($environment -eq "")) {
3434
$applicationFamily = ''
3535
}
36-
37-
$bcAuthContext = Renew-BcAuthContext -bcAuthContext $bcAuthContext
38-
$bearerAuthValue = "Bearer $($bcAuthContext.AccessToken)"
39-
$headers = @{ "Authorization" = $bearerAuthValue }
40-
41-
$endPointURL = "$($bcContainerHelperConfig.apiBaseUrl.TrimEnd('/'))/admin/$apiVersion"
42-
if (($null -ne $applicationFamily) -and ($applicationFamily -ne "")) {
43-
$endPointURL += "/applications/$applicationFamily"
44-
}
45-
if (($null -ne $environment) -and ($environment -ne "")) {
46-
$endPointURL += "/environments/$environment"
47-
}
48-
else {
49-
$endPointURL += "/environments"
50-
}
51-
$endPointURL += "/usedstorage"
52-
36+
$bcAuthContext, $headers, $endPointURL = Create-SaasUrl -bcAuthContext $authContext -endPoint "usedstorage" -environment $environment -applicationFamily $applicationFamily -apiVersion $apiVersion
5337
try {
5438
$Result = (Invoke-RestMethod -Method Get -UseBasicParsing -Uri $endPointURL -Headers $headers)
5539
if ($null -ne $Result.Value) {

‎Saas/New-BcEnvironment.ps1

+5-16
Original file line numberDiff line numberDiff line change
@@ -42,19 +42,17 @@ function New-BcEnvironment {
4242
[string] $ringName = "PROD",
4343
[string] $applicationVersion = "",
4444
[string] $applicationInsightsKey = "",
45-
[string] $apiVersion = "v2.3",
45+
[string] $apiVersion = "v2.18",
4646
[switch] $doNotWait
4747
)
4848

4949
$telemetryScope = InitTelemetryScope -name $MyInvocation.InvocationName -parameterValues $PSBoundParameters -includeParameters @()
5050
try {
51+
$bcAuthContext = Renew-BcAuthContext -bcAuthContext $bcAuthContext
5152
Wait-BcEnvironmentsReady -environments @($environment) -bcAuthContext $bcAuthContext -apiVersion $apiVersion -applicationFamily $applicationFamily
5253

53-
$bcAuthContext = Renew-BcAuthContext -bcAuthContext $bcAuthContext
54-
$bearerAuthValue = "Bearer $($bcAuthContext.AccessToken)"
55-
$headers = @{
56-
"Authorization" = $bearerAuthValue
57-
}
54+
$bcAuthContext, $headers, $endPointURL = Create-SaasUrl -bcAuthContext $authContext -applicationFamily $applicationFamily -apiVersion $apiVersion
55+
5856
$body = @{}
5957
"environmentType", "countryCode", "applicationVersion", "ringName" | % {
6058
$var = Get-Variable -Name $_ -ErrorAction SilentlyContinue
@@ -64,16 +62,6 @@ function New-BcEnvironment {
6462
}
6563
}
6664
}
67-
$endPointURL = "$($bcContainerHelperConfig.apiBaseUrl.TrimEnd('/'))/admin/$apiVersion"
68-
if (($null -ne $applicationFamily) -and ($applicationFamily -ne "")) {
69-
$endPointURL += "/applications/$applicationFamily"
70-
}
71-
if (($null -ne $environment) -and ($environment -ne "")) {
72-
$endPointURL += "/environments/$environment"
73-
}
74-
else {
75-
$endPointURL += "/environments"
76-
}
7765

7866
Write-Host "Submitting new environment request for $applicationFamily/$environment"
7967
$body | ConvertTo-Json | Out-Host
@@ -93,6 +81,7 @@ function New-BcEnvironment {
9381
do {
9482
Start-Sleep -Seconds 2
9583
Write-Host -NoNewline "."
84+
$bcAuthContext = Renew-BcAuthContext -bcAuthContext $bcAuthContext
9685
$Operation = (Get-BcEnvironmentsOperations -bcAuthContext $bcAuthContext -apiVersion $apiVersion -applicationFamily $applicationFamily | Where-Object { ($_.productFamily -eq $applicationFamily) -and ($_.type -eq $environmentResult.type) -and ($_.id -eq $environmentResult.id) })
9786
} while ($Operation.status -in "queued", "scheduled", "running")
9887
Write-Host $Operation.status

‎Saas/Remove-BcEnvironment.ps1

+3-15
Original file line numberDiff line numberDiff line change
@@ -31,6 +31,7 @@ function Remove-BcEnvironment {
3131

3232
$telemetryScope = InitTelemetryScope -name $MyInvocation.InvocationName -parameterValues $PSBoundParameters -includeParameters @()
3333
try {
34+
$bcAuthContext = Renew-BcAuthContext -bcAuthContext $bcAuthContext
3435
Wait-BcEnvironmentsReady -environments @($environment) -bcAuthContext $bcAuthContext -apiVersion $apiVersion -applicationFamily $applicationFamily
3536

3637
$bcAuthContext = Renew-BcAuthContext -bcAuthContext $bcAuthContext
@@ -42,21 +43,7 @@ function Remove-BcEnvironment {
4243
throw "The BcContainerHelper Remove-BcEnvironment function cannot be used to remove Production environments"
4344
}
4445
else {
45-
46-
$bearerAuthValue = "Bearer $($bcAuthContext.AccessToken)"
47-
$headers = @{
48-
"Authorization" = $bearerAuthValue
49-
}
50-
$endPointURL = "$($bcContainerHelperConfig.apiBaseUrl.TrimEnd('/'))/admin/$apiVersion"
51-
if (($null -ne $applicationFamily) -and ($applicationFamily -ne "")) {
52-
$endPointURL += "/applications/$applicationFamily"
53-
}
54-
if (($null -ne $environment) -and ($environment -ne "")) {
55-
$endPointURL += "/environments/$environment"
56-
}
57-
else {
58-
$endPointURL += "/environments"
59-
}
46+
$bcAuthContext, $headers, $endPointURL = Create-SaasUrl -bcAuthContext $authContext -environment $environment -applicationFamily $applicationFamily -apiVersion $apiVersion
6047

6148
Write-Host "Submitting environment removal request for $applicationFamily/$environment"
6249
try {
@@ -71,6 +58,7 @@ function Remove-BcEnvironment {
7158
do {
7259
Start-Sleep -Seconds 2
7360
Write-Host -NoNewline "."
61+
$bcAuthContext = Renew-BcAuthContext -bcAuthContext $bcAuthContext
7462
$Operation = (Get-BcEnvironmentsOperations -bcAuthContext $bcAuthContext -apiVersion $apiVersion -applicationFamily $applicationFamily | Where-Object { ($_.productFamily -eq $applicationFamily) -and ($_.type -eq $environmentResult.type) -and ($_.id -eq $environmentResult.id) })
7563
} while ($Operation.status -in "queued", "scheduled", "running")
7664
Write-Host $Operation.status

‎Saas/Rename-BcEnvironment.ps1

+5-17
Original file line numberDiff line numberDiff line change
@@ -38,9 +38,9 @@ function Rename-BcEnvironment {
3838

3939
$telemetryScope = InitTelemetryScope -name $MyInvocation.InvocationName -parameterValues $PSBoundParameters -includeParameters @()
4040
try {
41-
Wait-BcEnvironmentsReady -environments @($environment, $newEnvironment) -bcAuthContext $bcAuthContext -apiVersion $apiVersion -applicationFamily $applicationFamily
42-
4341
$bcAuthContext = Renew-BcAuthContext -bcAuthContext $bcAuthContext
42+
Wait-BcEnvironmentsReady -environments @($environment, $newEnvironmentName) -bcAuthContext $bcAuthContext -apiVersion $apiVersion -applicationFamily $applicationFamily
43+
4444
$bcEnvironments = Get-BcEnvironments -bcAuthContext $bcAuthContext -applicationFamily $applicationFamily -apiVersion $apiVersion
4545
$bcEnvironment = $bcEnvironments | Where-Object { $_.name -eq $environment }
4646
if (!($bcEnvironment)) {
@@ -55,10 +55,8 @@ function Rename-BcEnvironment {
5555
Remove-BcEnvironment -bcAuthContext $bcAuthContext -environment $newEnvironmentName -applicationFamily $applicationFamily -apiVersion $apiVersion
5656
}
5757

58-
$bearerAuthValue = "Bearer $($bcAuthContext.AccessToken)"
59-
$headers = @{
60-
"Authorization" = $bearerAuthValue
61-
}
58+
$bcAuthContext, $headers, $endPointURL = Create-SaasUrl -bcAuthContext $authContext -endPoint "rename" -environment $environment -applicationFamily $applicationFamily -apiVersion $apiVersion
59+
6260
$body = @{}
6361
"NewEnvironmentName" | % {
6462
$var = Get-Variable -Name $_ -ErrorAction SilentlyContinue
@@ -68,17 +66,6 @@ function Rename-BcEnvironment {
6866
}
6967
}
7068
}
71-
$endPointURL = "$($bcContainerHelperConfig.apiBaseUrl.TrimEnd('/'))/admin/$apiVersion"
72-
if (($null -ne $applicationFamily) -and ($applicationFamily -ne "")) {
73-
$endPointURL += "/applications/$applicationFamily"
74-
}
75-
if (($null -ne $environment) -and ($environment -ne "")) {
76-
$endPointURL += "/environments/$environment"
77-
}
78-
else {
79-
$endPointURL += "/environments"
80-
}
81-
$endPointURL += "/rename"
8269

8370
Write-Host "Submitting rename environment request for $environment to $NewEnvironmentName"
8471
$body | ConvertTo-Json | Out-Host
@@ -94,6 +81,7 @@ function Rename-BcEnvironment {
9481
do {
9582
Start-Sleep -Seconds 2
9683
Write-Host -NoNewline "."
84+
$bcAuthContext = Renew-BcAuthContext -bcAuthContext $bcAuthContext
9785
$Operation = (Get-BcEnvironmentsOperations -bcAuthContext $bcAuthContext -apiVersion $apiVersion -applicationFamily $applicationFamily | Where-Object { ($_.productFamily -eq $applicationFamily) -and ($_.type -eq $environmentResult.type) -and ($_.id -eq $environmentResult.id) })
9886
} while ($Operation.status -in "queued", "scheduled", "running")
9987
Write-Host $Operation.status

0 commit comments

Comments
 (0)