mirror of
https://github.com/php/php-src.git
synced 2024-12-17 05:50:14 +08:00
347 lines
9.5 KiB
C
347 lines
9.5 KiB
C
/*
|
|
+----------------------------------------------------------------------+
|
|
| PHP Version 7 |
|
|
+----------------------------------------------------------------------+
|
|
| Copyright (c) 1997-2017 The PHP Group |
|
|
+----------------------------------------------------------------------+
|
|
| This source file is subject to version 3.01 of the PHP license, |
|
|
| that is bundled with this package in the file LICENSE, and is |
|
|
| available through the world-wide-web at the following url: |
|
|
| http://www.php.net/license/3_01.txt |
|
|
| If you did not receive a copy of the PHP license and are unable to |
|
|
| obtain it through the world-wide-web, please send a note to |
|
|
| license@php.net so we can mail you a copy immediately. |
|
|
+----------------------------------------------------------------------+
|
|
| Authors: Stig Bakken <ssb@php.net> |
|
|
| Zeev Suraski <zeev@zend.com> |
|
|
| Rasmus Lerdorf <rasmus@php.net> |
|
|
| Pierre Joye <pierre@php.net> |
|
|
+----------------------------------------------------------------------+
|
|
*/
|
|
|
|
/* $Id$ */
|
|
|
|
#include <stdlib.h>
|
|
|
|
#include "php.h"
|
|
#if HAVE_CRYPT
|
|
|
|
#if HAVE_UNISTD_H
|
|
#include <unistd.h>
|
|
#endif
|
|
#if PHP_USE_PHP_CRYPT_R
|
|
# include "php_crypt_r.h"
|
|
# include "crypt_freesec.h"
|
|
#else
|
|
# if HAVE_CRYPT_H
|
|
# if defined(CRYPT_R_GNU_SOURCE) && !defined(_GNU_SOURCE)
|
|
# define _GNU_SOURCE
|
|
# endif
|
|
# include <crypt.h>
|
|
# endif
|
|
#endif
|
|
#if TM_IN_SYS_TIME
|
|
#include <sys/time.h>
|
|
#else
|
|
#include <time.h>
|
|
#endif
|
|
#if HAVE_STRING_H
|
|
#include <string.h>
|
|
#else
|
|
#include <strings.h>
|
|
#endif
|
|
|
|
#ifdef PHP_WIN32
|
|
#include <process.h>
|
|
#endif
|
|
|
|
#include "php_lcg.h"
|
|
#include "php_crypt.h"
|
|
#include "php_rand.h"
|
|
|
|
/* The capabilities of the crypt() function is determined by the test programs
|
|
* run by configure from aclocal.m4. They will set PHP_STD_DES_CRYPT,
|
|
* PHP_EXT_DES_CRYPT, PHP_MD5_CRYPT and PHP_BLOWFISH_CRYPT as appropriate
|
|
* for the target platform. */
|
|
|
|
#if PHP_STD_DES_CRYPT
|
|
#define PHP_MAX_SALT_LEN 2
|
|
#endif
|
|
|
|
#if PHP_EXT_DES_CRYPT
|
|
#undef PHP_MAX_SALT_LEN
|
|
#define PHP_MAX_SALT_LEN 9
|
|
#endif
|
|
|
|
#if PHP_MD5_CRYPT
|
|
#undef PHP_MAX_SALT_LEN
|
|
#define PHP_MAX_SALT_LEN 12
|
|
#endif
|
|
|
|
#if PHP_BLOWFISH_CRYPT
|
|
#undef PHP_MAX_SALT_LEN
|
|
#define PHP_MAX_SALT_LEN 60
|
|
#endif
|
|
|
|
#if PHP_SHA512_CRYPT
|
|
#undef PHP_MAX_SALT_LEN
|
|
#define PHP_MAX_SALT_LEN 123
|
|
#endif
|
|
|
|
|
|
/* If the configure-time checks fail, we provide DES.
|
|
* XXX: This is a hack. Fix the real problem! */
|
|
|
|
#ifndef PHP_MAX_SALT_LEN
|
|
#define PHP_MAX_SALT_LEN 2
|
|
#undef PHP_STD_DES_CRYPT
|
|
#define PHP_STD_DES_CRYPT 1
|
|
#endif
|
|
|
|
#define PHP_CRYPT_RAND php_rand()
|
|
|
|
/* Used to check DES salts to ensure that they contain only valid characters */
|
|
#define IS_VALID_SALT_CHARACTER(c) (((c) >= '.' && (c) <= '9') || ((c) >= 'A' && (c) <= 'Z') || ((c) >= 'a' && (c) <= 'z'))
|
|
|
|
#define DES_INVALID_SALT_ERROR "Supplied salt is not valid for DES. Possible bug in provided salt format."
|
|
|
|
|
|
PHP_MINIT_FUNCTION(crypt) /* {{{ */
|
|
{
|
|
REGISTER_LONG_CONSTANT("CRYPT_SALT_LENGTH", PHP_MAX_SALT_LEN, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("CRYPT_STD_DES", PHP_STD_DES_CRYPT, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("CRYPT_EXT_DES", PHP_EXT_DES_CRYPT, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("CRYPT_MD5", PHP_MD5_CRYPT, CONST_CS | CONST_PERSISTENT);
|
|
REGISTER_LONG_CONSTANT("CRYPT_BLOWFISH", PHP_BLOWFISH_CRYPT, CONST_CS | CONST_PERSISTENT);
|
|
|
|
#ifdef PHP_SHA256_CRYPT
|
|
REGISTER_LONG_CONSTANT("CRYPT_SHA256", PHP_SHA256_CRYPT, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
|
|
#ifdef PHP_SHA512_CRYPT
|
|
REGISTER_LONG_CONSTANT("CRYPT_SHA512", PHP_SHA512_CRYPT, CONST_CS | CONST_PERSISTENT);
|
|
#endif
|
|
|
|
#if PHP_USE_PHP_CRYPT_R
|
|
php_init_crypt_r();
|
|
#endif
|
|
|
|
return SUCCESS;
|
|
}
|
|
/* }}} */
|
|
|
|
PHP_MSHUTDOWN_FUNCTION(crypt) /* {{{ */
|
|
{
|
|
#if PHP_USE_PHP_CRYPT_R
|
|
php_shutdown_crypt_r();
|
|
#endif
|
|
|
|
return SUCCESS;
|
|
}
|
|
/* }}} */
|
|
|
|
static unsigned char itoa64[] = "./0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz";
|
|
|
|
static void php_to64(char *s, zend_long v, int n) /* {{{ */
|
|
{
|
|
while (--n >= 0) {
|
|
*s++ = itoa64[v&0x3f];
|
|
v >>= 6;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
PHPAPI zend_string *php_crypt(const char *password, const int pass_len, const char *salt, int salt_len, zend_bool quiet)
|
|
{
|
|
char *crypt_res;
|
|
zend_string *result;
|
|
/* Windows (win32/crypt) has a stripped down version of libxcrypt and
|
|
a CryptoApi md5_crypt implementation */
|
|
#if PHP_USE_PHP_CRYPT_R
|
|
{
|
|
struct php_crypt_extended_data buffer;
|
|
|
|
if (salt[0]=='$' && salt[1]=='1' && salt[2]=='$') {
|
|
char output[MD5_HASH_MAX_LEN], *out;
|
|
|
|
out = php_md5_crypt_r(password, salt, output);
|
|
if (out) {
|
|
return zend_string_init(out, strlen(out), 0);
|
|
}
|
|
return NULL;
|
|
} else if (salt[0]=='$' && salt[1]=='6' && salt[2]=='$') {
|
|
char *output;
|
|
output = emalloc(PHP_MAX_SALT_LEN);
|
|
|
|
crypt_res = php_sha512_crypt_r(password, salt, output, PHP_MAX_SALT_LEN);
|
|
if (!crypt_res) {
|
|
memset(output, 0, PHP_MAX_SALT_LEN);
|
|
efree(output);
|
|
return NULL;
|
|
} else {
|
|
result = zend_string_init(output, strlen(output), 0);
|
|
memset(output, 0, PHP_MAX_SALT_LEN);
|
|
efree(output);
|
|
return result;
|
|
}
|
|
} else if (salt[0]=='$' && salt[1]=='5' && salt[2]=='$') {
|
|
char *output;
|
|
output = emalloc(PHP_MAX_SALT_LEN);
|
|
|
|
crypt_res = php_sha256_crypt_r(password, salt, output, PHP_MAX_SALT_LEN);
|
|
if (!crypt_res) {
|
|
memset(output, 0, PHP_MAX_SALT_LEN);
|
|
efree(output);
|
|
return NULL;
|
|
} else {
|
|
result = zend_string_init(output, strlen(output), 0);
|
|
memset(output, 0, PHP_MAX_SALT_LEN);
|
|
efree(output);
|
|
return result;
|
|
}
|
|
} else if (
|
|
salt[0] == '$' &&
|
|
salt[1] == '2' &&
|
|
salt[3] == '$') {
|
|
char output[PHP_MAX_SALT_LEN + 1];
|
|
|
|
memset(output, 0, PHP_MAX_SALT_LEN + 1);
|
|
|
|
crypt_res = php_crypt_blowfish_rn(password, salt, output, sizeof(output));
|
|
if (!crypt_res) {
|
|
ZEND_SECURE_ZERO(output, PHP_MAX_SALT_LEN + 1);
|
|
return NULL;
|
|
} else {
|
|
result = zend_string_init(output, strlen(output), 0);
|
|
ZEND_SECURE_ZERO(output, PHP_MAX_SALT_LEN + 1);
|
|
return result;
|
|
}
|
|
} else if (salt[0] == '*' && (salt[1] == '0' || salt[1] == '1')) {
|
|
return NULL;
|
|
} else {
|
|
/* DES Fallback */
|
|
|
|
/* Only check the salt if it's not EXT_DES */
|
|
if (salt[0] != '_') {
|
|
/* DES style hashes */
|
|
if (!IS_VALID_SALT_CHARACTER(salt[0]) || !IS_VALID_SALT_CHARACTER(salt[1])) {
|
|
if (!quiet) {
|
|
/* error consistently about invalid DES fallbacks */
|
|
php_error_docref(NULL, E_DEPRECATED, DES_INVALID_SALT_ERROR);
|
|
}
|
|
}
|
|
}
|
|
|
|
memset(&buffer, 0, sizeof(buffer));
|
|
_crypt_extended_init_r();
|
|
|
|
crypt_res = _crypt_extended_r(password, salt, &buffer);
|
|
if (!crypt_res || (salt[0] == '*' && salt[1] == '0')) {
|
|
return NULL;
|
|
} else {
|
|
result = zend_string_init(crypt_res, strlen(crypt_res), 0);
|
|
return result;
|
|
}
|
|
}
|
|
}
|
|
#else
|
|
|
|
if (salt[0] != '$' && salt[0] != '_' && (!IS_VALID_SALT_CHARACTER(salt[0]) || !IS_VALID_SALT_CHARACTER(salt[1]))) {
|
|
if (!quiet) {
|
|
/* error consistently about invalid DES fallbacks */
|
|
php_error_docref(NULL, E_DEPRECATED, DES_INVALID_SALT_ERROR);
|
|
}
|
|
}
|
|
|
|
# if defined(HAVE_CRYPT_R) && (defined(_REENTRANT) || defined(_THREAD_SAFE))
|
|
{
|
|
# if defined(CRYPT_R_STRUCT_CRYPT_DATA)
|
|
struct crypt_data buffer;
|
|
memset(&buffer, 0, sizeof(buffer));
|
|
# elif defined(CRYPT_R_CRYPTD)
|
|
CRYPTD buffer;
|
|
# else
|
|
# error Data struct used by crypt_r() is unknown. Please report.
|
|
# endif
|
|
crypt_res = crypt_r(password, salt, &buffer);
|
|
}
|
|
# elif defined(HAVE_CRYPT)
|
|
crypt_res = crypt(password, salt);
|
|
# else
|
|
# error No crypt() implementation
|
|
# endif
|
|
#endif
|
|
|
|
if (!crypt_res || (salt[0] == '*' && salt[1] == '0')) {
|
|
return NULL;
|
|
} else {
|
|
result = zend_string_init(crypt_res, strlen(crypt_res), 0);
|
|
return result;
|
|
}
|
|
}
|
|
/* }}} */
|
|
|
|
|
|
/* {{{ proto string crypt(string str [, string salt])
|
|
Hash a string */
|
|
PHP_FUNCTION(crypt)
|
|
{
|
|
char salt[PHP_MAX_SALT_LEN + 1];
|
|
char *str, *salt_in = NULL;
|
|
size_t str_len, salt_in_len = 0;
|
|
zend_string *result;
|
|
|
|
salt[0] = salt[PHP_MAX_SALT_LEN] = '\0';
|
|
|
|
/* This will produce suitable results if people depend on DES-encryption
|
|
* available (passing always 2-character salt). At least for glibc6.1 */
|
|
memset(&salt[1], '$', PHP_MAX_SALT_LEN - 1);
|
|
|
|
if (zend_parse_parameters(ZEND_NUM_ARGS(), "s|s", &str, &str_len, &salt_in, &salt_in_len) == FAILURE) {
|
|
return;
|
|
}
|
|
|
|
if (salt_in) {
|
|
memcpy(salt, salt_in, MIN(PHP_MAX_SALT_LEN, salt_in_len));
|
|
} else {
|
|
php_error_docref(NULL, E_NOTICE, "No salt parameter was specified. You must use a randomly generated salt and a strong hash function to produce a secure hash.");
|
|
}
|
|
|
|
/* The automatic salt generation covers standard DES, md5-crypt and Blowfish (simple) */
|
|
if (!*salt) {
|
|
#if PHP_MD5_CRYPT
|
|
strncpy(salt, "$1$", PHP_MAX_SALT_LEN);
|
|
php_to64(&salt[3], PHP_CRYPT_RAND, 4);
|
|
php_to64(&salt[7], PHP_CRYPT_RAND, 4);
|
|
strncpy(&salt[11], "$", PHP_MAX_SALT_LEN - 11);
|
|
#elif PHP_STD_DES_CRYPT
|
|
php_to64(&salt[0], PHP_CRYPT_RAND, 2);
|
|
salt[2] = '\0';
|
|
#endif
|
|
salt_in_len = strlen(salt);
|
|
} else {
|
|
salt_in_len = MIN(PHP_MAX_SALT_LEN, salt_in_len);
|
|
}
|
|
salt[salt_in_len] = '\0';
|
|
|
|
if ((result = php_crypt(str, (int)str_len, salt, (int)salt_in_len, 0)) == NULL) {
|
|
if (salt[0] == '*' && salt[1] == '0') {
|
|
RETURN_STRING("*1");
|
|
} else {
|
|
RETURN_STRING("*0");
|
|
}
|
|
}
|
|
RETURN_STR(result);
|
|
}
|
|
/* }}} */
|
|
#endif
|
|
|
|
/*
|
|
* Local variables:
|
|
* tab-width: 4
|
|
* c-basic-offset: 4
|
|
* End:
|
|
* vim600: sw=4 ts=4 fdm=marker
|
|
* vim<600: sw=4 ts=4
|
|
*/
|