int main(int argc, char **argv)
{
int ret;
starpu_init(NULL);
starpu_data_malloc_pinned_if_possible((void **)&buffer, VECTORSIZE);
starpu_vector_data_register(&v_handle, 0, (uintptr_t)buffer, VECTORSIZE, sizeof(char));
struct starpu_data_filter f = {
.filter_func = starpu_vector_divide_in_2_filter_func,
/* there are only 2 children */
.nchildren = 2,
/* the length of the first part */
.filter_arg = VECTORSIZE/2,
.get_nchildren = NULL,
.get_child_ops = NULL
};
unsigned iter;
for (iter = 0; iter < NITER; iter++)
{
starpu_data_map_filters(v_handle, 1, &f);
ret = use_handle(starpu_data_get_sub_data(v_handle, 1, 0));
if (ret == -ENODEV)
goto enodev;
ret = use_handle(starpu_data_get_sub_data(v_handle, 1, 1));
if (ret == -ENODEV)
goto enodev;
starpu_task_wait_for_all();
starpu_data_unpartition(v_handle, 0);
ret = use_handle(v_handle);
if (ret == -ENODEV)
goto enodev;
starpu_task_wait_for_all();
}
starpu_data_unregister(v_handle);
starpu_shutdown();
return 0;
enodev:
fprintf(stderr, "WARNING: No one can execute this task\n");
/* yes, we do not perform the computation but we did detect that no one
* could perform the kernel, so this is not an error from StarPU */
return 0;
}
int main(int argc, char **argv)
{
starpu_init(NULL);
/* Allocate all buffers and register them to StarPU */
unsigned b;
for (b = 0; b < NBUFFERS; b++)
{
starpu_data_malloc_pinned_if_possible((void **)&buffer[b], VECTORSIZE);
starpu_vector_data_register(&v_handle[b], 0,
(uintptr_t)buffer[b], VECTORSIZE, sizeof(char));
}
unsigned iter;
for (iter = 0; iter < NITER; iter++)
{
/* Use the buffers on the different workers so that it may not
* be in main memory anymore */
for (b = 0; b < NBUFFERS; b++)
use_handle(v_handle[b]);
starpu_task_wait_for_all();
/* Grab the different pieces of data into main memory */
for (b = 0; b < NBUFFERS; b++)
starpu_data_acquire(v_handle[b], STARPU_RW);
/* Release them */
for (b = 0; b < NBUFFERS; b++)
starpu_data_release(v_handle[b]);
}
/* do some cleanup */
for (b = 0; b < NBUFFERS; b++)
starpu_data_unregister(v_handle[b]);
starpu_shutdown();
return 0;
}
int main(int argc, char **argv)
{
int ret;
#ifdef STARPU_QUICK_CHECK
nbuffers /= 4;
niter /= 4;
vectorsize /= 8;
#endif
ret = starpu_initialize(NULL, &argc, &argv);
if (ret == -ENODEV) return STARPU_TEST_SKIPPED;
STARPU_CHECK_RETURN_VALUE(ret, "starpu_init");
/* Allocate all buffers and register them to StarPU */
int b;
for (b = 0; b < nbuffers; b++)
{
ret = starpu_malloc((void **)&buffer[b], vectorsize);
STARPU_CHECK_RETURN_VALUE(ret, "starpu_malloc");
starpu_vector_data_register(&v_handle[b], STARPU_MAIN_RAM,
(uintptr_t)buffer[b], vectorsize, sizeof(char));
}
int iter;
for (iter = 0; iter < niter; iter++)
{
/* Use the buffers on the different workers so that it may not
* be in main memory anymore */
for (b = 0; b < nbuffers; b++)
{
ret = use_handle(v_handle[b]);
if (ret == -ENODEV) goto enodev;
STARPU_CHECK_RETURN_VALUE(ret, "starpu_task_submit");
}
ret = starpu_task_wait_for_all();
STARPU_CHECK_RETURN_VALUE(ret, "starpu_task_wait_for_all");
/* Grab the different pieces of data into main memory */
for (b = 0; b < nbuffers; b++)
{
ret = starpu_data_acquire(v_handle[b], STARPU_RW);
STARPU_CHECK_RETURN_VALUE(ret, "starpu_data_acquire");
}
/* Release them */
for (b = 0; b < nbuffers; b++)
starpu_data_release(v_handle[b]);
}
/* do some cleanup */
for (b = 0; b < nbuffers; b++)
{
starpu_data_unregister(v_handle[b]);
starpu_free(buffer[b]);
}
starpu_shutdown();
return EXIT_SUCCESS;
enodev:
fprintf(stderr, "WARNING: No one can execute this task\n");
/* yes, we do not perform the computation but we did detect that no one
* could perform the kernel, so this is not an error from StarPU */
starpu_shutdown();
return STARPU_TEST_SKIPPED;
}
