src/otherinfo.c

   1 /* This file is part of the YAZ toolkit.
   2  * Copyright (C) 1995-2010 Index Data
   3  * See the file LICENSE for details.
   4  */
   5 /**
   6  * \file otherinfo.c
   7  * \brief Implements Z39.50 OtherInfo utilities
   8  */
   9 #include <stdio.h>
  10 #include <string.h>
  11
  12 #include <yaz/otherinfo.h>
  13
  14 void yaz_oi_APDU(Z_APDU *apdu, Z_OtherInformation ***oip)
  15 {
  16     switch (apdu->which)
  17     {
  18     case Z_APDU_initRequest:
  19         *oip = &apdu->u.initRequest->otherInfo;
  20         break;
  21     case Z_APDU_searchRequest:
  22         *oip = &apdu->u.searchRequest->otherInfo;
  23         break;
  24     case Z_APDU_presentRequest:
  25         *oip = &apdu->u.presentRequest->otherInfo;
  26         break;
  27     case Z_APDU_sortRequest:
  28         *oip = &apdu->u.sortRequest->otherInfo;
  29         break;
  30     case Z_APDU_scanRequest:
  31         *oip = &apdu->u.scanRequest->otherInfo;
  32         break;
  33     case Z_APDU_extendedServicesRequest:
  34         *oip = &apdu->u.extendedServicesRequest->otherInfo;
  35         break;
  36     case Z_APDU_deleteResultSetRequest:
  37         *oip = &apdu->u.deleteResultSetRequest->otherInfo;
  38         break;
  39     case Z_APDU_initResponse:
  40         *oip = &apdu->u.initResponse->otherInfo;
  41         break;
  42     case Z_APDU_searchResponse:
  43         *oip = &apdu->u.searchResponse->otherInfo;
  44         break;
  45     case Z_APDU_presentResponse:
  46         *oip = &apdu->u.presentResponse->otherInfo;
  47         break;
  48     case Z_APDU_sortResponse:
  49         *oip = &apdu->u.sortResponse->otherInfo;
  50         break;
  51     case Z_APDU_scanResponse:
  52         *oip = &apdu->u.scanResponse->otherInfo;
  53         break;
  54     case Z_APDU_extendedServicesResponse:
  55         *oip = &apdu->u.extendedServicesResponse->otherInfo;
  56         break;
  57     case Z_APDU_deleteResultSetResponse:
  58         *oip = &apdu->u.deleteResultSetResponse->otherInfo;
  59         break;
  60     case Z_APDU_duplicateDetectionRequest:
  61         *oip = &apdu->u.duplicateDetectionRequest->otherInfo;
  62         break;
  63     case Z_APDU_duplicateDetectionResponse:
  64         *oip = &apdu->u.duplicateDetectionResponse->otherInfo;
  65         break;
  66     default:
  67         *oip = 0;
  68         break;
  69     }
  70 }
  71
  72 Z_OtherInformationUnit *yaz_oi_update (
  73     Z_OtherInformation **otherInformationP, ODR odr,
  74     const Odr_oid *oid, int categoryValue, int delete_flag)
  75 {
  76     int i;
  77     Z_OtherInformation *otherInformation;
  78
  79     if (!otherInformationP)
  80         return 0;
  81     otherInformation = *otherInformationP;
  82     if (!otherInformation)
  83     {
  84         if (!odr)
  85             return 0;
  86         otherInformation = *otherInformationP = (Z_OtherInformation *)
  87             odr_malloc (odr, sizeof(*otherInformation));
  88         otherInformation->num_elements = 0;
  89         otherInformation->list = 0;
  90     }
  91     for (i = 0; i<otherInformation->num_elements; i++)
  92     {
  93         if (!oid)
  94         {
  95             if (!otherInformation->list[i]->category)
  96                 return otherInformation->list[i];
  97         }
  98         else
  99         {
 100             if (otherInformation->list[i]->category &&
 101                 categoryValue ==
 102                 *otherInformation->list[i]->category->categoryValue &&
 103                 !oid_oidcmp (oid, otherInformation->list[i]->category->
 104                              categoryTypeId))
 105             {
 106                 Z_OtherInformationUnit *this_list = otherInformation->list[i];
 107
 108                 if (delete_flag)
 109                 {
 110                     (otherInformation->num_elements)--;
 111                     while (i < otherInformation->num_elements)
 112                     {
 113                         otherInformation->list[i] =
 114                             otherInformation->list[i+1];
 115                         i++;
 116                     }
 117                 }
 118                 return this_list;
 119             }
 120         }
 121     }
 122     if (!odr)
 123         return 0;
 124     else
 125     {
 126         Z_OtherInformationUnit **newlist = (Z_OtherInformationUnit**)
 127             odr_malloc(odr, (otherInformation->num_elements+1) *
 128                        sizeof(*newlist));
 129         for (i = 0; i<otherInformation->num_elements; i++)
 130             newlist[i] = otherInformation->list[i];
 131         otherInformation->list = newlist;
 132
 133         otherInformation->list[i] = (Z_OtherInformationUnit*)
 134             odr_malloc (odr, sizeof(Z_OtherInformationUnit));
 135         if (oid)
 136         {
 137             otherInformation->list[i]->category = (Z_InfoCategory*)
 138                 odr_malloc (odr, sizeof(Z_InfoCategory));
 139             otherInformation->list[i]->category->categoryTypeId = (Odr_oid*)
 140                 odr_oiddup (odr, oid);
 141             otherInformation->list[i]->category->categoryValue =
 142                 odr_intdup(odr, categoryValue);
 143         }
 144         else
 145             otherInformation->list[i]->category = 0;
 146         otherInformation->list[i]->which = Z_OtherInfo_characterInfo;
 147         otherInformation->list[i]->information.characterInfo = 0;
 148
 149         otherInformation->num_elements = i+1;
 150         return otherInformation->list[i];
 151     }
 152 }
 153
 154 void yaz_oi_set_string_oid (
 155     Z_OtherInformation **otherInformation, ODR odr,
 156     const Odr_oid *oid, int categoryValue,
 157     const char *str)
 158 {
 159     Z_OtherInformationUnit *oi =
 160         yaz_oi_update(otherInformation, odr, oid, categoryValue, 0);
 161     if (!oi)
 162         return;
 163     oi->which = Z_OtherInfo_characterInfo;
 164     oi->information.characterInfo = odr_strdup (odr, str);
 165 }
 166
 167 char *yaz_oi_get_string_oid (
 168     Z_OtherInformation **otherInformation,
 169     const Odr_oid *oid, int categoryValue, int delete_flag)
 170 {
 171     Z_OtherInformationUnit *oi;
 172
 173     if ((oi = yaz_oi_update(otherInformation, 0, oid, categoryValue,
 174                             delete_flag)) &&
 175         oi->which == Z_OtherInfo_characterInfo)
 176         return oi->information.characterInfo;
 177     return 0;
 178 }
 179
 180 /*
 181  * Local variables:
 182  * c-basic-offset: 4
 183  * c-file-style: "Stroustrup"
 184  * indent-tabs-mode: nil
 185  * End:
 186  * vim: shiftwidth=4 tabstop=8 expandtab
 187  */
 188