lockdown-IX86-XX.mpq update?

Ersan · November 24, 2006, 12:17 PM

I know.

replaced · November 26, 2006, 12:31 AM

Public Function CHECKREV()

Dim vData As String
Dim ex2Buf As String
Dim ft As String
Dim mp As String
Dim cf As String
Dim Result As Long
Dim DATAlen As Integer
Dim bne As New BNLSEngine

Dim dataTEMP As String

dataTEMP = Data

DATAlen = Len(dataTEMP)
DATAlen = DATAlen - 20
dataTEMP = Mid$(dataTEMP, 20, DATAlen)
dataTEMP = dataTEMP & Chr$(0)

    Result = bne.BNLS_VERSIONCHECKEX2("RATS", dataTEMP, BNLSchckver)
    If Result <> 1 Then
        'Failed
        'possible error codes.
    End If

    BNLSchckver = Mid$(BNLSchckver, 12, 20)
    Set bne = Nothing



Send0x51 Index

end function

some1 help me, heres packet log

7 x.x.x.x:6112 192.168.0.100:26007 62 Recv
0000 FF 50 3E 00 00 00 00 00 BF 4D 70 8C 0F 5C 56 00 .P>......Mp..\V.
0010 00 6E BC DE 72 FC C6 01 6C 6F 63 6B 64 6F 77 6E .n..r...lockdown
0020 2D 49 58 38 36 2D 31 35 2E 6D 70 71 00 D1 C2 A1 -IX86-15.mpq....
0030 6C 61 E3 FE 48 35 FA 41 0E A3 56 1E D3 00 la..H5.A..V...

8 192.168.0.100:26008 63.161.183.205:9367 58 Send
0000 3A 00 1A 01 00 00 00 00 00 00 00 00 00 00 00 DE :...............
0010 72 FC C6 01 6C 6F 63 6B 64 6F 77 6E 2D 49 58 38 r...lockdown-IX8
0020 36 2D 31 35 2E 6D 70 71 00 D1 C2 A1 6C 61 E3 FE 6-15.mpq....la..
0030 48 35 FA 41 0E A3 56 1E D3 00 H5.A..V...

9 63.161.183.205:9367 192.168.0.100:26008 40 Recv
0000 28 00 1A 01 00 00 00 01 00 0E 01 D5 C7 0C 39 35 (.............95
0010 7E 6B 08 48 17 DB 1E 0A AD D0 17 B8 38 3F E6 00 ~k.H........8?..
0020 00 00 00 00 CF 00 00 00 ........

11 192.168.0.100:26004 x.x.x.x:6112 58 Send
0000 FF 51 3A 00 01 00 00 00 00 00 00 00 0D 00 00 00 .Q:.............
0010 02 00 00 00 E1 30 1F 00 00 00 00 00 C7 C4 A3 9C .....0..........
0020 EE 47 D3 F7 93 F2 35 8A BC 1A C6 24 01 24 66 7B .G....5....$.$f{
0030 00 66 47 57 66 4F 47 61 4C 00 .NAMEY.

it don't work no matter what i do, help me pls.

SECOND PACKET LOG WITH MODIFIED PROG

12 xxxx:6112 192.168.0.100:27335 70 Recv
0000 FF 25 08 00 D6 8F 01 67 FF 50 3E 00 00 00 00 00 .%.....g.P>.....
0010 F9 D2 38 FA 9E 6A 24 00 00 EA E4 C6 72 FC C6 01 ..8..j$.....r...
0020 6C 6F 63 6B 64 6F 77 6E 2D 49 58 38 36 2D 30 35 lockdown-IX86-05
0030 2E 6D 70 71 00 84 9C 44 C9 46 64 2E DE FD 0B DF .mpq...D.Fd.....
0040 5C BC AD 5F D0 00 \.._..

13 192.168.0.100:27339 63.161.183.205:9367 58 Send
0000 3A 00 1A 01 00 00 00 00 00 00 00 00 00 00 00 C6 :...............
0010 72 FC C6 01 6C 6F 63 6B 64 6F 77 6E 2D 49 58 38 r...lockdown-IX8
0020 36 2D 30 35 2E 6D 70 71 00 84 9C 44 C9 46 64 2E 6-05.mpq...D.Fd.
0030 DE FD 0B DF 5C BC AD 5F D0 00 ....\.._..

14 63.161.183.205:9367 192.168.0.100:27339 40 Recv
0000 28 00 1A 01 00 00 00 01 00 0E 01 7C E0 43 D3 51 (..........|.C.Q
0010 CB 5D 98 A9 17 0D A9 D5 71 B3 7C FA 47 E8 69 00 .]......q.|.G.i.
0020 00 00 00 00 CF 00 00 00 ........

16 192.168.0.100:27335 xxx:6112 74 Send
0000 FF 25 08 00 00 00 00 00 FF 51 42 00 D2 02 96 49 .%.......QB....I
0010 00 00 00 00 01 00 00 00 00 00 00 00 0D 00 00 00 ................
0020 02 00 00 00 F1 30 1F 00 00 00 00 00 DD C0 FA 80 .....0..........
0030 B1 4C 0E 5A 1B D8 35 33 61 7D 9D 05 94 59 F8 8A .L.Z..53a}...Y..
0040 00 6D 6F 72 7A 76 41 44 76 00 .NAMEY.

l2k-Shadow · November 26, 2006, 12:39 AM

your 0x51 is wrong.

Hdx · November 26, 2006, 12:40 AM

Quote from: replaced on November 26, 2006, 12:31 AM
some1 help me, heres packet log

7 x.x.x.x:6112 192.168.0.100:26007 62 Recv
0000 FF 50 3E 00 00 00 00 00 BF 4D 70 8C 0F 5C 56 00 .P>......Mp..\V.
0010 00 6E BC DE 72 FC C6 01 6C 6F 63 6B 64 6F 77 6E .n..r...lockdown
0020 2D 49 58 38 36 2D 31 35 2E 6D 70 71 00 D1 C2 A1 -IX86-15.mpq....
0030 6C 61 E3 FE 48 35 FA 41 0E A3 56 1E D3 00 la..H5.A..V...

8 192.168.0.100:26008 63.161.183.205:9367 58 Send
0000 3A 00 1A 01 00 00 00 00 00 00 00 00 00 00 00 DE :...............
0010 72 FC C6 01 6C 6F 63 6B 64 6F 77 6E 2D 49 58 38 r...lockdown-IX8
0020 36 2D 31 35 2E 6D 70 71 00 D1 C2 A1 6C 61 E3 FE 6-15.mpq....la..
0030 48 35 FA 41 0E A3 56 1E D3 00 H5.A..V...

9 63.161.183.205:9367 192.168.0.100:26008 40 Recv
0000 28 00 1A 01 00 00 00 01 00 0E 01 D5 C7 0C 39 35 (.............95
0010 7E 6B 08 48 17 DB 1E 0A AD D0 17 B8 38 3F E6 00 ~k.H........8?..
0020 00 00 00 00 CF 00 00 00 ........

11 192.168.0.100:26004 x.x.x.x:6112 58 Send
0000 FF 51 3A 00 01 00 00 00 00 00 00 00 0D 00 00 00 .Q:.............
0010 02 00 00 00 E1 30 1F 00 00 00 00 00 C7 C4 A3 9C .....0..........
0020 EE 47 D3 F7 93 F2 35 8A BC 1A C6 24 01 24 66 7B .G....5....$.$f{
0030 00 66 47 57 66 4F 47 61 4C 00 .NAMEY.

it don't work no matter what i do, help me pls.

Why are you only sending 5 bytes?
~-~(HDX)~-~

replaced · November 26, 2006, 12:42 AM

what do you mean im only sending 5 bytes? Why doesn't the bnet docs say how many bytes to send to avoid this confusion?

I think the problem is because my version is blank, where do you get the version from?

h/o i seen what u put in bold let me show u why im sending 5 bytes

here

dataTEMP = Data

DATAlen = Len(dataTEMP)
DATAlen = DATAlen - 20
dataTEMP = Mid$(dataTEMP, 20, DATAlen)
dataTEMP = dataTEMP & Chr$(0)

Hdx · November 26, 2006, 12:45 AM

ULONGULONGs are the same things as filetimes, 8 bytes.
You're only sending 5.....
poke
~-~(HDX)~-~
[Edit]Use this
~-~(HDX)~-~

replaced · November 26, 2006, 12:48 AM

I don't understand? how would i use it?

where would version and the exehash be in this?

0000 28 00 1A 01 00 00 00 01 00 0E 01 AF FC 0C 38 A8 (.............8.
0010 6A 3C D6 C6 51 68 93 39 80 0C BB 42 3D 7D 76 00 j<..Qh.9...B=}v.
0020 00 00 00 00 CF 00 00 00 ........

Hdx · November 26, 2006, 12:56 AM

Code Select

Dim pdBuff as new clsBuff
  Dim Success as long, Version as long, Checksum as long, Statstring as String, Cookie as long, VerByte as long
  with pdBuff
    .All        = InPacket0x1AData
    .Pop 3      'Remove BNLS Header
    Success     = .DWORD
    If Not Success Then Exit Sub
    Version     = .DWORD
    Checksum    = .DWORD
    Statstring  = .ntString
    Cookie      = .DWORD
    VerByte     = .DWORD
  End With

Simple, and much cleaner.
~-~(HDX)~-~

l)ragon · November 26, 2006, 01:45 AM

Quote from: replaced on November 26, 2006, 12:31 AM
Code Select Expand
Public Function CHECKREV() Dim vData As String Dim ex2Buf As String Dim ft As String Dim mp As String Dim cf As String Dim Result As Long Dim DATAlen As Integer Dim bne As New BNLSEngine Dim dataTEMP As String dataTEMP = Data DATAlen = Len(dataTEMP) DATAlen = DATAlen - 20 dataTEMP = Mid$(dataTEMP, 20, DATAlen) dataTEMP = dataTEMP & Chr$(0) Result = bne.BNLS_VERSIONCHECKEX2("RATS", dataTEMP, BNLSchckver) If Result <> 1 Then 'Failed 'possible error codes. End If BNLSchckver = Mid$(BNLSchckver, 12, 20) Set bne = Nothing Send0x51 Index end function

some1 help me, heres packet log

7 x.x.x.x:6112 192.168.0.100:26007 62 Recv
0000 FF 50 3E 00 00 00 00 00 BF 4D 70 8C 0F 5C 56 00 .P>......Mp..\V.
0010 00 6E BC DE 72 FC C6 01 6C 6F 63 6B 64 6F 77 6E .n..r...lockdown
0020 2D 49 58 38 36 2D 31 35 2E 6D 70 71 00 D1 C2 A1 -IX86-15.mpq....
0030 6C 61 E3 FE 48 35 FA 41 0E A3 56 1E D3 00 la..H5.A..V...

8 192.168.0.100:26008 63.161.183.205:9367 58 Send
0000 3A 00 1A 01 00 00 00 00 00 00 00 00 00 00 00 DE :...............
0010 72 FC C6 01 6C 6F 63 6B 64 6F 77 6E 2D 49 58 38 r...lockdown-IX8
0020 36 2D 31 35 2E 6D 70 71 00 D1 C2 A1 6C 61 E3 FE 6-15.mpq....la..
0030 48 35 FA 41 0E A3 56 1E D3 00 H5.A..V...

9 63.161.183.205:9367 192.168.0.100:26008 40 Recv
0000 28 00 1A 01 00 00 00 01 00 0E 01 D5 C7 0C 39 35 (.............95
0010 7E 6B 08 48 17 DB 1E 0A AD D0 17 B8 38 3F E6 00 ~k.H........8?..
0020 00 00 00 00 CF 00 00 00 ........

11 192.168.0.100:26004 x.x.x.x:6112 58 Send
0000 FF 51 3A 00 01 00 00 00 00 00 00 00 0D 00 00 00 .Q:.............
0010 02 00 00 00 E1 30 1F 00 00 00 00 00 C7 C4 A3 9C .....0..........
0020 EE 47 D3 F7 93 F2 35 8A BC 1A C6 24 01 24 66 7B .G....5....$.$f{
0030 00 66 47 57 66 4F 47 61 4C 00 .NAMEY.

it don't work no matter what i do, help me pls.

SECOND PACKET LOG WITH MODIFIED PROG

12 xxxx:6112 192.168.0.100:27335 70 Recv
0000 FF 25 08 00 D6 8F 01 67 FF 50 3E 00 00 00 00 00 .%.....g.P>.....
0010 F9 D2 38 FA 9E 6A 24 00 00 EA E4 C6 72 FC C6 01 ..8..j$.....r...
0020 6C 6F 63 6B 64 6F 77 6E 2D 49 58 38 36 2D 30 35 lockdown-IX86-05
0030 2E 6D 70 71 00 84 9C 44 C9 46 64 2E DE FD 0B DF .mpq...D.Fd.....
0040 5C BC AD 5F D0 00 \.._..

13 192.168.0.100:27339 63.161.183.205:9367 58 Send
0000 3A 00 1A 01 00 00 00 00 00 00 00 00 00 00 00 C6 :...............
0010 72 FC C6 01 6C 6F 63 6B 64 6F 77 6E 2D 49 58 38 r...lockdown-IX8
0020 36 2D 30 35 2E 6D 70 71 00 84 9C 44 C9 46 64 2E 6-05.mpq...D.Fd.
0030 DE FD 0B DF 5C BC AD 5F D0 00 ....\.._..

14 63.161.183.205:9367 192.168.0.100:27339 40 Recv
0000 28 00 1A 01 00 00 00 01 00 0E 01 7C E0 43 D3 51 (..........|.C.Q
0010 CB 5D 98 A9 17 0D A9 D5 71 B3 7C FA 47 E8 69 00 .]......q.|.G.i.
0020 00 00 00 00 CF 00 00 00 ........

16 192.168.0.100:27335 xxx:6112 74 Send
0000 FF 25 08 00 00 00 00 00 FF 51 42 00 D2 02 96 49 .%.......QB....I
0010 00 00 00 00 01 00 00 00 00 00 00 00 0D 00 00 00 ................
0020 02 00 00 00 F1 30 1F 00 00 00 00 00 DD C0 FA 80 .....0..........
0030 B1 4C 0E 5A 1B D8 35 33 61 7D 9D 05 94 59 F8 8A .L.Z..53a}...Y..
0040 00 6D 6F 72 7A 76 41 44 76 00 .NAMEY.

Code Select

                                    vData = dllFileTime & mpqName & Chr(0) & HashCommand & Chr(0)
                                    cvResult = bne.BNLS_VERSIONCHECKEX2("RATS", dataTEMP, BNLSchckver)
                                    If cvResult = 1 Then
                                        BNLSchckver = MID(BNLSchckver, 8)
                                        ExeInfo = Right(vOut, Len(BNLSchckver) - 8)
                                        VersionAndChecksumCombined = Left(BNLSchckver, 8)
                                    Else
                                        'failed
                                    End If

Here, I still need to fix that function a little seeing as I forgot to chop the header values recieved from BNLS.

Joe[x86] · November 26, 2006, 04:48 AM

Quote from: warz on November 24, 2006, 01:03 AM
bnls needs a logon delay. something like 3 logins in one or two minutes results in a period of 10 minutes in which you cannot use bnls' authentication messages.

And then when a legit user loads up four bots..

I've actually loaded up that many bots for some legit reason, but I can't remember what it was. I think it was Clan DKe, Op [vL], Op x86.. and something else. But yeah, you can have more than three legit connections.

Yegg · November 26, 2006, 09:35 AM

Quote from: l2k-Shadow on November 24, 2006, 10:53 AM
Quote from: replaced on November 24, 2006, 02:04 AM
I think many of you over exaggerate on the effect bots have had on channels BEFORE lockdown was even implemented, just look at the past year and barely anyones been loading. Most likely someone winbotting / trying to get originals.

yeah and you're talking out of your ass. My channel has been loaded about 3-4 days per week before lockdown and I actually have the loader that uses BNLS and someone loaded our channel with it yesterday. I would also like to point out that this loader is really crappy and makes a new connection to BNLS per bot instead of just sending it CheckRevision requests from one connection. But yeah I definitely think there should be a limit of requests per IP or an auth system.

If Skywing wants to do anything, it's of course his decision what should be done, but I don't think we need any kind of limit of requests per IP used. If someone decides to use a mass loading bot or some flooding bot that uses BNLS, they can easily use different proxies for each account causing a limit per IP to become useless. I think an auth system would be a nice idea.

MysT_DooM · November 26, 2006, 12:50 PM

Quote from: replaced on November 26, 2006, 12:48 AM
I don't understand? how would i use it?

where would version and the exehash be in this?

0000 28 00 1A 01 00 00 00 01 00 0E 01 AF FC 0C 38 A8 (.............8.
0010 6A 3C D6 C6 51 68 93 39 80 0C BB 42 3D 7D 76 00 j<..Qh.9...B=}v.
0020 00 00 00 00 CF 00 00 00 ........

Red = Exe Version
Pink = Exe Hash

edit: Make sure ur carrying over the things u declare so it gets picked up where it needs to be picked up at, otherwise it will be blank

replaced · November 26, 2006, 02:20 PM

now im no longer getting ipbanned from bnet lols. However I keep on getting the invalid game version error, i guess ill check to see whats wrong now

edit: i've noticed that my EXEversion is always the same value of 17694721 in long.

6 x.x.x.x:6112 192.168.0.100:30477 62 Recv
0000 FF 50 3E 00 00 00 00 00 36 74 97 41 EC 0A 4D 00 .P>.....6t.A..M.
0010 00 44 47 C9 72 FC C6 01 6C 6F 63 6B 64 6F 77 6E .DG.r...lockdown
0020 2D 49 58 38 36 2D 30 36 2E 6D 70 71 00 F3 DB BD -IX86-06.mpq....
0030 C0 54 0C 88 44 CD C8 DA 49 9E 30 75 D5 00 .T..D...I.0u..

7 192.168.0.100:30576 63.161.183.205:9367 61 Send
0000 3D 00 1A 01 00 00 00 00 00 00 00 00 00 00 00 00 =...............
0010 44 47 C9 72 FC C6 01 6C 6F 63 6B 64 6F 77 6E 2D DG.r...lockdown-
0020 49 58 38 36 2D 30 36 2E 6D 70 71 00 F3 DB BD C0 IX86-06.mpq.....
0030 54 0C 88 44 CD C8 DA 49 9E 30 75 D5 00 T..D...I.0u..

8 63.161.183.205:9367 192.168.0.100:30576 40 Recv
0000 28 00 1A 01 00 00 00 01 00 0E 01 AC A3 45 D9 D9 (............E..
0010 42 25 09 96 E4 EA 6D F8 50 DF 58 51 A3 F6 56 00 B%....m.P.XQ..V.
0020 00 00 00 00 CF 00 00 00 ........

9 192.168.0.100:30477 x.x.x.x:6112 70 Send
0000 FF 51 46 00 D2 02 96 49 01 00 0E 01 AC A3 45 D9 .QF....I......E.
0010 01 00 00 00 00 00 00 00 0D 00 00 00 02 00 00 00 ................
0020 E1 30 1F 00 00 00 00 00 C7 04 2B EB B9 1F BD 9F .0........+.....
0030 11 A3 C0 B6 B8 C8 D7 2D C2 F8 52 1F 00 7A 79 43 .......-..R..zyC
0040 75 20 71 5A 75 00 u qZu.

10 x.x.x.x:6112 192.168.0.100:30477 9 Recv
0000 FF 51 09 00 01 01 00 00 00 .Q.......

Ersan · November 26, 2006, 02:41 PM

EXEVersion will be the same value until the game executable is modified.

replaced · November 26, 2006, 03:56 PM

any idea on why its giving me the invalid game ver?