• Welcome to Valhalla Legends Archive.
 

Packet Sniffer

Started by CrAzY, December 16, 2002, 07:41 AM

Previous topic - Next topic

CrAzY

Text= E0
¨qõJ?ðʦÀ¨{²à-÷w õC…PÿÿM¼ÿ
Dec=69  0   0   48  13  168 0   0   113 6   245 74  63  240 202 138 192 168 123 178 23  224 7   45  247 22  25  119 160 245 67  133 80  24  255 255 77  188 0   0   255 28  8   0   0   0   0   0  
Hex=45 00 00 30 0D A8 00 00 71 06 F5 4A 3F F0 CA 8A
C0 A8 7B B2 17 E0 07 2D F7 16 19 77 A0 F5 43 85
50 18 FF FF 4D BC 00 00 FF 1C 08 00 00 00 00 00


Ne one under stand it? :) i need help with packets
CrAzY

Noodlez

#1
um, whats that a log of?

Yoni

#2
Of all the data you posted, the only thing that matters is the
FF 1C 08 00 00 00 00 00at the end

iago

#3
That looks like a really crappy packetsniffer.  I'd suggest getting something better, like Ethereal.  It'll tell you what the useful part is: "Data (8 bytes)"
This'll make an interesting test for broken AV:
QuoteX5O!P%@AP[4\PZX54(P^)7CC)7}$EICAR-STANDARD-ANTIVIRUS-TEST-FILE!$H+H*


Grok

Oh speaking of packet data .. I wrote a VB function some people might find useful ... I know I do .. use it in everything where I'm trying to figure out packets:

Public Function DebugOutput(ByVal sIn As String) As String
    Dim x1 As Long, y1 As Long
    Dim iLen As Long, iPos As Long
    Dim sB As String, sT As String
    Dim sOut As String
    
    'build random string to display
    'y1 = 384
    'sIn = String(y1, 0)
    'For x1 = 1 To y1
    '    Mid(sIn, x1, 1) = Chr(255 * Rnd())
    'Next x1
    
    iLen = Len(sIn)
    If iLen = 0 Then Exit Function
    sOut = ""
    For x1 = 0 To ((iLen - 1) \ 16)
        sB = String(48, " ")
        sT = "................"
        For y1 = 1 To 16
            iPos = 16 * x1 + y1
            If iPos > iLen Then Exit For
            Mid(sB, 3 * (y1 - 1) + 1, 2) = Right("00" & Hex(Asc(Mid(sIn, iPos, 1))), 2) & " "
            Select Case Asc(Mid(sIn, iPos, 1))
            Case 32 To 255
                Mid(sT, y1, 1) = Mid(sIn, iPos, 1)
            End Select
        Next y1
        If Len(sOut) > 0 Then sOut = sOut & vbCrLf
        sOut = sOut & sB & "  " & sT
    Next x1
    DebugOutput = sOut
End Function

'Usage:
    sPacketData = "poefijqpgrj qgpjqp-23r8vu"
    Text1.Text = DebugOutput(sPacketData)

Output:
   70 6F 65 66 69 6A 71 70 67 72 6A 20 71 67 70 6A   poefijqpgrj qgpj
   71 70 2D 32 33 72 38 76 75                        qp-23r8vu.......

Hope that helps.
Grok

Noodlez

#5
wow, that's gonna be very useful for debugging! i've been meaning to make something format like that :P

thanks

Grok

#6
I know, what can I say?

Maybe one of you leeches will put my name on your bot credits.  50+ bots out there and zero references to yours truly!

Ideally, when your bots join any channel, they'd say:

"I'm a BlahBlahBot and some of my code was donated by [vL]Grok (he's the greatest)."

Hope this helps.
Grok

Noodlez

#7
lol. i have your name in credits because i use your AddChat function :P

iago

#8
I hate you Grok!

I just spent an hour of my good time writing the EXACT function in c++!  The only difference is it takes two parameters, a packet class and a filename.

Would have made life easier if I got to rip you off, though! ;-)

I'll put you in my credits, even though I don't think you did anything, but eh?
This'll make an interesting test for broken AV:
QuoteX5O!P%@AP[4\PZX54(P^)7CC)7}$EICAR-STANDARD-ANTIVIRUS-TEST-FILE!$H+H*


Zakath

Grok, gogogo contribute something to my bot so I can credit you for it! ;D

As it is, I credit Spht, Sky, Yoni, Kp, Zonker, c0ol, Zorm, Noodlez, and Moonshine (although not all for the same thing :P).

Since many of them have not seen my bot except perhaps in screenshots, I thought I'd let them know that I appreciate their help. :)
Quote from: iago on February 02, 2005, 03:07 PM
Yes, you can't have everybody...contributing to the main source repository.  That would be stupid and create chaos.

Opensource projects...would be dumb.

Grok

#10
That list looks familiar ... oh yes, I taught all those people everything they know about anything to do with computers, except for Kp, who has only two keys on his keyboard, 0 and 1, so he writes everything in binary.

<smirk/>

Grok

n00blar

Grok, I don't think you should go as far as making that type of statement-- It's called www.google.com and www.msdn.microsoft.com - thats how I learned =P but if they did really learn *everything* from you then please excuse me =p

Arta

#12
You should credit me too because... hmm... well.. hmm..

I looked at your screenshots :P

Zakath

#13
*smacks himself in the head*

You did provide some real help, too!

I can't believe I forgot about you, Arta. I'm sorry.  :-[
Quote from: iago on February 02, 2005, 03:07 PM
Yes, you can't have everybody...contributing to the main source repository.  That would be stupid and create chaos.

Opensource projects...would be dumb.

Skywing

#14
QuoteGrok, I don't think you should go as far as making that type of statement-- It's called www.google.com and www.msdn.microsoft.com - thats how I learned =P but if they did really learn *everything* from you then please excuse me =p
Hint: Sarcasm.