Re: [OFF] subversion: bloquear commit de arquivos com nome acentuado
Olá lista, Só pra ficar registrado, para criar o script hook para filtrar nomes de arquivos a serem comitados, impedindo caracteres acentuados e outros, eu utilizei em no script hoot "pre-commit" o comando svnlook, com o parâmetro -r assim: LISTA = `svnlook -r $TXN $REPOS` Esse comando irá pegar a lista de arquivos a serem commitados no servidor, com ele poderemos aplicar o filtro, por exemplo: if [ `echo $LISTA | grep -o "[a-zA-Z0-9\.\-\+\_]" | wc -l` == $((`echo $LISTA | wc -m`-1)) ]; then echo 0 else echo 1 fi Em 22/02/07, RicardoFunke<[EMAIL PROTECTED]> escreveu: também fiz em bash: # inicio # #!/bin/bash if [ `echo $1 | grep -o "[a-zA-Z0-9\.\-\+\_]" | wc -l` == $((`echo $1 | wc -m`-1)) ]; then echo 0 else echo 1 fi # fim # só falta saber como colocar isso no hook-script do subversion Em 22/02/07, RicardoFunke<[EMAIL PROTECTED]> escreveu: > Olá, andei fazendo algo em python, gostaria que conferissem e me > dissessem como faço agora para usar isso com os hook-scripts do > subversion: > > # inicio # > > #!/usr/bin/python > > def semacento(nomearquivo): > n = nomearquivo > a = 'abcdefghijklmnopqrstuvwxyz 0123456789.' > c = [] > > for i in range(len(n)): > for j in range(len(a)): > if n[i] == a[j] or n[i] == a[j].upper(): > break > if j == (len(a) - 1): > c.append(n[i]) > if len(c) == 0: > return 0 > else: > return 1 > > > # fim # > > 2007/2/22, Fabricio aybabtu Cannini <[EMAIL PROTECTED]>: > > Em Thursday 22 February 2007 14:26, RicardoFunke escreveu: > > > massa, que pena que eu não saiba nada sobre perl > > > > http://learn.perl.org ;) > > > > -- > > Remember, remember the 8th of November... > > The OS upgrade season and plot > > I know of no reason > > Why this Windows version should ever be bought > > > > >
Re: [OFF] subversion: bloquear commit de arquivos com nome acentuado
também fiz em bash: # inicio # #!/bin/bash if [ `echo $1 | grep -o "[a-zA-Z0-9\.\-\+\_]" | wc -l` == $((`echo $1 | wc -m`-1)) ]; then echo 0 else echo 1 fi # fim # só falta saber como colocar isso no hook-script do subversion Em 22/02/07, RicardoFunke<[EMAIL PROTECTED]> escreveu: Olá, andei fazendo algo em python, gostaria que conferissem e me dissessem como faço agora para usar isso com os hook-scripts do subversion: # inicio # #!/usr/bin/python def semacento(nomearquivo): n = nomearquivo a = 'abcdefghijklmnopqrstuvwxyz 0123456789.' c = [] for i in range(len(n)): for j in range(len(a)): if n[i] == a[j] or n[i] == a[j].upper(): break if j == (len(a) - 1): c.append(n[i]) if len(c) == 0: return 0 else: return 1 # fim # 2007/2/22, Fabricio aybabtu Cannini <[EMAIL PROTECTED]>: > Em Thursday 22 February 2007 14:26, RicardoFunke escreveu: > > massa, que pena que eu não saiba nada sobre perl > > http://learn.perl.org ;) > > -- > Remember, remember the 8th of November... > The OS upgrade season and plot > I know of no reason > Why this Windows version should ever be bought > >
Re: [OFF] subversion: bloquear commit de arquivos com nome acentuado
Olá, andei fazendo algo em python, gostaria que conferissem e me dissessem como faço agora para usar isso com os hook-scripts do subversion: # inicio # #!/usr/bin/python def semacento(nomearquivo): n = nomearquivo a = 'abcdefghijklmnopqrstuvwxyz 0123456789.' c = [] for i in range(len(n)): for j in range(len(a)): if n[i] == a[j] or n[i] == a[j].upper(): break if j == (len(a) - 1): c.append(n[i]) if len(c) == 0: return 0 else: return 1 # fim # 2007/2/22, Fabricio aybabtu Cannini <[EMAIL PROTECTED]>: Em Thursday 22 February 2007 14:26, RicardoFunke escreveu: > massa, que pena que eu não saiba nada sobre perl http://learn.perl.org ;) -- Remember, remember the 8th of November... The OS upgrade season and plot I know of no reason Why this Windows version should ever be bought
Re: [OFF] subversion: bloquear commit de arquivos com nome acentuado
Em Thursday 22 February 2007 14:26, RicardoFunke escreveu: > massa, que pena que eu não saiba nada sobre perl http://learn.perl.org ;) -- Remember, remember the 8th of November... The OS upgrade season and plot I know of no reason Why this Windows version should ever be bought
RES: [OFF] subversion: bloquear commit de arquivos com nome acentuado
É SIMPLES... Mas pode servir de ponto de partida... =] Divirta-se. []s > -Mensagem original- > De: RicardoFunke [mailto:[EMAIL PROTECTED] > Enviada em: quinta-feira, 22 de fevereiro de 2007 14:35 > Para: Davi Vidal > Assunto: Re: [OFF] subversion: bloquear commit de arquivos com nome > acentuado > > opa, manda pra mim então! valeu > > Em 22/02/07, Davi Vidal<[EMAIL PROTECTED]> escreveu: > > Hmmm... > > Quem quiser, me manda PVT que eu mando uma apostilinha de Perl que eu > tenho > > aqui... =] > > > > [EMAIL PROTECTED] > > > > []s > > > > > > > -Mensagem original- > > > De: RicardoFunke [mailto:[EMAIL PROTECTED] > > > Enviada em: quinta-feira, 22 de fevereiro de 2007 14:26 > > > Para: debian-user-portuguese@lists.debian.org > > > Assunto: Re: [OFF] subversion: bloquear commit de arquivos com nome > > > acentuado > > > > > > massa, que pena que eu não saiba nada sobre perl > > > > > > Em 22/02/07, Maxwillian Miorim<[EMAIL PROTECTED]> escreveu: > > > > On 2/21/07, RicardoFunke <[EMAIL PROTECTED]> wrote: > > > > > Dei uma olhada sobre os hook-scripts, como fazer um script para > isso > > > no svn? > > > > > > > > Eu não sei como funcionam, mas pode usar algo para comparar > expressões > > > > regulares com os caracteres especiais, por exemplo: > > > > > > > > No hook-script, antes de tudo tu chama um script em perl que tem > como > > > > parâmetro o nome do arquivo. Este script verifica se o nome tem > > > > caracteres especiais (isso é fácil com perl :). Se tiver retorna 1 > > > > senão 0. > > > > > > > > Depois o hook-script verifica o retorno do script de perl (vamos > > > > chama-lo verifica_nome.pl), se for 1 continua, senão não faz nada. > > > > > > > > Agora tá contigo, eu vou dar uma estudada nisso porque é uma coisa > > > > interessante... ;) > > > > > > > > > > > > -- > > > > Maxwillian Miorim <[EMAIL PROTECTED]> > > > > > > > > Moo... Are you happy now? > > > > > > > > > > > > Title: Perlintro < Perldoc < TWiki NOME perlintro -- uma breve introdução ao Perl DESCRIÇÃO Este documento tem por intenção dar a você uma breve introdução à linguagem de programação Perl, com referências para documentações mais aprofundadas. É um guia inicial para aqueles que são novos na linguagem, e provê apenas informações para que você esteja apto a ler códigos escritos em Perl por outras pessoas e entender o que este faz, ou ainda escrever seus próprios programas iniciais. Este documento introdutório não tem por objetivo ser completo, e também não deseja ser totalmente correto. Em alguns casos, a perfeição foi sacrificada para que o objetivo de transparecer uma idéia seja alcançado. Você está avisado a seguir esta introdução com mais informações do manual encontradas no manual completo do Perl, cujo índice pode ser encontrado em perltoc. Neste documento, você encontrará referências para outras partes da documentação de Perl. Você pode ler esta documentação utilizando o comando perldoc ou o mesmo método que você está utilizando para ler este documento. O que é o Perl? O Perl é uma linguagem de programação de uso geral, originalmente desenvolvida para manipulação de textos, que agora é utilizada para uma infinidade de tarefas incluindo administração de sistemas, desenvolvimento web, programação de redes, desenvolvimento de interfaces gráficas, e muitos outros. A linguagem foi escrita para ser prática (fácil de utilizar, eficiente, completa) ao invés de bonita (pequena, elegante, mínima). Suas maiores características são sua facilidade de uso, que inclui o suporte tanto para programação procedural quanto para programação orientada à objetos, tem um poderoso suporte incluso na linguagem para processamento de textos, e uma das maiores coleções de módulos escritos por terceiros, o CPAN. Outras definições do Perl são dadas em perl, perlfaq1 e sem dúvida em outros lugares. A partir destas informações, podemos determinar que Perl é uma coisa diferente para cada pessoa, mas muitas pessoas pensam que é, no mínimo interessante, escrever sobre ela. Executando programas Perl Para executar um programa Perl, a partir da linha de comando do Unix: perl meuprograma.pl Um método alternativo é colocar isto como a primeira linha do seu script: #!/usr/bin/env perl ... e então executar seu script como /caminho/do/script.pl. O script deverá ser marcado como executável antes, então execute chmod 755 script.pl antes (no Unix). Para mais informações, incluín
RES: [OFF] subversion: bloquear commit de arquivos com nome acentuado
Hmmm... Quem quiser, me manda PVT que eu mando uma apostilinha de Perl que eu tenho aqui... =] [EMAIL PROTECTED] []s > -Mensagem original- > De: RicardoFunke [mailto:[EMAIL PROTECTED] > Enviada em: quinta-feira, 22 de fevereiro de 2007 14:26 > Para: debian-user-portuguese@lists.debian.org > Assunto: Re: [OFF] subversion: bloquear commit de arquivos com nome > acentuado > > massa, que pena que eu não saiba nada sobre perl > > Em 22/02/07, Maxwillian Miorim<[EMAIL PROTECTED]> escreveu: > > On 2/21/07, RicardoFunke <[EMAIL PROTECTED]> wrote: > > > Dei uma olhada sobre os hook-scripts, como fazer um script para isso > no svn? > > > > Eu não sei como funcionam, mas pode usar algo para comparar expressões > > regulares com os caracteres especiais, por exemplo: > > > > No hook-script, antes de tudo tu chama um script em perl que tem como > > parâmetro o nome do arquivo. Este script verifica se o nome tem > > caracteres especiais (isso é fácil com perl :). Se tiver retorna 1 > > senão 0. > > > > Depois o hook-script verifica o retorno do script de perl (vamos > > chama-lo verifica_nome.pl), se for 1 continua, senão não faz nada. > > > > Agora tá contigo, eu vou dar uma estudada nisso porque é uma coisa > > interessante... ;) > > > > > > -- > > Maxwillian Miorim <[EMAIL PROTECTED]> > > > > Moo... Are you happy now? > > > >
Re: [OFF] subversion: bloquear commit de arquivos com nome acentuado
massa, que pena que eu não saiba nada sobre perl Em 22/02/07, Maxwillian Miorim<[EMAIL PROTECTED]> escreveu: On 2/21/07, RicardoFunke <[EMAIL PROTECTED]> wrote: > Dei uma olhada sobre os hook-scripts, como fazer um script para isso no svn? Eu não sei como funcionam, mas pode usar algo para comparar expressões regulares com os caracteres especiais, por exemplo: No hook-script, antes de tudo tu chama um script em perl que tem como parâmetro o nome do arquivo. Este script verifica se o nome tem caracteres especiais (isso é fácil com perl :). Se tiver retorna 1 senão 0. Depois o hook-script verifica o retorno do script de perl (vamos chama-lo verifica_nome.pl), se for 1 continua, senão não faz nada. Agora tá contigo, eu vou dar uma estudada nisso porque é uma coisa interessante... ;) -- Maxwillian Miorim <[EMAIL PROTECTED]> Moo... Are you happy now?
Re: [OFF] subversion: bloquear commit de arquivos com nome acentuado
On 2/21/07, RicardoFunke <[EMAIL PROTECTED]> wrote: Dei uma olhada sobre os hook-scripts, como fazer um script para isso no svn? Eu não sei como funcionam, mas pode usar algo para comparar expressões regulares com os caracteres especiais, por exemplo: No hook-script, antes de tudo tu chama um script em perl que tem como parâmetro o nome do arquivo. Este script verifica se o nome tem caracteres especiais (isso é fácil com perl :). Se tiver retorna 1 senão 0. Depois o hook-script verifica o retorno do script de perl (vamos chama-lo verifica_nome.pl), se for 1 continua, senão não faz nada. Agora tá contigo, eu vou dar uma estudada nisso porque é uma coisa interessante... ;) -- Maxwillian Miorim <[EMAIL PROTECTED]> Moo... Are you happy now?
[OFF] subversion: bloquear commit de arquivos com nome acentuado
Olá lista, Algum de vocês sabe como faço para que o SVN (subversion) não permita commit de arquivos ou diretórios como nome acentuado para evitar problema de codificação de caracteres? Dei uma olhada sobre os hook-scripts, como fazer um script para isso no svn? Valeu
