Hans hansgafriedzal

rather be opposed, than misunderstood

hansgafriedzal / Get-WindowsSecurityUpdate.ps1

Created June 16, 2025 10:27

hansgafriedzal / Bind-Host.ps1

Last active June 17, 2025 07:48

	$h = 'C:\windows\system32\drivers\etc\hosts'

	@(
	"127.0.0.1 `t dev.localdev.info"
	) \| % {
	(cat $h) + $_ \| Out-File $h -Encoding ascii
	}

hansgafriedzal / Organize-File.ps1

Last active April 4, 2025 09:34

hansgafriedzal / Get-PathCollapsed.ps1

Last active November 27, 2024 16:36

Given a list of paths, remove all paths whose parent is already in the list.

	<#
	.SYNOPSIS
	Given a list of paths, remove all paths whose parent is already in the list.
	#>
	function Get-PathCollapsed
	{
	param (
	[string[]] $Paths
	)

hansgafriedzal / Get-ExifCameraModel.ps1

Created October 1, 2024 18:45

	dir \| % {
	$exif = exiftool -G2 -json $_.FullName \| ConvertFrom-Json
	$exif.'Camera:Model'
	}

hansgafriedzal / Get-SPAuditLogs.ps1

Created September 10, 2024 11:07

	$site = Get-SPSite http://site.local/
	$query = New-Object -TypeName Microsoft.SharePoint.SPAuditQuery($site)
	$query.RowLimit = 10
	$query.SetRangeStart((Get-Date).Date)
	$query.AddEventRestriction([Microsoft.SharePoint.SPAuditEventType]::ChildMove)
	$site.Audit.GetEntries($query) \| Out-GridView

hansgafriedzal / Get-AzureADUserOnPremisesExtensionAttributes.ps1

Last active November 28, 2024 09:37

Gets the service principal auth token using AzureAD module and then get the user and its custom attribute.

	param
	(
	[Parameter(Mandatory = $true)][string]$clientId,
	[Parameter(Mandatory = $true)][string]$tenantId,
	[Parameter(Mandatory = $true)][string[]]$upn
	)

	Install-Module AzureAD
	Update-Module AzureAD

hansgafriedzal / Get-ProcessGroup.ps1

Created July 31, 2024 07:23

	Get-Process \| select name, cpu, workingset64 \| group name \| %{
	[pscustomobject] @{
	name = $_.Name
	WorkingSet64 = [math]::round(($_.group \| measure workingset64 -Sum \| % sum)/1gb, 2)
	}
	} \| sort workingset64 -Descending \| select -first 10

hansgafriedzal / ParseJMeter

Created May 13, 2024 08:38

	= (Path as text) => let
	Custom1 = Csv.Document(File.Contents(Path),[Delimiter=",", Columns=17, Encoding=1252, QuoteStyle=QuoteStyle.None]),
	#"Promoted Headers" = Table.PromoteHeaders(Custom1, [PromoteAllScalars=true]),
	#"Changed Type" = Table.TransformColumnTypes(#"Promoted Headers",{{"timeStamp", type text}, {"elapsed", Int64.Type}, {"label", type text}, {"responseCode", Int64.Type}, {"responseMessage", type text}, {"threadName", type text}, {"dataType", type text}, {"success", type logical}, {"failureMessage", type text}, {"bytes", Int64.Type}, {"sentBytes", Int64.Type}, {"grpThreads", Int64.Type}, {"allThreads", Int64.Type}, {"URL", type text}, {"Latency", Int64.Type}, {"IdleTime", Int64.Type}, {"Connect", Int64.Type}}),
	#"Extracted First Characters" = Table.TransformColumns(#"Changed Type", {{"timeStamp", each Text.Start(_, 10), type text}}),
	#"Added Custom" = Table.AddColumn(#"Extracted First Characters", "Custom", each #datetime(1970,1,1,0,0,0) + #duration(0,8,0,N

hansgafriedzal / Trim-JmeterCsvByUnixTimestamp.ps1

Last active April 22, 2024 10:46

	Get-Process \| select name, cpu, workingset64 \| group name \| %{
	[pscustomobject] @{
	name = $_.Name
	WorkingSet64 = [math]::round(($_.group \| measure workingset64 -Sum \| % sum)/1gb, 2)
	}
	} \| sort workingset64 -Descending \| select -first 10