From e5a812082ae033afb1eed82c0f2df3d0f6bdc93f Mon Sep 17 00:00:00 2001 From: Daniel Baumann Date: Wed, 17 Apr 2024 08:53:20 +0200 Subject: Adding upstream version 2.1.6. Signed-off-by: Daniel Baumann --- cts/cts-scheduler.in | 1626 ++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 1626 insertions(+) create mode 100644 cts/cts-scheduler.in (limited to 'cts/cts-scheduler.in') diff --git a/cts/cts-scheduler.in b/cts/cts-scheduler.in new file mode 100644 index 0000000..ee0cb7b --- /dev/null +++ b/cts/cts-scheduler.in @@ -0,0 +1,1626 @@ +#!@PYTHON@ +""" Regression tests for Pacemaker's scheduler +""" + +__copyright__ = "Copyright 2004-2023 the Pacemaker project contributors" +__license__ = "GNU General Public License version 2 or later (GPLv2+) WITHOUT ANY WARRANTY" + +import io +import os +import re +import sys +import stat +import shlex +import shutil +import argparse +import subprocess +import platform +import tempfile + +# These imports allow running from a source checkout after running `make`. +# Note that while this doesn't necessarily mean it will successfully run tests, +# but being able to see --help output can be useful. +if os.path.exists("@abs_top_srcdir@/python"): + sys.path.insert(0, "@abs_top_srcdir@/python") + +if os.path.exists("@abs_top_builddir@/python") and "@abs_top_builddir@" != "@abs_top_srcdir@": + sys.path.insert(0, "@abs_top_builddir@/python") + +from pacemaker.buildoptions import BuildOptions +from pacemaker.exitstatus import ExitStatus + +DESC = """Regression tests for Pacemaker's scheduler""" + +# Each entry in TESTS is a group of tests, where each test consists of a +# test base name, test description, and additional test arguments. +# Test groups will be separated by newlines in output. +TESTS = [ + [ + [ "simple1", "Offline" ], + [ "simple2", "Start" ], + [ "simple3", "Start 2" ], + [ "simple4", "Start Failed" ], + [ "simple6", "Stop Start" ], + [ "simple7", "Shutdown" ], + #[ "simple8", "Stonith" ], + #[ "simple9", "Lower version" ], + #[ "simple10", "Higher version" ], + [ "simple11", "Priority (ne)" ], + [ "simple12", "Priority (eq)" ], + [ "simple8", "Stickiness" ], + ], + [ + [ "group1", "Group" ], + [ "group2", "Group + Native" ], + [ "group3", "Group + Group" ], + [ "group4", "Group + Native (nothing)" ], + [ "group5", "Group + Native (move)" ], + [ "group6", "Group + Group (move)" ], + [ "group7", "Group colocation" ], + [ "group13", "Group colocation (cant run)" ], + [ "group8", "Group anti-colocation" ], + [ "group9", "Group recovery" ], + [ "group10", "Group partial recovery" ], + [ "group11", "Group target_role" ], + [ "group14", "Group stop (graph terminated)" ], + [ "group15", "Negative group colocation" ], + [ "bug-1573", "Partial stop of a group with two children" ], + [ "bug-1718", "Mandatory group ordering - Stop group_FUN" ], + [ "failed-sticky-group", "Move group on last member failure despite infinite stickiness" ], + [ "failed-sticky-anticolocated-group", + "Move group on last member failure despite infinite stickiness and optional anti-colocation" + ], + [ "bug-lf-2619", "Move group on clone failure" ], + [ "group-fail", "Ensure stop order is preserved for partially active groups" ], + [ "group-unmanaged", "No need to restart r115 because r114 is unmanaged" ], + [ "group-unmanaged-stopped", "Make sure r115 is stopped when r114 fails" ], + [ "partial-unmanaged-group", + "New member in partially unmanaged group" + ], + [ "group-dependents", "Account for the location preferences of things colocated with a group" ], + [ "group-stop-ordering", "Ensure blocked group member stop does not force other member stops" ], + [ "colocate-unmanaged-group", "Respect mandatory colocations even if earlier group member is unmanaged" ], + ], + [ + [ "rsc_dep1", "Must not" ], + [ "rsc_dep3", "Must" ], + [ "rsc_dep5", "Must not 3" ], + [ "rsc_dep7", "Must 3" ], + [ "rsc_dep10", "Must (but cant)" ], + [ "rsc_dep2", "Must (running)" ], + [ "rsc_dep8", "Must (running : alt)" ], + [ "rsc_dep4", "Must (running + move)" ], + [ "asymmetric", "Asymmetric - require explicit location constraints" ], + ], + [ + [ "orphan-0", "Orphan ignore" ], + [ "orphan-1", "Orphan stop" ], + [ "orphan-2", "Orphan stop, remove failcount" ], + ], + [ + [ "params-0", "Params: No change" ], + [ "params-1", "Params: Changed" ], + [ "params-2", "Params: Resource definition" ], + [ "params-3", "Params: Restart instead of reload if start pending" ], + [ "params-4", "Params: Reload" ], + [ "params-5", "Params: Restart based on probe digest" ], + [ "novell-251689", "Resource definition change + target_role=stopped" ], + [ "bug-lf-2106", "Restart all anonymous clone instances after config change" ], + [ "params-6", "Params: Detect reload in previously migrated resource" ], + [ "nvpair-id-ref", "Support id-ref in nvpair with optional name" ], + [ "not-reschedule-unneeded-monitor", + "Do not reschedule unneeded monitors while resource definitions have changed" ], + [ "reload-becomes-restart", "Cancel reload if restart becomes required" ], + [ "restart-with-extra-op-params", "Restart if with extra operation parameters upon changes of any" ], + ], + [ + [ "target-0", "Target Role : baseline" ], + [ "target-1", "Target Role : promoted" ], + [ "target-2", "Target Role : invalid" ], + ], + [ + [ "base-score", "Set a node's default score for all nodes" ], + ], + [ + [ "date-1", "Dates", [ "-t", "2005-020" ] ], + [ "date-2", "Date Spec - Pass", [ "-t", "2005-020T12:30" ] ], + [ "date-3", "Date Spec - Fail", [ "-t", "2005-020T11:30" ] ], + [ "origin", "Timing of recurring operations", [ "-t", "2014-05-07 00:28:00" ] ], + [ "probe-0", "Probe (anon clone)" ], + [ "probe-1", "Pending Probe" ], + [ "probe-2", "Correctly re-probe cloned groups" ], + [ "probe-3", "Probe (pending node)" ], + [ "probe-4", "Probe (pending node + stopped resource)" ], + [ "probe-pending-node", "Probe (pending node + unmanaged resource)" ], + [ "failed-probe-primitive", "Maskable vs. unmaskable probe failures on primitive resources" ], + [ "failed-probe-clone", "Maskable vs. unmaskable probe failures on cloned resources" ], + [ "expired-failed-probe-primitive", "Maskable, expired probe failure on primitive resources" ], + [ "standby", "Standby" ], + [ "comments", "Comments" ], + ], + [ + [ "one-or-more-0", "Everything starts" ], + [ "one-or-more-1", "Nothing starts because of A" ], + [ "one-or-more-2", "D can start because of C" ], + [ "one-or-more-3", "D cannot start because of B and C" ], + [ "one-or-more-4", "D cannot start because of target-role" ], + [ "one-or-more-5", "Start A and F even though C and D are stopped" ], + [ "one-or-more-6", "Leave A running even though B is stopped" ], + [ "one-or-more-7", "Leave A running even though C is stopped" ], + [ "bug-5140-require-all-false", "Allow basegrp:0 to stop" ], + [ "clone-require-all-1", "clone B starts node 3 and 4" ], + [ "clone-require-all-2", "clone B remains stopped everywhere" ], + [ "clone-require-all-3", "clone B stops everywhere because A stops everywhere" ], + [ "clone-require-all-4", "clone B remains on node 3 and 4 with only one instance of A remaining" ], + [ "clone-require-all-5", "clone B starts on node 1 3 and 4" ], + [ "clone-require-all-6", "clone B remains active after shutting down instances of A" ], + [ "clone-require-all-7", + "clone A and B both start at the same time. all instances of A start before B" ], + [ "clone-require-all-no-interleave-1", "C starts everywhere after A and B" ], + [ "clone-require-all-no-interleave-2", + "C starts on nodes 1, 2, and 4 with only one active instance of B" ], + [ "clone-require-all-no-interleave-3", + "C remains active when instance of B is stopped on one node and started on another" ], + [ "one-or-more-unrunnable-instances", "Avoid dependencies on instances that won't ever be started" ], + ], + [ + [ "location-date-rules-1", "Use location constraints with ineffective date-based rules" ], + [ "location-date-rules-2", "Use location constraints with effective date-based rules" ], + [ "nvpair-date-rules-1", "Use nvpair blocks with a variety of date-based rules" ], + [ "value-source", "Use location constraints with node attribute expressions using value-source" ], + [ "rule-dbl-as-auto-number-match", + "Floating-point rule values default to number comparison: match" ], + [ "rule-dbl-as-auto-number-no-match", + "Floating-point rule values default to number comparison: no " + "match" ], + [ "rule-dbl-as-integer-match", + "Floating-point rule values set to integer comparison: match" ], + [ "rule-dbl-as-integer-no-match", + "Floating-point rule values set to integer comparison: no match" ], + [ "rule-dbl-as-number-match", + "Floating-point rule values set to number comparison: match" ], + [ "rule-dbl-as-number-no-match", + "Floating-point rule values set to number comparison: no match" ], + [ "rule-dbl-parse-fail-default-str-match", + "Floating-point rule values fail to parse, default to string " + "comparison: match" ], + [ "rule-dbl-parse-fail-default-str-no-match", + "Floating-point rule values fail to parse, default to string " + "comparison: no match" ], + [ "rule-int-as-auto-integer-match", + "Integer rule values default to integer comparison: match" ], + [ "rule-int-as-auto-integer-no-match", + "Integer rule values default to integer comparison: no match" ], + [ "rule-int-as-integer-match", + "Integer rule values set to integer comparison: match" ], + [ "rule-int-as-integer-no-match", + "Integer rule values set to integer comparison: no match" ], + [ "rule-int-as-number-match", + "Integer rule values set to number comparison: match" ], + [ "rule-int-as-number-no-match", + "Integer rule values set to number comparison: no match" ], + [ "rule-int-parse-fail-default-str-match", + "Integer rule values fail to parse, default to string " + "comparison: match" ], + [ "rule-int-parse-fail-default-str-no-match", + "Integer rule values fail to parse, default to string " + "comparison: no match" ], + ], + [ + [ "order1", "Order start 1" ], + [ "order2", "Order start 2" ], + [ "order3", "Order stop" ], + [ "order4", "Order (multiple)" ], + [ "order5", "Order (move)" ], + [ "order6", "Order (move w/ restart)" ], + [ "order7", "Order (mandatory)" ], + [ "order-optional", "Order (score=0)" ], + [ "order-required", "Order (score=INFINITY)" ], + [ "bug-lf-2171", "Prevent group start when clone is stopped" ], + [ "order-clone", "Clone ordering should be able to prevent startup of dependent clones" ], + [ "order-sets", "Ordering for resource sets" ], + [ "order-serialize", "Serialize resources without inhibiting migration" ], + [ "order-serialize-set", "Serialize a set of resources without inhibiting migration" ], + [ "clone-order-primitive", "Order clone start after a primitive" ], + [ "clone-order-16instances", "Verify ordering of 16 cloned resources" ], + [ "order-optional-keyword", "Order (optional keyword)" ], + [ "order-mandatory", "Order (mandatory keyword)" ], + [ "bug-lf-2493", + "Don't imply colocation requirements when applying ordering constraints with clones" ], + [ "ordered-set-basic-startup", "Constraint set with default order settings" ], + [ "ordered-set-natural", "Allow natural set ordering" ], + [ "order-wrong-kind", "Order (error)" ], + ], + [ + [ "coloc-loop", "Colocation - loop" ], + [ "coloc-many-one", "Colocation - many-to-one" ], + [ "coloc-list", "Colocation - many-to-one with list" ], + [ "coloc-group", "Colocation - groups" ], + [ "coloc-unpromoted-anti", "Anti-colocation with unpromoted shouldn't prevent promoted colocation" ], + [ "coloc-attr", "Colocation based on node attributes" ], + [ "coloc-negative-group", "Negative colocation with a group" ], + [ "coloc-intra-set", "Intra-set colocation" ], + [ "bug-lf-2435", "Colocation sets with a negative score" ], + [ "coloc-clone-stays-active", + "Ensure clones don't get stopped/demoted because a dependent must stop" ], + [ "coloc_fp_logic", "Verify floating point calculations in colocation are working" ], + [ "colo_promoted_w_native", + "cl#5070 - Verify promotion order is affected when colocating promoted with primitive" ], + [ "colo_unpromoted_w_native", + "cl#5070 - Verify promotion order is affected when colocating unpromoted with primitive" ], + [ "anti-colocation-order", + "cl#5187 - Prevent resources in an anti-colocation from even temporarily running on a same node" ], + [ "anti-colocation-promoted", "Organize order of actions for promoted resources in anti-colocations" ], + [ "anti-colocation-unpromoted", "Organize order of actions for unpromoted resources in anti-colocations" ], + [ "group-anticolocation", "Group with failed last member anti-colocated with another group" ], + [ "group-colocation-failure", + "Group with sole member failed, colocated with another group" + ], + [ "enforce-colo1", "Always enforce B with A INFINITY" ], + [ "complex_enforce_colo", "Always enforce B with A INFINITY. (make sure heat-engine stops)" ], + [ "coloc-dependee-should-stay", "Stickiness outweighs group colocation" ], + [ "coloc-dependee-should-move", "Group colocation outweighs stickiness" ], + [ "colocation-influence", "Respect colocation influence" ], + [ "colocation-priority-group", "Apply group colocations in order of primary priority" ], + [ "colocation-vs-stickiness", "Group stickiness outweighs anti-colocation score" ], + [ "promoted-with-blocked", "Promoted role colocated with a resource with blocked start" ], + [ "primitive-with-group-with-clone", + "Consider group dependent when colocating with clone" + ], + [ "primitive-with-group-with-promoted", + "Consider group dependent when colocating with promoted role" + ], + [ "primitive-with-unrunnable-group", + "Block primitive colocated with group that can't start", + ], + ], + [ + [ "rsc-sets-seq-true", "Resource Sets - sequential=false" ], + [ "rsc-sets-seq-false", "Resource Sets - sequential=true" ], + [ "rsc-sets-clone", "Resource Sets - Clone" ], + [ "rsc-sets-promoted", "Resource Sets - Promoted" ], + [ "rsc-sets-clone-1", "Resource Sets - Clone (lf#2404)" ], + ], + [ + [ "attrs1", "string: eq (and)" ], + [ "attrs2", "string: lt / gt (and)" ], + [ "attrs3", "string: ne (or)" ], + [ "attrs4", "string: exists" ], + [ "attrs5", "string: not_exists" ], + [ "attrs6", "is_dc: true" ], + [ "attrs7", "is_dc: false" ], + [ "attrs8", "score_attribute" ], + [ "per-node-attrs", "Per node resource parameters" ], + ], + [ + [ "mon-rsc-1", "Schedule Monitor - start" ], + [ "mon-rsc-2", "Schedule Monitor - move" ], + [ "mon-rsc-3", "Schedule Monitor - pending start" ], + [ "mon-rsc-4", "Schedule Monitor - move/pending start" ], + ], + [ + [ "rec-rsc-0", "Resource Recover - no start" ], + [ "rec-rsc-1", "Resource Recover - start" ], + [ "rec-rsc-2", "Resource Recover - monitor" ], + [ "rec-rsc-3", "Resource Recover - stop - ignore" ], + [ "rec-rsc-4", "Resource Recover - stop - block" ], + [ "rec-rsc-5", "Resource Recover - stop - fence" ], + [ "rec-rsc-6", "Resource Recover - multiple - restart" ], + [ "rec-rsc-7", "Resource Recover - multiple - stop" ], + [ "rec-rsc-8", "Resource Recover - multiple - block" ], + [ "rec-rsc-9", "Resource Recover - group/group" ], + [ "stop-unexpected", "Recover multiply active group with stop_unexpected" ], + [ "stop-unexpected-2", "Resource multiply active primitve with stop_unexpected" ], + [ "monitor-recovery", "on-fail=block + resource recovery detected by recurring monitor" ], + [ "stop-failure-no-quorum", "Stop failure without quorum" ], + [ "stop-failure-no-fencing", "Stop failure without fencing available" ], + [ "stop-failure-with-fencing", "Stop failure with fencing available" ], + [ "multiple-active-block-group", "Support of multiple-active=block for resource groups" ], + [ "multiple-monitor-one-failed", + "Consider resource failed if any of the configured monitor operations failed" ], + ], + [ + [ "quorum-1", "No quorum - ignore" ], + [ "quorum-2", "No quorum - freeze" ], + [ "quorum-3", "No quorum - stop" ], + [ "quorum-4", "No quorum - start anyway" ], + [ "quorum-5", "No quorum - start anyway (group)" ], + [ "quorum-6", "No quorum - start anyway (clone)" ], + [ "bug-cl-5212", "No promotion with no-quorum-policy=freeze" ], + [ "suicide-needed-inquorate", "no-quorum-policy=suicide: suicide necessary" ], + [ "suicide-not-needed-initial-quorum", + "no-quorum-policy=suicide: suicide not necessary at initial quorum" ], + [ "suicide-not-needed-never-quorate", + "no-quorum-policy=suicide: suicide not necessary if never quorate" ], + [ "suicide-not-needed-quorate", "no-quorum-policy=suicide: suicide necessary if quorate" ], + ], + [ + [ "rec-node-1", "Node Recover - Startup - no fence" ], + [ "rec-node-2", "Node Recover - Startup - fence" ], + [ "rec-node-3", "Node Recover - HA down - no fence" ], + [ "rec-node-4", "Node Recover - HA down - fence" ], + [ "rec-node-5", "Node Recover - CRM down - no fence" ], + [ "rec-node-6", "Node Recover - CRM down - fence" ], + [ "rec-node-7", "Node Recover - no quorum - ignore" ], + [ "rec-node-8", "Node Recover - no quorum - freeze" ], + [ "rec-node-9", "Node Recover - no quorum - stop" ], + [ "rec-node-10", "Node Recover - no quorum - stop w/fence" ], + [ "rec-node-11", "Node Recover - CRM down w/ group - fence" ], + [ "rec-node-12", "Node Recover - nothing active - fence" ], + [ "rec-node-13", "Node Recover - failed resource + shutdown - fence" ], + [ "rec-node-15", "Node Recover - unknown lrm section" ], + [ "rec-node-14", "Serialize all stonith's" ], + ], + [ + [ "multi1", "Multiple Active (stop/start)" ], + ], + [ + [ "migrate-begin", "Normal migration" ], + [ "migrate-success", "Completed migration" ], + [ "migrate-partial-1", "Completed migration, missing stop on source" ], + [ "migrate-partial-2", "Successful migrate_to only" ], + [ "migrate-partial-3", "Successful migrate_to only, target down" ], + [ "migrate-partial-4", "Migrate from the correct host after migrate_to+migrate_from" ], + [ "bug-5186-partial-migrate", "Handle partial migration when src node loses membership" ], + [ "migrate-fail-2", "Failed migrate_from" ], + [ "migrate-fail-3", "Failed migrate_from + stop on source" ], + [ "migrate-fail-4", + "Failed migrate_from + stop on target - ideally we wouldn't need to re-stop on target" ], + [ "migrate-fail-5", "Failed migrate_from + stop on source and target" ], + [ "migrate-fail-6", "Failed migrate_to" ], + [ "migrate-fail-7", "Failed migrate_to + stop on source" ], + [ "migrate-fail-8", + "Failed migrate_to + stop on target - ideally we wouldn't need to re-stop on target" ], + [ "migrate-fail-9", "Failed migrate_to + stop on source and target" ], + [ "migration-ping-pong", "Old migrate_to failure + successful migrate_from on same node" ], + [ "migrate-stop", "Migration in a stopping stack" ], + [ "migrate-start", "Migration in a starting stack" ], + [ "migrate-stop_start", "Migration in a restarting stack" ], + [ "migrate-stop-complex", "Migration in a complex stopping stack" ], + [ "migrate-start-complex", "Migration in a complex starting stack" ], + [ "migrate-stop-start-complex", "Migration in a complex moving stack" ], + [ "migrate-shutdown", "Order the post-migration 'stop' before node shutdown" ], + [ "migrate-1", "Migrate (migrate)" ], + [ "migrate-2", "Migrate (stable)" ], + [ "migrate-3", "Migrate (failed migrate_to)" ], + [ "migrate-4", "Migrate (failed migrate_from)" ], + [ "novell-252693", "Migration in a stopping stack" ], + [ "novell-252693-2", "Migration in a starting stack" ], + [ "novell-252693-3", "Non-Migration in a starting and stopping stack" ], + [ "bug-1820", "Migration in a group" ], + [ "bug-1820-1", "Non-migration in a group" ], + [ "migrate-5", "Primitive migration with a clone" ], + [ "migrate-fencing", "Migration after Fencing" ], + [ "migrate-both-vms", "Migrate two VMs that have no colocation" ], + [ "migration-behind-migrating-remote", "Migrate resource behind migrating remote connection" ], + [ "1-a-then-bm-move-b", "Advanced migrate logic. A then B. migrate B" ], + [ "2-am-then-b-move-a", "Advanced migrate logic, A then B, migrate A without stopping B" ], + [ "3-am-then-bm-both-migrate", "Advanced migrate logic. A then B. migrate both" ], + [ "4-am-then-bm-b-not-migratable", "Advanced migrate logic, A then B, B not migratable" ], + [ "5-am-then-bm-a-not-migratable", "Advanced migrate logic. A then B. move both, a not migratable" ], + [ "6-migrate-group", "Advanced migrate logic, migrate a group" ], + [ "7-migrate-group-one-unmigratable", + "Advanced migrate logic, migrate group mixed with allow-migrate true/false" ], + [ "8-am-then-bm-a-migrating-b-stopping", + "Advanced migrate logic, A then B, A migrating, B stopping" ], + [ "9-am-then-bm-b-migrating-a-stopping", + "Advanced migrate logic, A then B, B migrate, A stopping" ], + [ "10-a-then-bm-b-move-a-clone", + "Advanced migrate logic, A clone then B, migrate B while stopping A" ], + [ "11-a-then-bm-b-move-a-clone-starting", + "Advanced migrate logic, A clone then B, B moving while A is start/stopping" ], + [ "a-promote-then-b-migrate", "A promote then B start. migrate B" ], + [ "a-demote-then-b-migrate", "A demote then B stop. migrate B" ], + [ "probe-target-of-failed-migrate_to-1", "Failed migrate_to, target rejoins" ], + [ "probe-target-of-failed-migrate_to-2", "Failed migrate_to, target rejoined and probed" ], + [ "partial-live-migration-multiple-active", "Prevent running on multiple nodes due to partial live migration" ], + [ "migration-intermediary-cleaned", + "Probe live-migration intermediary with no history" + ], + [ "bug-lf-2422", "Dependency on partially active group - stop ocfs:*" ], + ], + [ + [ "clone-anon-probe-1", "Probe the correct (anonymous) clone instance for each node" ], + [ "clone-anon-probe-2", "Avoid needless re-probing of anonymous clones" ], + [ "clone-anon-failcount", "Merge failcounts for anonymous clones" ], + [ "force-anon-clone-max", "Update clone-max properly when forcing a clone to be anonymous" ], + [ "anon-instance-pending", "Assign anonymous clone instance numbers properly when action pending" ], + [ "inc0", "Incarnation start" ], + [ "inc1", "Incarnation start order" ], + [ "inc2", "Incarnation silent restart, stop, move" ], + [ "inc3", "Inter-incarnation ordering, silent restart, stop, move" ], + [ "inc4", "Inter-incarnation ordering, silent restart, stop, move (ordered)" ], + [ "inc5", "Inter-incarnation ordering, silent restart, stop, move (restart 1)" ], + [ "inc6", "Inter-incarnation ordering, silent restart, stop, move (restart 2)" ], + [ "inc7", "Clone colocation" ], + [ "inc8", "Clone anti-colocation" ], + [ "inc9", "Non-unique clone" ], + [ "inc10", "Non-unique clone (stop)" ], + [ "inc11", "Primitive colocation with clones" ], + [ "inc12", "Clone shutdown" ], + [ "cloned-group", "Make sure only the correct number of cloned groups are started" ], + [ "cloned-group-stop", "Ensure stopping qpidd also stops glance and cinder" ], + [ "clone-no-shuffle", "Don't prioritize allocation of instances that must be moved" ], + [ "clone-max-zero", "Orphan processing with clone-max=0" ], + [ "clone-anon-dup", + "Bug LF#2087 - Correctly parse the state of anonymous clones that are active more than once per node" ], + [ "bug-lf-2160", "Don't shuffle clones due to colocation" ], + [ "bug-lf-2213", "clone-node-max enforcement for cloned groups" ], + [ "bug-lf-2153", "Clone ordering constraints" ], + [ "bug-lf-2361", "Ensure clones observe mandatory ordering constraints if the LHS is unrunnable" ], + [ "bug-lf-2317", "Avoid needless restart of primitive depending on a clone" ], + [ "bug-lf-2453", "Enforce mandatory clone ordering without colocation" ], + [ "bug-lf-2508", "Correctly reconstruct the status of anonymous cloned groups" ], + [ "bug-lf-2544", "Balanced clone placement" ], + [ "bug-lf-2445", "Redistribute clones with node-max > 1 and stickiness = 0" ], + [ "bug-lf-2574", "Avoid clone shuffle" ], + [ "bug-lf-2581", "Avoid group restart due to unrelated clone (re)start" ], + [ "bug-cl-5168", "Don't shuffle clones" ], + [ "bug-cl-5170", "Prevent clone from starting with on-fail=block" ], + [ "clone-fail-block-colocation", "Move colocated group when failed clone has on-fail=block" ], + [ "clone-interleave-1", + "Clone-3 cannot start on pcmk-1 due to interleaved ordering (no colocation)" ], + [ "clone-interleave-2", "Clone-3 must stop on pcmk-1 due to interleaved ordering (no colocation)" ], + [ "clone-interleave-3", + "Clone-3 must be recovered on pcmk-1 due to interleaved ordering (no colocation)" ], + [ "rebalance-unique-clones", "Rebalance unique clone instances with no stickiness" ], + [ "clone-requires-quorum-recovery", "Clone with requires=quorum on failed node needing recovery" ], + [ "clone-requires-quorum", + "Clone with requires=quorum with presumed-inactive instance on failed node" ], + ], + [ + [ "cloned_start_one", "order first clone then clone... first clone_min=2" ], + [ "cloned_start_two", "order first clone then clone... first clone_min=2" ], + [ "cloned_stop_one", "order first clone then clone... first clone_min=2" ], + [ "cloned_stop_two", "order first clone then clone... first clone_min=2" ], + [ "clone_min_interleave_start_one", + "order first clone then clone... first clone_min=2 and then has interleave=true" ], + [ "clone_min_interleave_start_two", + "order first clone then clone... first clone_min=2 and then has interleave=true" ], + [ "clone_min_interleave_stop_one", + "order first clone then clone... first clone_min=2 and then has interleave=true" ], + [ "clone_min_interleave_stop_two", + "order first clone then clone... first clone_min=2 and then has interleave=true" ], + [ "clone_min_start_one", "order first clone then primitive... first clone_min=2" ], + [ "clone_min_start_two", "order first clone then primitive... first clone_min=2" ], + [ "clone_min_stop_all", "order first clone then primitive... first clone_min=2" ], + [ "clone_min_stop_one", "order first clone then primitive... first clone_min=2" ], + [ "clone_min_stop_two", "order first clone then primitive... first clone_min=2" ], + ], + [ + [ "unfence-startup", "Clean unfencing" ], + [ "unfence-definition", "Unfencing when the agent changes" ], + [ "unfence-parameters", "Unfencing when the agent parameters changes" ], + [ "unfence-device", "Unfencing when a cluster has only fence devices" ], + ], + [ + [ "promoted-0", "Stopped -> Unpromoted" ], + [ "promoted-1", "Stopped -> Promote" ], + [ "promoted-2", "Stopped -> Promote : notify" ], + [ "promoted-3", "Stopped -> Promote : promoted location" ], + [ "promoted-4", "Started -> Promote : promoted location" ], + [ "promoted-5", "Promoted -> Promoted" ], + [ "promoted-6", "Promoted -> Promoted (2)" ], + [ "promoted-7", "Promoted -> Fenced" ], + [ "promoted-8", "Promoted -> Fenced -> Moved" ], + [ "promoted-9", "Stopped + Promotable + No quorum" ], + [ "promoted-10", "Stopped -> Promotable : notify with monitor" ], + [ "promoted-11", "Stopped -> Promote : colocation" ], + [ "novell-239082", "Demote/Promote ordering" ], + [ "novell-239087", "Stable promoted placement" ], + [ "promoted-12", "Promotion based solely on rsc_location constraints" ], + [ "promoted-13", "Include preferences of colocated resources when placing promoted" ], + [ "promoted-demote", "Ordering when actions depends on demoting an unpromoted resource" ], + [ "promoted-ordering", "Prevent resources from starting that need a promoted" ], + [ "bug-1765", "Verify promoted-with-promoted colocation does not stop unpromoted instances" ], + [ "promoted-group", "Promotion of cloned groups" ], + [ "bug-lf-1852", "Don't shuffle promotable instances unnecessarily" ], + [ "promoted-failed-demote", "Don't retry failed demote actions" ], + [ "promoted-failed-demote-2", "Don't retry failed demote actions (notify=false)" ], + [ "promoted-depend", + "Ensure resources that depend on promoted instance don't get allocated until that does" ], + [ "promoted-reattach", "Re-attach to a running promoted" ], + [ "promoted-allow-start", "Don't include promoted score if it would prevent allocation" ], + [ "promoted-colocation", + "Allow promoted instances placemaker to be influenced by colocation constraints" ], + [ "promoted-pseudo", "Make sure promote/demote pseudo actions are created correctly" ], + [ "promoted-role", "Prevent target-role from promoting more than promoted-max instances" ], + [ "bug-lf-2358", "Anti-colocation of promoted instances" ], + [ "promoted-promotion-constraint", "Mandatory promoted colocation constraints" ], + [ "unmanaged-promoted", "Ensure role is preserved for unmanaged resources" ], + [ "promoted-unmanaged-monitor", "Start correct monitor for unmanaged promoted instances" ], + [ "promoted-demote-2", "Demote does not clear past failure" ], + [ "promoted-move", "Move promoted based on failure of colocated group" ], + [ "promoted-probed-score", "Observe the promotion score of probed resources" ], + [ "colocation_constraint_stops_promoted", + "cl#5054 - Ensure promoted is demoted when stopped by colocation constraint" ], + [ "colocation_constraint_stops_unpromoted", + "cl#5054 - Ensure unpromoted is not demoted when stopped by colocation constraint" ], + [ "order_constraint_stops_promoted", + "cl#5054 - Ensure promoted is demoted when stopped by order constraint" ], + [ "order_constraint_stops_unpromoted", + "cl#5054 - Ensure unpromoted is not demoted when stopped by order constraint" ], + [ "promoted_monitor_restart", "cl#5072 - Ensure promoted monitor operation will start after promotion" ], + [ "bug-rh-880249", "Handle replacement of an m/s resource with a primitive" ], + [ "bug-5143-ms-shuffle", "Prevent promoted instance shuffling due to promotion score" ], + [ "promoted-demote-block", "Block promotion if demote fails with on-fail=block" ], + [ "promoted-dependent-ban", + "Don't stop instances from being active because a dependent is banned from that host" ], + [ "promoted-stop", "Stop instances due to location constraint with role=Started" ], + [ "promoted-partially-demoted-group", "Allow partially demoted group to finish demoting" ], + [ "bug-cl-5213", "Ensure role colocation with -INFINITY is enforced" ], + [ "bug-cl-5219", "Allow unrelated resources with a common colocation target to remain promoted" ], + [ "promoted-asymmetrical-order", + "Fix the behaviors of multi-state resources with asymmetrical ordering" ], + [ "promoted-notify", "Promotion with notifications" ], + [ "promoted-score-startup", "Use permanent promoted scores without LRM history" ], + [ "failed-demote-recovery", "Recover resource in unpromoted role after demote fails" ], + [ "failed-demote-recovery-promoted", "Recover resource in promoted role after demote fails" ], + [ "on_fail_demote1", "Recovery with on-fail=\"demote\" on healthy cluster, remote, guest, and bundle nodes" ], + [ "on_fail_demote2", "Recovery with on-fail=\"demote\" with promotion on different node" ], + [ "on_fail_demote3", "Recovery with on-fail=\"demote\" with no promotion" ], + [ "on_fail_demote4", "Recovery with on-fail=\"demote\" on failed cluster, remote, guest, and bundle nodes" ], + [ "no_quorum_demote", "Promotable demotion and primitive stop with no-quorum-policy=\"demote\"" ], + [ "no-promote-on-unrunnable-guest", "Don't select bundle instance for promotion when container can't run" ], + [ "leftover-pending-monitor", "Prevent a leftover pending monitor from causing unexpected stop of other instances" ], + ], + [ + [ "history-1", "Correctly parse stateful-1 resource state" ], + ], + [ + [ "managed-0", "Managed (reference)" ], + [ "managed-1", "Not managed - down" ], + [ "managed-2", "Not managed - up" ], + [ "bug-5028", "Shutdown should block if anything depends on an unmanaged resource" ], + [ "bug-5028-detach", "Ensure detach still works" ], + [ "bug-5028-bottom", + "Ensure shutdown still blocks if the blocked resource is at the bottom of the stack" ], + [ "unmanaged-stop-1", + "cl#5155 - Block the stop of resources if any depending resource is unmanaged" ], + [ "unmanaged-stop-2", + "cl#5155 - Block the stop of resources if the first resource in a mandatory stop order is unmanaged" ], + [ "unmanaged-stop-3", + "cl#5155 - Block the stop of resources if any depending resource in a group is unmanaged" ], + [ "unmanaged-stop-4", + "cl#5155 - Block the stop of resources if any depending resource in the middle of a group is unmanaged" ], + [ "unmanaged-block-restart", + "Block restart of resources if any dependent resource in a group is unmanaged" ], + ], + [ + [ "interleave-0", "Interleave (reference)" ], + [ "interleave-1", "coloc - not interleaved" ], + [ "interleave-2", "coloc - interleaved" ], + [ "interleave-3", "coloc - interleaved (2)" ], + [ "interleave-pseudo-stop", "Interleaved clone during stonith" ], + [ "interleave-stop", "Interleaved clone during stop" ], + [ "interleave-restart", "Interleaved clone during dependency restart" ], + ], + [ + [ "notify-0", "Notify reference" ], + [ "notify-1", "Notify simple" ], + [ "notify-2", "Notify simple, confirm" ], + [ "notify-3", "Notify move, confirm" ], + [ "novell-239079", "Notification priority" ], + #[ "notify-2", "Notify - 764" ], + [ "notifs-for-unrunnable", "Don't schedule notifications for an unrunnable action" ], + [ "route-remote-notify", "Route remote notify actions through correct cluster node" ], + [ "notify-behind-stopping-remote", "Don't schedule notifications behind stopped remote" ], + ], + [ + [ "594", "OSDL #594 - Unrunnable actions scheduled in transition" ], + [ "662", "OSDL #662 - Two resources start on one node when incarnation_node_max = 1" ], + [ "696", "OSDL #696 - CRM starts stonith RA without monitor" ], + [ "726", "OSDL #726 - Attempting to schedule rsc_posic041_monitor_5000 _after_ a stop" ], + [ "735", "OSDL #735 - Correctly detect that rsc_hadev1 is stopped on hadev3" ], + [ "764", "OSDL #764 - Missing monitor op for DoFencing:child_DoFencing:1" ], + [ "797", "OSDL #797 - Assert triggered: task_id_i > max_call_id" ], + [ "829", "OSDL #829" ], + [ "994", + "OSDL #994 - Stopping the last resource in a resource group causes the entire group to be restarted" ], + [ "994-2", "OSDL #994 - with a dependent resource" ], + [ "1360", "OSDL #1360 - Clone stickiness" ], + [ "1484", "OSDL #1484 - on_fail=stop" ], + [ "1494", "OSDL #1494 - Clone stability" ], + [ "unrunnable-1", "Unrunnable" ], + [ "unrunnable-2", "Unrunnable 2" ], + [ "stonith-0", "Stonith loop - 1" ], + [ "stonith-1", "Stonith loop - 2" ], + [ "stonith-2", "Stonith loop - 3" ], + [ "stonith-3", "Stonith startup" ], + [ "stonith-4", "Stonith node state" ], + [ "dc-fence-ordering", "DC needs fencing while other nodes are shutting down" ], + [ "bug-1572-1", "Recovery of groups depending on promotable role" ], + [ "bug-1572-2", "Recovery of groups depending on promotable role when promoted is not re-promoted" ], + [ "bug-1685", "Depends-on-promoted ordering" ], + [ "bug-1822", "Don't promote partially active groups" ], + [ "bug-pm-11", "New resource added to a m/s group" ], + [ "bug-pm-12", "Recover only the failed portion of a cloned group" ], + [ "bug-n-387749", "Don't shuffle clone instances" ], + [ "bug-n-385265", + "Don't ignore the failure stickiness of group children - resource_idvscommon should stay stopped" ], + [ "bug-n-385265-2", + "Ensure groups are migrated instead of remaining partially active on the current node" ], + [ "bug-lf-1920", "Correctly handle probes that find active resources" ], + [ "bnc-515172", "Location constraint with multiple expressions" ], + [ "colocate-primitive-with-clone", "Optional colocation with a clone" ], + [ "use-after-free-merge", "Use-after-free in native_merge_weights" ], + [ "bug-lf-2551", "STONITH ordering for stop" ], + [ "bug-lf-2606", "Stonith implies demote" ], + [ "bug-lf-2474", "Ensure resource op timeout takes precedence over op_defaults" ], + [ "bug-suse-707150", "Prevent vm-01 from starting due to colocation/ordering" ], + [ "bug-5014-A-start-B-start", "Verify when A starts B starts using symmetrical=false" ], + [ "bug-5014-A-stop-B-started", + "Verify when A stops B does not stop if it has already started using symmetric=false" ], + [ "bug-5014-A-stopped-B-stopped", + "Verify when A is stopped and B has not started, B does not start before A using symmetric=false" ], + [ "bug-5014-CthenAthenB-C-stopped", + "Verify when C then A is symmetrical=true, A then B is symmetric=false, and C is stopped that nothing starts" ], + [ "bug-5014-CLONE-A-start-B-start", + "Verify when A starts B starts using clone resources with symmetric=false" ], + [ "bug-5014-CLONE-A-stop-B-started", + "Verify when A stops B does not stop if it has already started using clone resources with symmetric=false" ], + [ "bug-5014-GROUP-A-start-B-start", + "Verify when A starts B starts when using group resources with symmetric=false" ], + [ "bug-5014-GROUP-A-stopped-B-started", + "Verify when A stops B does not stop if it has already started using group resources with symmetric=false" ], + [ "bug-5014-GROUP-A-stopped-B-stopped", + "Verify when A is stopped and B has not started, B does not start before A using group resources with symmetric=false" ], + [ "bug-5014-ordered-set-symmetrical-false", + "Verify ordered sets work with symmetrical=false" ], + [ "bug-5014-ordered-set-symmetrical-true", + "Verify ordered sets work with symmetrical=true" ], + [ "clbz5007-promotable-colocation", + "Verify use of colocation scores other than INFINITY and -INFINITY work on multi-state resources" ], + [ "bug-5038", "Prevent restart of anonymous clones when clone-max decreases" ], + [ "bug-5025-1", "Automatically clean up failcount after resource config change with reload" ], + [ "bug-5025-2", "Make sure clear failcount action isn't set when config does not change" ], + [ "bug-5025-3", "Automatically clean up failcount after resource config change with restart" ], + [ "bug-5025-4", "Clear failcount when last failure is a start op and rsc attributes changed" ], + [ "failcount", "Ensure failcounts are correctly expired" ], + [ "failcount-block", "Ensure failcounts are not expired when on-fail=block is present" ], + [ "per-op-failcount", "Ensure per-operation failcount is handled and not passed to fence agent" ], + [ "on-fail-ignore", "Ensure on-fail=ignore works even beyond migration-threshold" ], + [ "monitor-onfail-restart", "bug-5058 - Monitor failure with on-fail set to restart" ], + [ "monitor-onfail-stop", "bug-5058 - Monitor failure wiht on-fail set to stop" ], + [ "bug-5059", "No need to restart p_stateful1:*" ], + [ "bug-5069-op-enabled", "Test on-fail=ignore with failure when monitor is enabled" ], + [ "bug-5069-op-disabled", "Test on-fail-ignore with failure when monitor is disabled" ], + [ "obsolete-lrm-resource", "cl#5115 - Do not use obsolete lrm_resource sections" ], + [ "expire-non-blocked-failure", + "Ignore failure-timeout only if the failed operation has on-fail=block" ], + [ "asymmetrical-order-move", "Respect asymmetrical ordering when trying to move resources" ], + [ "asymmetrical-order-restart", "Respect asymmetrical ordering when restarting dependent resource" ], + [ "start-then-stop-with-unfence", "Avoid graph loop with start-then-stop constraint plus unfencing" ], + [ "order-expired-failure", "Order failcount cleanup after remote fencing" ], + [ "expired-stop-1", "Expired stop failure should not block resource" ], + + [ "ignore_stonith_rsc_order1", + "cl#5056- Ignore order constraint between stonith and non-stonith rsc" ], + [ "ignore_stonith_rsc_order2", + "cl#5056- Ignore order constraint with group rsc containing mixed stonith and non-stonith" ], + [ "ignore_stonith_rsc_order3", "cl#5056- Ignore order constraint, stonith clone and mixed group" ], + [ "ignore_stonith_rsc_order4", + "cl#5056- Ignore order constraint, stonith clone and clone with nested mixed group" ], + [ "honor_stonith_rsc_order1", + "cl#5056- Honor order constraint, stonith clone and pure stonith group(single rsc)" ], + [ "honor_stonith_rsc_order2", + "cl#5056- Honor order constraint, stonith clone and pure stonith group(multiple rsc)" ], + [ "honor_stonith_rsc_order3", + "cl#5056- Honor order constraint, stonith clones with nested pure stonith group" ], + [ "honor_stonith_rsc_order4", + "cl#5056- Honor order constraint, between two native stonith rscs" ], + [ "multiply-active-stonith", "Multiply active stonith" ], + [ "probe-timeout", "cl#5099 - Default probe timeout" ], + [ "order-first-probes", + "cl#5301 - respect order constraints when relevant resources are being probed" ], + [ "concurrent-fencing", "Allow performing fencing operations in parallel" ], + [ "priority-fencing-delay", "Delay fencing targeting the more significant node" ], + ], + [ + [ "systemhealth1", "System Health () #1" ], + [ "systemhealth2", "System Health () #2" ], + [ "systemhealth3", "System Health () #3" ], + [ "systemhealthn1", "System Health (None) #1" ], + [ "systemhealthn2", "System Health (None) #2" ], + [ "systemhealthn3", "System Health (None) #3" ], + [ "systemhealthm1", "System Health (Migrate On Red) #1" ], + [ "systemhealthm2", "System Health (Migrate On Red) #2" ], + [ "systemhealthm3", "System Health (Migrate On Red) #3" ], + [ "systemhealtho1", "System Health (Only Green) #1" ], + [ "systemhealtho2", "System Health (Only Green) #2" ], + [ "systemhealtho3", "System Health (Only Green) #3" ], + [ "systemhealthp1", "System Health (Progessive) #1" ], + [ "systemhealthp2", "System Health (Progessive) #2" ], + [ "systemhealthp3", "System Health (Progessive) #3" ], + [ "allow-unhealthy-nodes", "System Health (migrate-on-red + allow-unhealth-nodes)" ], + ], + [ + [ "utilization", "Placement Strategy - utilization" ], + [ "minimal", "Placement Strategy - minimal" ], + [ "balanced", "Placement Strategy - balanced" ], + ], + [ + [ "placement-stickiness", "Optimized Placement Strategy - stickiness" ], + [ "placement-priority", "Optimized Placement Strategy - priority" ], + [ "placement-location", "Optimized Placement Strategy - location" ], + [ "placement-capacity", "Optimized Placement Strategy - capacity" ], + ], + [ + [ "utilization-order1", "Utilization Order - Simple" ], + [ "utilization-order2", "Utilization Order - Complex" ], + [ "utilization-order3", "Utilization Order - Migrate" ], + [ "utilization-order4", "Utilization Order - Live Migration (bnc#695440)" ], + [ "utilization-complex", "Utilization with complex relationships" ], + [ "utilization-shuffle", + "Don't displace prmExPostgreSQLDB2 on act2, Start prmExPostgreSQLDB1 on act3" ], + [ "load-stopped-loop", "Avoid transition loop due to load_stopped (cl#5044)" ], + [ "load-stopped-loop-2", + "cl#5235 - Prevent graph loops that can be introduced by load_stopped -> migrate_to ordering" ], + ], + [ + [ "colocated-utilization-primitive-1", "Colocated Utilization - Primitive" ], + [ "colocated-utilization-primitive-2", "Colocated Utilization - Choose the most capable node" ], + [ "colocated-utilization-group", "Colocated Utilization - Group" ], + [ "colocated-utilization-clone", "Colocated Utilization - Clone" ], + [ "utilization-check-allowed-nodes", + "Only check the capacities of the nodes that can run the resource" ], + ], + [ + [ "reprobe-target_rc", "Ensure correct target_rc for reprobe of inactive resources" ], + [ "node-maintenance-1", "cl#5128 - Node maintenance" ], + [ "node-maintenance-2", "cl#5128 - Node maintenance (coming out of maintenance mode)" ], + [ "shutdown-maintenance-node", "Do not fence a maintenance node if it shuts down cleanly" ], + [ "rsc-maintenance", "Per-resource maintenance" ], + ], + [ + [ "not-installed-agent", "The resource agent is missing" ], + [ "not-installed-tools", "Something the resource agent needs is missing" ], + ], + [ + [ "stopped-monitor-00", "Stopped Monitor - initial start" ], + [ "stopped-monitor-01", "Stopped Monitor - failed started" ], + [ "stopped-monitor-02", "Stopped Monitor - started multi-up" ], + [ "stopped-monitor-03", "Stopped Monitor - stop started" ], + [ "stopped-monitor-04", "Stopped Monitor - failed stop" ], + [ "stopped-monitor-05", "Stopped Monitor - start unmanaged" ], + [ "stopped-monitor-06", "Stopped Monitor - unmanaged multi-up" ], + [ "stopped-monitor-07", "Stopped Monitor - start unmanaged multi-up" ], + [ "stopped-monitor-08", "Stopped Monitor - migrate" ], + [ "stopped-monitor-09", "Stopped Monitor - unmanage started" ], + [ "stopped-monitor-10", "Stopped Monitor - unmanaged started multi-up" ], + [ "stopped-monitor-11", "Stopped Monitor - stop unmanaged started" ], + [ "stopped-monitor-12", "Stopped Monitor - unmanaged started multi-up (target-role=Stopped)" ], + [ "stopped-monitor-20", "Stopped Monitor - initial stop" ], + [ "stopped-monitor-21", "Stopped Monitor - stopped single-up" ], + [ "stopped-monitor-22", "Stopped Monitor - stopped multi-up" ], + [ "stopped-monitor-23", "Stopped Monitor - start stopped" ], + [ "stopped-monitor-24", "Stopped Monitor - unmanage stopped" ], + [ "stopped-monitor-25", "Stopped Monitor - unmanaged stopped multi-up" ], + [ "stopped-monitor-26", "Stopped Monitor - start unmanaged stopped" ], + [ "stopped-monitor-27", "Stopped Monitor - unmanaged stopped multi-up (target-role=Started)" ], + [ "stopped-monitor-30", "Stopped Monitor - new node started" ], + [ "stopped-monitor-31", "Stopped Monitor - new node stopped" ], + ], + [ + # This is a combo test to check: + # - probe timeout defaults to the minimum-interval monitor's + # - duplicate recurring operations are ignored + # - if timeout spec is bad, the default timeout is used + # - failure is blocked with on-fail=block even if ISO8601 interval is specified + # - started/stopped role monitors are started/stopped on right nodes + [ "intervals", "Recurring monitor interval handling" ], + ], + [ + [ "ticket-primitive-1", "Ticket - Primitive (loss-policy=stop, initial)" ], + [ "ticket-primitive-2", "Ticket - Primitive (loss-policy=stop, granted)" ], + [ "ticket-primitive-3", "Ticket - Primitive (loss-policy-stop, revoked)" ], + [ "ticket-primitive-4", "Ticket - Primitive (loss-policy=demote, initial)" ], + [ "ticket-primitive-5", "Ticket - Primitive (loss-policy=demote, granted)" ], + [ "ticket-primitive-6", "Ticket - Primitive (loss-policy=demote, revoked)" ], + [ "ticket-primitive-7", "Ticket - Primitive (loss-policy=fence, initial)" ], + [ "ticket-primitive-8", "Ticket - Primitive (loss-policy=fence, granted)" ], + [ "ticket-primitive-9", "Ticket - Primitive (loss-policy=fence, revoked)" ], + [ "ticket-primitive-10", "Ticket - Primitive (loss-policy=freeze, initial)" ], + [ "ticket-primitive-11", "Ticket - Primitive (loss-policy=freeze, granted)" ], + [ "ticket-primitive-12", "Ticket - Primitive (loss-policy=freeze, revoked)" ], + [ "ticket-primitive-13", "Ticket - Primitive (loss-policy=stop, standby, granted)" ], + [ "ticket-primitive-14", "Ticket - Primitive (loss-policy=stop, granted, standby)" ], + [ "ticket-primitive-15", "Ticket - Primitive (loss-policy=stop, standby, revoked)" ], + [ "ticket-primitive-16", "Ticket - Primitive (loss-policy=demote, standby, granted)" ], + [ "ticket-primitive-17", "Ticket - Primitive (loss-policy=demote, granted, standby)" ], + [ "ticket-primitive-18", "Ticket - Primitive (loss-policy=demote, standby, revoked)" ], + [ "ticket-primitive-19", "Ticket - Primitive (loss-policy=fence, standby, granted)" ], + [ "ticket-primitive-20", "Ticket - Primitive (loss-policy=fence, granted, standby)" ], + [ "ticket-primitive-21", "Ticket - Primitive (loss-policy=fence, standby, revoked)" ], + [ "ticket-primitive-22", "Ticket - Primitive (loss-policy=freeze, standby, granted)" ], + [ "ticket-primitive-23", "Ticket - Primitive (loss-policy=freeze, granted, standby)" ], + [ "ticket-primitive-24", "Ticket - Primitive (loss-policy=freeze, standby, revoked)" ], + ], + [ + [ "ticket-group-1", "Ticket - Group (loss-policy=stop, initial)" ], + [ "ticket-group-2", "Ticket - Group (loss-policy=stop, granted)" ], + [ "ticket-group-3", "Ticket - Group (loss-policy-stop, revoked)" ], + [ "ticket-group-4", "Ticket - Group (loss-policy=demote, initial)" ], + [ "ticket-group-5", "Ticket - Group (loss-policy=demote, granted)" ], + [ "ticket-group-6", "Ticket - Group (loss-policy=demote, revoked)" ], + [ "ticket-group-7", "Ticket - Group (loss-policy=fence, initial)" ], + [ "ticket-group-8", "Ticket - Group (loss-policy=fence, granted)" ], + [ "ticket-group-9", "Ticket - Group (loss-policy=fence, revoked)" ], + [ "ticket-group-10", "Ticket - Group (loss-policy=freeze, initial)" ], + [ "ticket-group-11", "Ticket - Group (loss-policy=freeze, granted)" ], + [ "ticket-group-12", "Ticket - Group (loss-policy=freeze, revoked)" ], + [ "ticket-group-13", "Ticket - Group (loss-policy=stop, standby, granted)" ], + [ "ticket-group-14", "Ticket - Group (loss-policy=stop, granted, standby)" ], + [ "ticket-group-15", "Ticket - Group (loss-policy=stop, standby, revoked)" ], + [ "ticket-group-16", "Ticket - Group (loss-policy=demote, standby, granted)" ], + [ "ticket-group-17", "Ticket - Group (loss-policy=demote, granted, standby)" ], + [ "ticket-group-18", "Ticket - Group (loss-policy=demote, standby, revoked)" ], + [ "ticket-group-19", "Ticket - Group (loss-policy=fence, standby, granted)" ], + [ "ticket-group-20", "Ticket - Group (loss-policy=fence, granted, standby)" ], + [ "ticket-group-21", "Ticket - Group (loss-policy=fence, standby, revoked)" ], + [ "ticket-group-22", "Ticket - Group (loss-policy=freeze, standby, granted)" ], + [ "ticket-group-23", "Ticket - Group (loss-policy=freeze, granted, standby)" ], + [ "ticket-group-24", "Ticket - Group (loss-policy=freeze, standby, revoked)" ], + ], + [ + [ "ticket-clone-1", "Ticket - Clone (loss-policy=stop, initial)" ], + [ "ticket-clone-2", "Ticket - Clone (loss-policy=stop, granted)" ], + [ "ticket-clone-3", "Ticket - Clone (loss-policy-stop, revoked)" ], + [ "ticket-clone-4", "Ticket - Clone (loss-policy=demote, initial)" ], + [ "ticket-clone-5", "Ticket - Clone (loss-policy=demote, granted)" ], + [ "ticket-clone-6", "Ticket - Clone (loss-policy=demote, revoked)" ], + [ "ticket-clone-7", "Ticket - Clone (loss-policy=fence, initial)" ], + [ "ticket-clone-8", "Ticket - Clone (loss-policy=fence, granted)" ], + [ "ticket-clone-9", "Ticket - Clone (loss-policy=fence, revoked)" ], + [ "ticket-clone-10", "Ticket - Clone (loss-policy=freeze, initial)" ], + [ "ticket-clone-11", "Ticket - Clone (loss-policy=freeze, granted)" ], + [ "ticket-clone-12", "Ticket - Clone (loss-policy=freeze, revoked)" ], + [ "ticket-clone-13", "Ticket - Clone (loss-policy=stop, standby, granted)" ], + [ "ticket-clone-14", "Ticket - Clone (loss-policy=stop, granted, standby)" ], + [ "ticket-clone-15", "Ticket - Clone (loss-policy=stop, standby, revoked)" ], + [ "ticket-clone-16", "Ticket - Clone (loss-policy=demote, standby, granted)" ], + [ "ticket-clone-17", "Ticket - Clone (loss-policy=demote, granted, standby)" ], + [ "ticket-clone-18", "Ticket - Clone (loss-policy=demote, standby, revoked)" ], + [ "ticket-clone-19", "Ticket - Clone (loss-policy=fence, standby, granted)" ], + [ "ticket-clone-20", "Ticket - Clone (loss-policy=fence, granted, standby)" ], + [ "ticket-clone-21", "Ticket - Clone (loss-policy=fence, standby, revoked)" ], + [ "ticket-clone-22", "Ticket - Clone (loss-policy=freeze, standby, granted)" ], + [ "ticket-clone-23", "Ticket - Clone (loss-policy=freeze, granted, standby)" ], + [ "ticket-clone-24", "Ticket - Clone (loss-policy=freeze, standby, revoked)" ], + ], + [ + [ "ticket-promoted-1", "Ticket - Promoted (loss-policy=stop, initial)" ], + [ "ticket-promoted-2", "Ticket - Promoted (loss-policy=stop, granted)" ], + [ "ticket-promoted-3", "Ticket - Promoted (loss-policy-stop, revoked)" ], + [ "ticket-promoted-4", "Ticket - Promoted (loss-policy=demote, initial)" ], + [ "ticket-promoted-5", "Ticket - Promoted (loss-policy=demote, granted)" ], + [ "ticket-promoted-6", "Ticket - Promoted (loss-policy=demote, revoked)" ], + [ "ticket-promoted-7", "Ticket - Promoted (loss-policy=fence, initial)" ], + [ "ticket-promoted-8", "Ticket - Promoted (loss-policy=fence, granted)" ], + [ "ticket-promoted-9", "Ticket - Promoted (loss-policy=fence, revoked)" ], + [ "ticket-promoted-10", "Ticket - Promoted (loss-policy=freeze, initial)" ], + [ "ticket-promoted-11", "Ticket - Promoted (loss-policy=freeze, granted)" ], + [ "ticket-promoted-12", "Ticket - Promoted (loss-policy=freeze, revoked)" ], + [ "ticket-promoted-13", "Ticket - Promoted (loss-policy=stop, standby, granted)" ], + [ "ticket-promoted-14", "Ticket - Promoted (loss-policy=stop, granted, standby)" ], + [ "ticket-promoted-15", "Ticket - Promoted (loss-policy=stop, standby, revoked)" ], + [ "ticket-promoted-16", "Ticket - Promoted (loss-policy=demote, standby, granted)" ], + [ "ticket-promoted-17", "Ticket - Promoted (loss-policy=demote, granted, standby)" ], + [ "ticket-promoted-18", "Ticket - Promoted (loss-policy=demote, standby, revoked)" ], + [ "ticket-promoted-19", "Ticket - Promoted (loss-policy=fence, standby, granted)" ], + [ "ticket-promoted-20", "Ticket - Promoted (loss-policy=fence, granted, standby)" ], + [ "ticket-promoted-21", "Ticket - Promoted (loss-policy=fence, standby, revoked)" ], + [ "ticket-promoted-22", "Ticket - Promoted (loss-policy=freeze, standby, granted)" ], + [ "ticket-promoted-23", "Ticket - Promoted (loss-policy=freeze, granted, standby)" ], + [ "ticket-promoted-24", "Ticket - Promoted (loss-policy=freeze, standby, revoked)" ], + ], + [ + [ "ticket-rsc-sets-1", "Ticket - Resource sets (1 ticket, initial)" ], + [ "ticket-rsc-sets-2", "Ticket - Resource sets (1 ticket, granted)" ], + [ "ticket-rsc-sets-3", "Ticket - Resource sets (1 ticket, revoked)" ], + [ "ticket-rsc-sets-4", "Ticket - Resource sets (2 tickets, initial)" ], + [ "ticket-rsc-sets-5", "Ticket - Resource sets (2 tickets, granted)" ], + [ "ticket-rsc-sets-6", "Ticket - Resource sets (2 tickets, granted)" ], + [ "ticket-rsc-sets-7", "Ticket - Resource sets (2 tickets, revoked)" ], + [ "ticket-rsc-sets-8", "Ticket - Resource sets (1 ticket, standby, granted)" ], + [ "ticket-rsc-sets-9", "Ticket - Resource sets (1 ticket, granted, standby)" ], + [ "ticket-rsc-sets-10", "Ticket - Resource sets (1 ticket, standby, revoked)" ], + [ "ticket-rsc-sets-11", "Ticket - Resource sets (2 tickets, standby, granted)" ], + [ "ticket-rsc-sets-12", "Ticket - Resource sets (2 tickets, standby, granted)" ], + [ "ticket-rsc-sets-13", "Ticket - Resource sets (2 tickets, granted, standby)" ], + [ "ticket-rsc-sets-14", "Ticket - Resource sets (2 tickets, standby, revoked)" ], + [ "cluster-specific-params", "Cluster-specific instance attributes based on rules" ], + [ "site-specific-params", "Site-specific instance attributes based on rules" ], + ], + [ + [ "template-1", "Template - 1" ], + [ "template-2", "Template - 2" ], + [ "template-3", "Template - 3 (merge operations)" ], + [ "template-coloc-1", "Template - Colocation 1" ], + [ "template-coloc-2", "Template - Colocation 2" ], + [ "template-coloc-3", "Template - Colocation 3" ], + [ "template-order-1", "Template - Order 1" ], + [ "template-order-2", "Template - Order 2" ], + [ "template-order-3", "Template - Order 3" ], + [ "template-ticket", "Template - Ticket" ], + [ "template-rsc-sets-1", "Template - Resource Sets 1" ], + [ "template-rsc-sets-2", "Template - Resource Sets 2" ], + [ "template-rsc-sets-3", "Template - Resource Sets 3" ], + [ "template-rsc-sets-4", "Template - Resource Sets 4" ], + [ "template-clone-primitive", "Cloned primitive from template" ], + [ "template-clone-group", "Cloned group from template" ], + [ "location-sets-templates", "Resource sets and templates - Location" ], + [ "tags-coloc-order-1", "Tags - Colocation and Order (Simple)" ], + [ "tags-coloc-order-2", "Tags - Colocation and Order (Resource Sets with Templates)" ], + [ "tags-location", "Tags - Location" ], + [ "tags-ticket", "Tags - Ticket" ], + ], + [ + [ "container-1", "Container - initial" ], + [ "container-2", "Container - monitor failed" ], + [ "container-3", "Container - stop failed" ], + [ "container-4", "Container - reached migration-threshold" ], + [ "container-group-1", "Container in group - initial" ], + [ "container-group-2", "Container in group - monitor failed" ], + [ "container-group-3", "Container in group - stop failed" ], + [ "container-group-4", "Container in group - reached migration-threshold" ], + [ "container-is-remote-node", "Place resource within container when container is remote-node" ], + [ "bug-rh-1097457", "Kill user defined container/contents ordering" ], + [ "bug-cl-5247", "Graph loop when recovering m/s resource in a container" ], + [ "bundle-order-startup", "Bundle startup ordering" ], + [ "bundle-order-partial-start", + "Bundle startup ordering when some dependencies are already running" ], + [ "bundle-order-partial-start-2", + "Bundle startup ordering when some dependencies and the container are already running" ], + [ "bundle-order-stop", "Bundle stop ordering" ], + [ "bundle-order-partial-stop", "Bundle startup ordering when some dependencies are already stopped" ], + [ "bundle-order-stop-on-remote", "Stop nested resource after bringing up the connection" ], + [ "bundle-order-startup-clone", "Prevent startup because bundle isn't promoted" ], + [ "bundle-order-startup-clone-2", "Bundle startup with clones" ], + [ "bundle-order-stop-clone", "Stop bundle because clone is stopping" ], + [ "bundle-interleave-start", "Interleave bundle starts" ], + [ "bundle-interleave-promote", "Interleave bundle promotes" ], + [ "bundle-nested-colocation", "Colocation of nested connection resources" ], + [ "bundle-order-fencing", + "Order pseudo bundle fencing after parent node fencing if both are happening" ], + [ "bundle-probe-order-1", "order 1" ], + [ "bundle-probe-order-2", "order 2" ], + [ "bundle-probe-order-3", "order 3" ], + [ "bundle-probe-remotes", "Ensure remotes get probed too" ], + [ "bundle-replicas-change", "Change bundle from 1 replica to multiple" ], + [ "bundle-connection-with-container", "Don't move a container due to connection preferences" ], + [ "nested-remote-recovery", "Recover bundle's container hosted on remote node" ], + ], + [ + [ "whitebox-fail1", "Fail whitebox container rsc" ], + [ "whitebox-fail2", "Fail cluster connection to guest node" ], + [ "whitebox-fail3", "Failed containers should not run nested on remote nodes" ], + [ "whitebox-start", "Start whitebox container with resources assigned to it" ], + [ "whitebox-stop", "Stop whitebox container with resources assigned to it" ], + [ "whitebox-move", "Move whitebox container with resources assigned to it" ], + [ "whitebox-asymmetric", "Verify connection rsc opts-in based on container resource" ], + [ "whitebox-ms-ordering", "Verify promote/demote can not occur before connection is established" ], + [ "whitebox-ms-ordering-move", "Stop/Start cycle within a moving container" ], + [ "whitebox-orphaned", "Properly shutdown orphaned whitebox container" ], + [ "whitebox-orphan-ms", "Properly tear down orphan ms resources on remote-nodes" ], + [ "whitebox-unexpectedly-running", "Recover container nodes the cluster did not start" ], + [ "whitebox-migrate1", "Migrate both container and connection resource" ], + [ "whitebox-imply-stop-on-fence", + "imply stop action on container node rsc when host node is fenced" ], + [ "whitebox-nested-group", "Verify guest remote-node works nested in a group" ], + [ "guest-node-host-dies", "Verify guest node is recovered if host goes away" ], + [ "guest-node-cleanup", "Order guest node connection recovery after container probe" ], + [ "guest-host-not-fenceable", "Actions on guest node are unrunnable if host is unclean and cannot be fenced" ], + ], + [ + [ "remote-startup-probes", "Baremetal remote-node startup probes" ], + [ "remote-startup", "Startup a newly discovered remote-nodes with no status" ], + [ "remote-fence-unclean", "Fence unclean baremetal remote-node" ], + [ "remote-fence-unclean2", + "Fence baremetal remote-node after cluster node fails and connection can not be recovered" ], + [ "remote-fence-unclean-3", "Probe failed remote nodes (triggers fencing)" ], + [ "remote-move", "Move remote-node connection resource" ], + [ "remote-disable", "Disable a baremetal remote-node" ], + [ "remote-probe-disable", "Probe then stop a baremetal remote-node" ], + [ "remote-orphaned", "Properly shutdown orphaned connection resource" ], + [ "remote-orphaned2", + "verify we can handle orphaned remote connections with active resources on the remote" ], + [ "remote-recover", "Recover connection resource after cluster-node fails" ], + [ "remote-stale-node-entry", + "Make sure we properly handle leftover remote-node entries in the node section" ], + [ "remote-partial-migrate", + "Make sure partial migrations are handled before ops on the remote node" ], + [ "remote-partial-migrate2", + "Make sure partial migration target is prefered for remote connection" ], + [ "remote-recover-fail", "Make sure start failure causes fencing if rsc are active on remote" ], + [ "remote-start-fail", + "Make sure a start failure does not result in fencing if no active resources are on remote" ], + [ "remote-unclean2", + "Make monitor failure always results in fencing, even if no rsc are active on remote" ], + [ "remote-fence-before-reconnect", "Fence before clearing recurring monitor failure" ], + [ "remote-recovery", "Recover remote connections before attempting demotion" ], + [ "remote-recover-connection", "Optimistically recovery of only the connection" ], + [ "remote-recover-all", "Fencing when the connection has no home" ], + [ "remote-recover-no-resources", "Fencing when the connection has no home and no active resources" ], + [ "remote-recover-unknown", + "Fencing when the connection has no home and the remote has no operation history" ], + [ "remote-reconnect-delay", "Waiting for remote reconnect interval to expire" ], + [ "remote-connection-unrecoverable", + "Remote connection host must be fenced, with connection unrecoverable" ], + [ "remote-connection-shutdown", "Remote connection shutdown" ], + [ "cancel-behind-moving-remote", + "Route recurring monitor cancellations through original node of a moving remote connection" ], + ], + [ + [ "resource-discovery", "Exercises resource-discovery location constraint option" ], + [ "rsc-discovery-per-node", "Disable resource discovery per node" ], + [ "shutdown-lock", "Ensure shutdown lock works properly" ], + [ "shutdown-lock-expiration", "Ensure shutdown lock expiration works properly" ], + ], + [ + [ "op-defaults", "Test op_defaults conditional expressions" ], + [ "op-defaults-2", "Test op_defaults AND'ed conditional expressions" ], + [ "op-defaults-3", "Test op_defaults precedence" ], + [ "rsc-defaults", "Test rsc_defaults conditional expressions" ], + [ "rsc-defaults-2", "Test rsc_defaults conditional expressions without type" ], + ], + [ [ "stop-all-resources", "Test stop-all-resources=true "], + ], + [ [ "ocf_degraded-remap-ocf_ok", "Test degraded remapped to OK" ], + [ "ocf_degraded_promoted-remap-ocf_ok", "Test degraded promoted remapped to OK"], + ], +] + +TESTS_64BIT = [ + [ + [ "year-2038", "Check handling of timestamps beyond 2038-01-19 03:14:08 UTC" ], + ], +] + + +def is_executable(path): + """ Check whether a file at a given path is executable. """ + + try: + return os.stat(path)[stat.ST_MODE] & stat.S_IXUSR + except OSError: + return False + + +def diff(file1, file2, **kwargs): + """ Call diff on two files """ + + return subprocess.call([ "diff", "-u", "-N", "--ignore-all-space", + "--ignore-blank-lines", file1, file2 ], **kwargs) + + +def sort_file(filename): + """ Sort a file alphabetically """ + + with io.open(filename, "rt") as f: + lines = sorted(f) + with io.open(filename, "wt") as f: + f.writelines(lines) + + +def remove_files(filenames): + """ Remove a list of files """ + + for filename in filenames: + try: + os.remove(filename) + except OSError: + pass + + +def normalize(filename): + """ Remove text from a file that isn't important for comparison """ + + if not hasattr(normalize, "patterns"): + normalize.patterns = [ + re.compile(r'crm_feature_set="[^"]*"'), + re.compile(r'batch-limit="[0-9]*"') + ] + if os.path.isfile(filename): + with io.open(filename, "rt") as f: + lines = f.readlines() + with io.open(filename, "wt") as f: + for line in lines: + for pattern in normalize.patterns: + line = pattern.sub("", line) + f.write(line) + + +def cat(filename, dest=sys.stdout): + """ Copy a file to a destination file descriptor """ + + with io.open(filename, "rt") as f: + shutil.copyfileobj(f, dest) + + +class CtsScheduler(object): + """ Regression tests for Pacemaker's scheduler """ + + def _parse_args(self, argv): + """ Parse command-line arguments """ + + parser = argparse.ArgumentParser(description=DESC) + + parser.add_argument('-V', '--verbose', action='count', + help='Display any differences from expected output') + + parser.add_argument('--run', metavar='TEST', + help=('Run only single specified test (any further ' + 'arguments will be passed to crm_simulate)')) + + parser.add_argument('--update', action='store_true', + help='Update expected results with actual results') + + parser.add_argument('-b', '--binary', metavar='PATH', + help='Specify path to crm_simulate') + + parser.add_argument('-i', '--io-dir', metavar='PATH', + help='Specify path to regression test data directory') + + parser.add_argument('-o', '--out-dir', metavar='PATH', + help='Specify where intermediate and output files should go') + + parser.add_argument('-v', '--valgrind', action='store_true', + help='Run all commands under valgrind') + + parser.add_argument('--valgrind-dhat', action='store_true', + help='Run all commands under valgrind with heap analyzer') + + parser.add_argument('--valgrind-skip-output', action='store_true', + help='If running under valgrind, do not display output') + + parser.add_argument('--testcmd-options', metavar='OPTIONS', default='', + help='Additional options for command under test') + + # argparse can't handle "everything after --run TEST", so grab that + self.single_test_args = [] + narg = 0 + for arg in argv: + narg = narg + 1 + if arg == '--run': + (argv, self.single_test_args) = (argv[:narg+1], argv[narg+1:]) + break + + self.args = parser.parse_args(argv[1:]) + + def _error(self, s): + print(" * ERROR: %s" % s) + + def _failed(self, s): + print(" * FAILED: %s" % s) + + def _get_valgrind_cmd(self): + """ Return command arguments needed (or not) to run valgrind """ + + if self.args.valgrind: + os.environ['G_SLICE'] = "always-malloc" + return [ + "valgrind", + "-q", + "--gen-suppressions=all", + "--time-stamp=yes", + "--trace-children=no", + "--show-reachable=no", + "--leak-check=full", + "--num-callers=20", + "--suppressions=%s/valgrind-pcmk.suppressions" % (self.test_home) + ] + + if self.args.valgrind_dhat: + os.environ['G_SLICE'] = "always-malloc" + return [ + "valgrind", + "--tool=exp-dhat", + "--time-stamp=yes", + "--trace-children=no", + "--show-top-n=100", + "--num-callers=4" + ] + + return [] + + def _get_simulator_cmd(self): + """ Locate the simulation binary """ + + if self.args.binary is None: + self.args.binary = BuildOptions._BUILD_DIR + "/tools/crm_simulate" + if not is_executable(self.args.binary): + self.args.binary = BuildOptions.SBIN_DIR + "/crm_simulate" + + if not is_executable(self.args.binary): + # @TODO it would be more pythonic to raise an exception + self._error("Test binary " + self.args.binary + " not found") + sys.exit(ExitStatus.NOT_INSTALLED) + + return [ self.args.binary ] + shlex.split(self.args.testcmd_options) + + def set_schema_env(self): + """ Ensure schema directory environment variable is set, if possible """ + + try: + return os.environ['PCMK_schema_directory'] + except KeyError: + for d in [ os.path.join(BuildOptions._BUILD_DIR, "xml"), + BuildOptions.SCHEMA_DIR ]: + if os.path.isdir(d): + os.environ['PCMK_schema_directory'] = d + return d + return None + + def __init__(self, argv=sys.argv): + + # Ensure all command output is in portable locale for comparison + os.environ['LC_ALL'] = "C" + + self._parse_args(argv) + + # Where this executable lives + self.test_home = os.path.dirname(os.path.realpath(argv[0])) + + # Where test data resides + if self.args.io_dir is None: + self.args.io_dir = os.path.join(self.test_home, "scheduler") + + self.xml_input_dir = os.path.join(self.args.io_dir, "xml") + self.expected_dir = os.path.join(self.args.io_dir, "exp") + self.dot_expected_dir = os.path.join(self.args.io_dir, "dot") + self.scores_dir = os.path.join(self.args.io_dir, "scores") + self.summary_dir = os.path.join(self.args.io_dir, "summary") + self.stderr_expected_dir = os.path.join(self.args.io_dir, "stderr") + + # Create a temporary directory to store diff file + self.failed_dir = tempfile.mkdtemp(prefix='cts-scheduler_') + + # Where to store generated files + if self.args.out_dir is None: + self.args.out_dir = self.args.io_dir + self.failed_filename = os.path.join(self.failed_dir, "test-output.diff") + else: + self.failed_filename = os.path.join(self.args.out_dir, "test-output.diff") + os.environ['CIB_shadow_dir'] = self.args.out_dir + + self.failed_file = None + + self.outfile_out_dir = os.path.join(self.args.out_dir, "out") + self.dot_out_dir = os.path.join(self.args.out_dir, "dot") + self.scores_out_dir = os.path.join(self.args.out_dir, "scores") + self.summary_out_dir = os.path.join(self.args.out_dir, "summary") + self.stderr_out_dir = os.path.join(self.args.out_dir, "stderr") + self.valgrind_out_dir = os.path.join(self.args.out_dir, "valgrind") + + # Single test mode (if requested) + try: + # User can give test base name or file name of a test input + self.args.run = os.path.splitext(os.path.basename(self.args.run))[0] + except (AttributeError, TypeError): + pass # --run was not specified + + self.set_schema_env() + + # Arguments needed (or not) to run commands + self.valgrind_args = self._get_valgrind_cmd() + self.simulate_args = self._get_simulator_cmd() + + # Test counters + self.num_failed = 0 + self.num_tests = 0 + + # Ensure that the main output directory exists + # We don't want to create it with os.makedirs below + if not os.path.isdir(self.args.out_dir): + self._error("Output directory missing; can't create output files") + sys.exit(ExitStatus.CANTCREAT) + + # Create output subdirectories if they don't exist + try: + os.makedirs(self.outfile_out_dir, 0o755, True) + os.makedirs(self.dot_out_dir, 0o755, True) + os.makedirs(self.scores_out_dir, 0o755, True) + os.makedirs(self.summary_out_dir, 0o755, True) + os.makedirs(self.stderr_out_dir, 0o755, True) + if self.valgrind_args: + os.makedirs(self.valgrind_out_dir, 0o755, True) + except OSError as ex: + self._error("Unable to create output subdirectory: %s" % ex) + remove_files([ + self.outfile_out_dir, + self.dot_out_dir, + self.scores_out_dir, + self.summary_out_dir, + self.stderr_out_dir, + ]) + sys.exit(ExitStatus.CANTCREAT) + + def _compare_files(self, filename1, filename2): + """ Add any file differences to failed results """ + + if diff(filename1, filename2, stdout=subprocess.DEVNULL) != 0: + diff(filename1, filename2, stdout=self.failed_file, stderr=subprocess.DEVNULL) + self.failed_file.write("\n") + return True + return False + + def run_one(self, test_name, test_desc, test_args=[]): + """ Run one scheduler test """ + + print(" Test %-25s %s" % ((test_name + ":"), test_desc)) + + did_fail = False + self.num_tests = self.num_tests + 1 + + # Test inputs + input_filename = os.path.join( + self.xml_input_dir, "%s.xml" % test_name) + expected_filename = os.path.join( + self.expected_dir, "%s.exp" % test_name) + dot_expected_filename = os.path.join( + self.dot_expected_dir, "%s.dot" % test_name) + scores_filename = os.path.join( + self.scores_dir, "%s.scores" % test_name) + summary_filename = os.path.join( + self.summary_dir, "%s.summary" % test_name) + stderr_expected_filename = os.path.join( + self.stderr_expected_dir, "%s.stderr" % test_name) + + # (Intermediate) test outputs + output_filename = os.path.join( + self.outfile_out_dir, "%s.out" % test_name) + dot_output_filename = os.path.join( + self.dot_out_dir, "%s.dot.pe" % test_name) + score_output_filename = os.path.join( + self.scores_out_dir, "%s.scores.pe" % test_name) + summary_output_filename = os.path.join( + self.summary_out_dir, "%s.summary.pe" % test_name) + stderr_output_filename = os.path.join( + self.stderr_out_dir, "%s.stderr.pe" % test_name) + valgrind_output_filename = os.path.join( + self.valgrind_out_dir, "%s.valgrind" % test_name) + + # Common arguments for running test + test_cmd = [] + if self.valgrind_args: + test_cmd = self.valgrind_args + [ "--log-file=%s" % valgrind_output_filename ] + test_cmd = test_cmd + self.simulate_args + + # @TODO It would be more pythonic to raise exceptions for errors, + # then perhaps it would be nice to make a single-test class + + # Ensure necessary test inputs exist + if not os.path.isfile(input_filename): + self._error("No input") + self.num_failed = self.num_failed + 1 + return ExitStatus.NOINPUT + if not self.args.update and not os.path.isfile(expected_filename): + self._error("no stored output") + return ExitStatus.NOINPUT + + # Run simulation to generate summary output + if self.args.run: # Single test mode + test_cmd_full = test_cmd + [ '-x', input_filename, '-S' ] + test_args + print(" ".join(test_cmd_full)) + else: + # @TODO Why isn't test_args added here? + test_cmd_full = test_cmd + [ '-x', input_filename, '-S' ] + with io.open(summary_output_filename, "wt") as f: + simulation = subprocess.Popen(test_cmd_full, stdout=subprocess.PIPE, + stderr=subprocess.STDOUT, + env=os.environ) + # This makes diff happy regardless of --enable-compat-2.0. + # Use sed -E to make Linux and BSD special characters more compatible. + sed = subprocess.Popen(["sed", "-E", + "-e", "s/ocf::/ocf:/g", + "-e", r"s/Masters:/Promoted:/", + "-e", r"s/Slaves:/Unpromoted:/", + "-e", r"s/ Master( |\[|$)/ Promoted\1/", + "-e", r"s/ Slave / Unpromoted /", + ], stdin=simulation.stdout, stdout=f, + stderr=subprocess.STDOUT) + simulation.stdout.close() + sed.communicate() + if self.args.run: + cat(summary_output_filename) + + # Re-run simulation to generate dot, graph, and scores + test_cmd_full = test_cmd + [ + '-x', input_filename, + '-D', dot_output_filename, + '-G', output_filename, + '-sSQ' ] + test_args + with io.open(stderr_output_filename, "wt") as f_stderr, \ + io.open(score_output_filename, "wt") as f_score: + rc = subprocess.call(test_cmd_full, stdout=f_score, stderr=f_stderr, env=os.environ) + + # Check for test command failure + if rc != ExitStatus.OK: + self._failed("Test returned: %d" % rc) + did_fail = True + print(" ".join(test_cmd_full)) + + # Check for valgrind errors + if self.valgrind_args and not self.args.valgrind_skip_output: + if os.stat(valgrind_output_filename).st_size > 0: + self._failed("Valgrind reported errors") + did_fail = True + cat(valgrind_output_filename) + remove_files([ valgrind_output_filename ]) + + # Check for core dump + if os.path.isfile("core"): + self._failed("Core-file detected: core." + test_name) + did_fail = True + os.rename("core", "%s/core.%s" % (self.test_home, test_name)) + + # Check any stderr output + if os.path.isfile(stderr_expected_filename): + if self._compare_files(stderr_expected_filename, stderr_output_filename): + self._failed("stderr changed") + did_fail = True + elif os.stat(stderr_output_filename).st_size > 0: + self._failed("Output was written to stderr") + did_fail = True + cat(stderr_output_filename) + remove_files([ stderr_output_filename ]) + + # Check whether output graph exists, and normalize it + if (not os.path.isfile(output_filename) + or os.stat(output_filename).st_size == 0): + self._error("No graph produced") + did_fail = True + self.num_failed = self.num_failed + 1 + remove_files([ output_filename ]) + return ExitStatus.ERROR + normalize(output_filename) + + # Check whether dot output exists, and sort it + if (not os.path.isfile(dot_output_filename) or + os.stat(dot_output_filename).st_size == 0): + self._error("No dot-file summary produced") + did_fail = True + self.num_failed = self.num_failed + 1 + remove_files([ dot_output_filename, output_filename ]) + return ExitStatus.ERROR + with io.open(dot_output_filename, "rt") as f: + first_line = f.readline() # "digraph" line with opening brace + lines = f.readlines() + last_line = lines[-1] # closing brace + del lines[-1] + lines = sorted(set(lines)) # unique sort + with io.open(dot_output_filename, "wt") as f: + f.write(first_line) + f.writelines(lines) + f.write(last_line) + + # Check whether score output exists, and sort it + if (not os.path.isfile(score_output_filename) + or os.stat(score_output_filename).st_size == 0): + self._error("No allocation scores produced") + did_fail = True + self.num_failed = self.num_failed + 1 + remove_files([ score_output_filename, output_filename ]) + return ExitStatus.ERROR + else: + sort_file(score_output_filename) + + if self.args.update: + shutil.copyfile(output_filename, expected_filename) + shutil.copyfile(dot_output_filename, dot_expected_filename) + shutil.copyfile(score_output_filename, scores_filename) + shutil.copyfile(summary_output_filename, summary_filename) + print(" Updated expected outputs") + + if self._compare_files(summary_filename, summary_output_filename): + self._failed("summary changed") + did_fail = True + + if self._compare_files(dot_expected_filename, dot_output_filename): + self._failed("dot-file summary changed") + did_fail = True + else: + remove_files([ dot_output_filename ]) + + if self._compare_files(expected_filename, output_filename): + self._failed("xml-file changed") + did_fail = True + + if self._compare_files(scores_filename, score_output_filename): + self._failed("scores-file changed") + did_fail = True + + remove_files([ output_filename, + dot_output_filename, + score_output_filename, + summary_output_filename]) + + if did_fail: + self.num_failed = self.num_failed + 1 + return ExitStatus.ERROR + + return ExitStatus.OK + + def run_all(self): + """ Run all defined tests """ + + if platform.architecture()[0] == "64bit": + TESTS.extend(TESTS_64BIT) + + for group in TESTS: + for test in group: + try: + args = test[2] + except IndexError: + args = [] + self.run_one(test[0], test[1], args) + print() + + def _print_summary(self): + """ Print a summary of parameters for this test run """ + + print("Test home is:\t" + self.test_home) + print("Test binary is:\t" + self.args.binary) + if 'PCMK_schema_directory' in os.environ: + print("Schema home is:\t" + os.environ['PCMK_schema_directory']) + if self.valgrind_args != []: + print("Activating memory testing with valgrind") + print() + + def _test_results(self): + if self.num_failed == 0: + shutil.rmtree(self.failed_dir) + return ExitStatus.OK + + if os.path.isfile(self.failed_filename) and os.stat(self.failed_filename).st_size != 0: + if self.args.verbose: + self._error("Results of %d failed tests (out of %d):" % + (self.num_failed, self.num_tests)) + cat(self.failed_filename) + else: + self._error("Results of %d failed tests (out of %d) are in %s" % + (self.num_failed, self.num_tests, self.failed_filename)) + self._error("Use -V to display them after running the tests") + else: + self._error("%d (of %d) tests failed (no diff results)" % + (self.num_failed, self.num_tests)) + if os.path.isfile(self.failed_filename): + shutil.rmtree(self.failed_dir) + return ExitStatus.ERROR + + def run(self): + """ Run test(s) as specified """ + + # Check for pre-existing core so we don't think it's from us + if os.path.exists("core"): + self._failed("Can't run with core already present in " + self.test_home) + return ExitStatus.OSFILE + + self._print_summary() + + # Zero out the error log + self.failed_file = io.open(self.failed_filename, "wt") + + if self.args.run is None: + print("Performing the following tests from " + self.args.io_dir) + print() + self.run_all() + print() + self.failed_file.close() + rc = self._test_results() + else: + rc = self.run_one(self.args.run, "Single shot", self.single_test_args) + self.failed_file.close() + if self.num_failed > 0: + print("\nFailures:\nThese have also been written to: " + self.failed_filename + "\n") + cat(self.failed_filename) + shutil.rmtree(self.failed_dir) + + return rc + + +if __name__ == "__main__": + sys.exit(CtsScheduler().run()) + +# vim: set filetype=python expandtab tabstop=4 softtabstop=4 shiftwidth=4 textwidth=120: -- cgit v1.2.3