Tải bản đầy đủ (.pptx) (15 trang)

Mạng botnet nền tảng

Bạn đang xem bản rút gọn của tài liệu. Xem và tải ngay bản đầy đủ của tài liệu tại đây (907.61 KB, 15 trang )

Mạng Botnet Nền tảng
Nội dung trình bày
1. Botnet là gì?
2. Mạng Botnet được tạo nên bởi gì?
3. Các con bot liên lạc với hacker bằng gì?
4. Các con bot đã dùng các server IRC như thế nào?
5. Cài bot vào máy Normal User như thế nào?
6. Cách tạo một con “Bot”
7. Điều khiển bot thế nào?
1. Botnet là gì?

        ộ ạ ồ ừ ớ ệ ị ề
 ể

     ậ ữ ườ ọ ứ

      ! "#  ị ề ể ể ộ ệ ụ ủ
  !$% !ề ể ả
2. Mạng Botnet được tạo nên bởi gì?

&   &  "    'ề ả ủ ộ ươ ượ ế ế ể
 ! (ạ ớ

&  !    )   "ậ ệ ự ệ ệ ủ ườ ọ ươ
*"Bot"*!   (*ế ắ ừ
3. Các con bot liên lạc với hacker bằng gì?

+   ,'  '-      ể ừ ữ ả ầ ượ ế ế ể ậ ệ
 ./01!

 /0 $   $ ! ủ ộ ạ ủ ạ ị ụ


       23 ộ ườ ủ ủ ộ ọ ể
      (*ậ ượ ệ ừ ộ ấ
4. Các con bot đã dùng các server IRC như thế nào?

  $ ! /0  ',4445 ủ ạ ị ụ ườ ắ ộ
,(6 "/01!1 $   ,   ươ ử ụ ộ ậ ỉ ị ọ
 /0/0$1*ệ

  !      . ự ệ ệ ạ ộ ế ố ứ
78/7 ,4445  /0 1#$ , /0 ế ủ ủ ồ ậ ệ ể
 !   (*ử ậ ắ ớ
5. Cài bot vào máy Normal User như thế nào?

 #    9!1   , ề ầ ủ ủ ộ ự ế ợ ầ
  !1(ễ ừ

 #   .     ề ể ự ỗ ổ ủ ệ ề
! .    : $" :(ế ề ề ể ủ ườ ườ

& 1    ,'# ộ ố ượ ợ ầ
 1     !1$ ,   ượ ự ộ ố ủ ộ ạ ổ ế ủ
 *ệ
6. Cách tạo một con “Bot”
• 6.1. Điều đầu tiên mà bạn phải học là tập lệnh IRC
• 6.2. Một số Sub chính cho bot
6.1. Điều đầu tiên mà bạn phải học là tập lệnh IRC
T p l nh IRC s có s khác bi t đôi chút khi nó ch y trên các ch ng trình qu n lý ậ ệ ẽ ự ệ ạ ươ ả
IRC server khác nhau

;<=0>0&?   ,' #!/0ệ ế ậ ậ

1!

&/+>&&?   ,ệ ế ậ

@A/&>?  ,! :':)ệ ậ ộ
    ! ươ ự ư ộ ậ

70/6B<C>?%>B11?    ệ ử ắ ớ
6.2. Một số Sub chính cho bot
1. Khai báo hằng và biến
2. Bạn tạo môt Form mới và kéo thả vào đó thành phần WinSock đặt thuộc
tính name là ws
3. Sub thực hiện việc gời command sau khi kết nối hoàn thành
4. Sub đáp trả khi bot nhận được lệnh
1- Khai báo hằng và biến
Const Server As String = "irc.datviet.net" 'tên channel
Const Port As Integer = 23 'port
Const Channel As String = "NoHat" 'Kênh mà bot sẽ chui vào
Dim Nick As String 'Nick của bot
2- Bạn tạo môt Form mới và kéo thả vào đó thành
phần WinSock đặt thuộc tính name là ws
Private Sub Form_Load()
ws.Connect Server, Port 'Tạo một kết nối tới server IRC
Nick = "Tester" & LTrim(RTrim(Str(Int(Rnd * 100))))
End Sub
3- Sub thực hiện việc gời command sau khi
kết nối hoàn thành
Private Sub ws_Connect()
Dim UserName, RealName As String
UserName = Nick

RealName = Nick
ws.SendData "USER " & UserName & " 0 * " & RealName & vbCrLf
ws.SendData "NICK " & Nick & vbCrLf
ws.SendData "JOIN " & Channel & vbCrLf
ws.SendData "PRIVMSG " & Channel & ":" & " Bot chao master" & vbCrLf
End Sub
4- Sub đáp trả khi bot nhận được lệnh
Private Sub ws_DataArrival(ByVal bytesTotal As Long)
Dim strData As String
Dim Pos As Integer
Dim Master As String
ws.GetData strData
DoEvents
If InStr(strData, "liveornot") <> 0 Then
Pos = InStr(1, strData, "!")
Master = Mid(strData, 2, Pos - 2)
ws.SendData Replace(strData, "liveornot", "Live") & vbCrLf
ws.SendData "PRIVMSG " & Master & " " & Replace(strData, "liveornot", "Live") & vbCrLf
End If
EndSub
7. Điều khiển bot thế nào?
D    -  ' !$ ể ề ể ạ ạ ử ể ụ
<#   "/0#!$ /0ậ ộ ươ ụ
0   !1!($!(! ,EF ,4445   1ồ ế ố ớ ẽ ư ể
, /01! 6 & $,EFGH!  Iầ ủ ệ ạ ớ ộ
J %ệ 8@A/&&K, #$ :8:!"/0(((( ,   /01!   ả ấ ắ ả ế ứ ắ ế
 -# !   ạ ặ ớ ủ ạ
1#-J %ệ L!A&I!   # 1ế ế ặ
1     %ẽ ả ờ ạ ằ L!

Tài liệu bạn tìm kiếm đã sẵn sàng tải về

Tải bản đầy đủ ngay
×