From 4c472a77ba367ed56c5cefe386e957175e5ceea4 Mon Sep 17 00:00:00 2001 From: lissav Date: Wed, 26 Mar 2008 17:50:48 +0000 Subject: [PATCH] replaced by ASYSLOGsn.pm git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@901 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- xCAT-server-2.0/lib/xcat/plugins/SYSLOGsn.pm | 100 ------------------- 1 file changed, 100 deletions(-) delete mode 100644 xCAT-server-2.0/lib/xcat/plugins/SYSLOGsn.pm diff --git a/xCAT-server-2.0/lib/xcat/plugins/SYSLOGsn.pm b/xCAT-server-2.0/lib/xcat/plugins/SYSLOGsn.pm deleted file mode 100644 index 249a14d90..000000000 --- a/xCAT-server-2.0/lib/xcat/plugins/SYSLOGsn.pm +++ /dev/null @@ -1,100 +0,0 @@ -#!/usr/bin/env perl -# IBM(c) 2007 EPL license http://www.eclipse.org/legal/epl-v10.html -#------------------------------------------------------- -package xCAT_plugin::SYSLOGsn; -use xCAT::Table; - -use xCAT::Utils; - -use xCAT::MsgUtils; -use Getopt::Long; - -#------------------------------------------------------- - -=head1 - xCAT plugin package to setup SYSLOG - - -#------------------------------------------------------- - -=head3 handled_commands - -Check to see if on a Service Node -Call setup_SYSLOG - -=cut - -#------------------------------------------------------- - -sub handled_commands - -{ - my $rc = 0; - if (xCAT::Utils->isServiceNode()) - { - my $service = "syslog"; - - # service needed on this Service Node - $rc = &setup_SYSLOG(); # setup SYSLOG - if ($rc == 0) - { - xCAT::Utils->update_xCATSN($service); - } - } - return $rc; -} - -#------------------------------------------------------- - -=head3 process_request - - Process the command - -=cut - -#------------------------------------------------------- -sub process_request -{ - return; -} - -#----------------------------------------------------------------------------- - -=head3 setup_SYSLOG - - Sets up SYSLOG - -=cut - -#----------------------------------------------------------------------------- -sub setup_SYSLOG -{ - my $rc = 0; - my $cmd; - if (-e "/etc/syslog.conf") - { - $cmd = "grep *.debug /etc/syslog.conf"; - xCAT::Utils->runcmd($cmd, -1); - if ($::RUNCMD_RC != 0) - { # need to add - ` echo "*.debug /var/log/messages" >> /etc/syslog.conf`; - `echo "*.crit /var/log/messages" >> /etc/syslog.conf`; - $cmd = "service syslog restart"; - xCAT::Utils->runcmd($cmd, -1); - if ($::RUNCMD_RC != 0) - { # error try rsyslog - $cmd = "service rsyslog restart"; - xCAT::Utils->runcmd($cmd, -1); - if ($::RUNCMD_RC != 0) - { # error on both - xCAT::MsgUtils->message("S", - "Error could not start syslog or rsyslog"); - return 1; - } - } - } - } - - return $rc; -} -1;