core/api/m365/SharePointOnline/utils/New-MonkeyCSOMPermissionObject.ps1

# Monkey365 - the PowerShell Cloud Security Tool for Azure and Microsoft 365 (copyright 2022) by Juan Garrido
#
# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at
#
# http://www.apache.org/licenses/LICENSE-2.0
#
# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.

Function New-MonkeyCSOMPermissionObject {
<#
        .SYNOPSIS
        Create a new SharePoint Online permission object
 
        .DESCRIPTION
        Create a new SharePoint Online permission object
 
        .INPUTS
 
        .OUTPUTS
 
        .EXAMPLE
 
        .NOTES
            Author : Juan Garrido
            Twitter : @tr1ana
            File Name : New-MonkeyCSOMPermissionObject
            Version : 1.0
 
        .LINK
            https://github.com/silverhack/monkey365
    #>


    [Diagnostics.CodeAnalysis.SuppressMessageAttribute("PSUseShouldProcessForStateChangingFunctions", "", Scope="Function")]
    [CmdletBinding()]
    Param (
        [parameter(Mandatory= $True, ValueFromPipeline = $True, HelpMessage="SharePoint object")]
        [Object]$Object
    )
    Process{
        try{
            #[System.Uri]$uri = $Object.Url;
            #Create ordered dictionary
            $new_permission = [ordered]@{
                objectType = $Object.ObjectType;
                title = $Object.Title;
                objectPath = $Object.Path;
                url = $Object.Url;
                #rootSite = $uri.GetLeftPart([System.UriPartial]::Authority);
                hasUniquePermissions = $null;
                appliedTo = $null;
                permissions = $null;
                grantedThrough = $null;
                roleAssignment = $null;
                description = $null;
                members = $null;
                rawObject = $null;
            }
            #Create PsObject
            $perm_obj = New-Object -TypeName PsObject -Property $new_permission
            #return object
            return $perm_obj
        }
        catch{
            $msg = @{
                MessageData = ($message.SPOPermissionObjectError -f $Object.ObjectType);
                callStack = (Get-PSCallStack | Select-Object -First 1);
                logLevel = 'error';
                InformationAction = $O365Object.InformationAction;
                Tags = @('MonkeyCSOMPermissionObjectError');
            }
            Write-Error @msg
            $msg.MessageData = $_
            $msg.LogLevel = "Verbose"
            $msg.Tags+= "MonkeyCSOMPermissionObjectError"
            [void]$msg.Add('verbose',$O365Object.verbose)
            Write-Verbose @msg
        }
    }
}