1 /* $Id: d1_attset.c,v 1.3 2004-09-28 10:15:03 adam Exp $
2 Copyright (C) 1995,1996,1997,1998,1999,2000,2001,2002
5 This file is part of the Zebra server.
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
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
17 You should have received a copy of the GNU General Public License
18 along with Zebra; see the file LICENSE.zebra. If not, write to the
19 Free Software Foundation, 59 Temple Place - Suite 330, Boston, MA
28 #include <d1_attset.h>
29 #include <idzebra/data1.h>
31 data1_att *data1_getattbyname(data1_handle dh, data1_attset *s, char *name)
34 data1_attset_child *c;
37 for (r = s->atts; r; r = r->next)
38 if (!data1_matchstr(r->name, name))
40 for (c = s->children; c; c = c->next)
43 /* scan included sets */
44 if ((r = data1_getattbyname (dh, c->child, name)))
50 data1_attset *data1_empty_attset(data1_handle dh)
52 NMEM mem = data1_nmem_get (dh);
53 data1_attset *res = (data1_attset*) nmem_malloc(mem,sizeof(*res));
56 res->reference = VAL_NONE;
63 data1_attset *data1_read_attset(data1_handle dh, const char *file)
65 data1_attset *res = 0;
66 data1_attset_child **childp;
69 NMEM mem = data1_nmem_get (dh);
72 char *argv[50], line[512];
74 if (!(f = data1_path_fopen(dh, file, "r")))
76 res = data1_empty_attset (dh);
78 childp = &res->children;
81 while ((argc = readconf_line(f, &lineno, line, 512, argv, 50)))
84 if (!strcmp(cmd, "att"))
89 data1_local_attribute *locals;
93 yaz_log(LOG_WARN, "%s:%d: Bad # of args to att", file, lineno);
99 if (argc == 3) /* no local attributes given */
101 locals = (data1_local_attribute *)
102 nmem_malloc(mem, sizeof(*locals));
106 else /* parse the string "local{,local}" */
109 data1_local_attribute **ap = &locals;
112 *ap = (data1_local_attribute *)
113 nmem_malloc(mem, sizeof(**ap));
114 (*ap)->local = atoi(p);
118 while ((p = strchr(p, ',')) && *(++p));
120 t = *attp = (data1_att *)nmem_malloc(mem, sizeof(*t));
122 t->name = nmem_strdup(mem, name);
128 else if (!strcmp(cmd, "name"))
132 yaz_log(LOG_WARN, "%s:%d: Bad # of args to name", file, lineno);
136 else if (!strcmp(cmd, "reference"))
142 yaz_log(LOG_WARN, "%s:%d: Bad # of args to reference",
147 if ((res->reference = oid_getvalbyname(name)) == VAL_NONE)
149 yaz_log(LOG_WARN, "%s:%d: Unknown reference oid '%s'",
155 else if (!strcmp(cmd, "ordinal"))
157 yaz_log (LOG_WARN, "%s:%d: Directive ordinal ignored",
160 else if (!strcmp(cmd, "include"))
163 data1_attset *attset;
167 yaz_log(LOG_WARN, "%s:%d: Bad # of args to include",
173 if (!(attset = data1_get_attset (dh, name)))
175 yaz_log(LOG_WARN, "%s:%d: Include of attset %s failed",
180 *childp = (data1_attset_child *)
181 nmem_malloc (mem, sizeof(**childp));
182 (*childp)->child = attset;
184 childp = &(*childp)->next;
188 yaz_log(LOG_WARN, "%s:%d: Unknown directive '%s'",