mirror-ac/driver/callbacks.c

#include "callbacks.h"

#include "driver.h"

#include "queue.h"
#include "pool.h"
#include "thread.h"

/*
* Interlocked intrinsics are only atomic with respect to other InterlockedXxx functions,
* so all reads and writes to the THREAD_LIST->active flag must be with Interlocked instrinsics.
*/

typedef struct _THREAD_LIST
{
	SINGLE_LIST_ENTRY start;
	volatile BOOLEAN active;
	KSPIN_LOCK lock;

}THREAD_LIST, * PTHREAD_LIST;

typedef struct _THREAD_LIST_ENTRY
{
	SINGLE_LIST_ENTRY list;
	PKTHREAD thread;

}THREAD_LIST_ENTRY, *PTHREAD_LIST_ENTRY;

/* todo: maybe put this in the global config? hmm.. I kinda like how its encapsulated here tho hm.. */
PTHREAD_LIST thread_list = NULL;

STATIC 
BOOLEAN 
EnumHandleCallback(
	_In_ PHANDLE_TABLE HandleTable, 
	_In_ PHANDLE_TABLE_ENTRY Entry,
	_In_ HANDLE Handle, 
	_In_ PVOID Context);

#ifdef ALLOC_PRAGMA
#pragma alloc_text(PAGE, ObPostOpCallbackRoutine)
#pragma alloc_text(PAGE, ObPreOpCallbackRoutine)
#pragma alloc_text(PAGE, EnumHandleCallback)
#pragma alloc_text(PAGE, EnumerateProcessHandles)
#pragma alloc_text(PAGE, EnumerateProcessListWithCallbackFunction)
#pragma alloc_text(PAGE, InitialiseThreadList)
#endif

VOID
CleanupThreadListOnDriverUnload()
{
	InterlockedExchange(&thread_list->active, FALSE);
	PsRemoveCreateThreadNotifyRoutine(ThreadCreateNotifyRoutine);

	for (;;)
	{
		if (!ListFreeFirstEntry(&thread_list->start, &thread_list->lock))
		{
			ExFreePoolWithTag(thread_list, POOL_TAG_THREAD_LIST);
			return;
		}
	}
}

/*
* Safely enumerate the threads list.
*/
VOID
EnumerateThreadListWithCallbackRoutine(
	_In_ PVOID CallbackRoutine,
	_In_opt_ PVOID Context
)
{
	if (!CallbackRoutine)
		return;

	KIRQL irql = KeGetCurrentIrql();
	KeAcquireSpinLock(&thread_list->lock, &irql);

	PTHREAD_LIST_ENTRY entry = thread_list->start.Next;

	while (entry)
	{
		VOID(*callback_function_ptr)(PKTHREAD, PVOID) = CallbackRoutine;
		(*callback_function_ptr)(entry->thread, Context);
		entry = entry->list.Next;
	}

	KeReleaseSpinLock(&thread_list->lock, irql);
}

NTSTATUS
InitialiseThreadList()
{
	thread_list =
		ExAllocatePool2(POOL_FLAG_NON_PAGED, sizeof(THREAD_LIST), POOL_TAG_THREAD_LIST);

	if (!thread_list)
		return STATUS_MEMORY_NOT_ALLOCATED;

	thread_list->active = TRUE;
	ListInit(&thread_list->start, &thread_list->lock);

	return STATUS_SUCCESS;
}

STATIC
VOID
FindThreadListEntryByThreadAddress(
	_In_ PKTHREAD Thread,
	_Inout_ PTHREAD_LIST_ENTRY* Entry
)
{
	KIRQL irql = KeGetCurrentIrql();
	*Entry = NULL;
	KeAcquireSpinLock(&thread_list->lock, &irql);

	PTHREAD_LIST_ENTRY entry = (PTHREAD_LIST_ENTRY)thread_list->start.Next;

	while (entry)
	{
		if (entry->thread == Thread)
		{
			*Entry = entry;
			goto unlock;
		}
	}
unlock:
	KeReleaseSpinLock(&thread_list->lock, irql);
}

VOID
ThreadCreateNotifyRoutine(
	_In_ HANDLE ProcessId,
	_In_ HANDLE ThreadId,
	_In_ BOOLEAN Create
)
{
	PTHREAD_LIST_ENTRY entry = NULL;
	PKTHREAD thread = NULL;

	/* ensure we don't insert new entries if we are unloading */
	if (InterlockedExchange(&thread_list->active, thread_list->active) == FALSE)
		return;

	PsLookupThreadByThreadId(ThreadId, &thread);

	if (!thread)
		return;

	if (Create)
	{
		entry = ExAllocatePool2(POOL_FLAG_NON_PAGED, sizeof(THREAD_LIST_ENTRY), POOL_TAG_THREAD_LIST);

		if (!entry)
			return;

		ListInsert(&thread_list->start, &entry->list, &thread_list->lock);
		DEBUG_LOG("Thread inserted: %llx", (UINT64)thread);
	}
	else
	{
		FindThreadListEntryByThreadAddress(thread, &entry);
		ListRemoveEntry(&thread_list->start, entry, &thread_list->lock);
		DEBUG_LOG("Thread removed: %llx", (UINT64)thread);
	}
}

VOID
ObPostOpCallbackRoutine(
	_In_ PVOID RegistrationContext,
	_In_ POB_POST_OPERATION_INFORMATION OperationInformation
)
{

}

OB_PREOP_CALLBACK_STATUS
ObPreOpCallbackRoutine(
	_In_ PVOID RegistrationContext,
	_In_ POB_PRE_OPERATION_INFORMATION OperationInformation
)
{
	UNREFERENCED_PARAMETER(RegistrationContext);

	/* access mask to completely strip permissions */
	ACCESS_MASK deny_access = SYNCHRONIZE | PROCESS_TERMINATE;

	/* Access mask to be used for crss / lsass */
	ACCESS_MASK downgrade_access = 0;

	/*
	* This callback routine is executed in the context of the thread that
	* is requesting to open said handle
	*/
	PEPROCESS process_creator = PsGetCurrentProcess();
	PEPROCESS protected_process;
	PEPROCESS target_process = (PEPROCESS)OperationInformation->Object;
	LONG target_process_id = PsGetProcessId(target_process);
	LONG process_creator_id = PsGetProcessId(process_creator);
	LONG protected_process_id = NULL;
	LPCSTR process_creator_name;
	LPCSTR target_process_name;
	LPCSTR protected_process_name;
	PCALLBACK_CONFIGURATION configuration = NULL;

	/*
	* This is to prevent the condition where the thread executing this function is scheduled whilst we 
	* are cleaning up the callbacks on driver unload. We must hold the driver config lock to ensure the 
	* pool containing the callback configuration lock is not freed 
	*/
	GetCallbackConfigStructure(&configuration);

	if (!configuration)
		return OB_PREOP_SUCCESS;

	KeAcquireGuardedMutex(&configuration->lock);
	GetProtectedProcessId(&protected_process_id);
	GetProtectedProcessEProcess(&protected_process);

	if (!protected_process_id || !protected_process)
		goto end;

	process_creator_name = PsGetProcessImageFileName(process_creator);
	target_process_name = PsGetProcessImageFileName(target_process);
	protected_process_name = PsGetProcessImageFileName(protected_process);

	if (!protected_process_name || !target_process_name)
		goto end;

	if (!strcmp(protected_process_name, target_process_name))
	{
		if (!strcmp(process_creator_name, "lsass.exe") || !strcmp(process_creator_name, "csrss.exe"))
		{
			/* We will downgrade these handles later */
			DEBUG_LOG("Handles created by CSRSS and LSASS are allowed for now...");
		}
		else if (target_process == process_creator)
		{
			DEBUG_LOG("handles made by NOTEPAD r okay :)");
			/* handles created by the game (notepad) are okay */
		}
		else
		{
			OperationInformation->Parameters->CreateHandleInformation.DesiredAccess = deny_access;
			OperationInformation->Parameters->DuplicateHandleInformation.DesiredAccess = deny_access;

			/*
			* These processes will constantly open handles to any open process for various reasons,
			* so we will still strip them but we won't report them.. for now atleast.
			*/

			if (!strcmp(process_creator_name, "Discord.exe") ||
				!strcmp(process_creator_name, "svchost.exe") ||
				!strcmp(process_creator_name, "explorer.exe"))
				goto end;

			DEBUG_LOG("handle stripped from: %s", process_creator_name);

			POPEN_HANDLE_FAILURE_REPORT report =
				ExAllocatePool2(POOL_FLAG_NON_PAGED, sizeof(OPEN_HANDLE_FAILURE_REPORT), REPORT_POOL_TAG);

			if (!report)
				goto end;

			report->report_code = REPORT_ILLEGAL_HANDLE_OPERATION;
			report->access = OperationInformation->Parameters->CreateHandleInformation.DesiredAccess;
			report->is_kernel_handle = OperationInformation->KernelHandle;
			report->process_id = process_creator_id;
			report->thread_id = PsGetCurrentThreadId();
			RtlCopyMemory(report->process_name, process_creator_name, HANDLE_REPORT_PROCESS_NAME_MAX_LENGTH);

			InsertReportToQueue(report);
		}
	}

end:

	KeReleaseGuardedMutex(&configuration->lock);
	return OB_PREOP_SUCCESS;
}

//VOID ProcessCreateNotifyRoutine(
//	_In_ HANDLE ParentId,
//	_In_ HANDLE ProcessId,
//	_In_ BOOLEAN Create
//)
//{
//	NTSTATUS status;
//	PEPROCESS parent_process;
//	PEPROCESS target_process;
//	LONG parent_process_id;
//	LONG target_process_id;
//	LPCSTR target_process_name = NULL;
//	LPCSTR parent_process_name = NULL;
//
//	status = PsLookupProcessByProcessId( ParentId, &parent_process );
//
//	if ( !NT_SUCCESS( status ) )
//		return;
//
//	status = PsLookupProcessByProcessId( ProcessId, &target_process );
//
//	if ( !NT_SUCCESS( status ) )
//		return;
//
//	parent_process_name = PsGetProcessImageFileName( parent_process );
//
//	if ( !parent_process_name )
//		return;
//
//	target_process_name = PsGetProcessImageFileName( target_process );
//
//	if ( !target_process_name )
//		return;
//
//	if ( !strcmp( target_process_name, "notepad.exe") )
//	{
//		parent_process_id = PsGetProcessId( parent_process );
//		UpdateProtectedProcessParentId( parent_process_id );
//
//		target_process_id = PsGetProcessId( target_process );
//		UpdateProtectedProcessId( target_process_id );
//
//		DEBUG_LOG( "Protected process parent proc id: %lx", parent_process_id );
//	}
//}

/* stolen from ReactOS xD */
VOID
NTAPI
ExUnlockHandleTableEntry(
	IN PHANDLE_TABLE HandleTable,
	IN PHANDLE_TABLE_ENTRY HandleTableEntry
)
{
	LONG_PTR old_value;
	PAGED_CODE();

	/* Set the lock bit and make sure it wasn't earlier */
	old_value = InterlockedOr((PLONG)&HandleTableEntry->VolatileLowValue, 1);

	/* Unblock any waiters */
	ExfUnblockPushLock(&HandleTable->HandleContentionEvent, NULL);
}

STATIC
BOOLEAN
EnumHandleCallback(
	_In_ PHANDLE_TABLE HandleTable,
	_In_ PHANDLE_TABLE_ENTRY Entry,
	_In_ HANDLE Handle,
	_In_ PVOID Context
)
{
	PVOID object;
	PVOID object_header;
	POBJECT_TYPE object_type;
	PEPROCESS process;
	PEPROCESS protected_process = NULL;
	LPCSTR process_name;
	LPCSTR protected_process_name;
	ACCESS_MASK handle_access_mask;

	object_header = GET_OBJECT_HEADER_FROM_HANDLE(Entry->ObjectPointerBits);

	/* Object header is the first 30 bytes of the object */
	object = (uintptr_t)object_header + OBJECT_HEADER_SIZE;

	object_type = ObGetObjectType(object);

	/* TODO: check for threads aswell */
	if (!RtlCompareUnicodeString(&object_type->Name, &OBJECT_TYPE_PROCESS, TRUE))
	{
		process = (PEPROCESS)object;
		process_name = PsGetProcessImageFileName(process);

		GetProtectedProcessEProcess(&protected_process);

		protected_process_name = PsGetProcessImageFileName(protected_process);

		if (strcmp(process_name, protected_process_name))
			goto end;

		DEBUG_LOG("Handle references our protected process with access mask: %lx", (ACCESS_MASK)Entry->GrantedAccessBits);

		handle_access_mask = (ACCESS_MASK)Entry->GrantedAccessBits;

		/* These permissions can be stripped from every process including CSRSS and LSASS */
		if (handle_access_mask & PROCESS_CREATE_PROCESS)
		{
			Entry->GrantedAccessBits &= ~PROCESS_CREATE_PROCESS;
			DEBUG_LOG("Stripped PROCESS_CREATE_PROCESS");
		}

		if (handle_access_mask & PROCESS_CREATE_THREAD)
		{
			Entry->GrantedAccessBits &= ~PROCESS_CREATE_THREAD;
			DEBUG_LOG("Stripped PROCESS_CREATE_THREAD");
		}

		if (handle_access_mask & PROCESS_DUP_HANDLE)
		{
			Entry->GrantedAccessBits &= ~PROCESS_DUP_HANDLE;
			DEBUG_LOG("Stripped PROCESS_DUP_HANDLE");
		}

		if (handle_access_mask & PROCESS_QUERY_INFORMATION)
		{
			Entry->GrantedAccessBits &= ~PROCESS_QUERY_INFORMATION;
			DEBUG_LOG("Stripped PROCESS_QUERY_INFORMATION");
		}

		if (handle_access_mask & PROCESS_QUERY_LIMITED_INFORMATION)
		{
			Entry->GrantedAccessBits &= ~PROCESS_QUERY_LIMITED_INFORMATION;
			DEBUG_LOG("Stripped PROCESS_QUERY_LIMITED_INFORMATION");
		}

		if (handle_access_mask & PROCESS_VM_READ)
		{
			Entry->GrantedAccessBits &= ~PROCESS_VM_READ;
			DEBUG_LOG("Stripped PROCESS_VM_READ");
		}

		if (!strcmp(process_name, "csrss.exe") || !strcmp(process_name, "lsass.exe"))
		{
			DEBUG_LOG("Required system process allowed, only stripping some permissions");
			goto end;
		}

		/* Permissions beyond here can only be stripped from non critical processes */
		if (handle_access_mask & PROCESS_SET_INFORMATION)
		{
			Entry->GrantedAccessBits &= ~PROCESS_SET_INFORMATION;
			DEBUG_LOG("Stripped PROCESS_SET_INFORMATION");
		}

		if (handle_access_mask & PROCESS_SET_QUOTA)
		{
			Entry->GrantedAccessBits &= ~PROCESS_SET_QUOTA;
			DEBUG_LOG("Stripped PROCESS_SET_QUOTA");
		}

		if (handle_access_mask & PROCESS_SUSPEND_RESUME)
		{
			Entry->GrantedAccessBits &= ~PROCESS_SUSPEND_RESUME;
			DEBUG_LOG("Stripped PROCESS_SUSPEND_RESUME ");
		}

		if (handle_access_mask & PROCESS_TERMINATE)
		{
			Entry->GrantedAccessBits &= ~PROCESS_TERMINATE;
			DEBUG_LOG("Stripped PROCESS_TERMINATE");
		}

		if (handle_access_mask & PROCESS_VM_OPERATION)
		{
			Entry->GrantedAccessBits &= ~PROCESS_VM_OPERATION;
			DEBUG_LOG("Stripped PROCESS_VM_OPERATION");
		}

		if (handle_access_mask & PROCESS_VM_WRITE)
		{
			Entry->GrantedAccessBits &= ~PROCESS_VM_WRITE;
			DEBUG_LOG("Stripped PROCESS_VM_WRITE");
		}

		POPEN_HANDLE_FAILURE_REPORT report = ExAllocatePool2(POOL_FLAG_NON_PAGED, sizeof(OPEN_HANDLE_FAILURE_REPORT), REPORT_POOL_TAG);

		if (!report)
			goto end;

		/*
		* Using the same report structure as the ObRegisterCallbacks report
		* since both of these reports are closely related by the fact they are
		* triggered by a process either opening a handle to our protected process
		* or have a valid open handle to it. I also don't think its worth creating
		* another queue specifically for open handle reports since they will be
		* rare.
		*/
		report->report_code = REPORT_ILLEGAL_HANDLE_OPERATION;
		report->is_kernel_handle = NULL;
		report->process_id = PsGetProcessId(process);
		report->thread_id = NULL;
		report->access = handle_access_mask;
		RtlCopyMemory(&report->process_name, process_name, HANDLE_REPORT_PROCESS_NAME_MAX_LENGTH);

		InsertReportToQueue(report);
	}

end:
	ExUnlockHandleTableEntry(HandleTable, Entry);
	return FALSE;
}

NTSTATUS
EnumerateProcessHandles(
	_In_ PEPROCESS Process
)
{
	/* Handles are paged out so we need to be at an IRQL that allows paging */
	PAGED_CODE();

	if (!Process)
		return STATUS_INVALID_PARAMETER;

	if (Process == PsInitialSystemProcess)
		return STATUS_SUCCESS;

	PHANDLE_TABLE handle_table = *(PHANDLE_TABLE*)((uintptr_t)Process + EPROCESS_HANDLE_TABLE_OFFSET);

	if (!handle_table)
		return STATUS_INVALID_ADDRESS;

	if (!MmIsAddressValid(handle_table))
		return STATUS_INVALID_ADDRESS;

#pragma warning(push)
#pragma warning(suppress : 6387)

	BOOLEAN result = ExEnumHandleTable(
		handle_table,
		EnumHandleCallback,
		NULL,
		NULL
	);

#pragma warning(pop)

	return STATUS_SUCCESS;
}

/*
* I dont think this way of enumerating processes is valid for something like an anti
* cheat which is mass deployed and needs to ensure that it won't crash the system.
* Since we have no access to the process structure locks it is definitely not
* mass deployment safe lol.
*
* The Context argument is simply a pointer to a user designed context structure
* which is passed to the callback function.
*/
VOID
EnumerateProcessListWithCallbackFunction(
	_In_ PVOID Function,
	_In_opt_ PVOID Context
)
{
	UINT64 current_process;
	PLIST_ENTRY process_list_head = NULL;
	PLIST_ENTRY process_list_entry = NULL;
	PEPROCESS base_process = PsInitialSystemProcess;

	if (!base_process)
		return;

	process_list_head = (UINT64)((UINT64)base_process + EPROCESS_PLIST_ENTRY_OFFSET);
	process_list_entry = process_list_head;

	do
	{
		current_process = (PEPROCESS)((UINT64)process_list_entry - EPROCESS_PLIST_ENTRY_OFFSET);

		if (!current_process)
			return;

		VOID(*callback_function_ptr)(PEPROCESS, PVOID) = Function;
		(*callback_function_ptr)(current_process, Context);

		process_list_entry = process_list_entry->Flink;

	} while (process_list_entry != process_list_head->Blink);
}