diff options
| author | Alex Auvolat <alex@adnab.me> | 2023-10-25 14:43:24 +0200 |
|---|---|---|
| committer | Alex Auvolat <alex@adnab.me> | 2023-10-25 14:43:24 +0200 |
| commit | 5b1f50be65c251a1dc0a4358c706c409f17a82c0 (patch) | |
| tree | 979c421f54baa259b4510423bcafe41b99feb6b1 /script/jepsen.garage/src/jepsen | |
| parent | 9df7fa0bcd8b00dee5926fe7778853d857b5636d (diff) | |
| download | garage-5b1f50be65c251a1dc0a4358c706c409f17a82c0.tar.gz garage-5b1f50be65c251a1dc0a4358c706c409f17a82c0.zip | |
jepsen: testing
Diffstat (limited to 'script/jepsen.garage/src/jepsen')
| -rw-r--r-- | script/jepsen.garage/src/jepsen/garage.clj | 1 | ||||
| -rw-r--r-- | script/jepsen.garage/src/jepsen/garage/nemesis.clj | 9 |
2 files changed, 10 insertions, 0 deletions
diff --git a/script/jepsen.garage/src/jepsen/garage.clj b/script/jepsen.garage/src/jepsen/garage.clj index 3fe527a6..17363c9d 100644 --- a/script/jepsen.garage/src/jepsen/garage.clj +++ b/script/jepsen.garage/src/jepsen/garage.clj @@ -28,6 +28,7 @@ "r" grgNemesis/scenario-r "pr" grgNemesis/scenario-pr "cpr" grgNemesis/scenario-cpr + "cdp" grgNemesis/scenario-cdp "dpr" grgNemesis/scenario-dpr}) (def patches diff --git a/script/jepsen.garage/src/jepsen/garage/nemesis.clj b/script/jepsen.garage/src/jepsen/garage/nemesis.clj index 0222e463..dfce0255 100644 --- a/script/jepsen.garage/src/jepsen/garage/nemesis.clj +++ b/script/jepsen.garage/src/jepsen/garage/nemesis.clj @@ -124,6 +124,14 @@ (combined/partition-package {:db (:db opts), :interval 1, :faults #{:partition}}) (reconfiguration-package {:interval 1})])) +(defn scenario-cdp + "Clock modifying + db + partition scenario" + [opts] + (combined/compose-packages + [(combined/clock-package {:db (:db opts), :interval 1, :faults #{:clock}}) + (combined/db-package {:db (:db opts), :interval 1, :faults #{:db :pause :kill}}) + (combined/partition-package {:db (:db opts), :interval 1, :faults #{:partition}})])) + (defn scenario-dpr "Db + partition + cluster reconfiguration scenario" [opts] @@ -131,3 +139,4 @@ [(combined/db-package {:db (:db opts), :interval 1, :faults #{:db :pause :kill}}) (combined/partition-package {:db (:db opts), :interval 1, :faults #{:partition}}) (reconfiguration-package {:interval 1})])) + |