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