SRW, CQL, 2003
[yaz-moved-to-github.git] / zutil / zget.c
1 /*
2  * Copyright (c) 1995-2003, Index Data.
3  * See the file LICENSE for details.
4  * Sebastian Hammer, Adam Dickmeiss
5  *
6  * $Id: zget.c,v 1.13 2003-01-06 08:20:29 adam Exp $
7  */
8
9 #include <yaz/proto.h>
10
11 Z_InitRequest *zget_InitRequest(ODR o)
12 {
13     Z_InitRequest *r = (Z_InitRequest *)odr_malloc(o, sizeof(*r));
14
15     r->referenceId = 0;
16     r->options = (Odr_bitmask *)odr_malloc(o, sizeof(*r->options));
17     ODR_MASK_ZERO(r->options);
18     r->protocolVersion = (Odr_bitmask *)
19         odr_malloc(o, sizeof(*r->protocolVersion));
20
21     ODR_MASK_SET(r->options, Z_Options_search);
22     ODR_MASK_SET(r->options, Z_Options_present);
23
24     ODR_MASK_ZERO(r->protocolVersion);
25
26     ODR_MASK_SET(r->protocolVersion, Z_ProtocolVersion_1);
27     ODR_MASK_SET(r->protocolVersion, Z_ProtocolVersion_2);
28
29     r->preferredMessageSize = odr_intdup(o, 30*1024);
30     r->maximumRecordSize = odr_intdup(o, 30*1024);
31     r->idAuthentication = 0;
32     r->implementationId = "81";
33     r->implementationName = "Index Data/YAZ";
34     r->implementationVersion = YAZ_VERSION
35 #ifdef YAZ_DATE_STR
36     " (" YAZ_DATE_STR ")"
37 #endif
38 #ifdef YAZ_OS
39     " " YAZ_OS
40 #endif
41         ;
42     r->userInformationField = 0;
43     r->otherInfo = 0;
44     return r;
45 }
46
47 Z_InitResponse *zget_InitResponse(ODR o)
48 {
49     Z_InitResponse *r = (Z_InitResponse *)odr_malloc(o, sizeof(*r));
50
51     r->referenceId = 0;
52     r->options = (Odr_bitmask *)odr_malloc(o, sizeof(*r->options));
53     ODR_MASK_ZERO(r->options);
54     r->protocolVersion = (Odr_bitmask *)odr_malloc(o, sizeof(*r->protocolVersion));
55     ODR_MASK_ZERO(r->protocolVersion);
56     r->preferredMessageSize = odr_intdup(o, 30*1024);
57     r->maximumRecordSize = odr_intdup(o, 30*1024);
58     r->result = odr_intdup(o, 1);
59     r->implementationId = "81";
60     r->implementationName = "Index Data/YAZ";
61     r->implementationVersion = YAZ_VERSION
62 #ifdef YAZ_DATE_STR
63     " (" YAZ_DATE_STR ")"
64 #endif
65 #ifdef YAZ_OS
66     " " YAZ_OS
67 #endif
68         ;
69     r->userInformationField = 0;
70     r->otherInfo = 0;
71     return r;
72 }
73
74 Z_SearchRequest *zget_SearchRequest(ODR o)
75 {
76     Z_SearchRequest *r = (Z_SearchRequest *)odr_malloc(o, sizeof(*r));
77
78     r->referenceId = 0;
79     r->smallSetUpperBound = odr_intdup(o, 0);
80     r->largeSetLowerBound = odr_intdup(o, 1);
81     r->mediumSetPresentNumber = odr_intdup(o, 0);
82     r->replaceIndicator = odr_intdup(o, 1);
83     r->resultSetName = "default";
84     r->num_databaseNames = 0;
85     r->databaseNames = 0;
86     r->smallSetElementSetNames = 0;
87     r->mediumSetElementSetNames = 0;
88     r->preferredRecordSyntax = 0;
89     r->query = 0;
90     r->additionalSearchInfo = 0;
91     r->otherInfo = 0;
92     return r;
93 }
94
95 Z_SearchResponse *zget_SearchResponse(ODR o)
96 {
97     Z_SearchResponse *r = (Z_SearchResponse *)odr_malloc(o, sizeof(*r));
98
99     r->referenceId = 0;
100     r->resultCount = odr_intdup(o, 0);
101     r->numberOfRecordsReturned = odr_intdup(o, 0);
102     r->nextResultSetPosition = odr_intdup(o, 0);
103     r->searchStatus = odr_intdup(o, 1);
104     r->resultSetStatus = 0;
105     r->presentStatus = 0;
106     r->records = 0;
107     r->additionalSearchInfo = 0;
108     r->otherInfo = 0;
109     return r;
110 }
111
112 Z_PresentRequest *zget_PresentRequest(ODR o)
113 {
114     Z_PresentRequest *r = (Z_PresentRequest *)odr_malloc(o, sizeof(*r));
115
116     r->referenceId = 0;
117     r->resultSetId = "default";
118     r->resultSetStartPoint = odr_intdup(o, 1);
119     r->numberOfRecordsRequested = odr_intdup(o, 10);
120     r->num_ranges = 0;
121     r->additionalRanges = 0;
122     r->recordComposition = 0;
123     r->preferredRecordSyntax = 0;
124     r->maxSegmentCount = 0;
125     r->maxRecordSize = 0;
126     r->maxSegmentSize = 0;
127     r->otherInfo = 0;
128     return r;
129 }
130
131 Z_PresentResponse *zget_PresentResponse(ODR o)
132 {
133     Z_PresentResponse *r = (Z_PresentResponse *)odr_malloc(o, sizeof(*r));
134
135     r->referenceId = 0;
136     r->numberOfRecordsReturned = odr_intdup(o, 0);
137     r->nextResultSetPosition = odr_intdup(o, 0);
138     r->presentStatus = odr_intdup(o, Z_PRES_SUCCESS);
139     r->records = 0;
140     r->otherInfo = 0;
141     return r;
142 }
143
144 Z_DeleteResultSetRequest *zget_DeleteResultSetRequest(ODR o)
145 {
146     Z_DeleteResultSetRequest *r = (Z_DeleteResultSetRequest *)
147         odr_malloc(o, sizeof(*r));
148
149     r->referenceId = 0;
150     r->deleteFunction = odr_intdup(o, Z_DeleteRequest_list);
151     r->num_resultSetList = 0;
152     r->resultSetList = 0;
153     r->otherInfo = 0;
154     return r;
155 }
156
157 Z_DeleteResultSetResponse *zget_DeleteResultSetResponse(ODR o)
158 {
159     Z_DeleteResultSetResponse *r = (Z_DeleteResultSetResponse *)
160         odr_malloc(o, sizeof(*r));
161     
162     r->referenceId = 0;
163     r->deleteOperationStatus = odr_intdup(o, Z_DeleteStatus_success);
164     r->deleteListStatuses = 0;
165     r->numberNotDeleted = 0;
166     r->bulkStatuses = 0;
167     r->deleteMessage = 0;
168     r->otherInfo = 0;
169     return r;
170 }
171
172 Z_ScanRequest *zget_ScanRequest(ODR o)
173 {
174     Z_ScanRequest *r = (Z_ScanRequest *)odr_malloc(o, sizeof(*r));
175     
176     r->referenceId = 0;
177     r->num_databaseNames = 0;
178     r->databaseNames = 0;
179     r->attributeSet = 0;
180     r->termListAndStartPoint = 0;
181     r->stepSize = 0;
182     r->numberOfTermsRequested = odr_intdup(o, 20);
183     r->preferredPositionInResponse = 0;
184     r->otherInfo = 0;
185     return r;
186 }
187
188 Z_ScanResponse *zget_ScanResponse(ODR o)
189 {
190     Z_ScanResponse *r = (Z_ScanResponse *)odr_malloc(o, sizeof(*r));
191     
192     r->referenceId = 0;
193     r->stepSize = 0;
194     r->scanStatus = odr_intdup(o, Z_Scan_success);
195     r->numberOfEntriesReturned = odr_intdup(o, 0);
196     r->positionOfTerm =0;
197     r->entries = 0;
198     r->attributeSet = 0;
199     r->otherInfo = 0;
200     return r;
201 }
202
203 Z_TriggerResourceControlRequest *zget_TriggerResourceControlRequest(ODR o)
204 {
205     Z_TriggerResourceControlRequest *r = (Z_TriggerResourceControlRequest *)
206         odr_malloc(o, sizeof(*r));
207     
208     r->referenceId = 0;
209     r->requestedAction = odr_intdup(o, Z_TriggerResourceCtrl_resourceReport);
210     r->prefResourceReportFormat = 0;
211     r->resultSetWanted = 0;
212     r->otherInfo = 0;
213     return r;
214 }
215
216 Z_ResourceControlRequest *zget_ResourceControlRequest(ODR o)
217 {
218     Z_ResourceControlRequest *r = (Z_ResourceControlRequest *)
219         odr_malloc(o, sizeof(*r));
220
221     r->referenceId = 0;
222     r->suspendedFlag = 0;
223     r->resourceReport = 0;
224     r->partialResultsAvailable = 0;
225     r->responseRequired = odr_intdup(o, 0);
226     r->triggeredRequestFlag = 0;
227     r->otherInfo = 0;
228     return r;
229 }
230
231 Z_ResourceControlResponse *zget_ResourceControlResponse(ODR o)
232 {
233     Z_ResourceControlResponse *r = (Z_ResourceControlResponse *)
234         odr_malloc(o, sizeof(*r));
235
236     r->referenceId = 0;
237     r->continueFlag = odr_intdup(o, 1);
238     r->resultSetWanted = 0;
239     r->otherInfo = 0;
240     return r;
241 }
242
243 Z_AccessControlRequest *zget_AccessControlRequest(ODR o)
244 {
245     Z_AccessControlRequest *r = (Z_AccessControlRequest *)
246         odr_malloc(o, sizeof(*r));
247
248     r->referenceId = 0;
249     r->which = Z_AccessRequest_simpleForm;
250     r->u.simpleForm = 0;
251     r->otherInfo = 0;
252     return r;
253 }
254
255 Z_AccessControlResponse *zget_AccessControlResponse(ODR o)
256 {
257     Z_AccessControlResponse *r = (Z_AccessControlResponse *)
258         odr_malloc(o, sizeof(*r));
259
260     r->referenceId = 0;
261     r->which = Z_AccessResponse_simpleForm;
262     r->u.simpleForm = 0;
263     r->diagnostic = 0;
264     r->otherInfo = 0;
265     return r;
266 }
267
268 Z_Segment *zget_Segment(ODR o)
269 {
270     Z_Segment *r = (Z_Segment *)odr_malloc(o, sizeof(*r));
271
272     r->referenceId = 0;
273     r->numberOfRecordsReturned = odr_intdup(o, 0);
274     r->num_segmentRecords = 0;
275     r->segmentRecords = (Z_NamePlusRecord **) odr_nullval();
276     r->otherInfo = 0;
277     return r;
278 }
279
280 Z_Close *zget_Close(ODR o)
281 {
282     Z_Close *r = (Z_Close *)odr_malloc(o, sizeof(*r));
283
284     r->referenceId = 0;
285     r->closeReason = odr_intdup(o, Z_Close_finished);
286     r->diagnosticInformation = 0;
287     r->resourceReportFormat = 0;
288     r->resourceReport = 0;
289     r->otherInfo = 0;
290     return r;
291 }
292
293 Z_ResourceReportRequest *zget_ResourceReportRequest(ODR o)
294 {
295     Z_ResourceReportRequest *r = (Z_ResourceReportRequest *)
296         odr_malloc(o, sizeof(*r));
297
298     r->referenceId = 0;
299     r->opId = 0;
300     r->prefResourceReportFormat = 0;
301     r->otherInfo = 0;
302     return r;
303 }
304
305 Z_ResourceReportResponse *zget_ResourceReportResponse(ODR o)
306 {
307     Z_ResourceReportResponse *r = (Z_ResourceReportResponse *)
308         odr_malloc(o, sizeof(*r));
309
310     r->referenceId = 0;
311     r->resourceReportStatus = odr_intdup(o, Z_ResourceReportStatus_success);
312     r->resourceReport = 0;
313     r->otherInfo = 0;
314     return r;
315 }
316
317 Z_SortRequest *zget_SortRequest(ODR o)
318 {
319     Z_SortRequest *r = (Z_SortRequest *)odr_malloc(o, sizeof(*r));
320
321     r->referenceId = 0;
322     r->inputResultSetNames = 0;
323     r->sortedResultSetName = 0;
324     r->sortSequence = 0;
325     r->otherInfo = 0;
326     return r;
327 }
328
329 Z_SortResponse *zget_SortResponse(ODR o)
330 {
331     Z_SortResponse *r = (Z_SortResponse *)odr_malloc(o, sizeof(*r));
332
333     r->referenceId = 0;
334     r->sortStatus = odr_intdup(o, Z_SortStatus_success);
335     r->resultSetStatus = odr_intdup(o, Z_SortResultSetStatus_empty);
336     r->diagnostics = 0;
337     r->otherInfo = 0;
338     return r;
339 }
340
341 Z_ExtendedServicesRequest *zget_ExtendedServicesRequest(ODR o)
342 {
343     Z_ExtendedServicesRequest *r = (Z_ExtendedServicesRequest *)
344         odr_malloc(o, sizeof(*r));
345
346     r->referenceId = 0;
347     r->function = odr_intdup(o, Z_ExtendedServicesRequest_create);
348     r->packageType = 0;
349     r->packageName = 0;
350     r->userId = 0;
351     r->retentionTime = 0;
352     r->permissions = 0;
353     r->description = 0;
354     r->taskSpecificParameters = 0;
355     r->waitAction = odr_intdup(o, Z_ExtendedServicesRequest_waitIfPossible);
356     r->elements = 0;
357     r->otherInfo = 0;
358     return r;
359 }
360
361 Z_ExtendedServicesResponse *zget_ExtendedServicesResponse(ODR o)
362 {
363     Z_ExtendedServicesResponse *r = (Z_ExtendedServicesResponse *)
364         odr_malloc(o, sizeof(*r));
365
366     r->referenceId = 0;
367     r->operationStatus = odr_intdup(o, Z_ExtendedServicesResponse_done);
368     r->num_diagnostics = 0;
369     r->diagnostics = 0;
370     r->taskPackage = 0;
371     r->otherInfo = 0;
372     return r;
373 }
374
375 Z_DuplicateDetectionRequest *zget_DuplicateDetectionRequest(ODR o)
376 {
377     Z_DuplicateDetectionRequest *r = (Z_DuplicateDetectionRequest *)
378         odr_malloc(o, sizeof(*r));
379     
380     r->referenceId = 0;
381     r->num_inputResultSetIds = 0;
382     r->inputResultSetIds = 0;
383     r->outputResultSetName = 0;
384     r->applicablePortionOfRecord = 0;
385     r->num_duplicateDetectionCriteria = 0;
386     r->duplicateDetectionCriteria = 0;
387     r->clustering = 0;
388     r->num_retentionCriteria = 0;
389     r->retentionCriteria = 0;
390     r->num_sortCriteria = 0;
391     r->sortCriteria = 0;
392     r->otherInfo = 0;
393     return r;
394 }
395
396 Z_DuplicateDetectionResponse *zget_DuplicateDetectionResponse(ODR o)
397 {
398     Z_DuplicateDetectionResponse *r = (Z_DuplicateDetectionResponse *)
399         odr_malloc(o, sizeof(*r));
400  
401     r->referenceId = 0;
402     r->status = odr_intdup(o, Z_DuplicateDetectionResponse_success);
403     r->resultSetCount = 0;
404     r->num_diagnostics = 0;
405     r->diagnostics = 0;
406     r->otherInfo = 0;
407     return r;
408 }
409  
410 Z_APDU *zget_APDU(ODR o, int which)
411 {
412     Z_APDU *r = (Z_APDU *)odr_malloc(o, sizeof(*r));
413     
414     switch (r->which = which)
415     {
416     case Z_APDU_initRequest:
417         r->u.initRequest = zget_InitRequest(o);
418         break;
419     case Z_APDU_initResponse:
420         r->u.initResponse = zget_InitResponse(o);
421         break;
422     case Z_APDU_searchRequest:
423         r->u.searchRequest = zget_SearchRequest(o);
424         break;
425     case Z_APDU_searchResponse:
426         r->u.searchResponse = zget_SearchResponse(o);
427         break;
428     case Z_APDU_presentRequest:
429         r->u.presentRequest = zget_PresentRequest(o);
430         break;
431     case Z_APDU_presentResponse:
432         r->u.presentResponse = zget_PresentResponse(o);
433         break;
434     case Z_APDU_deleteResultSetRequest:
435         r->u.deleteResultSetRequest = zget_DeleteResultSetRequest(o);
436         break;
437     case Z_APDU_deleteResultSetResponse:
438         r->u.deleteResultSetResponse = zget_DeleteResultSetResponse(o);
439         break;
440     case Z_APDU_scanRequest:
441         r->u.scanRequest = zget_ScanRequest(o);
442         break;
443     case Z_APDU_scanResponse:
444         r->u.scanResponse = zget_ScanResponse(o);
445         break;
446     case Z_APDU_triggerResourceControlRequest:
447         r->u.triggerResourceControlRequest =
448             zget_TriggerResourceControlRequest(o);
449         break;
450     case Z_APDU_resourceControlRequest:
451         r->u.resourceControlRequest = zget_ResourceControlRequest(o);
452         break;
453     case Z_APDU_resourceControlResponse:
454         r->u.resourceControlResponse = zget_ResourceControlResponse(o);
455         break;
456     case Z_APDU_segmentRequest:
457         r->u.segmentRequest = zget_Segment(o);
458         break;
459     case Z_APDU_close:
460         r->u.close = zget_Close(o);
461         break;
462     case Z_APDU_accessControlRequest:
463         r->u.accessControlRequest = zget_AccessControlRequest(o);
464         break;
465     case Z_APDU_accessControlResponse:
466         r->u.accessControlResponse = zget_AccessControlResponse(o);
467         break;
468     case Z_APDU_resourceReportRequest:
469         r->u.resourceReportRequest = zget_ResourceReportRequest(o);
470         break;
471     case Z_APDU_resourceReportResponse:
472         r->u.resourceReportResponse = zget_ResourceReportResponse(o);
473         break;
474     case Z_APDU_sortRequest:
475         r->u.sortRequest = zget_SortRequest(o);
476         break;
477     case Z_APDU_sortResponse:
478         r->u.sortResponse = zget_SortResponse(o);
479         break;
480     case Z_APDU_extendedServicesRequest:
481         r->u.extendedServicesRequest = zget_ExtendedServicesRequest(o);
482         break;
483     case Z_APDU_extendedServicesResponse:
484         r->u.extendedServicesResponse = zget_ExtendedServicesResponse(o);
485         break;
486     case Z_APDU_duplicateDetectionRequest:
487         r->u.duplicateDetectionRequest = zget_DuplicateDetectionRequest(o);
488         break;
489     case Z_APDU_duplicateDetectionResponse:
490         r->u.duplicateDetectionResponse = zget_DuplicateDetectionResponse(o);
491         break;
492     default:
493         fprintf(stderr, "Bad APDU-type to zget_APDU");
494         exit(1);
495     }
496     return r;
497 }