pmicrotar – biblioteca para arquivos *.tar

21 de agosto de 201921 de agosto de 2019 admin

BAIXAR pmicrotar-0.4 Quem é do mundo *nix já deve conhecer o formato *.tar, muitas vezes confundido com um tipo de compressão de arquivo. Na verdade, trata-se de um formato de empacotamento, apenas une vários arquivos ou, até mesmo, diretórios. O formato TAR pode ser usado em conjunto com bibliotecas de compressão de dados dando assim…

Continue reading →

Biblioteca jpginfo.pris

28 de dezembro de 2017 admin

Essa biblioteca é feita puramente em Prisma, não há outras dependências nem código em C. Com ela é possível extrair informações de imagens jpg, como a altura, largura, tipo de canal de cor etc. Há apenas duas funções, segue um exemplo de uso:

local jpg = inclua'jpginfo'
local info = jpg.info('p4.jpg');
se nao info entao imprima(jpg.erro()); sis.saia(1); fim
imprima('Dimensão[larg x alt]:',info.larg .. ' x '.. info.alt);
imprima('Canal:', info.cs);
imprima('bits por componentes:', info.bpc);
imprima('Decoder:', info.f);
imprima('Id:', info.id);
imprima("Tam:", info.tam);
imprima('versao', info.versao); //versão do jpeg;
imprima('versão maior:', info.versao_maior);
imprima('versão menor:', info.versao_menor);

local jpg = inclua'jpginfo'

local info = jpg.info('p4.jpg');

se nao info entao imprima(jpg.erro()); sis.saia(1); fim

imprima('Dimensão[larg x alt]:',info.larg .. ' x '.. info.alt);

imprima('Canal:', info.cs);

imprima('bits por componentes:', info.bpc);

imprima('Decoder:', info.f);

imprima('Id:', info.id);

imprima("Tam:", info.tam);

imprima('versao', info.versao); //versão do jpeg;

imprima('versão maior:', info.versao_maior);

imprima('versão menor:', info.versao_menor);

clique aqui para Baixar;

Continue reading →

Biblioteca sha1, sha256 e md5

30 de junho de 201730 de junho de 2017 admin

São bibliotecas de encriptação de dados, para ofuscar dados. Não há como reverter o processo, sendo apenas usadas para arquivar senhas e compará-las em um processo de login, também servem para verificar a integridade de um arquivo. Veja os exemplos: (link alternativo: baixar todos); SHA1: (BAIXAR)

local sha1 = inclua'sha1'  //incluindo a lib

local msg = 'Olá mundo em Prisma'

s = sha1(msg); //codifica em Hex
imprima('Hex:', s);

local bin_s  = sha1.binario(msg)     // codifica em formato byte bin
imprima( bin_s);

//outras funções que combinam o sha1 com hmac usando uma chave dando mais proteção:

local hmac_hex   = sha1.hmac('chave1', msg)        // retorna em hexadecimal
imprima(hmac_hex);
local hmac_bin  = sha1.hmac_binario('chave1', msg) // retorna em byte 
imprima(hmac_bin);

local sha1 = inclua'sha1' //incluindo a lib

local msg = 'Olá mundo em Prisma'

s = sha1(msg); //codifica em Hex

imprima('Hex:', s);

local bin_s = sha1.binario(msg) // codifica em formato byte bin

imprima( bin_s);

//outras funções que combinam o sha1 com hmac usando uma chave dando mais proteção:

local hmac_hex = sha1.hmac('chave1', msg) // retorna em hexadecimal

imprima(hmac_hex);

local hmac_bin = sha1.hmac_binario('chave1', msg) // retorna em byte

imprima(hmac_bin);

SHA256: (BAIXAR)

local sha256 = inclua'sha256'

src = 'uma string para ser codificada';

local sha256_hash = sha256(src);
imprima('Hash gerada:\n', sha256_hash);


local sha256_bin = sha256.binario(src);
imprima('Hash gerada bin:\n', sha256_bin);


poe'\n\nEnter para continuar...'
leia();

local sha256 = inclua'sha256'

src = 'uma string para ser codificada';

local sha256_hash = sha256(src);

imprima('Hash gerada:\n', sha256_hash);

local sha256_bin = sha256.binario(src);

imprima('Hash gerada bin:\n', sha256_bin);

poe'\n\nEnter para continuar...'

leia();

MD5: (BAIXAR)

local md5 = inclua'md5';
str = 'ola mundo em Prisma';
bin = md5.soma(str);
imprima(bin);
leia();

local md5 = inclua'md5';

str = 'ola mundo em Prisma';

bin = md5.soma(str);

imprima(bin);

leia();

Bom,…

Continue reading →

Conjunto de ferramentas arq (arquivamento)

30 de junho de 201730 de junho de 2017 admin

Estou criando um conjunto de bibliotecas referentes a compressão, empacotamento, descompressão e extração de arquivos. Já tenho três boas libs, todas vão ficar em uma pasta chamada ‘arq’. Baixe <arqui>. As bibliotecas que já tenho desenvolvidas são: 1 – Compressão e extração lzw.pris: lzw = inclua’arq.lzw’; Apenas para texto, não é eficiente para mídias como fotos…

Continue reading →

Verificando se um arquivo ou pasta existe e o tamanho

6 de junho de 201710 de junho de 2017 admin

Usando apenas a biblioteca padrão Prisma, vamos criar uma função para verificar se um arquivo ou pasta existe, e outra para calcular o tamanho de um arquivo. Vamos aos códigos. Para verificar a existência de um arquivo, basta tentar abri-lo:

funcao Arquivo_existe(a)
  local b,err=es.abra(a,'leiturabin');
  se nao b entao retorne falso, err
  senao 
     b:feche();
     retorne verdadeiro
  fim
fim

imprima(Arquivo_existe("teste.txt"));
//--> falso arquivo ou diretorio nao encontrado
imprima(Arquivo_existe(args[0]));
//--> verdadeiro  //args[0] é o próprio programa Prisma atual

funcao Arquivo_existe(a)

local b,err=es.abra(a,'leiturabin');

se nao b entao retorne falso, err

senao

b:feche();

retorne verdadeiro

fim

imprima(Arquivo_existe("teste.txt"));

//--> falso arquivo ou diretorio nao encontrado

imprima(Arquivo_existe(args[0]));

//--> verdadeiro //args[0] é o próprio programa Prisma atual

A mesma função também verifica se uma pasta existe:

imprima(Arquivo_existe("Documentos"));
//-->verdadeiro

1 2	imprima(Arquivo_existe("Documentos")); //-->verdadeiro

Para obter o…

Continue reading →