Capturar las teclas que se pulsan desde PowerShell y calcular el tiempo total en segundos que transcurre desde el inicio hasta que se empezó a pulsar la primera letra y se siguen pulsando hasta finalizar | Operating systems, scripting, PowerShell and security

#Declarar funciones
$signatures = @'
[DllImport("user32.dll", CharSet=CharSet.Auto, ExactSpelling=true)] 
public static extern short GetAsyncKeyState(int virtualKeyCode); 
'@

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

$Comienzo = Get-Date

try
{
    $Total = 0
    #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)
            {
                [char]$ascii[0]
                $Tiempo = ((Get-Date) - $Comienzo).TotalMilliseconds
                $Total +=$Tiempo
                $Comienzo = Get-Date
                #Tiempo total desde que se empezó a pulsar letras y se siguen pulsando (resultado en segundos)
                "Tiempo en segundos desde que empezó: " + ([timespan]::FromMilliseconds($Total)).seconds
            }
        }
    }
}
finally
{
}

#Declarar funciones

$signatures = @'

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

public static extern short GetAsyncKeyState(int virtualKeyCode);

#Cargar las funciones declaradas

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

$Comienzo = Get-Date

try

{

$Total = 0

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

{

[char]$ascii[0]

$Tiempo = ((Get-Date) - $Comienzo).TotalMilliseconds

$Total +=$Tiempo

$Comienzo = Get-Date

#Tiempo total desde que se empezó a pulsar letras y se siguen pulsando (resultado en segundos)

"Tiempo en segundos desde que empezó: " + ([timespan]::FromMilliseconds($Total)).seconds

}

finally

{

}

Publicado el día 22 de enero de 2021

CATEGORÍAS

PowerShell

ETIQUETAS

Add-Type, Caracteres, Date, Get-Date, Jesús Niño, Jesús Niño Camazón, user32.dll, Win32

CATEGORÍAS

ETIQUETAS

MÁS