New-Object | Scripting and security

Crear un array con información y convertirlo en un fichero JSON

(1 votes, average: 5.00 out of 5)

[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

# Almacenar en un array información sobre libros
$null = $arraylist.Add(
    [pscustomobject] @{
    titulo = "Redes Locales"
    isbn = "9788415426479"
    imagen = "https://images-na.ssl-images-amazon.com/images/I/51ggAPSyROL._SX383_BO1,204,203,200_.jpg"
    curso = "gi1"
    obligatorio = 1
    })

$null = $arraylist.Add(
    [pscustomobject] @{
    titulo = "Sistemas Operativos Monopuesto"
    isbn = "978-84-9771-9711"
    imagen = "https://images-na.ssl-images-amazon.com/images/I/51xaG8rZaSL._SX411_BO1,204,203,200_.jpg"
    curso = "gi1"
    obligatorio = 1
    })

$json = $arraylist | ConvertTo-Json

($json | ConvertFrom-Json).titulo

[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

# Almacenar en un array información sobre libros

$null = $arraylist.Add(

[pscustomobject] @{

titulo = "Redes Locales"

isbn = "9788415426479"

imagen = "https://images-na.ssl-images-amazon.com/images/I/51ggAPSyROL._SX383_BO1,204,203,200_.jpg"

curso = "gi1"

obligatorio = 1

})

$null = $arraylist.Add(

[pscustomobject] @{

titulo = "Sistemas Operativos Monopuesto"

isbn = "978-84-9771-9711"

imagen = "https://images-na.ssl-images-amazon.com/images/I/51xaG8rZaSL._SX411_BO1,204,203,200_.jpg"

curso = "gi1"

obligatorio = 1

})

$json = $arraylist | ConvertTo-Json

($json | ConvertFrom-Json).titulo

Automatizar el movimiento del ratón en el sistema operativo Windows con PowerShell

(2 votes, average: 5.00 out of 5)

#Ejercicio 1
#Posición X,Y
$dX = ([System.Windows.Forms.Cursor]::Position.X) #Coordenada X
$dY = ([System.Windows.Forms.Cursor]::Position.Y) #Coordenada Y
$dX,$dY

#Ejercicio 2
#Ver la posición X,Y de forma indefinida cada medio segundo
for ()
{
Start-Sleep -m 500
$dX = ([System.Windows.Forms.Cursor]::Position.X)
$dY = ([System.Windows.Forms.Cursor]::Position.Y)
Write-Host $dX,$dY #print
}

#Ejercicio 3
#Almacenar las posiciones en un fichero
for (1)
{
Start-Sleep -s 1
$dX = ([System.Windows.Forms.Cursor]::Position.X)
$dY = ([System.Windows.Forms.Cursor]::Position.Y)
Write-Host $dX,$dY
$dX.ToString()+','+$dY.ToString() | Out-File posicion.txt -Append
}

#Ejercicio 4
#Reproducir las posiciones almacenadas en un fichero
gc .\posicion.txt | %{
Start-Sleep -s 1
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point($_.split(',')[0],$_.split(',')[1])
}

#Ejercicio 5
#Hacer clic izquierdo en una posición de la pantalla
#Funciones y declaraciones necesarias para poder hacer clic 
$MouseEventSig=@’
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
‘@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name “MouseEventWinApi” -passThru
#Hacer clic izquierdo en el botón de inicio
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(19,741)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0);
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0);

#Ejercicio 6
#Hacer clic derecho en una posición de la pantalla
#Funciones y declaraciones necesarias para poder hacer clic 
$MouseEventSig=@’
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
‘@
$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name “MouseEventWinApi” -passThru
#Hacer clic derecho en el botón de inicio
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(19,741)
$MouseEvent::mouse_event(0x00000008, 0, 0, 0, 0);
$MouseEvent::mouse_event(0x00000010, 0, 0, 0, 0);

#Ejercicio 7
#Pintar una línea automáticamente en Paint
#Desde la posición 200,200 a la posición 300,300
Start-Process C:\WINDOWS\system32\mspaint.exe
Start-Sleep -Seconds 5
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(200,200)
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
Start-Sleep -Seconds 2
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(300,300)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

#Ejercicio 1

#Posición X,Y

$dX = ([System.Windows.Forms.Cursor]::Position.X) #Coordenada X

$dY = ([System.Windows.Forms.Cursor]::Position.Y) #Coordenada Y

$dX,$dY

#Ejercicio 2

#Ver la posición X,Y de forma indefinida cada medio segundo

for ()

{

Start-Sleep -m 500

$dX = ([System.Windows.Forms.Cursor]::Position.X)

$dY = ([System.Windows.Forms.Cursor]::Position.Y)

Write-Host $dX,$dY #print

}

#Ejercicio 3

#Almacenar las posiciones en un fichero

for (1)

{

Start-Sleep -s 1

$dX = ([System.Windows.Forms.Cursor]::Position.X)

$dY = ([System.Windows.Forms.Cursor]::Position.Y)

Write-Host $dX,$dY

$dX.ToString()+','+$dY.ToString() | Out-File posicion.txt -Append

}

#Ejercicio 4

#Reproducir las posiciones almacenadas en un fichero

gc .\posicion.txt | %{

Start-Sleep -s 1

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point($_.split(',')[0],$_.split(',')[1])

}

#Ejercicio 5

#Hacer clic izquierdo en una posición de la pantalla

#Funciones y declaraciones necesarias para poder hacer clic

$MouseEventSig=@’

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

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

‘@

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name “MouseEventWinApi” -passThru

#Hacer clic izquierdo en el botón de inicio

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(19,741)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0);

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0);

#Ejercicio 6

#Hacer clic derecho en una posición de la pantalla

#Funciones y declaraciones necesarias para poder hacer clic

$MouseEventSig=@’

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

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

‘@

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name “MouseEventWinApi” -passThru

#Hacer clic derecho en el botón de inicio

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(19,741)

$MouseEvent::mouse_event(0x00000008, 0, 0, 0, 0);

$MouseEvent::mouse_event(0x00000010, 0, 0, 0, 0);

#Ejercicio 7

#Pintar una línea automáticamente en Paint

#Desde la posición 200,200 a la posición 300,300

Start-Process C:\WINDOWS\system32\mspaint.exe

Start-Sleep -Seconds 5

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(200,200)

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

Start-Sleep -Seconds 2

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point(300,300)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Convertir varios ficheros RTF en TXT con PowerShell

(1 votes, average: 5.00 out of 5)

foreach ($file in ls "C:\Users\juan\Desktop\dplus")
{
    $rtf = New-Object System.Windows.Forms.RichTextBox
    $rtf.Rtf = [System.IO.File]::ReadAllText($file.FullName)
    $rtf.Text | Out-File $file.FullName.replace(".rtf",".txt")
}

foreach ($file in ls "C:\Users\juan\Desktop\dplus")

{

$rtf = New-Object System.Windows.Forms.RichTextBox

$rtf.Rtf = [System.IO.File]::ReadAllText($file.FullName)

$rtf.Text | Out-File $file.FullName.replace(".rtf",".txt")

}

Convertir un fichero RTF en TXT con PowerShell

(1 votes, average: 5.00 out of 5)

$file = "C:\Users\juan\Desktop\dplus\dplus_1.rtf"
$rtf = New-Object System.Windows.Forms.RichTextBox
$rtf.Rtf = [System.IO.File]::ReadAllText($file)
$rtf.Text | Out-File $file.replace(".rtf",".txt")

$file = "C:\Users\juan\Desktop\dplus\dplus_1.rtf"

$rtf = New-Object System.Windows.Forms.RichTextBox

$rtf.Rtf = [System.IO.File]::ReadAllText($file)

$rtf.Text | Out-File $file.replace(".rtf",".txt")

Crear un servidor web con un servicio que permita leer un código QR desde PowerShell

(2 votes, average: 5.00 out of 5)

Servidor web con el servicio que permite leer un código QR

# Leer un código QR
# Las funciones JavaScript se han obtenido de webqr.com

# Descargar las funciones JavaScript al equipo
#Start-BitsTransfer "https://webqr.com/webqr.js"
#Start-BitsTransfer "https://webqr.com/llqrcode.js"

$routes = @{
    
    # Cargar las funciones JavaScript
    # Es necesario quitar el caracter // porque provoca un error al leer el fichero JS

    "/webqr.js" = { return (gc ./webqr.js) | % {if(!($_ -match "// " -or $_ -match "//document" )){$_}} }

    "/llqrcode.js" = { return (gc ./llqrcode.js) }

    # Cargar el código HTML

    "/" = { return '<html>
<head>
<title>QR Code scanner</title>

<style type="text/css">
body{
    width:100%;
    text-align:center;
}
#main{
    margin: 15px auto;
    background:white;
    overflow: auto;
	width: 100%;
}
#header{
    background:white;
    margin-bottom:15px;
}
#mainbody{
    background: white;
    width:100%;
	display:none;
}

#qr-canvas{
    display:none;
}

#mp1{
    text-align:center;
    font-size:35px;
}
#imghelp{
    position:relative;
    left:0px;
    top:-160px;
    z-index:100;
    font:18px arial,sans-serif;
    background:#f0f0f0;
	margin-left:35px;
	margin-right:35px;
	padding-top:10px;
	padding-bottom:10px;
	border-radius:20px;
}
.selector{
    margin:0;
    padding:0;
    cursor:pointer;
    margin-bottom:-5px;
}
#outdiv
{
    width:320px;
    height:240px;
	border: solid;
	border-width: 3px 3px 3px 3px;
}
#result{
    border: solid;
	border-width: 1px 1px 1px 1px;
	padding:20px;
	width:70%;
}

.tsel{
    padding:0;
}

</style>

<script type="text/javascript" src="llqrcode.js"></script>
<script type="text/javascript" src="webqr.js"></script>

</head>

<body>
<div id="main">
<div id="header">
<p id="mp1">QR Code scanner</p>
</div>
<div id="mainbody">
<table class="tsel" border="0" width="100%">
<tr>
<td valign="top" align="center" width="50%">
<table class="tsel" border="0">
<tr>
<td><div class="selector" onclick="setimg()" align="right"/>Scanner</td></tr>
<tr><td colspan="2" align="center">
<div id="outdiv">
</div></td></tr>
</table>
</td>
</tr>
<tr><td colspan="3" align="center">
<div id="result"></div>
</td></tr>
</table>
</div>
</div>
<canvas id="qr-canvas" width="800" height="600"></canvas>
<script type="text/javascript">load();</script>
</body>

</html>' }

}

$url = 'http://localhost:8080/'
$listener = New-Object System.Net.HttpListener
$listener.Prefixes.Add($url)
$listener.Start()

Write-Host "Funcionando $url..."

while ($listener.IsListening)
{
    $context = $listener.GetContext()
    $requestUrl = $context.Request.Url
    $con
    $response = $context.Response

    Write-Host ''
    Write-Host "Petición: $requestUrl"

    $localPath = $requestUrl.LocalPath
    $route = $routes.Get_Item($requestUrl.LocalPath)

    if ($route -eq $null)
    {
        $response.StatusCode = 404
    }
    else
    {
        $content = & $route
        $buffer = [System.Text.Encoding]::UTF8.GetBytes($content)
        $response.ContentLength64 = $buffer.Length
        $response.OutputStream.Write($buffer, 0, $buffer.Length)
    }
    
    $response.Close()

    $responseStatus = $response.StatusCode
    Write-Host "Respuesta: $responseStatus"
}

100

101

102

103

104

105

106

107

108

109

110

111

112

113

114

115

116

117

118

119

120

121

122

123

124

125

126

127

128

129

130

131

132

133

134

135

136

137

138

139

140

141

142

143

144

145

146

147

148

149

150

151

152

153

154

155

156

157

158

159

160

161

162

163

164

# Leer un código QR

# Las funciones JavaScript se han obtenido de webqr.com

# Descargar las funciones JavaScript al equipo

#Start-BitsTransfer "https://webqr.com/webqr.js"

#Start-BitsTransfer "https://webqr.com/llqrcode.js"

$routes = @{

# Cargar las funciones JavaScript

# Es necesario quitar el caracter // porque provoca un error al leer el fichero JS

"/webqr.js" = { return (gc ./webqr.js) | % {if(!($_ -match "// " -or $_ -match "//document" )){$_}} }

"/llqrcode.js" = { return (gc ./llqrcode.js) }

# Cargar el código HTML

"/" = { return '<html>

<head>

<title>QR Code scanner</title>

body{

width:100%;

text-align:center;

}

#main{

margin: 15px auto;

background:white;

overflow: auto;

width: 100%;

}

#header{

background:white;

margin-bottom:15px;

}

#mainbody{

background: white;

width:100%;

display:none;

}

#qr-canvas{

display:none;

}

#mp1{

text-align:center;

font-size:35px;

}

#imghelp{

position:relative;

left:0px;

top:-160px;

z-index:100;

font:18px arial,sans-serif;

background:#f0f0f0;

margin-left:35px;

margin-right:35px;

padding-top:10px;

padding-bottom:10px;

border-radius:20px;

}

.selector{

margin:0;

padding:0;

cursor:pointer;

margin-bottom:-5px;

}

#outdiv

{

width:320px;

height:240px;

border: solid;

border-width: 3px 3px 3px 3px;

}

#result{

border: solid;

border-width: 1px 1px 1px 1px;

padding:20px;

width:70%;

}

.tsel{

padding:0;

}

</style>

</head>

<body>

<p id="mp1">QR Code scanner</p>

</div>

<tr>

<tr>

<td><div class="selector" onclick="setimg()" align="right"/>Scanner</td></tr>

</div></td></tr>

</table>

</td>

</tr>

</td></tr>

</table>

</div>

</body>

</html>' }

}

$url = 'http://localhost:8080/'

$listener = New-Object System.Net.HttpListener

$listener.Prefixes.Add($url)

$listener.Start()

Write-Host "Funcionando $url..."

while ($listener.IsListening)

{

$context = $listener.GetContext()

$requestUrl = $context.Request.Url

$con

$response = $context.Response

Write-Host ''

Write-Host "Petición: $requestUrl"

$localPath = $requestUrl.LocalPath

$route = $routes.Get_Item($requestUrl.LocalPath)

if ($route -eq $null)

{

$response.StatusCode = 404

}

else

{

$content = & $route

$buffer = [System.Text.Encoding]::UTF8.GetBytes($content)

$response.ContentLength64 = $buffer.Length

$response.OutputStream.Write($buffer, 0, $buffer.Length)

}

$response.Close()

$responseStatus = $response.StatusCode

Write-Host "Respuesta: $responseStatus"

}

Petición desde Chrome

Crear un servidor web desde PowerShell

(2 votes, average: 5.00 out of 5)

Servidor web

$routes = @{
    "/" = { return '<html><body>Servidor web</body></html>' }
}

$url = 'https://localhost:8080/'
$listener = New-Object System.Net.HttpListener
$listener.Prefixes.Add($url)
$listener.Start()

Write-Host "Funcionando $url..."

while ($listener.IsListening)
{
    $context = $listener.GetContext()
    $requestUrl = $context.Request.Url
    $con
    $response = $context.Response

    Write-Host ''
    Write-Host "Petición: $requestUrl"

    $localPath = $requestUrl.LocalPath
    $route = $routes.Get_Item($requestUrl.LocalPath)

    if ($route -eq $null)
    {
        $response.StatusCode = 404
    }
    else
    {
        $content = & $route
        $buffer = [System.Text.Encoding]::UTF8.GetBytes($content)
        $response.ContentLength64 = $buffer.Length
        $response.OutputStream.Write($buffer, 0, $buffer.Length)
    }
    
    $response.Close()

    $responseStatus = $response.StatusCode
    Write-Host "Respuesta: $responseStatus"
}

$routes = @{

"/" = { return '<html><body>Servidor web</body></html>' }

}

$url = 'https://localhost:8080/'

$listener = New-Object System.Net.HttpListener

$listener.Prefixes.Add($url)

$listener.Start()

Write-Host "Funcionando $url..."

while ($listener.IsListening)

{

$context = $listener.GetContext()

$requestUrl = $context.Request.Url

$con

$response = $context.Response

Write-Host ''

Write-Host "Petición: $requestUrl"

$localPath = $requestUrl.LocalPath

$route = $routes.Get_Item($requestUrl.LocalPath)

if ($route -eq $null)

{

$response.StatusCode = 404

}

else

{

$content = & $route

$buffer = [System.Text.Encoding]::UTF8.GetBytes($content)

$response.ContentLength64 = $buffer.Length

$response.OutputStream.Write($buffer, 0, $buffer.Length)

}

$response.Close()

$responseStatus = $response.StatusCode

Write-Host "Respuesta: $responseStatus"

}

Petición desde Chrome

Crear una comunicación entre un cliente en PowerShell de Windows y un servidor en Node.js utilizando TCP/IP

(2 votes, average: 4.00 out of 5)

Servidor en Node.js

var net = require('net');

var HOST = '127.0.0.1';
var PORT = 6969;

// Create a server instance, and chain the listen function to it
// The function passed to net.createServer() becomes the event handler for the 'connection' event
// The sock object the callback function receives UNIQUE for each connection
net.createServer(function(sock) {
    
    // We have a connection - a socket object is assigned to the connection automatically
    console.log('CONNECTED: ' + sock.remoteAddress +':'+ sock.remotePort);
    
    // Add a 'data' event handler to this instance of socket
    sock.on('data', function(data) {
        
        console.log('DATA ' + sock.remoteAddress + ': ' + data);
        // Write the data back to the socket, the client will receive it as data from the server
        sock.write('You said "' + data + '"');
        
    });
    
    // Add a 'close' event handler to this instance of socket
    sock.on('close', function(data) {
        console.log('CLOSED: ' + sock.remoteAddress +' '+ sock.remotePort);
    });
    
}).listen(PORT, HOST);

console.log('Server listening on ' + HOST +':'+ PORT);

var net = require('net');

var HOST = '127.0.0.1';

var PORT = 6969;

// Create a server instance, and chain the listen function to it

// The function passed to net.createServer() becomes the event handler for the 'connection' event

// The sock object the callback function receives UNIQUE for each connection

net.createServer(function(sock) {

// We have a connection - a socket object is assigned to the connection automatically

console.log('CONNECTED: ' + sock.remoteAddress +':'+ sock.remotePort);

// Add a 'data' event handler to this instance of socket

sock.on('data', function(data) {

console.log('DATA ' + sock.remoteAddress + ': ' + data);

// Write the data back to the socket, the client will receive it as data from the server

sock.write('You said "' + data + '"');

});

// Add a 'close' event handler to this instance of socket

sock.on('close', function(data) {

console.log('CLOSED: ' + sock.remoteAddress +' '+ sock.remotePort);

});

}).listen(PORT, HOST);

console.log('Server listening on ' + HOST +':'+ PORT);

Cliente en PowerShell

##Client
$port=6969
$TcpClient=New-Object System.Net.Sockets.TcpClient([IPAddress]::Loopback, $port)

$GetStream = $TcpClient.GetStream()
$StreamWriter = New-Object System.IO.StreamWriter $GetStream

$positions='Hi'

$StreamWriter.Write($positions)

$StreamWriter.Dispose()
$GetStream.Dispose()
$TcpClient.Dispose()

##Client

$port=6969

$TcpClient=New-Object System.Net.Sockets.TcpClient([IPAddress]::Loopback, $port)

$GetStream = $TcpClient.GetStream()

$StreamWriter = New-Object System.IO.StreamWriter $GetStream

$positions='Hi'

$StreamWriter.Write($positions)

$StreamWriter.Dispose()

$GetStream.Dispose()

$TcpClient.Dispose()

Mostrar información sobre las reglas del Firewall de Windows con PowerShell

(3 votes, average: 5.00 out of 5)

$f = New-object -comObject HNetCfg.FwPolicy2
$f.Rules | Select-Object name,applicationname,localports,remoteports | Out-GridView

1 2	$f = New-object -comObject HNetCfg.FwPolicy2 $f.Rules \| Select-Object name,applicationname,localports,remoteports \| Out-GridView

Obtener empresas del IBEX 35 en formato JSON

(No Ratings Yet)

[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

# Obtener empresas del IBEX 35
$web = Invoke-WebRequest 'http://www.bolsamadrid.es/esp/aspx/Mercados/Precios.aspx?indice=ESI100000000'
$result = $web.AllElements | Where Class -eq “DifFlBj” | %{$_.innerText}
$result += $web.AllElements | Where Class -eq “DifFlSb” | %{$_.innerText}
$result += $web.AllElements | Where Class -eq “DifFlIg” | %{$_.innerText}

# Almacenar en un array cada empresa del IBEX 35
ForEach ($elemento in $result){
    $null = $arraylist.Add(
    [pscustomobject] @{
    Empresa = $elemento
    Cotización = 0
    }
)
}

# Eliminar el primer elemento del array porque contiene una empresa no válida
$arraylist.Removeat(0)
# Número de empresas, tiene que ser 35
$arraylist.Count

# Convertir a JSON
$json = $arraylist | ConvertTo-Json

# Importar el contenido JSON y listar las empresas
($json | ConvertFrom-Json).empresa

[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

# Obtener empresas del IBEX 35

$web = Invoke-WebRequest 'http://www.bolsamadrid.es/esp/aspx/Mercados/Precios.aspx?indice=ESI100000000'

$result = $web.AllElements | Where Class -eq “DifFlBj” | %{$_.innerText}

$result += $web.AllElements | Where Class -eq “DifFlSb” | %{$_.innerText}

$result += $web.AllElements | Where Class -eq “DifFlIg” | %{$_.innerText}

# Almacenar en un array cada empresa del IBEX 35

ForEach ($elemento in $result){

$null = $arraylist.Add(

[pscustomobject] @{

Empresa = $elemento

Cotización = 0

}

)

}

# Eliminar el primer elemento del array porque contiene una empresa no válida

$arraylist.Removeat(0)

# Número de empresas, tiene que ser 35

$arraylist.Count

# Convertir a JSON

$json = $arraylist | ConvertTo-Json

# Importar el contenido JSON y listar las empresas

($json | ConvertFrom-Json).empresa

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

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

(1 votes, average: 5.00 out of 5)

#Crear un audio que vamos a mandar mediante señales de radio
#Convertir una frase en audio con la voz del sistema operativo desde PowerShell

Add-Type -AssemblyName System.Speech

$synthesizer = New-Object -TypeName System.Speech.Synthesis.SpeechSynthesizer
$synthesizer.SetOutputToWaveFile("saludo.wav")
$synthesizer.Speak("Hola amigo Pedro")
$synthesizer.SetOutputToDefaultAudioDevice()
Get-ChildItem .\saludo.wav

#Crear un audio que vamos a mandar mediante señales de radio

#Convertir una frase en audio con la voz del sistema operativo desde PowerShell

Add-Type -AssemblyName System.Speech

$synthesizer = New-Object -TypeName System.Speech.Synthesis.SpeechSynthesizer

$synthesizer.SetOutputToWaveFile("saludo.wav")

$synthesizer.Speak("Hola amigo Pedro")

$synthesizer.SetOutputToDefaultAudioDevice()

Get-ChildItem .\saludo.wav

Generar HMAC-SHA256 con PowerShell

(43 votes, average: 1.00 out of 5)

$hmacsha = New-Object System.Security.Cryptography.HMACSHA256
$hmacsha.key = [Text.Encoding]::ASCII.GetBytes("Clave secreta")
$signature = $hmacsha.ComputeHash([Text.Encoding]::ASCII.GetBytes("Mensaje secreto"))
$signature = [Convert]::ToBase64String($signature)

$signature

$hmacsha = New-Object System.Security.Cryptography.HMACSHA256

$hmacsha.key = [Text.Encoding]::ASCII.GetBytes("Clave secreta")

$signature = $hmacsha.ComputeHash([Text.Encoding]::ASCII.GetBytes("Mensaje secreto"))

$signature = [Convert]::ToBase64String($signature)

$signature

Analizar fichero XML con la lista de radares de España

(1 votes, average: 2.00 out of 5)

$radares = [XML](Invoke-WebRequest "http://www.dgt.es/images/Tramos_INVIVE_12042017.xml").content

[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

$radares.RAIZ.PROVINCIA.CARRETERA | %{
    $radar = $_.DENOMINACION + "|" + $_.RADAR.PUNTO_INICIAL.PK
    [void]$arraylist.Add($radar)
}

$arraylist | Sort-Object

$radares = [XML](Invoke-WebRequest "http://www.dgt.es/images/Tramos_INVIVE_12042017.xml").content

[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

$radares.RAIZ.PROVINCIA.CARRETERA | %{

$radar = $_.DENOMINACION + "|" + $_.RADAR.PUNTO_INICIAL.PK

[void]$arraylist.Add($radar)

}

$arraylist | Sort-Object

Detectar si el ratón pasa por alguna posición de la pantalla

(1 votes, average: 5.00 out of 5)

#Inicializa una nueva instancia de la clase ArrayList que está vacía y tiene la capacidad inicial predeterminada
[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

#Añadir posiciones 
[void]$arraylist.Add('0,0')


for (1)
{
    $dY = ([System.Windows.Forms.Cursor]::Position.Y)
    $dX = ([System.Windows.Forms.Cursor]::Position.X)
    if($arraylist.IndexOf("$dX,$dY") -ne -1)
    {
        "El ratón ha pasado por la posición $dX,$dY"
    }
    else
    {
        ""
    }
}

#Inicializa una nueva instancia de la clase ArrayList que está vacía y tiene la capacidad inicial predeterminada

[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

#Añadir posiciones

[void]$arraylist.Add('0,0')

for (1)

{

$dY = ([System.Windows.Forms.Cursor]::Position.Y)

$dX = ([System.Windows.Forms.Cursor]::Position.X)

if($arraylist.IndexOf("$dX,$dY") -ne -1)

{

"El ratón ha pasado por la posición $dX,$dY"

}

else

{

}

Crear un dominio .onion

(2 votes, average: 5.00 out of 5)

Descargar TOR https://www.torproject.org/ Crear un servidor web en el puerto 80 desde PowerShell

##############################################################################################################
#Servidor web con PowerShell
#Ejecutar PowerShell como administrador
##############################################################################################################
$routes = @{
    "/" = { return '<html><meta charset="UTF-8"> <meta http-equiv="refresh" content="0; url=http://jesusninoc.com"><body>asdfasfasfasServidor web funcionando</body></html>' }
}

#IP localhost
$url = 'http://127.0.0.1:80/'
$listener = New-Object System.Net.HttpListener
$listener.Prefixes.Add($url)
$listener.Start()

Write-Host "Funcionando $url..."

while ($listener.IsListening)
{
    $context = $listener.GetContext()
    $requestUrl = $context.Request.Url
    $con
    $response = $context.Response

    Write-Host ''
    Write-Host "Petición: $requestUrl"

    $localPath = $requestUrl.LocalPath
    $route = $routes.Get_Item($requestUrl.LocalPath)

    if ($route -eq $null)
    {
        $response.StatusCode = 404
    }
    else
    {
        $content = & $route
        $buffer = [System.Text.Encoding]::UTF8.GetBytes($content)
        $response.ContentLength64 = $buffer.Length
        $response.OutputStream.Write($buffer, 0, $buffer.Length)
    }
    
    $response.Close()

    $responseStatus = $response.StatusCode
    Write-Host "Respuesta: $responseStatus"
}

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

#Servidor web con PowerShell

#Ejecutar PowerShell como administrador

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

$routes = @{

"/" = { return '<html><meta charset="UTF-8"> <meta http-equiv="refresh" content="0; url=http://jesusninoc.com"><body>asdfasfasfasServidor web funcionando</body></html>' }

}

#IP localhost

$url = 'http://127.0.0.1:80/'

$listener = New-Object System.Net.HttpListener

$listener.Prefixes.Add($url)

$listener.Start()

Write-Host "Funcionando $url..."

while ($listener.IsListening)

{

$context = $listener.GetContext()

$requestUrl = $context.Request.Url

$con

$response = $context.Response

Write-Host ''

Write-Host "Petición: $requestUrl"

$localPath = $requestUrl.LocalPath

$route = $routes.Get_Item($requestUrl.LocalPath)

if ($route -eq $null)

{

$response.StatusCode = 404

}

else

{

$content = & $route

$buffer = [System.Text.Encoding]::UTF8.GetBytes($content)

$response.ContentLength64 = $buffer.Length

$response.OutputStream.Write($buffer, 0, $buffer.Length)

}

$response.Close()

$responseStatus = $response.StatusCode

Write-Host "Respuesta: $responseStatus"

}

Modificar el fichero torrc que se […]

Representar clicks en pantalla teniendo activado Zoomit para poder representar las coordenadas

(No Ratings Yet)

#Representar clicks en pantalla teniendo activado Zoomit para poder representar las coordenadas

$MouseEventSig=@'
[DllImport("user32.dll",CharSet=CharSet.Auto, CallingConvention=CallingConvention.StdCall)]
public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);
'@

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

[System.Windows.Forms.SendKeys]::SendWait("^(2)")

while($true)
{
[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point([Int](Get-Random (10..1021)),[Int](Get-Random (10..800)))
$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)
$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)
Start-Sleep -Seconds 5
}

#Representar clicks en pantalla teniendo activado Zoomit para poder representar las coordenadas

$MouseEventSig=@'

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

public static extern void mouse_event(long dwFlags, long dx, long dy, long cButtons, long dwExtraInfo);

$MouseEvent = Add-Type -memberDefinition $MouseEventSig -name "MouseEventWinApi" -passThru

[System.Windows.Forms.SendKeys]::SendWait("^(2)")

while($true)

{

[System.Windows.Forms.Cursor]::Position = New-Object System.Drawing.Point([Int](Get-Random (10..1021)),[Int](Get-Random (10..800)))

$MouseEvent::mouse_event(0x00000002, 0, 0, 0, 0)

$MouseEvent::mouse_event(0x00000004, 0, 0, 0, 0)

Start-Sleep -Seconds 5

}

Ejercicios de PowerShell: analizar la frecuencia de letras en un fichero

(2 votes, average: 5.00 out of 5)

Versión 1

#Abrir el fichero texto.txt y añadir cada una de las letras que contiene el fichero en una ArrayList

#Inicializa una nueva instancia de la clase ArrayList que está vacía y tiene la capacidad inicial predeterminada
[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList
 
ForEach ($elemento in gc .\texto.txt){
#Agrega un objeto al final de ArrayList
0..($elemento.Length-1) | %{
[void]$arraylist.Add($elemento[$_])
}
}

$arraylist | Group-Object | Sort-Object Count -Descending | select Name,Count

#Abrir el fichero texto.txt y añadir cada una de las letras que contiene el fichero en una ArrayList

#Inicializa una nueva instancia de la clase ArrayList que está vacía y tiene la capacidad inicial predeterminada

[System.Collections.ArrayList] $arraylist = New-Object System.Collections.ArrayList

ForEach ($elemento in gc .\texto.txt){

#Agrega un objeto al final de ArrayList

0..($elemento.Length-1) | %{

[void]$arraylist.Add($elemento[$_])

}

$arraylist | Group-Object | Sort-Object Count -Descending | select Name,Count

Versión 2

(((Get-Content .\texto.txt) -join "`r").ToUpper().GetEnumerator()) | Group-Object | Sort-Object Count -Descending | select Name,Count

1	(((Get-Content .\texto.txt) -join "`r").ToUpper().GetEnumerator()) \| Group-Object \| Sort-Object Count -Descending \| select Name,Count

Older Posts