tylerapplebaum’s gists

tylerapplebaum / Get-DirectoryInfo.ps1

Last active October 19, 2019 20:09

Identify directories with and without files

	Function Get-SubdirectoryInfo {

	[CmdletBinding()]
	param(
	[Parameter(HelpMessage="Specify the top level directory to search")]
	[string]$TopLevelDir
	)

	#Find subdirectories with files
	$Items = Get-ChildItem $TopLevelDir \| Where-Object Attributes -ne Directory \| Select-Object DirectoryName,Name,Length

tylerapplebaum / Snippets.js

Created June 11, 2019 20:35

Chrome Dev Tools Utilities

	// Paste these into the Developer Tools Console

	// Calculate DNS lookup time in milliseconds
	var pageNavArr = performance.getEntriesByType("navigation");
	var pageResArr = performance.getEntriesByType("resource");
	var pageArr = pageNavArr.concat(pageResArr);
	pageArr.forEach(function(element) {
	var dnsTime = element.domainLookupEnd - element.domainLookupStart;
	if (dnsTime > 0) { // Don't display cached DNS entries
	console.log(element.name);

tylerapplebaum / index.html

Last active June 15, 2023 20:13

HTML5 and some light CSS. Useful for my AWS testing.

	<!DOCTYPE html>
	<html lang=en>
	<head>
	<meta charset="utf-8">
	<meta http-equiv="X-UA-Compatible" content="IE=edge">
	<title>AWS Test</title>
	<meta name="description" content="">
	<meta name="viewport" content="width=device-width, initial-scale=1">
	<style>
	body {background-color: AliceBlue;}

tylerapplebaum / gist:0a82343a53c34b6f0d27724154fbfabe

Last active February 1, 2019 18:28

Printer Automation Idea for Dave

	[CmdletBinding()]
	param(
	[Parameter(HelpMessage="Specify the path to the CSV file")]
	[string]$CSVPath,

	[Parameter(HelpMessage="Specify one of OCHIN's supported drivers")]
	[ValidateSet("HP LaserJet 4100 Series PCL6", "HP Universal Printing PCL 5 (v5.7.0)", "Kyocera TASKalfa 7551ci", "Sharp MX-3500N", "Xerox Global Print Driver PCL")]$Driver
	)

tylerapplebaum / Set-TSProfilePath.ps1

Last active October 13, 2018 03:46

Sets the Remote Desktop Services profile path for a user account in Active Directory. Also creates that folder in a share and sets NTFS permissions.

	[CmdletBinding()]
	param (
	[Parameter(HelpMessage="Specify the username")]
	[string]$Username,

	[Parameter(HelpMessage="Specify the profile root directory")]
	[string]$ProfileRoot,

	[Parameter(HelpMessage="Specify the full path to log output to")]
	[string]$LogPath = "C:\Automate\Set-TSProfilePath-log.txt",

tylerapplebaum / Test-LDAPS.ps1

Last active August 14, 2020 13:25

Test LDAPS connection to AD DC

	Function Test-LDAPS {
	[CmdletBinding()]
	param (
	[Parameter(Mandatory=$True)]
	[string]$ADServer
	)
	$LDAPS = "LDAP://" + $ADServer + ":636"
	try {
	$global:Connection = [ADSI]($LDAPS)
	}

tylerapplebaum / Resolve-EstablishedConnections.ps1

Last active March 18, 2019 20:56

Just like "netstat -f | findstr ESTABLISHED" but in PowerShell

	Function Resolve-EstablishedConnections {

	$EstConnections = Get-NetTCPConnection -State Established
	$ConnectionArr = New-Object System.Collections.ArrayList #Initialize the ArrayList
	$Counter = 1
	ForEach ($Connection in $EstConnections) {
	Write-Progress -Activity "Resolving PTR Record" -Status "Looking up $($Connection.RemoteAddress)" -PercentComplete ($Counter / $($EstConnections.Length)*100)

	$ConnectionObj = [PSCustomObject][Ordered] @{
	LocalAddress = $Connection.LocalAddress

tylerapplebaum / Get-UserGroups.ps1

Last active January 3, 2018 18:10

Enumerate user groups

	Function Get-UserGroups {
	<#
	.EXAMPLE
	PS C:\> Get-UserGroups -GroupName "Domain Admins"

	.EXAMPLE
	PS C:\> [bool](Get-UserGroups -GroupName "Domain")

	.EXAMPLE
	PS C:\> Get-UserGroups -UserName [email protected]

tylerapplebaum / UACBypass.inf

Last active November 5, 2024 18:40 — forked from api0cradle/CorpVPN.cmp

CMSTP.exe scripts and files

	; No longer needed - embedded in script now
	[version]
	Signature=$chicago$
	AdvancedINF=2.5

	[DefaultInstall]
	CustomDestination=CustInstDestSectionAllUsers
	RunPreSetupCommands=RunPreSetupCommandsSection

	[RunPreSetupCommandsSection]

tylerapplebaum / Get-StringHash

Last active January 3, 2018 18:11

A function to get the secure hash of a string

	Function Get-StringHash {
	param(
	[CmdletBinding()]
	[Parameter(ValueFromPipeline=$True,Mandatory=$True,HelpMessage="String to hash")]
	$String,
	[Parameter(HelpMessage="Hash algorithm")]
	[ValidateSet('MD5','RIPEMD160','SHA1','SHA256','SHA384','SHA512')]
	$Algorithm = "SHA1"
	)
	$StringBuilder = New-Object System.Text.StringBuilder

Tyler Applebaum tylerapplebaum