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
dtclose(reg Dt_t * dt)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