04 junio, 2016

OpenVPN raspberry pi LAN

en openvpn.conf

push "route 192.168.66.0 255.255.255.0"

en sysctl.conf descomentar esta linea

#net.ipv4.ip_forward = 1

iptables -A FORWARD -i eth0 -o tun0 -m state --state ESTABLISHED,RELATED -j ACCEPT
iptables -A FORWARD -s 10.8.0.0/24 -o eth0 -j ACCEPT
iptables -t nat -A POSTROUTING -s 10.8.0.0/24 -o eth0 -j MASQUERADE

05 diciembre, 2015

Desbloquear bootloader Moto G Turbo edition con linux, fedora 22

Instalamos android tools

dnf search android-tools

android-tools.x86_64 : Android platform tools(adb, fastboot)


dnf install android tools


si lo detecta veremos el numero de serie del equipo

[root@localhost ~]# fastboot devices
ZY222V6C98 fastboot


obtenemos los datos para generar el desbloqueo

[root@localhost ~]# fastboot oem get_unlock_data
...
(bootloader) 3A25530807348765#5A593232325636
(bootloader) 433938004D6F746F47332D0000#4A60
(bootloader) 441B387A28B3A5DB628189027896594
(bootloader) 3EBDD#B78A590400000000000000000
(bootloader) 0000000
OKAY [  0.270s]
finished. total time: 0.270s

entramos en la pagina de motorola para generar la llave
https://motorola-global-portal.custhelp.com/app/standalone/bootloader/unlock-your-device-a

pegamos toda la cadena del unlock data
3A25530807348765#5A593232325636433938004D6F746F47332D0000#4A60441B387A28B3A5DB6281890278965943EBDD#B78A5904000000000000000000000000

nos llega nuestra key
O6CYMJHVKAW3JYU7WQMP

en opciones de desarrollo habilitamos la opcion "Desbloqueo OEM"

le mandamos la llave
[root@localhost ~]# fastboot oem unlock UNIQUE_KEY O6CYMJHVKAW3JYU7WQMP
...
(bootloader) Unlock code = UNIQUE_KEY

(bootloader) Password incorrect!
FAILED (remote failure)
finished. total time: 0.562s

tristeza :(

tarado...

[root@localhost ~]# fastboot oem unlock O6CYMJHVKAW3JYU7WQMP
...
(bootloader) Unlock code = O6CYMJHVKAW3JYU7WQMP

(bootloader) Phone is unlocked successfully!
OKAY [  1.957s]
finished. total time: 1.957s


listo


10 octubre, 2015

Frecuencias de uso libre en Mexico





Frecuencias de uso libre:

Acuerdo de Uso Libre del 25 de septiembre, 1996.
153.0125 MHz – 153.2375 MHz
159.0125 MHz – 159.2000 MHz
163.0125 MHz – 163.2375 MHz
450.2625 MHz – 450.4875 MHz
455.2625 MHz – 455.4875 MHz
463.7625 MHz – 463.9875 MHz


Acuerdo de Uso Libre del 17 de noviembre, 1995
75.4 MHz – 76 MHz
148 MHz -149.9 MHz
150.05-174 MHz
464.48750 MHz – 464.51250 MHz
464.5375 MHz – 464.5625 MHz
467.8375 MHz – 467.8625 MHz
467.8625 MHz – 467.8875 MHz
467.8875 MHz – 467.9125 MHz
467.9125 MHz – 467.9375 MHz
468.7625 MHz – 468.9875 MHz


Acuerdo Uso Libre del 21 de agosto, 1998
462.55625 MHz – 462.56875 MHz
462.58125 MHz – 462.59375 MHz
462.60625 MHz – 462.61875 MHz
462.63125 MHz – 462.64375 MHz
462.65625 MHz – 462.66875 MHz
462.68125 MHz – 462.69375 MHz
462.70625 MHz – 462.71875 MHz
467.55625 MHz – 467.56875 MHz
467.58125 MHz – 467.59375 MHz
467.60625 MHz – 467.61875 MHz
467.63125 MHz – 467.64375 MHz
467.65625 MHz – 467.66875 MHz
467.68125 MHz – 467.69375 MHz
467.70625 MHz – 467.71875 MHz


Acuerdo del 19 de enero, 2010
1920.0000 MHz – 1930.0000 MHz


Acuerdo de política para servicios de banda ancha y otras aplicaciones, publicado por el DOF el 13 de marzo de 2006
902 MHz – 928 MHz
2400 MHz – 2483.5 MHz
5,150 – 5,250 MHz
5,250 – 5,350 MHz
5,725 – 5,850 MHz

Acuerdo de Pleno del 14 de diciembre de 2011
5,470 – 5,600 MHz
5,650 – 5,725 MHz

08 octubre, 2015

descomprime por lotes archivos rar

for f in *.rar;do unrar -e $f;done



03 agosto, 2015

Excel insertar imagenes en columna

Me toca hacer un catalogo y este macro me ahorra tiempo para meter varias imágenes en una columna

Sub InsertPictures()
'Update 20140513
Dim PicList() As Variant
Dim PicFormat As String
Dim Rng As Range
Dim sShape As Shape
On Error Resume Next
PicList = Application.GetOpenFilename(PicFormat, MultiSelect:=True)
xColIndex = Application.ActiveCell.Column
If IsArray(PicList) Then
    xRowIndex = Application.ActiveCell.Row
    For lLoop = LBound(PicList) To UBound(PicList)
        Set Rng = Cells(xRowIndex, xColIndex)
        Set sShape = ActiveSheet.Shapes.AddPicture(PicList(lLoop), msoFalse, msoCTrue, Rng.Left, Rng.Top, Rng.Width, Rng.Height)
        xRowIndex = xRowIndex + 1
    Next
End If
End Sub