path: root/cts/cts-scheduler.in

#!@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: