Happy new year
[yaz-moved-to-github.git] / src / otherinfo.c
1 /* This file is part of the YAZ toolkit.
2  * Copyright (C) 1995-2009 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  * indent-tabs-mode: nil
184  * End:
185  * vim: shiftwidth=4 tabstop=8 expandtab
186  */
187