starpu_data_cpy.c 1.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354
  1. /* StarPU --- Runtime system for heterogeneous multicore architectures.
  2. *
  3. * Copyright (C) 2010, 2012 Université de Bordeaux 1
  4. *
  5. * StarPU is free software; you can redistribute it and/or modify
  6. * it under the terms of the GNU Lesser General Public License as published by
  7. * the Free Software Foundation; either version 2.1 of the License, or (at
  8. * your option) any later version.
  9. *
  10. * StarPU is distributed in the hope that it will be useful, but
  11. * WITHOUT ANY WARRANTY; without even the implied warranty of
  12. * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
  13. *
  14. * See the GNU Lesser General Public License in COPYING.LGPL for more details.
  15. */
  16. #include <starpu.h>
  17. #include "../helper.h"
  18. int main(int argc, char **argv)
  19. {
  20. int ret;
  21. int var1, var2;
  22. starpu_data_handle_t var1_handle, var2_handle;
  23. ret = starpu_init(NULL);
  24. if (ret == -ENODEV) return STARPU_TEST_SKIPPED;
  25. STARPU_CHECK_RETURN_VALUE(ret, "starpu_init");
  26. var1 = 42;
  27. var2 = 12;
  28. starpu_variable_data_register(&var1_handle, 0, (uintptr_t)&var1, sizeof(var1));
  29. starpu_variable_data_register(&var2_handle, 0, (uintptr_t)&var2, sizeof(var2));
  30. ret = starpu_data_cpy(var2_handle, var1_handle, 0, NULL, NULL);
  31. STARPU_CHECK_RETURN_VALUE(ret, "starpu_data_cpy");
  32. starpu_data_acquire(var2_handle, STARPU_R);
  33. ret = EXIT_SUCCESS;
  34. if (var2 != var1)
  35. {
  36. FPRINTF(stderr, "var2 is %d but it should be %d\n", var2, var1);
  37. ret = EXIT_FAILURE;
  38. }
  39. starpu_data_release(var2_handle);
  40. starpu_data_unregister(var1_handle);
  41. starpu_data_unregister(var2_handle);
  42. starpu_shutdown();
  43. STARPU_RETURN(ret);
  44. }