Add a warning stipulating how things should be coded in ossl_init_base
[openssl.git] / crypto / asn1 / t_spki.c
1 /*
2  * Copyright 1999-2016 The OpenSSL Project Authors. All Rights Reserved.
3  *
4  * Licensed under the OpenSSL license (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/x509.h>
13 #include <openssl/asn1.h>
14 #include <openssl/rsa.h>
15 #include <openssl/dsa.h>
16 #include <openssl/bn.h>
17
18 /* Print out an SPKI */
19
20 int NETSCAPE_SPKI_print(BIO *out, NETSCAPE_SPKI *spki)
21 {
22     EVP_PKEY *pkey;
23     ASN1_IA5STRING *chal;
24     ASN1_OBJECT *spkioid;
25     int i, n;
26     char *s;
27     BIO_printf(out, "Netscape SPKI:\n");
28     X509_PUBKEY_get0_param(&spkioid, NULL, NULL, NULL, spki->spkac->pubkey);
29     i = OBJ_obj2nid(spkioid);
30     BIO_printf(out, "  Public Key Algorithm: %s\n",
31                (i == NID_undef) ? "UNKNOWN" : OBJ_nid2ln(i));
32     pkey = X509_PUBKEY_get(spki->spkac->pubkey);
33     if (!pkey)
34         BIO_printf(out, "  Unable to load public key\n");
35     else {
36         EVP_PKEY_print_public(out, pkey, 4, NULL);
37         EVP_PKEY_free(pkey);
38     }
39     chal = spki->spkac->challenge;
40     if (chal->length)
41         BIO_printf(out, "  Challenge String: %s\n", chal->data);
42     i = OBJ_obj2nid(spki->sig_algor.algorithm);
43     BIO_printf(out, "  Signature Algorithm: %s",
44                (i == NID_undef) ? "UNKNOWN" : OBJ_nid2ln(i));
45
46     n = spki->signature->length;
47     s = (char *)spki->signature->data;
48     for (i = 0; i < n; i++) {
49         if ((i % 18) == 0)
50             BIO_write(out, "\n      ", 7);
51         BIO_printf(out, "%02x%s", (unsigned char)s[i],
52                    ((i + 1) == n) ? "" : ":");
53     }
54     BIO_write(out, "\n", 1);
55     return 1;
56 }