char* hash_password_v1(const unsigned char* b0 , int b0len , const unsigned char* password , int psdlen)
{
unsigned char* dst = (unsigned char*)malloc(b0len + psdlen + 1);
PurpleCipherContext *context;
static gchar digest[41];
memset(dst , 0 , b0len + psdlen + 1);
memcpy(dst , b0 , b0len);
memcpy(dst + b0len , password , psdlen);
/*SHA_CTX ctx;*/
/*SHA1_Init(&ctx);*/
/*SHA1_Update(&ctx , dst , b0len + psdlen );*/
/*SHA1_Final(tmp , &ctx);*/
/*free(dst);*/
/*res = hextostr(tmp , 20);*/
/*return res;*/
/* Hash the data in libpurple's way in SHA-1 */
context = purple_cipher_context_new_by_name("sha1", NULL);
if (context == NULL)
{
purple_debug_error("fetion", "Could not find sha1 cipher\n");
g_return_val_if_reached(NULL);
}
purple_cipher_context_append(context, dst, b0len + psdlen);
if (!purple_cipher_context_digest_to_str(context, sizeof(digest), digest, NULL))
{
purple_debug_error("fetion", "Failed to get SHA-1 digest.\n");
g_return_val_if_reached(NULL);
}
purple_cipher_context_destroy(context);
free(dst);
return g_strdup(digest);
}
char *
jabber_calculate_data_hash(gconstpointer data, size_t len,
const gchar *hash_algo)
{
PurpleCipherContext *context;
static gchar digest[129]; /* 512 bits hex + \0 */
context = purple_cipher_context_new_by_name(hash_algo, NULL);
if (context == NULL)
{
purple_debug_error("jabber", "Could not find %s cipher\n", hash_algo);
g_return_val_if_reached(NULL);
}
/* Hash the data */
purple_cipher_context_append(context, data, len);
if (!purple_cipher_context_digest_to_str(context, sizeof(digest), digest, NULL))
{
purple_debug_error("jabber", "Failed to get digest for %s cipher.\n",
hash_algo);
g_return_val_if_reached(NULL);
}
purple_cipher_context_destroy(context);
return g_strdup(digest);
}
static void hashSha1(char* input,char* digest)
//based on code from purple_util_get_image_filename in the pidgin 2.2.0 source
{
PurpleCipherContext *context;
context = purple_cipher_context_new_by_name("sha1", NULL);
if (context == NULL) {
purple_debug_error("util", "Could not find sha1 cipher\n");
g_return_val_if_reached(NULL);
}
purple_cipher_context_append(context, input, strlen(input));
if (!purple_cipher_context_digest_to_str(context, 41, digest, NULL)) {
purple_debug_error("util", "Failed to get SHA-1 digest.\n");
g_return_val_if_reached(NULL);
}
purple_cipher_context_destroy(context);
digest[40]=0;
}
/* The same as purple_util_get_image_checksum, but guaranteed to remain SHA1 */
char *
jabber_calculate_data_sha1sum(gconstpointer data, size_t len)
{
PurpleCipherContext *context;
static gchar digest[41];
context = purple_cipher_context_new_by_name("sha1", NULL);
if (context == NULL)
{
purple_debug_error("jabber", "Could not find sha1 cipher\n");
g_return_val_if_reached(NULL);
}
/* Hash the data */
purple_cipher_context_append(context, data, len);
if (!purple_cipher_context_digest_to_str(context, sizeof(digest), digest, NULL))
{
purple_debug_error("jabber", "Failed to get SHA-1 digest.\n");
g_return_val_if_reached(NULL);
}
purple_cipher_context_destroy(context);
return g_strdup(digest);
}
gchar *fetion_cipher_digest_calculate_response(
const gchar *sid,
const gchar *domain,
const gchar *password,
const gchar *nonce,
const gchar *cnonce)
{
PurpleCipher *cipher;
PurpleCipherContext *context;
gchar *hash1; /* We only support MD5. */
gchar *hash2; /* We only support MD5. */
gchar temp[33];
gchar *response; /* We only support MD5. */
guchar digest[16];
g_return_val_if_fail(sid != NULL, NULL);
g_return_val_if_fail(domain != NULL, NULL);
g_return_val_if_fail(password != NULL, NULL);
g_return_val_if_fail(nonce != NULL, NULL);
g_return_val_if_fail(cnonce != NULL, NULL);
cipher = purple_ciphers_find_cipher("md5");
g_return_val_if_fail(cipher != NULL, NULL);
context = purple_cipher_context_new(cipher, NULL);
purple_cipher_context_append(context, (guchar *)sid, strlen(sid));
purple_cipher_context_append(context, (guchar *)":", 1);
purple_cipher_context_append(context, (guchar *)domain, strlen(domain));
purple_cipher_context_append(context, (guchar *)":", 1);
purple_cipher_context_append(context, (guchar *)password, strlen(password));
purple_cipher_context_digest(context, sizeof(digest), digest, NULL);
purple_cipher_context_destroy(context);
context = purple_cipher_context_new(cipher, NULL);
purple_cipher_context_append(context, digest, 16);
purple_cipher_context_append(context, (guchar *)":", 1);
purple_cipher_context_append(context, (guchar *)nonce, strlen(nonce));
purple_cipher_context_append(context, (guchar *)":", 1);
purple_cipher_context_append(context, (guchar *)cnonce, strlen(cnonce));
purple_cipher_context_digest_to_str(context, sizeof(temp), temp, NULL);
purple_cipher_context_destroy(context);
hash1=g_ascii_strup(temp,32);
context = purple_cipher_context_new(cipher, NULL);
purple_cipher_context_append(context,(guchar *)"REGISTER",8 );
purple_cipher_context_append(context,(guchar *)":",1 );
purple_cipher_context_append(context,(guchar *)sid, strlen(sid) );
purple_cipher_context_digest_to_str(context, sizeof(temp), temp, NULL);
hash2=g_ascii_strup(temp,32);
purple_cipher_context_destroy(context);
context = purple_cipher_context_new(cipher, NULL);
purple_cipher_context_append(context,(guchar *)hash1,strlen(hash1) );
purple_cipher_context_append(context,(guchar *)":",1 );
purple_cipher_context_append(context, (guchar *)nonce, strlen(nonce));
purple_cipher_context_append(context,(guchar *)":",1 );
purple_cipher_context_append(context,(guchar *)hash2,strlen(hash2) );
purple_cipher_context_digest_to_str(context, sizeof(temp), temp, NULL);
purple_cipher_context_destroy(context);
response=g_ascii_strup(temp,32);
return g_strdup(response);
}
gchar *purple_cipher_http_digest_calculate_response(
const gchar *algorithm,
const gchar *method,
const gchar *digest_uri,
const gchar *qop,
const gchar *entity,
const gchar *nonce,
const gchar *nonce_count,
const gchar *client_nonce,
const gchar *session_key)
{
PurpleCipher *cipher;
PurpleCipherContext *context;
static gchar hash2[33]; /* We only support MD5. */
g_return_val_if_fail(method != NULL, NULL);
g_return_val_if_fail(digest_uri != NULL, NULL);
g_return_val_if_fail(nonce != NULL, NULL);
g_return_val_if_fail(session_key != NULL, NULL);
/* Check for a supported algorithm. */
g_return_val_if_fail(algorithm == NULL ||
*algorithm == '\0' ||
g_ascii_strcasecmp(algorithm, "MD5") ||
g_ascii_strcasecmp(algorithm, "MD5-sess"), NULL);
/* Check for a supported "quality of protection". */
g_return_val_if_fail(qop == NULL ||
*qop == '\0' ||
g_ascii_strcasecmp(qop, "auth") ||
g_ascii_strcasecmp(qop, "auth-int"), NULL);
cipher = purple_ciphers_find_cipher("md5");
g_return_val_if_fail(cipher != NULL, NULL);
context = purple_cipher_context_new(cipher, NULL);
purple_cipher_context_append(context, (guchar *)method, strlen(method));
purple_cipher_context_append(context, (guchar *)":", 1);
purple_cipher_context_append(context, (guchar *)digest_uri, strlen(digest_uri));
if (qop != NULL && !g_ascii_strcasecmp(qop, "auth-int"))
{
PurpleCipherContext *context2;
gchar entity_hash[33];
if (entity == NULL)
{
purple_cipher_context_destroy(context);
purple_debug_error("cipher", "Required entity missing for auth-int digest calculation.\n");
return NULL;
}
context2 = purple_cipher_context_new(cipher, NULL);
purple_cipher_context_append(context2, (guchar *)entity, strlen(entity));
purple_cipher_context_digest_to_str(context2, sizeof(entity_hash), entity_hash, NULL);
purple_cipher_context_destroy(context2);
purple_cipher_context_append(context, (guchar *)":", 1);
purple_cipher_context_append(context, (guchar *)entity_hash, strlen(entity_hash));
}
purple_cipher_context_digest_to_str(context, sizeof(hash2), hash2, NULL);
purple_cipher_context_destroy(context);
context = purple_cipher_context_new(cipher, NULL);
purple_cipher_context_append(context, (guchar *)session_key, strlen(session_key));
purple_cipher_context_append(context, (guchar *)":", 1);
purple_cipher_context_append(context, (guchar *)nonce, strlen(nonce));
purple_cipher_context_append(context, (guchar *)":", 1);
if (qop != NULL && *qop != '\0')
{
if (nonce_count == NULL)
{
purple_cipher_context_destroy(context);
purple_debug_error("cipher", "Required nonce_count missing for digest calculation.\n");
return NULL;
}
if (client_nonce == NULL)
{
purple_cipher_context_destroy(context);
purple_debug_error("cipher", "Required client_nonce missing for digest calculation.\n");
return NULL;
}
purple_cipher_context_append(context, (guchar *)nonce_count, strlen(nonce_count));
purple_cipher_context_append(context, (guchar *)":", 1);
purple_cipher_context_append(context, (guchar *)client_nonce, strlen(client_nonce));
purple_cipher_context_append(context, (guchar *)":", 1);
purple_cipher_context_append(context, (guchar *)qop, strlen(qop));
purple_cipher_context_append(context, (guchar *)":", 1);
}
purple_cipher_context_append(context, (guchar *)hash2, strlen(hash2));
purple_cipher_context_digest_to_str(context, sizeof(hash2), hash2, NULL);
purple_cipher_context_destroy(context);
return g_strdup(hash2);
}
gchar *purple_cipher_http_digest_calculate_session_key(
const gchar *algorithm,
const gchar *username,
const gchar *realm,
const gchar *password,
const gchar *nonce,
const gchar *client_nonce)
{
PurpleCipher *cipher;
PurpleCipherContext *context;
gchar hash[33]; /* We only support MD5. */
g_return_val_if_fail(username != NULL, NULL);
g_return_val_if_fail(realm != NULL, NULL);
g_return_val_if_fail(password != NULL, NULL);
g_return_val_if_fail(nonce != NULL, NULL);
/* Check for a supported algorithm. */
g_return_val_if_fail(algorithm == NULL ||
*algorithm == '\0' ||
g_ascii_strcasecmp(algorithm, "MD5") ||
g_ascii_strcasecmp(algorithm, "MD5-sess"), NULL);
cipher = purple_ciphers_find_cipher("md5");
g_return_val_if_fail(cipher != NULL, NULL);
context = purple_cipher_context_new(cipher, NULL);
purple_cipher_context_append(context, (guchar *)username, strlen(username));
purple_cipher_context_append(context, (guchar *)":", 1);
purple_cipher_context_append(context, (guchar *)realm, strlen(realm));
purple_cipher_context_append(context, (guchar *)":", 1);
purple_cipher_context_append(context, (guchar *)password, strlen(password));
if (algorithm != NULL && !g_ascii_strcasecmp(algorithm, "MD5-sess"))
{
guchar digest[16];
if (client_nonce == NULL)
{
purple_cipher_context_destroy(context);
purple_debug_error("cipher", "Required client_nonce missing for MD5-sess digest calculation.\n");
return NULL;
}
purple_cipher_context_digest(context, sizeof(digest), digest, NULL);
purple_cipher_context_destroy(context);
context = purple_cipher_context_new(cipher, NULL);
purple_cipher_context_append(context, digest, sizeof(digest));
purple_cipher_context_append(context, (guchar *)":", 1);
purple_cipher_context_append(context, (guchar *)nonce, strlen(nonce));
purple_cipher_context_append(context, (guchar *)":", 1);
purple_cipher_context_append(context, (guchar *)client_nonce, strlen(client_nonce));
}
purple_cipher_context_digest_to_str(context, sizeof(hash), hash, NULL);
purple_cipher_context_destroy(context);
return g_strdup(hash);
}
