midPointTools

0.2.0

Private/Converters.ps1

function ConvertTo-midPointUserObject {
    [CmdletBinding()]
    param([Parameter(Mandatory, ValueFromPipeline)] [object] $InputObject)

    process {
        $activation = Get-midPointProperty $InputObject 'activation'
        [pscustomobject]@{
            PSTypeName           = 'midPointTools.User'
            Oid                  = [string](Get-midPointProperty $InputObject 'oid')
            Name                 = ConvertFrom-midPointPolyString (Get-midPointProperty $InputObject 'name')
            FullName             = ConvertFrom-midPointPolyString (Get-midPointProperty $InputObject 'fullName')
            GivenName            = ConvertFrom-midPointPolyString (Get-midPointProperty $InputObject 'givenName')
            FamilyName           = ConvertFrom-midPointPolyString (Get-midPointProperty $InputObject 'familyName')
            EmailAddress         = Get-midPointProperty $InputObject 'emailAddress'
            Description          = Get-midPointProperty $InputObject 'description'
            AdministrativeStatus = Get-midPointProperty $activation 'administrativeStatus'
            EffectiveStatus      = Get-midPointProperty $activation 'effectiveStatus'
            ValidFrom            = ConvertFrom-midPointDateTime (Get-midPointProperty $activation 'validFrom')
            ValidTo              = ConvertFrom-midPointDateTime (Get-midPointProperty $activation 'validTo')
            Extension            = ConvertFrom-midPointItemContainer (Get-midPointProperty $InputObject 'extension')
            Raw                  = $InputObject
        }
    }
}

function ConvertTo-midPointActivationObject {
    [CmdletBinding()]
    param([Parameter(Mandatory)] [object] $InputObject)

    $activation = Get-midPointProperty $InputObject 'activation'
    [pscustomobject]@{
        PSTypeName           = 'midPointTools.Activation'
        Oid                  = [string](Get-midPointProperty $InputObject 'oid')
        Name                 = ConvertFrom-midPointPolyString (Get-midPointProperty $InputObject 'name')
        AdministrativeStatus = Get-midPointProperty $activation 'administrativeStatus'
        EffectiveStatus      = Get-midPointProperty $activation 'effectiveStatus'
        ValidityStatus       = Get-midPointProperty $activation 'validityStatus'
        ValidFrom            = ConvertFrom-midPointDateTime (Get-midPointProperty $activation 'validFrom')
        ValidTo              = ConvertFrom-midPointDateTime (Get-midPointProperty $activation 'validTo')
        DisableReason        = ConvertFrom-midPointQName (Get-midPointProperty $activation 'disableReason')
        DisableTimestamp     = ConvertFrom-midPointDateTime (Get-midPointProperty $activation 'disableTimestamp')
        EnableTimestamp      = ConvertFrom-midPointDateTime (Get-midPointProperty $activation 'enableTimestamp')
        LockoutStatus        = Get-midPointProperty $activation 'lockoutStatus'
        Raw                  = $activation
    }
}

function ConvertTo-midPointRoleObject {
    [CmdletBinding()]
    param([Parameter(Mandatory, ValueFromPipeline)] [object] $InputObject)

    process {
        [pscustomobject]@{
            PSTypeName  = 'midPointTools.Role'
            Oid         = [string](Get-midPointProperty $InputObject 'oid')
            Name        = ConvertFrom-midPointPolyString (Get-midPointProperty $InputObject 'name')
            DisplayName = ConvertFrom-midPointPolyString (Get-midPointProperty $InputObject 'displayName')
            Description = Get-midPointProperty $InputObject 'description'
            Raw         = $InputObject
        }
    }
}

function ConvertTo-midPointOrgObject {
    [CmdletBinding()]
    param([Parameter(Mandatory, ValueFromPipeline)] [object] $InputObject)

    process {
        [pscustomobject]@{
            PSTypeName  = 'midPointTools.Org'
            Oid         = [string](Get-midPointProperty $InputObject 'oid')
            Name        = ConvertFrom-midPointPolyString (Get-midPointProperty $InputObject 'name')
            DisplayName = ConvertFrom-midPointPolyString (Get-midPointProperty $InputObject 'displayName')
            Identifier  = Get-midPointProperty $InputObject 'identifier'
            Description = Get-midPointProperty $InputObject 'description'
            Extension   = ConvertFrom-midPointItemContainer (Get-midPointProperty $InputObject 'extension')
            Raw         = $InputObject
        }
    }
}

function ConvertTo-midPointAssignmentObject {
    # -Kind Role gives Role / RoleOid, -Kind Org gives Org / OrgOid (pipeline binding to -Role / -Org).
    [CmdletBinding()]
    param(
        [Parameter(Mandatory)] [object] $Assignment,
        [Parameter(Mandatory)] [object] $User,
        [ValidateSet('Role', 'Org')] [string] $Kind = 'Role'
    )

    $targetRef = Get-midPointProperty $Assignment 'targetRef'
    $activation = Get-midPointProperty $Assignment 'activation'
    # A reference without relation has the default relation.
    $relation = ConvertFrom-midPointQName (Get-midPointProperty $targetRef 'relation')
    if (-not $relation) { $relation = 'default' }
    $result = [ordered]@{
        PSTypeName           = "midPointTools.${Kind}Assignment"
        User                 = ConvertFrom-midPointPolyString (Get-midPointProperty $User 'name')
        UserOid              = [string](Get-midPointProperty $User 'oid')
        $Kind                = ConvertFrom-midPointPolyString (Get-midPointProperty $targetRef 'targetName')
        "${Kind}Oid"         = [string](Get-midPointProperty $targetRef 'oid')
        Relation             = $relation
        AssignmentId         = Get-midPointContainerId $Assignment
        AdministrativeStatus = Get-midPointProperty $activation 'administrativeStatus'
        EffectiveStatus      = Get-midPointProperty $activation 'effectiveStatus'
        ValidFrom            = ConvertFrom-midPointDateTime (Get-midPointProperty $activation 'validFrom')
        ValidTo              = ConvertFrom-midPointDateTime (Get-midPointProperty $activation 'validTo')
        Raw                  = $Assignment
    }
    [pscustomobject]$result
}

function ConvertFrom-midPointItemContainer {
    # Shadow 'attributes' or an object's 'extension' -> hashtable. Keys lose their namespace prefix
    # ('ri:mail' -> 'mail'), single-element arrays become scalars. midPoint 4.10 sends plain keys with an
    # '@ns' entry (run 8).
    [CmdletBinding()]
    [OutputType([hashtable])]
    param([AllowNull()] [object] $Attributes)

    $result = @{}
    if ($null -eq $Attributes) { return $result }
    foreach ($p in $Attributes.PSObject.Properties) {
        if ($p.Name.StartsWith('@')) { continue }
        $key = ($p.Name -split ':')[-1]
        $value = $p.Value
        if ($value -is [array] -and $value.Count -eq 1) { $value = $value[0] }
        $result[$key] = $value
    }
    $result
}

function ConvertTo-midPointShadowObject {
    [CmdletBinding()]
    param(
        [Parameter(Mandatory)] [object] $InputObject,
        [object] $User
    )

    $resourceRef = Get-midPointProperty $InputObject 'resourceRef'
    $exists = Get-midPointProperty $InputObject 'exists'

    # Not completed pending operations, e.g. an 'add' waiting for a manual resource case or an approval.
    $pending = @(Get-midPointProperty $InputObject 'pendingOperation' | Where-Object {
            $null -ne $_ -and (Get-midPointProperty $_ 'executionStatus') -ne 'completed'
        })
    $pendingTypes = @($pending | ForEach-Object {
            ConvertFrom-midPointQName (Get-midPointProperty (Get-midPointProperty $_ 'delta') 'changeType')
        } | Where-Object { $_ })

    $attributes = ConvertFrom-midPointItemContainer (Get-midPointProperty $InputObject 'attributes')
    if ($attributes.Count -eq 0) {
        # A shadow that only exists as a pending 'add' has its values in the delta.
        $add = $pending | Where-Object { (ConvertFrom-midPointQName (Get-midPointProperty (Get-midPointProperty $_ 'delta') 'changeType')) -eq 'add' } |
            Select-Object -First 1
        if ($add) {
            $objectToAdd = Get-midPointProperty (Get-midPointProperty $add 'delta') 'objectToAdd'
            $attributes = ConvertFrom-midPointItemContainer (Get-midPointProperty $objectToAdd 'attributes')
        }
    }
    [pscustomobject]@{
        PSTypeName           = 'midPointTools.Shadow'
        Oid                  = [string](Get-midPointProperty $InputObject 'oid')
        Name                 = ConvertFrom-midPointPolyString (Get-midPointProperty $InputObject 'name')
        User                 = ConvertFrom-midPointPolyString (Get-midPointProperty $User 'name')
        UserOid              = [string](Get-midPointProperty $User 'oid')
        Resource             = ConvertFrom-midPointPolyString (Get-midPointProperty $resourceRef 'targetName')
        ResourceOid          = [string](Get-midPointProperty $resourceRef 'oid')
        Kind                 = Get-midPointProperty $InputObject 'kind'
        Intent               = Get-midPointProperty $InputObject 'intent'
        ObjectClass          = ConvertFrom-midPointQName (Get-midPointProperty $InputObject 'objectClass')
        Situation            = Get-midPointProperty $InputObject 'synchronizationSituation'
        Exists               = if ($null -eq $exists) { $true } else { [bool]$exists }
        Dead                 = [bool](Get-midPointProperty $InputObject 'dead')
        IsPending            = $pending.Count -gt 0
        PendingOperation     = $pendingTypes
        AdministrativeStatus = Get-midPointProperty (Get-midPointProperty $InputObject 'activation') 'administrativeStatus'
        Attributes           = $attributes
        Raw                  = $InputObject
    }
}

function ConvertTo-midPointResourceObject {
    [CmdletBinding()]
    param(
        [Parameter(Mandatory)] [object] $InputObject,
        [object] $Connector
    )

    # connectorType is the connector class: 'ManualConnector' for midPoint's built-in manual connector,
    # e.g. 'com.evolveum.polygon.connector.csv.CsvConnector' for ConnId connectors.
    $connectorType = [string](Get-midPointProperty $Connector 'connectorType')
    [pscustomobject]@{
        PSTypeName    = 'midPointTools.Resource'
        Oid           = [string](Get-midPointProperty $InputObject 'oid')
        Name          = ConvertFrom-midPointPolyString (Get-midPointProperty $InputObject 'name')
        Description   = Get-midPointProperty $InputObject 'description'
        ConnectorType = if ($connectorType) { $connectorType } else { $null }
        ConnectorOid  = [string](Get-midPointProperty (Get-midPointProperty $InputObject 'connectorRef') 'oid')
        IsManual      = $connectorType -like '*ManualConnector'
        Raw           = $InputObject
    }
}