printcert/printcert.c

   1 #include "rfc3280.h"
   2
   3 #define BUFFER_LENGTH 4096
   4
   5 static A2C_ERROR _A2C_DecodeBerFile(PVOID * ppv, PC_A2C_DESCRIPTOR pdesc, int flags, FILE* file)
   6 {
   7     unsigned char buffer[BUFFER_LENGTH];
   8     int return_code = 0;
   9     A2C_CONTEXT* pcxt = NULL;
  10     A2C_ERROR err = A2C_ERROR_Success;
  11
  12     while (1)
  13     {
  14         return_code = fread(buffer, 1, sizeof(buffer), file);
  15
  16         if (return_code < 0)
  17         {
  18             return A2C_ERROR_malformedEncoding;
  19         }
  20
  21         if (return_code == 0)
  22         {
  23             break;
  24         }
  25
  26         err = A2C_DecodeBer(
  27             ppv,
  28             pdesc,
  29             flags,
  30             &pcxt,
  31             buffer,
  32             return_code
  33             );
  34         if ((err < A2C_ERROR_Success) && (err != A2C_ERROR_needMoreData))
  35         {
  36             return err;
  37         }
  38
  39         flags |= A2C_FLAGS_MORE_DATA;
  40     }
  41
  42     return A2C_ERROR_Success;
  43 }
  44
  45 static Cert_Certificate* read_certificate_from_file(const char* filename)
  46 {
  47     A2C_ERROR err = A2C_ERROR_Success;
  48     Cert_Certificate* certificate = NULL;
  49     FILE* file = NULL;
  50
  51     file = fopen(filename, "rb");
  52     if (file == NULL)
  53     {
  54         perror(filename);
  55         return NULL;
  56     }
  57
  58     err = _A2C_DecodeBerFile(
  59         (PVOID*) &certificate,
  60         &Cert_Certificate_descriptor,
  61         0,
  62         file
  63         );
  64
  65     (void) fclose(file);
  66
  67     if (err < A2C_ERROR_Success)
  68     {
  69         return NULL;
  70     }
  71
  72     return certificate;
  73 }
  74
  75 static void print_relative_distinguished_name_email_addresses(Cert_RelativeDistinguishedName* rdn)
  76 {
  77     int counter = 0;
  78
  79     for (counter = 0;counter < rdn->count;++counter)
  80     {
  81         if (A2C_Compare(&(rdn->array[counter].type), Cert_emailAddress.id, &A2C_OBJECT_IDENTIFIER_descriptor) == 0)
  82         {
  83             printf("%s\n", ((Cert_emailAddress__Type*) rdn->array[counter].value.objectPtr)->string);
  84         }
  85     }
  86 }
  87
  88 static void print_name_email_addresses(Cert_Name* name)
  89 {
  90     int counter = 0;
  91
  92     for (counter = 0;counter < name->rdnSequence.count;++counter)
  93     {
  94         print_relative_distinguished_name_email_addresses(&name->rdnSequence.array[counter]);
  95     }
  96 }
  97
  98 static void print_subject_alt_name_email_addresses(Cert_Extensions* extensions)
  99 {
 100     int counter = 0;
 101
 102     for (counter = 0;counter < extensions->count;++counter)
 103     {
 104         if (A2C_Compare(&extensions->array[counter].extnID, &Cert_id_ce_subjectAltName, &A2C_OBJECT_IDENTIFIER_descriptor) == 0)
 105         {
 106             Cert_GeneralNames* names = NULL;
 107             A2C_ERROR err = A2C_ERROR_Success;
 108             int namesCounter = 0;
 109
 110             err = A2C_DecodeBer(
 111                 (PVOID*) &names,
 112                 &Cert_GeneralNames_descriptor,
 113                 0,
 114                 NULL,
 115                 extensions->array[counter].extnValue.data,
 116                 extensions->array[counter].extnValue.length
 117                 );
 118             if (err < A2C_ERROR_Success)
 119             {
 120                 return;
 121             }
 122
 123             for (namesCounter = 0;namesCounter < names->count;++namesCounter)
 124             {
 125                 if (names->array[namesCounter].index == Cert_GeneralName_rfc822Name_index)
 126                 {
 127                     printf("%s\n", names->array[namesCounter].rfc822Name.string);
 128                 }
 129             }
 130         }
 131     }
 132 }
 133
 134 int main(int argc, char** argv)
 135 {
 136     Cert_Certificate* certificate = NULL;
 137
 138     certificate = read_certificate_from_file(argv[1]);
 139     if (certificate != NULL)
 140     {
 141         print_name_email_addresses(&certificate->toBeSigned.subject);
 142         print_subject_alt_name_email_addresses(&certificate->toBeSigned.extensions);
 143     }
 144 }