Fixed CLOSE

[yaz-moved-to-github.git] / asn / zget.c

diff --git a/asn/zget.c b/asn/zget.c
index 4d58e17..d4991e9 100644 (file)
--- a/asn/zget.c
+++ b/asn/zget.c
@@ -4,7 +4,13 @@
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: zget.c,v $
- * Revision 1.3  1995-06-05 10:52:06  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
@@ -252,6 +258,19 @@ Z_AccessControlResponse *zget_AccessControlResponse(ODR o)
     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));
@@ -288,6 +307,9 @@ Z_APDU *zget_APDU(ODR o, enum Z_APDU_which which)
        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);