1 | /* |
2 | * Copyright 1995-2016 The OpenSSL Project Authors. All Rights Reserved. |
3 | * |
4 | * Licensed under the Apache License 2.0 (the "License"). You may not use |
5 | * this file except in compliance with the License. You can obtain a copy |
6 | * in the file LICENSE in the source distribution or at |
7 | * https://www.openssl.org/source/license.html |
8 | */ |
9 | |
10 | #include <stdio.h> |
11 | #include "internal/cryptlib.h" |
12 | #include <openssl/asn1t.h> |
13 | #include <openssl/objects.h> |
14 | #include "asn1_local.h" |
15 | |
16 | int ASN1_TYPE_get(const ASN1_TYPE *a) |
17 | { |
18 | if (a->type == V_ASN1_BOOLEAN |
19 | || a->type == V_ASN1_NULL |
20 | || a->value.ptr != NULL) |
21 | return a->type; |
22 | else |
23 | return 0; |
24 | } |
25 | |
26 | void ASN1_TYPE_set(ASN1_TYPE *a, int type, void *value) |
27 | { |
28 | if (a->type != V_ASN1_BOOLEAN |
29 | && a->type != V_ASN1_NULL |
30 | && a->value.ptr != NULL) { |
31 | ASN1_TYPE **tmp_a = &a; |
32 | asn1_primitive_free((ASN1_VALUE **)tmp_a, NULL, 0); |
33 | } |
34 | a->type = type; |
35 | if (type == V_ASN1_BOOLEAN) |
36 | a->value.boolean = value ? 0xff : 0; |
37 | else |
38 | a->value.ptr = value; |
39 | } |
40 | |
41 | int ASN1_TYPE_set1(ASN1_TYPE *a, int type, const void *value) |
42 | { |
43 | if (!value || (type == V_ASN1_BOOLEAN)) { |
44 | void *p = (void *)value; |
45 | ASN1_TYPE_set(a, type, p); |
46 | } else if (type == V_ASN1_OBJECT) { |
47 | ASN1_OBJECT *odup; |
48 | odup = OBJ_dup(value); |
49 | if (!odup) |
50 | return 0; |
51 | ASN1_TYPE_set(a, type, odup); |
52 | } else { |
53 | ASN1_STRING *sdup; |
54 | sdup = ASN1_STRING_dup(value); |
55 | if (!sdup) |
56 | return 0; |
57 | ASN1_TYPE_set(a, type, sdup); |
58 | } |
59 | return 1; |
60 | } |
61 | |
62 | /* Returns 0 if they are equal, != 0 otherwise. */ |
63 | int ASN1_TYPE_cmp(const ASN1_TYPE *a, const ASN1_TYPE *b) |
64 | { |
65 | int result = -1; |
66 | |
67 | if (!a || !b || a->type != b->type) |
68 | return -1; |
69 | |
70 | switch (a->type) { |
71 | case V_ASN1_OBJECT: |
72 | result = OBJ_cmp(a->value.object, b->value.object); |
73 | break; |
74 | case V_ASN1_BOOLEAN: |
75 | result = a->value.boolean - b->value.boolean; |
76 | break; |
77 | case V_ASN1_NULL: |
78 | result = 0; /* They do not have content. */ |
79 | break; |
80 | case V_ASN1_INTEGER: |
81 | case V_ASN1_ENUMERATED: |
82 | case V_ASN1_BIT_STRING: |
83 | case V_ASN1_OCTET_STRING: |
84 | case V_ASN1_SEQUENCE: |
85 | case V_ASN1_SET: |
86 | case V_ASN1_NUMERICSTRING: |
87 | case V_ASN1_PRINTABLESTRING: |
88 | case V_ASN1_T61STRING: |
89 | case V_ASN1_VIDEOTEXSTRING: |
90 | case V_ASN1_IA5STRING: |
91 | case V_ASN1_UTCTIME: |
92 | case V_ASN1_GENERALIZEDTIME: |
93 | case V_ASN1_GRAPHICSTRING: |
94 | case V_ASN1_VISIBLESTRING: |
95 | case V_ASN1_GENERALSTRING: |
96 | case V_ASN1_UNIVERSALSTRING: |
97 | case V_ASN1_BMPSTRING: |
98 | case V_ASN1_UTF8STRING: |
99 | case V_ASN1_OTHER: |
100 | default: |
101 | result = ASN1_STRING_cmp((ASN1_STRING *)a->value.ptr, |
102 | (ASN1_STRING *)b->value.ptr); |
103 | break; |
104 | } |
105 | |
106 | return result; |
107 | } |
108 | |
109 | ASN1_TYPE *ASN1_TYPE_pack_sequence(const ASN1_ITEM *it, void *s, ASN1_TYPE **t) |
110 | { |
111 | ASN1_OCTET_STRING *oct; |
112 | ASN1_TYPE *rt; |
113 | |
114 | oct = ASN1_item_pack(s, it, NULL); |
115 | if (oct == NULL) |
116 | return NULL; |
117 | |
118 | if (t && *t) { |
119 | rt = *t; |
120 | } else { |
121 | rt = ASN1_TYPE_new(); |
122 | if (rt == NULL) { |
123 | ASN1_OCTET_STRING_free(oct); |
124 | return NULL; |
125 | } |
126 | if (t) |
127 | *t = rt; |
128 | } |
129 | ASN1_TYPE_set(rt, V_ASN1_SEQUENCE, oct); |
130 | return rt; |
131 | } |
132 | |
133 | void *ASN1_TYPE_unpack_sequence(const ASN1_ITEM *it, const ASN1_TYPE *t) |
134 | { |
135 | if (t == NULL || t->type != V_ASN1_SEQUENCE || t->value.sequence == NULL) |
136 | return NULL; |
137 | return ASN1_item_unpack(t->value.sequence, it); |
138 | } |
139 | |