Lines Matching refs:bm
79 PetscErrorCode PetscBenchReset(PetscBench bm) in PetscBenchReset() argument
82 PetscValidHeaderSpecific(bm, BM_CLASSID, 1); in PetscBenchReset()
83 …PetscCall(PetscLogHandlerDestroy(&bm->lhdlr)); // Temporarily here until PetscLogHandlerReset() ex… in PetscBenchReset()
84 PetscTryTypeMethod(bm, reset); in PetscBenchReset()
85 bm->setupcalled = PETSC_FALSE; in PetscBenchReset()
101 PetscErrorCode PetscBenchDestroy(PetscBench *bm) in PetscBenchDestroy() argument
104 PetscAssertPointer(bm, 1); in PetscBenchDestroy()
105 if (!*bm) PetscFunctionReturn(PETSC_SUCCESS); in PetscBenchDestroy()
106 PetscValidHeaderSpecific(*bm, BM_CLASSID, 1); in PetscBenchDestroy()
107 if (--((PetscObject)*bm)->refct > 0) { in PetscBenchDestroy()
108 *bm = NULL; in PetscBenchDestroy()
111 PetscCall(PetscBenchReset(*bm)); in PetscBenchDestroy()
112 PetscTryTypeMethod(*bm, destroy); in PetscBenchDestroy()
113 PetscCall(PetscHeaderDestroy(bm)); in PetscBenchDestroy()
130 PetscErrorCode PetscBenchSetUp(PetscBench bm) in PetscBenchSetUp() argument
133 PetscValidHeaderSpecific(bm, BM_CLASSID, 1); in PetscBenchSetUp()
134 if (bm->setupcalled) PetscFunctionReturn(PETSC_SUCCESS); in PetscBenchSetUp()
135 …PetscCall(PetscLogHandlerCreate(PETSC_COMM_WORLD, &bm->lhdlr)); // Temporarily here until PetscLog… in PetscBenchSetUp()
136 PetscCall(PetscLogHandlerSetType(bm->lhdlr, PETSCLOGHANDLERDEFAULT)); in PetscBenchSetUp()
137 PetscTryTypeMethod(bm, setup); in PetscBenchSetUp()
138 bm->setupcalled = PETSC_TRUE; in PetscBenchSetUp()
139 PetscTryTypeMethod(bm, run); in PetscBenchSetUp()
156 PetscErrorCode PetscBenchRun(PetscBench bm) in PetscBenchRun() argument
159 PetscValidHeaderSpecific(bm, BM_CLASSID, 1); in PetscBenchRun()
160 if (!bm->setupcalled) PetscCall(PetscBenchSetUp(bm)); in PetscBenchRun()
161 PetscCall(PetscLogHandlerStart(bm->lhdlr)); in PetscBenchRun()
162 PetscTryTypeMethod(bm, run); in PetscBenchRun()
163 PetscCall(PetscLogHandlerStop(bm->lhdlr)); in PetscBenchRun()
180 PetscErrorCode PetscBenchSetFromOptions(PetscBench bm) in PetscBenchSetFromOptions() argument
187 PetscValidHeaderSpecific(bm, BM_CLASSID, 1); in PetscBenchSetFromOptions()
188 PetscObjectOptionsBegin((PetscObject)bm); in PetscBenchSetFromOptions()
189 …bm_type", "PetscBench", "PetscBenchSetType", PetscBenchList, ((PetscObject)bm)->type_name, type, s… in PetscBenchSetFromOptions()
190 if (flg) PetscCall(PetscBenchSetType(bm, type)); in PetscBenchSetFromOptions()
191 …PetscCheck(((PetscObject)bm)->type_name, PetscObjectComm((PetscObject)bm), PETSC_ERR_ARG_WRONGSTAT… in PetscBenchSetFromOptions()
192 …PetscCall(PetscOptionsInt("-bm_size", "Size of benchmark", "PetscBenchSetSize", bm->size, &m, &flg… in PetscBenchSetFromOptions()
193 if (flg) PetscCall(PetscBenchSetSize(bm, m)); in PetscBenchSetFromOptions()
194 PetscTryTypeMethod(bm, setfromoptions, PetscOptionsObject); in PetscBenchSetFromOptions()
213 PetscErrorCode PetscBenchView(PetscBench bm, PetscViewer viewer) in PetscBenchView() argument
216 PetscValidHeaderSpecific(bm, BM_CLASSID, 1); in PetscBenchView()
218 PetscTryTypeMethod(bm, view, viewer); in PetscBenchView()
237 PetscErrorCode PetscBenchViewFromOptions(PetscBench bm, PetscObject bobj, const char optionname[]) in PetscBenchViewFromOptions() argument
240 PetscValidHeaderSpecific(bm, BM_CLASSID, 1); in PetscBenchViewFromOptions()
241 PetscCall(PetscObjectViewFromOptions((PetscObject)bm, bobj, optionname)); in PetscBenchViewFromOptions()
261 PetscErrorCode PetscBenchCreate(MPI_Comm comm, PetscBench *bm) in PetscBenchCreate() argument
264 PetscAssertPointer(bm, 2); in PetscBenchCreate()
267 …PetscCall(PetscHeaderCreate(*bm, BM_CLASSID, "BM", "PetscBench", "BM", comm, PetscBenchDestroy, Pe… in PetscBenchCreate()
268 (*bm)->size = PETSC_DECIDE; in PetscBenchCreate()
286 PetscErrorCode PetscBenchSetOptionsPrefix(PetscBench bm, const char pre[]) in PetscBenchSetOptionsPrefix() argument
289 PetscValidHeaderSpecific(bm, BM_CLASSID, 1); in PetscBenchSetOptionsPrefix()
290 PetscCall(PetscObjectSetOptionsPrefix((PetscObject)bm, pre)); in PetscBenchSetOptionsPrefix()
308 PetscErrorCode PetscBenchSetSize(PetscBench bm, PetscInt n) in PetscBenchSetSize() argument
311 PetscValidHeaderSpecific(bm, BM_CLASSID, 1); in PetscBenchSetSize()
312 if (bm->size > 0 && bm->size != n && bm->setupcalled) { in PetscBenchSetSize()
313 PetscCall(PetscBenchReset(bm)); in PetscBenchSetSize()
314 bm->setupcalled = PETSC_FALSE; in PetscBenchSetSize()
316 …PetscCheck(n > 0, PetscObjectComm((PetscObject)bm), PETSC_ERR_ARG_OUTOFRANGE, "Illegal value of n.… in PetscBenchSetSize()
317 bm->size = n; in PetscBenchSetSize()
337 PetscErrorCode PetscBenchGetSize(PetscBench bm, PetscInt *n) in PetscBenchGetSize() argument
340 PetscValidHeaderSpecific(bm, BM_CLASSID, 1); in PetscBenchGetSize()
342 *n = bm->size; in PetscBenchGetSize()
366 PetscErrorCode PetscBenchSetType(PetscBench bm, PetscBenchType type) in PetscBenchSetType() argument
372 PetscValidHeaderSpecific(bm, BM_CLASSID, 1); in PetscBenchSetType()
375 PetscCall(PetscObjectTypeCompare((PetscObject)bm, type, &match)); in PetscBenchSetType()
379 …PetscCheck(r, PetscObjectComm((PetscObject)bm), PETSC_ERR_ARG_UNKNOWN_TYPE, "Unable to find reques… in PetscBenchSetType()
381 PetscTryTypeMethod(bm, destroy); in PetscBenchSetType()
382 bm->ops->destroy = NULL; in PetscBenchSetType()
383 bm->data = NULL; in PetscBenchSetType()
385 PetscCall(PetscFunctionListDestroy(&((PetscObject)bm)->qlist)); in PetscBenchSetType()
387 PetscCall(PetscMemzero(bm->ops, sizeof(struct _PetscBenchOps))); in PetscBenchSetType()
389 PetscCall(PetscObjectChangeTypeName((PetscObject)bm, type)); in PetscBenchSetType()
390 PetscCall((*r)(bm)); in PetscBenchSetType()
410 PetscErrorCode PetscBenchGetType(PetscBench bm, PetscBenchType *type) in PetscBenchGetType() argument
413 PetscValidHeaderSpecific(bm, BM_CLASSID, 1); in PetscBenchGetType()
415 *type = ((PetscObject)bm)->type_name; in PetscBenchGetType()