[Информация] Запуск WarFace без ИЦ - Страница 3 - Zhyk.Ru Forums
Регистрация Главная Пользователи Все разделы прочитаны
Сообщения за день Справка Регистрация
Навигация
Zhyk.Ru LIVE! Реклама на Zhyk.Ru Доска почета top.zhyk.ru (beta) Премиум-аккаунт

Запуск WarFace без ИЦ

-

Warface Online

- Онлайн-шутер Warface от Crytek

Ответ
 
Опции темы Опции просмотра
Старый 04.09.2017, 18:50   #31
Заблокирован
 Разведчик
Аватар для чароплет
 
чароплет неизвестен в этих краяхчароплет неизвестен в этих краяхчароплет неизвестен в этих краях
Регистрация: 22.06.2011
Сообщений: 7
Популярность: -249
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
 
По умолчанию Re: Запуск WarFace без ИЦ

Цитата:
Сообщение от Dimedrol1536Посмотреть сообщение
Код на Delphi.
function Mail() - это для почты mail.
function NeMail() - это для любой другой почты.

Код:
function TForm1.Start(server,uid,token: String):Integer;
begin
   ShellExecute (0, nil,
    PChar(gPath+'\Bin32Release\Game.exe'),
    PChar('--shard_id=0 +online_server '+server+' -uid '+uid+' -token '+token),
    nil, SW_RESTORE);
end;

function Mail():Integer;
var
  o,xmlparser:OleVariant;
  accesstoken,str,location,mpop,uid,token:string;
  a1,a2:Integer;
  first,firstpost,twopost,autoLogin,server: string;
begin
  //Memo1.Clear;
  CoInitialize(0);

  if Form1.ComboBox1.ItemIndex = 0 then server:='s0.warface.ru';
  if Form1.ComboBox1.ItemIndex = 1 then server:='s1.warface.ru';
  if Form1.ComboBox1.ItemIndex = 2 then server:='s2.warface.ru';

  firstpost:= 'https://o2.mail.ru/token';
  first:='client_id=gamecenter.mail.ru&grant_type=password&username='+Form1.Edit1.Text+'&password='+Form1.Edit2.Text;
  twopost:='https://authdl.mail.ru/ec.php?hint=MrPage2';
  autoLogin:='https://authdl.mail.ru/sz.php?hint=AutoLogin';



  o:=CreateOleObject('Microsoft.XMLHTTP');
  xmlparser:=CreateOleObject('Msxml2.DOMDocument');
  o.open ('POST', firstpost, False);
  o.setRequestHeader ('Content-Type', 'application/x-www-form-urlencoded');
  o.setRequestHeader ('Content-Length',Length(first));
  o.setRequestHeader('User-Agent','Downloader/4300');
  o.send (first);
  xmlParser.loadXML(o.responsetext);
  accesstoken := copy (o.responsetext, (Length(o.responsetext)-49),48 );

  if Pos('"error_code"',o.responsetext)<>0 then
  begin
    ShowMessage('Не верный логин\пароль');
  end
  else
  begin
  o.open ('POST', twopost, False);
  o.setRequestHeader('Content-Type', 'application/x-www-form-urlencoded');
  o.setRequestHeader('Content-Length', Length('<?xml version="1.0" encoding="UTF-8"?><MrPage2 SessionKey="'+accesstoken+'" Page="http://dl.mail.ru/robots.txt"/>'));
  o.setRequestHeader('User-Agent','Downloader/4300');
  o.send ('<?xml version="1.0" encoding="UTF-8"?><MrPage2 SessionKey="'+accesstoken+'" Page="http://dl.mail.ru/robots.txt"/>');
  xmlParser.loadXML(o.responsetext);
  location := xmlParser.getElementsByTagName('MrPage2').Item(0).getAttribute('Location');
  StringReplace (location, 'amp;', '&',[rfreplaceall,rfignorecase]);
  o.open ('GET', location, false);
  o.setRequestHeader ('User-Agent','Downloader/4300');
  o.send;

  str:=o.getResponseHeader ('Set-Cookie');
  a1:= pos('Mpop=',str);
  a2:= Pos('ru:;',str);
  mpop:= copy (str, a1+5, a2-a1-2);

  o.open ('POST',autoLogin , False);
  o.setRequestHeader ('Content-Type', 'application/x-www-form-urlencoded');
  o.setRequestHeader ('Content-Length', Length('<?xml version="1.0" encoding="UTF-8"?><AutoLogin ProjectId="1177" SubProjectId="0" ShardId="1" Mpop="'+mpop+'"/>'));
  o.setRequestHeader ('User-Agent','Downloader/4300');
  o.send ('<?xml version="1.0" encoding="UTF-8"?><AutoLogin ProjectId="1177" SubProjectId="0" ShardId="1" Mpop="'+mpop+'"/>');

  if Pos('SZError Code="793"',o.responsetext)<>0 then
  begin
    ShowMessage('Вы забанены :(');
  end else
  begin
    xmlParser.loadXML(o.responsetext);
    uid := xmlParser.getElementsByTagName('AutoLogin').Item(0).getAttribute('PersId');
    token := xmlParser.getElementsByTagName('AutoLogin').Item(0).getAttribute('Key');

    Form1.Start(server,uid,token);
  end;
  end;
end;
//------------------------------------------------------------------------------

function NeMail():Integer;
var
  o,xmlparser:OleVariant;
  accesstoken,str,location:string;
  a1,a2:Integer;
  zapr,first,firstpost,twopost,server: string;
  WFPersid,WFKey: string;
  uid,token,WFSessionKey,first_two,autoLogin: string;
begin
  if Form1.ComboBox1.ItemIndex = 0 then server:='s0.warface.ru';
  if Form1.ComboBox1.ItemIndex = 1 then server:='s1.warface.ru';
  if Form1.ComboBox1.ItemIndex = 2 then server:='s2.warface.ru';

  zapr:='https://authdl.mail.ru/ec.php?hint=GcAuth';
  first:='<?xml version="1.0" encoding="UTF-8"?><GcAuth Username="'+Form1.Edit1.Text+'" Password="'+Form1.Edit2.Text+'" ChannelId="0"/>';

  CoInitialize(0);
  o:=CreateOleObject('Microsoft.XMLHTTP');
  xmlparser:=CreateOleObject('Msxml2.DOMDocument');

  o.open ('POST',zapr , False);
  o.setRequestHeader ('Content-Type', 'application/x-www-form-urlencoded');
  o.setRequestHeader ('Content-Length',Length(first));
  o.setRequestHeader ('User-Agent','Downloader/4300');
  o.send(first);
  xmlParser.loadXML(o.responsetext);

  if Pos('GcAuth ErrorCode="411" ',o.responsetext)or Pos('GcAuth ErrorCode="418"',o.responsetext)<>0 then
    begin
      ShowMessage('Нерный логин\пароль');
    end else
    begin
      token :=xmlParser.getElementsByTagName('GcAuth').Item(0).getAttribute('Token');
      uid:= xmlParser.getElementsByTagName('GcAuth').Item(0).getAttribute('Uid');
      WFSessionKey:= xmlParser.getElementsByTagName('GcAuth').Item(0).getAttribute('SessionKey') ;

      first_two:='<?xml version="1.0" encoding="UTF-8"?><EnazaGetOrdersList Uid="'+token+'" SessionKey="'+WFSessionKey+'" UidType="3"/>';
      o.open('POST', 'https://authdl.mail.ru/ec.php?hint=EnazaGetOrdersList', False);
      o.setRequestHeader ('Content-Type', 'application/x-www-form-urlencoded');
      o.setRequestHeader ('Content-Length', Length(first_two));
      o.setRequestHeader ('User-Agent','Downloader/4300');
      o.send(first_two);

      autoLogin:='<?xml version="1.0" encoding="UTF-8"?><AutoLogin ProjectId="1177" SubProjectId="0" ShardId="1" GcToken="'+token+'"/>';
      o.open ('POST', 'https://authdl.mail.ru/sz.php?hint=AutoLogin', False);
      o.setRequestHeader ('Content-Type', 'application/x-www-form-urlencoded');
      o.setRequestHeader ('Content-Length', Length(autoLogin));
      o.setRequestHeader ('User-Agent','Downloader/4300');
      o.send(autoLogin);
      xmlParser.loadXML(o.responsetext);
      if Pos('SZError Code="793"',o.responsetext)<>0 then
        begin
          ShowMessage('Вы забанены :(');
        end
        else
        begin
          WFPersid:= xmlParser.getElementsByTagName('AutoLogin').Item(0).getAttribute('PersId');
          WFKey:= xmlParser.getElementsByTagName('AutoLogin').Item(0).getAttribute('Key');
          xmlparser:=CreateOleObject('WScript.Shell');

          Form1.Start(server,WFPersid,WFKey);

        end;
    end;
end;
//------------------------------------------------------------------------------

О , Димедрол, дружище, кропаешь все ещё читы?
  Ответить с цитированием
Старый 08.10.2017, 23:40   #32
 Разведчик
Аватар для mrlyceist
 
mrlyceist никому не известный тип
Регистрация: 08.10.2017
Сообщений: 1
Популярность: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
 
По умолчанию Re: Запуск WarFace без ИЦ

Всем доброго времени суток!
Я понимаю, что некропостинг, это не есть хорошо, но плодить темы тоже плохо, а мой вопрос непосредственно по этой теме.
Если кто до сих пор пользуется этими скриптами - скажите, а они по-прежнему работают? Потому что я начал свою реализацию (c#, фронт WPF). Пробую майлрушную аутентификацию. Все было хорошо до третьего этапа - получения аутентификационной куки. Ссылку я получаю, но при get-запросе меня, судя по всему, редиректит куда-то, и куки мне не отдают вообще никакие. Может, кто сталкивался с таким на этапе разработки скриптов?
Буду благодарен за совет.
А если выгорит в итоге - выложу код лаунчера на гитхаб, что бы все могли пользоваться и модифицировать по усмотрению.

Последний раз редактировалось mrlyceist; 09.10.2017 в 00:00.
  Ответить с цитированием
Старый 26.11.2017, 17:06   #33
 Разведчик
Аватар для manx5
 
manx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражания
Регистрация: 02.02.2014
Сообщений: 27
Популярность: 1833
Сказал(а) спасибо: 0
Поблагодарили 9 раз(а) в 8 сообщениях
 
По умолчанию Re: Запуск WarFace без ИЦ

Цитата:
Сообщение от mrlyceistПосмотреть сообщение
Ссылку я получаю, но при get-запросе меня, судя по всему, редиректит куда-то, и куки мне не отдают вообще никакие. Может, кто сталкивался с таким на этапе разработки скриптов?

прошу прощения за длительный ответ. давно не был на жуке.
я к сожалению не знаю работает ли этот скрипт сейчас, но первое что приходит в голову - амперсант не приведён к нормальному виду т.е.
необходима замена в локейшн &amp; => &

Добавлено через 23 минуты
проверил - куки приходят. но там дальше затык.
рекомендую попробовать HTTP Analyzer - в последний раз когда я его использовал с ИЦ он нормально перехватывал весь трафик.

у меня просто ни ИЦ ни ВФ нету теперь.

Последний раз редактировалось manx5; 26.11.2017 в 17:30. Причина: Добавлено сообщение
  Ответить с цитированием
Старый 15.04.2018, 14:28   #34
 Разведчик
Аватар для manx5
 
manx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражания
Регистрация: 02.02.2014
Сообщений: 27
Популярность: 1833
Сказал(а) спасибо: 0
Поблагодарили 9 раз(а) в 8 сообщениях
 
По умолчанию Re: Запуск WarFace без ИЦ

только для почт майл.ру.
они добавили MRACToken как его применяет game.exe не знаю - у меня нету.
кук стало больше поэтому мпоп теперь ищется по всем кукам.

Код:
If WScript.Arguments.Count = 0 Then 
  MsgBox "usage wfm.vbs [Ссылки могут видеть только зарегистрированные пользователи. ] pass [wf.server]"
  WScript.Quit 
End If

Set objArgs = WScript.Arguments

Dim o, o1, WFLogin, WFPassword, WFMRaccess_token, WFMRMpop, WFMRUid, WFMRSessionKey, WFMRPersId, WFMRKey, WshShell, theTelnet, WFMRACToken

WFLogin = objArgs.Item(0)
WFPassword = objArgs.Item(1)

Set objRegExp = CreateObject("VBScript.RegExp")

Set xmlParser = CreateObject("Msxml2.DOMDocument")

Set o = CreateObject("MSXML2.ServerXMLHTTP")

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile ("wfm.log", 8, True)

'логин/пароль -> аксес-токен
o.open "POST", "https://o2.mail.ru/token", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("client_id=gamecenter.mail.ru&grant_type=password&username="&WFLogin&"&password="&WFPassword)
o.setRequestHeader "User-Agent","Downloader/11870"
o.send "client_id=gamecenter.mail.ru&grant_type=password&username="&WFLogin&"&password="&WFPassword
objRegExp.Pattern = "access_token"":""(.+?)"""
WFMRaccess_token = objRegExp.Execute(o.responsetext).Item(0).Submatches.Item(0)
objTextFile.WriteLine(o.responsetext)

'юзеринфо - (!)надобность под вопросом
o.open "POST", "https://o2.mail.ru/userinfo", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("client_id=gamecenter.mail.ru&access_token="&WFMRaccess_token)
o.setRequestHeader "User-Agent","Downloader/11870"
o.send "client_id=gamecenter.mail.ru&access_token="&WFMRaccess_token
objTextFile.WriteLine(o.responsetext)

'аксесс-токен -> ссылка для мпоп
o.open "POST", "https://authdl.mail.ru/ec.php?hint=MrPage2", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("<?xml version=""1.0"" encoding=""UTF-8""?><MrPage2 SessionKey="""&WFMRaccess_token&""" Page=""http://dl.mail.ru/robots.txt""/>")
o.setRequestHeader "User-Agent","Downloader/11870"
o.send "<?xml version=""1.0"" encoding=""UTF-8""?><MrPage2 SessionKey="""&WFMRaccess_token&""" Page=""http://dl.mail.ru/robots.txt""/>"
xmlParser.loadXML(o.responsetext)
WFMRLocation = xmlParser.getElementsByTagName("MrPage2").Item(0).getAttribute("Location")
objTextFile.WriteLine("аксесс-токен -> ссылка для мпоп")
objTextFile.WriteLine(o.responsetext)

'ссылка для мпоп -> мпоп из куки на странице с редиректом
Set o1 = CreateObject("WinHttp.WinHttpRequest.5.1")
o1.open "GET", WFMRLocation, False
o1.setRequestHeader "User-Agent","Downloader/11870" 
o1.Option(6) = False
o1.send
objRegExp.Pattern = "Mpop=(.+?);"
objTextFile.WriteLine("ссылка для мпоп -> мпоп из куки на странице с редиректом")
objTextFile.WriteLine(o1.GetAllResponseHeaders())
'objTextFile.WriteLine(o1.getResponseHeader("Set-Cookie"))
objTextFile.WriteLine(o1.responsetext)
WFMRMpop = objRegExp.Execute(o1.GetAllResponseHeaders()).Item(0).Submatches.Item(0)
objTextFile.WriteLine(WFMRMpop)


'мпоп -> юид и сессионкей
o.open "POST", "https://authdl.mail.ru/ec.php?hint=Auth", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("<?xml version=""1.0"" encoding=""UTF-8""?><Auth Cookie="""&WFMRMpop&""" ChannelId=""0""/>")
o.setRequestHeader "User-Agent","Downloader/11870"
o.send "<?xml version=""1.0"" encoding=""UTF-8""?><Auth Cookie="""&WFMRMpop&""" ChannelId=""0""/>"
xmlParser.loadXML(o.responsetext)
WFMRSessionKey = xmlParser.getElementsByTagName("Auth").Item(0).getAttribute("SessionKey")
WFMRUid = xmlParser.getElementsByTagName("Auth").Item(0).getAttribute("Uid")
objTextFile.WriteLine(o.responsetext)

'мпоп -> персайди
o.open "POST", "https://authdl.mail.ru/sz.php?hint=Auth", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("<?xml version=""1.0"" encoding=""UTF-8""?><Auth ProjectId=""1177"" SubProjectId=""0"" ShardId=""0"" Mpop="""&WFMRMpop&"""/>")
o.setRequestHeader "User-Agent","Downloader/11870"
o.send "<?xml version=""1.0"" encoding=""UTF-8""?><Auth ProjectId=""1177"" SubProjectId=""0"" ShardId=""0"" Mpop="""&WFMRMpop&"""/>"
objTextFile.WriteLine(o.responsetext)

'хз зачем это тут
o.open "POST", "https://authdl.mail.ru/ec.php?hint=EnazaGetOrdersList", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("<?xml version=""1.0"" encoding=""UTF-8""?><EnazaGetOrdersList Uid="""&WFMRUid&""" SessionKey="""&WFMRSessionKey&""" UidType=""0""/>")
o.setRequestHeader "User-Agent","Downloader/11870"
o.send "<?xml version=""1.0"" encoding=""UTF-8""?><EnazaGetOrdersList Uid="""&WFMRUid&""" SessionKey="""&WFMRSessionKey&""" UidType=""0""/>"
objTextFile.WriteLine(o.responsetext)

'мпоп -> уид и токен
o.open "POST", "https://authdl.mail.ru/sz.php?hint=AutoLogin", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("<?xml version=""1.0"" encoding=""UTF-8""?><AutoLogin ProjectId=""1177"" SubProjectId=""0"" ShardId=""1"" Mpop="""&WFMRMpop&"""/>")
o.setRequestHeader "User-Agent","Downloader/11870"
o.send "<?xml version=""1.0"" encoding=""UTF-8""?><AutoLogin ProjectId=""1177"" SubProjectId=""0"" ShardId=""1"" Mpop="""&WFMRMpop&"""/>"
xmlParser.loadXML(o.responsetext)
WFMRPersid = xmlParser.getElementsByTagName("AutoLogin").Item(0).getAttribute("PersId")
WFMRKey = xmlParser.getElementsByTagName("AutoLogin").Item(0).getAttribute("Key")
WFMRACToken = xmlParser.getElementsByTagName("AutoLogin").Item(0).getAttribute("MRACToken")
objTextFile.WriteLine(o.responsetext)
objTextFile.Close
вообще это часть скрипта которая дальше телнетом (если установлен) заходит на сервер варфейса. но я так и не понял почмеу оно через раз авторизуется.
вот полный скрипт (если у вас есть телнет).

Код:
Function MyASC(OneChar)
  If OneChar = "" Then MyASC = 0 Else MyASC = Asc(OneChar)
End Function

Function Base64Encode(inData)
  'rfc1521
  '2001 Antonin Foller, Motobit Software, http://Motobit.cz
  Const Base64 = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/"
  Dim cOut, sOut, I
  
  'For each group of 3 bytes
  For I = 1 To Len(inData) Step 3
    Dim nGroup, pOut, sGroup
    
    'Create one long from this 3 bytes.
    nGroup = &H10000 * Asc(Mid(inData, I, 1)) + _
      &H100 * MyASC(Mid(inData, I + 1, 1)) + MyASC(Mid(inData, I + 2, 1))
    
    'Oct splits the long To 8 groups with 3 bits
    nGroup = Oct(nGroup)
    
    'Add leading zeros
    nGroup = String(8 - Len(nGroup), "0") & nGroup
    
    'Convert To base64
    pOut = Mid(Base64, CLng("&o" & Mid(nGroup, 1, 2)) + 1, 1) + _
      Mid(Base64, CLng("&o" & Mid(nGroup, 3, 2)) + 1, 1) + _
      Mid(Base64, CLng("&o" & Mid(nGroup, 5, 2)) + 1, 1) + _
      Mid(Base64, CLng("&o" & Mid(nGroup, 7, 2)) + 1, 1)
    
    'Add the part To OutPut string
    sOut = sOut + pOut
    
    'Add a new line For Each 76 chars In dest (76*3/4 = 57)
    'If (I + 2) Mod 57 = 0 Then sOut = sOut + vbCrLf
  Next
  Select Case Len(inData) Mod 3
    Case 1: '8 bit final
      sOut = Left(sOut, Len(sOut) - 2) + "=="
    Case 2: '16 bit final
      sOut = Left(sOut, Len(sOut) - 1) + "="
  End Select
  Base64Encode = sOut
End Function

If WScript.Arguments.Count = 0 Then 
  MsgBox "usage wfm.vbs [Ссылки могут видеть только зарегистрированные пользователи. ] pass [wf.server]"
  WScript.Quit 
End If

Set objArgs = WScript.Arguments

Dim o, o1, WFLogin, WFPassword, WFMRaccess_token, WFMRMpop, WFMRUid, WFMRSessionKey, WFMRPersId, WFMRKey, WshShell, theTelnet, WFMRACToken

WFLogin = objArgs.Item(0)
WFPassword = objArgs.Item(1)

Set objRegExp = CreateObject("VBScript.RegExp")

Set xmlParser = CreateObject("Msxml2.DOMDocument")

Set o = CreateObject("MSXML2.ServerXMLHTTP")

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile ("wfm.log", 8, True)

'логин/пароль -> аксес-токен
o.open "POST", "https://o2.mail.ru/token", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("client_id=gamecenter.mail.ru&grant_type=password&username="&WFLogin&"&password="&WFPassword)
o.setRequestHeader "User-Agent","Downloader/11870"
o.send "client_id=gamecenter.mail.ru&grant_type=password&username="&WFLogin&"&password="&WFPassword
objRegExp.Pattern = "access_token"":""(.+?)"""
WFMRaccess_token = objRegExp.Execute(o.responsetext).Item(0).Submatches.Item(0)
objTextFile.WriteLine(o.responsetext)

'юзеринфо - (!)надобность под вопросом
o.open "POST", "https://o2.mail.ru/userinfo", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("client_id=gamecenter.mail.ru&access_token="&WFMRaccess_token)
o.setRequestHeader "User-Agent","Downloader/11870"
o.send "client_id=gamecenter.mail.ru&access_token="&WFMRaccess_token
objTextFile.WriteLine(o.responsetext)

'аксесс-токен -> ссылка для мпоп
o.open "POST", "https://authdl.mail.ru/ec.php?hint=MrPage2", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("<?xml version=""1.0"" encoding=""UTF-8""?><MrPage2 SessionKey="""&WFMRaccess_token&""" Page=""http://dl.mail.ru/robots.txt""/>")
o.setRequestHeader "User-Agent","Downloader/11870"
o.send "<?xml version=""1.0"" encoding=""UTF-8""?><MrPage2 SessionKey="""&WFMRaccess_token&""" Page=""http://dl.mail.ru/robots.txt""/>"
xmlParser.loadXML(o.responsetext)
WFMRLocation = xmlParser.getElementsByTagName("MrPage2").Item(0).getAttribute("Location")
objTextFile.WriteLine("аксесс-токен -> ссылка для мпоп")
objTextFile.WriteLine(o.responsetext)

'ссылка для мпоп -> мпоп из куки на странице с редиректом
Set o1 = CreateObject("WinHttp.WinHttpRequest.5.1")
o1.open "GET", WFMRLocation, False
o1.setRequestHeader "User-Agent","Downloader/11870" 
o1.Option(6) = False
o1.send
objRegExp.Pattern = "Mpop=(.+?);"
objTextFile.WriteLine("ссылка для мпоп -> мпоп из куки на странице с редиректом")
objTextFile.WriteLine(o1.GetAllResponseHeaders())
'objTextFile.WriteLine(o1.getResponseHeader("Set-Cookie"))
objTextFile.WriteLine(o1.responsetext)
WFMRMpop = objRegExp.Execute(o1.GetAllResponseHeaders()).Item(0).Submatches.Item(0)
objTextFile.WriteLine(WFMRMpop)


'мпоп -> юид и сессионкей
o.open "POST", "https://authdl.mail.ru/ec.php?hint=Auth", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("<?xml version=""1.0"" encoding=""UTF-8""?><Auth Cookie="""&WFMRMpop&""" ChannelId=""0""/>")
o.setRequestHeader "User-Agent","Downloader/11870"
o.send "<?xml version=""1.0"" encoding=""UTF-8""?><Auth Cookie="""&WFMRMpop&""" ChannelId=""0""/>"
xmlParser.loadXML(o.responsetext)
WFMRSessionKey = xmlParser.getElementsByTagName("Auth").Item(0).getAttribute("SessionKey")
WFMRUid = xmlParser.getElementsByTagName("Auth").Item(0).getAttribute("Uid")
objTextFile.WriteLine(o.responsetext)

'мпоп -> персайди
o.open "POST", "https://authdl.mail.ru/sz.php?hint=Auth", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("<?xml version=""1.0"" encoding=""UTF-8""?><Auth ProjectId=""1177"" SubProjectId=""0"" ShardId=""0"" Mpop="""&WFMRMpop&"""/>")
o.setRequestHeader "User-Agent","Downloader/11870"
o.send "<?xml version=""1.0"" encoding=""UTF-8""?><Auth ProjectId=""1177"" SubProjectId=""0"" ShardId=""0"" Mpop="""&WFMRMpop&"""/>"
objTextFile.WriteLine(o.responsetext)

'хз зачем это тут
o.open "POST", "https://authdl.mail.ru/ec.php?hint=EnazaGetOrdersList", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("<?xml version=""1.0"" encoding=""UTF-8""?><EnazaGetOrdersList Uid="""&WFMRUid&""" SessionKey="""&WFMRSessionKey&""" UidType=""0""/>")
o.setRequestHeader "User-Agent","Downloader/11870"
o.send "<?xml version=""1.0"" encoding=""UTF-8""?><EnazaGetOrdersList Uid="""&WFMRUid&""" SessionKey="""&WFMRSessionKey&""" UidType=""0""/>"
objTextFile.WriteLine(o.responsetext)

'мпоп -> уид и токен
o.open "POST", "https://authdl.mail.ru/sz.php?hint=AutoLogin", False
o.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
o.setRequestHeader "Content-Length", Len("<?xml version=""1.0"" encoding=""UTF-8""?><AutoLogin ProjectId=""1177"" SubProjectId=""0"" ShardId=""1"" Mpop="""&WFMRMpop&"""/>")
o.setRequestHeader "User-Agent","Downloader/11870"
o.send "<?xml version=""1.0"" encoding=""UTF-8""?><AutoLogin ProjectId=""1177"" SubProjectId=""0"" ShardId=""1"" Mpop="""&WFMRMpop&"""/>"
xmlParser.loadXML(o.responsetext)
WFMRPersid = xmlParser.getElementsByTagName("AutoLogin").Item(0).getAttribute("PersId")
WFMRKey = xmlParser.getElementsByTagName("AutoLogin").Item(0).getAttribute("Key")
WFMRACToken = xmlParser.getElementsByTagName("AutoLogin").Item(0).getAttribute("MRACToken")
objTextFile.WriteLine(o.responsetext)
objTextFile.Close

If WScript.Arguments.Count = 3 Then
  Set WshShell = WScript.CreateObject("WScript.Shell") 
  theTelnet = WshShell.Run("cmd /c telnet.exe", 1, False) 
  WScript.Sleep 500 
  WshShell.AppActivate "%comspec%" 
  WScript.Sleep 100 
  WshShell.SendKeys "set logfile wfm1.log~" 
  WScript.Sleep 1000
  WshShell.SendKeys "open " & objArgs.Item(2) & " 5222~"
  WScript.Sleep 1000
  WshShell.SendKeys "<?xml version='1.0'?><stream:stream to='warface' xmlns='jabber:client' xmlns:stream='http://etherx.jabber.org/streams' xml:lang='en' version='1.0'>~"
  WScript.Sleep 1000
  WshShell.SendKeys "<auth xmlns='urn:ietf:params:xml:ns:xmpp-sasl' mechanism='WARFACE'>" & Base64Encode(chr(0) & WFMRKey & chr(0) & WFMRPersid) & "</auth>~"
End If
в процессе работы создаёт два лог файла wfm.log (действия имитации ИЦ) и wfm1.log (всё что происходит сервером warface по джаберу)
  Ответить с цитированием
Старый 04.05.2018, 20:55   #35
 Разведчик
Аватар для Gerlay
 
Gerlay никому не известный тип
Регистрация: 04.05.2018
Сообщений: 1
Популярность: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
 
По умолчанию Re: Запуск WarFace без ИЦ

Скиньте как файл cmd.exe
  Ответить с цитированием
Старый 12.06.2018, 21:37   #36
 Разведчик
Аватар для Aqua-regia
 
Aqua-regia никому не известный тип
Регистрация: 12.06.2018
Сообщений: 1
Популярность: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
 
По умолчанию Re: Запуск WarFace без ИЦ

Может кто нибудь подсказать, как это запустить?
  Ответить с цитированием
Старый 15.06.2018, 18:04   #37
 Разведчик
Аватар для manx5
 
manx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражания
Регистрация: 02.02.2014
Сообщений: 27
Популярность: 1833
Сказал(а) спасибо: 0
Поблагодарили 9 раз(а) в 8 сообщениях
 
По умолчанию Re: Запуск WarFace без ИЦ

это скрипт на vbs
соотвественно можно это всё сохранить в файл например wfm.vbs далее необходимо запустить командную строку там где лежит этот файл. например в проводнике нажать shift+правая кнопка мыши - в меню будет запустить командную строку здесь (или что-то типа того) и далее в этой командной строке уже запускать
Код:
wfm.vbs логин@майл.ру пароль
  Ответить с цитированием
Старый 31.07.2018, 18:36   #38
 Разведчик
Аватар для TomJimJack
 
TomJimJack никому не известный тип
Регистрация: 15.07.2018
Сообщений: 1
Популярность: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
 
По умолчанию Re: Запуск WarFace без ИЦ

Здравствуйте! На данный момент актуально? Не получается запустить. Лог файл создается, а дальше ничего не происходит. (Ведь не важно же bk, list или сам mail?)
  Ответить с цитированием
Старый 04.08.2018, 15:31   #39
 Разведчик
Аватар для manx5
 
manx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражанияmanx5 блестящий пример для подражания
Регистрация: 02.02.2014
Сообщений: 27
Популярность: 1833
Сказал(а) спасибо: 0
Поблагодарили 9 раз(а) в 8 сообщениях
 
По умолчанию Re: Запуск WarFace без ИЦ

а что хочется запустить то? сам варфейс? второй скрипт в сообщении от 15.04.2018 запускает телнет если третьим аргументов в командной строке указан сервер (и если телнет клиент открыт на компе)

если надо запустить сам варфейс, то необходимо запускать game.exe с параметрами котрые на сегодняшний день я не знаю. т.к. давно в варфейс не играл. узнать текущие параметры запуска game.exe можно в диспетчере задач если добавить там отображение столбца "командная строка".
ранее game.exe запускался с такими параметрами (есть на первой странице темы)
Код:
Game.exe --shard_id=0 +online_server s0.warface.ru -uid 777777777 -token 9021504b84672afb40fa69375dcc672a591f7181e58baf943deeb3620c3d8dce
ну а в скрипте соответственно поменять код между
Код:
If WScript.Arguments.Count = 3 Then
...
End If
заменив его на актуальную версию вот этого
Код:
Set wsh = WScript.CreateObject("WScript.Shell")
wsh.Exec("Game.exe --shard_id=0 +online_server "&objArgs.Item(2)&" -uid "&WFPersid&" -token "&WFKey&" ")
  Ответить с цитированием
Ответ

Метки
warface

Опции темы
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Помогите!] Запуск EXE SWATrc Вопросы и ответы, обсуждения 5 12.06.2014 22:34
[Помогите!] запуск из .bat blad56 Вопросы и ответы, обсуждения 5 01.08.2011 15:59
[Помогите!] запуск PWI thomas4792 Общение и обсуждение Perfect World 0 13.03.2011 17:48
Запуск PW kirill=) Общение и обсуждение Perfect World 11 14.12.2010 17:09

www.webmoney.ru
Заявление об ответственности / Список мошенников

Часовой пояс GMT +4, время: 00:42.

Пишите нам: forum@zhyk.ru
Copyright © 2018 vBulletin Solutions, Inc.
Translate: zCarot. Webdesign by DevArt (Fox)
G-gaMe! Team production | Since 2008
Powered by GShost.net