while (1) {
        lock ($baton);
        cond_wait ($baton) until $baton == $id;
        ...
        cond_broadcast ($baton);
    }