Advertisement
thebad_cb

WoWBot

Sep 15th, 2017
394
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Delphi 3.05 KB | None | 0 0
  1. unit wStruct;
  2.  
  3. interface
  4.  
  5. Uses
  6. Windows;
  7.  
  8.  
  9. {$REGION 'AuthLogonChallenge_Client'}
  10. type AuthLogonChallenge_Client = Packed Record  //size 53
  11.  Command: Byte; //00
  12.  ErrorCode: Byte;//03
  13.  Size: Word;  //-4  //49
  14.  GameName: Array [0..3] of ansichar;//WoW
  15.  Version: array [0..2] of Byte;// 01 0c 01
  16.  build: word;  //5875
  17.  platforme: Array [0..3] of ansichar;//plataforma 68x
  18.  oS: Array [0..3] of ansichar; //niW
  19.  Country: Array [0..3] of ansichar;//BGne
  20.  Time : LongInt; //-180
  21.  IP: LongInt;//1744939200
  22.  SizeID: Byte;
  23.  ID: Array [0..18] of ansichar;//WoW
  24. end;
  25. {$ENDREGION}
  26.  
  27. {$REGION 'AuthLogonChallenge_Server'}  //recv   119
  28. type AuthLogonChallenge_Server = Packed Record  //size 53
  29.  Command: Byte; //00
  30.  unk: Byte;
  31.  Error: byte;
  32.  B: Array [0..31]of Ansichar;  //SRP public server ephemeral
  33.  g_Len: byte;//SRP generator length
  34.  g: byte;  //SRP generator
  35.  n_len:byte; //SRP modulus length
  36.  n: Array [0..31]of Ansichar; //SRP modulus
  37.  srp_salt: Array [0..31]of Ansichar; //SRP user's salt
  38.  crc_salt: Array [0..15]of Ansichar; //A salt to be used in AuthLogonProof_Client.crc_hash
  39.  unk1:byte;
  40. End;
  41. {$ENDREGION}
  42.  
  43. {$REGION 'AuthLogonProof_Client'}
  44. type AuthLogonProof_Client = Packed Record //size 75
  45.  Command : Byte; //0x1
  46.  A       : Array [0..31]of Ansichar;
  47.  M1      : Array [0..19]of Ansichar;
  48.  crc_hash: Array [0..31]of Ansichar;
  49.  number_of_keys: byte;
  50.  unk     : byte;
  51. End;
  52. {
  53. 01
  54. 20 4A F5 BD EA 46 0A 11 4F ED 4D 3A EF FE C1 E8 E6 E4 4E C3 6C 14 D5 FA 69 5F FE FA 9D 65 85 41
  55. 18 8D 9F 68 3B 33 4B D6 2B F4 A6 BF E1 7B F5 26 BB 49 73 0C
  56. 96 DF 22 4D D2 48 2F 1B CD 53 BC 84 D7 E0 03 3E A4 9E 0E 7A
  57. 00
  58. 00
  59. }
  60.  
  61. {$ENDREGION}
  62.  
  63. {$REGION 'AuthLogonProof_Server'}  //0x26
  64. type AuthLogonProof_Server = Packed Record
  65.  Command : Byte; //0x1
  66.  error   : byte;
  67.  m2      : Array [0..19]of Ansichar;
  68.  unk     : LongInt;
  69. End;
  70. {
  71. 01
  72. 00
  73. 32 93 13 BB C2 8E 22 98 D7 EA AA B0 A9 1A 73 C3 CD CF FA 9B
  74. 00 00 00 00
  75. }
  76. {$ENDREGION}
  77.  
  78. {$REGION 'AuthReconnectionChallenge_Server'}
  79. type AuthReconnectionChallenge_Server = Packed Record
  80.  Command : Byte; //0x2
  81.  error   : byte;
  82.  challenge_data: Array [0..15]of Ansichar; //random data, used as a challenge
  83.  unk1    : LongInt;
  84.  unk2    : LongInt;
  85. End;
  86. {$ENDREGION}
  87.  
  88. {$REGION 'AuthReconnectionProof_Client'}
  89. type AuthReconnectionProof_Client = Packed Record
  90.  Command : Byte; //0x3
  91.  proof_data: Array [0..15]of Ansichar;
  92.  client_proof: Array [0..19]of Ansichar;
  93.  unk_hash: Array [0..19]of Ansichar;
  94.  unk: byte;
  95. End;
  96. {$ENDREGION}
  97.  
  98. {$REGION 'AuthReconnectionProof_Server'}
  99. type AuthReconnectionProof_Server = Packed Record
  100.  command: byte;//0x3
  101.  error:byte;
  102. End;
  103. {$ENDREGION}
  104.  
  105. {$REGION 'RealmList_Client'}
  106. type RealmList_Client= Packed Record
  107.  cmd: byte;//REALMLIST
  108.  unk: DWORD;
  109. End;
  110. {$ENDREGION}
  111.  
  112. {$REGION 'RealmHeader_Server'}
  113. type RealmHeader_Server= Packed Record
  114.  cmd: byte;//REALMLIST
  115.  size: WORD;
  116.  unk: DWORD;
  117.  num_realms: Byte;
  118. End;
  119. {$ENDREGION}
  120.  
  121. {$REGION 'RealmInfo_Server'}
  122. type RealmInfo_Server= Packed Record
  123.  TypeServ: DWORD;
  124.  flags: byte;
  125. End;
  126. {$ENDREGION}
  127.  
  128. implementation
  129.  
  130. end.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement