Join-Website.ps1
|
function Join-Website { param( [Parameter(ValueFromPipelineByPropertyName=$true)] [Hashtable]$RequiredInfo, [Parameter(ValueFromPipelineByPropertyName=$true)] [Hashtable]$OptionalInfo, [Parameter(ValueFromPipelineByPropertyName=$true)] [string]$StorageAccountSetting = "AzureStorageAccountName", [Parameter(ValueFromPipelineByPropertyName=$true)] [string]$StorageKeySetting = "AzureStorageAccountKey", [Parameter(ValueFromPipelineByPropertyName=$true)] [string]$SmtpServer, [Parameter(ValueFromPipelineByPropertyName=$true)] [Switch]$UseSsl, [Parameter(ValueFromPipelineByPropertyName=$true)] [string]$FromEmail, [Parameter(ValueFromPipelineByPropertyName=$true)] [string]$FromUser, [Parameter(ValueFromPipelineByPropertyName=$true)] [string]$EmailPasswordSetting, [Parameter(ValueFromPipelineByPropertyName=$true)] [string]$TermsOfService, [Parameter(ValueFromPipelineByPropertyName=$true)] [string]$ExchangeServer, [Parameter(ValueFromPipelineByPropertyName=$true)] [string]$UserTable, [Parameter(ValueFromPipelineByPropertyName=$true)] [string]$IntroMessage, [Parameter(ValueFromPipelineByPropertyName=$true)] [string]$ConfirmationMailSentMessage, [Parameter(ValueFromPipelineByPropertyName=$true)] [string]$userPartition = "Users", [Parameter(ValueFromPipelineByPropertyName=$true)] [string]$FacebookAppId, [Parameter(ValueFromPipelineByPropertyName=$true)] [Double]$InitialBalance = 0, [Parameter(ValueFromPipelineByPropertyName=$true)] [Double]$LockoutBalance = -10, [Parameter(ValueFromPipelineByPropertyName=$true)] [string]$BlacklistParition, [Parameter(ValueFromPipelineByPropertyName=$true)] [string]$WhitelistPartition, # The URL for the website [Parameter(Mandatory=$true,ValueFromPipelineByPropertyName=$true)] [string]$WebsiteUrl ) process { if (-not ($Request -and $Response -and $Session)) { throw "Must run within a web site" } $finalUrl = if ($WebSiteUrl -like "*Module.ashx") { $WebSiteUrl } else { "$WebSiteUrl".TrimEnd("/") += "/Module.ashx" } $siteName = if ($module.Name) { $module.Name } else { "Website" } $DisplayForm = $false $FormErrors = "" if (-not $request["Join-${siteName}_EmailAddress"]) { #$missingFields $displayForm = $true } $newUserData =@{} $missingFields = @() $paramBlock = @() if ($session['ProfileEditMode'] -eq $true) { $editMode = $true } $defaultValue = if ($editMode -and $session['User'].UserEmail) { "|Default $($session['User'].UserEmail)" } else { "" } if ($Request['ReferredBy']) { $session['ReferredBy'] = $Request['ReferredBy'] } $paramBlock += " #$defaultValue [Parameter(Mandatory=`$true,Position=0)] [string] `$EmailAddress " if ($RequiredInfo) { $Position = 1 foreach ($k in $RequiredInfo.Keys) { $newUserData[$k] = $request["Join-${siteName}_${k}"] -as $RequiredInfo[$k] $defaultValue = if ($session['User'].$k) { "|Default $($session['User'].$k)" } else { "" } $paramBlock += " #$defaultValue [Parameter(Mandatory=`$true,Position=$position)] [$($RequiredInfo[$k].Fullname)] `$$k " $Position++ if (-not $newUserData[$k]) { $missingFields += $k } } } if ($OptionalInfo) { foreach ($k in $OptionalInfo.Keys) { $newUserData[$k] = $request["Join-${siteName}_${k}"] -as $OptionalInfo[$k] $defaultValue = if ($session['User'].$k) { "|Default $($session['User'].$k)" } else { "" } $paramBlock += " #${defaultValue} [Parameter(Position=$position)] [$($OptionalInfo[$k].Fullname)] `$$k " } } if ($TermsOfService) { } .([ScriptBlock]::Create( "function Join-$Sitename { <# .Synopsis Joins $Sitename or edits a profile .Description #> param( $($paramBlock -join ",$([Environment]::NewLine)") ) } ")) $cmdInput = Get-WebInput -CommandMetaData (Get-Command "Join-$Sitename" -CommandType Function) if ($cmdInput.Count -gt 0) { $DisplayForm = $false } if ($missingFields) { $email = $request["Join-${siteName}_EmailAddress"] $emailFound = [ScriptBlock]::Create("`$_.UserEmail -eq '$email'") $storageAccount = (Get-WebConfigurationSetting -Setting $StorageAccountSetting) $storageKey = (Get-WebConfigurationSetting -Setting $StorageKeySetting) $mailAlreadyExists = Search-AzureTable -TableName $UserTable -StorageAccount $storageAccount -StorageKey $storageKey -Where $emailFound if (-not $mailAlreadyExists) { # Get required fields $DisplayForm = $true } elseif ($editMode -and $session['User']) { # Get required fields $DisplayForm = $true } else { # Reconfirm $DisplayForm = $false } } $sendMailParams = @{ BodyAsHtml = $true To = $request["Join-${siteName}_EmailAddress"] } $sendMailCommand = if ($SmtpServer -and $FromEmail -and $FromUser -and $EmailPasswordSetting) { $($ExecutionContext.InvokeCommand.GetCommand("Send-MailMessage", "All")) $un = $FromUser $pass = Get-WebConfigurationSetting -Setting $EmailPasswordSetting $pass = ConvertTo-SecureString $pass -AsPlainText -Force $cred = New-Object Management.Automation.PSCredential ".\$un", $pass $sendMailParams += @{ SmtpServer = $SmtpServer From = $FromEmail Credential = $cred UseSsl = $useSsl } } else { $($ExecutionContext.InvokeCommand.GetCommand("Send-Email", "All")) $sendMailParams += @{ UseWebConfiguration = $true AsJob = $true } } if ($displayForm) { $formErrors = if ($missingFields -and ($cmdInput.Count -ne 0)) { "Missing $missingFields" } else { } $buttonText = if ($mailAlreadyExists -or $session['User']) { "Edit Profile" } else { "Join / Login" } " $FormErrors $(Request-CommandInput -ButtonText $buttonText -Action "${WebsiteUrl}?join=true" -CommandMetaData (Get-Command "Join-${siteName}" -CommandType Function)) " } else { $session['UserEmail'] = $request["Join-${siteName}_EmailAddress"] $session['UserData'] = $newUserData $session['EditMode'] = $editMode $storageAccount = (Get-WebConfigurationSetting -Setting $StorageAccountSetting) $storageKey = (Get-WebConfigurationSetting -Setting $StorageKeySetting) $email = $Session['UserEmail'] $editMode = $session['EditMode'] $session['EditMode'] = $null $emailFound = [ScriptBlock]::Create("`$_.UserEmail -eq '$email'") $userProfilePartition = $userPartition $mailAlreadyExists = Search-AzureTable -TableName $UserTable -StorageAccount $storageAccount -StorageKey $storageKey -Where $emailFound | Where-Object { $_.PartitionKey -eq $userProfilePartition } $newUserObject = New-Object PSObject -Property @{ UserEmail = $Session['UserEmail'] UserID = [GUID]::NewGuid() Confirmed = $false Created = Get-Date } $ConfirmCode = [Guid]::NewGuid() $newUserObject.pstypenames.clear() $newUserObject.pstypenames.add("${siteName}_UserInfo") $extraPropCommonParameters = @{ InputObject = $newUserObject MemberType = 'NoteProperty' } Add-Member @extraPropCommonParameters -Name ConfirmCode -Value "$confirmCode" if ($session['UserData']) { foreach ($kvp in $session['UserData'].GetEnumerator()) { Add-Member @extraPropCommonParameters -Name $kvp.Key -Value $kvp.Value } } $commonAzureParameters = @{ TableName = $UserTable PartitionKey = $userProfilePartition } if ($mailAlreadyExists) { if ((-not $editMode) -or (-not $session['User'])) { # Creating a brand new item via the email system. Email the confirmation code out. $rootLocation= "$finalUrl".Substring(0, $finalUrl.LAstIndexOf("/")) $introMessage = if ($IntroMessage) { $IntroMessage + "<br/> <a href='${finalUrl}?confirmUser=$confirmCode'>Confirm Email Address</a>" } else { "<br/> <a href='${finalUrl}?confirmUser=$confirmCode'>Re-confirm Email Address to login</a>" } $sendMailParams += @{ Subject= "Please re-confirm your email for ${siteName}" Body = $introMessage } & $sendMailcommand @sendMailParams "Account already exists. A request to login has been sent to $($mailAlreadyExists.UserEmail)." | New-WebPage -Title "Email address is already registered, sending reconfirmation mail" -RedirectTo $rootLocation -RedirectIn "0:0:5" | Out-HTML -WriteResponse # <# Send-Email -To $newUserObject.UserEmail -UseWebConfiguration - -Body $introMessage -BodyAsHtml -AsJob "Account already exists. A request to login has been sent to $($mailAlreadyExists.UserEmail)." | New-WebPage -Title "Email address is already registered, sending reconfirmation mail" -RedirectTo $rootLocation -RedirectIn "0:0:5" | Out-HTML -WriteResponse #> $mailAlreadyExists | Add-Member NoteProperty ConfirmCode "$confirmCode" -Force -PassThru | Update-AzureTable @commonAzureParameters -RowKey $mailAlreadyExists.RowKey -Value { $_} } else { # Reconfirmation of Changes. If the user is logged in via facebook, then simply make the change. Otherwise, make the changes pending. if (-not $FacebookAppId) { $introMessage = "<br/> <a href='${finalUrl}?confirmUser=$confirmCode'>Please confirm changes to your ${siteName} account</a>" $introMessage += "<br/><br/>" $introMessage += New-Object PSObject -Property $session['UserData'] | Out-HTML $sendMailParams += @{ Subject= "Please confirm changes to your ${siteName} account" Body = $introMessage } & $sendMailcommand @sendMailParams "An email has been sent to $($mailAlreadyExists.UserEmail) to confirm the changes to your acccount" | New-WebPage -Title "Confirming Changes" -RedirectTo $rootLocation -RedirectIn "0:0:5" | Out-HTML -WriteResponse $mailAlreadyExists | Add-Member NoteProperty ConfirmCode "$confirmCode" -Force -PassThru | Update-AzureTable @commonAzureParameters -RowKey $mailAlreadyExists.RowKey -Value { $_} $changeToMake = @{} + $commonAzureParameters $changeToMake.PartitionKey = "${userProfilePartition}_PendingChanges" # Create a row in the pending change table $newUserObject.psobject.properties.Remove('ConfirmCode') $newUserObject | Set-AzureTable @changeToMake -RowKey {[GUID]::NewGuid() } } else { # Make the profile change $newUserObject | Update-AzureTable @commonAzureParameters -RowKey $mailAlreadyExists.RowKey } } } else { # Check for a whitelist or blacklist within the user table if ($BlacklistPartition) { $blackList = Search-AzureTable -TableName $pipeworks.UserTable.Name -Filter "PartitionKey eq '$($BlacklistPartition)'" if ($blacklist) { foreach ($uInfo in $Blacklist) { if ($newUserObject.UserEmail -like "*$uInfo*") { Write-Error "$($newUserObject.UserEmai) is blacklisted from ${siteName}" return } } } } if ($WhitelistPartition) { $whiteList = Search-AzureTable -TableName $pipeworks.UserTable.Name -Filter "PartitionKey eq '$($WhitelistParition)'" if ($whiteList) { $inWhiteList = $false foreach ($uInfo in $whiteList) { if ($newUserObject.UserEmail -like "*$uInfo*") { $inWhiteList = $true break } } if (-not $inWhiteList) { Write-Error "$($newUserObject.UserEmai) is not on the whitelist for ${siteName}" } } } if ($InitialBalance) { $newUserObject | Add-Member NoteProperty Balance (0- ([Double]$pipeworksManifest.UserTable.InitialBalance)) } if ($session['RefferedBy']) { $newUserObject | Add-Member NoteProperty RefferedBy $session['RefferedBy'] -PassThru | Add-Member NoteProperty RefferalCreditApplied $false } $newUserObject | Set-AzureTable @commonAzureParameters -RowKey $newUserObject.UserId $introMessage = if ($IntroMessage) { $IntroMessage + "<br/> <a href='${finalUrl}?confirmUser=$confirmCode'>Confirm Email Address</a>" } else { "<br/> <a href='${finalUrl}?confirmUser=$confirmCode'>Confirm Email Address</a>" } $sendMailParams += @{ Subject= "Please confirm your email for ${siteName}" Body = $introMessage } & $sendMailcommand @sendMailParams if ($passThru) { $newUserObject } $almostWelcomeScreen = if ($ConfirmationMailSentMessage) { $ConfirmationMailSentMessage } else { "A confirmation mail has been sent to $($newUserObject.UserEmail)" } $html = New-Region -Content $almostWelcomeScreen -AsWidget -Style @{ 'margin-left' = $MarginPercentLeftString 'margin-right' = $MarginPercentRightString 'margin-top' = '10px' 'border' = '0px' } | New-WebPage -Title "Welcome to ${siteName} | Confirmation Mail Sent" $html } } } } |