From e1e8a9d02a3adda825ac7111fc45e29118aa37ef Mon Sep 17 00:00:00 2001
From: lissav <lissav@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Wed, 31 Mar 2010 18:29:24 +0000
Subject: [PATCH] add updating auditlog when command is run

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@5634 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 xCAT-server/sbin/restartxcatd | 19 ++++++++++++++-----
 1 file changed, 14 insertions(+), 5 deletions(-)

diff --git a/xCAT-server/sbin/restartxcatd b/xCAT-server/sbin/restartxcatd
index defc4b212..120e32da2 100755
--- a/xCAT-server/sbin/restartxcatd
+++ b/xCAT-server/sbin/restartxcatd
@@ -39,17 +39,26 @@ my @output;
 my $inoperative = 0;
 my $check_num;
 
-my $cmd = basename($0);
-# for auditing
-my $current_userid = getpwuid($>);
-xCAT::MsgUtils->message("S", " restartxcatd invoked by $current_userid.\n");
 if (!(xCAT::Utils->isAIX()))
 {    # only runs on AIX
-    xCAT::MsgUtils->message("E", "Error: This command should only be run on AIX.\n");
+    xCAT::MsgUtils->message("E", "Error: This command should only be run on AIX.");
     exit 1;
 
 }
 
+my $cmd = basename($0);
+# for auditing
+my $current_userid = getpwuid($>);
+my $rsp = {};
+my $host=`hostname`;
+$host=~ s/\s*//g; # remove blanks
+$rsp->{syslogdata}->[0] ="restartxcatd invoked by $current_userid.\n";
+$rsp->{userid} ->[0] = $current_userid;
+$rsp->{clientname} -> [0] = $host;
+$rsp->{clienttype} -> [0]= "cli";
+$rsp->{command} -> [0] = $cmd;
+$rsp->{status} -> [0] = "allowed";
+xCAT::MsgUtils->message("SA",$rsp); # syslog and auditlog
 &parse_args($cmd);
 
 # Check whether the xcatd subsystem has been created