/*
 ******************************************************************************
 *                     INTERPEAK SOURCE FILE
 *
 *   Document no: @(#) $Name: VXWORKS_ITER40_2019102207 $ $RCSfile: ipmip6pm_service_radvd.c,v $ $Revision: 1.7 $
 *   $Source: /home/interpeak/CVSRoot/ipmip6pm/config/ipmip6pm_service_radvd.c,v $
 *   $Author: jhorteli $
 *   $State: Exp $ $Locker:  $
 *
 *   INTERPEAK_COPYRIGHT_STRING
 *     Design and implementation by Joel Hortelius <joel.hortelis@interpeak.se>
 ******************************************************************************
 */


/*
 ****************************************************************************
 * 1                    DESCRIPTION
 ****************************************************************************
 */

/*
 ****************************************************************************
 * 2                    CONFIGURATION
 ****************************************************************************
 */

#include "ipmip6pm_config.h"

/*
 ****************************************************************************
 * 3                    INCLUDE FILES
 ****************************************************************************
 */
#define IPCOM_USE_CLIB_PROTO
#include <ipcom_clib.h>
#include <ipcom_os.h>
#include <ipcom_sock.h>
#include <ipcom_sock6.h>
#include <ipcom_inet.h>
#include <ipcom_list.h>
#include <ipcom_hash.h>
#include <ipcom_err.h>
#include <ipcom_sysvar.h>
#include <ipcom_syslog.h>
#include <ipcom_shell.h>
#include <ipcom_route.h>

#include <ipnet.h>
#include <ipnet_radvd.h>

#include <ipmip.h>
#include <private/ipmip_util.h>
#include <private/ipmip_sysvar.h>

#include <ipmip6.h>
#include <private/ipmip6_context.h>
#include <private/ipmip6_netlink.h>
#include <private/ipmip6_if.h>
#include <private/ipmip6_icmp.h>
#include <private/ipmip6_util.h>

#include "ipmip6pm_h.h"
#include "ipmip6pm_attr_h.h"
#include "ipmip6pm_if.h"
#include "ipmip6pm_node.h"
#include "ipmip6pm_pktbuf.h"

/*
 ****************************************************************************
 * 4                    DEFINES
 ****************************************************************************
 */
#define IPMIP6PM_SERVICE_RADVD_NAME "RADVD"

#define IPMIP6PM_SERVICE_RADVD_FLAG_A   (1 << 0)
#define IPMIP6PM_SERVICE_RADVD_FLAG_O   (1 << 1)
#define IPMIP6PM_SERVICE_RADVD_FLAG_M   (1 << 2)

/*
 ****************************************************************************
 * 5                    TYPES
 ****************************************************************************
 */
typedef struct Ipmip6pm_service_radvd_config_global
{
    Ipnet_radvd_if_data         radvd;
    Ipnet_radvd_if_prefix_data  prefix;    
} Ipmip6pm_service_radvd_config_global_t;

typedef struct Ipmip6pm_service_radvd_config_data
{
    Ipnet_radvd_if_data         radvd;
    Ipnet_radvd_if_prefix_data  prefix;    
} Ipmip6pm_service_radvd_config_data_t;

typedef struct Ipmip6pm_service_radvd_handle_data
{
    Ip_u32                      radvd_flags;
    Ipnet_radvd_if_handle       radvd;
} Ipmip6pm_service_radvd_handle_data_t;

/*
 ****************************************************************************
 * 6                    EXTERN PROTOTYPES
 ****************************************************************************
 */

/*
 ****************************************************************************
 * 7                    LOCAL PROTOTYPES
 ****************************************************************************
 */

/*
 ****************************************************************************
 * 8                    DATA
 ****************************************************************************
 */

/*
 ****************************************************************************
 * 9                    STATIC FUNCTIONS
 ****************************************************************************
 */

IP_STATIC void 
ipmip6pm_service_radvd_config_global(struct Ipmip6pm_context                *ctx,
                                     struct Ipmip_proc                      *proc,
                                     int                                    action,
                                     Ipmip6pm_service_radvd_config_global_t *gcfg,
                                     Ipmip_cli_message_t                    *request)
{   
    IPMIP_UNUSED_PARAMETER(ctx);
    IPMIP_UNUSED_PARAMETER(proc);

    if (action == IPMIP_CALLBACK_CONFIG_READ)
    {
        gcfg->radvd.max_rtr_adv_interval =
            ipmip_sysvar_long(600000, "ipmip6pm.radvd.MaxRtrAdvInterval");

        gcfg->radvd.min_rtr_adv_interval =
            ipmip_sysvar_long(3000, "ipmip6pm.radvd.MinRtrAdvInterval");

        gcfg->radvd.min_delay_between_ras =
            ipmip_sysvar_long(IP_MIN(gcfg->radvd.min_rtr_adv_interval, 3000), "ipmip6pm.radvd.MinDelayBetweenRAs");

        gcfg->radvd.default_lifetime =
            ipmip_sysvar_long(IP_MAX(1000, (3 * gcfg->radvd.max_rtr_adv_interval)), "ipmip6pm.radvd.AdvDefaultLifetime");

        gcfg->radvd.link_mtu = 
            ipmip_sysvar_ulong(0, "ipmip6pm.radvd.AdvLinkMTU");

        gcfg->radvd.reachable_time = 
            ipmip_sysvar_ulong(0, "ipmip6pm.radvd.AdvReachableTime");

        gcfg->radvd.retrans_timer =
            ipmip_sysvar_ulong(0, "ipmip6pm.radvd.AdvRetransTimer");

        gcfg->radvd.hoplimit = 
            (Ip_u8)ipmip_sysvar_ulong(64, "ipmip6pm.radvd.AdvCurHopLimit");

        gcfg->radvd.managed =
            ipmip_sysvar_bool(IP_FALSE, "ipmip6pm.radvd.AdvManagedFlag");

        gcfg->radvd.other_config =
            ipmip_sysvar_bool(IP_FALSE, "ipmip6pm.radvd.AdvOtherConfigFlag");

        gcfg->radvd.home_agent =
            ipmip_sysvar_bool(IP_FALSE, "ipmip6pm.radvd.AdvHomeAgentFlag");

        gcfg->radvd.adv_interval_opt =
            ipmip_sysvar_bool(IP_FALSE, "ipmip6pm.radvd.AdvIntervalOpt");

        gcfg->radvd.adv_home_agent_opt =
            ipmip_sysvar_bool(IP_FALSE, "ipmip6pm.radvd.AdvHomeAgentOpt");

        gcfg->radvd.adv_home_agent_opt_lifetime    =
            ipmip_sysvar_long(0, "ipmip6pm.radvd.AdvHomeAgentOptLifetime");

        gcfg->radvd.adv_home_agent_opt_preference    =
            ipmip_sysvar_long(0, "ipmip6pm.radvd.AdvHomeAgentOptPreference");


        /* Do prefix */

        gcfg->prefix.valid_lifetime     = 
            ipmip_sysvar_ulong(2592000, "ipmip6pm.radvd.prefix.AdvValidLifetime");

        gcfg->prefix.preferred_lifetime = 
            ipmip_sysvar_ulong(604800, "ipmip6pm.radvd.prefix.AdvPreferredLifetime");

        gcfg->prefix.on_link            = 
            ipmip_sysvar_bool(IP_TRUE, "ipmip6pm.radvd.prefix.AdvOnLinkFlag");

        gcfg->prefix.autonomous         = 
            ipmip_sysvar_bool(IP_TRUE, "ipmip6pm.radvd.prefix.AdvAutonomousFlag");

        gcfg->prefix.router_address     = 
            ipmip_sysvar_bool(IP_FALSE, "ipmip6pm.radvd.prefix.AdvRouterAddressFlag");
    }   
    else if (action == IPMIP_CALLBACK_CONFIG_FREE)
    {
        /* Do nothing */
    }
    else if (action == IPMIP_CALLBACK_CONFIG_DUMP)
    {
        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.MaxRtrAdvInterval=%u",
                                gcfg->radvd.max_rtr_adv_interval);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.MinRtrAdvInterval=%u",
                                gcfg->radvd.min_rtr_adv_interval);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.MinDelayBetweenRAs=%u",
                                gcfg->radvd.min_delay_between_ras);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.AdvDefaultLifetime=%u",
                                gcfg->radvd.default_lifetime);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.AdvLinkMTU=%u",
                                gcfg->radvd.link_mtu);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.AdvReachableTime=%u",
                                gcfg->radvd.reachable_time);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.AdvRetransTimer=%u",
                                gcfg->radvd.retrans_timer);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.AdvCurHopLimit=%u",
                                gcfg->radvd.hoplimit);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.AdvManagedFlag=%s",
                                gcfg->radvd.managed? "true" : "false");

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.AdvOtherConfigFlag=%s",
                                gcfg->radvd.other_config? "true" : "false");

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.AdvHomeAgentFlag=%s",
                                gcfg->radvd.home_agent? "true" : "false");

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.AdvIntervalOpt=%s",
                                gcfg->radvd.adv_interval_opt? "true" : "false");

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.AdvHomeAgentOpt=%s",
                                gcfg->radvd.adv_home_agent_opt? "true" : "false");

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.AdvHomeAgentOptLifetime=%u",
                                gcfg->radvd.adv_home_agent_opt_lifetime);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.AdvHomeAgentOptPreference=%u",
                                gcfg->radvd.adv_home_agent_opt_preference);

        /* Do prefix */

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.prefix.AdvValidLifetime=%u",
                                gcfg->prefix.valid_lifetime);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.prefix.AdvPreferredLifetime=%u",
                                gcfg->prefix.preferred_lifetime);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.prefix.AdvOnLinkFlag=%s",
                                gcfg->prefix.on_link? "true" : "false");

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.prefix.AdvAutonomousFlag=%s",
                                gcfg->prefix.autonomous? "true" : "false");

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.radvd.prefix.AdvRouterAddressFlag=%s",
                                gcfg->prefix.router_address? "true" : "false");
    }
}


IP_STATIC void 
ipmip6pm_service_radvd_config(struct Ipmip6pm_context                   *ctx,
                              struct Ipmip_proc                         *proc,
                              int                                       action,
                              struct Ipmip6pm_if                        *ifp,
                              Ipmip6pm_service_radvd_config_global_t    *gcfg,
                              Ipmip6pm_service_radvd_config_data_t      *cfg,
                              Ipmip_cli_message_t                       *request)
{   
    IPMIP_UNUSED_PARAMETER(ctx);
    IPMIP_UNUSED_PARAMETER(proc);

    if (action == IPMIP_CALLBACK_CONFIG_READ)
    {
        cfg->radvd.max_rtr_adv_interval =
            ipmip_sysvar_long(gcfg->radvd.max_rtr_adv_interval, "ipmip6pm.interface.%s.radvd.MaxRtrAdvInterval", ifp->ipmip6.iff.ifname);

        cfg->radvd.min_rtr_adv_interval =
            ipmip_sysvar_long(cfg->radvd.max_rtr_adv_interval / 3, "ipmip6pm.interface.%s.radvd.MinRtrAdvInterval", ifp->ipmip6.iff.ifname);

        cfg->radvd.min_delay_between_ras =
            ipmip_sysvar_long(IP_MIN(cfg->radvd.min_rtr_adv_interval, 3000), "ipmip6pm.interface.%s.radvd.MinDelayBetweenRAs", ifp->ipmip6.iff.ifname);

        cfg->radvd.default_lifetime =
            ipmip_sysvar_long(IP_MAX(1000, (3 * cfg->radvd.max_rtr_adv_interval)), "ipmip6pm.interface.%s.radvd.AdvDefaultLifetime", ifp->ipmip6.iff.ifname);

        cfg->radvd.link_mtu = 
            ipmip_sysvar_ulong(gcfg->radvd.link_mtu, "ipmip6pm.interface.%s.radvd.AdvLinkMTU", ifp->ipmip6.iff.ifname);

        cfg->radvd.reachable_time = 
            ipmip_sysvar_ulong(gcfg->radvd.reachable_time, "ipmip6pm.interface.%s.radvd.AdvReachableTime", ifp->ipmip6.iff.ifname);

        cfg->radvd.retrans_timer =
            ipmip_sysvar_ulong(gcfg->radvd.retrans_timer, "ipmip6pm.interface.%s.radvd.AdvRetransTimer", ifp->ipmip6.iff.ifname);

        cfg->radvd.hoplimit = 
            (Ip_u8)ipmip_sysvar_ulong(gcfg->radvd.hoplimit, "ipmip6pm.interface.%s.radvd.AdvCurHopLimit", ifp->ipmip6.iff.ifname);

        cfg->radvd.managed =
            ipmip_sysvar_bool(gcfg->radvd.managed, "ipmip6pm.interface.%s.radvd.AdvManagedFlag", ifp->ipmip6.iff.ifname);

        cfg->radvd.other_config =
            ipmip_sysvar_bool(gcfg->radvd.other_config, "ipmip6pm.interface.%s.radvd.AdvOtherConfigFlag", ifp->ipmip6.iff.ifname);

        cfg->radvd.home_agent =
            ipmip_sysvar_bool(gcfg->radvd.home_agent, "ipmip6pm.interface.%s.radvd.AdvHomeAgentFlag", ifp->ipmip6.iff.ifname);

        cfg->radvd.adv_interval_opt =
            ipmip_sysvar_bool(gcfg->radvd.adv_interval_opt, "ipmip6pm.interface.%s.radvd.AdvIntervalOpt", ifp->ipmip6.iff.ifname);

        cfg->radvd.adv_home_agent_opt =
            ipmip_sysvar_bool(gcfg->radvd.adv_home_agent_opt, "ipmip6pm.interface.%s.radvd.AdvHomeAgentOpt", ifp->ipmip6.iff.ifname);

        cfg->radvd.adv_home_agent_opt_lifetime    =
            ipmip_sysvar_long(gcfg->radvd.adv_home_agent_opt_lifetime, "ipmip6pm.interface.%s.radvd.AdvHomeAgentOptLifetime", ifp->ipmip6.iff.ifname);

        cfg->radvd.adv_home_agent_opt_preference    =
            ipmip_sysvar_long(gcfg->radvd.adv_home_agent_opt_preference, "ipmip6pm.interface.%s.radvd.AdvHomeAgentOptPreference", ifp->ipmip6.iff.ifname);


        /* Do prefix */

        cfg->prefix.valid_lifetime     = 
            ipmip_sysvar_ulong(gcfg->prefix.valid_lifetime, "ipmip6pm.interface.%s.radvd.prefix.AdvValidLifetime", ifp->ipmip6.iff.ifname);

        cfg->prefix.preferred_lifetime = 
            ipmip_sysvar_ulong(gcfg->prefix.preferred_lifetime, "ipmip6pm.interface.%s.radvd.prefix.AdvPreferredLifetime", ifp->ipmip6.iff.ifname);

        cfg->prefix.on_link            = 
            ipmip_sysvar_bool(gcfg->prefix.on_link, "ipmip6pm.interface.%s.radvd.prefix.AdvOnLinkFlag", ifp->ipmip6.iff.ifname);

        cfg->prefix.autonomous         = 
            ipmip_sysvar_bool(gcfg->prefix.autonomous, "ipmip6pm.interface.%s.radvd.prefix.AdvAutonomousFlag", ifp->ipmip6.iff.ifname);

        cfg->prefix.router_address     = 
            ipmip_sysvar_bool(gcfg->prefix.router_address, "ipmip6pm.interface.%s.radvd.prefix.AdvRouterAddressFlag", ifp->ipmip6.iff.ifname);
    }   
    else if (action == IPMIP_CALLBACK_CONFIG_FREE)
    {
        /* Do nothing */
    }
    else if (action == IPMIP_CALLBACK_CONFIG_DUMP)
    {
        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.MaxRtrAdvInterval=%u",
                                ifp->ipmip6.iff.ifname, cfg->radvd.max_rtr_adv_interval);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.MinRtrAdvInterval=%u",
                                ifp->ipmip6.iff.ifname, cfg->radvd.min_rtr_adv_interval);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.MinDelayBetweenRAs=%u",
                                ifp->ipmip6.iff.ifname, cfg->radvd.min_delay_between_ras);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.AdvDefaultLifetime=%u",
                                ifp->ipmip6.iff.ifname, cfg->radvd.default_lifetime);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.AdvLinkMTU=%u",
                                ifp->ipmip6.iff.ifname, cfg->radvd.link_mtu);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.AdvReachableTime=%u",
                                ifp->ipmip6.iff.ifname, cfg->radvd.reachable_time);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.AdvRetransTimer=%u",
                                ifp->ipmip6.iff.ifname, cfg->radvd.retrans_timer);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.AdvCurHopLimit=%u",
                                ifp->ipmip6.iff.ifname, cfg->radvd.hoplimit);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.AdvManagedFlag=%s",
                                ifp->ipmip6.iff.ifname, cfg->radvd.managed? "true" : "false");

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.AdvOtherConfigFlag=%s",
                                ifp->ipmip6.iff.ifname, cfg->radvd.other_config? "true" : "false");

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.AdvHomeAgentFlag=%s",
                                ifp->ipmip6.iff.ifname, cfg->radvd.home_agent? "true" : "false");

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.AdvIntervalOpt=%s",
                                ifp->ipmip6.iff.ifname, cfg->radvd.adv_interval_opt? "true" : "false");

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.AdvHomeAgentOpt=%s",
                                ifp->ipmip6.iff.ifname, cfg->radvd.adv_home_agent_opt? "true" : "false");

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.AdvHomeAgentOptLifetime=%u",
                                ifp->ipmip6.iff.ifname, cfg->radvd.adv_home_agent_opt_lifetime);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.AdvHomeAgentOptPreference=%u",
                                ifp->ipmip6.iff.ifname, cfg->radvd.adv_home_agent_opt_preference);

        /* Do prefix */

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.prefix.AdvValidLifetime=%u",
                                ifp->ipmip6.iff.ifname, cfg->prefix.valid_lifetime);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.prefix.AdvPreferredLifetime=%u",
                                ifp->ipmip6.iff.ifname, cfg->prefix.preferred_lifetime);

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.prefix.AdvOnLinkFlag=%s",
                                ifp->ipmip6.iff.ifname, cfg->prefix.on_link? "true" : "false");

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.prefix.AdvAutonomousFlag=%s",
                                ifp->ipmip6.iff.ifname, cfg->prefix.autonomous? "true" : "false");

        ipmip_cli_config_printf(&request->message,
                                "ipmip6pm.interface.%s.radvd.prefix.AdvRouterAddressFlag=%s",
                                ifp->ipmip6.iff.ifname, cfg->prefix.router_address? "true" : "false");
    }
}


IP_STATIC int
ipmip6pm_service_radvd_provide(struct Ipmip6pm_context                  *ctx,
                               struct Ipmip_proc                        *proc,
                               int                                      action,
                               Ipmip6pm_service_radvd_config_global_t   *gcfg,
                               Ipmip6pm_service_radvd_config_data_t     *cfg,
                               Ipmip6pm_service_radvd_handle_data_t     *handle,
                               struct Ipmip6pm_node                     *node,
                               struct Ipmip_timer                       *service)
{
    IPMIP_UNUSED_PARAMETER(service);
    IPMIP_UNUSED_PARAMETER(gcfg);

    if (action == IPMIP_CALLBACK_ENABLE)
    {
        Ipnet_radvd_if_data             radvd;
        Ip_u8                           i;

        ipcom_memcpy(&radvd, &cfg->radvd, sizeof(radvd));
        ipcom_strcpy(radvd.ifname, node->ifp_private.ipmip6.ifname);

        radvd.other_config  = (handle->radvd_flags & IPMIP6PM_SERVICE_RADVD_FLAG_O) != 0;
        radvd.managed       = (handle->radvd_flags & IPMIP6PM_SERVICE_RADVD_FLAG_M) != 0;

        if (ipnet_radvd_if_open(&handle->radvd, &radvd) != IPCOM_SUCCESS)
        {
            IPMIP6_EVENT_IF(INFO, proc, 
                            ipmip_log_event_add(&ctx->ipmip6.ipmip, 
                                                proc, 
                                                "Unable to start service for Proxy Mobile node %s",
                                                ipmip6pm_node_describe(proc, node)));
        }
        else
        {
            Ipnet_radvd_if_prefix_handle    phandle;
            Ipnet_radvd_if_prefix_data      pdata;

            ipcom_memcpy(&pdata, &cfg->prefix, sizeof(pdata));

            pdata.autonomous = (handle->radvd_flags & IPMIP6PM_SERVICE_RADVD_FLAG_A) != 0;

            /* Do the prefixes */
            for (i = 0; i < node->mo_home_prefix_size; i++)
            {
                /* Add prefix by prefix */
                ipcom_memcpy(&pdata.prefix, &node->mo_home_prefix[i].prefix, sizeof(pdata.prefix));
                pdata.prefixlen = node->mo_home_prefix[i].prefix_length;

                if (ipnet_radvd_if_prefix_open(handle->radvd, &phandle, &pdata) != IPCOM_SUCCESS)
                {
                    IPMIP6_EVENT_IF(INFO, proc, 
                                    ipmip_log_event_add(&ctx->ipmip6.ipmip, 
                                                        proc, 
                                                        "Unable to start service on prefix %s/%d for Proxy Mobile node %s",
                                                        ipmip_ntop_inet6(proc, &pdata.prefix, IP_NULL),
                                                        pdata.prefixlen,
                                                        ipmip6pm_node_describe(proc, node)));
                }
            }            

            /* Start it */
            ipnet_radvd_if_start(handle->radvd);
        }
    }
    else if (action == IPMIP_CALLBACK_DISABLE)
    {
        if (handle)
            ipnet_radvd_if_close(handle->radvd);
    }

    /* Don't delay */
    return IPMIP_CALLBACK_RET_SUCCESS;
}

IP_STATIC Ip_bool
ipmip6pm_service_radvd_setup(struct Ipmip6pm_context                *ctx,
                             struct Ipmip_proc                      *proc,
                             int                                    action,
                             Ipmip6pm_service_radvd_config_global_t *gcfg,
                             Ipmip6pm_service_radvd_config_data_t   *cfg,
                             Ipmip6pm_service_radvd_handle_data_t   *handle,
                             struct Ipmip6pm_node                   *node,
                             const char                             *value,
                             Ipmip_cli_message_t                    *request)
{   
    IPMIP_UNUSED_PARAMETER(ctx);
    IPMIP_UNUSED_PARAMETER(proc);
    IPMIP_UNUSED_PARAMETER(node);
    IPMIP_UNUSED_PARAMETER(gcfg);

    if (action == IPMIP_CALLBACK_CONFIG_READ)
    {
        if (value)
        {
            const char *ptr = value;

            /* Do some node specific setup on the RADVD */
            while (*ptr != '\0')
            {
                switch (*ptr++)
                {
                case 'A':
                case 'a':
                    handle->radvd_flags |= IPMIP6PM_SERVICE_RADVD_FLAG_A;
                    break;
                case 'O':
                case 'o':
                    handle->radvd_flags |= IPMIP6PM_SERVICE_RADVD_FLAG_O;
                    break;
                case 'M':
                case 'm':
                    handle->radvd_flags |= IPMIP6PM_SERVICE_RADVD_FLAG_M;
                    break;
                }
            }
        }
        else
        {
            if (cfg->radvd.other_config)
                handle->radvd_flags |= IPMIP6PM_SERVICE_RADVD_FLAG_O;
            if (cfg->radvd.managed)
                handle->radvd_flags |= IPMIP6PM_SERVICE_RADVD_FLAG_M;
            if (cfg->prefix.autonomous)
                handle->radvd_flags |= IPMIP6PM_SERVICE_RADVD_FLAG_A;
        }
    }   
    else if (action == IPMIP_CALLBACK_CONFIG_FREE)
    {
        /* No dyncamically allocated values */
    }
    else if (action == IPMIP_CALLBACK_CONFIG_DUMP)
    {
        Ip_size_t rta = ipmip_attr_begin(&request->message, IPMIP6PM_CLI_ATTR_BC_P_SERVICE);
        char      *ptr = proc->ntop.ntop_name;

        if ((handle->radvd_flags & IPMIP6PM_SERVICE_RADVD_FLAG_A) != 0)
            *ptr++ = 'A';
        if ((handle->radvd_flags & IPMIP6PM_SERVICE_RADVD_FLAG_O) != 0)
            *ptr++ = 'O';
        if ((handle->radvd_flags & IPMIP6PM_SERVICE_RADVD_FLAG_M) != 0)
            *ptr++ = 'M';
        *ptr++ = '\0';

        ipmip_attr_put_str(&request->message, 
                           IPMIP6PM_CLI_ATTR_BC_P_SRV_MODULE,
                           IPMIP6PM_SERVICE_RADVD_NAME);

        ipmip_attr_put_str(&request->message, 
                           IPMIP6PM_CLI_ATTR_BC_P_SRV_VALUE,
                           proc->ntop.ntop_name);

        ipmip_attr_end(&request->message, rta);
    }

    return IP_TRUE;
}

/*
 ****************************************************************************
 * 10                   GLOBAL FUNCTIONS
 ****************************************************************************
 */

IP_GLOBAL void ipmip6pm_service_radvd_install(struct Ipmip6pm_context *ctx);
IP_GLOBAL void
ipmip6pm_service_radvd_install(struct Ipmip6pm_context *ctx)
{
    static Ipmip6pm_extension_t   srv;

    srv.name            = IPMIP6PM_SERVICE_RADVD_NAME;
    srv.syntax          = "<AOM> - Where A=Autonomous, O=Other, M=Managed";
    srv.node_data_size  = sizeof(Ipmip6pm_service_radvd_handle_data_t);
    srv.ifp_data_size   = sizeof(Ipmip6pm_service_radvd_config_data_t);
    srv.global_data_size= sizeof(Ipmip6pm_service_radvd_config_global_t);

    srv.config_global   = (Ipmip6pm_extension_config_global_t)ipmip6pm_service_radvd_config_global;
    srv.config_ifp      = (Ipmip6pm_extension_config_ifp_t)ipmip6pm_service_radvd_config;
    srv.provide         = (Ipmip6pm_extension_provide_t)ipmip6pm_service_radvd_provide;
    srv.setup           = (Ipmip6pm_extension_setup_t)ipmip6pm_service_radvd_setup;

    ipmip6pm_context_register_extension(ctx, &srv, IPMIP6PM_FUNCTION_SERVICE);
}


/*
 ****************************************************************************
 * 11                   PUBLIC FUNCTIONS
 ****************************************************************************
 */

/*
 ****************************************************************************
 *                      END OF FILE
 ****************************************************************************
 */