index/attribute.c

   1 /*
   2  * Copyright (C) 1994-1999, Index Data
   3  * All rights reserved.
   4  * Sebastian Hammer, Adam Dickmeiss
   5  *
   6  * $Log: attribute.c,v $
   7  * Revision 1.11  1999-11-30 13:48:03  adam
   8  * Improved installation. Updated for inclusion of YAZ header files.
   9  *
  10  * Revision 1.10  1999/02/02 14:50:49  adam
  11  * Updated WIN32 code specific sections. Changed header.
  12  *
  13  * Revision 1.9  1998/05/20 10:12:14  adam
  14  * Implemented automatic EXPLAIN database maintenance.
  15  * Modified Zebra to work with ASN.1 compiled version of YAZ.
  16  *
  17  * Revision 1.8  1998/03/05 08:45:11  adam
  18  * New result set model and modular ranking system. Moved towards
  19  * descent server API. System information stored as "SGML" records.
  20  *
  21  * Revision 1.7  1997/10/29 12:05:01  adam
  22  * Server produces diagnostic "Unsupported Attribute Set" when appropriate.
  23  *
  24  * Revision 1.6  1997/09/17 12:19:11  adam
  25  * Zebra version corresponds to YAZ version 1.4.
  26  * Changed Zebra server so that it doesn't depend on global common_resource.
  27  *
  28  * Revision 1.5  1997/09/05 15:30:08  adam
  29  * Changed prototype for chr_map_input - added const.
  30  * Added support for C++, headers uses extern "C" for public definitions.
  31  *
  32  * Revision 1.4  1996/10/29 14:06:48  adam
  33  * Include zebrautl.h instead of alexutil.h.
  34  *
  35  * Revision 1.3  1996/05/09 07:28:54  quinn
  36  * Work towards phrases and multiple registers
  37  *
  38  * Revision 1.2  1995/11/15  19:13:07  adam
  39  * Work on record management.
  40  *
  41  *
  42  * This interface is used by other modules (the Z-server in particular)
  43  * to normalize the attributes given in queries.
  44  */
  45
  46 #include <stdio.h>
  47
  48 #include <yaz/log.h>
  49 #include <res.h>
  50 #include <zebrautl.h>
  51 #include "zserver.h"
  52
  53 static data1_att *getatt(data1_attset *p, int att)
  54 {
  55     data1_att *a;
  56     data1_attset_child *c;
  57
  58     /* scan local set */
  59     for (a = p->atts; a; a = a->next)
  60         if (a->value == att)
  61             return a;
  62     /* scan included sets */
  63     for (c = p->children; c; c = c->next)
  64         if ((a = getatt(c->child, att)))
  65             return a;
  66     return 0;
  67 }
  68
  69 int att_getentbyatt(ZebraHandle zi, attent *res, oid_value set, int att)
  70 {
  71     data1_att *r;
  72     data1_attset *p;
  73
  74     if (!(p = data1_attset_search_id (zi->dh, set)))
  75     {
  76         zebraExplain_loadAttsets (zi->dh, zi->res);
  77         p = data1_attset_search_id (zi->dh, set);
  78     }
  79     if (!p)
  80         return -2;
  81     if (!(r = getatt(p, att)))
  82         return -1;
  83     res->attset_ordinal = r->parent->reference;
  84     res->local_attributes = r->locals;
  85     return 0;
  86 }