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