[تمرين] الكل يسأل و الكل يجيب

[TF6M]

فكرة رائعة بارك الله فيك يا أستاذ :

الدالة ZwLoadDriver

كود :

Function [color=Red]ZwLoadDriver[/color];External 'NtDll.Dll' Name 'ZwLoadDriver';

1- الهدف من الدالة : تحميل الدريفر للنظام أما عن مود التحميل لا أعلم .. ؟؟.

2- لها براماتر وحيد (هل كتابة الدالة صحيحة ؟؟؟) :

كود :

Function [color=Red]ZwLoadDriver[/color](DriverServiceName:PUNICODE_STRING):NTSTATUS; stdcall;

In_DriverServiceName : اليونيكوند الخاص بتحويل مسار الدريفر من الريجيستري نتحصل عليه بالدالة :

RtlInitUnicodeString مثال :

Registry > Machine > SystemCurrent > ControlSet > Services > DriverName

كود :

Var UNICODESTRING: PUNICODE_STRING; RtlInitUnicodeString(UNICODESTRING,'Machine\System\CurrentControlSet\Services\DriverName.Sys'); ZwLoadDriver(UNICODESTRING);

في إنتظار التصحيح .. بالتوفيق ,,

ممكن أخطأت في المثال :

كود :

procedure [color=Red]RtlInitUnicodeString[/color]; external 'ntoskrnl.exe' name 'RtlInitUnicodeString';

كود :

var UNICODESTRING: UNICODE_STRING; obj_Attrib: OBJECT_ATTRIBUTES; RtlInitUnicodeString(UNICODESTRING, 'Machine\System\CurrentControlSet\Services\DriverName.Sys'); InitializeObjectAttributes(obj_Attrib, @UNICODESTRING, OBJ_CASE_INSENSITIVE + OBJ_KERNEL_HANDLE, 0, nil); ZwLoadDriver (@obj_Attrib);