/**
 * SERVER-32001: Test that indexing paths for non-unique, partial, unique, partial&unique
 * crud operations correctly handle WriteConflictExceptions.
 */

let conn = MongoRunner.runMongod();
let testDB = conn.getDB("test");

let t = testDB.jstests_parallel_allops;
t.drop();

assert.commandWorked(
    t.createIndex({x: 1, _id: 1}, {partialFilterExpression: {_id: {$lt: 500}}, unique: true}));
assert.commandWorked(t.createIndex({y: -1, _id: 1}, {unique: true}));
assert.commandWorked(
    t.createIndex({x: -1}, {partialFilterExpression: {_id: {$gte: 500}}, unique: false}));
assert.commandWorked(t.createIndex({y: 1}, {unique: false}));

let _id = {"#RAND_INT": [0, 1000]};
let ops = [
    {op: "remove", ns: t.getFullName(), query: {_id}, writeCmd: true},
    {
        op: "update",
        ns: t.getFullName(),
        query: {_id},
        update: {$inc: {x: 1}},
        upsert: true,
        writeCmd: true
    },
    {
        op: "update",
        ns: t.getFullName(),
        query: {_id},
        update: {$inc: {y: 1}},
        upsert: true,
        writeCmd: true
    },
];

let seconds = 5;
let parallel = 5;
let host = testDB.getMongo().host;

let benchArgs = {ops, seconds, parallel, host};

assert.commandWorked(testDB.adminCommand(
    {configureFailPoint: 'WTWriteConflictExceptionForReads', mode: {activationProbability: 0.01}}));
assert.commandWorked(testDB.adminCommand(
    {configureFailPoint: 'WTWriteConflictException', mode: {activationProbability: 0.01}}));
let res = benchRun(benchArgs);
printjson({res});

assert.commandWorked(
    testDB.adminCommand({configureFailPoint: 'WTWriteConflictException', mode: "off"}));
assert.commandWorked(
    testDB.adminCommand({configureFailPoint: 'WTWriteConflictExceptionForReads', mode: "off"}));
res = t.validate();
assert(res.valid, tojson(res));
MongoRunner.stopMongod(conn);
