contrib/mdocml/mandoc_xr.c

   1 /*      $Id: mandoc_xr.c,v 1.3 2017/07/02 21:18:29 schwarze Exp $ */
   2 /*
   3  * Copyright (c) 2017 Ingo Schwarze <schwarze@openbsd.org>
   4  *
   5  * Permission to use, copy, modify, and distribute this software for any
   6  * purpose with or without fee is hereby granted, provided that the above
   7  * copyright notice and this permission notice appear in all copies.
   8  *
   9  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
  10  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
  11  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
  12  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  13  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
  14  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
  15  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  16  */
  17 #include <sys/types.h>
  18
  19 #include <assert.h>
  20 #include <stddef.h>
  21 #include <stdint.h>
  22 #include <stdlib.h>
  23 #include <string.h>
  24
  25 #include "mandoc_aux.h"
  26 #include "mandoc_ohash.h"
  27 #include "mandoc_xr.h"
  28
  29 static struct ohash      *xr_hash = NULL;
  30 static struct mandoc_xr  *xr_first = NULL;
  31 static struct mandoc_xr  *xr_last = NULL;
  32
  33 static void               mandoc_xr_clear(void);
  34
  35
  36 static void
  37 mandoc_xr_clear(void)
  38 {
  39         struct mandoc_xr        *xr;
  40         unsigned int             slot;
  41
  42         if (xr_hash == NULL)
  43                 return;
  44         for (xr = ohash_first(xr_hash, &slot); xr != NULL;
  45              xr = ohash_next(xr_hash, &slot))
  46                 free(xr);
  47         ohash_delete(xr_hash);
  48 }
  49
  50 void
  51 mandoc_xr_reset(void)
  52 {
  53         if (xr_hash == NULL)
  54                 xr_hash = mandoc_malloc(sizeof(*xr_hash));
  55         else
  56                 mandoc_xr_clear();
  57         mandoc_ohash_init(xr_hash, 5,
  58             offsetof(struct mandoc_xr, hashkey));
  59         xr_first = xr_last = NULL;
  60 }
  61
  62 int
  63 mandoc_xr_add(const char *sec, const char *name, int line, int pos)
  64 {
  65         struct mandoc_xr         *xr, *oxr;
  66         const char               *pend;
  67         size_t                    ssz, nsz, tsz;
  68         unsigned int              slot;
  69         int                       ret;
  70         uint32_t                  hv;
  71
  72         if (xr_hash == NULL)
  73                 return 0;
  74
  75         ssz = strlen(sec) + 1;
  76         nsz = strlen(name) + 1;
  77         tsz = ssz + nsz;
  78         xr = mandoc_malloc(sizeof(*xr) + tsz);
  79         xr->next = NULL;
  80         xr->sec = xr->hashkey;
  81         xr->name = xr->hashkey + ssz;
  82         xr->line = line;
  83         xr->pos = pos;
  84         xr->count = 1;
  85         memcpy(xr->sec, sec, ssz);
  86         memcpy(xr->name, name, nsz);
  87
  88         pend = xr->hashkey + tsz;
  89         hv = ohash_interval(xr->hashkey, &pend);
  90         slot = ohash_lookup_memory(xr_hash, xr->hashkey, tsz, hv);
  91         if ((oxr = ohash_find(xr_hash, slot)) == NULL) {
  92                 ohash_insert(xr_hash, slot, xr);
  93                 if (xr_first == NULL)
  94                         xr_first = xr;
  95                 else
  96                         xr_last->next = xr;
  97                 xr_last = xr;
  98                 return 0;
  99         }
 100
 101         oxr->count++;
 102         ret = (oxr->line == -1) ^ (xr->line == -1);
 103         if (xr->line == -1)
 104                 oxr->line = -1;
 105         free(xr);
 106         return ret;
 107 }
 108
 109 struct mandoc_xr *
 110 mandoc_xr_get(void)
 111 {
 112         return xr_first;
 113 }
 114
 115 void
 116 mandoc_xr_free(void)
 117 {
 118         mandoc_xr_clear();
 119         free(xr_hash);
 120         xr_hash = NULL;
 121 }