summaryrefslogtreecommitdiff
path: root/tools/_deprecated/Yahoo/src/libyahoo2/crypt.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'tools/_deprecated/Yahoo/src/libyahoo2/crypt.cpp')
-rw-r--r--tools/_deprecated/Yahoo/src/libyahoo2/crypt.cpp202
1 files changed, 0 insertions, 202 deletions
diff --git a/tools/_deprecated/Yahoo/src/libyahoo2/crypt.cpp b/tools/_deprecated/Yahoo/src/libyahoo2/crypt.cpp
deleted file mode 100644
index b200ec02a2..0000000000
--- a/tools/_deprecated/Yahoo/src/libyahoo2/crypt.cpp
+++ /dev/null
@@ -1,202 +0,0 @@
-/* One way encryption based on MD5 sum.
- Copyright (C) 1996, 1997, 1999, 2000 Free Software Foundation, Inc.
- This file is part of the GNU C Library.
- Contributed by Ulrich Drepper <drepper@cygnus.com>, 1996.
-
- The GNU C Library is free software; you can redistribute it and/or
- modify it under the terms of the GNU Lesser General Public
- License as published by the Free Software Foundation; either
- version 2.1 of the License, or (at your option) any later version.
-
- The GNU C Library is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
- Lesser General Public License for more details.
-
- You should have received a copy of the GNU Lesser General Public
- License along with the GNU C Library; if not, write to the Free
- Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
- 02111-1307 USA. */
-
-/* warmenhoven took this file and made it work with the md5.[ch] we
- * already had. isn't that lovely. people should just use linux or
- * freebsd, crypt works properly on those systems. i hate solaris */
-
-#if HAVE_CONFIG_H
-# include "config.h"
-#endif
-
-#if HAVE_STRING_H
-# include <string.h>
-#elif HAVE_STRINGS_H
-# include <strings.h>
-#endif
-
-#include <stdlib.h>
-#include "yahoo_util.h"
-
-/* Define our magic string to mark salt for MD5 "encryption"
- replacement. This is meant to be the same as for other MD5 based
- encryption implementations. */
-static const char md5_salt_prefix[] = "$1$";
-
-/* Table with characters for base64 transformation. */
-static const char b64t[65] =
-"./0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz";
-
-char *yahoo_crypt(char *key, char *salt)
-{
- char *buffer = NULL;
- size_t buflen = 0, needed = 3 + strlen (salt) + 1 + 26 + 1;
-
- BYTE alt_result[16];
- mir_md5_state_t ctx;
- mir_md5_state_t alt_ctx;
- int cnt;
- char *cp;
-
- if (buflen < needed) {
- buflen = needed;
- if ((buffer = (char*)realloc(buffer, buflen)) == NULL)
- return NULL;
- }
-
- /* Find beginning of salt string. The prefix should normally always
- be present. Just in case it is not. */
- if (strncmp (md5_salt_prefix, salt, sizeof (md5_salt_prefix) - 1) == 0)
- /* Skip salt prefix. */
- salt += sizeof (md5_salt_prefix) - 1;
-
- int salt_len = (int)MIN(strcspn(salt, "$"), 8);
- int key_len = (int)strlen(key);
-
- /* Prepare for the real work. */
- mir_md5_init(&ctx);
-
- /* Add the key string. */
- mir_md5_append(&ctx, (BYTE *)key, (int)key_len);
-
- /* Because the SALT argument need not always have the salt prefix we
- add it separately. */
- mir_md5_append(&ctx, (BYTE *)md5_salt_prefix, sizeof (md5_salt_prefix) - 1);
-
- /* The last part is the salt string. This must be at most 8
- characters and it ends at the first `$' character (for
- compatibility which existing solutions). */
- mir_md5_append(&ctx, (BYTE *)salt, (int)salt_len);
-
- /* Compute alternate MD5 sum with input KEY, SALT, and KEY. The
- final result will be added to the first context. */
- mir_md5_init(&alt_ctx);
-
- /* Add key. */
- mir_md5_append(&alt_ctx, (BYTE *)key, key_len);
-
- /* Add salt. */
- mir_md5_append(&alt_ctx, (BYTE *)salt, salt_len);
-
- /* Add key again. */
- mir_md5_append(&alt_ctx, (BYTE *)key, key_len);
-
- /* Now get result of this (16 bytes) and add it to the other
- context. */
- mir_md5_finish(&alt_ctx, alt_result);
-
- /* Add for any character in the key one byte of the alternate sum. */
- for (cnt = key_len; cnt > 16; cnt -= 16)
- mir_md5_append(&ctx, alt_result, 16);
- mir_md5_append(&ctx, alt_result, cnt);
-
- /* For the following code we need a NUL byte. */
- alt_result[0] = '\0';
-
- /* The original implementation now does something weird: for every 1
- bit in the key the first 0 is added to the buffer, for every 0
- bit the first character of the key. This does not seem to be
- what was intended but we have to follow this to be compatible. */
- for (cnt = key_len; cnt > 0; cnt >>= 1)
- mir_md5_append(&ctx, (cnt & 1) != 0 ? alt_result : (BYTE *)key, 1);
-
- /* Create intermediate result. */
- mir_md5_finish(&ctx, alt_result);
-
- /* Now comes another weirdness. In fear of password crackers here
- comes a quite long loop which just processes the output of the
- previous round again. We cannot ignore this here. */
- for (cnt = 0; cnt < 1000; ++cnt) {
- /* New context. */
- mir_md5_init(&ctx);
-
- /* Add key or last result. */
- if ((cnt & 1) != 0)
- mir_md5_append(&ctx, (BYTE *)key, key_len);
- else
- mir_md5_append(&ctx, alt_result, 16);
-
- /* Add salt for numbers not dividable by 3. */
- if (cnt % 3 != 0)
- mir_md5_append(&ctx, (BYTE *)salt, salt_len);
-
- /* Add key for numbers not dividable by 7. */
- if (cnt % 7 != 0)
- mir_md5_append(&ctx, (BYTE *)key, key_len);
-
- /* Add key or last result. */
- if ((cnt & 1) != 0)
- mir_md5_append(&ctx, alt_result, 16);
- else
- mir_md5_append(&ctx, (BYTE *)key, key_len);
-
- /* Create intermediate result. */
- mir_md5_finish(&ctx, alt_result);
- }
-
- /* Now we can construct the result string. It consists of three
- parts. */
-
- strncpy(buffer, md5_salt_prefix, MAX (0, buflen));
- cp = buffer + strlen(buffer);
- buflen -= sizeof (md5_salt_prefix);
-
- strncpy(cp, salt, MIN (buflen, salt_len));
- cp = cp + strlen(cp);
- buflen -= MIN (buflen, salt_len);
-
- if (buflen > 0) {
- *cp++ = '$';
- --buflen;
- }
-
-#define b64_from_24bit(B2, B1, B0, N) \
- do { \
- unsigned int w = ((B2) << 16) | ((B1) << 8) | (B0); \
- int n = (N); \
- while (n-- > 0 && buflen > 0) { \
- *cp++ = b64t[w & 0x3f]; \
- --buflen; \
- w >>= 6; \
- }\
- } while (0)
-
- b64_from_24bit (alt_result[0], alt_result[6], alt_result[12], 4);
- b64_from_24bit (alt_result[1], alt_result[7], alt_result[13], 4);
- b64_from_24bit (alt_result[2], alt_result[8], alt_result[14], 4);
- b64_from_24bit (alt_result[3], alt_result[9], alt_result[15], 4);
- b64_from_24bit (alt_result[4], alt_result[10], alt_result[5], 4);
- b64_from_24bit (0, 0, alt_result[11], 2);
- if (buflen <= 0) {
- FREE(buffer);
- } else
- *cp = '\0'; /* Terminate the string. */
-
- /* Clear the buffer for the intermediate result so that people
- attaching to processes or reading core dumps cannot get any
- information. We do it in this way to clear correct_words[]
- inside the MD5 implementation as well. */
- mir_md5_init(&ctx);
- mir_md5_finish(&ctx, alt_result);
- memset (&ctx, '\0', sizeof (ctx));
- memset (&alt_ctx, '\0', sizeof (alt_ctx));
-
- return buffer;
-}