Acuatoria, La Naranja Informatica

¿ A donde nos lleva Internet ?

2010-02-28T03:27:00.000-08:00

Años en la informatica y mi sentencia a dia de hoy no podria ser peor. Quizas sea porque todo lo que toca el ser humano lo fastidia. Hemos llevado nuestras relaciones a la nube, por comodidad , pereza, timidez, conseguir un alter ego, cual sea el motivo se jodieron las relaciones personales y ahora lo mas calido es un xD.
Da igual a donde nos lleve internet no queremos ser nosotros, no nos gusta lo que vemos, queremos a matrix ya!
Quizas yo espere algo demasiado bueno por culpa de los cuentos infantiles. La solucion no esta en el mundo virtual, tampoco dire donde esta.
O somos buenos o el infierno vendra a nosotros.

Media $ / persona en el mundo

2010-01-20T08:57:00.000-08:00

Estaba pensando en la pobreza y me he puesto a hacer unas cuentas con la informacion que he sacado de internet. A grandes rasgos dire que si sumamos todo el dinero de las personas y lo dividimos entre las mismas, osea una media aritmetica, sale a 20 800 $ por persona. O lo que es lo mismo, si el 2% de la poblacion mundial repartiera su dinero no habria pobreza. Estos son datos que intuimos pero no calculamos. Este es tan buen momento como cualquier otro para idear la forma de cambiar la historia de la humanidad hacia ese modelo que parece de ciencia ficcion. Lo mejor es que tenemos al alcanze esa ciencia ficcion, si queremos.

Lo que si parece una constante es que el pobre cada vez es mas pobre y el rico mas rico.

Los datos de referencia son del año 2000. Este articulo mas que en el rigor de los datos se basa en una esperanza.

Codigo fuente para buscar lyrics automatico en php

2010-01-19T16:11:00.000-08:00

El codigo busca la letra de la cancion en un buscador, este caso google ( se puede cambiar ) , y este devuelve unos resultados que a su vez son CURL'eados, osea que se lee la web de la letra. Esta en PHP y usa la funcion LoadCURLPage para extraer el texto de una direccion.
En esta web http://yujuuu.com/ podeis ver como se busca la letra y la presenta como texto.
Si no queda claro cuelgo el codigo fuente completo. Le he agreado muchas variables para controlar errores.


// FUNCIONES
error_reporting (E_ALL ^ E_NOTICE);
function LoadCURLPage($url,

$cookie = '', $referer = '', $post_fields = '', $return_transfer = 0,
$follow_location = 0, $ssl = '', $curlopt_header = 0){
        $ch = curl_init();

        curl_setopt($ch, CURLOPT_URL, $url);

        if($ssl)
        {
        curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, 2);
        }

        curl_setopt ($ch, CURLOPT_HEADER, $curlopt_header);

        if($agent)
        {
        curl_setopt($ch, CURLOPT_USERAGENT, $agent);
        }

        if($post_fields)
        {
        curl_setopt($ch, CURLOPT_POST, 1);
        curl_setopt($ch, CURLOPT_POSTFIELDS, $post_fields);
        }

        curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);
        curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 1);

        if($referer)
        {
        curl_setopt($ch, CURLOPT_REFERER, $referer);
        }

        if($cookie)
        {
        curl_setopt($ch, CURLOPT_COOKIEFILE, $cookie);
        curl_setopt($ch, CURLOPT_COOKIEJAR, $cookie);
        }

        $result = curl_exec ($ch);

        curl_close ($ch);

        return $result;
}

function entre2cad($data,$string_one,$string_two,$inclusive,$vuelta)
{
if (strlen($data) < strlen($string_one))
{
$sub=0;
}
else
{
$pos=strpos($data, $string_one);
if ($vuelta>0)
{
while ($vuelta!=0 and $pos !== 0 )
{
$pos=strpos($data, $string_one,$pos+1);
$vuelta=$vuelta-1;
}
}

if ($inclusive==1 and $data !== NULL)
{
$data=substr($data,$pos);
$pos2 = strpos($data, $string_two,2);

$sub=substr($data,0,$pos2+strlen($string_two));
}
else
{
$data=substr($data,$pos+strlen($string_one));
$pos2 = strpos($data, $string_two);
$sub=substr($data,0,$pos2);
}
if ($pos==null or $sub==null)
{
$sub=0;
}
}
return $sub;
}

function unhtmlentities($string)
{
    // replace numeric entities
    $string = preg_replace('~&#x([0-9a-f]+);~ei', 'chr(hexdec("\\1"))', $string);
    $string = preg_replace('~&#([0-9]+);~e', 'chr("\\1")', $string);
    // replace literal entities
    $trans_tbl = get_html_translation_table(HTML_ENTITIES);
    $trans_tbl = array_flip($trans_tbl);
    return strtr($string, $trans_tbl);
}

// Conectar a GOOGLE por el lyryc
$quero="nombre de la cancion"
$lyrycs=0;
$vueltas=0;
$canciones = array();
$index=0;
$url=0;
$data=0;
while ($vueltas<4 and $index != 3)
{
$pasada=0;

if ($vueltas===1)
{
$url = 'http://www.google.com/search?hl=en&q='.$quero.'+site:lyricsfreak.com';
}
if ($vueltas===0)
{
$url = 'http://www.google.com/search?hl=en&q='.$quero.'+site:musica.com';
}
if ($vueltas===2)
{
$url = 'http://www.google.com/search?hl=en&q='.$quero.'+site:lyricsdownload.com';
}
if ($vueltas===3)
{
$url = 'http://www.google.com/search?hl=en&q='.$quero.'+site:elyrics.net';
}
$data = LoadCURLPage($url);
$data=htmlentities($data);

while ($pasada < 3 and $index != 3)
{

$enlace= entre2cad($data,'<li class=g><h3 class=r><a href="/url?q=','">',0,$pasada);
if ($enlace === 0)
{
$enlace= entre2cad($data,'<li class=g><h3 class=r><a href="','" class=l',0,$pasada);
}

//Buscar la letra en la pagina
$data = LoadCURLPage($enlace);
//echo $enlace;
$data=htmlentities($data);
if ($vueltas===1)
{

$lyrycs= entre2cad($data, 'lang="en">','</div',0,0);
}

if ($vueltas===0)
{
$lyrycs= entre2cad($data, '<pre','/pre>',1,0);
if ($lyrycs===0)
{
$lyrycs= entre2cad($data, 'verdana>','</font',0,0);
}
}

if ($vueltas===2)
{
$lyrycs= entre2cad($data, 'id="div_customCSS">','</div',0,0);
}

if ($vueltas===3)
{
$lyrycs= entre2cad($data, '</strong><br><br>','<br><br></div>',0,0);
}
   if ($lyrycs!==0)
   {

   $canciones[$index]=$lyrycs;
   $index=$index+1;
   }

$pasada=$pasada+1;
}
$vueltas= $vueltas+1;
}

for ($i = 1; $i <= 3; $i++) {
$letra = $canciones[$i-1];

$letra=nl2br(str_replace('<pre><font style=line-height:20px;font-size:14px;font-family:arial,tahoma,verdana>','',$letra));
$letra=str_replace('<pre style="line-height: 19px">','',$letra);
$letra=str_replace('</pre>','',$letra);
echo '

'.unhtmlentities($letra).'

';

}

Cambio contraseña root linux

2010-01-16T08:17:00.000-08:00

Algunas versiones de linux, guadalinex por ejemplo, no te permiten elegir la password del administrador. Para cambiarla hay que buscar la consola y escribir en ella sudo passwd al ejecutar esto ya podemos cambiar la contraseña.

Comparativa antivirus McAfee , Panda , Kaspersky ..

2010-01-16T05:06:00.000-08:00

Ante la necesidad de tener un antivirus corporativo nos vemos obligados a elegir una solucion de seguridad que sea competente. Aqui hablare sobre mi experiencia con estos antivirus, espero me deis la vuestra.
En lo que concierne a detection de virus y malware Mcafee 4, Panda 6 y Kaspersky 9. En soporte de atencion al cliente: Mcafee pasaron de mi, Panda se rieron de mi una vez y kaspersky me parecen serios y resolutivos. Para mi lo bueno de panda es rapidez al actuar y soporte 24x7. El precio: panda es mas del doble de costoso que kaspersky.
En rendimiento kaspersky ralentiza mas que ninguno aspecto que veo justificado por la buena deteccion. Tambien aunque no lo he probado he escuchado bien sobre el Ontinet Eset Nod32 el cual creo que consume menos recursos que kaspersky.
En definitiva os recomiendo Kasperseky o Nod32. Aunque el paso de los años me ha demostrado que en antivirus todo esto cambia, y quizas mañana os diga "arriba McAfee" o "bravo Panda".

Y dejando a un lado las soluciones empresariales de seguridad tenemos los antivirus gratuitos del que solo me fio de momento del Microsoft Security Essentials que lo estoy probando con buenos resultados.

Piratas del Mar de Silicio

2010-01-15T15:24:00.000-08:00

Años luchando contra la pirateria y ¿ sirve de algo ?

Ayer me vino una inquietud antes de dormir sobre la pirateria o copia de material protegido por derechos de autor, por decirlo de alguna forma. Esto es algo que lleva años ocurriendo, desde que tengo memoria por lo menos, y no se ha conseguido parar, y presumiblemente no se conseguirá, ¿ porque seguir vomitando boca arriba ? Se gastan millones en proteger y no sirve.

Y si de verdad hicieran una retrospectiva se darian cuenta de la inutilidad: corta un camino y se abrira otro.

Ponte que cierras las webs ilegales en un pais, solucion: las abren en otro pais mas permisivo.

Ponte que el gobierno frances ha sacado la HADOPI, vale estupendo, solucion: me cifro la conexion. ¿ De verdad tienen asesores los politicos? ¿ No seria mas humano , bonito y utópico emplear ese dinero del proyecto antidescargas a beneficios sociales?

Si alguien puede arrojar una respuesta o algo de luz a mis sombras, muchas gracias.