path: root/camel/camel-provider.c

/* -*- Mode: C; tab-width: 8; indent-tabs-mode: t; c-basic-offset: 8 -*- */
/* camel-provider.c :  provider framework   */

/* 
 *
 * Author : 
 *  Bertrand Guiheneuf <bertrand@helixcode.com>
 *
 * Copyright 1999, 2000 Helix Code, Inc. (http://www.helixcode.com)
 *
 * 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, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
 * USA
 */


/* 
   A provider can be added "by hand" or by loading a module. 


   Adding providers with modules. 
   ------------------------------

   The modules are shared libraries which must contain the 
   function

   CamelProvider *camel_provider_module_init ();
  
   returning the provider object defined in the module 

   
*/

/* FIXME: Shouldn't we add a version number to providers ? */

#include "config.h"
#include "camel-provider.h"
#include "camel-log.h"

#include <dirent.h>
#include <string.h>

static GList *_provider_list = NULL;

static gint        
_provider_name_cmp (gconstpointer a, gconstpointer b)
{
    CamelProvider *provider_a = CAMEL_PROVIDER (a);
    CamelProvider *provider_b = CAMEL_PROVIDER (b);

    return strcmp ( provider_a->name,  provider_b->name);
}

void
camel_provider_register (CamelProvider *provider)
{
    GList *old_provider_node = NULL;

    g_assert (provider);
    
    if (_provider_list)
        old_provider_node = g_list_find_custom (_provider_list, provider, _provider_name_cmp);

    if (old_provider_node != NULL) {
        /* camel_provider_unref (CAMEL_PROVIDER (old_provider_node->data)); */
        old_provider_node->data = provider;
    } else {
        /* be careful, we use prepend here, so that last registered
           providers come first */
        _provider_list = g_list_prepend (_provider_list, provider);
    }
    /* camel_provider_ref (provider); */
}


const CamelProvider *
camel_provider_register_as_module (const gchar *module_path)
{
    
    CamelProvider *new_provider = NULL;
    GModule *new_module = NULL;
    CamelProvider * (*camel_provider_module_init) ();
    gboolean has_module_init;
    
    CAMEL_LOG_FULL_DEBUG ("Entering CamelProvider::register_as_module\n");
    
    g_return_val_if_fail (module_path, NULL);

    if (!g_module_supported ()) {
        CAMEL_LOG_WARNING ("CamelProvider::register_as_module module loading not supported on this system\n");
        CAMEL_LOG_FULL_DEBUG ("Leaving CamelProvider::register_as_module\n");
        return NULL;
    }
    

    new_module = g_module_open (module_path, 0);
    if (!new_module) {
        printf ("g_module_open reports: %s\n", g_module_error ());
        CAMEL_LOG_WARNING ("CamelProvider::register_as_module Unable to load module %s\n", module_path);
        CAMEL_LOG_FULL_DEBUG ("Leaving CamelProvider::register_as_module\n");
        return NULL;
    }
        
    has_module_init = g_module_symbol (new_module, "camel_provider_module_init", (gpointer *)&camel_provider_module_init);
    if (!has_module_init){
        CAMEL_LOG_WARNING ("CamelProvider::register_as_module loading of module %s failed,\n"
                   "\t Symbol camel_provider_module_init not defined in it\n", module_path);
        CAMEL_LOG_FULL_DEBUG ("Leaving CamelProvider::register_as_module\n");
        return NULL;
    }

    new_provider = camel_provider_module_init();
    new_provider->gmodule = new_module;
    camel_provider_register (new_provider);

    CAMEL_LOG_FULL_DEBUG ("Leaving CamelProvider::register_as_module\n");
    return new_provider;

 
} 

/**
 * camel_provider_scan: Scan for available providers and return a list.
 *
 * Note that this function will cause all providers in the providerdir
 * to be loaded into memory.
 *
 * Return value: the list of CamelProviders. The caller must free this
 * list when it is done with it.
 **/
GList *
camel_provider_scan (void)
{
    DIR *dir;
    struct dirent *dent;
    char *p, *name;

    dir = opendir (CAMEL_PROVIDERDIR);
    if (!dir)
        return NULL;
    while ((dent = readdir (dir))) {
        p = strstr (dent->d_name, ".so");
        if (!p || strcmp (p, ".so") != 0)
            continue;

        name = g_module_build_path (CAMEL_PROVIDERDIR, dent->d_name);
        camel_provider_register_as_module (name);
        g_free (name);
    }
    closedir (dir);

    return g_list_copy (_provider_list);
}
    

/**
 * camel_provider_get_for_protocol: get a registered provider for a protocol
 * @protocol: protocol name (case insensitive)
 * @type: provider type (transport, store, ...)
 * 
 * Look into the list of registered provider if 
 * one correspond both to the protocol name 
 * and to the protocol type. When several providers
 * exist for a same protocol, the last registered
 * is returned.
 * 
 * Return value: Matching provider or NULL if none exists. 
 **/
const CamelProvider *
camel_provider_get_for_protocol (const gchar *protocol, ProviderType type)
{
    CamelProvider *current_provider = NULL;
    GList *current_provider_node;
    gboolean protocol_is_found;
    gboolean provider_is_found;

    g_assert (protocol);
    g_return_val_if_fail (_provider_list, NULL);

    current_provider_node = _provider_list;
    provider_is_found = FALSE;

    while ((!provider_is_found) && current_provider_node) {
        current_provider = (CamelProvider *)current_provider_node->data;
        
        protocol_is_found = (g_strcasecmp (protocol, current_provider->protocol) == 0);
        if (protocol_is_found) 
            provider_is_found = (current_provider->provider_type == type);
        
        current_provider_node = current_provider_node->next;
        }

    if (provider_is_found) return current_provider;
    else return NULL;
}