2015-04-25 04:39:40 +08:00
|
|
|
|
|
|
|
#include <openssl/crypto.h>
|
|
|
|
|
2016-04-12 04:03:42 +08:00
|
|
|
#define perror_line() perror_line1(__LINE__)
|
|
|
|
#define perror_line1(l) perror_line2(l)
|
|
|
|
#define perror_line2(l) perror("failed " #l)
|
|
|
|
|
2015-04-25 04:39:40 +08:00
|
|
|
int main(int argc, char **argv)
|
|
|
|
{
|
|
|
|
#if defined(OPENSSL_SYS_LINUX) || defined(OPENSSL_SYS_UNIX)
|
2016-04-12 04:03:42 +08:00
|
|
|
char *p = NULL, *q = NULL, *r = NULL, *s = NULL;
|
2015-04-25 04:39:40 +08:00
|
|
|
|
2016-04-12 04:03:42 +08:00
|
|
|
r = OPENSSL_secure_malloc(20);
|
|
|
|
/* r = non-secure 20 */
|
|
|
|
if (r == NULL) {
|
|
|
|
perror_line();
|
|
|
|
return 1;
|
|
|
|
}
|
2015-04-25 04:39:40 +08:00
|
|
|
if (!CRYPTO_secure_malloc_init(4096, 32)) {
|
2016-04-12 04:03:42 +08:00
|
|
|
perror_line();
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
if (CRYPTO_secure_allocated(r)) {
|
|
|
|
perror_line();
|
2015-04-25 04:39:40 +08:00
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
p = OPENSSL_secure_malloc(20);
|
2016-04-12 04:03:42 +08:00
|
|
|
/* r = non-secure 20, p = secure 20 */
|
2015-04-25 04:39:40 +08:00
|
|
|
if (!CRYPTO_secure_allocated(p)) {
|
2016-04-12 04:03:42 +08:00
|
|
|
perror_line();
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
/* 20 secure -> 32-byte minimum allocaton unit */
|
|
|
|
if (CRYPTO_secure_used() != 32) {
|
|
|
|
perror_line();
|
2015-04-25 04:39:40 +08:00
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
q = OPENSSL_malloc(20);
|
2016-04-12 04:03:42 +08:00
|
|
|
/* r = non-secure 20, p = secure 20, q = non-secure 20 */
|
2015-04-25 04:39:40 +08:00
|
|
|
if (CRYPTO_secure_allocated(q)) {
|
2016-04-12 04:03:42 +08:00
|
|
|
perror_line();
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
s = OPENSSL_secure_malloc(20);
|
|
|
|
/* r = non-secure 20, p = secure 20, q = non-secure 20, s = secure 20 */
|
|
|
|
if (!CRYPTO_secure_allocated(s)) {
|
|
|
|
perror_line();
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
/* 2 * 20 secure -> 64 bytes allocated */
|
|
|
|
if (CRYPTO_secure_used() != 64) {
|
|
|
|
perror_line();
|
2015-04-25 04:39:40 +08:00
|
|
|
return 1;
|
|
|
|
}
|
2016-02-17 18:03:55 +08:00
|
|
|
OPENSSL_secure_free(p);
|
2016-04-12 04:03:42 +08:00
|
|
|
/* 20 secure -> 32 bytes allocated */
|
|
|
|
if (CRYPTO_secure_used() != 32) {
|
|
|
|
perror_line();
|
|
|
|
return 1;
|
|
|
|
}
|
2016-02-17 18:03:55 +08:00
|
|
|
OPENSSL_free(q);
|
2016-04-12 04:03:42 +08:00
|
|
|
/* should not complete, as secure memory is still allocated */
|
|
|
|
if (CRYPTO_secure_malloc_done()) {
|
|
|
|
perror_line();
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
if (!CRYPTO_secure_malloc_initialized()) {
|
|
|
|
perror_line();
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
OPENSSL_secure_free(s);
|
|
|
|
/* secure memory should now be 0, so done should complete */
|
|
|
|
if (CRYPTO_secure_used() != 0) {
|
|
|
|
perror_line();
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
if (!CRYPTO_secure_malloc_done()) {
|
|
|
|
perror_line();
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
if (CRYPTO_secure_malloc_initialized()) {
|
|
|
|
perror_line();
|
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
/* this can complete - it was not really secure */
|
|
|
|
OPENSSL_secure_free(r);
|
2015-04-25 04:39:40 +08:00
|
|
|
#else
|
|
|
|
/* Should fail. */
|
|
|
|
if (CRYPTO_secure_malloc_init(4096, 32)) {
|
2016-04-12 04:03:42 +08:00
|
|
|
perror_line();
|
2015-04-25 04:39:40 +08:00
|
|
|
return 1;
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
return 0;
|
|
|
|
}
|