arif/xcat-core
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

add send mail

Browse Source
This commit is contained in:
yinle 2014-05-20 06:28:20 -07:00
parent 427e91463e
commit 725fb69a51
1 changed files with 19 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
xCAT-server/share/xcat/tools/xCATreg
View File

@ -722,6 +722,25 @@ sub read_conf{
# pro_result
#######################################
sub pro_result{
my $result = shift;
my $mailprog = "/bin/mail";
my $subject = "[xcat-autotest] autotest result ";
my $message = "\n Host:172.20.0.21[Redhat 6.4 RC2]\n";
$message = $message."---------------------------------------------------------------------------------------------------------------\n";
$message = $message." | RESULT | Remark \n";
$message = $message."---------------------------------------------------------------------------------------------------------------\n";
if($result){
$message = $message."| full installation | PASS |\n";
} else{
$message = $message."| full installation | FAIL |";
}
$message = $message."---------------------------------------------------------------------------------------------------------------\n";
$message = $message."Note: This message is sent by Automated test system, Please don't reply it\n";
my $sendmail = "echo \"$message\"";
my $email = "litingt\@cn.ibm.com";
$sendmail = $sendmail." | $mailprog -s \"$subject\" \"$email\" ";
system($sendmail);
return 0;