1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
|
/*
* Copyright (C) 2016 Red Hat, Inc.
*
* This file is part of LIBTASN1.
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*
*/
#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, "rb");
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;
}
|
