123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107 |
- #ifndef __MPI_CHOLESKY_H__
- #define __MPI_CHOLESKY_H__
- #include <string.h>
- #include <math.h>
- #include <sys/time.h>
- #ifdef STARPU_USE_CUDA
- #include <cuda.h>
- #include <cuda_runtime.h>
- #include <cublas.h>
- #endif
- #include <common/blas.h>
- #include <starpu.h>
- #define BLOCKSIZE (size/nblocks)
- static unsigned size = 4*1024;
- static unsigned nblocks = 16;
- static unsigned nbigblocks = 2;
- static unsigned noprio = 0;
- static unsigned display = 0;
- static unsigned dblockx = -1;
- static unsigned dblocky = -1;
- void chol_cpu_codelet_update_u11(void **, void *);
- void chol_cpu_codelet_update_u21(void **, void *);
- void chol_cpu_codelet_update_u22(void **, void *);
- #ifdef STARPU_USE_CUDA
- void chol_cublas_codelet_update_u11(void *descr[], void *_args);
- void chol_cublas_codelet_update_u21(void *descr[], void *_args);
- void chol_cublas_codelet_update_u22(void *descr[], void *_args);
- #endif
- static void __attribute__((unused)) parse_args(int argc, char **argv)
- {
- int i;
- for (i = 1; i < argc; i++)
- {
- if (strcmp(argv[i], "-size") == 0)
- {
- char *argptr;
- size = strtol(argv[++i], &argptr, 10);
- }
- if (strcmp(argv[i], "-dblockx") == 0)
- {
- char *argptr;
- dblockx = strtol(argv[++i], &argptr, 10);
- }
-
- if (strcmp(argv[i], "-dblocky") == 0)
- {
- char *argptr;
- dblocky = strtol(argv[++i], &argptr, 10);
- }
-
- if (strcmp(argv[i], "-nblocks") == 0)
- {
- char *argptr;
- nblocks = strtol(argv[++i], &argptr, 10);
- }
- if (strcmp(argv[i], "-nbigblocks") == 0)
- {
- char *argptr;
- nbigblocks = strtol(argv[++i], &argptr, 10);
- }
- if (strcmp(argv[i], "-no-prio") == 0)
- {
- noprio = 1;
- }
- if (strcmp(argv[i], "-display") == 0)
- {
- display = 1;
- }
- if (strcmp(argv[i], "-h") == 0)
- {
- printf("usage : %s [-display] [-size size] [-nblocks nblocks]\n", argv[0]);
- }
- }
- if (nblocks > size) nblocks = size;
- }
- #endif
|