Bugfix: don't look in internal table for signature if found in application
[openssl.git] / crypto / objects / obj_xref.c
1 /* crypto/objects/obj_xref.c */
2 /* Written by Dr Stephen N Henson (shenson@bigfoot.com) for the OpenSSL
3  * project 2006.
4  */
5 /* ====================================================================
6  * Copyright (c) 2006 The OpenSSL Project.  All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  *
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer. 
14  *
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in
17  *    the documentation and/or other materials provided with the
18  *    distribution.
19  *
20  * 3. All advertising materials mentioning features or use of this
21  *    software must display the following acknowledgment:
22  *    "This product includes software developed by the OpenSSL Project
23  *    for use in the OpenSSL Toolkit. (http://www.OpenSSL.org/)"
24  *
25  * 4. The names "OpenSSL Toolkit" and "OpenSSL Project" must not be used to
26  *    endorse or promote products derived from this software without
27  *    prior written permission. For written permission, please contact
28  *    licensing@OpenSSL.org.
29  *
30  * 5. Products derived from this software may not be called "OpenSSL"
31  *    nor may "OpenSSL" appear in their names without prior written
32  *    permission of the OpenSSL Project.
33  *
34  * 6. Redistributions of any form whatsoever must retain the following
35  *    acknowledgment:
36  *    "This product includes software developed by the OpenSSL Project
37  *    for use in the OpenSSL Toolkit (http://www.OpenSSL.org/)"
38  *
39  * THIS SOFTWARE IS PROVIDED BY THE OpenSSL PROJECT ``AS IS'' AND ANY
40  * EXPRESSED OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
41  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
42  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE OpenSSL PROJECT OR
43  * ITS CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
44  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
45  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
46  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
47  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
48  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
49  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED
50  * OF THE POSSIBILITY OF SUCH DAMAGE.
51  * ====================================================================
52  *
53  * This product includes cryptographic software written by Eric Young
54  * (eay@cryptsoft.com).  This product includes software written by Tim
55  * Hudson (tjh@cryptsoft.com).
56  *
57  */
58
59 #include <openssl/objects.h>
60 #include "obj_xref.h"
61
62 STACK *sig_app, *sigx_app;
63
64 static int cmp_sig(const nid_triple *a, const nid_triple *b)
65         {
66         return **a - **b;
67         }
68
69 static int cmp_sig_sk(const nid_triple **a, const nid_triple **b)
70         {
71         return ***a - ***b;
72         }
73
74 static int cmp_sigx(const nid_triple **a, const nid_triple **b)
75         {
76         int ret;
77         ret = (**a)[1] - (**b)[1];
78         if (ret)
79                 return ret;
80         return (**a)[2] - (**b)[2];
81         }
82
83
84 int OBJ_find_sigid_algs(int signid, int *pdig_nid, int *ppkey_nid)
85         {
86         nid_triple tmp, *rv = NULL;
87         tmp[0] = signid;
88
89         if (sig_app)
90                 {
91                 int idx = sk_find(sig_app, (char *)&tmp);
92                 if (idx >= 0)
93                         rv = (nid_triple *)sk_value(sig_app, idx);
94                 }
95
96 #ifndef OBJ_XREF_TEST2
97         if (rv == NULL)
98                 {
99                 rv = (nid_triple *)OBJ_bsearch((char *)&tmp,
100                                 (char *)sigoid_srt,
101                                 sizeof(sigoid_srt) / sizeof(nid_triple),
102                                 sizeof(nid_triple),
103                                 (int (*)(const void *, const void *))cmp_sig);
104                 }
105 #endif
106         if (rv == NULL)
107                 return 0;
108         *pdig_nid = (*rv)[1];
109         *ppkey_nid = (*rv)[2];
110         return 1;
111         }
112
113 int OBJ_find_sigid_by_algs(int *psignid, int dig_nid, int pkey_nid)
114         {
115         nid_triple tmp, *t=&tmp, **rv = NULL;
116         tmp[1] = dig_nid;
117         tmp[2] = pkey_nid;
118
119         if (sigx_app)
120                 {
121                 int idx = sk_find(sigx_app, (char *)&tmp);
122                 if (idx >= 0)
123                         {
124                         t = (nid_triple *)sk_value(sigx_app, idx);
125                         rv = &t;
126                         }
127                 }
128
129 #ifndef OBJ_XREF_TEST2
130         if (rv == NULL)
131                 {
132                 rv = (nid_triple **)OBJ_bsearch((char *)&t,
133                                 (char *)sigoid_srt_xref,
134                                 sizeof(sigoid_srt_xref) / sizeof(nid_triple *),
135                                 sizeof(nid_triple *),
136                                 (int (*)(const void *, const void *))cmp_sigx);
137                 }
138 #endif
139         if (rv == NULL)
140                 return 0;
141         *psignid = (**rv)[0];
142         return 1;
143         }
144
145 typedef int sk_cmp_fn_type(const char * const *a, const char * const *b);
146
147 int OBJ_add_sigid(int signid, int dig_id, int pkey_id)
148         {
149         nid_triple *ntr;
150         if (!sig_app)
151                 sig_app = sk_new((sk_cmp_fn_type *)cmp_sig_sk);
152         if (!sig_app)
153                 return 0;
154         if (!sigx_app)
155                 sigx_app = sk_new((sk_cmp_fn_type *)cmp_sigx);
156         if (!sigx_app)
157                 return 0;
158         ntr = OPENSSL_malloc(sizeof(int) * 3);
159         if (!ntr)
160                 return 0;
161         (*ntr)[0] = signid;
162         (*ntr)[1] = dig_id;
163         (*ntr)[2] = pkey_id;
164
165         if (!sk_push(sig_app, (char *)ntr))
166                 {
167                 OPENSSL_free(ntr);
168                 return 0;
169                 }
170
171         if (!sk_push(sigx_app, (char *)ntr))
172                 return 0;
173
174         sk_sort(sig_app);
175         sk_sort(sigx_app);
176
177         return 1;
178         }
179
180 static void sid_free(void *x)
181         {
182         nid_triple *tt = (nid_triple *)x;
183         OPENSSL_free(tt);
184         }
185
186 void OBJ_sigid_free(void)
187         {
188         if (sig_app)
189                 {
190                 sk_pop_free(sig_app, sid_free);
191                 sig_app = NULL;
192                 }
193         if (sigx_app)
194                 {
195                 sk_free(sigx_app);
196                 sigx_app = NULL;
197                 }
198         }
199                 
200 #ifdef OBJ_XREF_TEST
201
202 main()
203         {
204         int n1, n2, n3;
205
206         int i, rv;
207 #ifdef OBJ_XREF_TEST2
208         for (i = 0; i < sizeof(sigoid_srt) / sizeof(nid_triple); i++)
209                 {
210                 OBJ_add_sigid(sigoid_srt[i][0], sigoid_srt[i][1],
211                                 sigoid_srt[i][2]);
212                 }
213 #endif
214
215         for (i = 0; i < sizeof(sigoid_srt) / sizeof(nid_triple); i++)
216                 {
217                 n1 = sigoid_srt[i][0];
218                 rv = OBJ_find_sigid_algs(n1, &n2, &n3);
219                 printf("Forward: %d, %s %s %s\n", rv,
220                         OBJ_nid2ln(n1), OBJ_nid2ln(n2), OBJ_nid2ln(n3));
221                 n1=0;
222                 rv = OBJ_find_sigid_by_algs(&n1, n2, n3);
223                 printf("Reverse: %d, %s %s %s\n", rv,
224                         OBJ_nid2ln(n1), OBJ_nid2ln(n2), OBJ_nid2ln(n3));
225                 }
226         }
227         
228 #endif