/* crypt - simple encryption algorithm used for passwords
**
** Copyright 2001 Dr. Zoidberg Enterprises. All rights reserved.
*/


#include <Message.h>

#include <string.h>
#include <crypt.h>


static const char key[PASSWORD_LENGTH + 1] = "Dr. Zoidberg Enterprises, BeMail";


_EXPORT char *get_passwd(const BMessage *msg,const char *name)
{
	char *encryptedPassword;
	ssize_t length;
	if (msg->FindData(name,B_RAW_TYPE,(const void **)&encryptedPassword,&length) < B_OK || !encryptedPassword || length == 0)
		return NULL;

	char *buffer = new char[length];
	passwd_crypt(encryptedPassword,buffer,length);

	return buffer;
}


_EXPORT bool set_passwd(BMessage *msg,const char *name,const char *password)
{
	if (!password)
		return false;

	ssize_t length = strlen(password) + 1;
	char *buffer = new char[length];
	passwd_crypt((char *)password,buffer,length);

	msg->RemoveName(name);
	status_t status = msg->AddData(name,B_RAW_TYPE,buffer,length,false);

	delete [] buffer;
	return (status >= B_OK);
}


_EXPORT void passwd_crypt(char *in,char *out,int length)
{
	int i;

	memcpy(out,in,length);
	if (length > PASSWORD_LENGTH)
		length = PASSWORD_LENGTH;

	for (i = 0;i < length;i++)
		out[i] ^= key[i];
}