Send Linux-ha-cvs mailing list submissions to
[email protected]
To subscribe or unsubscribe via the World Wide Web, visit
http://lists.community.tummy.com/mailman/listinfo/linux-ha-cvs
or, via email, send a message with subject or body 'help' to
[EMAIL PROTECTED]
You can reach the person managing the list at
[EMAIL PROTECTED]
When replying, please edit your Subject line so it is more specific
than "Re: Contents of Linux-ha-cvs digest..."
Today's Topics:
1. Linux-HA CVS: linux-ha by andrew from
([email protected])
2. Linux-HA CVS: ldirectord by horms from
([email protected])
3. Linux-HA CVS: ldirectord by horms from
([email protected])
4. Linux-HA CVS: ldirectord by horms from
([email protected])
----------------------------------------------------------------------
Message: 1
Date: Tue, 15 Aug 2006 02:29:44 -0600 (MDT)
From: [email protected]
Subject: [Linux-ha-cvs] Linux-HA CVS: linux-ha by andrew from
To: [EMAIL PROTECTED]
Message-ID: <[EMAIL PROTECTED]>
linux-ha CVS committal
Author : andrew
Host :
Module : linux-ha
Dir : linux-ha
Modified Files:
heartbeat.spec.in
Log Message:
The support files probably need a better location but for now sbin will do
===================================================================
RCS file: /home/cvs/linux-ha/linux-ha/heartbeat.spec.in,v
retrieving revision 1.200
retrieving revision 1.201
diff -u -3 -r1.200 -r1.201
--- heartbeat.spec.in 15 Aug 2006 08:26:21 -0000 1.200
+++ heartbeat.spec.in 15 Aug 2006 08:29:44 -0000 1.201
@@ -1,4 +1,4 @@
-# $Id: heartbeat.spec.in,v 1.200 2006/08/15 08:26:21 andrew Exp $
+# $Id: heartbeat.spec.in,v 1.201 2006/08/15 08:29:44 andrew Exp $
%define _unpackaged_files_terminate_build 1
%define _missing_doc_files_terminate_build 1
@@ -1401,6 +1401,9 @@
@sbindir@/attrd_updater
@sbindir@/crm_failcount
@sbindir@/crm_primitive.py
[EMAIL PROTECTED]@/cluster.py
[EMAIL PROTECTED]@/crm_utils.py
[EMAIL PROTECTED]@/crm_commands.py
%dir %attr (755, @HA_CCMUSER@, @HA_APIGROUP@) @HA_VARRUNDIR@/@HB_PKG@/ccm
%dir %attr (750, @HA_CCMUSER@, @HA_APIGROUP@) @HA_VARRUNDIR@/@HB_PKG@/crm
%dir %attr (750, @HA_CCMUSER@, @HA_APIGROUP@) @localstatedir@/lib/@HB_PKG@/crm
------------------------------
Message: 2
Date: Tue, 15 Aug 2006 02:30:08 -0600 (MDT)
From: [email protected]
Subject: [Linux-ha-cvs] Linux-HA CVS: ldirectord by horms from
To: [EMAIL PROTECTED]
Message-ID: <[EMAIL PROTECTED]>
linux-ha CVS committal
Author : horms
Host :
Project : linux-ha
Module : ldirectord
Dir : linux-ha/ldirectord
Modified Files:
Tag: STABLE_1_2
ldirectord.cf
Log Message:
Add emailalert and emailalertfreq to ldirectord.cf
Signed-Off-By: Simon Horman <[EMAIL PROTECTED]>
===================================================================
RCS file: /home/cvs/linux-ha/linux-ha/ldirectord/ldirectord.cf,v
retrieving revision 1.19.2.11
retrieving revision 1.19.2.12
diff -u -3 -r1.19.2.11 -r1.19.2.12
--- ldirectord.cf 15 Aug 2006 08:14:09 -0000 1.19.2.11
+++ ldirectord.cf 15 Aug 2006 08:30:08 -0000 1.19.2.12
@@ -15,6 +15,8 @@
autoreload=yes
#logfile="/var/log/ldirectord.log"
#logfile="local0"
+#emailalert="[EMAIL PROTECTED]"
+#emailalertfreq=3600
quiescent=yes
# Sample for an http virtual service
------------------------------
Message: 3
Date: Tue, 15 Aug 2006 02:33:08 -0600 (MDT)
From: [email protected]
Subject: [Linux-ha-cvs] Linux-HA CVS: ldirectord by horms from
To: [EMAIL PROTECTED]
Message-ID: <[EMAIL PROTECTED]>
linux-ha CVS committal
Author : horms
Host :
Project : linux-ha
Module : ldirectord
Dir : linux-ha/ldirectord
Modified Files:
Tag: STABLE_1_2
ldirectord
Log Message:
Log email alerts
Backport of 1.163 (ldirectord.in 1.19)
Signed-Off-By: Horms <[EMAIL PROTECTED]>
===================================================================
RCS file: /home/cvs/linux-ha/linux-ha/ldirectord/Attic/ldirectord,v
retrieving revision 1.77.2.66
retrieving revision 1.77.2.67
diff -u -3 -r1.77.2.66 -r1.77.2.67
--- ldirectord 15 Aug 2006 08:29:16 -0000 1.77.2.66
+++ ldirectord 15 Aug 2006 08:33:07 -0000 1.77.2.67
@@ -1,5 +1,5 @@
#!/usr/bin/perl
-my($VERSION)=(qw$Id: ldirectord,v 1.77.2.66 2006/08/15 08:29:16 horms Exp
$)[2];
+my($VERSION)=(qw$Id: ldirectord,v 1.77.2.67 2006/08/15 08:33:07 horms Exp
$)[2];
######################################################################
# ldirectord http://www.vergenet.net/linux/ldirectord/
@@ -3188,6 +3188,8 @@
use Mail::Send;
+ &ld_log("emailalert: $emailsubject");
+
unless ($emailmsg = new Mail::Send Subject=>$emailsubject, To=>$emailto
and $emailfh = $emailmsg->open
and print $emailfh $emailsubject
------------------------------
Message: 4
Date: Tue, 15 Aug 2006 02:34:41 -0600 (MDT)
From: [email protected]
Subject: [Linux-ha-cvs] Linux-HA CVS: ldirectord by horms from
To: [EMAIL PROTECTED]
Message-ID: <[EMAIL PROTECTED]>
linux-ha CVS committal
Author : horms
Host :
Project : linux-ha
Module : ldirectord
Dir : linux-ha/ldirectord
Modified Files:
Tag: STABLE_1_2
ldirectord
Log Message:
Add new calls to purge services and virtuals
Previously this code was just done inline, and although
this is a bit more verbose, it seems a bit more cleaner,
and should allow things like emailalerts fit in with
start-stop a bit better.
Backport of 1.164 (ldirectord.cf 1.20)
Signed-Off-By: Simon Horman <[EMAIL PROTECTED]>
===================================================================
RCS file: /home/cvs/linux-ha/linux-ha/ldirectord/Attic/ldirectord,v
retrieving revision 1.77.2.67
retrieving revision 1.77.2.68
diff -u -3 -r1.77.2.67 -r1.77.2.68
--- ldirectord 15 Aug 2006 08:33:07 -0000 1.77.2.67
+++ ldirectord 15 Aug 2006 08:34:40 -0000 1.77.2.68
@@ -1,5 +1,5 @@
#!/usr/bin/perl
-my($VERSION)=(qw$Id: ldirectord,v 1.77.2.67 2006/08/15 08:33:07 horms Exp
$)[2];
+my($VERSION)=(qw$Id: ldirectord,v 1.77.2.68 2006/08/15 08:34:40 horms Exp
$)[2];
######################################################################
# ldirectord http://www.vergenet.net/linux/ldirectord/
@@ -1830,11 +1830,7 @@
# remove remaining entries for real servers
for my $k (keys %$or) {
- &system_wrapper("$IPVSADM -d " . $nv->{proto} .
- &get_virtual($nv) . " -r $k");
- &ld_log("Removed real server (start): $k (" .
- #scalar(%{$nv->{real_status}}) .
- " x " . &get_virtual($nv) . ")\n");
+ purge_untracked_service($nv, $k, "start");
delete($$or{$k});
}
@@ -1855,11 +1851,7 @@
$nv->{protocol}})) {
next;
}
- # service still exists, remove it
- &system_wrapper("$IPVSADM -D " . $nv->{proto} . " " .
- &get_virtual($nv));
- &ld_log("Removed virtual server (start): " .
- &get_virtual($nv) . "\n");
+ purge_virtual($nv, "start");
}
}
@@ -1881,16 +1873,10 @@
my $real = $$v{real};
foreach my $r (@$real) {
if (defined $$r{virtual_status}) {
- &system_wrapper("$IPVSADM -d $$v{proto} " .
&get_virtual($v) . " -r $$r{server}:$$r{port}");
- _status_down($v, $r);
- &ld_log("Removed real server (stop): " .
- "$$r{server}:$$r{port} (" .
- #scalar(%{$v->{real_status}}) .
- " x " . &get_virtual($v) . ")" );
+ purge_service($v, $r, "stop");
}
}
- &system_wrapper("$IPVSADM -D $$v{proto} " . &get_virtual($v));
- &ld_log("Removed virtual server (stop): " . &get_virtual($v));
+ purge_virtual($v, "stop");
}
}
@@ -3067,6 +3053,38 @@
}
+# Used during stop, start and reload to remove stale real servers from LVS
+sub purge_untracked_service
+{
+ my ($v, $rservice, $tag) = (@_);
+
+ &system_wrapper("$IPVSADM -d $v->{proto} " . &get_virtual($v) .
+ " -r $rservice");
+ &ld_log("Purged real server ($tag): " .
+ "$rservice (" . &get_virtual($v) . ")");
+}
+
+
+# Used during stop, start and reload to remove stale real servers from LVS
+sub purge_service
+{
+ my ($v, $r, $tag) = (@_);
+
+ purge_untracked_service($v, "$r->{server}:$r->{port}", $tag);
+ _status_down($v, $r);
+}
+
+
+# Used during stop, start and reload to remove stale virtual services from LVS
+sub purge_virtual
+{
+ my ($v, $tag) = (@_);
+
+ &system_wrapper("$IPVSADM -D $v->{proto} " . &get_virtual($v));
+ &ld_log("Purged virtual server ($tag): " . &get_virtual($v));
+}
+
+
sub check_cfgfile
{
my ($dev, $ino, $mode, $nlink, $uid, $gid, $rdev,
------------------------------
_______________________________________________
Linux-ha-cvs mailing list
[email protected]
http://lists.community.tummy.com/mailman/listinfo/linux-ha-cvs
End of Linux-ha-cvs Digest, Vol 33, Issue 53
********************************************
