1 files changed, 109 insertions, 0 deletions
diff --git a/tests/ocsp-basic-response.c b/tests/ocsp-basic-response.c
new file mode 100644
index 0000000..701ed53
--- /dev/null
+++ b/tests/ocsp-basic-response.c
@@ -0,0 +1,109 @@
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <libtasn1.h>
+
+int
+main (int argc, char** argv)
+{
+  int result = 0, len;
+  asn1_node definitions = NULL, node1 = NULL;
+  char errorDescription[ASN1_MAX_ERROR_DESCRIPTION_SIZE];
+  const char *choicefile = getenv ("ASN1CHOICE_OCSP");
+  const char *datafile = getenv ("ASN1_RESPONSE_OCSP_DATA");
+  FILE *fp;
+  char data[1024];
+  int data_size = sizeof (data);
+  unsigned etype;
+
+  if (!choicefile)
+    choicefile = "pkix.asn";
+
+  if (!datafile)
+    datafile = "ocsp-basic-response.der";
+
+  result = asn1_parser2tree (choicefile, &definitions, errorDescription);
+  if (result != ASN1_SUCCESS)
+    {
+      fprintf (stderr, "error in %d: %s\n", __LINE__, errorDescription);
+      exit (1);
+    }
+
+  result = asn1_create_element (definitions, "PKIX1.BasicOCSPResponse", &node1);
+  if (result != ASN1_SUCCESS)
+    {
+      fprintf (stderr, "error in %d\n", __LINE__);
+      exit (1);
+    }
+
+  fp = fopen(datafile, "r");
+  if (fp == NULL)
+    {
+      fprintf (stderr, "error in %d\n", __LINE__);
+      exit (1);
+    }
+  data_size = fread(data, 1, sizeof(data), fp);
+  fclose(fp);
+
+  result = asn1_der_decoding2 (&node1, data, &data_size, ASN1_DECODE_FLAG_STRICT_DER, errorDescription);
+  if (result != ASN1_SUCCESS)
+    {
+      fprintf (stderr, "error in %d: decoding: %s\n", __LINE__, errorDescription);
+      exit (1);
+    }
+
+  len = sizeof(data);
+  result = asn1_read_value(node1, "tbsResponseData.responderID", data, &len);
+  if (result != ASN1_SUCCESS)
+    {
+      fprintf (stderr, "error in %d: %s\n", __LINE__, errorDescription);
+      exit (1);
+    }
+
+  if (strcmp(data, "byKey") != 0)
+    {
+      fprintf (stderr, "error in %d: %s\n", __LINE__, data);
+      exit (1);
+    }
+
+  len = 0;
+  result = asn1_read_value_type(node1, "tbsResponseData.responderID.byKey", NULL, &len, &etype);
+  if (result != ASN1_MEM_ERROR)
+    {
+      fprintf (stderr, "error in %d: result is: %s\n", __LINE__, asn1_strerror(result));
+      exit (1);
+    }
+
+  if (etype != ASN1_ETYPE_OCTET_STRING)
+    {
+      fprintf (stderr, "error in %d: The type (%d) doesn't match octet string.\n", __LINE__, etype);
+      exit (1);
+    }
+
+  if (len != 20)
+    {
+      fprintf (stderr, "length doesn't match the expected (got: %d, should be: 20)\n", len);
+      exit (1);
+    }
+
+  
+
+  len = sizeof(data);
+  result = asn1_read_value(node1, "tbsResponseData.responderID.byKey", data, &len);
+  if (result != ASN1_SUCCESS)
+    {
+      fprintf (stderr, "error in %d: %s\n", __LINE__, errorDescription);
+      exit (1);
+    }
+
+  if (memcmp(data, "\x50\xEA\x73\x89\xDB\x29\xFB\x10\x8F\x9E\xE5\x01\x20\xD4\xDE\x79\x99\x48\x83\xF7", len) != 0)
+    {
+      fprintf (stderr, "contents don't match\n");
+      exit (1);
+    }
+
+  asn1_delete_structure (&node1);
+  asn1_delete_structure (&definitions);
+
+  return 0;
+}