using namespace System.Net
using namespace System.Web

# Input bindings are passed in via param block.
param($Request, $TriggerMetadata)

# Write to the Azure Functions log stream.
Write-Host "A new beacon receive process has started."

#Variable definition

try {
    $upn = [System.Web.HttpUtility]::HtmlDecode($Request.Body.upn)
    $hostname = [System.Web.HttpUtility]::HtmlDecode($Request.Body.hostname)
    $operatingsystem = [System.Web.HttpUtility]::HtmlDecode($Request.Body.operatingsystem)
    $latitude = [System.Web.HttpUtility]::HtmlDecode($Request.Body.latitude)
    $longitude = [System.Web.HttpUtility]::HtmlDecode($Request.Body.longitude)
    $beaconlaunchtime = [System.Web.HttpUtility]::HtmlDecode($Request.Body.beaconlaunchtime)
    $lastusetime = [System.Web.HttpUtility]::HtmlDecode($Request.Body.lastusetime)
    $systemboottime = [System.Web.HttpUtility]::HtmlDecode($Request.Body.systemboottime)
    $lastlogontime = [System.Web.HttpUtility]::HtmlDecode($Request.Body.lastlogontime)
    $bgversion = [System.Web.HttpUtility]::HtmlDecode($Request.Body.bgversion)
    $lsversion = [System.Web.HttpUtility]::HtmlDecode($Request.Body.lsversion)
    $signewversion = [System.Web.HttpUtility]::HtmlDecode($Request.Body.signewversion)
    $sigreplyversion = [System.Web.HttpUtility]::HtmlDecode($Request.Body.sigreplyversion)
    $sigwebversion = [System.Web.HttpUtility]::HtmlDecode($Request.Body.sigwebversion)
    $scrnsaveversion = [System.Web.HttpUtility]::HtmlDecode($Request.Body.scrnsaveversion)
    $pendingreboot = [System.Web.HttpUtility]::HtmlDecode($Request.Body.pendingreboot)
    $compliant = [System.Web.HttpUtility]::HtmlDecode($Request.Body.compliant)

    Write-Host "######################################################################"
    Write-Host "A beacon with the following information was received."
    Write-Host "User Principal Name:$upn"
    Write-Host "Device Hostname:$hostname"
    Write-Host "Operating System and Version:$operatingsystem"
    Write-Host "Device Location Latitude:$latitude"
    Write-Host "Device Location Longitude:$longitude"
    Write-Host "Beacon Launch Time:$beaconlaunchtime"
    Write-Host "Device Last Used By User:$lastusetime"
    Write-Host "System Boot Time:$systemboottime"
    Write-Host "User Last Logon Time:$lastlogontime"
    Write-Host "WPSecure Desktop Wallpaper Package Version:$bgversion"
    Write-Host "WPSecure Lock Screen Package Version:$lsversion"
    Write-Host "WPSecure Signature For New Messages Package Version:$signewversion"
    Write-Host "WPSecure Signature For Reply Messages Package Version:$sigreplyversion"
    Write-Host "WPSecure Signature For Web Messages Package Version:$sigwebversion"
    Write-Host "WPSecure Screensaver Package Version:$scrnsaveversion"
    Write-Host "Is Device Pending Reboot?:$pendingreboot"
    Write-Host "Is Device Compliant?:$compliant"
    Write-Host "######################################################################"

    #SharePoint ID's stored in Environmental Variables

    $SHAREPOINT_SITE_URL = $env:SHAREPOINT_SITE_URL
    $SHAREPOINT_LIST_NAME = $env:SHAREPOINT_LIST_NAME

    if ((-not [string]::IsNullOrWhiteSpace($SHAREPOINT_SITE_URL)) -and (-not [string]::IsNullOrWhiteSpace($SHAREPOINT_LIST_NAME))) {

        $internalbeaconlaunchtime = try { [datetime]::ParseExact($beaconlaunchtime, "dddd, d MMMM yyyy h:mm tt", $null) } catch { [datetime]"1900-01-01T00:00:00" }
        $internallastusetime = try { [datetime]::ParseExact($lastusetime, "dddd, d MMMM yyyy h:mm tt", $null) } catch { [datetime]"1900-01-01T00:00:00" }
        $internalsystemboottime = try { [datetime]::ParseExact($systemboottime, "dddd, d MMMM yyyy h:mm tt", $null) } catch { [datetime]"1900-01-01T00:00:00" }
        $internallastlogontime = try { [datetime]::ParseExact($lastlogontime, "dddd, d MMMM yyyy h:mm tt", $null) } catch { [datetime]"1900-01-01T00:00:00" }
        $internallatitude = try { [double]::Parse($latitude) } catch { 0.0 }
        $internallongitude = try { [double]::Parse($longitude) } catch { 0.0 }
        $internalupn = $upn
        $internalhostname = $hostname
        $internalTitle = "$internalupn ON $hostname AT $internallastusetime"
        $internaloperatingsystem = $operatingsystem
        $internalbgversion = $bgversion
        $internallsversion = $lsversion
        $internalsignewversion = $signewversion
        $internalsigreplyversion = $sigreplyversion
        $internalsigwebversion = $sigwebversion
        $internalscrnsaveversion = $scrnsaveversion
        $internalpendingreboot = try { [bool]::Parse($pendingreboot) } catch { $false }
        $internalcompliant = try { [bool]::Parse($compliant) } catch { $false }

        $fieldValues = @{
            "Title" = "$internalTitle"
            "int_upn" = "$internalupn"
            "int_hostname" = "$internalhostname"
            "int_operatingsystem" = "$internaloperatingsystem"
            "int_beaconlaunchtime" = "$internalbeaconlaunchtime"
            "int_lastusetime" = "$internallastusetime"
            "int_systemboottime" = "$internalsystemboottime"
            "int_lastlogontime" = "$internallastlogontime"
            "int_bgversion" = "$internalbgversion"
            "int_lsversion" = "$internallsversion"
            "int_signewversion" = "$internalsignewversion"
            "int_sigreplyversion" = "$internalsigreplyversion"
            "int_sigwebversion" = "$internalsigwebversion"
            "int_scrnsaveversion" = "$internalscrnsaveversion"
            "int_pendingreboot" = "$internalpendingreboot"
            "int_compliant" = "$internalcompliant"
            "int_location" = "POINT($internallongitude $internallatitude)"
        }

        Connect-PnPOnline -ManagedIdentity -Url $SHAREPOINT_SITE_URL -Debug

        Write-Host "Checking if a record exist for the UPN and HOSTNAME combination."

        $existingItemSearchQuery = "<View><Query><Where><And><Eq><FieldRef Name='int_hostname' /><Value Type='Text'>$internalhostname</Value></Eq><Eq><FieldRef Name='int_upn' /><Value Type='Text'>$internalupn</Value></Eq></And></Where></Query></View>"

        $existingItem = Get-PnPListItem -List $SHAREPOINT_LIST_NAME -Query $existingItemSearchQuery -Debug

        if ($existingItem) {
            Write-Host "Record exist for the UPN and HOSTNAME combination. Existing record will be updated."
            Set-PnPListItem -List $SHAREPOINT_LIST_NAME -Identity $existingItem.Id -Values $fieldValues -Debug
        }
        else {
            Write-Host "Record does not exist for the UPN and HOSTNAME combination. New record will be created."
            Add-PnPListItem -List $SHAREPOINT_LIST_NAME -Values $fieldValues -Debug
        }
    }
}
catch {
    $ex = $_.Exception
    Write-Error "Exception: The process failed. $($ex.Message)"
    # Write-Error "Stack Trace: $($ex.StackTrace)" # Uncomment for detailed troubleshooting.
    # Write-Error "Inner Exception: $($ex.InnerException)" # Uncomment for detailed troubleshooting.
}
finally {
    Get-PSSession | Remove-PSSession
}