![Mark Asselstine](/assets/img/avatar_default.png)
The use of cli()/sti() within the do/while was a way to ensure interrupts were only disabled for short periods of time while the bulk of the time interrupts were free to occur. The use of the spin lock has eliminated the need to play with interrupts in this way while still allowing for IO to be protected. The remaining 3 sti() calls seem unneeded now that at no other point in the driver is there a call to cli(). Signed-off-by: Mark Asselstine <mark.asselstine@windriver.com> Acked-by: Karsten Keil <kkeil@suse.de> Signed-off-by: Andrew Morton <akpm@linux-foundation.org> Signed-off-by: David S. Miller <davem@davemloft.net>
446 lines
16 KiB
C
446 lines
16 KiB
C
/* $Id: boardergo.c,v 1.5.6.7 2001/11/06 21:58:19 kai Exp $
|
|
*
|
|
* Linux driver for HYSDN cards, specific routines for ergo type boards.
|
|
*
|
|
* Author Werner Cornelius (werner@titro.de) for Hypercope GmbH
|
|
* Copyright 1999 by Werner Cornelius (werner@titro.de)
|
|
*
|
|
* This software may be used and distributed according to the terms
|
|
* of the GNU General Public License, incorporated herein by reference.
|
|
*
|
|
* As all Linux supported cards Champ2, Ergo and Metro2/4 use the same
|
|
* DPRAM interface and layout with only minor differences all related
|
|
* stuff is done here, not in separate modules.
|
|
*
|
|
*/
|
|
|
|
#include <linux/signal.h>
|
|
#include <linux/kernel.h>
|
|
#include <linux/ioport.h>
|
|
#include <linux/interrupt.h>
|
|
#include <linux/vmalloc.h>
|
|
#include <linux/delay.h>
|
|
#include <asm/io.h>
|
|
|
|
#include "hysdn_defs.h"
|
|
#include "boardergo.h"
|
|
|
|
#define byteout(addr,val) outb(val,addr)
|
|
#define bytein(addr) inb(addr)
|
|
|
|
/***************************************************/
|
|
/* The cards interrupt handler. Called from system */
|
|
/***************************************************/
|
|
static irqreturn_t
|
|
ergo_interrupt(int intno, void *dev_id)
|
|
{
|
|
hysdn_card *card = dev_id; /* parameter from irq */
|
|
tErgDpram *dpr;
|
|
unsigned long flags;
|
|
unsigned char volatile b;
|
|
|
|
if (!card)
|
|
return IRQ_NONE; /* error -> spurious interrupt */
|
|
if (!card->irq_enabled)
|
|
return IRQ_NONE; /* other device interrupting or irq switched off */
|
|
|
|
spin_lock_irqsave(&card->hysdn_lock, flags); /* no further irqs allowed */
|
|
|
|
if (!(bytein(card->iobase + PCI9050_INTR_REG) & PCI9050_INTR_REG_STAT1)) {
|
|
spin_unlock_irqrestore(&card->hysdn_lock, flags); /* restore old state */
|
|
return IRQ_NONE; /* no interrupt requested by E1 */
|
|
}
|
|
/* clear any pending ints on the board */
|
|
dpr = card->dpram;
|
|
b = dpr->ToPcInt; /* clear for ergo */
|
|
b |= dpr->ToPcIntMetro; /* same for metro */
|
|
b |= dpr->ToHyInt; /* and for champ */
|
|
|
|
/* start kernel task immediately after leaving all interrupts */
|
|
if (!card->hw_lock)
|
|
schedule_work(&card->irq_queue);
|
|
spin_unlock_irqrestore(&card->hysdn_lock, flags);
|
|
return IRQ_HANDLED;
|
|
} /* ergo_interrupt */
|
|
|
|
/******************************************************************************/
|
|
/* ergo_irq_bh will be called as part of the kernel clearing its shared work */
|
|
/* queue sometime after a call to schedule_work has been made passing our */
|
|
/* work_struct. This task is the only one handling data transfer from or to */
|
|
/* the card after booting. The task may be queued from everywhere */
|
|
/* (interrupts included). */
|
|
/******************************************************************************/
|
|
static void
|
|
ergo_irq_bh(struct work_struct *ugli_api)
|
|
{
|
|
hysdn_card * card = container_of(ugli_api, hysdn_card, irq_queue);
|
|
tErgDpram *dpr;
|
|
int again;
|
|
unsigned long flags;
|
|
|
|
if (card->state != CARD_STATE_RUN)
|
|
return; /* invalid call */
|
|
|
|
dpr = card->dpram; /* point to DPRAM */
|
|
|
|
spin_lock_irqsave(&card->hysdn_lock, flags);
|
|
if (card->hw_lock) {
|
|
spin_unlock_irqrestore(&card->hysdn_lock, flags); /* hardware currently unavailable */
|
|
return;
|
|
}
|
|
card->hw_lock = 1; /* we now lock the hardware */
|
|
|
|
do {
|
|
again = 0; /* assume loop not to be repeated */
|
|
|
|
if (!dpr->ToHyFlag) {
|
|
/* we are able to send a buffer */
|
|
|
|
if (hysdn_sched_tx(card, dpr->ToHyBuf, &dpr->ToHySize, &dpr->ToHyChannel,
|
|
ERG_TO_HY_BUF_SIZE)) {
|
|
dpr->ToHyFlag = 1; /* enable tx */
|
|
again = 1; /* restart loop */
|
|
}
|
|
} /* we are able to send a buffer */
|
|
if (dpr->ToPcFlag) {
|
|
/* a message has arrived for us, handle it */
|
|
|
|
if (hysdn_sched_rx(card, dpr->ToPcBuf, dpr->ToPcSize, dpr->ToPcChannel)) {
|
|
dpr->ToPcFlag = 0; /* we worked the data */
|
|
again = 1; /* restart loop */
|
|
}
|
|
} /* a message has arrived for us */
|
|
if (again) {
|
|
dpr->ToHyInt = 1;
|
|
dpr->ToPcInt = 1; /* interrupt to E1 for all cards */
|
|
} else
|
|
card->hw_lock = 0; /* free hardware again */
|
|
} while (again); /* until nothing more to do */
|
|
|
|
spin_unlock_irqrestore(&card->hysdn_lock, flags);
|
|
} /* ergo_irq_bh */
|
|
|
|
|
|
/*********************************************************/
|
|
/* stop the card (hardware reset) and disable interrupts */
|
|
/*********************************************************/
|
|
static void
|
|
ergo_stopcard(hysdn_card * card)
|
|
{
|
|
unsigned long flags;
|
|
unsigned char val;
|
|
|
|
hysdn_net_release(card); /* first release the net device if existing */
|
|
#ifdef CONFIG_HYSDN_CAPI
|
|
hycapi_capi_stop(card);
|
|
#endif /* CONFIG_HYSDN_CAPI */
|
|
spin_lock_irqsave(&card->hysdn_lock, flags);
|
|
val = bytein(card->iobase + PCI9050_INTR_REG); /* get actual value */
|
|
val &= ~(PCI9050_INTR_REG_ENPCI | PCI9050_INTR_REG_EN1); /* mask irq */
|
|
byteout(card->iobase + PCI9050_INTR_REG, val);
|
|
card->irq_enabled = 0;
|
|
byteout(card->iobase + PCI9050_USER_IO, PCI9050_E1_RESET); /* reset E1 processor */
|
|
card->state = CARD_STATE_UNUSED;
|
|
card->err_log_state = ERRLOG_STATE_OFF; /* currently no log active */
|
|
|
|
spin_unlock_irqrestore(&card->hysdn_lock, flags);
|
|
} /* ergo_stopcard */
|
|
|
|
/**************************************************************************/
|
|
/* enable or disable the cards error log. The event is queued if possible */
|
|
/**************************************************************************/
|
|
static void
|
|
ergo_set_errlog_state(hysdn_card * card, int on)
|
|
{
|
|
unsigned long flags;
|
|
|
|
if (card->state != CARD_STATE_RUN) {
|
|
card->err_log_state = ERRLOG_STATE_OFF; /* must be off */
|
|
return;
|
|
}
|
|
spin_lock_irqsave(&card->hysdn_lock, flags);
|
|
|
|
if (((card->err_log_state == ERRLOG_STATE_OFF) && !on) ||
|
|
((card->err_log_state == ERRLOG_STATE_ON) && on)) {
|
|
spin_unlock_irqrestore(&card->hysdn_lock, flags);
|
|
return; /* nothing to do */
|
|
}
|
|
if (on)
|
|
card->err_log_state = ERRLOG_STATE_START; /* request start */
|
|
else
|
|
card->err_log_state = ERRLOG_STATE_STOP; /* request stop */
|
|
|
|
spin_unlock_irqrestore(&card->hysdn_lock, flags);
|
|
schedule_work(&card->irq_queue);
|
|
} /* ergo_set_errlog_state */
|
|
|
|
/******************************************/
|
|
/* test the cards RAM and return 0 if ok. */
|
|
/******************************************/
|
|
static const char TestText[36] = "This Message is filler, why read it";
|
|
|
|
static int
|
|
ergo_testram(hysdn_card * card)
|
|
{
|
|
tErgDpram *dpr = card->dpram;
|
|
|
|
memset(dpr->TrapTable, 0, sizeof(dpr->TrapTable)); /* clear all Traps */
|
|
dpr->ToHyInt = 1; /* E1 INTR state forced */
|
|
|
|
memcpy(&dpr->ToHyBuf[ERG_TO_HY_BUF_SIZE - sizeof(TestText)], TestText,
|
|
sizeof(TestText));
|
|
if (memcmp(&dpr->ToHyBuf[ERG_TO_HY_BUF_SIZE - sizeof(TestText)], TestText,
|
|
sizeof(TestText)))
|
|
return (-1);
|
|
|
|
memcpy(&dpr->ToPcBuf[ERG_TO_PC_BUF_SIZE - sizeof(TestText)], TestText,
|
|
sizeof(TestText));
|
|
if (memcmp(&dpr->ToPcBuf[ERG_TO_PC_BUF_SIZE - sizeof(TestText)], TestText,
|
|
sizeof(TestText)))
|
|
return (-1);
|
|
|
|
return (0);
|
|
} /* ergo_testram */
|
|
|
|
/*****************************************************************************/
|
|
/* this function is intended to write stage 1 boot image to the cards buffer */
|
|
/* this is done in two steps. First the 1024 hi-words are written (offs=0), */
|
|
/* then the 1024 lo-bytes are written. The remaining DPRAM is cleared, the */
|
|
/* PCI-write-buffers flushed and the card is taken out of reset. */
|
|
/* The function then waits for a reaction of the E1 processor or a timeout. */
|
|
/* Negative return values are interpreted as errors. */
|
|
/*****************************************************************************/
|
|
static int
|
|
ergo_writebootimg(struct HYSDN_CARD *card, unsigned char *buf,
|
|
unsigned long offs)
|
|
{
|
|
unsigned char *dst;
|
|
tErgDpram *dpram;
|
|
int cnt = (BOOT_IMG_SIZE >> 2); /* number of words to move and swap (byte order!) */
|
|
|
|
if (card->debug_flags & LOG_POF_CARD)
|
|
hysdn_addlog(card, "ERGO: write bootldr offs=0x%lx ", offs);
|
|
|
|
dst = card->dpram; /* pointer to start of DPRAM */
|
|
dst += (offs + ERG_DPRAM_FILL_SIZE); /* offset in the DPRAM */
|
|
while (cnt--) {
|
|
*dst++ = *(buf + 1); /* high byte */
|
|
*dst++ = *buf; /* low byte */
|
|
dst += 2; /* point to next longword */
|
|
buf += 2; /* buffer only filled with words */
|
|
}
|
|
|
|
/* if low words (offs = 2) have been written, clear the rest of the DPRAM, */
|
|
/* flush the PCI-write-buffer and take the E1 out of reset */
|
|
if (offs) {
|
|
memset(card->dpram, 0, ERG_DPRAM_FILL_SIZE); /* fill the DPRAM still not cleared */
|
|
dpram = card->dpram; /* get pointer to dpram structure */
|
|
dpram->ToHyNoDpramErrLog = 0xFF; /* write a dpram register */
|
|
while (!dpram->ToHyNoDpramErrLog); /* reread volatile register to flush PCI */
|
|
|
|
byteout(card->iobase + PCI9050_USER_IO, PCI9050_E1_RUN); /* start E1 processor */
|
|
/* the interrupts are still masked */
|
|
|
|
msleep_interruptible(20); /* Timeout 20ms */
|
|
|
|
if (((tDpramBootSpooler *) card->dpram)->Len != DPRAM_SPOOLER_DATA_SIZE) {
|
|
if (card->debug_flags & LOG_POF_CARD)
|
|
hysdn_addlog(card, "ERGO: write bootldr no answer");
|
|
return (-ERR_BOOTIMG_FAIL);
|
|
}
|
|
} /* start_boot_img */
|
|
return (0); /* successful */
|
|
} /* ergo_writebootimg */
|
|
|
|
/********************************************************************************/
|
|
/* ergo_writebootseq writes the buffer containing len bytes to the E1 processor */
|
|
/* using the boot spool mechanism. If everything works fine 0 is returned. In */
|
|
/* case of errors a negative error value is returned. */
|
|
/********************************************************************************/
|
|
static int
|
|
ergo_writebootseq(struct HYSDN_CARD *card, unsigned char *buf, int len)
|
|
{
|
|
tDpramBootSpooler *sp = (tDpramBootSpooler *) card->dpram;
|
|
unsigned char *dst;
|
|
unsigned char buflen;
|
|
int nr_write;
|
|
unsigned char tmp_rdptr;
|
|
unsigned char wr_mirror;
|
|
int i;
|
|
|
|
if (card->debug_flags & LOG_POF_CARD)
|
|
hysdn_addlog(card, "ERGO: write boot seq len=%d ", len);
|
|
|
|
dst = sp->Data; /* point to data in spool structure */
|
|
buflen = sp->Len; /* maximum len of spooled data */
|
|
wr_mirror = sp->WrPtr; /* only once read */
|
|
|
|
/* try until all bytes written or error */
|
|
i = 0x1000; /* timeout value */
|
|
while (len) {
|
|
|
|
/* first determine the number of bytes that may be buffered */
|
|
do {
|
|
tmp_rdptr = sp->RdPtr; /* first read the pointer */
|
|
i--; /* decrement timeout */
|
|
} while (i && (tmp_rdptr != sp->RdPtr)); /* wait for stable pointer */
|
|
|
|
if (!i) {
|
|
if (card->debug_flags & LOG_POF_CARD)
|
|
hysdn_addlog(card, "ERGO: write boot seq timeout");
|
|
return (-ERR_BOOTSEQ_FAIL); /* value not stable -> timeout */
|
|
}
|
|
if ((nr_write = tmp_rdptr - wr_mirror - 1) < 0)
|
|
nr_write += buflen; /* now we got number of free bytes - 1 in buffer */
|
|
|
|
if (!nr_write)
|
|
continue; /* no free bytes in buffer */
|
|
|
|
if (nr_write > len)
|
|
nr_write = len; /* limit if last few bytes */
|
|
i = 0x1000; /* reset timeout value */
|
|
|
|
/* now we know how much bytes we may put in the puffer */
|
|
len -= nr_write; /* we savely could adjust len before output */
|
|
while (nr_write--) {
|
|
*(dst + wr_mirror) = *buf++; /* output one byte */
|
|
if (++wr_mirror >= buflen)
|
|
wr_mirror = 0;
|
|
sp->WrPtr = wr_mirror; /* announce the next byte to E1 */
|
|
} /* while (nr_write) */
|
|
|
|
} /* while (len) */
|
|
return (0);
|
|
} /* ergo_writebootseq */
|
|
|
|
/***********************************************************************************/
|
|
/* ergo_waitpofready waits for a maximum of 10 seconds for the completition of the */
|
|
/* boot process. If the process has been successful 0 is returned otherwise a */
|
|
/* negative error code is returned. */
|
|
/***********************************************************************************/
|
|
static int
|
|
ergo_waitpofready(struct HYSDN_CARD *card)
|
|
{
|
|
tErgDpram *dpr = card->dpram; /* pointer to DPRAM structure */
|
|
int timecnt = 10000 / 50; /* timeout is 10 secs max. */
|
|
unsigned long flags;
|
|
int msg_size;
|
|
int i;
|
|
|
|
if (card->debug_flags & LOG_POF_CARD)
|
|
hysdn_addlog(card, "ERGO: waiting for pof ready");
|
|
while (timecnt--) {
|
|
/* wait until timeout */
|
|
|
|
if (dpr->ToPcFlag) {
|
|
/* data has arrived */
|
|
|
|
if ((dpr->ToPcChannel != CHAN_SYSTEM) ||
|
|
(dpr->ToPcSize < MIN_RDY_MSG_SIZE) ||
|
|
(dpr->ToPcSize > MAX_RDY_MSG_SIZE) ||
|
|
((*(unsigned long *) dpr->ToPcBuf) != RDY_MAGIC))
|
|
break; /* an error occurred */
|
|
|
|
/* Check for additional data delivered during SysReady */
|
|
msg_size = dpr->ToPcSize - RDY_MAGIC_SIZE;
|
|
if (msg_size > 0)
|
|
if (EvalSysrTokData(card, dpr->ToPcBuf + RDY_MAGIC_SIZE, msg_size))
|
|
break;
|
|
|
|
if (card->debug_flags & LOG_POF_RECORD)
|
|
hysdn_addlog(card, "ERGO: pof boot success");
|
|
spin_lock_irqsave(&card->hysdn_lock, flags);
|
|
|
|
card->state = CARD_STATE_RUN; /* now card is running */
|
|
/* enable the cards interrupt */
|
|
byteout(card->iobase + PCI9050_INTR_REG,
|
|
bytein(card->iobase + PCI9050_INTR_REG) |
|
|
(PCI9050_INTR_REG_ENPCI | PCI9050_INTR_REG_EN1));
|
|
card->irq_enabled = 1; /* we are ready to receive interrupts */
|
|
|
|
dpr->ToPcFlag = 0; /* reset data indicator */
|
|
dpr->ToHyInt = 1;
|
|
dpr->ToPcInt = 1; /* interrupt to E1 for all cards */
|
|
|
|
spin_unlock_irqrestore(&card->hysdn_lock, flags);
|
|
if ((hynet_enable & (1 << card->myid))
|
|
&& (i = hysdn_net_create(card)))
|
|
{
|
|
ergo_stopcard(card);
|
|
card->state = CARD_STATE_BOOTERR;
|
|
return (i);
|
|
}
|
|
#ifdef CONFIG_HYSDN_CAPI
|
|
if((i = hycapi_capi_create(card))) {
|
|
printk(KERN_WARNING "HYSDN: failed to create capi-interface.\n");
|
|
}
|
|
#endif /* CONFIG_HYSDN_CAPI */
|
|
return (0); /* success */
|
|
} /* data has arrived */
|
|
msleep_interruptible(50); /* Timeout 50ms */
|
|
} /* wait until timeout */
|
|
|
|
if (card->debug_flags & LOG_POF_CARD)
|
|
hysdn_addlog(card, "ERGO: pof boot ready timeout");
|
|
return (-ERR_POF_TIMEOUT);
|
|
} /* ergo_waitpofready */
|
|
|
|
|
|
|
|
/************************************************************************************/
|
|
/* release the cards hardware. Before releasing do a interrupt disable and hardware */
|
|
/* reset. Also unmap dpram. */
|
|
/* Use only during module release. */
|
|
/************************************************************************************/
|
|
static void
|
|
ergo_releasehardware(hysdn_card * card)
|
|
{
|
|
ergo_stopcard(card); /* first stop the card if not already done */
|
|
free_irq(card->irq, card); /* release interrupt */
|
|
release_region(card->iobase + PCI9050_INTR_REG, 1); /* release all io ports */
|
|
release_region(card->iobase + PCI9050_USER_IO, 1);
|
|
iounmap(card->dpram);
|
|
card->dpram = NULL; /* release shared mem */
|
|
} /* ergo_releasehardware */
|
|
|
|
|
|
/*********************************************************************************/
|
|
/* acquire the needed hardware ports and map dpram. If an error occurs a nonzero */
|
|
/* value is returned. */
|
|
/* Use only during module init. */
|
|
/*********************************************************************************/
|
|
int
|
|
ergo_inithardware(hysdn_card * card)
|
|
{
|
|
if (!request_region(card->iobase + PCI9050_INTR_REG, 1, "HYSDN"))
|
|
return (-1);
|
|
if (!request_region(card->iobase + PCI9050_USER_IO, 1, "HYSDN")) {
|
|
release_region(card->iobase + PCI9050_INTR_REG, 1);
|
|
return (-1); /* ports already in use */
|
|
}
|
|
card->memend = card->membase + ERG_DPRAM_PAGE_SIZE - 1;
|
|
if (!(card->dpram = ioremap(card->membase, ERG_DPRAM_PAGE_SIZE))) {
|
|
release_region(card->iobase + PCI9050_INTR_REG, 1);
|
|
release_region(card->iobase + PCI9050_USER_IO, 1);
|
|
return (-1);
|
|
}
|
|
|
|
ergo_stopcard(card); /* disable interrupts */
|
|
if (request_irq(card->irq, ergo_interrupt, IRQF_SHARED, "HYSDN", card)) {
|
|
ergo_releasehardware(card); /* return the acquired hardware */
|
|
return (-1);
|
|
}
|
|
/* success, now setup the function pointers */
|
|
card->stopcard = ergo_stopcard;
|
|
card->releasehardware = ergo_releasehardware;
|
|
card->testram = ergo_testram;
|
|
card->writebootimg = ergo_writebootimg;
|
|
card->writebootseq = ergo_writebootseq;
|
|
card->waitpofready = ergo_waitpofready;
|
|
card->set_errlog_state = ergo_set_errlog_state;
|
|
INIT_WORK(&card->irq_queue, ergo_irq_bh);
|
|
spin_lock_init(&card->hysdn_lock);
|
|
|
|
return (0);
|
|
} /* ergo_inithardware */
|