* Sebastian Hammer, Adam Dickmeiss
*
* $Log: zget.c,v $
- * Revision 1.2 1995-05-30 10:15:49 quinn
+ * Revision 1.5 1995-06-07 14:42:30 quinn
+ * Fixed CLOSE
+ *
+ * Revision 1.4 1995/06/07 14:36:25 quinn
+ * Added CLOSE
+ *
+ * Revision 1.3 1995/06/05 10:52:06 quinn
+ * Fixed some negligences.
+ *
+ * Revision 1.2 1995/05/30 10:15:49 quinn
* Added our implementor's ID
*
* Revision 1.1 1995/05/22 11:30:20 quinn
*r->preferredMessageSize = 30*1024;
r->maximumRecordSize = odr_malloc(o, sizeof(int));
*r->maximumRecordSize = 30*1024;
- r->implementationId = "YAZ";
- r->implementationName = "Index Data YAZ Z39.50/SR implementation";
+ r->result = odr_malloc(o, sizeof(bool_t));
+ *r->result = 1;
+ r->implementationId = "YAZ (id=81)";
+ r->implementationName = "Index Data/YAZ";
r->implementationVersion = YAZ_VERSION;
r->userInformationField = 0;
return r;
return r;
}
+Z_Close *zget_Close(ODR o)
+{
+ Z_Close *r = odr_malloc(o, sizeof(*r));
+
+ r->referenceId = 0;
+ r->closeReason = odr_malloc(o, sizeof(int));
+ *r->closeReason = Z_Close_finished;
+ r->diagnosticInformation = 0;
+ r->resourceReportFormat = 0;
+ r->resourceReport = 0;
+ return r;
+}
+
Z_APDU *zget_APDU(ODR o, enum Z_APDU_which which)
{
Z_APDU *r = odr_malloc(o, sizeof(*r));
case Z_APDU_resourceControlResponse:
r->u.resourceControlResponse = zget_ResourceControlResponse(o);
break;
+ case Z_APDU_close:
+ r->u.close = zget_Close(o);
+ break;
default:
fprintf(stderr, "Bad APDU-type to zget_APDU");
exit(1);