[net-next-2.6.git] / drivers / scsi / aacraid / rx.c

/*
 *	Adaptec AAC series RAID controller driver
 *	(c) Copyright 2001 Red Hat Inc.	<alan@redhat.com>
 *
 * based on the old aacraid driver that is..
 * Adaptec aacraid device driver for Linux.
 *
 * Copyright (c) 2000 Adaptec, Inc. (aacraid@adaptec.com)
 *
 * 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, 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.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; see the file COPYING.  If not, write to
 * the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
 *
 * Module Name:
 *  rx.c
 *
 * Abstract: Hardware miniport for Drawbridge specific hardware functions.
 *
 */

#include <linux/kernel.h>
#include <linux/init.h>
#include <linux/types.h>
#include <linux/sched.h>
#include <linux/pci.h>
#include <linux/spinlock.h>
#include <linux/slab.h>
#include <linux/blkdev.h>
#include <linux/delay.h>
#include <linux/completion.h>
#include <linux/time.h>
#include <linux/interrupt.h>
#include <asm/semaphore.h>

#include <scsi/scsi_host.h>

#include "aacraid.h"

static irqreturn_t aac_rx_intr(int irq, void *dev_id)
{
	struct aac_dev *dev = dev_id;

	dprintk((KERN_DEBUG "aac_rx_intr(%d,%p)\n", irq, dev_id));
	if (dev->new_comm_interface) {
		u32 Index = rx_readl(dev, MUnit.OutboundQueue);
		if (Index == 0xFFFFFFFFL)
			Index = rx_readl(dev, MUnit.OutboundQueue);
		if (Index != 0xFFFFFFFFL) {
			do {
				if (aac_intr_normal(dev, Index)) {
					rx_writel(dev, MUnit.OutboundQueue, Index);
					rx_writel(dev, MUnit.ODR, DoorBellAdapterNormRespReady);
				}
				Index = rx_readl(dev, MUnit.OutboundQueue);
			} while (Index != 0xFFFFFFFFL);
			return IRQ_HANDLED;
		}
	} else {
		unsigned long bellbits;
		u8 intstat;
		intstat = rx_readb(dev, MUnit.OISR);
		/*
		 *	Read mask and invert because drawbridge is reversed.
		 *	This allows us to only service interrupts that have 
		 *	been enabled.
		 *	Check to see if this is our interrupt.  If it isn't just return
		 */
		if (intstat & ~(dev->OIMR)) 
		{
			bellbits = rx_readl(dev, OutboundDoorbellReg);
			if (bellbits & DoorBellPrintfReady) {
				aac_printf(dev, readl (&dev->IndexRegs->Mailbox[5]));
				rx_writel(dev, MUnit.ODR,DoorBellPrintfReady);
				rx_writel(dev, InboundDoorbellReg,DoorBellPrintfDone);
			}
			else if (bellbits & DoorBellAdapterNormCmdReady) {
				rx_writel(dev, MUnit.ODR, DoorBellAdapterNormCmdReady);
				aac_command_normal(&dev->queues->queue[HostNormCmdQueue]);
			}
			else if (bellbits & DoorBellAdapterNormRespReady) {
				rx_writel(dev, MUnit.ODR,DoorBellAdapterNormRespReady);
				aac_response_normal(&dev->queues->queue[HostNormRespQueue]);
			}
			else if (bellbits & DoorBellAdapterNormCmdNotFull) {
				rx_writel(dev, MUnit.ODR, DoorBellAdapterNormCmdNotFull);
			}
			else if (bellbits & DoorBellAdapterNormRespNotFull) {
				rx_writel(dev, MUnit.ODR, DoorBellAdapterNormCmdNotFull);
				rx_writel(dev, MUnit.ODR, DoorBellAdapterNormRespNotFull);
			}
			return IRQ_HANDLED;
		}
	}
	return IRQ_NONE;
}

/**
 *	aac_rx_disable_interrupt	-	Disable interrupts
 *	@dev: Adapter
 */

static void aac_rx_disable_interrupt(struct aac_dev *dev)
{
	rx_writeb(dev, MUnit.OIMR, dev->OIMR = 0xff);
}

/**
 *	rx_sync_cmd	-	send a command and wait
 *	@dev: Adapter
 *	@command: Command to execute
 *	@p1: first parameter
 *	@ret: adapter status
 *
 *	This routine will send a synchronous command to the adapter and wait 
 *	for its	completion.
 */

static int rx_sync_cmd(struct aac_dev *dev, u32 command,
	u32 p1, u32 p2, u32 p3, u32 p4, u32 p5, u32 p6,
	u32 *status, u32 * r1, u32 * r2, u32 * r3, u32 * r4)
{
	unsigned long start;
	int ok;
	/*
	 *	Write the command into Mailbox 0
	 */
	writel(command, &dev->IndexRegs->Mailbox[0]);
	/*
	 *	Write the parameters into Mailboxes 1 - 6
	 */
	writel(p1, &dev->IndexRegs->Mailbox[1]);
	writel(p2, &dev->IndexRegs->Mailbox[2]);
	writel(p3, &dev->IndexRegs->Mailbox[3]);
	writel(p4, &dev->IndexRegs->Mailbox[4]);
	/*
	 *	Clear the synch command doorbell to start on a clean slate.
	 */
	rx_writel(dev, OutboundDoorbellReg, OUTBOUNDDOORBELL_0);
	/*
	 *	Disable doorbell interrupts
	 */
	rx_writeb(dev, MUnit.OIMR, dev->OIMR = 0xff);
	/*
	 *	Force the completion of the mask register write before issuing
	 *	the interrupt.
	 */
	rx_readb (dev, MUnit.OIMR);
	/*
	 *	Signal that there is a new synch command
	 */
	rx_writel(dev, InboundDoorbellReg, INBOUNDDOORBELL_0);

	ok = 0;
	start = jiffies;

	/*
	 *	Wait up to 30 seconds
	 */
	while (time_before(jiffies, start+30*HZ)) 
	{
		udelay(5);	/* Delay 5 microseconds to let Mon960 get info. */
		/*
		 *	Mon960 will set doorbell0 bit when it has completed the command.
		 */
		if (rx_readl(dev, OutboundDoorbellReg) & OUTBOUNDDOORBELL_0) {
			/*
			 *	Clear the doorbell.
			 */
			rx_writel(dev, OutboundDoorbellReg, OUTBOUNDDOORBELL_0);
			ok = 1;
			break;
		}
		/*
		 *	Yield the processor in case we are slow 
		 */
		msleep(1);
	}
	if (ok != 1) {
		/*
		 *	Restore interrupt mask even though we timed out
		 */
		if (dev->new_comm_interface)
			rx_writeb(dev, MUnit.OIMR, dev->OIMR = 0xf7);
		else
			rx_writeb(dev, MUnit.OIMR, dev->OIMR = 0xfb);
		return -ETIMEDOUT;
	}
	/*
	 *	Pull the synch status from Mailbox 0.
	 */
	if (status)
		*status = readl(&dev->IndexRegs->Mailbox[0]);
	if (r1)
		*r1 = readl(&dev->IndexRegs->Mailbox[1]);
	if (r2)
		*r2 = readl(&dev->IndexRegs->Mailbox[2]);
	if (r3)
		*r3 = readl(&dev->IndexRegs->Mailbox[3]);
	if (r4)
		*r4 = readl(&dev->IndexRegs->Mailbox[4]);
	/*
	 *	Clear the synch command doorbell.
	 */
	rx_writel(dev, OutboundDoorbellReg, OUTBOUNDDOORBELL_0);
	/*
	 *	Restore interrupt mask
	 */
	if (dev->new_comm_interface)
		rx_writeb(dev, MUnit.OIMR, dev->OIMR = 0xf7);
	else
		rx_writeb(dev, MUnit.OIMR, dev->OIMR = 0xfb);
	return 0;

}

/**
 *	aac_rx_interrupt_adapter	-	interrupt adapter
 *	@dev: Adapter
 *
 *	Send an interrupt to the i960 and breakpoint it.
 */

static void aac_rx_interrupt_adapter(struct aac_dev *dev)
{
	rx_sync_cmd(dev, BREAKPOINT_REQUEST, 0, 0, 0, 0, 0, 0, NULL, NULL, NULL, NULL, NULL);
}

/**
 *	aac_rx_notify_adapter		-	send an event to the adapter
 *	@dev: Adapter
 *	@event: Event to send
 *
 *	Notify the i960 that something it probably cares about has
 *	happened.
 */

static void aac_rx_notify_adapter(struct aac_dev *dev, u32 event)
{
	switch (event) {

	case AdapNormCmdQue:
		rx_writel(dev, MUnit.IDR,INBOUNDDOORBELL_1);
		break;
	case HostNormRespNotFull:
		rx_writel(dev, MUnit.IDR,INBOUNDDOORBELL_4);
		break;
	case AdapNormRespQue:
		rx_writel(dev, MUnit.IDR,INBOUNDDOORBELL_2);
		break;
	case HostNormCmdNotFull:
		rx_writel(dev, MUnit.IDR,INBOUNDDOORBELL_3);
		break;
	case HostShutdown:
		break;
	case FastIo:
		rx_writel(dev, MUnit.IDR,INBOUNDDOORBELL_6);
		break;
	case AdapPrintfDone:
		rx_writel(dev, MUnit.IDR,INBOUNDDOORBELL_5);
		break;
	default:
		BUG();
		break;
	}
}

/**
 *	aac_rx_start_adapter		-	activate adapter
 *	@dev:	Adapter
 *
 *	Start up processing on an i960 based AAC adapter
 */

void aac_rx_start_adapter(struct aac_dev *dev)
{
	struct aac_init *init;

	init = dev->init;
	init->HostElapsedSeconds = cpu_to_le32(get_seconds());
	// We can only use a 32 bit address here
	rx_sync_cmd(dev, INIT_STRUCT_BASE_ADDRESS, (u32)(ulong)dev->init_pa,
	  0, 0, 0, 0, 0, NULL, NULL, NULL, NULL, NULL);
}

/**
 *	aac_rx_check_health
 *	@dev: device to check if healthy
 *
 *	Will attempt to determine if the specified adapter is alive and
 *	capable of handling requests, returning 0 if alive.
 */
static int aac_rx_check_health(struct aac_dev *dev)
{
	u32 status = rx_readl(dev, MUnit.OMRx[0]);

	/*
	 *	Check to see if the board failed any self tests.
	 */
	if (status & SELF_TEST_FAILED)
		return -1;
	/*
	 *	Check to see if the board panic'd.
	 */
	if (status & KERNEL_PANIC) {
		char * buffer;
		struct POSTSTATUS {
			__le32 Post_Command;
			__le32 Post_Address;
		} * post;
		dma_addr_t paddr, baddr;
		int ret;

		if ((status & 0xFF000000L) == 0xBC000000L)
			return (status >> 16) & 0xFF;
		buffer = pci_alloc_consistent(dev->pdev, 512, &baddr);
		ret = -2;
		if (buffer == NULL)
			return ret;
		post = pci_alloc_consistent(dev->pdev,
		  sizeof(struct POSTSTATUS), &paddr);
		if (post == NULL) {
			pci_free_consistent(dev->pdev, 512, buffer, baddr);
			return ret;
		}
		memset(buffer, 0, 512);
		post->Post_Command = cpu_to_le32(COMMAND_POST_RESULTS);
		post->Post_Address = cpu_to_le32(baddr);
		rx_writel(dev, MUnit.IMRx[0], paddr);
		rx_sync_cmd(dev, COMMAND_POST_RESULTS, baddr, 0, 0, 0, 0, 0,
		  NULL, NULL, NULL, NULL, NULL);
		pci_free_consistent(dev->pdev, sizeof(struct POSTSTATUS),
		  post, paddr);
		if ((buffer[0] == '0') && ((buffer[1] == 'x') || (buffer[1] == 'X'))) {
			ret = (buffer[2] <= '9') ? (buffer[2] - '0') : (buffer[2] - 'A' + 10);
			ret <<= 4;
			ret += (buffer[3] <= '9') ? (buffer[3] - '0') : (buffer[3] - 'A' + 10);
		}
		pci_free_consistent(dev->pdev, 512, buffer, baddr);
		return ret;
	}
	/*
	 *	Wait for the adapter to be up and running.
	 */
	if (!(status & KERNEL_UP_AND_RUNNING))
		return -3;
	/*
	 *	Everything is OK
	 */
	return 0;
}

/**
 *	aac_rx_send
 *	@fib: fib to issue
 *
 *	Will send a fib, returning 0 if successful.
 */
static int aac_rx_send(struct fib * fib)
{
	u64 addr = fib->hw_fib_pa;
	struct aac_dev *dev = fib->dev;
	volatile void __iomem *device = dev->regs.rx;
	u32 Index;

	dprintk((KERN_DEBUG "%p->aac_rx_send(%p->%llx)\n", dev, fib, addr));
	Index = rx_readl(dev, MUnit.InboundQueue);
	if (Index == 0xFFFFFFFFL)
		Index = rx_readl(dev, MUnit.InboundQueue);
	dprintk((KERN_DEBUG "Index = 0x%x\n", Index));
	if (Index == 0xFFFFFFFFL)
		return Index;
	device = dev->base + Index;
	dprintk((KERN_DEBUG "entry = %x %x %u\n", (u32)(addr & 0xffffffff),
	  (u32)(addr >> 32), (u32)le16_to_cpu(fib->hw_fib->header.Size)));
	writel((u32)(addr & 0xffffffff), device);
	device += sizeof(u32);
	writel((u32)(addr >> 32), device);
	device += sizeof(u32);
	writel(le16_to_cpu(fib->hw_fib->header.Size), device);
	rx_writel(dev, MUnit.InboundQueue, Index);
	dprintk((KERN_DEBUG "aac_rx_send - return 0\n"));
	return 0;
}

/**
 *	aac_rx_ioremap
 *	@size: mapping resize request
 *
 */
static int aac_rx_ioremap(struct aac_dev * dev, u32 size)
{
	if (!size) {
		iounmap(dev->regs.rx);
		return 0;
	}
	dev->base = dev->regs.rx = ioremap(dev->scsi_host_ptr->base, size);
	if (dev->base == NULL)
		return -1;
	dev->IndexRegs = &dev->regs.rx->IndexRegs;
	return 0;
}

static int aac_rx_restart_adapter(struct aac_dev *dev)
{
	u32 var;

	printk(KERN_ERR "%s%d: adapter kernel panic'd.\n",
			dev->name, dev->id);

	if (aac_rx_check_health(dev) <= 0)
		return 1;
	if (rx_sync_cmd(dev, IOP_RESET, 0, 0, 0, 0, 0, 0,
			&var, NULL, NULL, NULL, NULL))
		return 1;
	if (var != 0x00000001)
		 return 1;
	if (rx_readl(dev, MUnit.OMRx[0]) & KERNEL_PANIC)
		return 1;
	return 0;
}

/**
 *	aac_rx_init	-	initialize an i960 based AAC card
 *	@dev: device to configure
 *
 *	Allocate and set up resources for the i960 based AAC variants. The 
 *	device_interface in the commregion will be allocated and linked 
 *	to the comm region.
 */

int _aac_rx_init(struct aac_dev *dev)
{
	unsigned long start;
	unsigned long status;
	int instance;
	const char * name;

	instance = dev->id;
	name     = dev->name;

	if (aac_adapter_ioremap(dev, dev->base_size)) {
		printk(KERN_WARNING "%s: unable to map adapter.\n", name);
		goto error_iounmap;
	}

	/*
	 *	Check to see if the board panic'd while booting.
	 */
	status = rx_readl(dev, MUnit.OMRx[0]);
	if (status & KERNEL_PANIC)
		if (aac_rx_restart_adapter(dev))
			goto error_iounmap;
	/*
	 *	Check to see if the board failed any self tests.
	 */
	status = rx_readl(dev, MUnit.OMRx[0]);
	if (status & SELF_TEST_FAILED) {
		printk(KERN_ERR "%s%d: adapter self-test failed.\n", dev->name, instance);
		goto error_iounmap;
	}
	/*
	 *	Check to see if the monitor panic'd while booting.
	 */
	if (status & MONITOR_PANIC) {
		printk(KERN_ERR "%s%d: adapter monitor panic.\n", dev->name, instance);
		goto error_iounmap;
	}
	start = jiffies;
	/*
	 *	Wait for the adapter to be up and running. Wait up to 3 minutes
	 */
	while (!((status = rx_readl(dev, MUnit.OMRx[0])) & KERNEL_UP_AND_RUNNING))
	{
		if(time_after(jiffies, start+startup_timeout*HZ))
		{
			printk(KERN_ERR "%s%d: adapter kernel failed to start, init status = %lx.\n", 
					dev->name, instance, status);
			goto error_iounmap;
		}
		msleep(1);
	}
	if (request_irq(dev->scsi_host_ptr->irq, aac_rx_intr, IRQF_SHARED|IRQF_DISABLED, "aacraid", (void *)dev)<0)
	{
		printk(KERN_ERR "%s%d: Interrupt unavailable.\n", name, instance);
		goto error_iounmap;
	}
	/*
	 *	Fill in the function dispatch table.
	 */
	dev->a_ops.adapter_interrupt = aac_rx_interrupt_adapter;
	dev->a_ops.adapter_disable_int = aac_rx_disable_interrupt;
	dev->a_ops.adapter_notify = aac_rx_notify_adapter;
	dev->a_ops.adapter_sync_cmd = rx_sync_cmd;
	dev->a_ops.adapter_check_health = aac_rx_check_health;
	dev->a_ops.adapter_send = aac_rx_send;

	/*
	 *	First clear out all interrupts.  Then enable the one's that we
	 *	can handle.
	 */
	rx_writeb(dev, MUnit.OIMR, 0xff);
	rx_writel(dev, MUnit.ODR, 0xffffffff);
	rx_writeb(dev, MUnit.OIMR, dev->OIMR = 0xfb);

	if (aac_init_adapter(dev) == NULL)
		goto error_irq;
	if (dev->new_comm_interface)
		rx_writeb(dev, MUnit.OIMR, dev->OIMR = 0xf7);

	return 0;

error_irq:
	rx_writeb(dev, MUnit.OIMR, dev->OIMR = 0xff);
	free_irq(dev->scsi_host_ptr->irq, (void *)dev);

error_iounmap:

	return -1;
}

int aac_rx_init(struct aac_dev *dev)
{
	int retval;

	/*
	 *	Fill in the function dispatch table.
	 */
	dev->a_ops.adapter_ioremap = aac_rx_ioremap;

	retval = _aac_rx_init(dev);
	if (!retval) {
		/*
		 *	Tell the adapter that all is configured, and it can
		 * start accepting requests
		 */
		aac_rx_start_adapter(dev);
	}
	return retval;
}
Commit	Line	Data
1da177e4 LT	1	/*
	2	* Adaptec AAC series RAID controller driver
	3	* (c) Copyright 2001 Red Hat Inc. <alan@redhat.com>
	4	*
	5	* based on the old aacraid driver that is..
	6	* Adaptec aacraid device driver for Linux.
	7	*
	8	* Copyright (c) 2000 Adaptec, Inc. (aacraid@adaptec.com)
	9	*
	10	* This program is free software; you can redistribute it and/or modify
	11	* it under the terms of the GNU General Public License as published by
	12	* the Free Software Foundation; either version 2, or (at your option)
	13	* any later version.
	14	*
	15	* This program is distributed in the hope that it will be useful,
	16	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	17	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	18	* GNU General Public License for more details.
	19	*
	20	* You should have received a copy of the GNU General Public License
	21	* along with this program; see the file COPYING. If not, write to
	22	* the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
	23	*
	24	* Module Name:
	25	* rx.c
	26	*
	27	* Abstract: Hardware miniport for Drawbridge specific hardware functions.
	28	*
	29	*/
	30
	31	#include <linux/kernel.h>
	32	#include <linux/init.h>
	33	#include <linux/types.h>
	34	#include <linux/sched.h>
	35	#include <linux/pci.h>
	36	#include <linux/spinlock.h>
	37	#include <linux/slab.h>
	38	#include <linux/blkdev.h>
	39	#include <linux/delay.h>
	40	#include <linux/completion.h>
	41	#include <linux/time.h>
	42	#include <linux/interrupt.h>
	43	#include <asm/semaphore.h>
	44
	45	#include <scsi/scsi_host.h>
	46
	47	#include "aacraid.h"
	48
7d12e780	49	static irqreturn_t aac_rx_intr(int irq, void *dev_id)
1da177e4 LT	50	{
1da177e4 LT	51	struct aac_dev *dev = dev_id;
8e0c5ebd	52
7d12e780	53	dprintk((KERN_DEBUG "aac_rx_intr(%d,%p)\n", irq, dev_id));
8e0c5ebd MH	54	if (dev->new_comm_interface) {
	55	u32 Index = rx_readl(dev, MUnit.OutboundQueue);
	56	if (Index == 0xFFFFFFFFL)
	57	Index = rx_readl(dev, MUnit.OutboundQueue);
	58	if (Index != 0xFFFFFFFFL) {
	59	do {
	60	if (aac_intr_normal(dev, Index)) {
	61	rx_writel(dev, MUnit.OutboundQueue, Index);
	62	rx_writel(dev, MUnit.ODR, DoorBellAdapterNormRespReady);
	63	}
	64	Index = rx_readl(dev, MUnit.OutboundQueue);
	65	} while (Index != 0xFFFFFFFFL);
	66	return IRQ_HANDLED;
1da177e4	67	}
8e0c5ebd MH	68	} else {
	69	unsigned long bellbits;
	70	u8 intstat;
	71	intstat = rx_readb(dev, MUnit.OISR);
	72	/*
	73	* Read mask and invert because drawbridge is reversed.
	74	* This allows us to only service interrupts that have
	75	* been enabled.
	76	* Check to see if this is our interrupt. If it isn't just return
	77	*/
	78	if (intstat & ~(dev->OIMR))
	79	{
	80	bellbits = rx_readl(dev, OutboundDoorbellReg);
	81	if (bellbits & DoorBellPrintfReady) {
76a7f8fd	82	aac_printf(dev, readl (&dev->IndexRegs->Mailbox[5]));
8e0c5ebd MH	83	rx_writel(dev, MUnit.ODR,DoorBellPrintfReady);
	84	rx_writel(dev, InboundDoorbellReg,DoorBellPrintfDone);
	85	}
	86	else if (bellbits & DoorBellAdapterNormCmdReady) {
	87	rx_writel(dev, MUnit.ODR, DoorBellAdapterNormCmdReady);
	88	aac_command_normal(&dev->queues->queue[HostNormCmdQueue]);
	89	}
	90	else if (bellbits & DoorBellAdapterNormRespReady) {
	91	rx_writel(dev, MUnit.ODR,DoorBellAdapterNormRespReady);
	92	aac_response_normal(&dev->queues->queue[HostNormRespQueue]);
	93	}
	94	else if (bellbits & DoorBellAdapterNormCmdNotFull) {
	95	rx_writel(dev, MUnit.ODR, DoorBellAdapterNormCmdNotFull);
	96	}
	97	else if (bellbits & DoorBellAdapterNormRespNotFull) {
	98	rx_writel(dev, MUnit.ODR, DoorBellAdapterNormCmdNotFull);
	99	rx_writel(dev, MUnit.ODR, DoorBellAdapterNormRespNotFull);
	100	}
	101	return IRQ_HANDLED;
1da177e4	102	}
1da177e4 LT	103	}
	104	return IRQ_NONE;
	105	}
	106
bd1aac80 MH	107	/**
	108	* aac_rx_disable_interrupt - Disable interrupts
	109	* @dev: Adapter
	110	*/
	111
	112	static void aac_rx_disable_interrupt(struct aac_dev *dev)
	113	{
	114	rx_writeb(dev, MUnit.OIMR, dev->OIMR = 0xff);
	115	}
	116
1da177e4 LT	117	/**
	118	* rx_sync_cmd - send a command and wait
	119	* @dev: Adapter
	120	* @command: Command to execute
	121	* @p1: first parameter
	122	* @ret: adapter status
	123	*
	124	* This routine will send a synchronous command to the adapter and wait
	125	* for its completion.
	126	*/
	127
7c00ffa3 MH	128	static int rx_sync_cmd(struct aac_dev *dev, u32 command,
	129	u32 p1, u32 p2, u32 p3, u32 p4, u32 p5, u32 p6,
	130	u32 status, u32 r1, u32 * r2, u32 * r3, u32 * r4)
1da177e4 LT	131	{
	132	unsigned long start;
	133	int ok;
	134	/*
	135	* Write the command into Mailbox 0
	136	*/
76a7f8fd	137	writel(command, &dev->IndexRegs->Mailbox[0]);
1da177e4	138	/*
7c00ffa3	139	* Write the parameters into Mailboxes 1 - 6
1da177e4	140	*/
76a7f8fd MH	141	writel(p1, &dev->IndexRegs->Mailbox[1]);
	142	writel(p2, &dev->IndexRegs->Mailbox[2]);
	143	writel(p3, &dev->IndexRegs->Mailbox[3]);
	144	writel(p4, &dev->IndexRegs->Mailbox[4]);
1da177e4 LT	145	/*
	146	* Clear the synch command doorbell to start on a clean slate.
	147	*/
	148	rx_writel(dev, OutboundDoorbellReg, OUTBOUNDDOORBELL_0);
	149	/*
	150	* Disable doorbell interrupts
	151	*/
7c00ffa3	152	rx_writeb(dev, MUnit.OIMR, dev->OIMR = 0xff);
1da177e4 LT	153	/*
	154	* Force the completion of the mask register write before issuing
	155	* the interrupt.
	156	*/
	157	rx_readb (dev, MUnit.OIMR);
	158	/*
	159	* Signal that there is a new synch command
	160	*/
	161	rx_writel(dev, InboundDoorbellReg, INBOUNDDOORBELL_0);
	162
	163	ok = 0;
	164	start = jiffies;
	165
	166	/*
	167	* Wait up to 30 seconds
	168	*/
	169	while (time_before(jiffies, start+30*HZ))
	170	{
	171	udelay(5); /* Delay 5 microseconds to let Mon960 get info. */
	172	/*
	173	* Mon960 will set doorbell0 bit when it has completed the command.
	174	*/
	175	if (rx_readl(dev, OutboundDoorbellReg) & OUTBOUNDDOORBELL_0) {
	176	/*
	177	* Clear the doorbell.
	178	*/
	179	rx_writel(dev, OutboundDoorbellReg, OUTBOUNDDOORBELL_0);
	180	ok = 1;
	181	break;
	182	}
	183	/*
	184	* Yield the processor in case we are slow
	185	*/
1241f359	186	msleep(1);
1da177e4 LT	187	}
	188	if (ok != 1) {
	189	/*
	190	* Restore interrupt mask even though we timed out
	191	*/
8e0c5ebd MH	192	if (dev->new_comm_interface)
	193	rx_writeb(dev, MUnit.OIMR, dev->OIMR = 0xf7);
	194	else
	195	rx_writeb(dev, MUnit.OIMR, dev->OIMR = 0xfb);
1da177e4 LT	196	return -ETIMEDOUT;
	197	}
	198	/*
	199	* Pull the synch status from Mailbox 0.
	200	*/
	201	if (status)
76a7f8fd	202	*status = readl(&dev->IndexRegs->Mailbox[0]);
7c00ffa3	203	if (r1)
76a7f8fd	204	*r1 = readl(&dev->IndexRegs->Mailbox[1]);
7c00ffa3	205	if (r2)
76a7f8fd	206	*r2 = readl(&dev->IndexRegs->Mailbox[2]);
7c00ffa3	207	if (r3)
76a7f8fd	208	*r3 = readl(&dev->IndexRegs->Mailbox[3]);
7c00ffa3	209	if (r4)
76a7f8fd	210	*r4 = readl(&dev->IndexRegs->Mailbox[4]);
1da177e4 LT	211	/*
	212	* Clear the synch command doorbell.
	213	*/
	214	rx_writel(dev, OutboundDoorbellReg, OUTBOUNDDOORBELL_0);
	215	/*
	216	* Restore interrupt mask
	217	*/
8e0c5ebd MH	218	if (dev->new_comm_interface)
	219	rx_writeb(dev, MUnit.OIMR, dev->OIMR = 0xf7);
	220	else
	221	rx_writeb(dev, MUnit.OIMR, dev->OIMR = 0xfb);
1da177e4 LT	222	return 0;
	223
	224	}
	225
	226	/**
	227	* aac_rx_interrupt_adapter - interrupt adapter
	228	* @dev: Adapter
	229	*
	230	* Send an interrupt to the i960 and breakpoint it.
	231	*/
	232
	233	static void aac_rx_interrupt_adapter(struct aac_dev *dev)
	234	{
7c00ffa3	235	rx_sync_cmd(dev, BREAKPOINT_REQUEST, 0, 0, 0, 0, 0, 0, NULL, NULL, NULL, NULL, NULL);
1da177e4 LT	236	}
	237
	238	/**
	239	* aac_rx_notify_adapter - send an event to the adapter
	240	* @dev: Adapter
	241	* @event: Event to send
	242	*
	243	* Notify the i960 that something it probably cares about has
	244	* happened.
	245	*/
	246
	247	static void aac_rx_notify_adapter(struct aac_dev *dev, u32 event)
	248	{
	249	switch (event) {
	250
	251	case AdapNormCmdQue:
	252	rx_writel(dev, MUnit.IDR,INBOUNDDOORBELL_1);
	253	break;
	254	case HostNormRespNotFull:
	255	rx_writel(dev, MUnit.IDR,INBOUNDDOORBELL_4);
	256	break;
	257	case AdapNormRespQue:
	258	rx_writel(dev, MUnit.IDR,INBOUNDDOORBELL_2);
	259	break;
	260	case HostNormCmdNotFull:
	261	rx_writel(dev, MUnit.IDR,INBOUNDDOORBELL_3);
	262	break;
	263	case HostShutdown:
1da177e4 LT	264	break;
	265	case FastIo:
	266	rx_writel(dev, MUnit.IDR,INBOUNDDOORBELL_6);
	267	break;
	268	case AdapPrintfDone:
	269	rx_writel(dev, MUnit.IDR,INBOUNDDOORBELL_5);
	270	break;
	271	default:
	272	BUG();
	273	break;
	274	}
	275	}
	276
	277	/**
	278	* aac_rx_start_adapter - activate adapter
	279	* @dev: Adapter
	280	*
	281	* Start up processing on an i960 based AAC adapter
	282	*/
	283
76a7f8fd	284	void aac_rx_start_adapter(struct aac_dev *dev)
1da177e4	285	{
1da177e4 LT	286	struct aac_init *init;
	287
	288	init = dev->init;
	289	init->HostElapsedSeconds = cpu_to_le32(get_seconds());
1da177e4	290	// We can only use a 32 bit address here
7c00ffa3 MH	291	rx_sync_cmd(dev, INIT_STRUCT_BASE_ADDRESS, (u32)(ulong)dev->init_pa,
7c00ffa3 MH	292	0, 0, 0, 0, 0, NULL, NULL, NULL, NULL, NULL);
1da177e4 LT	293	}
	294
	295	/**
	296	* aac_rx_check_health
	297	* @dev: device to check if healthy
	298	*
	299	* Will attempt to determine if the specified adapter is alive and
	300	* capable of handling requests, returning 0 if alive.
	301	*/
	302	static int aac_rx_check_health(struct aac_dev *dev)
	303	{
	304	u32 status = rx_readl(dev, MUnit.OMRx[0]);
	305
	306	/*
	307	* Check to see if the board failed any self tests.
	308	*/
	309	if (status & SELF_TEST_FAILED)
	310	return -1;
	311	/*
	312	* Check to see if the board panic'd.
	313	*/
	314	if (status & KERNEL_PANIC) {
	315	char * buffer;
	316	struct POSTSTATUS {
56b58712 MH	317	__le32 Post_Command;
56b58712 MH	318	__le32 Post_Address;
1da177e4 LT	319	} * post;
	320	dma_addr_t paddr, baddr;
	321	int ret;
	322
	323	if ((status & 0xFF000000L) == 0xBC000000L)
	324	return (status >> 16) & 0xFF;
	325	buffer = pci_alloc_consistent(dev->pdev, 512, &baddr);
	326	ret = -2;
	327	if (buffer == NULL)
	328	return ret;
	329	post = pci_alloc_consistent(dev->pdev,
	330	sizeof(struct POSTSTATUS), &paddr);
	331	if (post == NULL) {
	332	pci_free_consistent(dev->pdev, 512, buffer, baddr);
	333	return ret;
	334	}
	335	memset(buffer, 0, 512);
	336	post->Post_Command = cpu_to_le32(COMMAND_POST_RESULTS);
	337	post->Post_Address = cpu_to_le32(baddr);
	338	rx_writel(dev, MUnit.IMRx[0], paddr);
7c00ffa3 MH	339	rx_sync_cmd(dev, COMMAND_POST_RESULTS, baddr, 0, 0, 0, 0, 0,
7c00ffa3 MH	340	NULL, NULL, NULL, NULL, NULL);
1da177e4 LT	341	pci_free_consistent(dev->pdev, sizeof(struct POSTSTATUS),
1da177e4 LT	342	post, paddr);
1241f359	343	if ((buffer[0] == '0') && ((buffer[1] == 'x') \|\| (buffer[1] == 'X'))) {
1da177e4 LT	344	ret = (buffer[2] <= '9') ? (buffer[2] - '0') : (buffer[2] - 'A' + 10);
	345	ret <<= 4;
	346	ret += (buffer[3] <= '9') ? (buffer[3] - '0') : (buffer[3] - 'A' + 10);
	347	}
	348	pci_free_consistent(dev->pdev, 512, buffer, baddr);
	349	return ret;
	350	}
	351	/*
	352	* Wait for the adapter to be up and running.
	353	*/
	354	if (!(status & KERNEL_UP_AND_RUNNING))
	355	return -3;
	356	/*
	357	* Everything is OK
	358	*/
	359	return 0;
	360	}
	361
8e0c5ebd MH	362	/**
	363	* aac_rx_send
	364	* @fib: fib to issue
	365	*
	366	* Will send a fib, returning 0 if successful.
	367	*/
	368	static int aac_rx_send(struct fib * fib)
	369	{
	370	u64 addr = fib->hw_fib_pa;
	371	struct aac_dev *dev = fib->dev;
	372	volatile void __iomem *device = dev->regs.rx;
	373	u32 Index;
	374
	375	dprintk((KERN_DEBUG "%p->aac_rx_send(%p->%llx)\n", dev, fib, addr));
	376	Index = rx_readl(dev, MUnit.InboundQueue);
	377	if (Index == 0xFFFFFFFFL)
	378	Index = rx_readl(dev, MUnit.InboundQueue);
	379	dprintk((KERN_DEBUG "Index = 0x%x\n", Index));
	380	if (Index == 0xFFFFFFFFL)
	381	return Index;
76a7f8fd	382	device = dev->base + Index;
8e0c5ebd MH	383	dprintk((KERN_DEBUG "entry = %x %x %u\n", (u32)(addr & 0xffffffff),
	384	(u32)(addr >> 32), (u32)le16_to_cpu(fib->hw_fib->header.Size)));
	385	writel((u32)(addr & 0xffffffff), device);
	386	device += sizeof(u32);
	387	writel((u32)(addr >> 32), device);
	388	device += sizeof(u32);
	389	writel(le16_to_cpu(fib->hw_fib->header.Size), device);
	390	rx_writel(dev, MUnit.InboundQueue, Index);
	391	dprintk((KERN_DEBUG "aac_rx_send - return 0\n"));
	392	return 0;
	393	}
	394
76a7f8fd MH	395	/**
	396	* aac_rx_ioremap
	397	* @size: mapping resize request
	398	*
	399	*/
	400	static int aac_rx_ioremap(struct aac_dev * dev, u32 size)
	401	{
	402	if (!size) {
	403	iounmap(dev->regs.rx);
	404	return 0;
	405	}
	406	dev->base = dev->regs.rx = ioremap(dev->scsi_host_ptr->base, size);
	407	if (dev->base == NULL)
	408	return -1;
	409	dev->IndexRegs = &dev->regs.rx->IndexRegs;
	410	return 0;
	411	}
	412
8c23cd74 MH	413	static int aac_rx_restart_adapter(struct aac_dev *dev)
	414	{
	415	u32 var;
	416
	417	printk(KERN_ERR "%s%d: adapter kernel panic'd.\n",
	418	dev->name, dev->id);
	419
	420	if (aac_rx_check_health(dev) <= 0)
	421	return 1;
	422	if (rx_sync_cmd(dev, IOP_RESET, 0, 0, 0, 0, 0, 0,
	423	&var, NULL, NULL, NULL, NULL))
	424	return 1;
	425	if (var != 0x00000001)
	426	return 1;
	427	if (rx_readl(dev, MUnit.OMRx[0]) & KERNEL_PANIC)
	428	return 1;
	429	return 0;
	430	}
	431
1da177e4 LT	432	/**
	433	* aac_rx_init - initialize an i960 based AAC card
	434	* @dev: device to configure
	435	*
	436	* Allocate and set up resources for the i960 based AAC variants. The
	437	* device_interface in the commregion will be allocated and linked
	438	* to the comm region.
	439	*/
	440
76a7f8fd	441	int _aac_rx_init(struct aac_dev *dev)
1da177e4 LT	442	{
	443	unsigned long start;
	444	unsigned long status;
	445	int instance;
	446	const char * name;
	447
	448	instance = dev->id;
	449	name = dev->name;
	450
76a7f8fd MH	451	if (aac_adapter_ioremap(dev, dev->base_size)) {
	452	printk(KERN_WARNING "%s: unable to map adapter.\n", name);
	453	goto error_iounmap;
	454	}
	455
1da177e4	456	/*
8e0c5ebd	457	* Check to see if the board panic'd while booting.
1da177e4	458	*/
76a7f8fd MH	459	status = rx_readl(dev, MUnit.OMRx[0]);
76a7f8fd MH	460	if (status & KERNEL_PANIC)
8c23cd74 MH	461	if (aac_rx_restart_adapter(dev))
8c23cd74 MH	462	goto error_iounmap;
1da177e4 LT	463	/*
	464	* Check to see if the board failed any self tests.
	465	*/
76a7f8fd MH	466	status = rx_readl(dev, MUnit.OMRx[0]);
76a7f8fd MH	467	if (status & SELF_TEST_FAILED) {
1da177e4 LT	468	printk(KERN_ERR "%s%d: adapter self-test failed.\n", dev->name, instance);
	469	goto error_iounmap;
	470	}
1da177e4 LT	471	/*
	472	* Check to see if the monitor panic'd while booting.
	473	*/
76a7f8fd	474	if (status & MONITOR_PANIC) {
1da177e4 LT	475	printk(KERN_ERR "%s%d: adapter monitor panic.\n", dev->name, instance);
	476	goto error_iounmap;
	477	}
	478	start = jiffies;
	479	/*
	480	* Wait for the adapter to be up and running. Wait up to 3 minutes
	481	*/
76a7f8fd	482	while (!((status = rx_readl(dev, MUnit.OMRx[0])) & KERNEL_UP_AND_RUNNING))
1da177e4	483	{
404d9a90	484	if(time_after(jiffies, start+startup_timeout*HZ))
1da177e4	485	{
1da177e4 LT	486	printk(KERN_ERR "%s%d: adapter kernel failed to start, init status = %lx.\n",
	487	dev->name, instance, status);
	488	goto error_iounmap;
	489	}
404d9a90	490	msleep(1);
1da177e4	491	}
1d6f359a	492	if (request_irq(dev->scsi_host_ptr->irq, aac_rx_intr, IRQF_SHARED\|IRQF_DISABLED, "aacraid", (void *)dev)<0)
1da177e4 LT	493	{
	494	printk(KERN_ERR "%s%d: Interrupt unavailable.\n", name, instance);
	495	goto error_iounmap;
	496	}
	497	/*
	498	* Fill in the function dispatch table.
	499	*/
	500	dev->a_ops.adapter_interrupt = aac_rx_interrupt_adapter;
bd1aac80	501	dev->a_ops.adapter_disable_int = aac_rx_disable_interrupt;
1da177e4 LT	502	dev->a_ops.adapter_notify = aac_rx_notify_adapter;
	503	dev->a_ops.adapter_sync_cmd = rx_sync_cmd;
	504	dev->a_ops.adapter_check_health = aac_rx_check_health;
8e0c5ebd	505	dev->a_ops.adapter_send = aac_rx_send;
1da177e4	506
bd1aac80 MH	507	/*
	508	* First clear out all interrupts. Then enable the one's that we
	509	* can handle.
	510	*/
	511	rx_writeb(dev, MUnit.OIMR, 0xff);
	512	rx_writel(dev, MUnit.ODR, 0xffffffff);
	513	rx_writeb(dev, MUnit.OIMR, dev->OIMR = 0xfb);
	514
1da177e4 LT	515	if (aac_init_adapter(dev) == NULL)
1da177e4 LT	516	goto error_irq;
8e0c5ebd MH	517	if (dev->new_comm_interface)
	518	rx_writeb(dev, MUnit.OIMR, dev->OIMR = 0xf7);
	519
1da177e4 LT	520	return 0;
1da177e4 LT	521
1da177e4	522	error_irq:
bd1aac80	523	rx_writeb(dev, MUnit.OIMR, dev->OIMR = 0xff);
1da177e4 LT	524	free_irq(dev->scsi_host_ptr->irq, (void *)dev);
	525
	526	error_iounmap:
1da177e4 LT	527
	528	return -1;
	529	}
76a7f8fd MH	530
	531	int aac_rx_init(struct aac_dev *dev)
	532	{
	533	int retval;
	534
	535	/*
	536	* Fill in the function dispatch table.
	537	*/
	538	dev->a_ops.adapter_ioremap = aac_rx_ioremap;
	539
	540	retval = _aac_rx_init(dev);
	541	if (!retval) {
	542	/*
	543	* Tell the adapter that all is configured, and it can
	544	* start accepting requests
	545	*/
	546	aac_rx_start_adapter(dev);
	547	}
	548	return retval;
	549	}