SecureCRT 8.5.4 For Mac Cracked by xiaobo
#!/usr/bin/perl
#===============================================================================
#
# FILE: securecrt_linux_crack.pl
#
# USAGE: ./securecrt_linux_crack.pl
#
# DESCRIPTION: securecrt_linux_crack
#
# OPTIONS: ---
# REQUIREMENTS: ---
# BUGS: ---
# NOTES: ---
# AUTHOR: xiaobo_l
# ORGANIZATION:
# VERSION: 1.2
# CREATED: 08/16/2015 13:26:00
# REVISION: ---
#===============================================================================
use strict;
use warnings;
use File::Copy qw(move);
sub license {
print "\n".
"License:\n\n".
"\tName:\t\txiaobo_l\n".
"\tCompany:\twww.boll.me\n".
"\tSerial Number:\t03-91-324785\n".
"\tLicense Key:\tAC33SN 4JHKFS 48KYUT MY8F24 AAKC1C HJYFXT 8P6S99 MRAUQ2\n".
"\tIssue Date:\t02-12-2019\n\n\n";
}
sub usage {
print "\n".
"help:\n\n".
"\tperl securecrt_linux_crack.pl <file>\n\n\n".
"\tperl securecrt_linux_crack.pl /usr/bin/SecureCRT\n\n\n".
"\n";
&license;
exit;
}
&usage() if ! defined $ARGV[0] ;
my $file = $ARGV[0];
open FP, $file or die "can not open file $!";
binmode FP;
open TMPFP, '>', '/tmp/.securecrt.tmp' or die "can not open file $!";
my $buffer;
my $unpack_data;
my $crack = 0;
while(read(FP, $buffer, 1024)) {
$unpack_data = unpack('H*', $buffer);
if ($unpack_data =~ m/785782391ad0b9169f17415dd35f002790175204e3aa65ea10cff20818/) {
$crack = 1;
last;
}
if ($unpack_data =~ s/6e533e406a45f0b6372f3ea10717000c7120127cd915cef8ed1a3f2c5b/785782391ad0b9169f17415dd35f002790175204e3aa65ea10cff20818/ ){
$buffer = pack('H*', $unpack_data);
$crack = 2;
}
syswrite(TMPFP, $buffer, length($buffer));
}
close(FP);
close(TMPFP);
if ($crack == 1) {
unlink '/tmp/.securecrt.tmp' or die "can not delete files $!";
print "It has been cracked\n";
&license;
exit 1;
} elsif ($crack == 2) {
move '/tmp/.securecrt.tmp', $file or die 'Insufficient privileges, please switch the root account.';
chmod 0755, $file or die 'Insufficient privileges, please switch the root account.';
print "crack successful\n";
&license;
} else {
die 'error';
}
wget http://download.boll.me/securecrt_linux_crack.pl