Book a Demo!
CoCalc Logo Icon
StoreFeaturesDocsShareSupportNewsAboutPoliciesSign UpSign In
att
GitHub Repository: att/ast
 Path: blob/master/src/lib/libast/vmalloc/vmclose.c
1810 views
1
/***********************************************************************

2
*                                                                      *

3
*               This software is part of the ast package               *

4
*          Copyright (c) 1985-2012 AT&T Intellectual Property          *

5
*                      and is licensed under the                       *

6
*                 Eclipse Public License, Version 1.0                  *

7
*                    by AT&T Intellectual Property                     *

8
*                                                                      *

9
*                A copy of the License is available at                 *

10
*          http://www.eclipse.org/org/documents/epl-v10.html           *

11
*         (with md5 checksum b35adb5213ca9657e911e9befb180842)         *

12
*                                                                      *

13
*              Information and Software Systems Research               *

14
*                            AT&T Research                             *

15
*                           Florham Park NJ                            *

16
*                                                                      *

17
*                 Glenn Fowler <[email protected]>                  *

18
*                  David Korn <[email protected]>                   *

19
*                   Phong Vo <[email protected]>                    *

20
*                                                                      *

21
***********************************************************************/

22
#if defined(_UWIN) && defined(_BLD_ast)

23


24
void _STUB_vmclose(){}

25


26
#else

27


28
#include	"vmhdr.h"

29


30
/*	Close down a region.

31
**

32
**	Written by Kiem-Phong Vo, [email protected], 01/16/94.

33
*/

34
#if __STD_C

35
int vmclose(Vmalloc_t* vm)

36
#else

37
int vmclose(vm)

38
Vmalloc_t*	vm;

39
#endif

40
{

41
	Seg_t		*seg, *vmseg, *next;

42
	Vmalloc_t	*v, *last;

43
	Vmdata_t*	vd = vm->data;

44
	Vmdisc_t*	disc = vm->disc;

45
	int		mode, rv = 0;

46


47
	if(vm == Vmheap) /* the heap is never freed */

48
		return -1;

49


50
	if(vm->disc->exceptf && /* announcing closing event */

51
	   (rv = (*vm->disc->exceptf)(vm,VM_CLOSE,(Void_t*)1,vm->disc)) < 0 )

52
		return -1;

53


54
	mode = vd->mode; /* remember this in case it gets destroyed below */

55


56
	if((mode&VM_MTPROFILE) && _Vmpfclose)

57
		(*_Vmpfclose)(vm);

58


59
	/* remove from linked list of regions */

60
	_vmlock(NIL(Vmalloc_t*), 1);

61
	for(last = Vmheap, v = last->next; v; last = v, v = v->next)

62
	{	if(v == vm)

63
		{	last->next = v->next;

64
			break;

65
		}

66
	}

67
	_vmlock(NIL(Vmalloc_t*), 0);

68


69
	if(rv == 0) /* deallocate memory obtained from the system */

70
	{	/* lock-free because alzheimer can cause deadlocks :) */

71
		vmseg = NIL(Seg_t*);

72
		for(seg = vd->seg; seg; seg = next)

73
		{	next = seg->next;

74
			if(seg->extent == seg->size) /* root segment */

75
				vmseg = seg; /* don't free this yet */

76
			else	(*disc->memoryf)(vm,seg->addr,seg->extent,0,disc);

77
		}

78
		if(vmseg) /* now safe to free root segment */

79
			(*disc->memoryf)(vm,vmseg->addr,vmseg->extent,0,disc);

80
	}

81


82
	if(disc->exceptf) /* finalizing closing */

83
		(void)(*disc->exceptf)(vm, VM_ENDCLOSE, (Void_t*)0, disc);

84


85
	if(!(mode & VM_MEMORYF) )

86
		vmfree(Vmheap,vm);

87


88
	return 0;

89
}

90


91
#endif

92


93