#!usr/bin/perl
#Code : Çağrı TEPEBAŞILI
#Open Source 

print "\n\n\n[+] MythRDL Linux Server Security Tool >>>\n\n\n" ;
print "[+] [0] Block The Backdoors\n";
print "[+] [1] Php [dot] ini Security\n" ;
print "[+] [2] Authorization Security\n\n" ;
print "[+] [3] File Acces Control\n";

sub security{
	$path = system("pwd");
	{
	system("cd $path");
	system("chmod 777 IceWaLL.pl");
	system("chmod 777 /etc/my.cnf ");
	}
open (DOSYAX, "> /etc/my.cnf");
print DOSYAX ("\nsafe-show-database\nlocal-infile=0\n");
}

sub ini{

open (DOSYA, "> php.ini");
print DOSYA ("disable_functions = wget,touch,unlink,mkdir,rmdir,glob, posix_getpwuid, array_compare, array_user_key_compare, ini_restore, exec, proc_get_status, proc_nice, proc_open, allow_url_fopen, fin, pconnect, system, dl, passthruexec, shell_exec, proc_close, proc_get_status, chown, chgrp, escapeshellcmd, escapeshellarg, fileread, passthru, popen,curl_exec, shell, execute\nsafe mode = on\nregister_globals = off\nallow_url_fopen = off\nallow_url_include = off\ndisplay_errors = Off\ncgi.force_redirect = on\nmagic_quotes_gpc = off\nmagic_quotes_runtime = Off\nmagic_quotes_sybase = Off\nsession.use_trans_sid = off\nexpose_php = Off\nhtml_errors = off\nmax_execution_time = 300\nmax_input_time = 300\nServerSignature = Off\nUseCanonicalName = Off\nregister_long_arrays = Off\nenable_dl = off\nfile_uploads = off\ndisplay_startup_errors = off\nsafe_mode_gid = Off\nregister_argc_argv = Off\n");

}

sub auth{

{
system("rm –f /etc/security/console.apps/halt");
system("rm –f /etc/security/console.apps/poweroff");
system("rm –f /etc/security/console.apps/reboot");
system("rm –f /etc/security/console.apps/shutdown ");
system("cd /etc/pam.dfor i in * ; dosed '/[^#].*pam_console.so/s/^/#/' <$i> temp && mv temp $idone");
system("chmod 600 /etc/inetd.conf");
system("chattr +i /etc/inetd.conf");
system("chattr +i /etc/services");
system("chmod 600 /etc/shadow");
system("chmod 600 /etc/passwd");
system("chmod 600 /etc/group");
system("chmod 600 /etc/master.passwd");
}

}


&security;
&ini;
&auth;

print "[+] Make Software Security, Authorization Is Complete and Touch php [dot] ini\n";
print "[+] GET File Acces Control(Y/N)\n";

$que1 = <STDIN>;
chop($que1);
if($que1 == "y"){

	print "[+] Example : /home/webst/site/public_html/config.php\n";
	print "[+] Give File PATH : ";
	$que2 = <STDIN>;
	chop($que2);
	{
	system("chmod 600 $que2");	
	}
	print "\n[+] File is Safe. !\n";
}
else{
	die();
}