1 /*********************************************************************** 2 * * 3 * This software is part of the ast package * 4 * Copyright (c) 1985-2007 AT&T Knowledge Ventures * 5 * and is licensed under the * 6 * Common Public License, Version 1.0 * 7 * by AT&T Knowledge Ventures * 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