/*
       * INET		An implementation of the TCP/IP protocol suite for the LINUX
       *		operating system.  INET is implemented using the  BSD Socket
       *		interface as the means of communication with the user level.
       *
       *		Ethernet-type device handling.
       *
       * Version:	@(#)eth.c	1.0.7	05/25/93
       *
       * Authors:	Ross Biro, <bir7@leland.Stanford.Edu>
       *		Fred N. van Kempen, <waltje@uWalt.NL.Mugnet.ORG>
       *		Mark Evans, <evansmp@uhura.aston.ac.uk>
       *		Florian  La Roche, <rzsfl@rz.uni-sb.de>
       *		Alan Cox, <gw4pts@gw4pts.ampr.org>
       * 
       * Fixes:
       *		Mr Linux	: Arp problems
       *		Alan Cox	: Generic queue tidyup (very tiny here)
       *		Alan Cox	: eth_header ntohs should be htons
       *		Alan Cox	: eth_rebuild_header missing an htons and
       *				  minor other things.
       *		Tegge		: Arp bug fixes. 
       *		Florian		: Removed many unnecessary functions, code cleanup
       *				  and changes for new arp and skbuff.
       *		Alan Cox	: Redid header building to reflect new format.
       *		Alan Cox	: ARP only when compiled with CONFIG_INET
       *		Greg Page	: 802.2 and SNAP stuff.
       *		Alan Cox	: MAC layer pointers/new format.
       *		Paul Gortmaker	: eth_copy_and_sum shouldn't csum padding.
       *		Alan Cox	: Protect against forwarding explosions with
       *				  older network drivers and IFF_ALLMULTI.
       *	Christer Weinigel	: Better rebuild header message.
       *
       *		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.
       */
      #include <linux/types.h>
      #include <linux/kernel.h>
      #include <linux/sched.h>
      #include <linux/string.h>
      #include <linux/mm.h>
      #include <linux/socket.h>
      #include <linux/in.h>
      #include <linux/inet.h>
      #include <linux/ip.h>
      #include <linux/netdevice.h>
      #include <linux/etherdevice.h>
      #include <linux/skbuff.h>
      #include <linux/errno.h>
      #include <linux/config.h>
      #include <linux/init.h>
      #include <net/dst.h>
      #include <net/arp.h>
      #include <net/sock.h>
      #include <net/ipv6.h>
      #include <net/ip.h>
      #include <asm/uaccess.h>
      #include <asm/system.h>
      #include <asm/checksum.h>
      
  63  static int __init eth_setup(char *str)
      {
      	int ints[5];
      	struct ifmap map;
      
      	str = get_options(str, ARRAY_SIZE(ints), ints);
  69  	if (!str || !*str)
  70  		return 0;
      
       	/* Save settings */
       	memset(&map, -1, sizeof(map));
  74  	if (ints[0] > 0)
      		map.irq = ints[1];
  76  	if (ints[0] > 1)
      		map.base_addr = ints[2];
  78  	if (ints[0] > 2)
      		map.mem_start = ints[3];
  80  	if (ints[0] > 3)
      		map.mem_end = ints[4];
      
      	/* Add new entry to the list */
  84  	return netdev_boot_setup_add(str, &map);
      }
      
      __setup("ether=", eth_setup);
      
      /*
       *	 Create the Ethernet MAC header for an arbitrary protocol layer 
       *
       *	saddr=NULL	means use device source address
       *	daddr=NULL	means leave destination address (eg unresolved arp)
       */
      
  96  int eth_header(struct sk_buff *skb, struct net_device *dev, unsigned short type,
      	   void *daddr, void *saddr, unsigned len)
      {
      	struct ethhdr *eth = (struct ethhdr *)skb_push(skb,ETH_HLEN);
      
      	/* 
      	 *	Set the protocol type. For a packet of type ETH_P_802_3 we put the length
      	 *	in here instead. It is up to the 802.2 layer to carry protocol information.
      	 */
      	
 106  	if(type!=ETH_P_802_3) 
      		eth->h_proto = htons(type);
 108  	else
      		eth->h_proto = htons(len);
      
      	/*
      	 *	Set the source hardware address. 
      	 */
      	 
 115  	if(saddr)
      		memcpy(eth->h_source,saddr,dev->addr_len);
 117  	else
      		memcpy(eth->h_source,dev->dev_addr,dev->addr_len);
      
      	/*
      	 *	Anyway, the loopback-device should never use this function... 
      	 */
      
 124  	if (dev->flags & (IFF_LOOPBACK|IFF_NOARP)) 
      	{
      		memset(eth->h_dest, 0, dev->addr_len);
 127  		return(dev->hard_header_len);
      	}
      	
 130  	if(daddr)
      	{
      		memcpy(eth->h_dest,daddr,dev->addr_len);
 133  		return dev->hard_header_len;
      	}
      	
 136  	return -dev->hard_header_len;
      }
      
      
      /*
       *	Rebuild the Ethernet MAC header. This is called after an ARP
       *	(or in future other address resolution) has completed on this
       *	sk_buff. We now let ARP fill in the other fields.
       *
       *	This routine CANNOT use cached dst->neigh!
       *	Really, it is used only when dst->neigh is wrong.
       */
      
 149  int eth_rebuild_header(struct sk_buff *skb)
      {
      	struct ethhdr *eth = (struct ethhdr *)skb->data;
      	struct net_device *dev = skb->dev;
      
 154  	switch (eth->h_proto)
      	{
      #ifdef CONFIG_INET
 157  	case __constant_htons(ETH_P_IP):
 158   		return arp_find(eth->h_dest, skb);
      #endif	
 160  	default:
      		printk(KERN_DEBUG
      		       "%s: unable to resolve type %X addresses.\n", 
      		       dev->name, (int)eth->h_proto);
      		
      		memcpy(eth->h_source, dev->dev_addr, dev->addr_len);
 166  		break;
      	}
      
 169  	return 0;
      }
      
      
      /*
       *	Determine the packet's protocol ID. The rule here is that we 
       *	assume 802.3 if the type field is short enough to be a length.
       *	This is normal practice and works for any 'now in use' protocol.
       */
       
 179  unsigned short eth_type_trans(struct sk_buff *skb, struct net_device *dev)
      {
      	struct ethhdr *eth;
      	unsigned char *rawp;
      	
      	skb->mac.raw=skb->data;
      	skb_pull(skb,dev->hard_header_len);
      	eth= skb->mac.ethernet;
      	
 188  	if(*eth->h_dest&1)
      	{
 190  		if(memcmp(eth->h_dest,dev->broadcast, ETH_ALEN)==0)
      			skb->pkt_type=PACKET_BROADCAST;
 192  		else
      			skb->pkt_type=PACKET_MULTICAST;
      	}
      	
      	/*
      	 *	This ALLMULTI check should be redundant by 1.4
      	 *	so don't forget to remove it.
      	 *
      	 *	Seems, you forgot to remove it. All silly devices
      	 *	seems to set IFF_PROMISC.
      	 */
      	 
 204  	else if(1 /*dev->flags&IFF_PROMISC*/)
      	{
 206  		if(memcmp(eth->h_dest,dev->dev_addr, ETH_ALEN))
      			skb->pkt_type=PACKET_OTHERHOST;
      	}
      	
 210  	if (ntohs(eth->h_proto) >= 1536)
 211  		return eth->h_proto;
      		
      	rawp = skb->data;
      	
      	/*
      	 *	This is a magic hack to spot IPX packets. Older Novell breaks
      	 *	the protocol design and runs IPX over 802.3 without an 802.2 LLC
      	 *	layer. We look for FFFF which isn't a used 802.2 SSAP/DSAP. This
      	 *	won't work for fault tolerant netware but does for the rest.
      	 */
 221  	if (*(unsigned short *)rawp == 0xFFFF)
 222  		return htons(ETH_P_802_3);
      		
      	/*
      	 *	Real 802.2 LLC
      	 */
 227  	return htons(ETH_P_802_2);
      }
      
 230  int eth_header_parse(struct sk_buff *skb, unsigned char *haddr)
      {
      	struct ethhdr *eth = skb->mac.ethernet;
      	memcpy(haddr, eth->h_source, ETH_ALEN);
 234  	return ETH_ALEN;
      }
      
 237  int eth_header_cache(struct neighbour *neigh, struct hh_cache *hh)
      {
      	unsigned short type = hh->hh_type;
      	struct ethhdr *eth = (struct ethhdr*)(((u8*)hh->hh_data) + 2);
      	struct net_device *dev = neigh->dev;
      
 243  	if (type == __constant_htons(ETH_P_802_3))
 244  		return -1;
      
      	eth->h_proto = type;
      	memcpy(eth->h_source, dev->dev_addr, dev->addr_len);
      	memcpy(eth->h_dest, neigh->ha, dev->addr_len);
      	hh->hh_len = ETH_HLEN;
 250  	return 0;
      }
      
      /*
       * Called by Address Resolution module to notify changes in address.
       */
      
 257  void eth_header_cache_update(struct hh_cache *hh, struct net_device *dev, unsigned char * haddr)
      {
      	memcpy(((u8*)hh->hh_data) + 2, haddr, dev->addr_len);
      }