19 PetscErrorCode PetscLogStateCreate(PetscLogState *state)  in PetscLogStateCreate()  argument
25   PetscCall(PetscNew(state));  in PetscLogStateCreate()
26   s = *state;  in PetscLogStateCreate()
57 PetscErrorCode PetscLogStateDestroy(PetscLogState *state)  in PetscLogStateDestroy()  argument
62   s      = *state;  in PetscLogStateDestroy()
63   *state = NULL;  in PetscLogStateDestroy()
88 PetscErrorCode PetscLogStateStagePush(PetscLogState state, PetscLogStage stage)  in PetscLogStateStagePush()  argument
93     PetscCall(PetscLogRegistryGetNumStages(state->registry, &num_stages, NULL));  in PetscLogStateStagePush()
96   PetscCall(PetscIntStackPush(state->stage_stack, stage));  in PetscLogStateStagePush()
97   state->current_stage = stage;  in PetscLogStateStagePush()
116 PetscErrorCode PetscLogStateStagePop(PetscLogState state)  in PetscLogStateStagePop()  argument
122   PetscCall(PetscIntStackPop(state->stage_stack, &curStage));  in PetscLogStateStagePop()
123   PetscCall(PetscIntStackEmpty(state->stage_stack, &empty));  in PetscLogStateStagePop()
124   if (!empty) PetscCall(PetscIntStackTop(state->stage_stack, &state->current_stage));  in PetscLogStateStagePop()
125   else state->current_stage = -1;  in PetscLogStateStagePop()
147 PetscErrorCode PetscLogStateGetCurrentStage(PetscLogState state, PetscLogStage *current)  in PetscLogStateGetCurrentStage()  argument
150   *current = state->current_stage;  in PetscLogStateGetCurrentStage()
154 static PetscErrorCode PetscLogStateResize(PetscLogState state)  in PetscLogStateResize()  argument
161   PetscCall(PetscLogRegistryGetNumEvents(state->registry, NULL, &new_num_events));  in PetscLogStateResize()
163   PetscCall(PetscLogRegistryGetNumStages(state->registry, NULL, &new_num_stages));  in PetscLogStateResize()
165 …if (state->bt_num_events == new_num_events && state->bt_num_stages == new_num_stages) PetscFunctio…  in PetscLogStateResize()
168   if (new_num_stages == state->bt_num_stages) {  in PetscLogStateResize()
170     size_t num_chars = (state->bt_num_stages * state->bt_num_events) / PETSC_BITS_PER_BYTE;  in PetscLogStateResize()
172     PetscCall(PetscMemcpy(active_new, state->active, num_chars));  in PetscLogStateResize()
174     size_t num_chars_old = state->bt_num_stages / PETSC_BITS_PER_BYTE;  in PetscLogStateResize()
177 …for (PetscInt i = 0; i < state->bt_num_events; i++) PetscCall(PetscMemcpy(&active_new[i * num_char…  in PetscLogStateResize()
179   PetscCall(PetscBTDestroy(&state->active));  in PetscLogStateResize()
180   state->active = active_new;  in PetscLogStateResize()
181   PetscCall(PetscCIntCast(new_num_events, &state->bt_num_events));  in PetscLogStateResize()
182   PetscCall(PetscCIntCast(new_num_stages, &state->bt_num_stages));  in PetscLogStateResize()
205 PetscErrorCode PetscLogStateStageRegister(PetscLogState state, const char sname[], PetscLogStage *s…  in PetscLogStateStageRegister()  argument
210   PetscCall(PetscLogRegistryStageRegister(state->registry, sname, stage));  in PetscLogStateStageRegister()
211   PetscCall(PetscLogStateResize(state));  in PetscLogStateStageRegister()
213   PetscCall(PetscBTSet(state->active, s)); // stages are by default active  in PetscLogStateStageRegister()
214   for (PetscInt e = 1; e < state->bt_num_events; e++) {  in PetscLogStateStageRegister()
216     if (PetscBTLookup(state->active, 0 + e * state->bt_num_stages)) {  in PetscLogStateStageRegister()
217       PetscCall(PetscBTSet(state->active, s + e * state->bt_num_stages));  in PetscLogStateStageRegister()
219       PetscCall(PetscBTClear(state->active, s + e * state->bt_num_stages));  in PetscLogStateStageRegister()
245 PetscErrorCode PetscLogStateEventRegister(PetscLogState state, const char sname[], PetscClassId id,…  in PetscLogStateEventRegister()  argument
251   PetscCall(PetscLogRegistryGetEventFromName(state->registry, sname, event));  in PetscLogStateEventRegister()
253   PetscCall(PetscLogRegistryEventRegister(state->registry, sname, id, event));  in PetscLogStateEventRegister()
254   PetscCall(PetscLogStateResize(state));  in PetscLogStateEventRegister()
256 …for (PetscInt s = 0; s < state->bt_num_stages; s++) PetscCall(PetscBTSet(state->active, s + (e + 1…  in PetscLogStateEventRegister()
277 PetscErrorCode PetscLogStateEventSetCollective(PetscLogState state, PetscLogEvent event, PetscBool …  in PetscLogStateEventSetCollective()  argument
280   PetscCall(PetscLogRegistryEventSetCollective(state->registry, event, collective));  in PetscLogStateEventSetCollective()
301 PetscErrorCode PetscLogStateStageSetActive(PetscLogState state, PetscLogStage stage, PetscBool isAc…  in PetscLogStateStageSetActive()  argument
304 …e >= 0 && stage < state->bt_num_stages, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Invalid stage …  in PetscLogStateStageSetActive()
306 …for (PetscInt e = 0; e < state->bt_num_events; e++) PetscCall(PetscBTSet(state->active, stage + e …  in PetscLogStateStageSetActive()
308 …for (PetscInt e = 0; e < state->bt_num_events; e++) PetscCall(PetscBTClear(state->active, stage + …  in PetscLogStateStageSetActive()
332 PetscErrorCode PetscLogStateStageGetActive(PetscLogState state, PetscLogStage stage, PetscBool *isA…  in PetscLogStateStageGetActive()  argument
335   *isActive = PetscBTLookup(state->active, stage) ? PETSC_TRUE : PETSC_FALSE;  in PetscLogStateStageGetActive()
357 PetscErrorCode PetscLogStateEventSetActive(PetscLogState state, PetscLogStage stage, PetscLogEvent …  in PetscLogStateEventSetActive()  argument
360   stage = (stage < 0) ? state->current_stage : stage;  in PetscLogStateEventSetActive()
361 …t >= 0 && event < state->bt_num_events, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Invalid event …  in PetscLogStateEventSetActive()
362 …e >= 0 && stage < state->bt_num_stages, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Invalid stage …  in PetscLogStateEventSetActive()
363 …etscCall((isActive ? PetscBTSet : PetscBTClear)(state->active, state->current_stage + (event + 1) …  in PetscLogStateEventSetActive()
384 PetscErrorCode PetscLogStateEventSetActiveAll(PetscLogState state, PetscLogEvent event, PetscBool i…  in PetscLogStateEventSetActiveAll()  argument
387 …t >= 0 && event < state->bt_num_events, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Invalid event …  in PetscLogStateEventSetActiveAll()
388 …stage < state->bt_num_stages; stage++) PetscCall((isActive ? PetscBTSet : PetscBTClear)(state->act…  in PetscLogStateEventSetActiveAll()
413 PetscErrorCode PetscLogStateClassSetActive(PetscLogState state, PetscLogStage stage, PetscClassId c…  in PetscLogStateClassSetActive()  argument
418   stage = stage < 0 ? state->current_stage : stage;  in PetscLogStateClassSetActive()
419 …e >= 0 && stage < state->bt_num_stages, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Invalid stage …  in PetscLogStateClassSetActive()
420   PetscCall(PetscLogRegistryGetNumEvents(state->registry, &num_events, NULL));  in PetscLogStateClassSetActive()
423     PetscCall(PetscLogRegistryEventGetInfo(state->registry, e, &event_info));  in PetscLogStateClassSetActive()
424 …lassid) PetscCall((isActive ? PetscBTSet : PetscBTClear)(state->active, stage + (e + 1) * state->b…  in PetscLogStateClassSetActive()
448 PetscErrorCode PetscLogStateClassSetActiveAll(PetscLogState state, PetscClassId classid, PetscBool …  in PetscLogStateClassSetActiveAll()  argument
453   PetscCall(PetscLogRegistryGetNumEvents(state->registry, &num_events, NULL));  in PetscLogStateClassSetActiveAll()
454   PetscCall(PetscLogRegistryGetNumStages(state->registry, &num_stages, NULL));  in PetscLogStateClassSetActiveAll()
457     PetscCall(PetscLogRegistryEventGetInfo(state->registry, e, &event_info));  in PetscLogStateClassSetActiveAll()
459 …ges; s++) PetscCall((isActive ? PetscBTSet : PetscBTClear)(state->active, s + (e + 1) * state->bt_…  in PetscLogStateClassSetActiveAll()
486 PetscErrorCode PetscLogStateEventGetActive(PetscLogState state, PetscLogStage stage, PetscLogEvent …  in PetscLogStateEventGetActive()  argument
489   stage = (stage < 0) ? state->current_stage : stage;  in PetscLogStateEventGetActive()
490 …t >= 0 && event < state->bt_num_events, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Invalid event …  in PetscLogStateEventGetActive()
491 …e >= 0 && stage < state->bt_num_stages, PETSC_COMM_SELF, PETSC_ERR_ARG_OUTOFRANGE, "Invalid stage …  in PetscLogStateEventGetActive()
492   *isActive = PetscLogStateStageEventIsActive(state, stage, event) ? PETSC_TRUE : PETSC_FALSE;  in PetscLogStateEventGetActive()
512 PetscErrorCode PetscLogStateGetEventFromName(PetscLogState state, const char name[], PetscLogEvent …  in PetscLogStateGetEventFromName()  argument
515   PetscCall(PetscLogRegistryGetEventFromName(state->registry, name, event));  in PetscLogStateGetEventFromName()
535 PetscErrorCode PetscLogStateGetStageFromName(PetscLogState state, const char name[], PetscLogStage …  in PetscLogStateGetStageFromName()  argument
538   PetscCall(PetscLogRegistryGetStageFromName(state->registry, name, stage));  in PetscLogStateGetStageFromName()
558 PetscErrorCode PetscLogStateGetClassFromName(PetscLogState state, const char name[], PetscLogClass …  in PetscLogStateGetClassFromName()  argument
561   PetscCall(PetscLogRegistryGetClassFromName(state->registry, name, clss));  in PetscLogStateGetClassFromName()
581 PetscErrorCode PetscLogStateGetClassFromClassId(PetscLogState state, PetscClassId classid, PetscLog…  in PetscLogStateGetClassFromClassId()  argument
584   PetscCall(PetscLogRegistryGetClassFromClassId(state->registry, classid, clss));  in PetscLogStateGetClassFromClassId()
603 PetscErrorCode PetscLogStateGetNumEvents(PetscLogState state, PetscInt *numEvents)  in PetscLogStateGetNumEvents()  argument
606   PetscCall(PetscLogRegistryGetNumEvents(state->registry, numEvents, NULL));  in PetscLogStateGetNumEvents()
625 PetscErrorCode PetscLogStateGetNumStages(PetscLogState state, PetscInt *numStages)  in PetscLogStateGetNumStages()  argument
628   PetscCall(PetscLogRegistryGetNumStages(state->registry, numStages, NULL));  in PetscLogStateGetNumStages()
647 PetscErrorCode PetscLogStateGetNumClasses(PetscLogState state, PetscInt *numClasses)  in PetscLogStateGetNumClasses()  argument
650   PetscCall(PetscLogRegistryGetNumClasses(state->registry, numClasses, NULL));  in PetscLogStateGetNumClasses()
670 PetscErrorCode PetscLogStateEventGetInfo(PetscLogState state, PetscLogEvent event, PetscLogEventInf…  in PetscLogStateEventGetInfo()  argument
673   PetscCall(PetscLogRegistryEventGetInfo(state->registry, event, info));  in PetscLogStateEventGetInfo()
693 PetscErrorCode PetscLogStateStageGetInfo(PetscLogState state, PetscLogStage stage, PetscLogStageInf…  in PetscLogStateStageGetInfo()  argument
696   PetscCall(PetscLogRegistryStageGetInfo(state->registry, stage, info));  in PetscLogStateStageGetInfo()
721 PetscErrorCode PetscLogStateClassRegister(PetscLogState state, const char name[], PetscClassId id, …  in PetscLogStateClassRegister()  argument
724   PetscCall(PetscLogRegistryClassRegister(state->registry, name, id, logclass));  in PetscLogStateClassRegister()
744 PetscErrorCode PetscLogStateClassGetInfo(PetscLogState state, PetscLogClass clss, PetscLogClassInfo…  in PetscLogStateClassGetInfo()  argument
747   PetscCall(PetscLogRegistryClassGetInfo(state->registry, clss, info));  in PetscLogStateClassGetInfo()