From 88afa58a5b1f01cbefd89795c4dab371fb31f9c3 Mon Sep 17 00:00:00 2001 From: nobody Date: Sat, 19 May 2001 12:49:14 +0000 Subject: This commit was manufactured by cvs2svn to create tag 'GAL_0_8'. svn path=/tags/GAL_0_8/; revision=9892 --- camel/camel-sasl-cram-md5.c | 142 -------------------------------------------- 1 file changed, 142 deletions(-) delete mode 100644 camel/camel-sasl-cram-md5.c (limited to 'camel/camel-sasl-cram-md5.c') diff --git a/camel/camel-sasl-cram-md5.c b/camel/camel-sasl-cram-md5.c deleted file mode 100644 index 3d3bae36e1..0000000000 --- a/camel/camel-sasl-cram-md5.c +++ /dev/null @@ -1,142 +0,0 @@ -/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */ -/* - * Authors: Jeffrey Stedfast - * - * Copyright 2001 Ximian, Inc. (www.ximian.com) - * - * This program is free software; you can redistribute it and/or modify - * it under the terms of the GNU General Public License as published by - * the Free Software Foundation; either version 2 of the License, or - * (at your option) any later version. - * - * This program 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 General Public License for more details. - * - * You should have received a copy of the GNU General Public License - * along with this program; if not, write to the Free Software - * Foundation, Inc., 59 Temple Street #330, Boston, MA 02111-1307, USA. - * - */ - -#ifdef HAVE_CONFIG_H -#include -#endif - -#include -#include -#include "camel-sasl-cram-md5.h" -#include "camel-mime-utils.h" -#include "camel-service.h" -#include - -CamelServiceAuthType camel_sasl_cram_md5_authtype = { - N_("CRAM-MD5"), - - N_("This option will connect to the server using a " - "secure CRAM-MD5 password, if the server supports it."), - - "CRAM-MD5", - TRUE -}; - -static CamelSaslClass *parent_class = NULL; - -/* Returns the class for a CamelSaslCramMd5 */ -#define CSCM_CLASS(so) CAMEL_SASL_CRAM_MD5_CLASS (CAMEL_OBJECT_GET_CLASS (so)) - -static GByteArray *cram_md5_challenge (CamelSasl *sasl, GByteArray *token, CamelException *ex); - -static void -camel_sasl_cram_md5_class_init (CamelSaslCramMd5Class *camel_sasl_cram_md5_class) -{ - CamelSaslClass *camel_sasl_class = CAMEL_SASL_CLASS (camel_sasl_cram_md5_class); - - parent_class = CAMEL_SASL_CLASS (camel_type_get_global_classfuncs (camel_sasl_get_type ())); - - /* virtual method overload */ - camel_sasl_class->challenge = cram_md5_challenge; -} - -CamelType -camel_sasl_cram_md5_get_type (void) -{ - static CamelType type = CAMEL_INVALID_TYPE; - - if (type == CAMEL_INVALID_TYPE) { - type = camel_type_register (camel_sasl_get_type (), - "CamelSaslCramMd5", - sizeof (CamelSaslCramMd5), - sizeof (CamelSaslCramMd5Class), - (CamelObjectClassInitFunc) camel_sasl_cram_md5_class_init, - NULL, - NULL, - NULL); - } - - return type; -} - -/* CRAM-MD5 algorithm: - * MD5 ((passwd XOR opad), MD5 ((passwd XOR ipad), timestamp)) - */ - -static GByteArray * -cram_md5_challenge (CamelSasl *sasl, GByteArray *token, CamelException *ex) -{ - char *passwd; - guchar digest[16], md5asc[33], *s, *p; - GByteArray *ret = NULL; - guchar ipad[64]; - guchar opad[64]; - MD5Context ctx; - int i, pw_len; - - /* Need to wait for the server */ - if (!token) - return NULL; - - g_return_val_if_fail (sasl->service->url->passwd != NULL, NULL); - - memset (ipad, 0, sizeof (ipad)); - memset (opad, 0, sizeof (opad)); - - passwd = sasl->service->url->passwd; - pw_len = strlen (passwd); - if (pw_len <= 64) { - memcpy (ipad, passwd, pw_len); - memcpy (opad, passwd, pw_len); - } else { - md5_get_digest (passwd, pw_len, ipad); - memcpy (opad, ipad, 16); - } - - for (i = 0; i < 64; i++) { - ipad[i] ^= 0x36; - opad[i] ^= 0x5c; - } - - md5_init (&ctx); - md5_update (&ctx, ipad, 64); - md5_update (&ctx, token->data, token->len); - md5_final (&ctx, digest); - - md5_init (&ctx); - md5_update (&ctx, opad, 64); - md5_update (&ctx, digest, 16); - md5_final (&ctx, digest); - - /* lowercase hexify that bad-boy... */ - for (s = digest, p = md5asc; p < md5asc + 32; s++, p += 2) - sprintf (p, "%.2x", *s); - - ret = g_byte_array_new (); - g_byte_array_append (ret, sasl->service->url->user, strlen (sasl->service->url->user)); - g_byte_array_append (ret, " ", 1); - g_byte_array_append (ret, md5asc, 32); - - sasl->authenticated = TRUE; - - return ret; -} -- cgit v1.2.3