data1/d1_attset.c

   1 /* $Id: d1_attset.c,v 1.13 2007-01-15 15:10:14 adam Exp $
   2    Copyright (C) 1995-2007
   3    Index Data ApS
   4
   5 This file is part of the Zebra server.
   6
   7 Zebra is free software; you can redistribute it and/or modify it under
   8 the terms of the GNU General Public License as published by the Free
   9 Software Foundation; either version 2, or (at your option) any later
  10 version.
  11
  12 Zebra is distributed in the hope that it will be useful, but WITHOUT ANY
  13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
  14 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
  15 for more details.
  16
  17 You should have received a copy of the GNU General Public License
  18 along with this program; if not, write to the Free Software
  19 Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
  20
  21 */
  22
  23 #include <stdio.h>
  24 #include <assert.h>
  25 #include <stdlib.h>
  26
  27 #include <yaz/log.h>
  28 #include <idzebra/data1.h>
  29
  30 data1_att *data1_getattbyname(data1_handle dh, data1_attset *s, const char *name)
  31 {
  32     data1_att *r;
  33     data1_attset_child *c;
  34
  35     /* scan local set */
  36     for (r = s->atts; r; r = r->next)
  37         if (!data1_matchstr(r->name, name))
  38             return r;
  39     for (c = s->children; c; c = c->next)
  40     {
  41         assert (c->child);
  42         /* scan included sets */
  43         if ((r = data1_getattbyname (dh, c->child, name)))
  44             return r;
  45     }
  46     return 0;
  47 }
  48
  49 data1_attset *data1_empty_attset(data1_handle dh)
  50 {
  51     NMEM mem = data1_nmem_get (dh);
  52     data1_attset *res = (data1_attset*) nmem_malloc(mem,sizeof(*res));
  53
  54     res->name = 0;
  55     res->reference = VAL_NONE;
  56     res->atts = 0;
  57     res->children = 0;
  58     res->next = 0;
  59     return res;
  60 }
  61
  62 data1_attset *data1_read_attset(data1_handle dh, const char *file)
  63 {
  64     data1_attset *res = 0;
  65     data1_attset_child **childp;
  66     data1_att **attp;
  67     FILE *f;
  68     NMEM mem = data1_nmem_get (dh);
  69     int lineno = 0;
  70     int argc;
  71     char *argv[50], line[512];
  72
  73     if (!(f = data1_path_fopen(dh, file, "r")))
  74         return NULL;
  75     res = data1_empty_attset (dh);
  76
  77     childp = &res->children;
  78     attp = &res->atts;
  79
  80     while ((argc = readconf_line(f, &lineno, line, 512, argv, 50)))
  81     {
  82         char *cmd = argv[0];
  83         if (!strcmp(cmd, "att"))
  84         {
  85             int num;
  86             char *name;
  87             char *endptr;
  88             data1_att *t;
  89
  90             if (argc < 3)
  91             {
  92                 yaz_log(YLOG_WARN, "%s:%d: Bad # of args to att", file, lineno);
  93                 continue;
  94             }
  95             if (argc > 3)
  96             {
  97                 yaz_log(YLOG_WARN, "%s:%d: Local attributes not supported",
  98                         file, lineno);
  99             }
 100             num = strtol(argv[1], &endptr, 10);
 101             if (*endptr != '\0')
 102             {
 103                 yaz_log(YLOG_WARN, "%s:%d: Bad attribute integer %s",
 104                         file, lineno, argv[1]);
 105                 continue;
 106             }
 107             name = argv[2];
 108
 109             t = *attp = (data1_att *)nmem_malloc(mem, sizeof(*t));
 110             t->parent = res;
 111             t->name = nmem_strdup(mem, name);
 112             t->value = num;
 113             t->next = 0;
 114             attp = &t->next;
 115         }
 116         else if (!strcmp(cmd, "name"))
 117         {
 118             if (argc != 2)
 119             {
 120                 yaz_log(YLOG_WARN, "%s:%d: Bad # of args to name", file, lineno);
 121                 continue;
 122             }
 123         }
 124         else if (!strcmp(cmd, "reference"))
 125         {
 126             char *name;
 127
 128             if (argc != 2)
 129             {
 130                 yaz_log(YLOG_WARN, "%s:%d: Bad # of args to reference",
 131                         file, lineno);
 132                 continue;
 133             }
 134             name = argv[1];
 135             if ((res->reference = oid_getvalbyname(name)) == VAL_NONE)
 136             {
 137                 yaz_log(YLOG_WARN, "%s:%d: Unknown reference oid '%s'",
 138                         file, lineno, name);
 139                 fclose(f);
 140                 return 0;
 141             }
 142         }
 143         else if (!strcmp(cmd, "ordinal"))
 144         {
 145             yaz_log (YLOG_WARN, "%s:%d: Directive ordinal ignored",
 146                      file, lineno);
 147         }
 148         else if (!strcmp(cmd, "include"))
 149         {
 150             char *name;
 151             data1_attset *attset;
 152
 153             if (argc != 2)
 154             {
 155                 yaz_log(YLOG_WARN, "%s:%d: Bad # of args to include",
 156                         file, lineno);
 157                 continue;
 158             }
 159             name = argv[1];
 160
 161             if (!(attset = data1_get_attset (dh, name)))
 162             {
 163                 yaz_log(YLOG_WARN, "%s:%d: Include of attset %s failed",
 164                         file, lineno, name);
 165                 continue;
 166
 167             }
 168             *childp = (data1_attset_child *)
 169                 nmem_malloc (mem, sizeof(**childp));
 170             (*childp)->child = attset;
 171             (*childp)->next = 0;
 172             childp = &(*childp)->next;
 173         }
 174         else
 175         {
 176             yaz_log(YLOG_WARN, "%s:%d: Unknown directive '%s'",
 177                     file, lineno, cmd);
 178         }
 179     }
 180     fclose(f);
 181     return res;
 182 }
 183 /*
 184  * Local variables:
 185  * c-basic-offset: 4
 186  * indent-tabs-mode: nil
 187  * End:
 188  * vim: shiftwidth=4 tabstop=8 expandtab
 189  */
 190