######## add some ntfs specific magic numbers #####################################################################################
# read more http://sedna-soft.de/summary-information-stream/
# read www.sandersonforensics.com/Files/ZoneIdentifier.pdf
my $magic = <<EOF;
0 string \\xfe\\xff\\x00\\x00\\x05\\x00\\x02\\x00\\x00 NTFS stream Metadata Win 5.0 (W2k)
0 string \\xfe\\xff\\x00\\x00\\x05\\x01\\x02\\x00\\x00 NTFS stream Metadata Win 5.1 (XP)
0 string \\xfe\\xff\\x00\\x00\\x05\\x02\\x02\\x00\\x00 NTFS stream Metadata Win x64/2003
0 string \\xfe\\xff\\x00\\x00\\x06\\x00\\x02\\x00\\x00 NTFS stream Metadata Win Vista/2008
0 string \\xfe\\xff\\x00\\x00 NTFS stream Metadata
0 string [ZoneTransfer]\\x0d\\x0aZoneId=3 NTFS stream Zone.Identifier 3 (Internet) WinXP SP2 and above
0 string [ZoneTransfer] NTFS stream Zone.Identifier WinXP SP2 and above
EOF
if ( !-e "$ENV{HOME}/.magic" ) {
open( MAGIC, ">$ENV{HOME}/.magic" ) or die "cannot open \$HOME/.magic $ENV{HOME} : $!";
print MAGIC $magic;
close MAGIC;
}
|