/**
* Run `tasks` callback functions in parallel limited to `limit` parallel
* running tasks.
*
* Does not stop parallel execution on errors. *All tasks get executed.*
* The optional `callback` gets called after the longest running task finishes.
*
* @name parallelLimit
* @memberOf module:parallel
* @static
* @method
* @param {Number} limit - number of tasks running in parallel
* @param {Array} tasks - Array of callback functions of type `function (cb: Function)`
* @param {Function} [callback] - optional callback function called by last
* terminating function from `tasks`, needs to be of type
* `function (errors: Array<Error>, result: Array<any>, errpos: Array<Number>)`
* where `err` is either null or an Array containing the errors in the same
* order as the `res` results array. `errpos` gives the positions of errors in
* order as they occur.
* @example
* // runs 2 tasks in parallel
* parallelLimit(2, [
* (cb) => { cb(null, 1) },
* (cb) => { cb('error', 2) },
* (cb) => { cb(null, 3) }
* ], (err, res, errorpos) => {
* //> err = [ ,'error', ]
* //> res = [1, 2, 3]
* //> errorpos = [1]
* })
*/
export default function parallelLimit (limit, tasks, callback) {
let length = tasks.length
limit = Math.abs(limit || length)
let errpos = []
let errors = new Array(length)
let results = new Array(length)
let i = 0
let l = length
function cb (j, err, res) {
results[j] = res
errors[j] = err
if (err) errpos.push(j)
l--
if (i < length) {
run(i++)
} else if (callback && !l) {
if (!errpos.length) errors = null
callback(errors, results, errpos)
}
}
function run (j) {
let fn = tasks[j]
fn(function (err, res) {
cb(j, err, res)
})
}
(function () {
limit = limit < length ? limit : length
while (i < limit) {
run(i++)
}
})()
}