tagmanager/nestlevel.c

   1 /*
   2 *   $Id$
   3 *
   4 *   Copyright (c) 1999-2002, Darren Hiebert
   5 *   Copyright 2009-2010 Nick Treleaven <nick(dot)treleaven(at)btinternet(dot)com>
   6 *
   7 *   This source code is released for free distribution under the terms of the
   8 *   GNU General Public License.
   9 *
  10 *   Defines external interface to scope nesting levels for tags.
  11 */
  12
  13 /*
  14 *   INCLUDE FILES
  15 */
  16 #include "general.h"  /* must always come first */
  17
  18 #include "main.h"
  19 #include "nestlevel.h"
  20
  21 /*
  22 *   FUNCTION DEFINITIONS
  23 */
  24
  25 extern NestingLevels *nestingLevelsNew(void)
  26 {
  27         NestingLevels *nls = xCalloc (1, NestingLevels);
  28         return nls;
  29 }
  30
  31 extern void nestingLevelsFree(NestingLevels *nls)
  32 {
  33         int i;
  34         for (i = 0; i < nls->allocated; i++)
  35                 vStringDelete(nls->levels[i].name);
  36         if (nls->levels) eFree(nls->levels);
  37         eFree(nls);
  38 }
  39
  40 extern void nestingLevelsPush(NestingLevels *nls,
  41         const vString *name, int type)
  42 {
  43         NestingLevel *nl = NULL;
  44
  45         if (nls->n >= nls->allocated)
  46         {
  47                 nls->allocated++;
  48                 nls->levels = xRealloc(nls->levels,
  49                         nls->allocated, NestingLevel);
  50                 nls->levels[nls->n].name = vStringNew();
  51         }
  52         nl = &nls->levels[nls->n];
  53         nls->n++;
  54
  55         vStringCopy(nl->name, name);
  56         nl->type = type;
  57 }
  58
  59 extern void nestingLevelsPop(NestingLevels *nls)
  60 {
  61         const NestingLevel *nl = nestingLevelsGetCurrent(nls);
  62
  63         Assert (nl != NULL);
  64         vStringClear(nl->name);
  65         nls->n--;
  66 }
  67
  68 extern NestingLevel *nestingLevelsGetCurrent(NestingLevels *nls)
  69 {
  70         Assert (nls != NULL);
  71
  72         if (nls->n < 1)
  73                 return NULL;
  74
  75         return &nls->levels[nls->n - 1];
  76 }
  77
  78 /* vi:set tabstop=4 shiftwidth=4: */