Skip to content

Instantly share code, notes, and snippets.

View mockmyberet's full-sized avatar
🥷

Tommy Becker mockmyberet

🥷
View GitHub Profile
@mockmyberet
mockmyberet / TraceDetailedDNSLogs.ps1
Created October 28, 2020 19:29 — forked from i128/TraceDetailedDNSLogs.ps1
Simple Script for Parsing Detailed DNS Debug Logs
function Get-DNSDebugLog
{
<#
.SYNOPSIS
This cmdlet parses a Windows DNS Debug log with details.
Author: @jarsnah12
License: BSD 3-Clause
Required Dependencies: None
Optional Dependencies: None
### Keybase proof
I hereby claim:
* I am mockmyberet on github.
* I am mockmyberet (https://keybase.io/mockmyberet) on keybase.
* I have a public key ASBqD2uwEW6LdFCe_NLIRZNW3ZttqRTSEjYzuyBC-MwurQo
To claim this, I am signing this object:
@mockmyberet
mockmyberet / Optimize-PSReadLineHistory
Created November 5, 2017 10:57 — forked from jdhitsolutions/Optimize-PSReadLineHistory.ps1
A PowerShell command to trim the command history file used by PSReadline
#requires -version 5.0
#requires -module PSReadline
Function Optimize-PSReadLineHistory {
<#
.SYNOPSIS
Optimize the PSReadline history file
.DESCRIPTION
The PSReadline module can maintain a persistent command-line history. However, there are no provisions for managing the file. When the file gets very large, performance starting PowerShell can be affected. This command will trim the history file to a specified length as well as removing any duplicate entries.
@mockmyberet
mockmyberet / CreateAPSCredential.ps1
Last active October 31, 2017 00:09
Files for CMS post
Write-Verbose -Message 'Pull the encrypted password from our stored file' -Verbose
Unprotect-CmsMessage -Path .\password.cms
Write-Verbose -Message 'Do the same thing, but store it in a variable' -Verbose
$Password = Unprotect-CmsMessage -Path .\password.cms | ConvertTo-SecureString -AsPlainText -Force
Write-Verbose -Message 'Create a pscredential' -Verbose
@mockmyberet
mockmyberet / cert.cer
Created October 30, 2017 08:10
Certificate for encrypting messages to [email protected]
-----BEGIN NEW CERTIFICATE REQUEST-----
MIIDXTCCAkWgAwIBAgIQKo0vE+e1xZpLlUdypoNxgTANBgkqhkiG9w0BAQUFADAh
MR8wHQYDVQQDDBZ0b21teS5iZWNrZXJAZ21haWwuY29tMCAXDTE3MTAzMDA0MDAw
NloYDzMwMTcxMDMwMDQxMDA2WjAhMR8wHQYDVQQDDBZ0b21teS5iZWNrZXJAZ21h
aWwuY29tMIIBIjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEAnwGh1MZVeOd9
iffKmE3L1KvWsU6FJKb95cY3Yz3E1jb4VHYDJRGLZvcL19gxs3gahjDVUa75wVta
c39FjTCcu7ZH8s2XJ4PKH/ai3kHZLIjy9U2KdjA7ApuBDfmeoDLMJ23bAIR9l6kP
qLLAvwkVeZCy0ikEuPSkjos1f5WaNcwVF9krf77jHHMLhrbti1tAedimnDvcEJgf
6ArCAQa0lXsBrbih8tzwpDVaryFV2clzXDWa7grkpoOrVkxbtmB8DeKomUPAj4fJ
7gKJ604Ay+yQ1Wr9wZNd4nzBUKohISzGnVOoKkpnhVgxIPdXy2rD1b2RVNTHwu/G
@mockmyberet
mockmyberet / get-excuse.ps1
Created October 12, 2017 01:16
Excuse Generator
function Get-Excuse
{
$url = 'http://pages.cs.wisc.edu/~ballard/bofh/bofhserver.pl'
$ProgressPreference = 'SilentlyContinue'
$page = Invoke-WebRequest -Uri $url -UseBasicParsing
$pattern = '<br><font size = "\+2">(.+)'
if ($page.Content -match $pattern)
{
$matches[1]
}
@mockmyberet
mockmyberet / New-VMFromScratch.ps1
Created August 25, 2017 09:25
A quick script I wrote today to quickly build some VMs for my local Hyper-V lab running in Windows 10.
#requires -Version 2.0 -Modules Hyper-V
function New-VMFromScratch
{
param
(
[String]
[Parameter(Mandatory,HelpMessage='Enter the name of the local VM.',ValueFromPipeline,ValueFromPipelineByPropertyName)]
$VMName
)
begin
@mockmyberet
mockmyberet / IPAddress.ps1xml
Last active November 3, 2015 20:53
Adding a type property to fix System.Net.IPAddress bytes address style.
<?xml version="1.0" encoding="utf-8" ?>
<Types>
<Type>
<Name>System.Net.IPAddress</Name>
<Members>
<ScriptProperty>
<Name>BigEndianAddress</Name>
<GetScriptBlock>
$bytes=$this.GetAddressBytes()
[array]::Reverse($bytes)
@mockmyberet
mockmyberet / ChooseFile.vbs
Created May 8, 2012 18:50
New function to replace open file dialog by building an HTA
Function ChooseFile( )
Dim objFSO, objShell, objTempFolder, strTempFileName, strFullTempFileName, objOpenFile, objTextFile, strTempTextFileName
Const TemporaryFolder = 2
Const ForReading = 1
strTempFileName = "OpenFile.hta"
strTempTextFileName = "OpenFile.txt"
Set objFSO= CreateObject("Scripting.FileSystemObject")
Set objTempFolder = objFSO.GetSpecialFolder(TemporaryFolder)
strFullTempFileName=objTempFolder.Path & "\" & strTempFileName
Set objOpenFile = objFSO.CreateTextFile(strFullTempFileName,True)