/*

  route.c

  Author: Pekka Riikonen <priikone@poseidon.pspt.fi>

  Copyright (C) 2000 Pekka Riikonen

  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.

*/
/* 
 * Route cache routines. Server uses these to route packets to specific
 * routes. If route entry doesn't exist for a specific destination, server
 * uses primary route (default route).
 */
/*
 * $Id$
 * $Log$
 * Revision 1.4  2000/07/12 05:59:41  priikone
 * 	Major rewrite of ID Cache system. Support added for the new
 * 	ID cache system. Major rewrite of ID List stuff on server.  All
 * 	SilcXXXList's are now called SilcXXXEntry's and they are pointers
 * 	by default. A lot rewritten ID list functions.
 *
 * Revision 1.3  2000/07/05 06:14:01  priikone
 * 	Global costemic changes.
 *
 * Revision 1.2  2000/07/04 08:30:24  priikone
 * 	Added silc_server_get_route to return communication object
 * 	for fastest route.
 *
 * Revision 1.1.1.1  2000/06/27 11:36:56  priikone
 * 	Imported from internal CVS/Added Log headers.
 *
 *
 */

#include "serverincludes.h"
#include "server_internal.h"
#include "route.h"

/* Route cache hash table */
SilcServerRouteTable silc_route_cache[SILC_SERVER_ROUTE_SIZE];

/* Adds new route to the route cache. The argument `index' is the
   index value generated by silc_server_route_hash. */

void silc_server_route_add(unsigned int index, unsigned int dest,
			   SilcServerEntry router)
{
  silc_route_cache[index].dest = dest;
  silc_route_cache[index].router = router;
}

/* Checksk whether destination has a specific router. Returns the
   router data if found, NULL otherwise. */

SilcServerEntry silc_server_route_check(unsigned int dest, 
					unsigned short port)
{
  unsigned int index;

  index = silc_server_route_hash(dest, port);

  if (silc_route_cache[index].router != NULL &&
      silc_route_cache[index].dest == dest)
    return silc_route_cache[index].router;

  return NULL;
}

/* Returns the connection object for the fastest route for the given ID.
   If we are normal server then this just returns our primary route. If
   we are router we will do route lookup. */

SilcSocketConnection silc_server_get_route(SilcServer server, void *id,
					   SilcIdType id_type)
{
  unsigned int dest = 0;
  unsigned short port = 0;
  SilcServerEntry router = NULL;

  if (server->server_type == SILC_SERVER)
    return (SilcSocketConnection)server->id_entry->router->connection;
  
  switch(id_type) {
  case SILC_ID_CLIENT:
    dest = ((SilcClientID *)id)->ip.s_addr;
    port = server->id->port;
    break;
  case SILC_ID_SERVER:
    dest = ((SilcServerID *)id)->ip.s_addr;
    port = ((SilcServerID *)id)->port;
    break;
  case SILC_ID_CHANNEL:
    dest = ((SilcChannelID *)id)->ip.s_addr;
    port = ((SilcChannelID *)id)->port;
    break;
  default:
    return NULL;
  }

  router = silc_server_route_check(dest, port);
  if (!router)
    return (SilcSocketConnection)server->id_entry->router->connection;

  return (SilcSocketConnection)router->connection;
}