CRACK-ME (1) (23-10-08)

Implementação de melhorias e aumento no nível de segurança.

Moderador: Moderadores

Avatar do usuário
cracksther
Diamante
Diamante
Mensagens: 1063
Registrado em: Seg 13 Dez 2004 11:00:00 pm

CRACK-ME (1) (23-10-08)

Mensagem por cracksther »

Baixe o arquivo hardLock.vlx no link
http://www.autolisp.com.br/autolisp/mod ... 1224777390 e tente quebrar a proteção possibilitando executar o programa sem autorização.

Caso consiga quebrar a proteção; ao executar o programa será exibido a mensagem: Acesso liberado caso contrário será exibido a mensagem Acesso negado, insira o disco de hard lock.

O disco necessário para execução do programa é o meu pen-drive, como você não terá ele em mãos; a execução do programa não será possível, a menos que você quebre (crack) de alguma forma a proteção que coloquei.

Para facilitar sua vida nessa tarefa, irei diponibilizar o código do programa de proteção, exatamente igual eu usei para compilar o arquivo hardlock.vlx, além do mais irei informar o número de série do meu pen-drive.

[lsp]código do programa:
(defun c:teste (/ verifyHardLock)
(vl-load-com)

(defun verifyHardLock (pSerial / sysObj drives drive dSerial return)
(setq sysObj (vlax-create-object "scripting.FileSystemObject")
drives (vlax-get-property sysObj 'drives)
)

(vlax-for drive drives
(if (= (vlax-get drive "isReady") -1)
(progn
(setq dSerial (vlax-get drive "serialNumber"))
(if (= dSerial pSerial)
(setq return dSerial)
)
)
)
)
return
)

(if (= (verifyHardLock -132205097) -132205097)
(alert "Acesso liberado")
(alert "Acesso negado\nInsira o disco hard lock")
)
(princ)
)[/lsp]

Serial number: -132205097

Notem que o n° de série está em decimal e que sequer eu julguei necessário encripta-lo.

Caso consiga quebrar a proteção, favor informar o procedimento para tal, para que assim eu possa melhorar a proteção e novamente disponibilizar o código.

Boa sorte!

Até mais!
Marcelo Silva - Cascavel - PR
cracksther@gmail.com
Avatar do usuário
admin
Administrador
Administrador
Mensagens: 621
Registrado em: Sex 28 Nov 2003 11:00:00 pm
Localização: Itu / SP
Contato:

Mensagem por admin »

Estou quase lá!

cracksther me faz um favor?

qual o numero de série em Hexa do disco em questão?

tipo quando damos um dir ( no prompt do DOS):

O Número de Série do Volume é 2482-412E <- qual é este número?

at
Marcos Mendes de Almeida
mmalbr@gmail.com
Avatar do usuário
neyton
Master
Master
Mensagens: 1668
Registrado em: Qui 25 Dez 2003 11:00:00 pm
Contato:

Mensagem por neyton »

uma vez que voce forneceu o serial basta usar aquela solução do marcos, trocar o serial dum pendrive qualquer:
http://www.codeproject.com/KB/system/ch ... ve_sn.aspx

entao nao forneça o serial

nao sei em que pé anda o tal decrypter do fas, mas no exemplo voce usou um nome obvio para a função

decompilando o troço, e agora supondo que vc nao forneceu nem o codigo acima, teria de buscar um numero "daquillo" que saiu do decriptador

ai trocaria o serial do pendrive

entao encripte o serial

sinceramente.........
acho que esta excelente como está

o que vemos por aqui sao sempre novatos que nem ao menos sabem copiar uma lisp aberta e colar no bloco de notas e tem dificuldade para carregar elas no cad...

não que o cara seja obbrigado a saber isso, mas o nivel de proteção já esta otimo como esta
como que usa o html daqui?
visite o meu blog: http://tbn2.blogspot.com
lisps exclusivas pra download!!
Avatar do usuário
admin
Administrador
Administrador
Mensagens: 621
Registrado em: Sex 28 Nov 2003 11:00:00 pm
Localização: Itu / SP
Contato:

Mensagem por admin »

Ele não precisa fornecer o serial.. Eu terei ele no disco que será fornecido junto com o aplicativo. So quero saber qual é o formato em Hexa do Serial pois creio que consegui uma forma ainda mais facil de clonar discos...Mas por outro lado.. se o que eu estou pensando der certo.. posso usar o MAU como REMEDIO!
Marcos Mendes de Almeida
mmalbr@gmail.com
Avatar do usuário
neyton
Master
Master
Mensagens: 1668
Registrado em: Qui 25 Dez 2003 11:00:00 pm
Contato:

Mensagem por neyton »

[lsp](defun R2H (n / letras a s)
(setq letras '("0" "1" "2" "3" "4" "5" "6" "7" "8" "9" "A" "B" "C" "D" "E" "F")
s "")
(while (/= 0 (setq a (/ n 16)))
(setq s (strcat (nth (rem n 16) letras) s)
n a))
(strcat (nth n letras) s))[/lsp]

(r2h 1024) retorna "400"

ajuda?
como que usa o html daqui?
visite o meu blog: http://tbn2.blogspot.com
lisps exclusivas pra download!!
Avatar do usuário
admin
Administrador
Administrador
Mensagens: 621
Registrado em: Sex 28 Nov 2003 11:00:00 pm
Localização: Itu / SP
Contato:

Mensagem por admin »

Função para converter de INT para HEX eu até tenho:

minha versão:

[lsp]
(defun int2hex (i / s a)
(setq s "")
(while (> i 0)
(setq a (rem i 16)
i (lsh i -4)
)
(setq s (strcat (if (< a 10)
(chr (+ 48 a))
(chr (+ 55 a))
)
s
)
)
)
)
[/lsp]

Na verdade quero apenas confirmar qual o numero de série (HEX) pois me parece que possui apenas 7 digitos e não 8 como é mais comum!

at
Marcos Mendes de Almeida
mmalbr@gmail.com
Avatar do usuário
cracksther
Diamante
Diamante
Mensagens: 1063
Registrado em: Seg 13 Dez 2004 11:00:00 pm

Mensagem por cracksther »

marcos...
se converter -132205097 irá encontrar FFFF-FFFF-F81E-B5D7
se converter F81E-B5D7 irá encontrar 4.162.762.199
porém a faixa de inteiros +2,147,483,647 to -2,147,483,648.
por isso o erro na conversão...
o seriral é F81E-B5D7... se você colocalr esse serial em um disco deve funcionar ttenta aí e me diz o resultado

Até mais!
Marcelo Silva - Cascavel - PR
cracksther@gmail.com
Avatar do usuário
admin
Administrador
Administrador
Mensagens: 621
Registrado em: Sex 28 Nov 2003 11:00:00 pm
Localização: Itu / SP
Contato:

Mensagem por admin »

Realmente.


carreguei o VLX e deu o alert "acesso liberado"

mas agora vou preparar uma alteração!
como eu disse O MAU vai virar O REMEDIO!

Obs: Meu pen drive tem agora o mesmo serial que o seu: F81E-B5D7

AT
Marcos Mendes de Almeida
mmalbr@gmail.com
Avatar do usuário
admin
Administrador
Administrador
Mensagens: 621
Registrado em: Sex 28 Nov 2003 11:00:00 pm
Localização: Itu / SP
Contato:

Mensagem por admin »

Mais uma pergunta!

que tipo de disco utilizou ( cd, hd, pendrive, etc)?

at
Marcos Mendes de Almeida
mmalbr@gmail.com
Avatar do usuário
cracksther
Diamante
Diamante
Mensagens: 1063
Registrado em: Seg 13 Dez 2004 11:00:00 pm

Mensagem por cracksther »

marcos... Usei um pen-drive...

Quanto ao mau virar remédio, é esse o objetivo do crack-me.

aguardo o seu ajuste.

Até mais!
Marcelo Silva - Cascavel - PR
cracksther@gmail.com
Responder