gsasl.c File Reference

GNU SASL authentication support. More...

#include "config.h"
#include <gsasl.h>
#include <stdbool.h>
#include "mutt/lib.h"
#include "connaccount.h"
#include "connection.h"
#include "gsasl2.h"
#include "mutt_account.h"

Include dependency graph for gsasl.c:

Go to the source code of this file.

Functions
static int	mutt_gsasl_callback (Gsasl *ctx, Gsasl_session *sctx, Gsasl_property prop)
	Callback to retrieve authname or user from ConnAccount.
static bool	mutt_gsasl_init (void)
	Initialise GNU SASL library.
void	mutt_gsasl_cleanup (void)
	Shutdown GNU SASL library.
const char *	mutt_gsasl_get_mech (const char *requested_mech, const char *server_mechlist)
	Pick a connection mechanism.
int	mutt_gsasl_client_new (struct Connection *conn, const char *mech, Gsasl_session **sctx)
	Create a new GNU SASL client.
void	mutt_gsasl_client_finish (Gsasl_session **sctx)
	Free a GNU SASL client.

Variables
static Gsasl *	MuttGsaslCtx = NULL
	Global GNU SASL handle.

Detailed Description

GNU SASL authentication support.

Authors

• Richard Russon

Copyright

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, see http://www.gnu.org/licenses/.

Definition in file gsasl.c.

Function Documentation

mutt_gsasl_callback()

static int mutt_gsasl_callback ( Gsasl *  ctx, Gsasl_session *  sctx, Gsasl_property  prop  )

static

Callback to retrieve authname or user from ConnAccount.

Parameters

ctx	GNU SASL context
sctx	GNU SASL session
prop	Property to get, e.g. GSASL_PASSWORD

Return values

num	GNU SASL error code, e.g. GSASL_OK

Definition at line 48 of file gsasl.c.

{
  int rc = GSASL_NO_CALLBACK;
 
  struct Connection *conn = gsasl_session_hook_get(sctx);
  if (!conn)
  {
    mutt_debug(LL_DEBUG1, "missing session hook data!\n");
    return rc;
  }
 
  switch (prop)
  {
    case GSASL_PASSWORD:
      if (mutt_account_getpass(&conn->account))
        return rc;
      gsasl_property_set(sctx, GSASL_PASSWORD, conn->account.pass);
      rc = GSASL_OK;
      break;
 
    case GSASL_AUTHID:
      /* whom the provided password belongs to: login */
      if (mutt_account_getlogin(&conn->account))
        return rc;
      gsasl_property_set(sctx, GSASL_AUTHID, conn->account.login);
      rc = GSASL_OK;
      break;
 
    case GSASL_AUTHZID:
      /* name of the user whose mail/resources you intend to access: user */
      if (mutt_account_getuser(&conn->account))
        return rc;
      gsasl_property_set(sctx, GSASL_AUTHZID, conn->account.user);
      rc = GSASL_OK;
      break;
 
    case GSASL_ANONYMOUS_TOKEN:
      gsasl_property_set(sctx, GSASL_ANONYMOUS_TOKEN, "dummy");
      rc = GSASL_OK;
      break;
 
    case GSASL_SERVICE:
    {
      const char *service = NULL;
      switch (conn->account.type)
      {
        case MUTT_ACCT_TYPE_IMAP:
          service = "imap";
          break;
        case MUTT_ACCT_TYPE_POP:
          service = "pop";
          break;
        case MUTT_ACCT_TYPE_SMTP:
          service = "smtp";
          break;
        default:
          return rc;
      }
      gsasl_property_set(sctx, GSASL_SERVICE, service);
      rc = GSASL_OK;
      break;
    }
 
    case GSASL_HOSTNAME:
      gsasl_property_set(sctx, GSASL_HOSTNAME, conn->account.host);
      rc = GSASL_OK;
      break;
 
    default:
      break;
  }
 
  return rc;
}

Here is the call graph for this function:

Here is the caller graph for this function:

mutt_gsasl_init()

static bool mutt_gsasl_init ( void  )

static

Initialise GNU SASL library.

Return values

true

Success

Definition at line 127 of file gsasl.c.

{
  if (MuttGsaslCtx)
    return true;
 
  int rc = gsasl_init(&MuttGsaslCtx);
  if (rc != GSASL_OK)
  {
    MuttGsaslCtx = NULL;
    mutt_debug(LL_DEBUG1, "libgsasl initialisation failed (%d): %s.\n", rc,
               gsasl_strerror(rc));
    return false;
  }
 
  gsasl_callback_set(MuttGsaslCtx, mutt_gsasl_callback);
  return true;
}

Here is the call graph for this function:

Here is the caller graph for this function:

mutt_gsasl_cleanup()

void mutt_gsasl_cleanup

(

void

)

Shutdown GNU SASL library.

Definition at line 148 of file gsasl.c.

{
  if (!MuttGsaslCtx)
    return;
 
  gsasl_done(MuttGsaslCtx);
  MuttGsaslCtx = NULL;
}

Here is the caller graph for this function:

mutt_gsasl_get_mech()

const char * mutt_gsasl_get_mech	(	const char *	requested_mech,
		const char *	server_mechlist
	)

Pick a connection mechanism.

Parameters

requested_mech	Requested mechanism
server_mechlist	Server's list of mechanisms

Return values

ptr	Selected mechanism string

Definition at line 163 of file gsasl.c.

{
  if (!mutt_gsasl_init())
    return NULL;
 
  /* libgsasl does not do case-independent string comparisons,
   * and stores its methods internally in uppercase. */
  char *uc_server_mechlist = mutt_str_dup(server_mechlist);
  if (uc_server_mechlist)
    mutt_str_upper(uc_server_mechlist);
 
  char *uc_requested_mech = mutt_str_dup(requested_mech);
  if (uc_requested_mech)
    mutt_str_upper(uc_requested_mech);
 
  const char *sel_mech = NULL;
  if (uc_requested_mech)
    sel_mech = gsasl_client_suggest_mechanism(MuttGsaslCtx, uc_requested_mech);
  else
    sel_mech = gsasl_client_suggest_mechanism(MuttGsaslCtx, uc_server_mechlist);
 
  FREE(&uc_requested_mech);
  FREE(&uc_server_mechlist);
 
  return sel_mech;
}

Here is the call graph for this function:

Here is the caller graph for this function:

mutt_gsasl_client_new()

int mutt_gsasl_client_new	(	struct Connection *	conn,
		const char *	mech,
		Gsasl_session **	sctx
	)

Create a new GNU SASL client.

Parameters

conn	Connection to a server
mech	Mechanisms to use
sctx	GNU SASL Session

Return values

0	Success
-1	Error

Definition at line 198 of file gsasl.c.

{
  if (!mutt_gsasl_init())
    return -1;
 
  int rc = gsasl_client_start(MuttGsaslCtx, mech, sctx);
  if (rc != GSASL_OK)
  {
    *sctx = NULL;
    mutt_debug(LL_DEBUG1, "gsasl_client_start failed (%d): %s.\n", rc, gsasl_strerror(rc));
    return -1;
  }
 
  gsasl_session_hook_set(*sctx, conn);
  return 0;
}

Here is the call graph for this function:

Here is the caller graph for this function:

mutt_gsasl_client_finish()

void mutt_gsasl_client_finish

(

Gsasl_session **

sctx

)

Free a GNU SASL client.

Parameters

sctx	GNU SASL Session

Definition at line 219 of file gsasl.c.

{
  gsasl_finish(*sctx);
  *sctx = NULL;
}

Here is the caller graph for this function:

Variable Documentation

MuttGsaslCtx

Gsasl* MuttGsaslCtx = NULL

static

Global GNU SASL handle.

Definition at line 39 of file gsasl.c.