[exim.git] / src / src / auths / dovecot.c

/* $Cambridge: exim/src/src/auths/dovecot.c,v 1.10 2008/05/16 12:22:08 nm4 Exp $ */

/*
 * Copyright (c) 2004 Andrey Panin <pazke@donpac.ru>
 *
 * 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.
 */

/* A number of modifications have been made to the original code. Originally I
commented them specially, but now they are getting quite extensive, so I have
ceased doing that. The biggest change is to use unbuffered I/O on the socket
because using C buffered I/O gives problems on some operating systems. PH */

#include "../exim.h"
#include "dovecot.h"

#define VERSION_MAJOR  1
#define VERSION_MINOR  0

/* Options specific to the authentication mechanism. */
optionlist auth_dovecot_options[] = {
       {
       "server_socket",
       opt_stringptr,
       (void *)(offsetof(auth_dovecot_options_block, server_socket))
       },
};

/* Size of the options list. An extern variable has to be used so that its
address can appear in the tables drtables.c. */

int auth_dovecot_options_count =
       sizeof(auth_dovecot_options) / sizeof(optionlist);

/* Default private options block for the authentication method. */

auth_dovecot_options_block auth_dovecot_option_defaults = {
       NULL,                           /* server_socket */
};


/* Static variables for reading from the socket */

static uschar sbuffer[256];
static int sbp;


/*************************************************
 *          Initialization entry point           *
 *************************************************/

/* Called for each instance, after its options have been read, to
enable consistency checks to be done, or anything else that needs
to be set up. */

void auth_dovecot_init(auth_instance *ablock)
{
       auth_dovecot_options_block *ob =
               (auth_dovecot_options_block *)(ablock->options_block);

       if (ablock->public_name == NULL)
               ablock->public_name = ablock->name;
       if (ob->server_socket != NULL)
               ablock->server = TRUE;
       ablock->client = FALSE;
}

static int strcut(uschar *str, uschar **ptrs, int nptrs)
{
       uschar *tmp = str;
       int n;

       for (n = 0; n < nptrs; n++)
               ptrs[n] = NULL;
       n = 1;

       while (*str) {
               if (*str == '\t') {
                       if (n <= nptrs) {
                               *ptrs++ = tmp;
                               tmp = str + 1;
                               *str = 0;
                       }
                       n++;
               }
               str++;
       }

       if (n < nptrs)
               *ptrs = tmp;

       return n;
}

#define CHECK_COMMAND(str, arg_min, arg_max) do { \
       if (strcmpic(US(str), args[0]) != 0) \
               goto out; \
       if (nargs - 1 < (arg_min)) \
               goto out; \
       if ( (arg_max != -1) && (nargs - 1 > (arg_max)) ) \
               goto out; \
} while (0)

#define OUT(msg) do { \
       auth_defer_msg = (US msg); \
       goto out; \
} while(0)


/*************************************************
*      "fgets" to read directly from socket      *
*************************************************/

/* Added by PH after a suggestion by Steve Usher because the previous use of
C-style buffered I/O gave trouble. */

static uschar *
dc_gets(uschar *s, int n, int fd)
{
int p = 0;
int count = 0;

for (;;)
  {
  if (sbp == 0)
    {
    sbp = read(fd, sbuffer, sizeof(sbuffer));
    if (sbp == 0) { if (count == 0) return NULL; else break; }
    }

  while (p < sbp)
    {
    if (count >= n - 1) break;
    s[count++] = sbuffer[p];
    if (sbuffer[p++] == '\n') break;
    }

  memmove(sbuffer, sbuffer + p, sbp - p);
  sbp -= p;

  if (s[count-1] == '\n' || count >= n - 1) break;
  }

s[count] = 0;
return s;
}


/*************************************************
*              Server entry point                *
*************************************************/

int auth_dovecot_server(auth_instance *ablock, uschar *data)
{
       auth_dovecot_options_block *ob =
               (auth_dovecot_options_block *)(ablock->options_block);
       struct sockaddr_un sa;
       uschar buffer[4096];
       uschar *args[8];
       uschar *auth_command;
       uschar *auth_extra_data = US"";
       int nargs, tmp;
       int cuid = 0, cont = 1, found = 0, fd, ret = DEFER;

       HDEBUG(D_auth) debug_printf("dovecot authentication\n");

       memset(&sa, 0, sizeof(sa));
       sa.sun_family = AF_UNIX;

       /* This was the original code here: it is nonsense because strncpy()
       does not return an integer. I have converted this to use the function
       that formats and checks length. PH */

       /*
       if (strncpy(sa.sun_path, ob->server_socket, sizeof(sa.sun_path)) < 0) {
       */

       if (!string_format(US sa.sun_path, sizeof(sa.sun_path), "%s",
                          ob->server_socket)) {
               auth_defer_msg = US"authentication socket path too long";
               return DEFER;
       }

       auth_defer_msg = US"authentication socket connection error";

       fd = socket(PF_UNIX, SOCK_STREAM, 0);
       if (fd < 0)
               return DEFER;

       if (connect(fd, (struct sockaddr *) &sa, sizeof(sa)) < 0)
               goto out;

       auth_defer_msg = US"authentication socket protocol error";

       sbp = 0;  /* Socket buffer pointer */
       while (cont) {
               if (dc_gets(buffer, sizeof(buffer), fd) == NULL)
                       OUT("authentication socket read error or premature eof");

               buffer[Ustrlen(buffer) - 1] = 0;
               HDEBUG(D_auth) debug_printf("received: %s\n", buffer);
               nargs = strcut(buffer, args, sizeof(args) / sizeof(args[0]));

               switch (toupper(*args[0])) {
               case 'C':
                       CHECK_COMMAND("CUID", 1, 1);
                       cuid = Uatoi(args[1]);
                       break;

               case 'D':
                       CHECK_COMMAND("DONE", 0, 0);
                       cont = 0;
                       break;

               case 'M':
                       CHECK_COMMAND("MECH", 1, INT_MAX);
                       if (strcmpic(US args[1], ablock->public_name) == 0)
                               found = 1;
                       break;

               case 'S':
                       CHECK_COMMAND("SPID", 1, 1);
                       break;

               case 'V':
                       CHECK_COMMAND("VERSION", 2, 2);
                       if (Uatoi(args[1]) != VERSION_MAJOR)
                               OUT("authentication socket protocol version mismatch");
                       break;

               default:
                       goto out;
               }
       }

       if (!found)
               goto out;

       /* Added by PH: data must not contain tab (as it is
       b64 it shouldn't, but check for safety). */

       if (Ustrchr(data, '\t') != NULL) {
               ret = FAIL;
               goto out;
       }

       /* Added by PH: extra fields when TLS is in use or if the TCP/IP
       connection is local. */

       if (tls_cipher != NULL)
               auth_extra_data = string_sprintf("secured\t%s%s",
                   tls_certificate_verified? "valid-client-cert" : "",
                   tls_certificate_verified? "\t" : "");
       else if (interface_address != NULL &&
                Ustrcmp(sender_host_address, interface_address) == 0)
               auth_extra_data = US"secured\t";


/****************************************************************************
   The code below was the original code here. It didn't work. A reading of the
   file auth-protocol.txt.gz that came with Dovecot 1.0_beta8 indicated that
   this was not right. Maybe something changed. I changed it to move the
   service indication into the AUTH command, and it seems to be better. PH

       fprintf(f, "VERSION\t%d\t%d\r\nSERVICE\tSMTP\r\nCPID\t%d\r\n"
               "AUTH\t%d\t%s\trip=%s\tlip=%s\tresp=%s\r\n",
               VERSION_MAJOR, VERSION_MINOR, getpid(), cuid,
               ablock->public_name, sender_host_address, interface_address,
               data ? (char *) data : "");

   Subsequently, the command was modified to add "secured" and "valid-client-
   cert" when relevant.

   The auth protocol is documented here:
        http://wiki.dovecot.org/Authentication_Protocol
****************************************************************************/

       auth_command = string_sprintf("VERSION\t%d\t%d\nCPID\t%d\n"
               "AUTH\t%d\t%s\tservice=smtp\t%srip=%s\tlip=%s\tnologin\tresp=%s\n",
               VERSION_MAJOR, VERSION_MINOR, getpid(), cuid,
               ablock->public_name, auth_extra_data, sender_host_address,
               interface_address, data ? (char *) data : "");

       if (write(fd, auth_command, Ustrlen(auth_command)) < 0)
              HDEBUG(D_auth) debug_printf("error sending auth_command: %s\n",
                strerror(errno));

       HDEBUG(D_auth) debug_printf("sent: %s", auth_command);

       while (1) {
               uschar *temp;
               uschar *auth_id_pre = NULL;
               int i;

               if (dc_gets(buffer, sizeof(buffer), fd) == NULL) {
                       auth_defer_msg = US"authentication socket read error or premature eof";
                       goto out;
               }

               buffer[Ustrlen(buffer) - 1] = 0;
               HDEBUG(D_auth) debug_printf("received: %s\n", buffer);
               nargs = strcut(buffer, args, sizeof(args) / sizeof(args[0]));

               if (Uatoi(args[1]) != cuid)
                       OUT("authentication socket connection id mismatch");

               switch (toupper(*args[0])) {
               case 'C':
                       CHECK_COMMAND("CONT", 1, 2);

                       tmp = auth_get_no64_data(&data, US args[2]);
                       if (tmp != OK) {
                               ret = tmp;
                               goto out;
                       }

                       /* Added by PH: data must not contain tab (as it is
                       b64 it shouldn't, but check for safety). */

                       if (Ustrchr(data, '\t') != NULL) {
                               ret = FAIL;
                               goto out;
                       }

                       temp = string_sprintf("CONT\t%d\t%s\n", cuid, data);
                       if (write(fd, temp, Ustrlen(temp)) < 0)
                               OUT("authentication socket write error");
                       break;

               case 'F':
                       CHECK_COMMAND("FAIL", 1, -1);

                       for (i=2; (i<nargs) && (auth_id_pre == NULL); i++)
                       {
                               if ( Ustrncmp(args[i], US"user=", 5) == 0 )
                               {
                                       auth_id_pre = args[i]+5;
                                       expand_nstring[1] = auth_vars[0] =
                                               string_copy(auth_id_pre); /* PH */
                                       expand_nlength[1] = Ustrlen(auth_id_pre);
                                       expand_nmax = 1;
                               }
                       }

                       ret = FAIL;
                       goto out;

               case 'O':
                       CHECK_COMMAND("OK", 2, -1);

                       /*
                        * Search for the "user=$USER" string in the args array
                        * and return the proper value.
                        */
                       for (i=2; (i<nargs) && (auth_id_pre == NULL); i++)
                       {
                               if ( Ustrncmp(args[i], US"user=", 5) == 0 )
                               {
                                       auth_id_pre = args[i]+5;
                                       expand_nstring[1] = auth_vars[0] =
                                               string_copy(auth_id_pre); /* PH */
                                       expand_nlength[1] = Ustrlen(auth_id_pre);
                                       expand_nmax = 1;
                               }
                       }

                       if (auth_id_pre == NULL)
                               OUT("authentication socket protocol error, username missing");

                       ret = OK;
                       /* fallthrough */

               default:
                       goto out;
               }
       }

out:
       /* close the socket used by dovecot */
       if (fd >= 0)
              close(fd);

       /* Expand server_condition as an authorization check */
       return (ret == OK)? auth_check_serv_cond(ablock) : ret;
}
Commit	Line	Data
6c588e74	1	/* $Cambridge: exim/src/src/auths/dovecot.c,v 1.10 2008/05/16 12:22:08 nm4 Exp $ */
14aa5a05 PH	2
	3	/*
	4	* Copyright (c) 2004 Andrey Panin <pazke@donpac.ru>
	5	*
	6	* This program is free software; you can redistribute it and/or modify
	7	* it under the terms of the GNU General Public License as published
	8	* by the Free Software Foundation; either version 2 of the License, or
	9	* (at your option) any later version.
	10	*/
	11
57c2c631 PH	12	/* A number of modifications have been made to the original code. Originally I
	13	commented them specially, but now they are getting quite extensive, so I have
	14	ceased doing that. The biggest change is to use unbuffered I/O on the socket
	15	because using C buffered I/O gives problems on some operating systems. PH */
	16
14aa5a05 PH	17	#include "../exim.h"
	18	#include "dovecot.h"
	19
	20	#define VERSION_MAJOR 1
	21	#define VERSION_MINOR 0
	22
	23	/* Options specific to the authentication mechanism. */
	24	optionlist auth_dovecot_options[] = {
	25	{
57c2c631 PH	26	"server_socket",
	27	opt_stringptr,
	28	(void *)(offsetof(auth_dovecot_options_block, server_socket))
14aa5a05 PH	29	},
	30	};
	31
	32	/* Size of the options list. An extern variable has to be used so that its
	33	address can appear in the tables drtables.c. */
57c2c631	34
14aa5a05 PH	35	int auth_dovecot_options_count =
	36	sizeof(auth_dovecot_options) / sizeof(optionlist);
	37
	38	/* Default private options block for the authentication method. */
57c2c631	39
14aa5a05 PH	40	auth_dovecot_options_block auth_dovecot_option_defaults = {
	41	NULL, /* server_socket */
	42	};
	43
57c2c631 PH	44
	45	/* Static variables for reading from the socket */
	46
	47	static uschar sbuffer[256];
	48	static int sbp;
	49
	50
	51
14aa5a05 PH	52	/*************************************************
	53	* Initialization entry point *
	54	*************************************************/
	55
	56	/* Called for each instance, after its options have been read, to
	57	enable consistency checks to be done, or anything else that needs
	58	to be set up. */
57c2c631	59
14aa5a05 PH	60	void auth_dovecot_init(auth_instance *ablock)
	61	{
	62	auth_dovecot_options_block *ob =
	63	(auth_dovecot_options_block *)(ablock->options_block);
	64
	65	if (ablock->public_name == NULL)
	66	ablock->public_name = ablock->name;
	67	if (ob->server_socket != NULL)
	68	ablock->server = TRUE;
	69	ablock->client = FALSE;
	70	}
	71
57c2c631	72	static int strcut(uschar str, uschar *ptrs, int nptrs)
14aa5a05	73	{
57c2c631	74	uschar *tmp = str;
14aa5a05 PH	75	int n;
	76
	77	for (n = 0; n < nptrs; n++)
	78	ptrs[n] = NULL;
	79	n = 1;
	80
	81	while (*str) {
	82	if (*str == '\t') {
	83	if (n <= nptrs) {
	84	*ptrs++ = tmp;
	85	tmp = str + 1;
	86	*str = 0;
	87	}
	88	n++;
	89	}
	90	str++;
	91	}
	92
	93	if (n < nptrs)
	94	*ptrs = tmp;
	95
	96	return n;
	97	}
	98
	99	#define CHECK_COMMAND(str, arg_min, arg_max) do { \
57c2c631	100	if (strcmpic(US(str), args[0]) != 0) \
14aa5a05 PH	101	goto out; \
	102	if (nargs - 1 < (arg_min)) \
	103	goto out; \
6c588e74	104	if ( (arg_max != -1) && (nargs - 1 > (arg_max)) ) \
14aa5a05 PH	105	goto out; \
	106	} while (0)
	107
	108	#define OUT(msg) do { \
	109	auth_defer_msg = (US msg); \
	110	goto out; \
	111	} while(0)
	112
7befa435 PH	113
7befa435 PH	114
14aa5a05	115	/*************************************************
57c2c631 PH	116	* "fgets" to read directly from socket *
	117	*************************************************/
	118
	119	/* Added by PH after a suggestion by Steve Usher because the previous use of
	120	C-style buffered I/O gave trouble. */
	121
	122	static uschar *
	123	dc_gets(uschar *s, int n, int fd)
	124	{
	125	int p = 0;
	126	int count = 0;
	127
	128	for (;;)
	129	{
	130	if (sbp == 0)
	131	{
	132	sbp = read(fd, sbuffer, sizeof(sbuffer));
	133	if (sbp == 0) { if (count == 0) return NULL; else break; }
	134	}
	135
	136	while (p < sbp)
	137	{
	138	if (count >= n - 1) break;
	139	s[count++] = sbuffer[p];
	140	if (sbuffer[p++] == '\n') break;
	141	}
	142
	143	memmove(sbuffer, sbuffer + p, sbp - p);
	144	sbp -= p;
	145
	146	if (s[count-1] == '\n' \|\| count >= n - 1) break;
	147	}
	148
	149	s[count] = 0;
	150	return s;
	151	}
	152
	153
	154
	155
	156	/*************************************************
	157	* Server entry point *
	158	*************************************************/
14aa5a05 PH	159
	160	int auth_dovecot_server(auth_instance ablock, uschar data)
	161	{
	162	auth_dovecot_options_block *ob =
	163	(auth_dovecot_options_block *)(ablock->options_block);
	164	struct sockaddr_un sa;
57c2c631 PH	165	uschar buffer[4096];
57c2c631 PH	166	uschar *args[8];
7befa435 PH	167	uschar *auth_command;
7befa435 PH	168	uschar *auth_extra_data = US"";
14aa5a05 PH	169	int nargs, tmp;
14aa5a05 PH	170	int cuid = 0, cont = 1, found = 0, fd, ret = DEFER;
14aa5a05 PH	171
	172	HDEBUG(D_auth) debug_printf("dovecot authentication\n");
	173
	174	memset(&sa, 0, sizeof(sa));
	175	sa.sun_family = AF_UNIX;
	176
	177	/* This was the original code here: it is nonsense because strncpy()
	178	does not return an integer. I have converted this to use the function
	179	that formats and checks length. PH */
	180
	181	/*
	182	if (strncpy(sa.sun_path, ob->server_socket, sizeof(sa.sun_path)) < 0) {
	183	*/
	184
	185	if (!string_format(US sa.sun_path, sizeof(sa.sun_path), "%s",
	186	ob->server_socket)) {
	187	auth_defer_msg = US"authentication socket path too long";
	188	return DEFER;
	189	}
	190
	191	auth_defer_msg = US"authentication socket connection error";
	192
	193	fd = socket(PF_UNIX, SOCK_STREAM, 0);
	194	if (fd < 0)
	195	return DEFER;
	196
	197	if (connect(fd, (struct sockaddr *) &sa, sizeof(sa)) < 0)
	198	goto out;
	199
14aa5a05 PH	200	auth_defer_msg = US"authentication socket protocol error";
14aa5a05 PH	201
57c2c631	202	sbp = 0; /* Socket buffer pointer */
14aa5a05	203	while (cont) {
57c2c631	204	if (dc_gets(buffer, sizeof(buffer), fd) == NULL)
14aa5a05 PH	205	OUT("authentication socket read error or premature eof");
14aa5a05 PH	206
57c2c631	207	buffer[Ustrlen(buffer) - 1] = 0;
14aa5a05 PH	208	HDEBUG(D_auth) debug_printf("received: %s\n", buffer);
	209	nargs = strcut(buffer, args, sizeof(args) / sizeof(args[0]));
	210
	211	switch (toupper(*args[0])) {
	212	case 'C':
	213	CHECK_COMMAND("CUID", 1, 1);
57c2c631	214	cuid = Uatoi(args[1]);
14aa5a05 PH	215	break;
	216
	217	case 'D':
	218	CHECK_COMMAND("DONE", 0, 0);
	219	cont = 0;
	220	break;
	221
	222	case 'M':
	223	CHECK_COMMAND("MECH", 1, INT_MAX);
	224	if (strcmpic(US args[1], ablock->public_name) == 0)
	225	found = 1;
	226	break;
	227
	228	case 'S':
	229	CHECK_COMMAND("SPID", 1, 1);
	230	break;
	231
	232	case 'V':
	233	CHECK_COMMAND("VERSION", 2, 2);
57c2c631	234	if (Uatoi(args[1]) != VERSION_MAJOR)
14aa5a05 PH	235	OUT("authentication socket protocol version mismatch");
	236	break;
	237
	238	default:
	239	goto out;
	240	}
	241	}
	242
	243	if (!found)
	244	goto out;
	245
7befa435 PH	246	/* Added by PH: data must not contain tab (as it is
	247	b64 it shouldn't, but check for safety). */
	248
	249	if (Ustrchr(data, '\t') != NULL) {
	250	ret = FAIL;
	251	goto out;
	252	}
	253
	254	/* Added by PH: extra fields when TLS is in use or if the TCP/IP
	255	connection is local. */
	256
	257	if (tls_cipher != NULL)
	258	auth_extra_data = string_sprintf("secured\t%s%s",
	259	tls_certificate_verified? "valid-client-cert" : "",
	260	tls_certificate_verified? "\t" : "");
094a9ec3 PH	261	else if (interface_address != NULL &&
094a9ec3 PH	262	Ustrcmp(sender_host_address, interface_address) == 0)
7befa435 PH	263	auth_extra_data = US"secured\t";
7befa435 PH	264
14aa5a05 PH	265
	266	/****************************************************************************
	267	The code below was the original code here. It didn't work. A reading of the
	268	file auth-protocol.txt.gz that came with Dovecot 1.0_beta8 indicated that
7befa435 PH	269	this was not right. Maybe something changed. I changed it to move the
7befa435 PH	270	service indication into the AUTH command, and it seems to be better. PH
14aa5a05 PH	271
	272	fprintf(f, "VERSION\t%d\t%d\r\nSERVICE\tSMTP\r\nCPID\t%d\r\n"
	273	"AUTH\t%d\t%s\trip=%s\tlip=%s\tresp=%s\r\n",
	274	VERSION_MAJOR, VERSION_MINOR, getpid(), cuid,
	275	ablock->public_name, sender_host_address, interface_address,
	276	data ? (char *) data : "");
7befa435 PH	277
	278	Subsequently, the command was modified to add "secured" and "valid-client-
	279	cert" when relevant.
6c588e74 NM	280
	281	The auth protocol is documented here:
	282	http://wiki.dovecot.org/Authentication_Protocol
14aa5a05 PH	283	****************************************************************************/
14aa5a05 PH	284
7befa435	285	auth_command = string_sprintf("VERSION\t%d\t%d\nCPID\t%d\n"
deafd5b3	286	"AUTH\t%d\t%s\tservice=smtp\t%srip=%s\tlip=%s\tnologin\tresp=%s\n",
14aa5a05	287	VERSION_MAJOR, VERSION_MINOR, getpid(), cuid,
7befa435 PH	288	ablock->public_name, auth_extra_data, sender_host_address,
7befa435 PH	289	interface_address, data ? (char *) data : "");
14aa5a05	290
57c2c631 PH	291	if (write(fd, auth_command, Ustrlen(auth_command)) < 0)
	292	HDEBUG(D_auth) debug_printf("error sending auth_command: %s\n",
	293	strerror(errno));
	294
7befa435	295	HDEBUG(D_auth) debug_printf("sent: %s", auth_command);
14aa5a05 PH	296
14aa5a05 PH	297	while (1) {
57c2c631	298	uschar *temp;
6c588e74 NM	299	uschar *auth_id_pre = NULL;
	300	int i;
	301
57c2c631	302	if (dc_gets(buffer, sizeof(buffer), fd) == NULL) {
14aa5a05 PH	303	auth_defer_msg = US"authentication socket read error or premature eof";
	304	goto out;
	305	}
	306
57c2c631	307	buffer[Ustrlen(buffer) - 1] = 0;
14aa5a05 PH	308	HDEBUG(D_auth) debug_printf("received: %s\n", buffer);
	309	nargs = strcut(buffer, args, sizeof(args) / sizeof(args[0]));
	310
57c2c631	311	if (Uatoi(args[1]) != cuid)
14aa5a05 PH	312	OUT("authentication socket connection id mismatch");
	313
	314	switch (toupper(*args[0])) {
	315	case 'C':
	316	CHECK_COMMAND("CONT", 1, 2);
	317
	318	tmp = auth_get_no64_data(&data, US args[2]);
	319	if (tmp != OK) {
	320	ret = tmp;
	321	goto out;
	322	}
	323
7befa435 PH	324	/* Added by PH: data must not contain tab (as it is
	325	b64 it shouldn't, but check for safety). */
	326
	327	if (Ustrchr(data, '\t') != NULL) {
	328	ret = FAIL;
	329	goto out;
	330	}
	331
deafd5b3	332	temp = string_sprintf("CONT\t%d\t%s\n", cuid, data);
57c2c631	333	if (write(fd, temp, Ustrlen(temp)) < 0)
14aa5a05	334	OUT("authentication socket write error");
14aa5a05 PH	335	break;
	336
	337	case 'F':
6c588e74	338	CHECK_COMMAND("FAIL", 1, -1);
14aa5a05	339
6c588e74 NM	340	for (i=2; (i<nargs) && (auth_id_pre == NULL); i++)
	341	{
	342	if ( Ustrncmp(args[i], US"user=", 5) == 0 )
	343	{
	344	auth_id_pre = args[i]+5;
f0872424	345	expand_nstring[1] = auth_vars[0] =
6c588e74 NM	346	string_copy(auth_id_pre); /* PH */
6c588e74 NM	347	expand_nlength[1] = Ustrlen(auth_id_pre);
14aa5a05 PH	348	expand_nmax = 1;
	349	}
	350	}
	351
	352	ret = FAIL;
	353	goto out;
	354
	355	case 'O':
6c588e74 NM	356	CHECK_COMMAND("OK", 2, -1);
	357
	358	/*
	359	* Search for the "user=$USER" string in the args array
	360	* and return the proper value.
	361	*/
	362	for (i=2; (i<nargs) && (auth_id_pre == NULL); i++)
14aa5a05	363	{
6c588e74 NM	364	if ( Ustrncmp(args[i], US"user=", 5) == 0 )
	365	{
	366	auth_id_pre = args[i]+5;
	367	expand_nstring[1] = auth_vars[0] =
	368	string_copy(auth_id_pre); /* PH */
	369	expand_nlength[1] = Ustrlen(auth_id_pre);
	370	expand_nmax = 1;
	371	}
14aa5a05	372	}
6c588e74 NM	373
	374	if (auth_id_pre == NULL)
	375	OUT("authentication socket protocol error, username missing");
	376
14aa5a05 PH	377	ret = OK;
	378	/* fallthrough */
	379
	380	default:
	381	goto out;
	382	}
	383	}
	384
57c2c631	385	out:
3f0da4d0 NM	386	/* close the socket used by dovecot */
	387	if (fd >= 0)
	388	close(fd);
16ff981e PH	389
	390	/* Expand server_condition as an authorization check */
	391	return (ret == OK)? auth_check_serv_cond(ablock) : ret;
14aa5a05	392	}