63 lines
2.0 KiB
PowerShell
63 lines
2.0 KiB
PowerShell
|
# https://www.github.com/jamisonderek/flipper-zero-tutorials
|
||
|
|
#
|
||
|
|
# Pass short 'secret' messages using SSIDs! Tell people your burner phone number while grabbing a coffee.
|
||
|
|
# Who you gonna call? "5552368" is: AL6fvOPr, BOI5O5Ag, CRU3Cjn7 or DUgPtAbN
|
||
|
|
# To reach Jenny "8675309" is: AOJCghRA, BRVAUlxa, CUhWcF9e or DXtUQJfy
|
||
|
|
#
|
||
|
|
# In PowerShell script, run the encode.ps1.
|
||
|
|
# - Enter the message to encode
|
||
|
|
# - It will display 8 different SSID values that you can use.
|
||
|
|
#
|
||
|
|
# In Marauder:
|
||
|
|
# - Clear List, SSID.
|
||
|
|
# - SSID, add name.
|
||
|
|
# - Enter the SSID name after the "ssid -a -n " prompt. (For example: AL6fvOPr)
|
||
|
|
# - do List, SSID. It should show you the SSID that you added.
|
||
|
|
# - Beacon Spam, SSID List.
|
||
|
|
#
|
||
|
|
|
||
|
|
# This is the list of allowed characters in the message.
|
||
|
|
$dict = "0123456789ABCDEF-"
|
||
|
|
|
||
|
|
# This is the list of allowed characters in the SSID.
|
||
|
|
$cypherLetters = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789".ToCharArray()
|
||
|
|
|
||
|
|
Function Get-Encoded-SSID {
|
||
|
|
Param(
|
||
|
|
[Parameter(Mandatory=$true)]
|
||
|
|
[String]$Message,
|
||
|
|
[Parameter(Mandatory=$false)]
|
||
|
|
[String]$Prefix="0"
|
||
|
|
)
|
||
|
|
$letters = ($Prefix + $Message).ToCharArray()
|
||
|
|
$index = 0
|
||
|
|
$i = 1
|
||
|
|
$result = ""
|
||
|
|
foreach($letter in $letters) {
|
||
|
|
$ch = $dict.IndexOf($letter)
|
||
|
|
if ($ch -eq -1) {
|
||
|
|
Write-Host "Invalid character: $letter"
|
||
|
|
return
|
||
|
|
}
|
||
|
|
$index = $index + $ch
|
||
|
|
if ($index -ge $cypherLetters.Count) {
|
||
|
|
$index = $index - $cypherLetters.Count
|
||
|
|
}
|
||
|
|
$result = $result + $cypherLetters[$index]
|
||
|
|
$i = $i + 1
|
||
|
|
$index = $index + (([int][char]$cypherLetters[$index]) * $i)
|
||
|
|
$index = $index % $cypherLetters.Count
|
||
|
|
}
|
||
|
|
return $result
|
||
|
|
}
|
||
|
|
|
||
|
|
$message = Read-Host "Enter the message to encode"
|
||
|
|
$hex = [System.BitConverter]::ToString([System.Text.Encoding]::ASCII.GetBytes($message)).Replace("-", "")
|
||
|
|
if ($message -cmatch "[^0-9A-F-]") {
|
||
|
|
Write-Host "Using Hex: $hex"
|
||
|
|
$message = $hex
|
||
|
|
}
|
||
|
|
for ($i = 1; $i -le 8; $i++) {
|
||
|
|
$ssid = Get-Encoded-SSID -Message $message -Prefix $i
|
||
|
|
Write-Host ("SSID " + $i +": $ssid")
|
||
|
|
}
|