/*

 * Copyright (c) 2019 Fabriscale Technologies AS. All rights reserved.

 * Copyright (c) 2013 Mellanox Technologies LTD. All rights reserved.

 * Copyright (c) 2008 Voltaire, Inc. All rights reserved.

 * Copyright (c) 2007 The Regents of the University of California.

 *

 * This software is available to you under a choice of one of two

 * licenses.  You may choose to be licensed under the terms of the GNU

 * General Public License (GPL) Version 2, available from the file

 * COPYING in the main directory of this source tree, or the

 * OpenIB.org BSD license below:

 *

 *     Redistribution and use in source and binary forms, with or

 *     without modification, are permitted provided that the following

 *     conditions are met:

 *

 *      - Redistributions of source code must retain the above

 *        copyright notice, this list of conditions and the following

 *        disclaimer.

 *

 *      - Redistributions in binary form must reproduce the above

 *        copyright notice, this list of conditions and the following

 *        disclaimer in the documentation and/or other materials

 *        provided with the distribution.

 *

 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,

 * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF

 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND

 * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS

 * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN

 * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN

 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE

 * SOFTWARE.

 *

 */

#if HAVE_CONFIG_H

#  include <config.h>

#endif				/* HAVE_CONFIG_H */

#include <errno.h>

#include <string.h>

#include <stdlib.h>

#include <stdio.h>

#include <time.h>

#include <dlfcn.h>

#include <stdint.h>

#include <opensm/osm_config.h>

#include <complib/cl_qmap.h>

#include <complib/cl_passivelock.h>

#include <opensm/osm_version.h>

#include <opensm/osm_opensm.h>

#include <opensm/osm_log.h>

/*

 * This is a simple routing engine plugin

 * which implements the routing engine API

 */

struct  plugin_t {

	osm_opensm_t *osm;

};

/*

 * Forward declarations

 */

static void *construct(osm_opensm_t *osm);

static void destroy(void *context);

static int plugin_build_lid_matrices(

	IN void *context);

static int plugin_ucast_build_fwd_tables(

	IN void *context);

static void plugin_ucast_dump_tables(

	IN void *context);

static void plugin_update_sl2vl(

	void *context,

	IN osm_physp_t *port,

	IN uint8_t in_port_num,

	IN uint8_t out_port_num,

	IN OUT ib_slvl_table_t *t);

static void plugin_update_vlarb(

	void *context,

	IN osm_physp_t *port,

	IN uint8_t port_num,

	IN OUT ib_vl_arb_table_t *block,

	unsigned int block_length,

	unsigned int block_num);

static uint8_t plugin_path_sl(

	IN void *context,

	IN uint8_t path_sl_hint,

	IN const ib_net16_t slid,

	IN const ib_net16_t dlid);

static ib_api_status_t plugin_mcast_build_stree(

	IN void *context,

	IN OUT osm_mgrp_box_t *mgb);

static void plugin_destroy_routing_engine(

	IN void *context);

static int routing_engine_setup(

	osm_routing_engine_t *engine,

	osm_opensm_t *osm);

/*

 * Implement plugin functions

 */

static void *construct(osm_opensm_t *osm)

{

	struct plugin_t *plugin;

	cl_status_t status;

	plugin = (struct plugin_t *) calloc(1, sizeof(struct plugin_t));

	if (!plugin)

		return NULL;

	plugin->osm = osm;

	external_routing_engine_module_t plugin_routing_engine_module = {

		 "routing_engine_plugin",

		  routing_engine_setup,

		  plugin,

	};

	status = osm_register_external_routing_engine(

		osm, &plugin_routing_engine_module, plugin);

	if (status != CL_SUCCESS) {

		destroy(plugin);

		return NULL;

	}

	OSM_LOG(&plugin->osm->log, OSM_LOG_INFO,

		"External routing engine '%s' has been registered with type '%d'\n",

		plugin_routing_engine_module.name,

		osm_routing_engine_type(plugin_routing_engine_module.name));

	return ((void *)plugin);

}

static void destroy(void *context)

{

	struct plugin_t *plugin = (struct plugin_t *) context;

	if (plugin) {

		OSM_LOG(&plugin->osm->log, OSM_LOG_INFO,

			"Destroying plugin...\n");

		free(plugin);

	}

}

/*

 * Implement routing engine functions

 */

int routing_engine_setup(

	osm_routing_engine_t *engine,

	osm_opensm_t *osm)

{

	struct plugin_t *plugin = (struct plugin_t *) engine->context;

	OSM_LOG(&plugin->osm->log, OSM_LOG_INFO,

		"Setting up the plugin as a new routing engine...\n");

	engine->build_lid_matrices = plugin_build_lid_matrices;

	engine->ucast_build_fwd_tables = plugin_ucast_build_fwd_tables;

	engine->ucast_dump_tables = plugin_ucast_dump_tables;

	engine->update_sl2vl = plugin_update_sl2vl;

	engine->update_vlarb = plugin_update_vlarb;

	engine->path_sl = plugin_path_sl;

	engine->mcast_build_stree = plugin_mcast_build_stree;

	engine->destroy = plugin_destroy_routing_engine;

	return 0;

}

static int plugin_build_lid_matrices(

	IN void *context)

{

	struct plugin_t *plugin = (struct plugin_t *) context;

	OSM_LOG(&plugin->osm->log, OSM_LOG_ERROR,

		"Building LID matrices...\n");

	return 0;

}

static int plugin_ucast_build_fwd_tables(

	IN void *context)

{

	struct plugin_t *plugin = (struct plugin_t *) context;

	OSM_LOG(&plugin->osm->log, OSM_LOG_INFO,

		"Building Forwarding tables...\n");

	return 0;

}

static void plugin_ucast_dump_tables(

	IN void *context)

{

	struct plugin_t *plugin = (struct plugin_t *) context;

	OSM_LOG(&plugin->osm->log, OSM_LOG_INFO,

		"Dumping Unicast forwarding tables...\n");

}

static void plugin_update_sl2vl(

	void *context,

	IN osm_physp_t *port,

	IN uint8_t in_port_num, IN uint8_t out_port_num,

	IN OUT ib_slvl_table_t *t)

{

	struct plugin_t *plugin = (struct plugin_t *) context;

	OSM_LOG(&plugin->osm->log, OSM_LOG_INFO,

		"Update Service Layer to Virtual Lanes mapping...\n");

}

static void plugin_update_vlarb(

	void *context,

	IN osm_physp_t *port,

	IN uint8_t port_num,

	IN OUT ib_vl_arb_table_t *block,

	unsigned int block_length,

	unsigned int block_num)

{

	struct plugin_t *plugin = (struct plugin_t *) context;

	OSM_LOG(&plugin->osm->log, OSM_LOG_INFO,

		"Update Virtual Lane arbritration...\n");

}

static uint8_t plugin_path_sl(

	IN void *context,

	IN uint8_t path_sl_hint,

	IN const ib_net16_t slid,

	IN const ib_net16_t dlid)

{

	struct plugin_t *plugin = (struct plugin_t *) context;

	OSM_LOG(&plugin->osm->log, OSM_LOG_INFO,

		"Computing Service Layer for the path LID %d -> LID %d with hint: %d...\n",

		slid, dlid, path_sl_hint);

	return 0;

}

static ib_api_status_t plugin_mcast_build_stree(

	IN void *context,

	IN OUT osm_mgrp_box_t *mgb)

{

	struct plugin_t *plugin = (struct plugin_t *) context;

	OSM_LOG(&plugin->osm->log, OSM_LOG_INFO,

		"Building spanning tree for MLID: %d\n",

		mgb->mlid);

	return IB_SUCCESS;

}

static void plugin_destroy_routing_engine(

	IN void *context)

{

	struct plugin_t *plugin = (struct plugin_t *) context;

	OSM_LOG(&plugin->osm->log, OSM_LOG_INFO,

		"Destroying plugin routing engine\n");

}

/*

 * Define the object symbol for loading

 */

#if OSM_EVENT_PLUGIN_INTERFACE_VER != 2

#error OpenSM plugin interface version mismatch

#endif

osm_event_plugin_t osm_event_plugin = {

	OSM_VERSION,

	construct,

	destroy

};