/* Initialize the thread pool data structure */
xbt_parmap_t parmap = xbt_new0(s_xbt_parmap_t, 1);
+#ifdef HAVE_FUTEX_H
parmap->sync_event = xbt_new0(s_xbt_event_t, 1);
+#endif
parmap->num_workers = num_workers;
parmap->status = PARMAP_WORK;
+#ifdef HAVE_FUTEX_H
parmap->sync_event->threads_to_wait = num_workers;
-
+#endif
/* Create the pool of worker threads */
for(i=0; i < num_workers; i++){
worker = xbt_os_thread_create(NULL, _xbt_parmap_worker_main, parmap, NULL);
xbt_os_thread_detach(worker);
}
-
+#ifdef HAVE_FUTEX_H
xbt_event_init(parmap->sync_event);
+#endif
return parmap;
}
{
XBT_DEBUG("Destroy parmap %p", parmap);
parmap->status = PARMAP_DESTROY;
+#ifdef HAVE_FUTEX_H
xbt_event_signal(parmap->sync_event);
xbt_free(parmap->sync_event);
+#endif
xbt_free(parmap);
}
/* Assign resources to worker threads*/
parmap->fun = fun;
parmap->data = data;
-
+ parmap->index = 0;
+#ifdef HAVE_FUTEX_H
xbt_event_signal(parmap->sync_event);
-
+#endif
XBT_DEBUG("Job done");
}
static void *_xbt_parmap_worker_main(void *arg)
{
- unsigned int data_start, data_end, data_size, worker_id;
+ unsigned int worker_id;
xbt_parmap_t parmap = (xbt_parmap_t)arg;
/* Fetch a worker id */
/* Worker's main loop */
while(1){
+#ifdef HAVE_FUTEX_H
xbt_event_wait(parmap->sync_event);
+#endif
if(parmap->status == PARMAP_WORK){
- XBT_DEBUG("Worker %u got a job", worker_id);
-
- /* Compute how much data does every worker gets */
- data_size = (xbt_dynar_length(parmap->data) / parmap->num_workers)
- + ((xbt_dynar_length(parmap->data) % parmap->num_workers) ? 1 : 0);
+ unsigned int i;
+ unsigned int n = 0;
- /* Each worker data segment starts in a position associated with its id*/
- data_start = data_size * worker_id;
-
- /* The end of the worker data segment must be bounded by the end of the data vector */
- data_end = MIN(data_start + data_size, xbt_dynar_length(parmap->data));
-
- XBT_DEBUG("Worker %u: data_start=%u data_end=%u (data_size=%u)",
- worker_id, data_start, data_end, data_size);
+ XBT_DEBUG("Worker %u got a job", worker_id);
- /* While the worker don't pass the end of it data segment apply the function */
- while(data_start < data_end){
- parmap->fun(*(void **)xbt_dynar_get_ptr(parmap->data, data_start));
- data_start++;
+ while ((i = __sync_fetch_and_add(&parmap->index, 1))
+ < xbt_dynar_length(parmap->data)) {
+ parmap->fun(xbt_dynar_get_as(parmap->data, i, void*));
+ n++;
}
+ XBT_DEBUG("Worker %u processed %u tasks", worker_id, n);
+
/* We are destroying the parmap */
}else{
+#ifdef HAVE_FUTEX_H
xbt_event_end(parmap->sync_event);
+#endif
XBT_DEBUG("Shutting down worker %u", worker_id);
return NULL;
}