2002-06-23 04:24:25 +00:00
|
|
|
/* vi: set sw=4 ts=4: */
|
|
|
|
/*
|
|
|
|
* Utility routine.
|
|
|
|
*
|
2004-03-15 08:29:22 +00:00
|
|
|
* Copyright (C) 1999-2004 by Erik Andersen <andersen@codepoet.org>
|
2002-06-23 04:24:25 +00:00
|
|
|
*
|
2006-07-10 11:41:19 +00:00
|
|
|
* Licensed under GPLv2 or later, see file LICENSE in this tarball for details.
|
2002-06-23 04:24:25 +00:00
|
|
|
*/
|
|
|
|
|
2006-06-18 20:20:07 +00:00
|
|
|
#include "libbb.h"
|
2002-06-23 04:24:25 +00:00
|
|
|
|
2008-06-15 18:35:34 +00:00
|
|
|
#if ENABLE_USE_BB_CRYPT
|
|
|
|
|
2008-06-12 16:55:59 +00:00
|
|
|
/*
|
|
|
|
* DES and MD5 crypt implementations are taken from uclibc.
|
|
|
|
* They were modified to not use static buffers.
|
|
|
|
*/
|
|
|
|
/* Common for them */
|
|
|
|
static const uint8_t ascii64[] = "./0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz";
|
|
|
|
#include "pw_encrypt_des.c"
|
|
|
|
#include "pw_encrypt_md5.c"
|
|
|
|
|
|
|
|
|
|
|
|
static struct const_des_ctx *des_cctx;
|
|
|
|
static struct des_ctx *des_ctx;
|
|
|
|
|
|
|
|
/* my_crypt returns malloc'ed data */
|
|
|
|
static char *my_crypt(const char *key, const char *salt)
|
|
|
|
{
|
|
|
|
/* First, check if we are supposed to be using the MD5 replacement
|
|
|
|
* instead of DES... */
|
|
|
|
if (salt[0] == '$' && salt[1] == '1' && salt[2] == '$') {
|
|
|
|
return md5_crypt(xzalloc(MD5_OUT_BUFSIZE), (unsigned char*)key, (unsigned char*)salt);
|
|
|
|
}
|
|
|
|
|
|
|
|
{
|
|
|
|
if (!des_cctx)
|
|
|
|
des_cctx = const_des_init();
|
|
|
|
des_ctx = des_init(des_ctx, des_cctx);
|
|
|
|
return des_crypt(des_ctx, xzalloc(DES_OUT_BUFSIZE), (unsigned char*)key, (unsigned char*)salt);
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
/* So far nobody wants to have it public */
|
|
|
|
static void my_crypt_cleanup(void)
|
|
|
|
{
|
|
|
|
free(des_cctx);
|
|
|
|
free(des_ctx);
|
|
|
|
des_cctx = NULL;
|
|
|
|
des_ctx = NULL;
|
|
|
|
}
|
|
|
|
|
2008-06-27 02:52:20 +00:00
|
|
|
char* FAST_FUNC pw_encrypt(const char *clear, const char *salt, int cleanup)
|
2002-06-23 04:24:25 +00:00
|
|
|
{
|
2008-06-12 16:56:52 +00:00
|
|
|
char *encrypted;
|
2002-06-23 04:24:25 +00:00
|
|
|
|
2006-09-27 23:31:59 +00:00
|
|
|
#if 0 /* was CONFIG_FEATURE_SHA1_PASSWORDS, but there is no such thing??? */
|
2002-06-23 04:24:25 +00:00
|
|
|
if (strncmp(salt, "$2$", 3) == 0) {
|
|
|
|
return sha1_crypt(clear);
|
|
|
|
}
|
|
|
|
#endif
|
2007-06-18 10:35:06 +00:00
|
|
|
|
2008-06-12 16:56:52 +00:00
|
|
|
encrypted = my_crypt(clear, salt);
|
2008-06-12 16:55:59 +00:00
|
|
|
|
|
|
|
if (cleanup)
|
|
|
|
my_crypt_cleanup();
|
|
|
|
|
2008-06-12 16:56:52 +00:00
|
|
|
return encrypted;
|
2002-06-23 04:24:25 +00:00
|
|
|
}
|
2008-06-15 18:35:34 +00:00
|
|
|
|
|
|
|
#else /* if !ENABLE_USE_BB_CRYPT */
|
|
|
|
|
2008-06-27 02:52:20 +00:00
|
|
|
char* FAST_FUNC pw_encrypt(const char *clear, const char *salt, int cleanup)
|
2008-06-15 18:35:34 +00:00
|
|
|
{
|
|
|
|
#if 0 /* was CONFIG_FEATURE_SHA1_PASSWORDS, but there is no such thing??? */
|
|
|
|
if (strncmp(salt, "$2$", 3) == 0) {
|
|
|
|
return xstrdup(sha1_crypt(clear));
|
|
|
|
}
|
|
|
|
#endif
|
|
|
|
|
|
|
|
return xstrdup(crypt(clear, salt));
|
|
|
|
}
|
|
|
|
|
|
|
|
#endif
|