crypto/asn1/a_print.c

   1 /*
   2  * Copyright 1995-2021 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 "crypto/ctype.h"
  12 #include "internal/cryptlib.h"
  13 #include <openssl/asn1.h>
  14
  15 int ASN1_PRINTABLE_type(const unsigned char *s, int len)
  16 {
  17     int c;
  18     int ia5 = 0;
  19     int t61 = 0;
  20
  21     if (s == NULL)
  22         return V_ASN1_PRINTABLESTRING;
  23
  24     if (len < 0)
  25         len = strlen((const char *)s);
  26
  27     while (len-- > 0) {
  28         c = *(s++);
  29         if (!ossl_isasn1print(c))
  30             ia5 = 1;
  31         if (!ossl_isascii(c))
  32             t61 = 1;
  33     }
  34     if (t61)
  35         return V_ASN1_T61STRING;
  36     if (ia5)
  37         return V_ASN1_IA5STRING;
  38     return V_ASN1_PRINTABLESTRING;
  39 }
  40
  41 int ASN1_UNIVERSALSTRING_to_string(ASN1_UNIVERSALSTRING *s)
  42 {
  43     int i;
  44     unsigned char *p;
  45
  46     if (s->type != V_ASN1_UNIVERSALSTRING)
  47         return 0;
  48     if ((s->length % 4) != 0)
  49         return 0;
  50     p = s->data;
  51     for (i = 0; i < s->length; i += 4) {
  52         if ((p[0] != '\0') || (p[1] != '\0') || (p[2] != '\0'))
  53             break;
  54         else
  55             p += 4;
  56     }
  57     if (i < s->length)
  58         return 0;
  59     p = s->data;
  60     for (i = 3; i < s->length; i += 4) {
  61         *(p++) = s->data[i];
  62     }
  63     *(p) = '\0';
  64     s->length /= 4;
  65     s->type = ASN1_PRINTABLE_type(s->data, s->length);
  66     return 1;
  67 }
  68
  69 int ASN1_STRING_print(BIO *bp, const ASN1_STRING *v)
  70 {
  71     int i, n;
  72     char buf[80];
  73     const char *p;
  74
  75     if (v == NULL)
  76         return 0;
  77     n = 0;
  78     p = (const char *)v->data;
  79     for (i = 0; i < v->length; i++) {
  80         if ((p[i] > '~') || ((p[i] < ' ') &&
  81                              (p[i] != '\n') && (p[i] != '\r')))
  82             buf[n] = '.';
  83         else
  84             buf[n] = p[i];
  85         n++;
  86         if (n >= 80) {
  87             if (BIO_write(bp, buf, n) <= 0)
  88                 return 0;
  89             n = 0;
  90         }
  91     }
  92     if (n > 0)
  93         if (BIO_write(bp, buf, n) <= 0)
  94             return 0;
  95     return 1;
  96 }