[تمرين] كيف احمي برنامجي من الـــ rce ؟
#21
و عليكم السلام و رحمة الله

إقتباس :ما العمل الان, هل أضع الملفات المصدرية الان أو نترك مجال للمحاولة مرة أخرى
أو تقديم بعض التلميحات و Hints
اذا لم تصل فكرة التمرين بعد، يمكنك اخي MJ ان تقدم Hints و شرح لفكرة الحماية اولا ثم بعد يومين اذا توفر لك الوقت تضع الملفات المصدرية...

إقتباس :مشروع التخرج أخذ مني الكثير
الأولوية له
الله يوفقك Smile
الرد
#22
مع إنو التمرين يبدو سهلا و لكن هناك مشكلة و الله أعلم بالتمرين

بعد تخطي عمليات التحقق من برامج RCE و الحاسب الوهمي و غيره
و بفرض الاسم o15s19
تتم العملية بالشكل الأتي:

بالبداية يتم استخراج القيمة 703E242BE9 من السترنغ Delphi4arab و الاسم المدخل بعملية على ما اظن DES
ثم يتم دمج ال السم المدخل مع -M[j]IrIm لينتج مثلا
كود :
-o15s19-M[j]IrIm

ثم يتم استخدام التحويل base 64

لينتج

كود :
LW8xNXMxOS1NW2pdSXJJbQ==

و ثم يتم عمل MD5 (مع اعادة ترتيب لثوابت MD5)

لينتج

كود :
7cc435b412ba4cf73aa6dec1534df57e

ثم يتم اسستخراج أول عشرة

لينتج

كود :
7cc435b412

و يتم دمجها (مع تكبير الأحرف) مع 703E242BE9 و وضع -

لينتج

كود :
703E242BE9-7CC435B412

و أخيرا يتم اعادة قلب الناتج من الأخير للأول مع البدء بالرقم قبل الأخير

لينتج

كود :
14B534CC7-9EB242E307

و يتم مقارنته مع السيريل المدخل
و هنا النتيجة حتما خاطئة بسبب أن الرقم المقلوب قبل القلب كان 15 خانة و ثم اصبح 14 و لكن يتم حفظ 15 خانة بينما السيريل المدخل 14 خانة مثلا فهنا النتيجة سلبية مهما كان الرقم المدخل لأنه بحال تم زيادة أو نقصان رقم لن يتم التطابق و ستفشل العملية و بحال ادخال الرقم الصحيح لن تتم العملية بسبب اختلاف الأطوال

لهنا وصلت و أأمل من صاحب التمرين أن يعقب على هذا لأنو كمان شوي رح اجن :confused::confused:
الرد
#23
في البداية السلام عليكم


رمضان مبارك للجميع

تحليل سليم مئة مئة تقريبا o15s19
بالنسبة لاخر عملية أي عكس السريال حذفتها الان حتى يزول الاشكال
بارك الله فيك على مجهودك

أضع بين أيدكم الان التطبيق كاملا بالملفات المصدرية
مع مولد السريال الخاص به أيضا

نريد الان من الجميع أن يقوموا بتحليل ما تم كتابته
فالأكواد موجودة الان, أي ذكر ما تم الاعتماد عليه
و ماذا استفدت بعد الاطلاع على التطبيق كاملا
(العملية عكسية هذه المرة)
:monster2:

من اراد اثراء الموضوع بتحسينات لطريقة الحماية أو ذكر أساليب جديدة

يصبح الموضوع مفتوح المجال في الحديث

الاكواد يمكن اختزالها بدرجة أكبر لكن تركتها على حالها حتى تكون باينة للجميع العيان

لي عودة ان شاء الله بعد أسبوع على أقصى تقدير

التطبيق به مجموعة من الأفكار التي تستحق الحوار فلكم الكلمة

عذرا على التأخير أيها الاخوة الكرام

و السلام.

المرفق سليم الان بعد حذف الفيروس منه


الملفات المرفقة
.rar   RCE Protect Src.rar (الحجم : 46.79 ك ب / التحميلات : 181)
الرد
#24
اخي M[j]IrIm

http://www.delphi4arab.net/forum/showthr...p?tid=1733

يبدو انك مصاب بهذا الفايروس

افحص

Fct.dll
الرد
#25
phpbb3 كتب :اخي M[j]IrIm

http://www.delphi4arab.net/forum/showthr...p?tid=1733

يبدو انك مصاب بهذا الفايروس

افحص

Fct.dll

في البداية السلام عليكم


صحيح أصبت به و قمت بعملية مسح لجميع الملفات المصابة
لكن الوحيد الذي لم أقم له بعملية جراحية هو Fct.dll
:oops:
حتى مضاد الفيروسات يكشف الان الملفات التنفيدية بصيغة Exe
انها مصابة بهذا الفيروس لكن التي بصيغة dll لا!!!

على فكرة المرفق الشهير الذي وضعته لدى AT4RE
هو من أصابني
:monster2:
(أمزح معك قليلا)

يمكن اعادة عمل Compile ل المكتبة الدينامكية فهو ليس بالصعب
أو من أراد التحميل من الجديد عليه بالمرفقات

أخي العزيز STRELiTZIA أو DeltaAziz
يتم حذف المرفق في المشاركة السابقة

مشكورين تم ذلك منذ قليل
المرفق في المشاركة السابقة سليم الان
شكر خاص للادارة

و السلام.
الرد
#26
السلام عليكم

مجرد محاولة حاولوا كسر هدا البرنامج .


الملفات المرفقة
.rar   RegMe.rar (الحجم : 251.25 ك ب / التحميلات : 178)
الرد
#27
إقتباس :مجرد محاولة حاولوا كسر هدا البرنامج .
ملعوبة جيدا أخي هاني Wink
كود :
Username: HP_D4A Password: HP_D4A
أو تغيير القفزتين:
كود :
00450838 |. /75 1B [color=Blue]JNZ [/color]SHORT 00450855 0045081B /75 38 [color=Blue]JNZ [/color]SHORT 00450855
.
اللهم احقن دماء المسلمين، لا تنسوهم بالدعاء...
الرد
#28
نعم kachwahed Smile
بارك الله فيك .
الرد
#29
السلام عليكم
حملت البرنامج و لكن به فيروس
الرد
#30
كود :
function IsRing0DBG(S:string): Boolean; var hFile: Thandle; begin Result := False; hFile := CreateFileA(Pchar(S), GENERIC_READ or GENERIC_WRITE, 0, nil, OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL, 0); if( hFile <> INVALID_HANDLE_VALUE ) then begin CloseHandle(hFile); Result := TRUE; end; end;

هناك Bug بهذه الدالة
[dcc32 Error] GbdItna.pas(64): E2010 Incompatible types: 'PAnsiChar' and 'PWideChar'

Delphi XE3
الرد


التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم