I need help with this packet, it keeps on disconnecting me and i dont know where ive gone wrong=/
m_Key = cdkey
Case &H50
HashCommand = Mid(Data, 38, Len(Data) - 2)
MPQName = Mid(Data, InStr(1, Data, "IX86ver"), Len(Data))
MPQName = Mid(MPQName, 1, 12)
SERVERS = Val("&h" & StrToHex(StrReverse(Mid(Data, 9, 4))))
Dim vHashes As String
vHashes = App.Path & "\WAR3\"
EXEINFO = Space(256)
Result = Z(vHashes & "War3.exe", vHashes & "Storm.dll", vHashes & "Game.dll", HashCommand, version, CHECKSUM, EXEINFO, MPQName)
If Result = Space(256) Then
Form1.Label3.Caption = "Hashes missing!"
Form1.sck1.Close
Exit Sub
End If
Dim CLIENTKEY As Long
Dim lngProdID3 As Long
Dim lngValue3 As Long
Dim strKeyHash As String
Dim dblKey As Long
EXEINFO = KillNull(EXEINFO)
CLIENTKEY = GetTickCount()
Call DecodeHashCDKey(m_Key, CLIENTKEY, SERVERS, _
lngProdID3, lngValue3, strKeyHash)
InsertDWORD CLIENTKEY
InsertDWORD version
InsertDWORD CHECKSUM
InsertDWORD &H1
InsertDWORD &H0
InsertDWORD Len(m_Key)
InsertDWORD lngProdID3
InsertDWORD lngValue3
InsertDWORD &H0
InsertNonNTString strKeyHash
InsertNTString EXEINFO
InsertNTString "WAR3TEST"
SendPacket &H51
Thanks,
PS: This is the first time i've written WAR3 hash :-X
I Suggest that you don't ask for help relating this.
BTW: You should use Copy Memory to remove your "Servers" Variable.
EDIT:
Quote
PS: This is the first time i've written WAR3 hash
OffTopic: Does that remind anyone else of gosugaming besides me?
QuoteSendPacket &H51
It would seem you need help with 0x51 rather than 0x50
I think a packet log is in order so you know exactly what to do ;)
mmm so can anyone tell me why im getting ipbanned, rather than burning me and changing the subject..
PS: where do i get a decent packetlogger =/, one i have now is shit...
I didn't burn you, I merely pointed out that packet logging would help you. Try WPEPro, or Ethereal.
Still dont understand why exactly you're sending packet 0x51 when you're creating the packet 0x50.
Can you please show us your "Call DecodeHashCDKey" function that probably took you days of hard work to figure out? Or are you just using the one that was stolen from the original authors?
Thanks!
Quote from: SNiFFeR on September 15, 2004, 07:49 AM
Still dont understand why exactly you're sending packet 0x51 when you're creating the packet 0x50.
0x50 has nothing to do with anything other than the topic having a typo.
Actually it does, he constructed packet 0x50, but he is sending 0x51. Maybe you should actually look over the code, it's not a typo. If you examine the code you will see what were talking about.
Quote from: TriCk on September 14, 2004, 10:56 PM
InsertDWORD CLIENTKEY
InsertDWORD version
InsertDWORD CHECKSUM
InsertDWORD &H1
InsertDWORD &H0
InsertDWORD Len(m_Key)
InsertDWORD lngProdID3
InsertDWORD lngValue3
InsertDWORD &H0
InsertNonNTString strKeyHash
InsertNTString EXEINFO
InsertNTString "WAR3TEST"
SendPacket &H51
SID_AUTH_CHECK (0x51)
---------------------
(DWORD) Client session key.*
(DWORD) Version.**
(DWORD) Checksum.**
(DWORD) Amount of CD-keys. This is typically 2 for Lord of Destruction, 1 otherwise.***
(BOOL) TRUE for spawn (Starcraft, Japan Starcraft and Warcraft 2 only), FALSE for normal.
(9 DWORDs) CD-key data.*
(Optional 9 DWORDs) CD-key data for second CD-key, if using Lord of Destruction.***
(String) Version check stat string.**
(String) CD-key owner name.
I'm sure I have to be missing something here, it looks like 0x51 to me. Help me out :-\
Quote from: LordNevar on September 15, 2004, 02:46 PM
Quote from: TriCk on September 14, 2004, 10:56 PM
I need help with this packet, it keeps on disconnecting me and i dont know where ive gone wrong=/
m_Key = cdkey
Case &H50 <~~~~~~Looks Like 0x50 to me.
HashCommand = Mid(Data, 38, Len(Data) - 2)
MPQName = Mid(Data, InStr(1, Data, "IX86ver"), Len(Data))
MPQName = Mid(MPQName, 1, 12)
SERVERS = Val("&h" & StrToHex(StrReverse(Mid(Data, 9, 4))))
Dim vHashes As String
vHashes = App.Path & "\WAR3\"
EXEINFO = Space(256)
Result = Z(vHashes & "War3.exe", vHashes & "Storm.dll", vHashes & "Game.dll", HashCommand, version, CHECKSUM, EXEINFO, MPQName)
If Result = Space(256) Then
Form1.Label3.Caption = "Hashes missing!"
Form1.sck1.Close
Exit Sub
End If
Dim CLIENTKEY As Long
Dim lngProdID3 As Long
Dim lngValue3 As Long
Dim strKeyHash As String
Dim dblKey As Long
EXEINFO = KillNull(EXEINFO)
CLIENTKEY = GetTickCount()
Call DecodeHashCDKey(m_Key, CLIENTKEY, SERVERS, _
lngProdID3, lngValue3, strKeyHash)
InsertDWORD CLIENTKEY
InsertDWORD version
InsertDWORD CHECKSUM
InsertDWORD &H1
InsertDWORD &H0
InsertDWORD Len(m_Key)
InsertDWORD lngProdID3
InsertDWORD lngValue3
InsertDWORD &H0
InsertNonNTString strKeyHash
InsertNTString EXEINFO
InsertNTString "WAR3TEST"
SendPacket &H51 <~~~But yet he's sending 0x51
Thanks,
PS: This is the first time i've written WAR3 hash :-X
I might be wrong but I'm pretty sure I'm right. If your sending 0x51 it's usually the right thing to do to build 0x51 , not build 0x50 and try to send 0x51.
"Case &H50" is most likely checking if a recieved packet is 0x50, in which case you would likely respond with 0x51, no?
Case &H50 <~~~Built as 0x50
HashCommand = Mid(Data, 38, Len(Data) - 2)
MPQName = Mid(Data, InStr(1, Data, "IX86ver"), Len(Data))
MPQName = Mid(MPQName, 1, 12)
SERVERS = Val("&h" & StrToHex(StrReverse(Mid(Data, 9, 4))))
Dim vHashes As String
vHashes = App.Path & "\WAR3\"
EXEINFO = Space(256)
Result = Z(vHashes & "War3.exe", vHashes & "Storm.dll", vHashes & "Game.dll", HashCommand, version, CHECKSUM, EXEINFO, MPQName)
If Result = Space(256) Then
Form1.Label3.Caption = "Hashes missing!"
Form1.sck1.Close
Exit Sub
End If
Dim CLIENTKEY As Long
Dim lngProdID3 As Long
Dim lngValue3 As Long
Dim strKeyHash As String
Dim dblKey As Long
EXEINFO = KillNull(EXEINFO)
CLIENTKEY = GetTickCount()
Call DecodeHashCDKey(m_Key, CLIENTKEY, SERVERS, _
lngProdID3, lngValue3, strKeyHash)
InsertDWORD CLIENTKEY
InsertDWORD version
InsertDWORD CHECKSUM
InsertDWORD &H1
InsertDWORD &H0
InsertDWORD Len(m_Key)
InsertDWORD lngProdID3
InsertDWORD lngValue3
InsertDWORD &H0
InsertNonNTString strKeyHash
InsertNTString EXEINFO
InsertNTString "WAR3TEST"
SendPacket &H51 <~~~~Sent as 0x51
I'm pretty sure I'm right but if you build 0x50 your suppose to send 0x50, not build 0x50 when that's wrong in the first place, and than send 0x51.
Stupid comp, screen messed up .
That "Case &H50" is probably from his packet handler which looks to handle SID_AUTH_INFO and create SID_AUTH_CHECK (the next part of the authentication sequence). Probably would be better to create another function to create SID_AUTH_CHECK. The packet he asked us to help him with is SID_AUTH_CHECK.
We were merely pointing out that he was replying wrong.
Quote from: LordNevar on September 15, 2004, 03:00 PM
We were merely pointing out that he was replying wrong.
LordNevar, you're wrong. He's not building 0x50 (SID_AUTH_INFO), but he is parsing it. He is then creating 0x51 (SID_AUTH_CHECK). So 0x50 has nothing to do with helping him.
Quote from: dxoigmn on September 15, 2004, 03:05 PM
Quote from: LordNevar on September 15, 2004, 03:00 PM
We were merely pointing out that he was replying wrong.
LordNevar, you're wrong. He's not building 0x50 (SID_AUTH_INFO), but he is parsing it. He is then creating 0x51 (SID_AUTH_CHECK). So 0x50 has nothing to do with helping him.
I dunno, doesn't "Case &H50" build a whole packet, and then ignore everything after it? ::)
Quote from: Soul Taker on September 15, 2004, 03:20 PM
I dunno, doesn't "Case &H50" build a whole packet, and then ignore everything after it? ::)
What does a Select Case have anything to do with building a packet? Case &H50 is his handler for SID_AUTH_INFO received from the server. So his "response" (not really a response because it is just the next step in authentication) is to send 0x51 (SID_AUTH_INFO). It seems your guys' understand of Visual Basic is soley limited to making bots.
Quote from: dxoigmn on September 15, 2004, 03:32 PM
Quote from: Soul Taker on September 15, 2004, 03:20 PM
I dunno, doesn't "Case &H50" build a whole packet, and then ignore everything after it? ::)
What does a Select Case have anything to do with building a packet? Case &H50 is his handler for SID_AUTH_INFO received from the server. So his "response" (not really a response because it is just the next step in authentication) is to send 0x51 (SID_AUTH_INFO). It seems your guys' understand of Visual Basic is soley limited to making bots.
This is the [size=10]Bot Development Forum[/size]
Quote from: dxoigmn on September 15, 2004, 03:32 PM
Quote from: Soul Taker on September 15, 2004, 03:20 PM
I dunno, doesn't "Case &H50" build a whole packet, and then ignore everything after it? ::)
What does a Select Case have anything to do with building a packet? Case &H50 is his handler for SID_AUTH_INFO received from the server. So his "response" (not really a response because it is just the next step in authentication) is to send 0x51 (SID_AUTH_INFO). It seems your guys' understand of Visual Basic is soley limited to making bots.
Uh, please note I'm the one he was initially arguing with, and I had a rolling-eyes smiley at the end of my very sarcastic post.
Let me put this in english.
If you build 0x50 which would be Case &H50, than you would put all the info your parsed for 0x50 inside that case, and at the end of that case you would send 0x50. Not 0x51, considering you haven't technically built it if you named it 0x50, and besides 0x50 has nothing to do with WC3 hash and cdkey decoding.
Here some visual help if needed compliments of VialChat source.
Case &H50
With pbuffer
.InsertDWORD &H0
.InsertNonNTString "68XI" & varProd
.InsertDWORD getverbyte()
.InsertDWORD &H0
.InsertDWORD &H0
.InsertDWORD &H480
.InsertDWORD &H1033
.InsertDWORD &H1033
.InsertNTString "USA"
.InsertNTString "United States"
.SendPacket &H50
End With
This is what a basic 0x50 looks like, notice it's case is &H50, and at the end he is sending 0x50.
Modified - fix sub to it's case.
Go back to Blizzhackers
Quote from: Soul Taker on September 15, 2004, 03:43 PM
Uh, please note I'm the one he was initially arguing with, and I had a rolling-eyes smiley at the end of my very sarcastic post.
Sorry about that, didn't catch the sarcasm. I did think your post was a little odd but you can never know on this forum and a certain other forum.
Edit:
What's your point BaDDBLooD?
Quote from: LordNevar on September 15, 2004, 04:07 PM
Let me put this in english.
If you build 0x50 which would be Case &H50, than you would put all the info your parsed for 0x50 inside that case, and at the end of that case you would send 0x50. Not 0x51, considering you haven't technically built it if you named it 0x50, and besides 0x50 has nothing to do with WC3 hash and cdkey decoding.
English or not, you're wrong. What you seem to be lacking here is the ability to recognize a control flow statement. In this example, he is checking something to see if 0x50 is
present. No where is he building some sort of packet structure to then send 0x50, merely checking if it exists.
Quote from: dxoigmn on September 15, 2004, 05:34 PM
Quote from: Soul Taker on September 15, 2004, 03:43 PM
Uh, please note I'm the one he was initially arguing with, and I had a rolling-eyes smiley at the end of my very sarcastic post.
Sorry about that, didn't catch the sarcasm. I did think your post was a little odd but you can never know on this forum and a certain other forum.
Hehe, I know, at least someone else backed me up in here!
i meant
Quote
It seems your guys' understand of Visual Basic is soley limited to making bots.
It's obvious you are trying to connect to Battle.net using Warcraft III hash code might I add that was stolen, therefore you will never receive help on this topic unless any of the authors decide to be nice. Unless somebody releases a source, I doubt you will see any examples of how to fix your code.
This is another example of I found this code and can't make it work help me.
If you want to learn the means of the SRP Authentication by all means check out here (http://www.valhallalegends.com/iago/SRP.java) and here (http://www.valhallalegends.com/iago/War3Decode.java)
If you actually apply yourself, you'll realize that it's not really that complicated, just be happy you didn't have to do the reversing like the authors of the code did.
Yes, Mr. CodeMeister. Thank you.
Go back and read my post, to anybody who didn't see it, it got buried.
Or perhaps people should learn that open source projects like these
(Battle.net binary bots, in this case) are stupid, public stuff sucks, ect. They just bring more people to come and bug others for help on some things, ask redundant questions, beg for help on stuff that they have no idea how it works, or exactly what it's doing because it's all stolen (ok, not stolen, taken perhaps, because some person will reply and say it's public, so therefore it's not stolen).
I have a question regarding this entire WAR3 hashing thing. What is public? What can we use (so that we aren't excessively flamed)? If it's not public but it's out there are allowed to use it? If we do take something what amount of credit (or to whom) should be given? I'd like this to come from those that contributed to (open source?) hashing functions for war3 or whatever made this possible. I am really curious to know.
Edit: (You may have gone over this. I am to lazy to search. Post it again if so.)
Quote from: Networks on September 16, 2004, 05:05 PM
I have a question regarding this entire WAR3 hashing thing. What is public? What can we use (so that we aren't excessively flamed)? If it's not public but it's out there are allowed to use it? If we do take something what amount of credit (or to whom) should be given? I'd like this to come from those that contributed to (open source?) hashing functions for war3 or whatever made this possible. I am really curious to know.
Edit: (You may have gone over this. I am to lazy to search. Post it again if so.)
Maddox, Userloser, iago, sneakcharm, Telos, TheMinistered.
All did alot of work to get this to work. It really sucks that TheMinistered left RealVNC open when he went on vacation and got jacked up. To show your respect you should not use the DLL's. However like I said in an earlier post, it would be acceptable to use iago's code open source version of SRP. here (http://www.valhallalegends.com/iago/SRP.java) and here (http://www.valhallalegends.com/iago/War3Decode.java)
Of course, knowing that most people who do BNET programming only program in VB and will never bother to learn to enough to port it over, it's hard to believe anybody will obey this rule. Which is simply why no support is given for this stolen code.
Mr. Master is correct. The only public code at this point is the Java version, which you can find in a sticky post on my thread. If you want to do it in any othe langugae, you're either using BNLS or stolen code.
Quote from: CodeMaster on September 16, 2004, 06:19 PM
Quote from: Networks on September 16, 2004, 05:05 PM
I have a question regarding this entire WAR3 hashing thing. What is public? What can we use (so that we aren't excessively flamed)? If it's not public but it's out there are allowed to use it? If we do take something what amount of credit (or to whom) should be given? I'd like this to come from those that contributed to (open source?) hashing functions for war3 or whatever made this possible. I am really curious to know.
Edit: (You may have gone over this. I am to lazy to search. Post it again if so.)
Maddox, Userloser, iago, sneakcharm, Telos, TheMinistered.
All did alot of work to get this to work. It really sucks that TheMinistered left RealVNC open when he went on vacation and got jacked up. To show your respect you should not use the DLL's. However like I said in an earlier post, it would be acceptable to use iago's code open source version of SRP. here (http://www.valhallalegends.com/iago/SRP.java) and here (http://www.valhallalegends.com/iago/War3Decode.java)
Of course, knowing that most people who do BNET programming only program in VB and will never bother to learn to enough to port it over, it's hard to believe anybody will obey this rule. Which is simply why no support is given for this stolen code.
There is someone who is porting the java code into c++ code, he will remain nameless.
Quote from: BaDDBLooD on September 16, 2004, 11:03 PM
There is someone who is porting the java code into c++ code, he will remain nameless.
Wow, that is totally unheard of, let us reward this unnamed warrior of the night with bells and ribbons and an extra large pepperoni pizza. For this I am sure could not be done by anybody else.
Anyways, what I am trying to say is, good for him. But if he makes API's and writes functions make sure he answers questions himself instead of getting people to come here and bitch.
Quote from: BaDDBLooD on September 16, 2004, 11:03 PM
Quote from: CodeMaster on September 16, 2004, 06:19 PM
Quote from: Networks on September 16, 2004, 05:05 PM
I have a question regarding this entire WAR3 hashing thing. What is public? What can we use (so that we aren't excessively flamed)? If it's not public but it's out there are allowed to use it? If we do take something what amount of credit (or to whom) should be given? I'd like this to come from those that contributed to (open source?) hashing functions for war3 or whatever made this possible. I am really curious to know.
Edit: (You may have gone over this. I am to lazy to search. Post it again if so.)
Maddox, Userloser, iago, sneakcharm, Telos, TheMinistered.
All did alot of work to get this to work. It really sucks that TheMinistered left RealVNC open when he went on vacation and got jacked up. To show your respect you should not use the DLL's. However like I said in an earlier post, it would be acceptable to use iago's code open source version of SRP. here (http://www.valhallalegends.com/iago/SRP.java) and here (http://www.valhallalegends.com/iago/War3Decode.java)
Of course, knowing that most people who do BNET programming only program in VB and will never bother to learn to enough to port it over, it's hard to believe anybody will obey this rule. Which is simply why no support is given for this stolen code.
There is someone who is porting the java code into c++ code, he will remain nameless.
You mean Stealth? Or is there somebody else now?
Stealth knows C++?
Quote from: Networks on September 17, 2004, 11:51 AM
Stealth knows C++?
I began porting it to VB. Slim free time and the lack of a BigInteger class and/or time to duplicate it have prevented me from getting very far.
I've just started an independent study in C++ with my programming teacher from VB-based Intro to Programming and Java-based AP Comp Sci. Even though we had enough people willing to take it, the principal at our school canned our proposal for an "Advanced Programming Concepts" class to be in C++, so in response several students are doing Independent Studies.
It might even just be easier to port it to C++ and spin it off into a DLL, but I'm of course nowhere near that level of C++ skill yet. =)
i'm trying to port the java into c++ but i'm running into trouble with finding the equivalent way to do messagedigest.update. i'm looking into the classes right now. if anyone can help, i'd appreciate it.
Quote from: Laff on September 18, 2004, 12:41 PM
i'm trying to port the java into c++ but i'm running into trouble with finding the equivalent way to do messagedigest.update. i'm looking into the classes right now. if anyone can help, i'd appreciate it.
It's standard SHA-1.
Quote from: Laff on September 18, 2004, 12:41 PM
i'm trying to port the java into c++ but i'm running into trouble with finding the equivalent way to do messagedigest.update. i'm looking into the classes right now. if anyone can help, i'd appreciate it.
Microsoft's crypto api has a sha1 implementation.
You'll probably need to use CryptCreateHash, CryptHashData, CryptDestroyHash, and maybe more.
well right now i dug up the c# version someone posted (was it you k?) and got the objects to load in c++...i just don't know how to use the methods of the class as of yet. haven't done any crypto at all so it's gonna be a fat challenge.