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