[VB6 sadly] ASSUMING BNLS_CDKEY_EX

[Mystical]

I tried everyway possible not to post here due to the amount of flaming im going to recieve for using vb6, well my comp crashed lost my c++ source & old vb6 source, vb6 is easyiest to make a simple crappy bot for my personal needs =)

anyway my problem here is that i can login starcraft and/or broodwar & warcraft II just fine. I also can login d2xP just fine. but if i try to login regular d2, i get bad responce of failed to decode d2XP cdkey, same if i try to login to W3 regular, if i try to login w3 Expansion then it successfully decodes but then haults. =(

Code Select Expand


'////////////////////////////////////////////////////////////////////////////////////
'BUILDING BNLS_CDKEY_EX 0x0C (CLIENT => SERVER)

'(DWORD)      Cookie.
'(BYTE)       Number of CD-keys to encrypt.
'(DWORD)      Flags.
'(DWORD[])    Server session key(s), depending on flags.
'(DWORD[])    Client session key(s), depending on flags.
'(STRING[])   CD-keys. No dashes or spaces.

      With clsPacket
         .InsertDWORD &H0                          'Cookie
         .InsertByte IIf(C.UseExpansion, &H2, &H1) '( &H1 == Original Key Only // &H2 == Original + Expansion Keys )
         .InsertDWORD &H1                          'Same session key flag
            ServerSession = P.GetDWORD()           'ServerKey
         .InsertDWORD ServerSession                'ServerKey (ie: 1678751217 )
         .InsertNTString UCase(C.CDKey$)           'Original key
                         
          If C.UseExpansion Then
            .InsertNTString UCase(C.XPCDKey$)      'Expansion key
          End If
                       
          AddChat vbYellow, Bot_Status(sMessage, True, "Sending BNLS_CDKEY_EX")
          .Send sckBNLS, BNLS_CDKEY_EX, pBNLS
      End With
'/////////////////////////////////////////////////////////////////////////////////////

CLIENT > SERVER *COUGH* FREE CDKEY! =)
0030   ff f4 52 84 00 00 07 00 0d 02 00 00 00 2b 00 0c  ..R..........+..
0040   00 00 00 00 01 01 00 00 00 3c 20 80 61 4a 42 37  .........< .aJB7
0050   56 52 57 47 58 59 43 48 44 4d 43 46 56 56 54 32  VRWGXYCHDMCFVVT2
0060   32 36 36 56 32 32 43 00                          266V22C.




"C.varible" would just be my configuration class, & im using shadypalm88's bncutil.dll packetbuffer.

[Barabajagal]

You left out your client session DWord...

[Mystical]

http://ersan.us/src/bnetdocs/contentc0ef.html?Section=m&Code=173

doesn't seem to be it eaither, its odd though i can connect d2xp just  fine but not d2 regular or warcraft III regular. starcraft / warcraft II work just fine as well. =|

and when i do connect d2 regular or war3 regular i get bad responce failed to decode expansion cdkey.

[Ringo]

and when i do connect d2 regular or war3 regular i get bad responce failed to decode expansion cdkey.

Why would you decode/use the exp cdkey when you are connecting with classic?

[Mystical]

and when i do connect d2 regular or war3 regular i get bad responce failed to decode expansion cdkey.

Why would you decode/use the exp cdkey when you are connecting with classic?

connecting with classic what? bit confused.

[powered by nissan]

yes plz

[Hdx]

When people say classic they mean original, non-expansion.
Your packet looks fine...
Mind posting a full log? i'm interested in what BNLS server you're connecting to, and the S->C 0x0C
~Hdx

[Mystical]

at the moment im connecting to yours(jbls.org) because of war3, so if you find a lil "demonic" that'd be me. i'll post a full log in a bit, im still trying to sort out my old one got mixed with all my other bots probley just record a new one.

[Hdx]

I had that sinking feeling.
I'll take a look at JBLS and see if it does as it should. I'm sure it does. But, to humor me, try connecting as d2 classic, on BNLS. see if it works.
~Hdx

[Mystical]

done. d2 classic got failed reponce of couldn't decode d2 expansion cdkey.

[Hdx]

No worries people, it's jsut bad result handeling on his end.
he failed to account for him only sending one cd in the return flags.
~Hdx