ConvertTo-SecureString | Scripting and security

Crear, compilar y ejecutar una DLL con Microsoft Visual C# que crear un usuario desde PowerShell

(1 votes, average: 5.00 out of 5)

Crear un proyecto en Visual C# Biblioteca de Clase (.NET Framework) Importar desde Microsoft Visual C# la referencia al ensamblado System.Management.Automation (C:\Windows\assembly\GAC_MSIL\System.Management.Automation\1.0.0.0__31bf3856ad364e35\System.Management.Automation.dll) Añadir […]

Enviar señales de radio desde Raspberry Pi mediante una conexión SSH desde PowerShell (parte 3)

(4 votes, average: 3.00 out of 5)

#Enviar mediante señales de radio el fichero que hemos subido
#Ejecutar fm_transmitter (use Raspberry Pi as FM transmitter)

#Iniciar una sesión SSH
#Para iniciar sesión SSH es necesario indicar la dirección IP del equipo al que nos vamos a conectar y también hay que introducir los credenciales (usuario y contraseña).

$sUser = "pi"
$Pass = ConvertTo-SecureString -String "raspberry" -AsPlainText -Force
$Credential = New-Object -TypeName "System.Management.Automation.PSCredential" -ArgumentList $sUser, $Pass
$oSessionSSH = New-SSHSession -ComputerName 192.168.1.161 -Force -Credential $Credential

#Crear canal de comunicación entre PowerShell y Linux (Raspberry Pi)
#Convertirse en sudo para ejecutar fm_transmitter

$stream = $oSessionSSH.Session.CreateShellStream("PS-SSH", 0, 0, 0, 0, 1000)
Invoke-SSHStreamExpectSecureAction -ShellStream $stream -Command "sudo su -" -ExpectString "[sudo] password for $($sUser):" -SecureAction $Pass

#Transmitir por radio en la frecuencia 90 MHz el saludo creado anteriormente
$stream.WriteLine("/home/pi/fmm/fm_transmitter-master/fm_transmitter -f 90 /home/pi/fmm/fm_transmitter-master/saludo.wav")

#Verificar que llega bien la señal desde SDR o desde una radio FM en la frecuencia 90 MHz

#Enviar mediante señales de radio el fichero que hemos subido

#Ejecutar fm_transmitter (use Raspberry Pi as FM transmitter)

#Iniciar una sesión SSH

#Para iniciar sesión SSH es necesario indicar la dirección IP del equipo al que nos vamos a conectar y también hay que introducir los credenciales (usuario y contraseña).

$sUser = "pi"

$Pass = ConvertTo-SecureString -String "raspberry" -AsPlainText -Force

$Credential = New-Object -TypeName "System.Management.Automation.PSCredential" -ArgumentList $sUser, $Pass

$oSessionSSH = New-SSHSession -ComputerName 192.168.1.161 -Force -Credential $Credential

#Crear canal de comunicación entre PowerShell y Linux (Raspberry Pi)

#Convertirse en sudo para ejecutar fm_transmitter

$stream = $oSessionSSH.Session.CreateShellStream("PS-SSH", 0, 0, 0, 0, 1000)

Invoke-SSHStreamExpectSecureAction -ShellStream $stream -Command "sudo su -" -ExpectString "[sudo] password for $($sUser):" -SecureAction $Pass

#Transmitir por radio en la frecuencia 90 MHz el saludo creado anteriormente

$stream.WriteLine("/home/pi/fmm/fm_transmitter-master/fm_transmitter -f 90 /home/pi/fmm/fm_transmitter-master/saludo.wav")

#Verificar que llega bien la señal desde SDR o desde una radio FM en la frecuencia 90 MHz

Enviar señales de radio desde Raspberry Pi mediante una conexión SSH desde PowerShell (parte 2)

(2 votes, average: 5.00 out of 5)

#Subir el audio a Raspberry Pi realizando una conexión SCP

#Iniciar una sesión SCP
#Para iniciar sesión SSH es necesario indicar la dirección IP del equipo al que nos vamos a conectar y también hay que introducir los credenciales (usuario y contraseña).

$Pass = ConvertTo-SecureString -String "raspberry" -AsPlainText -Force
$Credential = New-Object -TypeName "System.Management.Automation.PSCredential" -ArgumentList "pi", $Pass

#Para configurar Set-SCPFile
#Indicar el fichero que vamos a subir -LocalFile
#Indicar el equipo al que nos vamos a conectar -ComputerName
#Indicar la ruta en la que vamos a subir el audio -RemotePath
#Forzar la conexión para evitar fallo "Key exchange negotiation failed."
#Indicar los credenciales que hemos creado anteriormente

Set-SCPFile -LocalFile .\saludo.wav -ComputerName 192.168.1.161 -RemotePath ./fmm/fm_transmitter-master -Force -Credential $Credential

#Subir el audio a Raspberry Pi realizando una conexión SCP

#Iniciar una sesión SCP

#Para iniciar sesión SSH es necesario indicar la dirección IP del equipo al que nos vamos a conectar y también hay que introducir los credenciales (usuario y contraseña).

$Pass = ConvertTo-SecureString -String "raspberry" -AsPlainText -Force

$Credential = New-Object -TypeName "System.Management.Automation.PSCredential" -ArgumentList "pi", $Pass

#Para configurar Set-SCPFile

#Indicar el fichero que vamos a subir -LocalFile

#Indicar el equipo al que nos vamos a conectar -ComputerName

#Indicar la ruta en la que vamos a subir el audio -RemotePath

#Forzar la conexión para evitar fallo "Key exchange negotiation failed."

#Indicar los credenciales que hemos creado anteriormente

Set-SCPFile -LocalFile .\saludo.wav -ComputerName 192.168.1.161 -RemotePath ./fmm/fm_transmitter-master -Force -Credential $Credential

8. Gestión de usuarios en PowerShell (nivel intermedio)

(18 votes, average: 2.78 out of 5)

Los sistemas operativos actuales se pueden utilizar por uno o varios usuarios, en algunos sistemas pueden hacerlo simultáneamente y en […]

Almacenar y utilizar credenciales mediante JSON

(No Ratings Yet)

#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

Crear y extraer un password de tipo PSCredentials

(No Ratings Yet)

#Crear credenciales PSCredentials
$UserName = "Domain\User"
$SecurePassword = ConvertTo-SecureString "pass23fas@@##as" -AsPlainText -Force
$Credentials = New-Object System.Management.Automation.PSCredential -ArgumentList $UserName, $SecurePassword

#Extraer password desde PSCredentials
$PlainPassword = $Credentials.GetNetworkCredential().Password
$PlainPassword

#Crear credenciales PSCredentials

$UserName = "Domain\User"

$SecurePassword = ConvertTo-SecureString "pass23fas@@##as" -AsPlainText -Force

$Credentials = New-Object System.Management.Automation.PSCredential -ArgumentList $UserName, $SecurePassword

#Extraer password desde PSCredentials

$PlainPassword = $Credentials.GetNetworkCredential().Password

$PlainPassword

Aproximación al cifrado y descifrado en PowerShell

(No Ratings Yet)

##########################################################
#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

Crear un usuario local con contraseña en Windows 10

(No Ratings Yet)

New-LocalUser usuario -Password (ConvertTo-SecureString "11234aaadsf" -asplaintext -force)

1	New-LocalUser usuario -Password (ConvertTo-SecureString "11234aaadsf" -asplaintext -force)

Cambiar la contraseña a un usuario local en Windows 10 con PowerShell 5.1

(No Ratings Yet)

$pass=ConvertTo-SecureString "11234aaa@@€dsf" -asplaintext -force
New-LocalUser usuario -Password $pass

Get-LocalUser

$pass2=ConvertTo-SecureString "11234aaaf" -asplaintext -force
Set-LocalUser -Name usuario -Password $pass2

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

New-LocalUser usuario -Password $pass

Get-LocalUser

$pass2=ConvertTo-SecureString "11234aaaf" -asplaintext -force

Set-LocalUser -Name usuario -Password $pass2

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

(2 votes, average: 5.00 out of 5)

$pass=ConvertTo-SecureString "11234aaa@@€dsf" -asplaintext -force; 
New-LocalUser usuario -Password $pass

1 2	$pass=ConvertTo-SecureString "11234aaa@@€dsf" -asplaintext -force; New-LocalUser usuario -Password $pass

Seguridad informática con PowerShell

(2 votes, average: 5.00 out of 5)

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 […]

Descifrar utilizando una clave secreta

(No Ratings Yet)

$clave='clavesecreta123'
 
#La clave para cifrar tiene que ser correcta en tipo System.Byte
$clavebyte=[Byte[]]($clave.PadRight(24).Substring(0,24).ToCharArray())
 
$cadenadescifrando = $cadenacifrada | ConvertTo-SecureString -Key $clavebyte
 
$BSTR = [System.Runtime.InteropServices.Marshal]::SecureStringToBSTR($cadenadescifrando)
$PlainPassword = [System.Runtime.InteropServices.Marshal]::PtrToStringAuto($BSTR)
$PlainPassword

$clave='clavesecreta123'

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

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

$cadenadescifrando = $cadenacifrada | ConvertTo-SecureString -Key $clavebyte

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

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

$PlainPassword

Cifrar utilizando una clave secreta

(No Ratings Yet)

$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

Create users, add into a group and share directory with permissions in Active Directory

(No Ratings Yet)

#Important: remember change ""

#Create file:
#Users.csv
#cn,sAMAccountname,FirstName,LastName,Password,Group
#user1,user1,username,userlast,secret1123,group

Import-Module ActiveDirectory

#Read file
Import-Csv F:\power\users.csv |%{
$nombreco=$_.FirstName + " " + $_.LastName
$ru="OU=" + $_.Group + ",OU=ou3,OU=ou2,OU=ou1,DC=domain,DC=local"

#Create directory in \serverdepartament
$HomeDirectory="\serverdepartament" + $_.Group + "" + $_.sAMAccountname
mkdir $HomeDirectory
$HomeDirectory
$HomeDrive=’Q:’

#Add user
New-ADUser -Name $_.FirstName -SamAccountName $_.sAMAccountname -HomeDrive $HomeDrive –HomeDirectory $HomeDirectory -DisplayName $nombreco -Enabled $true -ChangePasswordAtLogon $false -AccountPassword (ConvertTo-SecureString $_.Password -AsPlainText -force) -PassThru -UserPrincipalName $_.sAMAccountname -Path $ru

#Add permission for each user (sAMAccountname)
$usereta="domain" + $_.sAMAccountname + ":F"
$HomeDirectory + "-" + $usereta
cacls $HomeDirectory /G $usereta /E

#Add user into a group
Add-ADGroupMember -Identity "CN=groupusers,CN=Builtin,DC=domain,DC=local" $_.sAMAccountname
}

#Important: remember change ""

#Create file:

#Users.csv

#cn,sAMAccountname,FirstName,LastName,Password,Group

#user1,user1,username,userlast,secret1123,group

Import-Module ActiveDirectory

#Read file

Import-Csv F:\power\users.csv |%{

$nombreco=$_.FirstName + " " + $_.LastName

$ru="OU=" + $_.Group + ",OU=ou3,OU=ou2,OU=ou1,DC=domain,DC=local"

#Create directory in \serverdepartament

$HomeDirectory="\serverdepartament" + $_.Group + "" + $_.sAMAccountname

mkdir $HomeDirectory

$HomeDirectory

$HomeDrive=’Q:’

#Add user

New-ADUser -Name $_.FirstName -SamAccountName $_.sAMAccountname -HomeDrive $HomeDrive –HomeDirectory $HomeDirectory -DisplayName $nombreco -Enabled $true -ChangePasswordAtLogon $false -AccountPassword (ConvertTo-SecureString $_.Password -AsPlainText -force) -PassThru -UserPrincipalName $_.sAMAccountname -Path $ru

#Add permission for each user (sAMAccountname)

$usereta="domain" + $_.sAMAccountname + ":F"

$HomeDirectory + "-" + $usereta

cacls $HomeDirectory /G $usereta /E

#Add user into a group

Add-ADGroupMember -Identity "CN=groupusers,CN=Builtin,DC=domain,DC=local" $_.sAMAccountname

}