usr/src/lib/libast/common/cdt/dtclose.c

   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 }