Control Remoto (IR) en Zotac Nano + XBMC (Dharma) + Ubuntu 11.10 (Oneiric)

Para los que tiene un Zotac Nano y montaron un centro multimedia en él y no saben como hacer para que XBMC reconozca el control remoto que viene con el equipo, aquí están los pasos:

1.- Instalar "lirc".

1. sudo apt-get install lirc

Si pregunta algo durante la instalación, déjenlo en "none" (primera opción), ya que lo configuraremos a mano más adelante.

2.- Configurar hardware.conf

1. sudo vi /etc/lirc/hardware.conf

Cambiar estos parámetros:

1. REMOTE_DEVICE="/dev/lirc0"
2. START_LIRCD="true"

3.- Configurar lircd.conf

1. sudo vi /etc/lirc/lircd.conf

Pegar el siguiente texto:

2. # Please make this file available to others
3. # by sending it to <lirc@bartelmus.de>
4. #
5. # this config file was automatically generated
6. # using lirc-0.9.0(default) on Sat Jan 14 16:23:13 2012
7. #
8. # contributed by
9. #
10. # brand:                       MyRemote.conf
11. # model no. of remote control:
12. # devices being controlled by this remote:
13. #
15. begin remote
17.   name  MyRemote
18.   bits           37
19.   flags RC6|CONST_LENGTH
20.   eps            30
21.   aeps          100
23.   header       2661   869
24.   one           446   437
25.   zero          446   437
26.   gap          106433
27.   toggle_bit_mask 0x8000
28.   rc6_mask    0x100000000
30.       begin codes
31.           KEY_POWER                0x037FCB7B71
32.           KEY_POWER2               0x037FCB7BC2
33.           KEY_RECORD               0x037FCB7BC8
34.           KEY_PAUSE                0x037FCB7BCF
35.           KEY_STOP                 0x037FCB7BCE
36.           KEY_REWIND               0x037FCB7BD6
37.           KEY_PLAY                 0x037FCB7BD3
38.           KEY_FASTFORWARD          0x037FCB7BD7
39.           KEY_PREVIOUSSONG         0x037FCB7BDE
40.           KEY_NEXTSONG             0x037FCB7BDF
41.           KEY_BACK                 0x037FCB7B7C
42.           KEY_WIN                  0x037FCB7BA2
43.           KEY_INFO                 0x037FCB7B34
44.           KEY_UP                   0x037FCB7BA7
45.           KEY_LEFT                 0x037FCB7BA5
46.           KEY_OK                   0x037FCB7BA3
47.           KEY_RIGHT                0x037FCB7BA4
48.           KEY_DOWN                 0x037FCB7BA6
49.           KEY_VOLUMEUP             0x037FCB7BEF
50.           KEY_VOLUMEDOWN           0x037FCB7BEE
51.           KEY_MUTE                 0x037FCB7BF2
52.           KEY_CHANNELUP            0x037FCB7BE1
53.           KEY_CHANNELDOWN          0x037FCB7BE0
54.           KEY_NUMERIC_1            0x037FCB7BFE
55.           KEY_NUMERIC_2            0x037FCB7BFD
56.           KEY_NUMERIC_3            0x037FCB7BFC
57.           KEY_NUMERIC_4            0x037FCB7BFB
58.           KEY_NUMERIC_5            0x037FCB7BFA
59.           KEY_NUMERIC_6            0x037FCB7BF9
60.           KEY_NUMERIC_7            0x037FCB7BF8
61.           KEY_NUMERIC_8            0x037FCB7BF7
62.           KEY_NUMERIC_9            0x037FCB7BF6
63.           KEY_NUMERIC_STAR         0x037FCB7BCC
64.           KEY_NUMERIC_0            0x037FCB7BFF
65.           KEY_NUMERIC_POUND        0x037FCB7BCD
66.           KEY_CLEAR                0x037FCB7BC5
67.           KEY_X                    0x037FCB7BD0
68.           KEY_Y                    0x037FCB7BC1
69.           KEY_ENTER                0x037FCB7BCB
70.           KEY_RED                  0x037FCB7B92
71.           KEY_GREEN                0x037FCB7B91
72.           KEY_YELLOW               0x037FCB7B90
73.           KEY_BLUE                 0x037FCB7B8F
74.       end codes
76. end remote

4.- Configurar Lircmap.xml

1. sudo vi /usr/share/xbmc/system/Lircmap.xml

Pegar el siguiente texto:

1. <!-- This file contains the mapping of LIRC keys to XBMC keys used in Keymap.xml  -->
2. <!--                                                                              -->
3. <!-- How to add remotes                                                           -->
4. <!-- <remote device="name_Lirc_calls_the_remote">                                 -->
5. <!--                                                                              -->
6. <!-- For the commands the layout following layout is used                         -->
7. <!-- <XBMC_COMMAND>LircButtonName</XBMC_COMMAND>                                  -->
8. <!--                                                                              -->
9. <!-- For a list of XBMC_COMMAND's check out the <remote> sections of keymap.xml   -->
10. <lircmap>
11.     <remote device="MyRemote">
12.         <play>KEY_PLAY</play>
13.         <pause>KEY_PAUSE</pause>
14.         <stop>KEY_STOP</stop>
15.         <forward>KEY_FASTFORWARD</forward>
16.         <reverse>KEY_REWIND</reverse>
17.         <left>KEY_LEFT</left>
18.         <right>KEY_RIGHT</right>
19.         <up>KEY_UP</up>
20.         <down>KEY_DOWN</down>
21.         <select>KEY_OK</select>
22.         <pageplus>KEY_CHANNELUP</pageplus>
23.         <pageminus>KEY_CHANNELDOWN</pageminus>
24.         <back>KEY_BACK</back>
25.         <menu>KEY_Y</menu>
26.         <title>KEY_X</title>
27.         <info>KEY_INFO</info>
28.         <skipplus>KEY_NEXTSONG</skipplus>
29.         <skipminus>KEY_PREVIOUSSONG</skipminus>
30.         <display>Display</display>
31.         <start>KEY_ENTER</start>
32.         <record>KEY_RECORD</record>
33.         <volumeplus>KEY_VOLUMEUP</volumeplus>
34.         <volumeminus>KEY_VOLUMEDOWN</volumeminus>
35.         <mute>KEY_MUTE</mute>
36.         <power>KEY_POWER2</power>
37.         <myvideo>Videos</myvideo>
38.         <mymusic>Music</mymusic>
39.         <mypictures>Pictures</mypictures>
40.         <mytv>TV</mytv>
41.         <one>KEY_NUMERIC_1</one>
42.         <two>KEY_NUMERIC_2</two>
43.         <three>KEY_NUMERIC_3</three>
44.         <four>KEY_NUMERIC_4</four>
45.         <five>KEY_NUMERIC_5</five>
46.         <six>KEY_NUMERIC_6</six>
47.         <seven>KEY_NUMERIC_7</seven>
48.         <eight>KEY_NUMERIC_8</eight>
49.         <nine>KEY_NUMERIC_9</nine>
50.         <zero>KEY_NUMERIC_0</zero>
51.         <star>KEY_NUMERIC_STAR</star>
52.         <hash>KEY_NUMERIC_POUND</hash>
53.         <clear>KEY_CLEAR</clear>
54.         <enter>KEY_WIN</enter>
55.         <red>KEY_RED</red>
56.         <green>KEY_GREEN</green>
57.         <yellow>KEY_YELLOW</yellow>
58.         <blue>KEY_BLUE</blue>
59.         <teletext>Teletext</teletext>
60.     </remote>
61. </lircmap>

El XBMC se debe ejecutar con la opción "-l" por lo que será necesario tener que cambiarlo en el LightDM (o GDM, según versión de Ubuntu)

...enjoy!!

YouTube Searcher: Busca Videoclips de Música

Descripción:

Este script lista los videos de artistas (música) que están alojados en YouTube.

El listado de videos contempla el ID, nombre y duración de dichos videos.

Este script se puede complementar con otro script llamado "YouTube Downloader", el cual requiere del ID del video para descargarlo.

Enjoy!

#!/usr/bin/perl
use strict;
use HTTP::Lite;
use HTML::Entities;

#####################################################
#
# Desarrollado por: Zort
# Fecha: 16 de Septiembre de 2011
#
# Descripcion:
#   Este script lista los videos de artistas (musica) que
# estan alojados en YouTube.
#   El listado de videos contempla el ID, nombre y duracion
# de dichos videos.
#   Este script se puede complementar con otro script llamado
# "YouTube Downloader", el cual requiere del ID del video
# para descargarlo.
#
# Anexo:
#   Se omitieron todos los acentos en el codigo, para que no se
# vean caracteres erroneos en el caso de que el equipo donde
# se corra este codigo permita ver solo caracteres gringos.
#
#####################################################

my $artist = $ARGV[0];
$artist =~ s/^ +//;
$artist =~ s/ +$//;
$artist =~ s/ /_/g;

die "Usage: $0 artist\n\n" if ($artist eq '');

my $http = HTTP::Lite->new;
$http->http11_mode(1);

my $req = $http->request('http://www.youtube.com/artist/' . $artist);

if ($http->status() != 200) {
    print "No se pudo traer la pagina\n";
    exit;
}

# Getting the body page
my @body = split(/\n/, $http->body());

my $videos        = '';
my $artist_name   = '';
my $searching     = 0;
my $song_id       = 0;
my $song_duration = 0;
my $song_name     = 0;
foreach my $line (@body) {

    if ($line =~ /<h1>YouTube Mix for ([^<]*)</) {
        $artist_name = $1;
    }
    elsif ($line =~ /<h1>(Released in [0-9]+)/) {
        $videos .= "$1\n";
    }
    elsif ($line =~ / id="artist-videos" /) {
        $searching = 1;
    }
    elsif ($searching) {
        if ($line =~ /<li id="album-track-([^"]*)"/) {
            $song_id = $1;
        }
        elsif ($line =~ /<span class="album-track-duration">([^<]*)</) {
            $song_duration = $1;
        }
        elsif ($line =~ /<span class="description album-track-name">([^<]*)</) {
            $song_name = $1;
            $videos .= "  $song_id - " . decode_entities($song_name) . " ($song_duration)\n";
        }
    }
}

print "\n";
print 'Videos de "' . decode_entities($artist_name) . '":';
print "\n\n";
print $videos;

exit;

YouTube Downloader: Descarga Videos de YouTube

Yap, por fin salió!

Este script sirve para descargar videos de YouTube por CLI ;)

Lo único que tienen que hacer es ejecutar el script y pasarle como argumento el ID del video, luego el script preguntará el formato y resolución y... listo!

Enjoy!

#!/usr/bin/perl
use strict;
use HTTP::Lite;
use Data::Dumper;

#####################################################
#
# Desarrollado por: Zort
# Fecha: 16 de Septiembre de 2011
#
# Descripcion:
#   Este script descarga un video de YouTube especificado por
# el ID, el cual es entregado como parametro en la ejecucion.
#   A su vez, es posible elegir el formato y la resolucion
# del video segun la disponibilidad de YouTube de entregar el
# video con dichas caracteristicas.
#
# Anexo:
#   Se omitieron todos los acentos en el codigo, para que no se
# vean caracteres erroneos en el caso de que el equipo donde
# se corra este codigo permita ver solo caracteres gringos.
#   Se ha detectado que en ciertas ocasiones no se descarga
# el video. En estos casos se debe intentar nuevamente.
#
#####################################################

my $debug = 0;
my $video_id = $ARGV[0];

die "Usage: $0 video_id\n\n" if ($video_id eq '');

my $http = HTTP::Lite->new;
$http->http11_mode(1);

my $req = $http->request("http://www.youtube.com/get_video_info?video_id=$video_id&eurl=http%3A%2F%2Flocalhost%2F&hl=en_US")
    or die "Unable to get document: $!";

&showResponse($http) if ($debug);

if ($http->status() != 200) {
    print "The return code is not valid!\n";
    exit;
}

my $seconds        = 0;
my $fmt_stream_map = '';
my $fmt_list       = '';
my $title          = '';
my $token          = '';
my $formats        = ();

my @infos = split(/&/, $http->body());
foreach my $info (@infos) {

    my ($name, $value) = split(/=/, $info);

    $seconds        = $value            if ($name eq 'length_seconds');
    $fmt_stream_map = urlDecode($value) if ($name eq 'url_encoded_fmt_stream_map');
    $fmt_list       = urlDecode($value) if ($name eq 'fmt_list');
    $title          = urlDecode($value) if ($name eq 'title');
    $token          = $value            if ($name eq 'token');
}

my @formats_list = split(/,/, $fmt_list);
foreach my $format_list (@formats_list) {

    $format_list =~ /^([^\/]+)\/([^\/]+)\//;
    $formats->{$1}->{'resolution'} = $2;
}

my @formats_map = split(/,/, $fmt_stream_map);
foreach my $format_map (@formats_map) {

    my $url           = '';
    my $quality       = '';
    my $fallback_host = '';
    my $type          = '';
    my $itag          = '';

    my @variables = split(/&/, $format_map);
    foreach my $variable (@variables) {

        my ($name, $value) = split(/=/, $variable);

        $url           = urlDecode($value) if ($name eq 'url');
        $quality       = urlDecode($value) if ($name eq 'quality');
        $fallback_host = urlDecode($value) if ($name eq 'fallback_host');
        $type          = urlDecode($value) if ($name eq 'type');
        $itag          = $value            if ($name eq 'itag');
    }

    $formats->{$itag}->{'url'}           = $url;
    $formats->{$itag}->{'quality'}       = $quality;
    $formats->{$itag}->{'fallback_host'} = $fallback_host;
    $formats->{$itag}->{'type'}          = $type;
}

print "Titulo: $title\n";
print "Formatos:\n";
foreach my $format (sort { $formats->{$a}->{'type'} cmp $formats->{$b}->{'type'} } keys %{$formats}) {
    print " - (" . sprintf("%2d", $format) . ") " . $formats->{$format}->{'type'} . " (" . $formats->{$format}->{'quality'} . ") [" . $formats->{$format}->{'resolution'} . "]\n";
}
print "Opcion: ";
my $option = <STDIN>;
chomp($option);
print "Descargando numero $option...\n";
$http->reset();
$req = $http->request($formats->{$option}->{'url'});

my $output = $title;
$output .= '.mp4' if ($formats->{$option}->{'type'} =~ /video\/mp4/);
$output .= '.flv' if ($formats->{$option}->{'type'} =~ /video\/x-flv/);
$output .= '.webm' if ($formats->{$option}->{'type'} =~ /video\/webm/);

open(FH, '>', $output);
binmode(FH);
print FH $http->body();
close(FH);
print "Done!\n";
print "Archivo: '$output'\n";

   


#################
##  FUNCTIONS  ##
#################

sub showResponse() {

    my $http = shift;

    my $status     = $http->status();
    my $status_msg = $http->status_message();
    my @headers    = $http->headers_array();

    $status_msg =~ s/[\n\r]//g;

    print "Return Code:\n";
    print "    $status ($status_msg)\n";
    print "Headers:\n";
    foreach my $header (@headers) {
        print "    $header\n";
    }
    print "---------------------------\n";

    return 0;
}

sub urlDecode() {

    $_ = shift;

    s/\+/ /g;
    s/\%([0-9A-F]{2})/@{[chr hex $1]}/g;

    return $_;
}

[iPhone] Más espacio para la partición del sistema

Precaución: Solo para usuarios experimentados!

Esto fue probado en un iPhone 3G[s] con iOS4.3.2 y obviamente funcionó (o sino no lo hubiese escrito aquí)

Entren a una terminal/consola bajo usuario root y escriban lo siguiente:
(Recuerden que existe iproxy para traer el puerto 22 del iPhone a linux usando el USB)

cd /System/Library
mv Audio /private/var/stash/
ln -s /private/var/stash/Audio
mv Fonts /private/var/stash/
ln -s /private/var/stash/Fonts
cp -R TextInput /private/var/stash/
cd TextInput
rm -r *
cp -R /private/var/stash/TextInput/TextInput_en.bundle .
cp -R /private/var/stash/TextInput/TextInput_emoji.bundle .

Liberó cerca de 154MB ;)

[iPhone] Acceso directo a canales on-line de TVN, Canal13 y MEGA desde Springboard

Les voy a enseñar un truquillo para agregar accesos directos en el Springboard del iPhone para reproducir los canales de televisión on-line de TVN, Canal13 o MEGA y así no tener que darse la vuelta entrando al sitio y dándole clic al botoncillo de transmición on-line. Aquí va:

A través de Safari, entren a un sitio cualquiera para crear un acceso directo en el Springboard (ojala que sea de TVN, Canal13 o MEGA, así les va a quedar de inmediato con el ícono del canal de televisión, sino ya les diré bien abajo como cambiarle el ícono)


Luego, mediante SSH o MobileTerminal entren al iPhone y situence dentro del directorio:

/var/mobile/Library/WebClips/

En este directorio se almacenan los accesos directos que se crean en el Springboard mediante Safari.

Cada directorio que se encuentre aquí corresponde a un acceso directo, por lo que debe existir por lo menos uno (el que acabamos de crear). El tema complicado es dar con el que queremos, ya que los nombres no son muy descriptivos.

Para ello debemos entrar a cada uno de estos directorios (lo sé... no es la manera más bonita :P ), abrir el archivo Info.plist y leer el valor que tiene la llave "Title" para saber si es nuestro acceso directo recién creado.

Cuando lo encuentren, modifíquenle el valor del campo "URL" por los siguientes:

Para TVN:

http://190.196.11.204:1935/envivo/envivo.stream/playlist.m3u8

Para Canal13:

http://movil.ztreaming.com/13m/grpz13m.sdp/playlist.m3u8

Para MEGA:

http://edge1.ztreaming.com/mega/megaJaeRa1xing.sdp/playlist.m3u8

Guarden el archivo y listo!!

* Ojo: Los link deben escribirse en una sola línea, no en dos como se ven acá.

---

Anexo: Cambio de Icono

Para cambiarle el ícono solo basta con entrar el archivo Info.plist, cambiar los valores de "IconIsScreenShotBased" y "IconIsPrecomposed" a "false" y guardar el archivo. Luego, cambiar el ícono que está en el mismo directorio por el que queramos que se muestre. Fácil no?

Saludos!!

Programillas para el iPhone

tsocks
Cydia Source: http://sid77.slackware.it/iPhone/
(Si está caido... instalar a mano -> Acá)

---

Perl 5
Cydia Source: http://coredev.nl/cydia

---

bigbosshackertools
Cydia Source: BigBoss
Excelente recopilaci&oacuten de las mejores aplicaciones para la CLI.

Ej: adv-cmds, apt, basic-cmds, bootstrap-cmds, bzip2, class-dump, coreutils, developer-cmds, diskdev-cmds, file-cmds, gawk, gdb, git, gzip, iokittools, less, make, nano, network-cmds, ldid, openssh, rsync, shell-cmds, system-cmds, com.ericasadun.utilities, top, uikittools, findutils, inetutils, diffutils, lsof, subversion, vim, xar, tar, patch, unrar, unzip, wget, whois, xml2, zip, p7zip

adv-cmds: finger, fingerd, last, lsvfs, md, ps
basic-cmds: msg, uudecode, uuencode, write
bootstrap-cmds: Bootstrap Commands
coreutils: core set of Unix shell utilities from GNU
developer-cmds: ctags, error, hexdump, rpcgen, unifdef
diskdev-cmds: mount, quota, fsck, fstyp, fdisk, tunefs
file-cmds: chflags, compress, ipcrm, ipcs, pax
iokittools: ioalloccount, ioclasscount, ioreg
network-cmds: arp, ifconfig, netstat, route, traceroute
shell-cmds: killall, mktemp, renice, time, which
system-cmds: iostat, login, passwd, sync, sysctl
com.ericasadun.utilities: Info.
uikittools: UIKit Tools
findutils: indexes and searches filesystems
inetutils: ftp, inetd, ping, rlogin, telnet, tftp
diffutils: compare two files for differences

Datos para escribir y hablar mejor ;)

Dado que siempre el chilenito tiene problemas con ciertas palabras y sintaxis a la hora de hablar o escribir, aquí les paso dos definiciones de nuestros mayores errores:

Solecismo.- Es de varias naturalezas:
a) Cuando en una frase "sobran" (decir, por ejemplo Debes de obedecer a tu papá, en vez de Debes obedecer a tu papá, recordando que ambas formas existen, pero con significados distintos) o "faltan" palabras (Voy ir, en vez de Voy a ir).
b) Cuando en una palabra “sobran" (trajistes, hicistes, pudistes, comprastes, etc., en vez de trajiste,hiciste, pudiste, compraste) o "faltan" letras (gasolinera en vez de gasolinería).
c) Cuando se emplea un dativo como acusativo (le vi en vez de lo vi o de la vi).
d) Cuando, sin justificación, se comprime el lenguaje (deja veo), o cuando se usan unos verbos por otros (no te hagas el occiso).

Pleonasmo.- Es la repetición, sin sentido, de un mismo concepto con palabras sinónimas o con frases análogas. Ejemplos: "Subir para arriba, bajar para abajo, salir para afuera, lapsos de tiempo, los problemas difíciles de una ciudad no tienen soluciones fáciles.


...con esto ya saben como llamarlas por lo menos ;)