Lines Matching refs:head
102 TRSPACE *head, *lasthead; in PetscMallocValidate() local
107 head = TRhead; in PetscMallocValidate()
109 if (head && head->prev) { in PetscMallocValidate()
112 …rPrintf)("Root memory header %p has invalid back pointer %p\n", (void *)head, (void *)head->prev)); in PetscMallocValidate()
115 while (head) { in PetscMallocValidate()
116 if (head->specialcookie != COOKIE_VALUE) { in PetscMallocValidate()
119 PetscCall((*PetscErrorPrintf)("Memory at address %p is corrupted\n", (void *)head)); in PetscMallocValidate()
122 a = (char *)(((TrSPACE *)head) + 1); in PetscMallocValidate()
128 a = (char *)(((TrSPACE *)head) + 1); in PetscMallocValidate()
129 nend = (PetscInt *)(a + head->size); in PetscMallocValidate()
134 …rintf)("Memory [id=%d(%.0f)] at address %p already freed\n", head->id, (PetscLogDouble)head->size,… in PetscMallocValidate()
137 …dress %p is corrupted (probably write past end of array)\n", head->id, (PetscLogDouble)head->size,… in PetscMallocValidate()
138 …intf)("Memory originally allocated in %s() at %s:%d\n", head->functionname, head->filename, head->… in PetscMallocValidate()
142 if (head->prev && head->prev != lasthead) { in PetscMallocValidate()
145 …PetscCall((*PetscErrorPrintf)("Backpointer %p is invalid, should be %p\n", (void *)head->prev, (vo… in PetscMallocValidate()
147 …intf)("Memory originally allocated in %s() at %s:%d\n", head->functionname, head->filename, head->… in PetscMallocValidate()
150 lasthead = head; in PetscMallocValidate()
151 head = head->next; in PetscMallocValidate()
162 TRSPACE *head; in PetscTrMallocDefault() local
177 head = (TRSPACE *)inew; in PetscTrMallocDefault()
180 if (TRhead) TRhead->prev = head; in PetscTrMallocDefault()
181 head->next = TRhead; in PetscTrMallocDefault()
182 TRhead = head; in PetscTrMallocDefault()
183 head->prev = NULL; in PetscTrMallocDefault()
184 head->size = nsize; in PetscTrMallocDefault()
185 head->rsize = a; in PetscTrMallocDefault()
186 head->id = TRid++; in PetscTrMallocDefault()
187 head->lineno = lineno; in PetscTrMallocDefault()
189 head->filename = filename; in PetscTrMallocDefault()
190 head->functionname = function; in PetscTrMallocDefault()
191 head->specialcookie = COOKIE_VALUE; in PetscTrMallocDefault()
194 TRallocated += TRrequestedSize ? head->rsize : head->size; in PetscTrMallocDefault()
204 PetscCall(PetscStackCopy(&petscstack, &head->stack)); in PetscTrMallocDefault()
206 head->stack.line[PetscMax(head->stack.currentsize - 2, 0)] = lineno; in PetscTrMallocDefault()
207 head->stack.currentsize--; in PetscTrMallocDefault()
254 TRSPACE *head; in PetscTrFreeDefault() local
266 head = (TRSPACE *)a; in PetscTrFreeDefault()
268 if (head->specialcookie != COOKIE_VALUE) { in PetscTrFreeDefault()
274 nend = (PetscInt *)(ahead + head->size); in PetscTrFreeDefault()
279 …tf)("Block [id=%d(%.0f)] at address %p was already freed\n", head->id, (PetscLogDouble)head->size,… in PetscTrFreeDefault()
280 if (head->lineno > 0 && head->lineno < 50000 /* sanity check */) { in PetscTrFreeDefault()
281 …l((*PetscErrorPrintf)("Block freed in %s() at %s:%d\n", head->functionname, head->filename, head->… in PetscTrFreeDefault()
283 …PetscErrorPrintf)("Block allocated in %s() at %s:%d\n", head->functionname, head->filename, -head-… in PetscTrFreeDefault()
289 …dress %p is corrupted (probably write past end of array)\n", head->id, (PetscLogDouble)head->size,… in PetscTrFreeDefault()
290 …PetscErrorPrintf)("Block allocated in %s() at %s:%d\n", head->functionname, head->filename, head->… in PetscTrFreeDefault()
294 … > -1 && head->rsize >= PetscLogMallocTraceThreshold) PetscCall(PetscViewerASCIIPrintf(PetscLogMal… in PetscTrFreeDefault()
298 head->lineno = lineno; in PetscTrFreeDefault()
299 head->filename = filename; in PetscTrFreeDefault()
300 head->functionname = function; in PetscTrFreeDefault()
302 head->lineno = -head->lineno; in PetscTrFreeDefault()
304 asize = TRrequestedSize ? head->rsize : head->size; in PetscTrFreeDefault()
308 if (head->prev) head->prev->next = head->next; in PetscTrFreeDefault()
309 else TRhead = head->next; in PetscTrFreeDefault()
311 if (head->next) head->next->prev = head->prev; in PetscTrFreeDefault()
323 TRSPACE *head; in PetscTrReallocDefault() local
345 head = (TRSPACE *)a; in PetscTrReallocDefault()
348 if (head->specialcookie != COOKIE_VALUE) { in PetscTrReallocDefault()
354 nend = (PetscInt *)(ahead + head->size); in PetscTrReallocDefault()
359 …tf)("Block [id=%d(%.0f)] at address %p was already freed\n", head->id, (PetscLogDouble)head->size,… in PetscTrReallocDefault()
360 if (head->lineno > 0 && head->lineno < 50000 /* sanity check */) { in PetscTrReallocDefault()
361 …l((*PetscErrorPrintf)("Block freed in %s() at %s:%d\n", head->functionname, head->filename, head->… in PetscTrReallocDefault()
363 …PetscErrorPrintf)("Block allocated in %s() at %s:%d\n", head->functionname, head->filename, -head-… in PetscTrReallocDefault()
369 …dress %p is corrupted (probably write past end of array)\n", head->id, (PetscLogDouble)head->size,… in PetscTrReallocDefault()
370 …PetscErrorPrintf)("Block allocated in %s() at %s:%d\n", head->functionname, head->filename, head->… in PetscTrReallocDefault()
376 TRallocated -= TRrequestedSize ? head->rsize : head->size; in PetscTrReallocDefault()
378 if (head->prev) head->prev->next = head->next; in PetscTrReallocDefault()
379 else TRhead = head->next; in PetscTrReallocDefault()
380 if (head->next) head->next->prev = head->prev; in PetscTrReallocDefault()
385 head = (TRSPACE *)inew; in PetscTrReallocDefault()
388 if (TRhead) TRhead->prev = head; in PetscTrReallocDefault()
389 head->next = TRhead; in PetscTrReallocDefault()
390 TRhead = head; in PetscTrReallocDefault()
391 head->prev = NULL; in PetscTrReallocDefault()
392 head->size = nsize; in PetscTrReallocDefault()
393 head->rsize = len; in PetscTrReallocDefault()
394 head->id = TRid++; in PetscTrReallocDefault()
395 head->lineno = lineno; in PetscTrReallocDefault()
397 head->filename = filename; in PetscTrReallocDefault()
398 head->functionname = function; in PetscTrReallocDefault()
399 head->specialcookie = COOKIE_VALUE; in PetscTrReallocDefault()
402 TRallocated += TRrequestedSize ? head->rsize : head->size; in PetscTrReallocDefault()
412 PetscCall(PetscStackCopy(&petscstack, &head->stack)); in PetscTrReallocDefault()
414 head->stack.line[PetscMax(head->stack.currentsize - 2, 0)] = lineno; in PetscTrReallocDefault()
645 TRSPACE *head; in PetscMallocGetStack() local
648 head = (TRSPACE *)((char *)ptr - HEADER_BYTES); in PetscMallocGetStack()
649 *stack = &head->stack; in PetscMallocGetStack()
692 TRSPACE *head; in PetscMallocDump() local
699 head = TRhead; in PetscMallocDump()
700 while (head) { in PetscMallocDump()
701 libAlloc += TRrequestedSize ? head->rsize : head->size; in PetscMallocDump()
702 head = head->next; in PetscMallocDump()
705 head = TRhead; in PetscMallocDump()
706 while (head) { in PetscMallocDump()
709 PetscCall(PetscStrcmp(head->functionname, "PetscDLLibraryOpen", &isLib)); in PetscMallocDump()
712 …fprintf(fp, "[%2d] %.0f bytes\n", rank, (PetscLogDouble)(TRrequestedSize ? head->rsize : head->siz… in PetscMallocDump()
713 PetscCall(PetscStackPrint(&head->stack, fp)); in PetscMallocDump()
715 …, rank, (PetscLogDouble)(TRrequestedSize ? head->rsize : head->size), head->functionname, head->fi… in PetscMallocDump()
718 head = head->next; in PetscMallocDump()