شفر ملفاتك .... كيف ؟؟؟

سلام الله عليكم

اعتقد ان الكثير منا يتمنى ان يجد له طريقه فى تشفير ملف ما او عدت ملفات خاصه به

ولكم طريقه علها تنفع

اولا نتعرف على ما هو التاشفير بشكل بسيط وان كنت متاكد بان اخى محمد قطان قد استفاض فى هذا

ولكن لكم هذه ايضا

ان تحويل الملفات من الينارى من خلال بعض البرمجيات مثل البيرل او السى يساعد على تغير الشكل الهيكلى لها

وسوف نستخدم فى السيبل لهذا الاسكربت bin2hex.pl وهو يسهل التحويل لها الموضوع مع وضعه من خلال اى برمجيات متاوفره لديكم

واول شى لابد من توافر Perl interpreter فى جهازك ومن ثم ابحث عن bin2hex.pl وسوى له داون لود على الجهاز

ولنفرض ان عندنا ملف ( صوره مثلا ) ونريد تشفيرها

نستخدم هذا الامر

---

perl bin2hex.pl banner.gif 0 >source.txt

---

نجد ان تنيجت هذا هى الصوره الاتيه

----

# begin binary data:

$bin_data = # 42

"x47x49x46x38x39x61x01".

"x00x01x00x80x00x00x00x00".

"x00xFFxFFxFFx21xF9x04".

"x01x00x00x00x00x2Cx00x00".

"x00x00x01x00x01x00x40".

"x02x01x44x00x3B";

# end binary data. size = 42 bytes

-------

هذه هى حالت الملف البانر

-----

والكود الواضح امامنا يعمل من خلال الغات التاليه

0 - Perl or similar language(default)

1 - C / C++ / Java or similar language

2 - Pascal / Delphi or similar language

-----

وهذه هى اشكال الكود بكل هذه الغات او بمعنى اصح الامترجمات

----

#

# bin2hex.pl by Chami.com

#

#

# number of characters per line

$chars_per_line = 15;

# -------------------------------------

# language id

#

# 0 = Perl (default)

# 1 = C / C++

# 2 = Pascal / Delphi

#

$lang = $ARGV[1];

$rem_begin = "begin binary data:";

$rem_end = "end binary data.";

# initialize for Perl strings

# by default

$_var = "# $rem_beginn".

"$bin_data = # %dn";

$_begin = """;

$_end = "";n";

$_break = "".n"";

$_format = "x%02X";

$_separator = "";

$_comment = "# $rem_end ".

"size = %d bytes";

# C / C++

if(1 == $lang)

{

$_var = "/* $rem_begin */n".

"char bin_data[] = ".

"/* %d */n";

$_begin = "{";

$_end = "};n";

$_break = "n";

$_format = "0x%02X";

$_separator = ",";

$_comment = "/* $rem_end ".

"size = %d bytes */";

}

elsif(2 == $lang)

{

$_var = "{ $rem_begin }n".

"const bin_data : ".

"array [1..%d] of ".

"byte = n";

$_begin = "(";

$_end = ");n";

$_break = "n";

$_format = "$%02X";

$_separator = ",";

$_comment = "{ $rem_end ".

"size = %d bytes }";

}

if(open(F, "<".$ARGV[0]))

{

binmode(F);

$s = '';

$i = 0;

$count = 0;

$first = 1;

$s .= $_begin;

while(!eof(F))

{

if($i >= $chars_per_line)

{

$s .= $_break;

$i = 0;

}

if(!$first)

{

$s .= $_separator;

}

$s .= sprintf(

$_format, ord(getc(F)));

++$i;

++$count;

$first = 0;

}

$s .= $_end;

$s .= sprintf $_comment, $count;

$s .= "nn";

$s = "n".sprintf($_var, $count).$s;

print $s;

close( F );

}

else

{

print

"bin2hex.pl by Chami.comn".

"n".

"usage:n".

" perl bin2hex.pl ".

" n".

"n".

" : path to the ".

"binary filen".

" : 0 = Perl, ".

"1 = C/C++/Java, ".

"2 = Pascal/Delphin".

"n";

}

--------------

ولكم وافر التحيه