ConvertFrom-SecureString | Scripting and security

Los sistemas operativos actuales se pueden utilizar por uno o varios usuarios, en algunos sistemas pueden hacerlo simultáneamente y en otros no. Los usuarios se pueden crear localmente o en red, la gestión de usuarios locales sólo afecta al equipo desde el que se crean, modifican, eliminan, etc. Los usuarios locales sólo sirven para iniciar sesión o acceder a recursos en el propio equipo, en cambio los usuarios en red pueden iniciar sesión en cualquier equipo de la red. En la mayoría de los sistemas operativos, las personas que los utilizan necesitan autentificarse mediante una cuenta de usuario y, además, […]

PowerShell Security

Almacenar y utilizar credenciales mediante JSON

08/04/201712/05/2017

#Almacenar credenciales en un fichero JSON
Get-Credential | Select Username,@{n="Password"; e={$_.password | ConvertFrom-SecureString}} | ConvertTo-Json | Set-Content -Path credenciales.json -Encoding UTF8
notepad .\credenciales.json

#Utilizar credenciales desde un fichero JSON
$jsonc = Get-Content -Path .\credenciales.json -Encoding UTF8 -Raw | ConvertFrom-Json
$cred = New-Object -TypeName PSCredential $jsonc.UserName,($jsonc.Password | ConvertTo-SecureString)
Start-Process notepad -Credential $cred

#Almacenar credenciales en un fichero JSON

Get-Credential | Select Username,@{n="Password"; e={$_.password | ConvertFrom-SecureString}} | ConvertTo-Json | Set-Content -Path credenciales.json -Encoding UTF8

notepad .\credenciales.json

#Utilizar credenciales desde un fichero JSON

$jsonc = Get-Content -Path .\credenciales.json -Encoding UTF8 -Raw | ConvertFrom-Json

$cred = New-Object -TypeName PSCredential $jsonc.UserName,($jsonc.Password | ConvertTo-SecureString)

Start-Process notepad -Credential $cred

Cryptography PowerShell Security

Aproximación al cifrado y descifrado en PowerShell

23/02/201723/05/2017

##########################################################
#Generar claves para cifrar (convertir las claves en byte)
##########################################################
$clave='clavesecreta123'
$clave2='clavesecreta123'

#Una clave de 128 bits se especifica como un array de byte de 16 dígitos
#Una clave de 192 bits se especifica como un array de byte de 24 dígitos
#Una clave de 256 bits se especifica como un array de byte de 32 dígitos
#A key of 128 bits can be specified as a byte array of 16 digits. Similarly, 192-bit and 256-bit keys correspond to byte arrays of 24 and 32 digits, respectively.
$clavebyteparacifrar=[Byte[]]($clave.PadRight(24).Substring(0,24).ToCharArray())
$clavebyteparadescifrar=[Byte[]]($clave2.PadRight(24).Substring(0,24).ToCharArray())

##########################################################
#Vamos a convertir una cadena segura en una cadena cifrada (convert a secure string to an encrypted string)
##########################################################
#Convertir un texto plano en una cadena segura (convert a plain text string to a secure string)
#ConvertTo-SecureString: Converts encrypted standard strings to secure strings. It can also convert plain text to secure strings. It is used with ConvertFrom-SecureString and Read-Host.
$textoparacifrar=ConvertTo-SecureString "Texto secreto" -AsPlainText -Force
#Otra posibilidad es utilizar Read-Host para introducir un texto para cifrar (create a secure string)
#$textoparacifrar=Read-Host -AsSecureString

#ConvertFrom-SecureString: Converts a secure string to an encrypted standard string
$textocifradoconclave = ConvertFrom-SecureString -SecureString $textoparacifrar -Key $clavebyteparacifrar

##########################################################
#Vamos a convertir una cadena cifrada en una cadena segura (convert an encrypted string to a secure string)
##########################################################
$textoparadescifrar = ConvertTo-SecureString -String $textocifradoconclave -Key $clavebyteparadescifrar

#Extraer el texto plano de la cadena segura (extract password from SecureString)
$textodescifrado=''
$BSTR = [System.Runtime.InteropServices.Marshal]::SecureStringToBSTR($textoparadescifrar)
$textodescifrado = [System.Runtime.InteropServices.Marshal]::PtrToStringAuto($BSTR)
$textodescifrado

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

#Generar claves para cifrar (convertir las claves en byte)

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

$clave='clavesecreta123'

$clave2='clavesecreta123'

#Una clave de 128 bits se especifica como un array de byte de 16 dígitos

#Una clave de 192 bits se especifica como un array de byte de 24 dígitos

#Una clave de 256 bits se especifica como un array de byte de 32 dígitos

#A key of 128 bits can be specified as a byte array of 16 digits. Similarly, 192-bit and 256-bit keys correspond to byte arrays of 24 and 32 digits, respectively.

$clavebyteparacifrar=[Byte[]]($clave.PadRight(24).Substring(0,24).ToCharArray())

$clavebyteparadescifrar=[Byte[]]($clave2.PadRight(24).Substring(0,24).ToCharArray())

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

#Vamos a convertir una cadena segura en una cadena cifrada (convert a secure string to an encrypted string)

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

#Convertir un texto plano en una cadena segura (convert a plain text string to a secure string)

#ConvertTo-SecureString: Converts encrypted standard strings to secure strings. It can also convert plain text to secure strings. It is used with ConvertFrom-SecureString and Read-Host.

$textoparacifrar=ConvertTo-SecureString "Texto secreto" -AsPlainText -Force

#Otra posibilidad es utilizar Read-Host para introducir un texto para cifrar (create a secure string)

#$textoparacifrar=Read-Host -AsSecureString

#ConvertFrom-SecureString: Converts a secure string to an encrypted standard string

$textocifradoconclave = ConvertFrom-SecureString -SecureString $textoparacifrar -Key $clavebyteparacifrar

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

#Vamos a convertir una cadena cifrada en una cadena segura (convert an encrypted string to a secure string)

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

$textoparadescifrar = ConvertTo-SecureString -String $textocifradoconclave -Key $clavebyteparadescifrar

#Extraer el texto plano de la cadena segura (extract password from SecureString)

$textodescifrado=''

$BSTR = [System.Runtime.InteropServices.Marshal]::SecureStringToBSTR($textoparadescifrar)

$textodescifrado = [System.Runtime.InteropServices.Marshal]::PtrToStringAuto($BSTR)

$textodescifrado

PHP PowerShell Security

Seguridad informática con PowerShell

28/02/201616/07/2019

Introducción Confidencialidad

#Habilitar BitLocker
Enable-BitLocker -MountPoint "f:" -RecoveryPasswordProtector -UsedSpaceOnly -Verbose

#Deshabilitar BitLocker
Disable-BitLocker -MountPoint "f:"

#Habilitar BitLocker

Enable-BitLocker -MountPoint "f:" -RecoveryPasswordProtector -UsedSpaceOnly -Verbose

#Deshabilitar BitLocker

Disable-BitLocker -MountPoint "f:"

Integridad

#Calcular hash para un archivo
Get-FileHash D:\power\fichero.txt -Algorithm MD5
Get-FileHash D:\power\fichero.txt -Algorithm SHA1
Get-FileHash D:\power\fichero.txt -Algorithm SHA256
Get-FileHash D:\power\fichero.txt -Algorithm SHA384
Get-FileHash D:\power\fichero.txt -Algorithm SHA512
Get-FileHash D:\power\fichero.txt -Algorithm RIPEMD160

#Calcular hash para un archivo

Get-FileHash D:\power\fichero.txt -Algorithm MD5

Get-FileHash D:\power\fichero.txt -Algorithm SHA1

Get-FileHash D:\power\fichero.txt -Algorithm SHA256

Get-FileHash D:\power\fichero.txt -Algorithm SHA384

Get-FileHash D:\power\fichero.txt -Algorithm SHA512

Get-FileHash D:\power\fichero.txt -Algorithm RIPEMD160

Seguridad física Analizar el hardware de los equipos de la empresa

$credenciales=Get-Credential
1..254 | %{
    (Get-WmiObject Win32_AutochkSetting -ComputerName ('192.168.1.'+$_) -Credential $credenciales).SettingID
    (Get-WmiObject Win32_BaseBoard -ComputerName ('192.168.1.'+$_) -Credential $credenciales).Manufacturer
    (Get-WmiObject Win32_BIOS -ComputerName ('192.168.1.'+$_) -Credential $credenciales).Version
    (Get-WmiObject Win32_Bus -ComputerName ('192.168.1.'+$_) -Credential $credenciales).DeviceID
    Get-WmiObject Win32_Processor -ComputerName ('192.168.1.'+$_) -Credential $credenciales
    Get-WmiObject Win32_SystemEnclosure -ComputerName ('192.168.1.'+$_) -Credential $credenciales
    Get-WmiObject Win32_Battery -ComputerName ('192.168.1.'+$_) -Credential $credenciales
    Get-WmiObject Win32_Printer -ComputerName ('192.168.1.'+$_) -Credential $credenciales
}

$credenciales=Get-Credential

1..254 | %{

(Get-WmiObject Win32_AutochkSetting -ComputerName ('192.168.1.'+$_) -Credential $credenciales).SettingID

(Get-WmiObject Win32_BaseBoard -ComputerName ('192.168.1.'+$_) -Credential $credenciales).Manufacturer

(Get-WmiObject Win32_BIOS -ComputerName ('192.168.1.'+$_) -Credential $credenciales).Version

(Get-WmiObject Win32_Bus -ComputerName ('192.168.1.'+$_) -Credential $credenciales).DeviceID

Get-WmiObject Win32_Processor -ComputerName ('192.168.1.'+$_) -Credential $credenciales

Get-WmiObject Win32_SystemEnclosure -ComputerName ('192.168.1.'+$_) -Credential $credenciales

Get-WmiObject Win32_Battery -ComputerName ('192.168.1.'+$_) -Credential $credenciales

Get-WmiObject Win32_Printer -ComputerName ('192.168.1.'+$_) -Credential $credenciales

}

Ver dispositivos conectados (móviles, almacenamiento USB, etc.)

Get-PnpDevice | Where-Object { $_.class -EQ 'USBDevice' } | Select-Object FriendlyName

Get-ItemProperty -Path 'Registry::HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Enum\USBSTOR\*\*\' | Where-Object { $_.FriendlyName } | Select-Object FriendlyName
Get-ItemProperty -Path 'Registry::HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Enum\USB\*\*\' | Where-Object { $_.FriendlyName } | Select-Object FriendlyName
Get-ItemProperty -Path 'Registry::HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Enum\USB\*\*\' | Where-Object { $_.FriendlyName } | Select-Object FriendlyName
Get-ItemProperty -Path 'Registry::HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Enum\USBSTOR\*\*\' | Where-Object { $_.FriendlyName } | Select-Object FriendlyName

Get-PnpDevice | Where-Object { $_.class -EQ 'USBDevice' } | Select-Object FriendlyName

Get-ItemProperty -Path 'Registry::HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Enum\USBSTOR\*\*\' | Where-Object { $_.FriendlyName } | Select-Object FriendlyName

Get-ItemProperty -Path 'Registry::HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Enum\USB\*\*\' | Where-Object { $_.FriendlyName } | Select-Object FriendlyName

Get-ItemProperty -Path 'Registry::HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Enum\USB\*\*\' | Where-Object { $_.FriendlyName } | Select-Object FriendlyName

Get-ItemProperty -Path 'Registry::HKEY_LOCAL_MACHINE\SYSTEM\ControlSet001\Enum\USBSTOR\*\*\' | Where-Object { $_.FriendlyName } | Select-Object FriendlyName

Seguridad lógica Ver información sobre usuarios y grupos (usuario que ha iniciado sesión)

[System.Security.Principal.WindowsIdentity]::GetCurrent()

1	[System.Security.Principal.WindowsIdentity]::GetCurrent()

Crear usuarios y grupos (procedimiento de creación)

#Es necesario abrir PowerShell como administrador

#Crear un usuario local con contraseña en Windows 10 con PowerShell 5.1
$pass=ConvertTo-SecureString "11234aaa@@€dsf" -asplaintext -force
New-LocalUser usuario -Password $pass

#Crear un grupo local en Windows 10 con PowerShell 5.1
New-LocalGroup grupo

#Añadir usuarios a un grupo local en Windows 10 con PowerShell 5.1
Add-LocalGroupMember -Member usuario -Group administradores

#Es necesario abrir PowerShell como administrador

#Crear un usuario local con contraseña en Windows 10 con PowerShell 5.1

$pass=ConvertTo-SecureString "11234aaa@@€dsf" -asplaintext -force

New-LocalUser usuario -Password $pass

#Crear un grupo local en Windows 10 con PowerShell 5.1

New-LocalGroup grupo

#Añadir usuarios a un grupo local en Windows 10 con PowerShell 5.1

Add-LocalGroupMember -Member usuario -Group administradores

Analizar el software de los equipos de la empresa

#Programas instalados
Get-Package

1 2	#Programas instalados Get-Package

Analizar los programas que están instalados en los equipos de la empresa y ver la relación que tienen con los procesos y servicios

#Mostrar los procesos que se están ejecutando en relación con los servicios (solo llamadas WMI y más información)
(Get-WmiObject -Class Win32_Service | Where-Object State -EQ 'Running') | %{
Write-Host $_.Name,$_.ProcessId,$_.State,(Get-WmiObject -Class win32_process | Where-Object ProcessId -EQ  $_.ProcessId | select name, Path, ExecutablePath, CommandLine)
}

#Mostrar los procesos que se están ejecutando en relación con los servicios (solo llamadas WMI y más información)

(Get-WmiObject -Class Win32_Service | Where-Object State -EQ 'Running') | %{

Write-Host $_.Name,$_.ProcessId,$_.State,(Get-WmiObject -Class win32_process | Where-Object ProcessId -EQ $_.ProcessId | select name, Path, ExecutablePath, CommandLine)

}

Analizar los programas que están instalados en los equipos de la empresa y ver la relación que tienen con […]

Cryptography PowerShell Security

Cifrar utilizando una clave secreta

18/08/201502/07/2017

$cadena='abcdefghijk'
$clave='clavesecreta123'

#La clave para cifrar tiene que ser correcta en tipo System.Byte
#ConvertFrom-SecureString : No se puede enlazar el parámetro 'Key'. No se puede convertir el valor "Some secret key" al tipo "System.Byte". Error: "La cadena de entrada no tiene el formato correcto."

$clavebyte=[Byte[]]($clave.PadRight(24).Substring(0,24).ToCharArray())

$cadenacifrada=$cadena | ConvertTo-SecureString -AsPlainText -Force | ConvertFrom-SecureString -Key $clavebyte
$cadenacifrada

$cadena='abcdefghijk'

$clave='clavesecreta123'

#La clave para cifrar tiene que ser correcta en tipo System.Byte

#ConvertFrom-SecureString : No se puede enlazar el parámetro 'Key'. No se puede convertir el valor "Some secret key" al tipo "System.Byte". Error: "La cadena de entrada no tiene el formato correcto."

$clavebyte=[Byte[]]($clave.PadRight(24).Substring(0,24).ToCharArray())

$cadenacifrada=$cadena | ConvertTo-SecureString -AsPlainText -Force | ConvertFrom-SecureString -Key $clavebyte

$cadenacifrada