

[Reflection.Assembly]::LoadWithPartialName("System.Web")
[System.Web.Security.FormsAuthentication]::HashPasswordForStoringInConfigFile("Hola", "SHA512")
#################################################################################
#Función login de user y pass
#El user y pass (hash en SHA512) correcto se escriben en el bloque BEGIN
#Ejecutar la función
#PS C:\Users\usuario> loginH user pass
function loginH
{
param
(
[Parameter(Mandatory=$true, ValueFromPipeline=$true)]
[String[]]
[AllowEmptyString()]
$User,$Pass
)
begin
{
Write-Host "Principio de login"
$usercorrecto="user"
#El pass en SHA512
#$passcorrecto="pass"
$passcorrecto="5B722B307FCE6C944905D132691D5E4A2214B7FE92B738920EB3FCE3A90420A19511C3010A0E7712B054DAEF5B57BAD
59ECBD93B3280F210578F547F4AED4D25"
}
process
{
#Realizar el SHA512 del pass introducido por el usuariO
[Reflection.Assembly]::LoadWithPartialName("System.Web")
$Pass
if($User -eq $usercorrecto -and [System.Web.Security.FormsAuthentication]::HashPasswordForStoringInConfigFile($Pass, "SHA512") -eq $passcorrecto)
{
$ok=1
}
else
{
$ok=0
}
}
end
{
if($ok)
{
Write-Host "User correcto"
}
else
{
Write-Host "User no correcto"
}
Write-Host "Fin de login"
}
}
#################################################################################