Skip to content
Merged
Show file tree
Hide file tree
Changes from 1 commit
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
1 change: 1 addition & 0 deletions jepsen/project.clj
Original file line number Diff line number Diff line change
Expand Up @@ -13,5 +13,6 @@
[com.cognitect.aws/api "0.8.692"]
[com.cognitect.aws/endpoints "1.1.12.626"]
[com.cognitect.aws/dynamodb "847.2.1365.0"]
[com.cognitect.aws/sqs "847.2.1365.0"]
[org.slf4j/slf4j-nop "2.0.9"]]
:main elastickv.jepsen-test)
6 changes: 5 additions & 1 deletion jepsen/src/elastickv/db.clj
Original file line number Diff line number Diff line change
Expand Up @@ -97,7 +97,7 @@
(clojure.string/join ","))))

(defn- start-node!
[test node {:keys [bootstrap-node grpc-port redis-port dynamo-port s3-port data-dir raft-groups shard-ranges raft-engine]}]
[test node {:keys [bootstrap-node grpc-port redis-port dynamo-port s3-port sqs-port sqs-region data-dir raft-groups shard-ranges raft-engine]}]
(when (and (seq raft-groups)
(> (count raft-groups) 1)
(nil? shard-ranges))
Expand All @@ -110,6 +110,8 @@
(node-addr node (port-for dynamo-port node)))
s3 (when s3-port
(node-addr node (port-for s3-port node)))
sqs (when sqs-port
(node-addr node (port-for sqs-port node)))
raft-redis-map (build-raft-redis-map (:nodes test) grpc-port redis-port raft-groups)
bootstrap? (= node bootstrap-node)
args (cond-> [server-bin
Expand All @@ -121,6 +123,8 @@
"--raftRedisMap" raft-redis-map]
dynamo (conj "--dynamoAddress" dynamo)
s3 (conj "--s3Address" s3)
sqs (conj "--sqsAddress" sqs)
(and sqs sqs-region) (conj "--sqsRegion" sqs-region)
(seq raft-groups) (conj "--raftGroups" (build-raft-groups-arg node raft-groups))
(seq shard-ranges) (conj "--shardRanges" shard-ranges)
bootstrap? (conj "--raftBootstrap"))]
Expand Down
5 changes: 5 additions & 0 deletions jepsen/src/elastickv/jepsen_test.clj
Original file line number Diff line number Diff line change
Expand Up @@ -4,6 +4,7 @@
[elastickv.dynamodb-workload :as dynamodb-workload]
[elastickv.dynamodb-types-workload :as dynamodb-types-workload]
[elastickv.s3-workload :as s3-workload]
[elastickv.sqs-htfifo-workload :as sqs-htfifo-workload]
[jepsen.cli :as cli]))

(defn elastickv-test []
Expand All @@ -19,6 +20,10 @@
(defn elastickv-s3-test []
(s3-workload/elastickv-s3-test {}))

(defn elastickv-sqs-htfifo-test
([] (elastickv-sqs-htfifo-test {}))
([opts] (sqs-htfifo-workload/elastickv-sqs-htfifo-test opts)))

(defn -main
[& args]
(cli/run! (cli/single-test-cmd {:test-fn elastickv-test}) args))
Loading
Loading