[linux.git] / drivers / net / rionet.c

/*
 * rionet - Ethernet driver over RapidIO messaging services
 *
 * Copyright 2005 MontaVista Software, Inc.
 * Matt Porter <[email protected]>
 *
 * 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/module.h>
#include <linux/kernel.h>
#include <linux/dma-mapping.h>
#include <linux/delay.h>
#include <linux/rio.h>
#include <linux/rio_drv.h>
#include <linux/rio_ids.h>

#include <linux/netdevice.h>
#include <linux/etherdevice.h>
#include <linux/skbuff.h>
#include <linux/crc32.h>
#include <linux/ethtool.h>

#define DRV_NAME        "rionet"
#define DRV_VERSION     "0.2"
#define DRV_AUTHOR      "Matt Porter <[email protected]>"
#define DRV_DESC        "Ethernet over RapidIO"

MODULE_AUTHOR(DRV_AUTHOR);
MODULE_DESCRIPTION(DRV_DESC);
MODULE_LICENSE("GPL");

#define RIONET_DEFAULT_MSGLEVEL \
			(NETIF_MSG_DRV          | \
			 NETIF_MSG_LINK         | \
			 NETIF_MSG_RX_ERR       | \
			 NETIF_MSG_TX_ERR)

#define RIONET_DOORBELL_JOIN	0x1000
#define RIONET_DOORBELL_LEAVE	0x1001

#define RIONET_MAILBOX		0

#define RIONET_TX_RING_SIZE	CONFIG_RIONET_TX_SIZE
#define RIONET_RX_RING_SIZE	CONFIG_RIONET_RX_SIZE

static LIST_HEAD(rionet_peers);

struct rionet_private {
	struct rio_mport *mport;
	struct sk_buff *rx_skb[RIONET_RX_RING_SIZE];
	struct sk_buff *tx_skb[RIONET_TX_RING_SIZE];
	int rx_slot;
	int tx_slot;
	int tx_cnt;
	int ack_slot;
	spinlock_t lock;
	spinlock_t tx_lock;
	u32 msg_enable;
};

struct rionet_peer {
	struct list_head node;
	struct rio_dev *rdev;
	struct resource *res;
};

static int rionet_check = 0;
static int rionet_capable = 1;

/*
 * This is a fast lookup table for for translating TX
 * Ethernet packets into a destination RIO device. It
 * could be made into a hash table to save memory depending
 * on system trade-offs.
 */
static struct rio_dev **rionet_active;

#define is_rionet_capable(pef, src_ops, dst_ops)		\
			((pef & RIO_PEF_INB_MBOX) &&		\
			 (pef & RIO_PEF_INB_DOORBELL) &&	\
			 (src_ops & RIO_SRC_OPS_DOORBELL) &&	\
			 (dst_ops & RIO_DST_OPS_DOORBELL))
#define dev_rionet_capable(dev) \
	is_rionet_capable(dev->pef, dev->src_ops, dev->dst_ops)

#define RIONET_MAC_MATCH(x)	(*(u32 *)x == 0x00010001)
#define RIONET_GET_DESTID(x)	(*(u16 *)(x + 4))

static int rionet_rx_clean(struct net_device *ndev)
{
	int i;
	int error = 0;
	struct rionet_private *rnet = netdev_priv(ndev);
	void *data;

	i = rnet->rx_slot;

	do {
		if (!rnet->rx_skb[i])
			continue;

		if (!(data = rio_get_inb_message(rnet->mport, RIONET_MAILBOX)))
			break;

		rnet->rx_skb[i]->data = data;
		skb_put(rnet->rx_skb[i], RIO_MAX_MSG_SIZE);
		rnet->rx_skb[i]->protocol =
		    eth_type_trans(rnet->rx_skb[i], ndev);
		error = netif_rx(rnet->rx_skb[i]);

		if (error == NET_RX_DROP) {
			ndev->stats.rx_dropped++;
		} else if (error == NET_RX_BAD) {
			if (netif_msg_rx_err(rnet))
				printk(KERN_WARNING "%s: bad rx packet\n",
				       DRV_NAME);
			ndev->stats.rx_errors++;
		} else {
			ndev->stats.rx_packets++;
			ndev->stats.rx_bytes += RIO_MAX_MSG_SIZE;
		}

	} while ((i = (i + 1) % RIONET_RX_RING_SIZE) != rnet->rx_slot);

	return i;
}

static void rionet_rx_fill(struct net_device *ndev, int end)
{
	int i;
	struct rionet_private *rnet = netdev_priv(ndev);

	i = rnet->rx_slot;
	do {
		rnet->rx_skb[i] = dev_alloc_skb(RIO_MAX_MSG_SIZE);

		if (!rnet->rx_skb[i])
			break;

		rio_add_inb_buffer(rnet->mport, RIONET_MAILBOX,
				   rnet->rx_skb[i]->data);
	} while ((i = (i + 1) % RIONET_RX_RING_SIZE) != end);

	rnet->rx_slot = i;
}

static int rionet_queue_tx_msg(struct sk_buff *skb, struct net_device *ndev,
			       struct rio_dev *rdev)
{
	struct rionet_private *rnet = netdev_priv(ndev);

	rio_add_outb_message(rnet->mport, rdev, 0, skb->data, skb->len);
	rnet->tx_skb[rnet->tx_slot] = skb;

	ndev->stats.tx_packets++;
	ndev->stats.tx_bytes += skb->len;

	if (++rnet->tx_cnt == RIONET_TX_RING_SIZE)
		netif_stop_queue(ndev);

	++rnet->tx_slot;
	rnet->tx_slot &= (RIONET_TX_RING_SIZE - 1);

	if (netif_msg_tx_queued(rnet))
		printk(KERN_INFO "%s: queued skb %8.8x len %8.8x\n", DRV_NAME,
		       (u32) skb, skb->len);

	return 0;
}

static int rionet_start_xmit(struct sk_buff *skb, struct net_device *ndev)
{
	int i;
	struct rionet_private *rnet = netdev_priv(ndev);
	struct ethhdr *eth = (struct ethhdr *)skb->data;
	u16 destid;
	unsigned long flags;

	local_irq_save(flags);
	if (!spin_trylock(&rnet->tx_lock)) {
		local_irq_restore(flags);
		return NETDEV_TX_LOCKED;
	}

	if ((rnet->tx_cnt + 1) > RIONET_TX_RING_SIZE) {
		netif_stop_queue(ndev);
		spin_unlock_irqrestore(&rnet->tx_lock, flags);
		printk(KERN_ERR "%s: BUG! Tx Ring full when queue awake!\n",
		       ndev->name);
		return NETDEV_TX_BUSY;
	}

	if (eth->h_dest[0] & 0x01) {
		for (i = 0; i < RIO_MAX_ROUTE_ENTRIES(rnet->mport->sys_size);
				i++)
			if (rionet_active[i])
				rionet_queue_tx_msg(skb, ndev,
						    rionet_active[i]);
	} else if (RIONET_MAC_MATCH(eth->h_dest)) {
		destid = RIONET_GET_DESTID(eth->h_dest);
		if (rionet_active[destid])
			rionet_queue_tx_msg(skb, ndev, rionet_active[destid]);
	}

	spin_unlock_irqrestore(&rnet->tx_lock, flags);

	return 0;
}

static void rionet_dbell_event(struct rio_mport *mport, void *dev_id, u16 sid, u16 tid,
			       u16 info)
{
	struct net_device *ndev = dev_id;
	struct rionet_private *rnet = netdev_priv(ndev);
	struct rionet_peer *peer;

	if (netif_msg_intr(rnet))
		printk(KERN_INFO "%s: doorbell sid %4.4x tid %4.4x info %4.4x",
		       DRV_NAME, sid, tid, info);
	if (info == RIONET_DOORBELL_JOIN) {
		if (!rionet_active[sid]) {
			list_for_each_entry(peer, &rionet_peers, node) {
				if (peer->rdev->destid == sid)
					rionet_active[sid] = peer->rdev;
			}
			rio_mport_send_doorbell(mport, sid,
						RIONET_DOORBELL_JOIN);
		}
	} else if (info == RIONET_DOORBELL_LEAVE) {
		rionet_active[sid] = NULL;
	} else {
		if (netif_msg_intr(rnet))
			printk(KERN_WARNING "%s: unhandled doorbell\n",
			       DRV_NAME);
	}
}

static void rionet_inb_msg_event(struct rio_mport *mport, void *dev_id, int mbox, int slot)
{
	int n;
	struct net_device *ndev = dev_id;
	struct rionet_private *rnet = netdev_priv(ndev);

	if (netif_msg_intr(rnet))
		printk(KERN_INFO "%s: inbound message event, mbox %d slot %d\n",
		       DRV_NAME, mbox, slot);

	spin_lock(&rnet->lock);
	if ((n = rionet_rx_clean(ndev)) != rnet->rx_slot)
		rionet_rx_fill(ndev, n);
	spin_unlock(&rnet->lock);
}

static void rionet_outb_msg_event(struct rio_mport *mport, void *dev_id, int mbox, int slot)
{
	struct net_device *ndev = dev_id;
	struct rionet_private *rnet = netdev_priv(ndev);

	spin_lock(&rnet->lock);

	if (netif_msg_intr(rnet))
		printk(KERN_INFO
		       "%s: outbound message event, mbox %d slot %d\n",
		       DRV_NAME, mbox, slot);

	while (rnet->tx_cnt && (rnet->ack_slot != slot)) {
		/* dma unmap single */
		dev_kfree_skb_irq(rnet->tx_skb[rnet->ack_slot]);
		rnet->tx_skb[rnet->ack_slot] = NULL;
		++rnet->ack_slot;
		rnet->ack_slot &= (RIONET_TX_RING_SIZE - 1);
		rnet->tx_cnt--;
	}

	if (rnet->tx_cnt < RIONET_TX_RING_SIZE)
		netif_wake_queue(ndev);

	spin_unlock(&rnet->lock);
}

static int rionet_open(struct net_device *ndev)
{
	int i, rc = 0;
	struct rionet_peer *peer, *tmp;
	u32 pwdcsr;
	struct rionet_private *rnet = netdev_priv(ndev);

	if (netif_msg_ifup(rnet))
		printk(KERN_INFO "%s: open\n", DRV_NAME);

	if ((rc = rio_request_inb_dbell(rnet->mport,
					(void *)ndev,
					RIONET_DOORBELL_JOIN,
					RIONET_DOORBELL_LEAVE,
					rionet_dbell_event)) < 0)
		goto out;

	if ((rc = rio_request_inb_mbox(rnet->mport,
				       (void *)ndev,
				       RIONET_MAILBOX,
				       RIONET_RX_RING_SIZE,
				       rionet_inb_msg_event)) < 0)
		goto out;

	if ((rc = rio_request_outb_mbox(rnet->mport,
					(void *)ndev,
					RIONET_MAILBOX,
					RIONET_TX_RING_SIZE,
					rionet_outb_msg_event)) < 0)
		goto out;

	/* Initialize inbound message ring */
	for (i = 0; i < RIONET_RX_RING_SIZE; i++)
		rnet->rx_skb[i] = NULL;
	rnet->rx_slot = 0;
	rionet_rx_fill(ndev, 0);

	rnet->tx_slot = 0;
	rnet->tx_cnt = 0;
	rnet->ack_slot = 0;

	netif_carrier_on(ndev);
	netif_start_queue(ndev);

	list_for_each_entry_safe(peer, tmp, &rionet_peers, node) {
		if (!(peer->res = rio_request_outb_dbell(peer->rdev,
							 RIONET_DOORBELL_JOIN,
							 RIONET_DOORBELL_LEAVE)))
		{
			printk(KERN_ERR "%s: error requesting doorbells\n",
			       DRV_NAME);
			continue;
		}

		/*
		 * If device has initialized inbound doorbells,
		 * send a join message
		 */
		rio_read_config_32(peer->rdev, RIO_WRITE_PORT_CSR, &pwdcsr);
		if (pwdcsr & RIO_DOORBELL_AVAIL)
			rio_send_doorbell(peer->rdev, RIONET_DOORBELL_JOIN);
	}

      out:
	return rc;
}

static int rionet_close(struct net_device *ndev)
{
	struct rionet_private *rnet = netdev_priv(ndev);
	struct rionet_peer *peer, *tmp;
	int i;

	if (netif_msg_ifup(rnet))
		printk(KERN_INFO "%s: close\n", DRV_NAME);

	netif_stop_queue(ndev);
	netif_carrier_off(ndev);

	for (i = 0; i < RIONET_RX_RING_SIZE; i++)
		if (rnet->rx_skb[i])
			kfree_skb(rnet->rx_skb[i]);

	list_for_each_entry_safe(peer, tmp, &rionet_peers, node) {
		if (rionet_active[peer->rdev->destid]) {
			rio_send_doorbell(peer->rdev, RIONET_DOORBELL_LEAVE);
			rionet_active[peer->rdev->destid] = NULL;
		}
		rio_release_outb_dbell(peer->rdev, peer->res);
	}

	rio_release_inb_dbell(rnet->mport, RIONET_DOORBELL_JOIN,
			      RIONET_DOORBELL_LEAVE);
	rio_release_inb_mbox(rnet->mport, RIONET_MAILBOX);
	rio_release_outb_mbox(rnet->mport, RIONET_MAILBOX);

	return 0;
}

static void rionet_remove(struct rio_dev *rdev)
{
	struct net_device *ndev = NULL;
	struct rionet_peer *peer, *tmp;

	free_pages((unsigned long)rionet_active, rdev->net->hport->sys_size ?
					__ilog2(sizeof(void *)) + 4 : 0);
	unregister_netdev(ndev);
	kfree(ndev);

	list_for_each_entry_safe(peer, tmp, &rionet_peers, node) {
		list_del(&peer->node);
		kfree(peer);
	}
}

static void rionet_get_drvinfo(struct net_device *ndev,
			       struct ethtool_drvinfo *info)
{
	struct rionet_private *rnet = netdev_priv(ndev);

	strcpy(info->driver, DRV_NAME);
	strcpy(info->version, DRV_VERSION);
	strcpy(info->fw_version, "n/a");
	strcpy(info->bus_info, rnet->mport->name);
}

static u32 rionet_get_msglevel(struct net_device *ndev)
{
	struct rionet_private *rnet = netdev_priv(ndev);

	return rnet->msg_enable;
}

static void rionet_set_msglevel(struct net_device *ndev, u32 value)
{
	struct rionet_private *rnet = netdev_priv(ndev);

	rnet->msg_enable = value;
}

static const struct ethtool_ops rionet_ethtool_ops = {
	.get_drvinfo = rionet_get_drvinfo,
	.get_msglevel = rionet_get_msglevel,
	.set_msglevel = rionet_set_msglevel,
	.get_link = ethtool_op_get_link,
};

static int rionet_setup_netdev(struct rio_mport *mport)
{
	int rc = 0;
	struct net_device *ndev = NULL;
	struct rionet_private *rnet;
	u16 device_id;

	/* Allocate our net_device structure */
	ndev = alloc_etherdev(sizeof(struct rionet_private));
	if (ndev == NULL) {
		printk(KERN_INFO "%s: could not allocate ethernet device.\n",
		       DRV_NAME);
		rc = -ENOMEM;
		goto out;
	}

	rionet_active = (struct rio_dev **)__get_free_pages(GFP_KERNEL,
			mport->sys_size ? __ilog2(sizeof(void *)) + 4 : 0);
	if (!rionet_active) {
		rc = -ENOMEM;
		goto out;
	}
	memset((void *)rionet_active, 0, sizeof(void *) *
				RIO_MAX_ROUTE_ENTRIES(mport->sys_size));

	/* Set up private area */
	rnet = netdev_priv(ndev);
	rnet->mport = mport;

	/* Set the default MAC address */
	device_id = rio_local_get_device_id(mport);
	ndev->dev_addr[0] = 0x00;
	ndev->dev_addr[1] = 0x01;
	ndev->dev_addr[2] = 0x00;
	ndev->dev_addr[3] = 0x01;
	ndev->dev_addr[4] = device_id >> 8;
	ndev->dev_addr[5] = device_id & 0xff;

	/* Fill in the driver function table */
	ndev->open = &rionet_open;
	ndev->hard_start_xmit = &rionet_start_xmit;
	ndev->stop = &rionet_close;
	ndev->mtu = RIO_MAX_MSG_SIZE - 14;
	ndev->features = NETIF_F_LLTX;
	SET_ETHTOOL_OPS(ndev, &rionet_ethtool_ops);

	spin_lock_init(&rnet->lock);
	spin_lock_init(&rnet->tx_lock);

	rnet->msg_enable = RIONET_DEFAULT_MSGLEVEL;

	rc = register_netdev(ndev);
	if (rc != 0)
		goto out;

	printk("%s: %s %s Version %s, MAC %pM\n",
	       ndev->name,
	       DRV_NAME,
	       DRV_DESC,
	       DRV_VERSION,
	       ndev->dev_addr);

      out:
	return rc;
}

/*
 * XXX Make multi-net safe
 */
static int rionet_probe(struct rio_dev *rdev, const struct rio_device_id *id)
{
	int rc = -ENODEV;
	u32 lpef, lsrc_ops, ldst_ops;
	struct rionet_peer *peer;

	/* If local device is not rionet capable, give up quickly */
	if (!rionet_capable)
		goto out;

	/*
	 * First time through, make sure local device is rionet
	 * capable, setup netdev,  and set flags so this is skipped
	 * on later probes
	 */
	if (!rionet_check) {
		rio_local_read_config_32(rdev->net->hport, RIO_PEF_CAR, &lpef);
		rio_local_read_config_32(rdev->net->hport, RIO_SRC_OPS_CAR,
					 &lsrc_ops);
		rio_local_read_config_32(rdev->net->hport, RIO_DST_OPS_CAR,
					 &ldst_ops);
		if (!is_rionet_capable(lpef, lsrc_ops, ldst_ops)) {
			printk(KERN_ERR
			       "%s: local device is not network capable\n",
			       DRV_NAME);
			rionet_check = 1;
			rionet_capable = 0;
			goto out;
		}

		rc = rionet_setup_netdev(rdev->net->hport);
		rionet_check = 1;
	}

	/*
	 * If the remote device has mailbox/doorbell capabilities,
	 * add it to the peer list.
	 */
	if (dev_rionet_capable(rdev)) {
		if (!(peer = kmalloc(sizeof(struct rionet_peer), GFP_KERNEL))) {
			rc = -ENOMEM;
			goto out;
		}
		peer->rdev = rdev;
		list_add_tail(&peer->node, &rionet_peers);
	}

      out:
	return rc;
}

static struct rio_device_id rionet_id_table[] = {
	{RIO_DEVICE(RIO_ANY_ID, RIO_ANY_ID)}
};

static struct rio_driver rionet_driver = {
	.name = "rionet",
	.id_table = rionet_id_table,
	.probe = rionet_probe,
	.remove = rionet_remove,
};

static int __init rionet_init(void)
{
	return rio_register_driver(&rionet_driver);
}

static void __exit rionet_exit(void)
{
	rio_unregister_driver(&rionet_driver);
}

module_init(rionet_init);
module_exit(rionet_exit);
Commit	Line	Data
f89efd52 MP	1	/*
	2	* rionet - Ethernet driver over RapidIO messaging services
	3	*
	4	* Copyright 2005 MontaVista Software, Inc.
	5	* Matt Porter <[email protected]>
	6	*
	7	* This program is free software; you can redistribute it and/or modify it
	8	* under the terms of the GNU General Public License as published by the
	9	* Free Software Foundation; either version 2 of the License, or (at your
	10	* option) any later version.
	11	*/
	12
	13	#include <linux/module.h>
	14	#include <linux/kernel.h>
	15	#include <linux/dma-mapping.h>
	16	#include <linux/delay.h>
	17	#include <linux/rio.h>
	18	#include <linux/rio_drv.h>
	19	#include <linux/rio_ids.h>
	20
	21	#include <linux/netdevice.h>
	22	#include <linux/etherdevice.h>
	23	#include <linux/skbuff.h>
	24	#include <linux/crc32.h>
	25	#include <linux/ethtool.h>
	26
	27	#define DRV_NAME "rionet"
	28	#define DRV_VERSION "0.2"
	29	#define DRV_AUTHOR "Matt Porter <[email protected]>"
	30	#define DRV_DESC "Ethernet over RapidIO"
	31
	32	MODULE_AUTHOR(DRV_AUTHOR);
	33	MODULE_DESCRIPTION(DRV_DESC);
	34	MODULE_LICENSE("GPL");
	35
	36	#define RIONET_DEFAULT_MSGLEVEL \
	37	(NETIF_MSG_DRV \| \
	38	NETIF_MSG_LINK \| \
	39	NETIF_MSG_RX_ERR \| \
	40	NETIF_MSG_TX_ERR)
	41
	42	#define RIONET_DOORBELL_JOIN 0x1000
	43	#define RIONET_DOORBELL_LEAVE 0x1001
	44
	45	#define RIONET_MAILBOX 0
	46
	47	#define RIONET_TX_RING_SIZE CONFIG_RIONET_TX_SIZE
	48	#define RIONET_RX_RING_SIZE CONFIG_RIONET_RX_SIZE
	49
	50	static LIST_HEAD(rionet_peers);
	51
	52	struct rionet_private {
	53	struct rio_mport *mport;
	54	struct sk_buff *rx_skb[RIONET_RX_RING_SIZE];
	55	struct sk_buff *tx_skb[RIONET_TX_RING_SIZE];
f89efd52 MP	56	int rx_slot;
	57	int tx_slot;
	58	int tx_cnt;
	59	int ack_slot;
	60	spinlock_t lock;
	61	spinlock_t tx_lock;
	62	u32 msg_enable;
	63	};
	64
	65	struct rionet_peer {
	66	struct list_head node;
	67	struct rio_dev *rdev;
	68	struct resource *res;
	69	};
	70
	71	static int rionet_check = 0;
	72	static int rionet_capable = 1;
	73
	74	/*
	75	* This is a fast lookup table for for translating TX
	76	* Ethernet packets into a destination RIO device. It
	77	* could be made into a hash table to save memory depending
	78	* on system trade-offs.
	79	*/
e0423236	80	static struct rio_dev **rionet_active;
f89efd52 MP	81
	82	#define is_rionet_capable(pef, src_ops, dst_ops) \
	83	((pef & RIO_PEF_INB_MBOX) && \
	84	(pef & RIO_PEF_INB_DOORBELL) && \
	85	(src_ops & RIO_SRC_OPS_DOORBELL) && \
	86	(dst_ops & RIO_DST_OPS_DOORBELL))
	87	#define dev_rionet_capable(dev) \
	88	is_rionet_capable(dev->pef, dev->src_ops, dev->dst_ops)
	89
	90	#define RIONET_MAC_MATCH(x) ((u32 )x == 0x00010001)
	91	#define RIONET_GET_DESTID(x) ((u16 )(x + 4))
	92
f89efd52 MP	93	static int rionet_rx_clean(struct net_device *ndev)
	94	{
	95	int i;
	96	int error = 0;
4cf1653a	97	struct rionet_private *rnet = netdev_priv(ndev);
f89efd52 MP	98	void *data;
	99
	100	i = rnet->rx_slot;
	101
	102	do {
	103	if (!rnet->rx_skb[i])
	104	continue;
	105
	106	if (!(data = rio_get_inb_message(rnet->mport, RIONET_MAILBOX)))
	107	break;
	108
	109	rnet->rx_skb[i]->data = data;
	110	skb_put(rnet->rx_skb[i], RIO_MAX_MSG_SIZE);
f89efd52 MP	111	rnet->rx_skb[i]->protocol =
	112	eth_type_trans(rnet->rx_skb[i], ndev);
	113	error = netif_rx(rnet->rx_skb[i]);
	114
	115	if (error == NET_RX_DROP) {
09f75cd7	116	ndev->stats.rx_dropped++;
f89efd52 MP	117	} else if (error == NET_RX_BAD) {
	118	if (netif_msg_rx_err(rnet))
	119	printk(KERN_WARNING "%s: bad rx packet\n",
	120	DRV_NAME);
09f75cd7	121	ndev->stats.rx_errors++;
f89efd52	122	} else {
09f75cd7 JG	123	ndev->stats.rx_packets++;
09f75cd7 JG	124	ndev->stats.rx_bytes += RIO_MAX_MSG_SIZE;
f89efd52 MP	125	}
	126
	127	} while ((i = (i + 1) % RIONET_RX_RING_SIZE) != rnet->rx_slot);
	128
	129	return i;
	130	}
	131
	132	static void rionet_rx_fill(struct net_device *ndev, int end)
	133	{
	134	int i;
4cf1653a	135	struct rionet_private *rnet = netdev_priv(ndev);
f89efd52 MP	136
	137	i = rnet->rx_slot;
	138	do {
	139	rnet->rx_skb[i] = dev_alloc_skb(RIO_MAX_MSG_SIZE);
	140
	141	if (!rnet->rx_skb[i])
	142	break;
	143
	144	rio_add_inb_buffer(rnet->mport, RIONET_MAILBOX,
	145	rnet->rx_skb[i]->data);
	146	} while ((i = (i + 1) % RIONET_RX_RING_SIZE) != end);
	147
	148	rnet->rx_slot = i;
	149	}
	150
	151	static int rionet_queue_tx_msg(struct sk_buff skb, struct net_device ndev,
	152	struct rio_dev *rdev)
	153	{
4cf1653a	154	struct rionet_private *rnet = netdev_priv(ndev);
f89efd52 MP	155
	156	rio_add_outb_message(rnet->mport, rdev, 0, skb->data, skb->len);
	157	rnet->tx_skb[rnet->tx_slot] = skb;
	158
09f75cd7 JG	159	ndev->stats.tx_packets++;
09f75cd7 JG	160	ndev->stats.tx_bytes += skb->len;
f89efd52 MP	161
	162	if (++rnet->tx_cnt == RIONET_TX_RING_SIZE)
	163	netif_stop_queue(ndev);
	164
	165	++rnet->tx_slot;
	166	rnet->tx_slot &= (RIONET_TX_RING_SIZE - 1);
	167
	168	if (netif_msg_tx_queued(rnet))
	169	printk(KERN_INFO "%s: queued skb %8.8x len %8.8x\n", DRV_NAME,
	170	(u32) skb, skb->len);
	171
	172	return 0;
	173	}
	174
	175	static int rionet_start_xmit(struct sk_buff skb, struct net_device ndev)
	176	{
	177	int i;
4cf1653a	178	struct rionet_private *rnet = netdev_priv(ndev);
f89efd52 MP	179	struct ethhdr eth = (struct ethhdr )skb->data;
	180	u16 destid;
	181	unsigned long flags;
	182
	183	local_irq_save(flags);
	184	if (!spin_trylock(&rnet->tx_lock)) {
	185	local_irq_restore(flags);
	186	return NETDEV_TX_LOCKED;
	187	}
	188
	189	if ((rnet->tx_cnt + 1) > RIONET_TX_RING_SIZE) {
	190	netif_stop_queue(ndev);
	191	spin_unlock_irqrestore(&rnet->tx_lock, flags);
	192	printk(KERN_ERR "%s: BUG! Tx Ring full when queue awake!\n",
	193	ndev->name);
	194	return NETDEV_TX_BUSY;
	195	}
	196
	197	if (eth->h_dest[0] & 0x01) {
e0423236 ZW	198	for (i = 0; i < RIO_MAX_ROUTE_ENTRIES(rnet->mport->sys_size);
e0423236 ZW	199	i++)
f89efd52 MP	200	if (rionet_active[i])
	201	rionet_queue_tx_msg(skb, ndev,
	202	rionet_active[i]);
	203	} else if (RIONET_MAC_MATCH(eth->h_dest)) {
	204	destid = RIONET_GET_DESTID(eth->h_dest);
	205	if (rionet_active[destid])
	206	rionet_queue_tx_msg(skb, ndev, rionet_active[destid]);
	207	}
	208
	209	spin_unlock_irqrestore(&rnet->tx_lock, flags);
	210
	211	return 0;
	212	}
	213
	214	static void rionet_dbell_event(struct rio_mport mport, void dev_id, u16 sid, u16 tid,
	215	u16 info)
	216	{
	217	struct net_device *ndev = dev_id;
4cf1653a	218	struct rionet_private *rnet = netdev_priv(ndev);
f89efd52 MP	219	struct rionet_peer *peer;
	220
	221	if (netif_msg_intr(rnet))
	222	printk(KERN_INFO "%s: doorbell sid %4.4x tid %4.4x info %4.4x",
	223	DRV_NAME, sid, tid, info);
	224	if (info == RIONET_DOORBELL_JOIN) {
	225	if (!rionet_active[sid]) {
	226	list_for_each_entry(peer, &rionet_peers, node) {
	227	if (peer->rdev->destid == sid)
	228	rionet_active[sid] = peer->rdev;
	229	}
	230	rio_mport_send_doorbell(mport, sid,
	231	RIONET_DOORBELL_JOIN);
	232	}
	233	} else if (info == RIONET_DOORBELL_LEAVE) {
	234	rionet_active[sid] = NULL;
	235	} else {
	236	if (netif_msg_intr(rnet))
	237	printk(KERN_WARNING "%s: unhandled doorbell\n",
	238	DRV_NAME);
	239	}
	240	}
	241
	242	static void rionet_inb_msg_event(struct rio_mport mport, void dev_id, int mbox, int slot)
	243	{
	244	int n;
	245	struct net_device *ndev = dev_id;
4cf1653a	246	struct rionet_private *rnet = netdev_priv(ndev);
f89efd52 MP	247
	248	if (netif_msg_intr(rnet))
	249	printk(KERN_INFO "%s: inbound message event, mbox %d slot %d\n",
	250	DRV_NAME, mbox, slot);
	251
	252	spin_lock(&rnet->lock);
	253	if ((n = rionet_rx_clean(ndev)) != rnet->rx_slot)
	254	rionet_rx_fill(ndev, n);
	255	spin_unlock(&rnet->lock);
	256	}
	257
	258	static void rionet_outb_msg_event(struct rio_mport mport, void dev_id, int mbox, int slot)
	259	{
	260	struct net_device *ndev = dev_id;
4cf1653a	261	struct rionet_private *rnet = netdev_priv(ndev);
f89efd52 MP	262
	263	spin_lock(&rnet->lock);
	264
	265	if (netif_msg_intr(rnet))
	266	printk(KERN_INFO
	267	"%s: outbound message event, mbox %d slot %d\n",
	268	DRV_NAME, mbox, slot);
	269
	270	while (rnet->tx_cnt && (rnet->ack_slot != slot)) {
	271	/* dma unmap single */
	272	dev_kfree_skb_irq(rnet->tx_skb[rnet->ack_slot]);
	273	rnet->tx_skb[rnet->ack_slot] = NULL;
	274	++rnet->ack_slot;
	275	rnet->ack_slot &= (RIONET_TX_RING_SIZE - 1);
	276	rnet->tx_cnt--;
	277	}
	278
	279	if (rnet->tx_cnt < RIONET_TX_RING_SIZE)
	280	netif_wake_queue(ndev);
	281
	282	spin_unlock(&rnet->lock);
	283	}
	284
	285	static int rionet_open(struct net_device *ndev)
	286	{
	287	int i, rc = 0;
	288	struct rionet_peer peer, tmp;
	289	u32 pwdcsr;
4cf1653a	290	struct rionet_private *rnet = netdev_priv(ndev);
f89efd52 MP	291
	292	if (netif_msg_ifup(rnet))
	293	printk(KERN_INFO "%s: open\n", DRV_NAME);
	294
	295	if ((rc = rio_request_inb_dbell(rnet->mport,
	296	(void *)ndev,
	297	RIONET_DOORBELL_JOIN,
	298	RIONET_DOORBELL_LEAVE,
	299	rionet_dbell_event)) < 0)
	300	goto out;
	301
	302	if ((rc = rio_request_inb_mbox(rnet->mport,
	303	(void *)ndev,
	304	RIONET_MAILBOX,
	305	RIONET_RX_RING_SIZE,
	306	rionet_inb_msg_event)) < 0)
	307	goto out;
	308
	309	if ((rc = rio_request_outb_mbox(rnet->mport,
	310	(void *)ndev,
	311	RIONET_MAILBOX,
	312	RIONET_TX_RING_SIZE,
	313	rionet_outb_msg_event)) < 0)
	314	goto out;
	315
	316	/* Initialize inbound message ring */
	317	for (i = 0; i < RIONET_RX_RING_SIZE; i++)
	318	rnet->rx_skb[i] = NULL;
	319	rnet->rx_slot = 0;
	320	rionet_rx_fill(ndev, 0);
	321
	322	rnet->tx_slot = 0;
	323	rnet->tx_cnt = 0;
	324	rnet->ack_slot = 0;
	325
	326	netif_carrier_on(ndev);
	327	netif_start_queue(ndev);
	328
	329	list_for_each_entry_safe(peer, tmp, &rionet_peers, node) {
	330	if (!(peer->res = rio_request_outb_dbell(peer->rdev,
	331	RIONET_DOORBELL_JOIN,
	332	RIONET_DOORBELL_LEAVE)))
	333	{
	334	printk(KERN_ERR "%s: error requesting doorbells\n",
	335	DRV_NAME);
	336	continue;
	337	}
	338
	339	/*
	340	* If device has initialized inbound doorbells,
	341	* send a join message
	342	*/
	343	rio_read_config_32(peer->rdev, RIO_WRITE_PORT_CSR, &pwdcsr);
	344	if (pwdcsr & RIO_DOORBELL_AVAIL)
	345	rio_send_doorbell(peer->rdev, RIONET_DOORBELL_JOIN);
	346	}
	347
	348	out:
	349	return rc;
	350	}
	351
	352	static int rionet_close(struct net_device *ndev)
	353	{
4cf1653a	354	struct rionet_private *rnet = netdev_priv(ndev);
f89efd52 MP	355	struct rionet_peer peer, tmp;
	356	int i;
	357
	358	if (netif_msg_ifup(rnet))
	359	printk(KERN_INFO "%s: close\n", DRV_NAME);
	360
	361	netif_stop_queue(ndev);
	362	netif_carrier_off(ndev);
	363
	364	for (i = 0; i < RIONET_RX_RING_SIZE; i++)
	365	if (rnet->rx_skb[i])
	366	kfree_skb(rnet->rx_skb[i]);
	367
	368	list_for_each_entry_safe(peer, tmp, &rionet_peers, node) {
	369	if (rionet_active[peer->rdev->destid]) {
	370	rio_send_doorbell(peer->rdev, RIONET_DOORBELL_LEAVE);
	371	rionet_active[peer->rdev->destid] = NULL;
	372	}
	373	rio_release_outb_dbell(peer->rdev, peer->res);
	374	}
	375
	376	rio_release_inb_dbell(rnet->mport, RIONET_DOORBELL_JOIN,
	377	RIONET_DOORBELL_LEAVE);
	378	rio_release_inb_mbox(rnet->mport, RIONET_MAILBOX);
	379	rio_release_outb_mbox(rnet->mport, RIONET_MAILBOX);
	380
	381	return 0;
	382	}
	383
	384	static void rionet_remove(struct rio_dev *rdev)
	385	{
	386	struct net_device *ndev = NULL;
	387	struct rionet_peer peer, tmp;
	388
e0423236 ZW	389	free_pages((unsigned long)rionet_active, rdev->net->hport->sys_size ?
e0423236 ZW	390	__ilog2(sizeof(void *)) + 4 : 0);
f89efd52 MP	391	unregister_netdev(ndev);
	392	kfree(ndev);
	393
	394	list_for_each_entry_safe(peer, tmp, &rionet_peers, node) {
	395	list_del(&peer->node);
	396	kfree(peer);
	397	}
	398	}
	399
	400	static void rionet_get_drvinfo(struct net_device *ndev,
	401	struct ethtool_drvinfo *info)
	402	{
4cf1653a	403	struct rionet_private *rnet = netdev_priv(ndev);
f89efd52 MP	404
	405	strcpy(info->driver, DRV_NAME);
	406	strcpy(info->version, DRV_VERSION);
	407	strcpy(info->fw_version, "n/a");
	408	strcpy(info->bus_info, rnet->mport->name);
	409	}
	410
	411	static u32 rionet_get_msglevel(struct net_device *ndev)
	412	{
4cf1653a	413	struct rionet_private *rnet = netdev_priv(ndev);
f89efd52 MP	414
	415	return rnet->msg_enable;
	416	}
	417
	418	static void rionet_set_msglevel(struct net_device *ndev, u32 value)
	419	{
4cf1653a	420	struct rionet_private *rnet = netdev_priv(ndev);
f89efd52 MP	421
	422	rnet->msg_enable = value;
	423	}
	424
7282d491	425	static const struct ethtool_ops rionet_ethtool_ops = {
f89efd52 MP	426	.get_drvinfo = rionet_get_drvinfo,
	427	.get_msglevel = rionet_get_msglevel,
	428	.set_msglevel = rionet_set_msglevel,
	429	.get_link = ethtool_op_get_link,
	430	};
	431
	432	static int rionet_setup_netdev(struct rio_mport *mport)
	433	{
	434	int rc = 0;
	435	struct net_device *ndev = NULL;
	436	struct rionet_private *rnet;
	437	u16 device_id;
	438
	439	/* Allocate our net_device structure */
	440	ndev = alloc_etherdev(sizeof(struct rionet_private));
	441	if (ndev == NULL) {
	442	printk(KERN_INFO "%s: could not allocate ethernet device.\n",
	443	DRV_NAME);
	444	rc = -ENOMEM;
	445	goto out;
	446	}
	447
e0423236 ZW	448	rionet_active = (struct rio_dev **)__get_free_pages(GFP_KERNEL,
	449	mport->sys_size ? __ilog2(sizeof(void *)) + 4 : 0);
	450	if (!rionet_active) {
	451	rc = -ENOMEM;
	452	goto out;
	453	}
	454	memset((void )rionet_active, 0, sizeof(void ) *
	455	RIO_MAX_ROUTE_ENTRIES(mport->sys_size));
	456
f89efd52	457	/* Set up private area */
4cf1653a	458	rnet = netdev_priv(ndev);
f89efd52 MP	459	rnet->mport = mport;
	460
	461	/* Set the default MAC address */
	462	device_id = rio_local_get_device_id(mport);
	463	ndev->dev_addr[0] = 0x00;
	464	ndev->dev_addr[1] = 0x01;
	465	ndev->dev_addr[2] = 0x00;
	466	ndev->dev_addr[3] = 0x01;
	467	ndev->dev_addr[4] = device_id >> 8;
	468	ndev->dev_addr[5] = device_id & 0xff;
	469
	470	/* Fill in the driver function table */
	471	ndev->open = &rionet_open;
	472	ndev->hard_start_xmit = &rionet_start_xmit;
	473	ndev->stop = &rionet_close;
f89efd52 MP	474	ndev->mtu = RIO_MAX_MSG_SIZE - 14;
	475	ndev->features = NETIF_F_LLTX;
	476	SET_ETHTOOL_OPS(ndev, &rionet_ethtool_ops);
	477
f89efd52 MP	478	spin_lock_init(&rnet->lock);
	479	spin_lock_init(&rnet->tx_lock);
	480
	481	rnet->msg_enable = RIONET_DEFAULT_MSGLEVEL;
	482
	483	rc = register_netdev(ndev);
	484	if (rc != 0)
	485	goto out;
	486
e174961c	487	printk("%s: %s %s Version %s, MAC %pM\n",
f89efd52 MP	488	ndev->name,
	489	DRV_NAME,
	490	DRV_DESC,
	491	DRV_VERSION,
e174961c	492	ndev->dev_addr);
f89efd52 MP	493
	494	out:
	495	return rc;
	496	}
	497
	498	/*
	499	* XXX Make multi-net safe
	500	*/
	501	static int rionet_probe(struct rio_dev rdev, const struct rio_device_id id)
	502	{
	503	int rc = -ENODEV;
	504	u32 lpef, lsrc_ops, ldst_ops;
	505	struct rionet_peer *peer;
	506
	507	/* If local device is not rionet capable, give up quickly */
	508	if (!rionet_capable)
	509	goto out;
	510
	511	/*
	512	* First time through, make sure local device is rionet
	513	* capable, setup netdev, and set flags so this is skipped
	514	* on later probes
	515	*/
	516	if (!rionet_check) {
	517	rio_local_read_config_32(rdev->net->hport, RIO_PEF_CAR, &lpef);
	518	rio_local_read_config_32(rdev->net->hport, RIO_SRC_OPS_CAR,
	519	&lsrc_ops);
	520	rio_local_read_config_32(rdev->net->hport, RIO_DST_OPS_CAR,
	521	&ldst_ops);
	522	if (!is_rionet_capable(lpef, lsrc_ops, ldst_ops)) {
	523	printk(KERN_ERR
	524	"%s: local device is not network capable\n",
	525	DRV_NAME);
	526	rionet_check = 1;
	527	rionet_capable = 0;
	528	goto out;
	529	}
	530
	531	rc = rionet_setup_netdev(rdev->net->hport);
	532	rionet_check = 1;
	533	}
	534
	535	/*
	536	* If the remote device has mailbox/doorbell capabilities,
	537	* add it to the peer list.
	538	*/
	539	if (dev_rionet_capable(rdev)) {
	540	if (!(peer = kmalloc(sizeof(struct rionet_peer), GFP_KERNEL))) {
	541	rc = -ENOMEM;
	542	goto out;
	543	}
	544	peer->rdev = rdev;
	545	list_add_tail(&peer->node, &rionet_peers);
	546	}
	547
	548	out:
	549	return rc;
	550	}
	551
	552	static struct rio_device_id rionet_id_table[] = {
	553	{RIO_DEVICE(RIO_ANY_ID, RIO_ANY_ID)}
	554	};
	555
	556	static struct rio_driver rionet_driver = {
557	.name = "rionet",
558	.id_table = rionet_id_table,
559	.probe = rionet_probe,
560	.remove = rionet_remove,
561	};
562
563	static int __init rionet_init(void)
564	{
565	return rio_register_driver(&rionet_driver);
566	}
567
568	static void __exit rionet_exit(void)
569	{
570	rio_unregister_driver(&rionet_driver);
571	}
572
573	module_init(rionet_init);
574	module_exit(rionet_exit);