1 /* This file is part of the YAZ toolkit.
2 * Copyright (C) 1995-2010 Index Data
3 * See the file LICENSE for details.
7 * \brief Implements Z39.50 OtherInfo utilities
12 #include <yaz/otherinfo.h>
14 void yaz_oi_APDU(Z_APDU *apdu, Z_OtherInformation ***oip)
18 case Z_APDU_initRequest:
19 *oip = &apdu->u.initRequest->otherInfo;
21 case Z_APDU_searchRequest:
22 *oip = &apdu->u.searchRequest->otherInfo;
24 case Z_APDU_presentRequest:
25 *oip = &apdu->u.presentRequest->otherInfo;
27 case Z_APDU_sortRequest:
28 *oip = &apdu->u.sortRequest->otherInfo;
30 case Z_APDU_scanRequest:
31 *oip = &apdu->u.scanRequest->otherInfo;
33 case Z_APDU_extendedServicesRequest:
34 *oip = &apdu->u.extendedServicesRequest->otherInfo;
36 case Z_APDU_deleteResultSetRequest:
37 *oip = &apdu->u.deleteResultSetRequest->otherInfo;
39 case Z_APDU_initResponse:
40 *oip = &apdu->u.initResponse->otherInfo;
42 case Z_APDU_searchResponse:
43 *oip = &apdu->u.searchResponse->otherInfo;
45 case Z_APDU_presentResponse:
46 *oip = &apdu->u.presentResponse->otherInfo;
48 case Z_APDU_sortResponse:
49 *oip = &apdu->u.sortResponse->otherInfo;
51 case Z_APDU_scanResponse:
52 *oip = &apdu->u.scanResponse->otherInfo;
54 case Z_APDU_extendedServicesResponse:
55 *oip = &apdu->u.extendedServicesResponse->otherInfo;
57 case Z_APDU_deleteResultSetResponse:
58 *oip = &apdu->u.deleteResultSetResponse->otherInfo;
60 case Z_APDU_duplicateDetectionRequest:
61 *oip = &apdu->u.duplicateDetectionRequest->otherInfo;
63 case Z_APDU_duplicateDetectionResponse:
64 *oip = &apdu->u.duplicateDetectionResponse->otherInfo;
72 Z_OtherInformationUnit *yaz_oi_update (
73 Z_OtherInformation **otherInformationP, ODR odr,
74 const Odr_oid *oid, int categoryValue, int delete_flag)
77 Z_OtherInformation *otherInformation;
79 if (!otherInformationP)
81 otherInformation = *otherInformationP;
82 if (!otherInformation)
86 otherInformation = *otherInformationP = (Z_OtherInformation *)
87 odr_malloc (odr, sizeof(*otherInformation));
88 otherInformation->num_elements = 0;
89 otherInformation->list = 0;
91 for (i = 0; i<otherInformation->num_elements; i++)
95 /* DS: Want does this do? Returns the first element without a category */
96 if (!otherInformation->list[i]->category)
97 return otherInformation->list[i];
101 if (otherInformation->list[i]->category &&
103 *otherInformation->list[i]->category->categoryValue &&
104 !oid_oidcmp (oid, otherInformation->list[i]->category->
107 Z_OtherInformationUnit *this_list = otherInformation->list[i];
111 (otherInformation->num_elements)--;
112 while (i < otherInformation->num_elements)
114 otherInformation->list[i] =
115 otherInformation->list[i+1];
127 Z_OtherInformationUnit **newlist = (Z_OtherInformationUnit**)
128 odr_malloc(odr, (otherInformation->num_elements+1) *
130 for (i = 0; i<otherInformation->num_elements; i++)
131 newlist[i] = otherInformation->list[i];
132 otherInformation->list = newlist;
134 otherInformation->list[i] = (Z_OtherInformationUnit*)
135 odr_malloc (odr, sizeof(Z_OtherInformationUnit));
138 otherInformation->list[i]->category = (Z_InfoCategory*)
139 odr_malloc (odr, sizeof(Z_InfoCategory));
140 otherInformation->list[i]->category->categoryTypeId = (Odr_oid*)
141 odr_oiddup (odr, oid);
142 otherInformation->list[i]->category->categoryValue =
143 odr_intdup(odr, categoryValue);
146 otherInformation->list[i]->category = 0;
147 otherInformation->list[i]->which = Z_OtherInfo_characterInfo;
148 otherInformation->list[i]->information.characterInfo = 0;
150 otherInformation->num_elements = i+1;
151 return otherInformation->list[i];
155 void yaz_oi_set_string_oid (
156 Z_OtherInformation **otherInformation, ODR odr,
157 const Odr_oid *oid, int categoryValue,
160 Z_OtherInformationUnit *oi =
161 yaz_oi_update(otherInformation, odr, oid, categoryValue, 0);
164 oi->which = Z_OtherInfo_characterInfo;
165 oi->information.characterInfo = odr_strdup (odr, str);
168 char *yaz_oi_get_string_oid (
169 Z_OtherInformation **otherInformation,
170 const Odr_oid *oid, int categoryValue, int delete_flag)
172 Z_OtherInformationUnit *oi;
174 if ((oi = yaz_oi_update(otherInformation, 0, oid, categoryValue,
176 oi->which == Z_OtherInfo_characterInfo)
177 return oi->information.characterInfo;
181 void yaz_oi_set_facetlist_oid (
182 Z_OtherInformation **otherInformation, ODR odr,
183 const Odr_oid *oid, int categoryValue,
184 Z_FacetList *facet_list)
186 Z_External *z_external = 0;
187 Z_OtherInformationUnit *oi =
188 yaz_oi_update(otherInformation, odr, oid, categoryValue, 0);
191 oi->which = Z_OtherInfo_externallyDefinedInfo;
192 z_external = odr_malloc(odr, sizeof(*z_external));
193 z_external->which = Z_External_userFacets;
194 z_external->direct_reference = odr_oiddup(odr, oid);
195 z_external->indirect_reference = 0;
196 z_external->u.facetList = facet_list;
197 oi->information.externallyDefinedInfo = z_external;
200 Z_FacetList *yaz_oi_get_facetlist_oid (
201 Z_OtherInformation **otherInformation, ODR odr,
202 const Odr_oid *oid, int categoryValue, int delete_flag)
204 Z_External *z_external = 0;
205 Z_OtherInformationUnit *oi =
206 yaz_oi_update(otherInformation, odr, oid, categoryValue, delete_flag);
209 z_external = oi->information.externallyDefinedInfo;
211 if (z_external && z_external->which == Z_External_userFacets) {
212 return z_external->u.facetList;
221 * c-file-style: "Stroustrup"
222 * indent-tabs-mode: nil
224 * vim: shiftwidth=4 tabstop=8 expandtab