xref: /titanic_50/usr/src/lib/libast/common/cdt/dtclose.c (revision b56bf881a9655cb27b53cba1468312f7c6dfb0a2)
1 /***********************************************************************
2 *                                                                      *
3 *               This software is part of the ast package               *
4 *          Copyright (c) 1985-2010 AT&T Intellectual Property          *
5 *                      and is licensed under the                       *
6 *                  Common Public License, Version 1.0                  *
7 *                    by AT&T Intellectual Property                     *
8 *                                                                      *
9 *                A copy of the License is available at                 *
10 *            http://www.opensource.org/licenses/cpl1.0.txt             *
11 *         (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9)         *
12 *                                                                      *
13 *              Information and Software Systems Research               *
14 *                            AT&T Research                             *
15 *                           Florham Park NJ                            *
16 *                                                                      *
17 *                 Glenn Fowler <gsf@research.att.com>                  *
18 *                  David Korn <dgk@research.att.com>                   *
19 *                   Phong Vo <kpv@research.att.com>                    *
20 *                                                                      *
21 ***********************************************************************/
22 #include	"dthdr.h"
23 
24 /*	Close a dictionary
25 **
26 **	Written by Kiem-Phong Vo (05/25/96)
27 */
28 #if __STD_C
29 int dtclose(reg Dt_t* dt)
30 #else
31 int dtclose(dt)
32 reg Dt_t*	dt;
33 #endif
34 {
35 	Dtdisc_t	*disc;
36 	int		ev = 0;
37 
38 	if(!dt || dt->nview > 0 ) /* can't close if being viewed */
39 		return -1;
40 
41 	/* announce the close event to see if we should continue */
42 	disc = dt->disc;
43 	if(disc->eventf &&
44 	   (ev = (*disc->eventf)(dt,DT_CLOSE,NIL(Void_t*),disc)) < 0)
45 		return -1;
46 
47 	if(dt->view)	/* turn off viewing */
48 		dtview(dt,NIL(Dt_t*));
49 
50 	if(ev == 0) /* release all allocated data */
51 	{	(void)(*(dt->meth->searchf))(dt,NIL(Void_t*),DT_CLEAR);
52 		if(dtsize(dt) > 0)
53 			return -1;
54 
55 		if(dt->data->ntab > 0)
56 			(*dt->memoryf)(dt,(Void_t*)dt->data->htab,0,disc);
57 		(*dt->memoryf)(dt,(Void_t*)dt->data,0,disc);
58 	}
59 
60 	if(dt->type == DT_MALLOC)
61 		free((Void_t*)dt);
62 	else if(ev == 0 && dt->type == DT_MEMORYF)
63 		(*dt->memoryf)(dt, (Void_t*)dt, 0, disc);
64 
65 	if(disc->eventf)
66 		(void)(*disc->eventf)(dt, DT_ENDCLOSE, NIL(Void_t*), disc);
67 
68 	return 0;
69 }
70