28 #if defined(POLARSSL_PEM_C)
44 #if defined(POLARSSL_MD5_C) && (defined(POLARSSL_DES_C) || defined(POLARSSL_AES_C))
48 static int pem_get_iv(
const unsigned char *s,
unsigned char *iv,
size_t iv_len )
52 memset( iv, 0, iv_len );
54 for( i = 0; i < iv_len * 2; i++, s++ )
56 if( *s >=
'0' && *s <=
'9' ) j = *s -
'0';
else
57 if( *s >=
'A' && *s <=
'F' ) j = *s -
'7';
else
58 if( *s >=
'a' && *s <=
'f' ) j = *s -
'W';
else
61 k = ( ( i & 1 ) != 0 ) ? j : j << 4;
63 iv[i >> 1] = (
unsigned char)( iv[i >> 1] | k );
69 static void pem_pbkdf1(
unsigned char *key,
size_t keylen,
71 const unsigned char *pwd,
size_t pwdlen )
74 unsigned char md5sum[16];
87 memcpy( key, md5sum, keylen );
89 memset( &md5_ctx, 0,
sizeof( md5_ctx ) );
90 memset( md5sum, 0, 16 );
94 memcpy( key, md5sum, 16 );
107 use_len = keylen - 16;
109 memcpy( key + 16, md5sum, use_len );
111 memset( &md5_ctx, 0,
sizeof( md5_ctx ) );
112 memset( md5sum, 0, 16 );
115 #if defined(POLARSSL_DES_C)
119 static void pem_des_decrypt(
unsigned char des_iv[8],
120 unsigned char *buf,
size_t buflen,
121 const unsigned char *pwd,
size_t pwdlen )
124 unsigned char des_key[8];
126 pem_pbkdf1( des_key, 8, des_iv, pwd, pwdlen );
132 memset( &des_ctx, 0,
sizeof( des_ctx ) );
133 memset( des_key, 0, 8 );
139 static void pem_des3_decrypt(
unsigned char des3_iv[8],
140 unsigned char *buf,
size_t buflen,
141 const unsigned char *pwd,
size_t pwdlen )
144 unsigned char des3_key[24];
146 pem_pbkdf1( des3_key, 24, des3_iv, pwd, pwdlen );
152 memset( &des3_ctx, 0,
sizeof( des3_ctx ) );
153 memset( des3_key, 0, 24 );
157 #if defined(POLARSSL_AES_C)
161 static void pem_aes_decrypt(
unsigned char aes_iv[16],
unsigned int keylen,
162 unsigned char *buf,
size_t buflen,
163 const unsigned char *pwd,
size_t pwdlen )
166 unsigned char aes_key[32];
168 pem_pbkdf1( aes_key, keylen, aes_iv, pwd, pwdlen );
174 memset( &aes_ctx, 0,
sizeof( aes_ctx ) );
175 memset( aes_key, 0, keylen );
181 int pem_read_buffer(
pem_context *ctx,
char *header,
char *footer,
const unsigned char *data,
const unsigned char *pwd,
size_t pwdlen,
size_t *use_len )
186 const unsigned char *s1, *s2, *end;
187 #if defined(POLARSSL_MD5_C) && (defined(POLARSSL_DES_C) || defined(POLARSSL_AES_C))
188 unsigned char pem_iv[16];
198 s1 = (
unsigned char *) strstr( (
const char *) data, header );
203 s2 = (
unsigned char *) strstr( (
const char *) data, footer );
205 if( s2 == NULL || s2 <= s1 )
208 s1 += strlen( header );
209 if( *s1 ==
'\r' ) s1++;
210 if( *s1 ==
'\n' ) s1++;
214 end += strlen( footer );
215 if( *end ==
'\r' ) end++;
216 if( *end ==
'\n' ) end++;
217 *use_len = end - data;
221 if( memcmp( s1,
"Proc-Type: 4,ENCRYPTED", 22 ) == 0 )
223 #if defined(POLARSSL_MD5_C) && (defined(POLARSSL_DES_C) || defined(POLARSSL_AES_C))
227 if( *s1 ==
'\r' ) s1++;
228 if( *s1 ==
'\n' ) s1++;
232 #if defined(POLARSSL_DES_C)
233 if( memcmp( s1,
"DEK-Info: DES-EDE3-CBC,", 23 ) == 0 )
238 if( pem_get_iv( s1, pem_iv, 8 ) != 0 )
243 else if( memcmp( s1,
"DEK-Info: DES-CBC,", 18 ) == 0 )
248 if( pem_get_iv( s1, pem_iv, 8) != 0 )
255 #if defined(POLARSSL_AES_C)
256 if( memcmp( s1,
"DEK-Info: AES-", 14 ) == 0 )
258 if( memcmp( s1,
"DEK-Info: AES-128-CBC,", 22 ) == 0 )
260 else if( memcmp( s1,
"DEK-Info: AES-192-CBC,", 22 ) == 0 )
262 else if( memcmp( s1,
"DEK-Info: AES-256-CBC,", 22 ) == 0 )
268 if( pem_get_iv( s1, pem_iv, 16 ) != 0 )
278 if( *s1 ==
'\r' ) s1++;
279 if( *s1 ==
'\n' ) s1++;
292 if( ( buf = (
unsigned char *) malloc( len ) ) == NULL )
303 #if defined(POLARSSL_MD5_C) && (defined(POLARSSL_DES_C) || defined(POLARSSL_AES_C))
310 #if defined(POLARSSL_DES_C)
312 pem_des3_decrypt( pem_iv, buf, len, pwd, pwdlen );
314 pem_des_decrypt( pem_iv, buf, len, pwd, pwdlen );
317 #if defined(POLARSSL_AES_C)
319 pem_aes_decrypt( pem_iv, 16, buf, len, pwd, pwdlen );
321 pem_aes_decrypt( pem_iv, 24, buf, len, pwd, pwdlen );
323 pem_aes_decrypt( pem_iv, 32, buf, len, pwd, pwdlen );
326 if( buf[0] != 0x30 || buf[1] != 0x82 ||
327 buf[4] != 0x02 || buf[5] != 0x01 )