Novo site para o portfolio: BIOINFO, v2

2009-02-12T18:24:00.004-02:00

Acabei de botar no ar a nova vers�o do site do Grupo de Bioinform�tica Estrutural, Centro de Biotecnologia/UFRGS.

Dessa vez o desafio foi maior: usar c�digo v�lido em PHP 4.3 e incluir uma modalidade bil�ngue autom�tica, al�m de acomodar v�rios elementos da vers�o anterior do site. Como dizem por a�: do not redesign, realign!

Vejam por voc�s mesmos: http://www.cbiot.ufrgs.br/bioinfo/

C#: validando CPF

2009-02-05T22:13:00.003-02:00

Posto abaixo um c�digo que eu adaptei de algum lugar da web. S� me lembro que estava em javascript. Acho que o original � do Thiago Prado. Eu portei e dei uma melhorada mais est�tica no c�digo. E espero que ele se auto-explique, como sempre.

Eu gostei do c�digo do Thiago porque ele usa Arrays em vez de milhares de substrings.

public static Boolean CPF(String cpfvalue) { // some variables Int32 dv, calcdv, sum, position; // declares the cpf array int[] cpfarray = new int[11]; // conversion to int and retrieves the dv dv = Int32.Parse(cpfvalue.Substring(9, 2)); // populates the array with the first 8 CPF values for (int i = 0; i <= 8; i++) { cpfarray[i] = Int32.Parse(cpfvalue.Substring(i, 1)); } // calculates the 1st digit position = 10; sum = 0; for (int i = 0; i <= 8; i++) { sum += cpfarray[i] * position; Console.WriteLine(sum.ToString()); --position; } cpfarray[9] = sum % 11; if(cpfarray[9] < 2) { cpfarray[9] = 0; } else { cpfarray[9] = 11 - cpfarray[9]; } // now calculates the 2nd digit position = 11; sum = 0; for (int i = 0; i <= 9; i++) { sum += cpfarray[i] * position; --position; } cpfarray[10] = sum % 11; if(cpfarray[10] < 2) { cpfarray[10] = 0; } else { cpfarray[10] = 11 - cpfarray[10]; } calcdv = cpfarray[9] * 10 + cpfarray[10]; if(calcdv == dv) { return true; } else { return false; } } // end CPF

Criando GUIDs com PHP?

2009-01-29T10:19:00.004-02:00

Essa � uma pergunta meio velha j�. Mas n�o h� uma resposta satisat�ria para ela, pelo menos no meu ponto de vista. Uma solu��o que resolva todos os problemas em todas as plataformas. Aponto as solu��es que pesquisei e achei abaixo:

1. Para quem roda PHP no Windows
Essa � f�cil. Desfa�a-se do trabalho duro e deixe o Component Object Model fazer o servi�o pra voc�, em estrondosa (1) linha de c�digo.

$guid = com_create_guid();

A vantagem desse m�todo, para quem tem Windows como servidor, � que o GUID gerado � pseudo-sequencial (o que ajuda muito quando usa-se um GUID como chave prim�ria de um banco de dados).

2. PHP em qualquer plataforma com MySQL
MySQL � uma coisa linda de Deus, assim como a Avaiana de Pau. E tem uma s�rie de fun��es internas que podem facilitar o trabalho do programador pregui�oso (ou esperto, como diria Larry Wall). Por exemplo, o MySQL tamb�m tem uma fun��o chamada GUID() que gera um identificador pseudo-sequencial, usando o endere�o MAC da placa de rede em Linux e FreeBSD e a data/hora do computador em Windows, Mac e Solaris.

Basta fazer todo o c�digo de uma consulta SQL normal, mas usando a seguinte sintaxe:

SELECT GUID();

Ou ent�o ainda mais pregui�osamente, na hora e inserir o n�mero no banco de dados, porque n�o cri�-lo s� quando for necess�rio?

INSERT INTO customers(guid, nome, endereco) VALUES (GUID(), 'nome', 'endereco');

Muita gente n�o gosta de usar o MySQL para nada que n�o seja inserir, procurar, retirar e mexer nos dados. � uma boa pr�tica, sempre, separar banco de dados da programa��o normal (ou seja, n�o parece ser uma boa id�ia pela maioria usar o MySQL para guardar valores LONGTEXT compactados - sim, o MySQL tem fun��es para ZIP e BZIP), deixando programa��o com a p�gina ou script, e o banco apenas armazenando e manipulando informa��o.

3. Hardcore-PHP, para quem n�o tem pregui�a
� poss�vel tamb�m criar um script em PHP que fa�a todo o trabalho duro. Mas aten��o: esse n�mero deixa de ser pseudo-sequencial, como veremos logo adiante. Eu comentei o c�digo direto abaixo, e espero que ele seja auto-explicativo.

A fun��o tem apenas um par�metro, $WinStyle (true/false), para saber se o GUID gerado vir� com os {} ou n�o.

A m�gica dela resume-se em usar a fun��o uniqid() e fazer um hash MD5, de modo a obter uma sequ�ncia de 32 caracteres.

function createGUID($WinStyle) { /* description: creates a GUID-like value, using md5 hash, the uniqid() function and the Mersenne Twister Random number generator, in order to make it harder to predict the value (the uniqid() function is time-based). returns the GUID as a string 36-character lengthy (32 numbers plus four em-dashes like '-'); the $WinStyle parameter is for Windows-style GUIDs, with {} after and before the GUID value and all the characters to uppercase. In order to avoid multiple substrings, I tried to use regular expressions, reducing the number of code lines from 8 to 3 ONLY for partioning the $number. Adieu, substrings! */ //creates the random number with a 32-hex-character pattern $number = md5(uniqid(mt_rand(), true)); /* defines the pattern of the Perl-compatible reg. expression for a GUID this patter means: any character from a to f or 0 to 9 in a group of 8, then 4, 4, 4 and 12. So, ([a-fA-F0-9]{8}) neans 8 characters without spaces, being from a-f (or A-F) and/or 0-9 any of the between-parenthesis pattern is stored in a temporary variable $n, so, $1 would be the first-matched pattern (8-char long), and so on. the replacement is only the 5 patterns with dashes between them. */ $preg_pattern = '/([a-fA-F0-9]{8})([a-fA-F0-9]{4})([a-fA-F0-9]{4})([a-fA-F0-9]{4})([a-fA-F0-9]{12})/'; $preg_replacement = '$1-$2-$3-$4-$5'; $guid = preg_replace($preg_pattern, $preg_replacement, $number); if($WinStyle === true) { //exclusive format for windows-style GUID, otherwise it leaves the way it is. $guid = '{' . strtoupper($guid) . '}'; } return $guid; } //end createGUID

Claro que esse c�digo pode ser melhorado. Mas a� est�o algumas alternativas.

Sopa de Blogs!, o blog da sopa de !

2009-01-29T09:57:00.001-02:00

Saiu o blog da Sopa de <tags!>. Resolvi cham�-lo de Sopa de Blogs! Nada mais pseudo-criativo.

Esperem desse blog muitas e poucas coisas.

At� o pr�ximo post,