/*
   * 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.
   *
   * Copyright (C) Jonathan Naylor G4KLX (g4klx@g4klx.demon.co.uk)
   */

  #include <linux/errno.h>
  #include <linux/types.h>
  #include <linux/socket.h>

  #include <linux/slab.h>

  #include <linux/in.h>
  #include <linux/kernel.h>

  #include <linux/timer.h>
  #include <linux/string.h>
  #include <linux/sockios.h>
  #include <linux/net.h>
  #include <linux/spinlock.h>
  #include <net/ax25.h>
  #include <linux/inet.h>
  #include <linux/netdevice.h>
  #include <linux/if_arp.h>
  #include <linux/skbuff.h>
  #include <net/sock.h>
  #include <asm/uaccess.h>
  #include <asm/system.h>
  #include <linux/fcntl.h>
  #include <linux/mm.h>
  #include <linux/interrupt.h>
  #include <linux/init.h>
  
  ax25_dev *ax25_dev_list;
  DEFINE_SPINLOCK(ax25_dev_lock);
  
  ax25_dev *ax25_addr_ax25dev(ax25_address *addr)
  {
  	ax25_dev *ax25_dev, *res = NULL;
  
  	spin_lock_bh(&ax25_dev_lock);
  	for (ax25_dev = ax25_dev_list; ax25_dev != NULL; ax25_dev = ax25_dev->next)
  		if (ax25cmp(addr, (ax25_address *)ax25_dev->dev->dev_addr) == 0) {
  			res = ax25_dev;
  		}
  	spin_unlock_bh(&ax25_dev_lock);
  
  	return res;
  }
  
  /*
   *	This is called when an interface is brought up. These are
   *	reasonable defaults.
   */
  void ax25_dev_device_up(struct net_device *dev)
  {
  	ax25_dev *ax25_dev;

  	if ((ax25_dev = kzalloc(sizeof(*ax25_dev), GFP_ATOMIC)) == NULL) {

  		printk(KERN_ERR "AX.25: ax25_dev_device_up - out of memory
  ");
  		return;
  	}
  
  	ax25_unregister_sysctl();

  	dev->ax25_ptr     = ax25_dev;
  	ax25_dev->dev     = dev;
  	dev_hold(dev);
  	ax25_dev->forward = NULL;
  
  	ax25_dev->values[AX25_VALUES_IPDEFMODE] = AX25_DEF_IPDEFMODE;
  	ax25_dev->values[AX25_VALUES_AXDEFMODE] = AX25_DEF_AXDEFMODE;
  	ax25_dev->values[AX25_VALUES_BACKOFF]   = AX25_DEF_BACKOFF;
  	ax25_dev->values[AX25_VALUES_CONMODE]   = AX25_DEF_CONMODE;
  	ax25_dev->values[AX25_VALUES_WINDOW]    = AX25_DEF_WINDOW;
  	ax25_dev->values[AX25_VALUES_EWINDOW]   = AX25_DEF_EWINDOW;
  	ax25_dev->values[AX25_VALUES_T1]        = AX25_DEF_T1;
  	ax25_dev->values[AX25_VALUES_T2]        = AX25_DEF_T2;
  	ax25_dev->values[AX25_VALUES_T3]        = AX25_DEF_T3;
  	ax25_dev->values[AX25_VALUES_IDLE]	= AX25_DEF_IDLE;
  	ax25_dev->values[AX25_VALUES_N2]        = AX25_DEF_N2;
  	ax25_dev->values[AX25_VALUES_PACLEN]	= AX25_DEF_PACLEN;
  	ax25_dev->values[AX25_VALUES_PROTOCOL]  = AX25_DEF_PROTOCOL;
  	ax25_dev->values[AX25_VALUES_DS_TIMEOUT]= AX25_DEF_DS_TIMEOUT;
  
  #if defined(CONFIG_AX25_DAMA_SLAVE) || defined(CONFIG_AX25_DAMA_MASTER)

  	ax25_ds_setup_timer(ax25_dev);

  #endif
  
  	spin_lock_bh(&ax25_dev_lock);
  	ax25_dev->next = ax25_dev_list;
  	ax25_dev_list  = ax25_dev;
  	spin_unlock_bh(&ax25_dev_lock);
  
  	ax25_register_sysctl();
  }
  
  void ax25_dev_device_down(struct net_device *dev)
  {
  	ax25_dev *s, *ax25_dev;
  
  	if ((ax25_dev = ax25_dev_ax25dev(dev)) == NULL)
  		return;
  
  	ax25_unregister_sysctl();
  
  	spin_lock_bh(&ax25_dev_lock);
  
  #ifdef CONFIG_AX25_DAMA_SLAVE
  	ax25_ds_del_timer(ax25_dev);
  #endif
  
  	/*
  	 *	Remove any packet forwarding that points to this device.
  	 */
  	for (s = ax25_dev_list; s != NULL; s = s->next)
  		if (s->forward == dev)
  			s->forward = NULL;
  
  	if ((s = ax25_dev_list) == ax25_dev) {
  		ax25_dev_list = s->next;
  		spin_unlock_bh(&ax25_dev_lock);
  		dev_put(dev);
  		kfree(ax25_dev);
  		ax25_register_sysctl();
  		return;
  	}
  
  	while (s != NULL && s->next != NULL) {
  		if (s->next == ax25_dev) {
  			s->next = ax25_dev->next;
  			spin_unlock_bh(&ax25_dev_lock);
  			dev_put(dev);
  			kfree(ax25_dev);
  			ax25_register_sysctl();
  			return;
  		}
  
  		s = s->next;
  	}
  	spin_unlock_bh(&ax25_dev_lock);
  	dev->ax25_ptr = NULL;
  
  	ax25_register_sysctl();
  }
  
  int ax25_fwd_ioctl(unsigned int cmd, struct ax25_fwd_struct *fwd)
  {
  	ax25_dev *ax25_dev, *fwd_dev;
  
  	if ((ax25_dev = ax25_addr_ax25dev(&fwd->port_from)) == NULL)
  		return -EINVAL;
  
  	switch (cmd) {
  	case SIOCAX25ADDFWD:
  		if ((fwd_dev = ax25_addr_ax25dev(&fwd->port_to)) == NULL)
  			return -EINVAL;
  		if (ax25_dev->forward != NULL)
  			return -EINVAL;
  		ax25_dev->forward = fwd_dev->dev;
  		break;
  
  	case SIOCAX25DELFWD:
  		if (ax25_dev->forward == NULL)
  			return -EINVAL;
  		ax25_dev->forward = NULL;
  		break;
  
  	default:
  		return -EINVAL;
  	}
  
  	return 0;
  }
  
  struct net_device *ax25_fwd_dev(struct net_device *dev)
  {
  	ax25_dev *ax25_dev;
  
  	if ((ax25_dev = ax25_dev_ax25dev(dev)) == NULL)
  		return dev;
  
  	if (ax25_dev->forward == NULL)
  		return dev;
  
  	return ax25_dev->forward;
  }
  
  /*
   *	Free all memory associated with device structures.
   */
  void __exit ax25_dev_free(void)
  {
  	ax25_dev *s, *ax25_dev;
  
  	spin_lock_bh(&ax25_dev_lock);
  	ax25_dev = ax25_dev_list;
  	while (ax25_dev != NULL) {
  		s        = ax25_dev;
  		dev_put(ax25_dev->dev);
  		ax25_dev = ax25_dev->next;
  		kfree(s);
  	}
  	ax25_dev_list = NULL;
  	spin_unlock_bh(&ax25_dev_lock);
  }