[hcoop/debian/courier-authlib.git] / authsasllogin.c


/*
** Copyright 1998 - 2005 Double Precision, Inc.  See COPYING for
** distribution information.
*/

#include	"courier_auth_config.h"
#include	"auth.h"
#include	"random128/random128.h"
#include	"courierauthsasl.h"
#include	<stdlib.h>
#include	<string.h>
#if	HAVE_UNISTD_H
#include	<unistd.h>
#endif
#include	<ctype.h>
#include	<stdio.h>
#include	<errno.h>

extern char *strdupdefdomain(const char *userid, const char *s1,
			     const char *s2, const char *s3);
                      
int authsasl_login(const char *method, const char *initresponse,
		   char *(*getresp)(const char *, void *),
		   void *callback_arg,
		   char **authtype,
		   char **authdata)
{
char	*uid;
char	*pw;
char	*p;
int	n;

	if (initresponse)
	{
		uid=malloc(strlen(initresponse)+1);
		if (!uid)
		{
			perror("malloc");
			return (AUTHSASL_ERROR);
		}
		strcpy(uid, initresponse);
	}
	else
	{
		p=authsasl_tobase64("Username:", -1);
		if (!p)
		{
			perror("malloc");
			return (AUTHSASL_ERROR);
		}
		uid=getresp(p, callback_arg);
		free(p);
		if (!uid)
		{
			perror("malloc");
			return (AUTHSASL_ERROR);
		}

		if (*uid == '*')
		{
			free(uid);
			return (AUTHSASL_ABORTED);
		}
	}

	p=authsasl_tobase64("Password:", -1);
	if (!p)
	{
		free(uid);
		perror("malloc");
		return (AUTHSASL_ERROR);
	}

	pw=getresp(p, callback_arg);
	free(p);
	if (!pw)
	{
		free(uid);
		perror("malloc");
		return (AUTHSASL_ERROR);
	}

	if (*pw == '*')
	{
		free(pw);
		free(uid);
		return (AUTHSASL_ABORTED);
	}

	if ((n=authsasl_frombase64(uid)) < 0 ||
		(uid[n]=0, n=authsasl_frombase64(pw)) < 0)
	{
		free(uid);
		free(pw);
		return (AUTHSASL_ABORTED);
	}
	pw[n]=0;

	if ( (*authtype=malloc(sizeof(AUTHTYPE_LOGIN))) == 0)
	{
		free(uid);
		free(pw);
		perror("malloc");
		return (AUTHSASL_ERROR);
	}

	strcpy( *authtype, AUTHTYPE_LOGIN);

	if ( (*authdata=strdupdefdomain(uid,"\n",pw,"\n")) == 0)
	{
		free( *authtype );
		free(uid);
		free(pw);
		perror("malloc");
		return (AUTHSASL_ERROR);
	}

	free(uid);
	free(pw);

	return (AUTHSASL_OK);
}
Commit	Line	Data
d9898ee8	1
	2	/*
	3	** Copyright 1998 - 2005 Double Precision, Inc. See COPYING for
	4	** distribution information.
	5	*/
	6
	7	#include "courier_auth_config.h"
	8	#include "auth.h"
	9	#include "random128/random128.h"
	10	#include "courierauthsasl.h"
	11	#include <stdlib.h>
	12	#include <string.h>
	13	#if HAVE_UNISTD_H
	14	#include <unistd.h>
	15	#endif
	16	#include <ctype.h>
	17	#include <stdio.h>
	18	#include <errno.h>
	19
	20	extern char strdupdefdomain(const char userid, const char *s1,
	21	const char s2, const char s3);
	22
	23	int authsasl_login(const char method, const char initresponse,
	24	char (getresp)(const char , void ),
	25	void *callback_arg,
	26	char **authtype,
	27	char **authdata)
	28	{
	29	char *uid;
	30	char *pw;
	31	char *p;
	32	int n;
	33
	34	if (initresponse)
	35	{
	36	uid=malloc(strlen(initresponse)+1);
	37	if (!uid)
	38	{
	39	perror("malloc");
	40	return (AUTHSASL_ERROR);
	41	}
	42	strcpy(uid, initresponse);
	43	}
	44	else
	45	{
	46	p=authsasl_tobase64("Username:", -1);
	47	if (!p)
	48	{
	49	perror("malloc");
	50	return (AUTHSASL_ERROR);
	51	}
	52	uid=getresp(p, callback_arg);
	53	free(p);
	54	if (!uid)
	55	{
	56	perror("malloc");
	57	return (AUTHSASL_ERROR);
	58	}
	59
	60	if (uid == '')
	61	{
	62	free(uid);
	63	return (AUTHSASL_ABORTED);
	64	}
65	}
66
67	p=authsasl_tobase64("Password:", -1);
68	if (!p)
69	{
70	free(uid);
71	perror("malloc");
72	return (AUTHSASL_ERROR);
73	}
74
75	pw=getresp(p, callback_arg);
76	free(p);
77	if (!pw)
78	{
79	free(uid);
80	perror("malloc");
81	return (AUTHSASL_ERROR);
82	}
83
84	if (pw == '')
85	{
86	free(pw);
87	free(uid);
88	return (AUTHSASL_ABORTED);
89	}
90
91	if ((n=authsasl_frombase64(uid)) < 0 \|\|
92	(uid[n]=0, n=authsasl_frombase64(pw)) < 0)
93	{
94	free(uid);
95	free(pw);
96	return (AUTHSASL_ABORTED);
97	}
98	pw[n]=0;
99
100	if ( (*authtype=malloc(sizeof(AUTHTYPE_LOGIN))) == 0)
101	{
102	free(uid);
103	free(pw);
104	perror("malloc");
105	return (AUTHSASL_ERROR);
106	}
107
108	strcpy( *authtype, AUTHTYPE_LOGIN);
109
110	if ( (*authdata=strdupdefdomain(uid,"\n",pw,"\n")) == 0)
111	{
112	free( *authtype );
113	free(uid);
114	free(pw);
115	perror("malloc");
116	return (AUTHSASL_ERROR);
117	}
118
8d138742 CE	119	free(uid);
	120	free(pw);
	121
d9898ee8	122	return (AUTHSASL_OK);
d9898ee8	123	}