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