[deliverable/linux.git] / drivers / net / fddi / skfp / drvfbi.c

/******************************************************************************
 *
 *	(C)Copyright 1998,1999 SysKonnect,
 *	a business unit of Schneider & Koch & Co. Datensysteme GmbH.
 *
 *	See the file "skfddi.c" for further information.
 *
 *	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.
 *
 *	The information in this file is provided "AS IS" without warranty.
 *
 ******************************************************************************/

/*
 * FBI board dependent Driver for SMT and LLC
 */

#include "h/types.h"
#include "h/fddi.h"
#include "h/smc.h"
#include "h/supern_2.h"
#include "h/skfbiinc.h"
#include <linux/bitrev.h>

#ifndef	lint
static const char ID_sccs[] = "@(#)drvfbi.c	1.63 99/02/11 (C) SK " ;
#endif

/*
 * PCM active state
 */
#define PC8_ACTIVE	8

#define	LED_Y_ON	0x11	/* Used for ring up/down indication */
#define	LED_Y_OFF	0x10


#define MS2BCLK(x)	((x)*12500L)

/*
 * valid configuration values are:
 */

/*
 *	xPOS_ID:xxxx
 *	|	\  /
 *	|	 \/
 *	|	  --------------------- the patched POS_ID of the Adapter
 *	|				xxxx = (Vendor ID low byte,
 *	|					Vendor ID high byte,
 *	|					Device ID low byte,
 *	|					Device ID high byte)
 *	+------------------------------ the patched oem_id must be
 *					'S' for SK or 'I' for IBM
 *					this is a short id for the driver.
 */
#ifndef MULT_OEM
#ifndef	OEM_CONCEPT
const u_char oem_id[] = "xPOS_ID:xxxx" ;
#else	/* OEM_CONCEPT */
const u_char oem_id[] = OEM_ID ;
#endif	/* OEM_CONCEPT */
#define	ID_BYTE0	8
#define	OEMID(smc,i)	oem_id[ID_BYTE0 + i]
#else	/* MULT_OEM */
const struct s_oem_ids oem_ids[] = {
#include "oemids.h"
{0}
};
#define	OEMID(smc,i)	smc->hw.oem_id->oi_id[i]
#endif	/* MULT_OEM */

/* Prototypes of external functions */
#ifdef AIX
extern int AIX_vpdReadByte() ;
#endif


/* Prototype of a local function. */
static void smt_stop_watchdog(struct s_smc *smc);

/*
 * FDDI card reset
 */
static void card_start(struct s_smc *smc)
{
	int i ;
#ifdef	PCI
	u_char	rev_id ;
	u_short word;
#endif

	smt_stop_watchdog(smc) ;

#ifdef	PCI
	/*
	 * make sure no transfer activity is pending
	 */
	outpw(FM_A(FM_MDREG1),FM_MINIT) ;
	outp(ADDR(B0_CTRL), CTRL_HPI_SET) ;
	hwt_wait_time(smc,hwt_quick_read(smc),MS2BCLK(10)) ;
	/*
	 * now reset everything
	 */
	outp(ADDR(B0_CTRL),CTRL_RST_SET) ;	/* reset for all chips */
	i = (int) inp(ADDR(B0_CTRL)) ;		/* do dummy read */
	SK_UNUSED(i) ;				/* Make LINT happy. */
	outp(ADDR(B0_CTRL), CTRL_RST_CLR) ;

	/*
	 * Reset all bits in the PCI STATUS register
	 */
	outp(ADDR(B0_TST_CTRL), TST_CFG_WRITE_ON) ;	/* enable for writes */
	word = inpw(PCI_C(PCI_STATUS)) ;
	outpw(PCI_C(PCI_STATUS), word | PCI_ERRBITS) ;
	outp(ADDR(B0_TST_CTRL), TST_CFG_WRITE_OFF) ;	/* disable writes */

	/*
	 * Release the reset of all the State machines
	 * Release Master_Reset
	 * Release HPI_SM_Reset
	 */
	outp(ADDR(B0_CTRL), CTRL_MRST_CLR|CTRL_HPI_CLR) ;

	/*
	 * determine the adapter type
	 * Note: Do it here, because some drivers may call card_start() once
	 *	 at very first before any other initialization functions is
	 *	 executed.
	 */
	rev_id = inp(PCI_C(PCI_REV_ID)) ;
	if ((rev_id & 0xf0) == SK_ML_ID_1 || (rev_id & 0xf0) == SK_ML_ID_2) {
		smc->hw.hw_is_64bit = TRUE ;
	} else {
		smc->hw.hw_is_64bit = FALSE ;
	}

	/*
	 * Watermark initialization
	 */
	if (!smc->hw.hw_is_64bit) {
		outpd(ADDR(B4_R1_F), RX_WATERMARK) ;
		outpd(ADDR(B5_XA_F), TX_WATERMARK) ;
		outpd(ADDR(B5_XS_F), TX_WATERMARK) ;
	}

	outp(ADDR(B0_CTRL),CTRL_RST_CLR) ;	/* clear the reset chips */
	outp(ADDR(B0_LED),LED_GA_OFF|LED_MY_ON|LED_GB_OFF) ; /* ye LED on */

	/* init the timer value for the watch dog 2,5 minutes */
	outpd(ADDR(B2_WDOG_INI),0x6FC23AC0) ;

	/* initialize the ISR mask */
	smc->hw.is_imask = ISR_MASK ;
	smc->hw.hw_state = STOPPED ;
#endif
	GET_PAGE(0) ;		/* necessary for BOOT */
}

void card_stop(struct s_smc *smc)
{
	smt_stop_watchdog(smc) ;
	smc->hw.mac_ring_is_up = 0 ;		/* ring down */

#ifdef	PCI
	/*
	 * make sure no transfer activity is pending
	 */
	outpw(FM_A(FM_MDREG1),FM_MINIT) ;
	outp(ADDR(B0_CTRL), CTRL_HPI_SET) ;
	hwt_wait_time(smc,hwt_quick_read(smc),MS2BCLK(10)) ;
	/*
	 * now reset everything
	 */
	outp(ADDR(B0_CTRL),CTRL_RST_SET) ;	/* reset for all chips */
	outp(ADDR(B0_CTRL),CTRL_RST_CLR) ;	/* reset for all chips */
	outp(ADDR(B0_LED),LED_GA_OFF|LED_MY_OFF|LED_GB_OFF) ; /* all LEDs off */
	smc->hw.hw_state = STOPPED ;
#endif
}
/*--------------------------- ISR handling ----------------------------------*/

void mac1_irq(struct s_smc *smc, u_short stu, u_short stl)
{
	int	restart_tx = 0 ;
again:

	/*
	 * parity error: note encoding error is not possible in tag mode
	 */
	if (stl & (FM_SPCEPDS  |	/* parity err. syn.q.*/
		   FM_SPCEPDA0 |	/* parity err. a.q.0 */
		   FM_SPCEPDA1)) {	/* parity err. a.q.1 */
		SMT_PANIC(smc,SMT_E0134, SMT_E0134_MSG) ;
	}
	/*
	 * buffer underrun: can only occur if a tx threshold is specified
	 */
	if (stl & (FM_STBURS  |		/* tx buffer underrun syn.q.*/
		   FM_STBURA0 |		/* tx buffer underrun a.q.0 */
		   FM_STBURA1)) {	/* tx buffer underrun a.q.2 */
		SMT_PANIC(smc,SMT_E0133, SMT_E0133_MSG) ;
	}

	if ( (stu & (FM_SXMTABT |		/* transmit abort */
		     FM_STXABRS |		/* syn. tx abort */
		     FM_STXABRA0)) ||		/* asyn. tx abort */
	     (stl & (FM_SQLCKS |		/* lock for syn. q. */
		     FM_SQLCKA0)) ) {		/* lock for asyn. q. */
		formac_tx_restart(smc) ;	/* init tx */
		restart_tx = 1 ;
		stu = inpw(FM_A(FM_ST1U)) ;
		stl = inpw(FM_A(FM_ST1L)) ;
		stu &= ~ (FM_STECFRMA0 | FM_STEFRMA0 | FM_STEFRMS) ;
		if (stu || stl)
			goto again ;
	}

	if (stu & (FM_STEFRMA0 |	/* end of asyn tx */
		    FM_STEFRMS)) {	/* end of sync tx */
		restart_tx = 1 ;
	}

	if (restart_tx)
		llc_restart_tx(smc) ;
}

/*
 * interrupt source= plc1
 * this function is called in nwfbisr.asm
 */
void plc1_irq(struct s_smc *smc)
{
	u_short	st = inpw(PLC(PB,PL_INTR_EVENT)) ;

	plc_irq(smc,PB,st) ;
}

/*
 * interrupt source= plc2
 * this function is called in nwfbisr.asm
 */
void plc2_irq(struct s_smc *smc)
{
	u_short	st = inpw(PLC(PA,PL_INTR_EVENT)) ;

	plc_irq(smc,PA,st) ;
}


/*
 * interrupt source= timer
 */
void timer_irq(struct s_smc *smc)
{
	hwt_restart(smc);
	smc->hw.t_stop = smc->hw.t_start;
	smt_timer_done(smc) ;
}

/*
 * return S-port (PA or PB)
 */
int pcm_get_s_port(struct s_smc *smc)
{
	SK_UNUSED(smc) ;
	return PS;
}

/*
 * Station Label = "FDDI-XYZ" where
 *
 *	X = connector type
 *	Y = PMD type
 *	Z = port type
 */
#define STATION_LABEL_CONNECTOR_OFFSET	5
#define STATION_LABEL_PMD_OFFSET	6
#define STATION_LABEL_PORT_OFFSET	7

void read_address(struct s_smc *smc, u_char *mac_addr)
{
	char ConnectorType ;
	char PmdType ;
	int	i ;

#ifdef	PCI
	for (i = 0; i < 6; i++) {	/* read mac address from board */
		smc->hw.fddi_phys_addr.a[i] =
			bitrev8(inp(ADDR(B2_MAC_0+i)));
	}
#endif

	ConnectorType = inp(ADDR(B2_CONN_TYP)) ;
	PmdType = inp(ADDR(B2_PMD_TYP)) ;

	smc->y[PA].pmd_type[PMD_SK_CONN] =
	smc->y[PB].pmd_type[PMD_SK_CONN] = ConnectorType ;
	smc->y[PA].pmd_type[PMD_SK_PMD ] =
	smc->y[PB].pmd_type[PMD_SK_PMD ] = PmdType ;

	if (mac_addr) {
		for (i = 0; i < 6 ;i++) {
			smc->hw.fddi_canon_addr.a[i] = mac_addr[i] ;
			smc->hw.fddi_home_addr.a[i] = bitrev8(mac_addr[i]);
		}
		return ;
	}
	smc->hw.fddi_home_addr = smc->hw.fddi_phys_addr ;

	for (i = 0; i < 6 ;i++) {
		smc->hw.fddi_canon_addr.a[i] =
			bitrev8(smc->hw.fddi_phys_addr.a[i]);
	}
}

/*
 * FDDI card soft reset
 */
void init_board(struct s_smc *smc, u_char *mac_addr)
{
	card_start(smc) ;
	read_address(smc,mac_addr) ;

	if (!(inp(ADDR(B0_DAS)) & DAS_AVAIL))
		smc->s.sas = SMT_SAS ;	/* Single att. station */
	else
		smc->s.sas = SMT_DAS ;	/* Dual att. station */

	if (!(inp(ADDR(B0_DAS)) & DAS_BYP_ST))
		smc->mib.fddiSMTBypassPresent = 0 ;
		/* without opt. bypass */
	else
		smc->mib.fddiSMTBypassPresent = 1 ;
		/* with opt. bypass */
}

/*
 * insert or deinsert optical bypass (called by ECM)
 */
void sm_pm_bypass_req(struct s_smc *smc, int mode)
{
	DB_ECMN(1,"ECM : sm_pm_bypass_req(%s)\n",(mode == BP_INSERT) ?
					"BP_INSERT" : "BP_DEINSERT",0) ;

	if (smc->s.sas != SMT_DAS)
		return ;

#ifdef	PCI
	switch(mode) {
	case BP_INSERT :
		outp(ADDR(B0_DAS),DAS_BYP_INS) ;	/* insert station */
		break ;
	case BP_DEINSERT :
		outp(ADDR(B0_DAS),DAS_BYP_RMV) ;	/* bypass station */
		break ;
	}
#endif
}

/*
 * check if bypass connected
 */
int sm_pm_bypass_present(struct s_smc *smc)
{
	return (inp(ADDR(B0_DAS)) & DAS_BYP_ST) ? TRUE : FALSE;
}

void plc_clear_irq(struct s_smc *smc, int p)
{
	SK_UNUSED(p) ;

	SK_UNUSED(smc) ;
}


/*
 * led_indication called by rmt_indication() and
 * pcm_state_change()
 *
 * Input:
 *	smc:	SMT context
 *	led_event:
 *	0	Only switch green LEDs according to their respective PCM state
 *	LED_Y_OFF	just switch yellow LED off
 *	LED_Y_ON	just switch yello LED on
 */
static void led_indication(struct s_smc *smc, int led_event)
{
	/* use smc->hw.mac_ring_is_up == TRUE 
	 * as indication for Ring Operational
	 */
	u_short			led_state ;
	struct s_phy		*phy ;
	struct fddi_mib_p	*mib_a ;
	struct fddi_mib_p	*mib_b ;

	phy = &smc->y[PA] ;
	mib_a = phy->mib ;
	phy = &smc->y[PB] ;
	mib_b = phy->mib ;

#ifdef	PCI
        led_state = 0 ;
	
	/* Ring up = yellow led OFF*/
	if (led_event == LED_Y_ON) {
		led_state |= LED_MY_ON ;
	}
	else if (led_event == LED_Y_OFF) {
		led_state |= LED_MY_OFF ;
	}
	else {	/* PCM state changed */
		/* Link at Port A/S = green led A ON */
		if (mib_a->fddiPORTPCMState == PC8_ACTIVE) {	
			led_state |= LED_GA_ON ;
		}
		else {
			led_state |= LED_GA_OFF ;
		}
		
		/* Link at Port B = green led B ON */
		if (mib_b->fddiPORTPCMState == PC8_ACTIVE) {
			led_state |= LED_GB_ON ;
		}
		else {
			led_state |= LED_GB_OFF ;
		}
	}

        outp(ADDR(B0_LED), led_state) ;
#endif	/* PCI */

}


void pcm_state_change(struct s_smc *smc, int plc, int p_state)
{
	/*
	 * the current implementation of pcm_state_change() in the driver
	 * parts must be renamed to drv_pcm_state_change() which will be called
	 * now after led_indication.
	 */
	DRV_PCM_STATE_CHANGE(smc,plc,p_state) ;
	
	led_indication(smc,0) ;
}


void rmt_indication(struct s_smc *smc, int i)
{
	/* Call a driver special function if defined */
	DRV_RMT_INDICATION(smc,i) ;

        led_indication(smc, i ? LED_Y_OFF : LED_Y_ON) ;
}


/*
 * llc_recover_tx called by init_tx (fplus.c)
 */
void llc_recover_tx(struct s_smc *smc)
{
#ifdef	LOAD_GEN
	extern	int load_gen_flag ;

	load_gen_flag = 0 ;
#endif
#ifndef	SYNC
	smc->hw.n_a_send= 0 ;
#else
	SK_UNUSED(smc) ;
#endif
}

#ifdef MULT_OEM
static int is_equal_num(char comp1[], char comp2[], int num)
{
	int i ;

	for (i = 0 ; i < num ; i++) {
		if (comp1[i] != comp2[i])
			return 0;
	}
		return 1;
}	/* is_equal_num */


/*
 * set the OEM ID defaults, and test the contents of the OEM data base
 * The default OEM is the first ACTIVE entry in the OEM data base 
 *
 * returns:	0	success
 *		1	error in data base
 *		2	data base empty
 *		3	no active entry	
 */
int set_oi_id_def(struct s_smc *smc)
{
	int sel_id ;
	int i ;
	int act_entries ;

	i = 0 ;
	sel_id = -1 ;
	act_entries = FALSE ;
	smc->hw.oem_id = 0 ;
	smc->hw.oem_min_status = OI_STAT_ACTIVE ;
	
	/* check OEM data base */
	while (oem_ids[i].oi_status) {
		switch (oem_ids[i].oi_status) {
		case OI_STAT_ACTIVE:
			act_entries = TRUE ;	/* we have active IDs */
			if (sel_id == -1)
				sel_id = i ;	/* save the first active ID */
		case OI_STAT_VALID:
		case OI_STAT_PRESENT:
			i++ ;
			break ;			/* entry ok */
		default:
			return 1;		/* invalid oi_status */
		}
	}

	if (i == 0)
		return 2;
	if (!act_entries)
		return 3;

	/* ok, we have a valid OEM data base with an active entry */
	smc->hw.oem_id = (struct s_oem_ids *)  &oem_ids[sel_id] ;
	return 0;
}
#endif	/* MULT_OEM */

void driver_get_bia(struct s_smc *smc, struct fddi_addr *bia_addr)
{
	int i ;

	for (i = 0 ; i < 6 ; i++)
		bia_addr->a[i] = bitrev8(smc->hw.fddi_phys_addr.a[i]);
}

void smt_start_watchdog(struct s_smc *smc)
{
	SK_UNUSED(smc) ;	/* Make LINT happy. */

#ifndef	DEBUG

#ifdef	PCI
	if (smc->hw.wdog_used) {
		outpw(ADDR(B2_WDOG_CRTL),TIM_START) ;	/* Start timer. */
	}
#endif

#endif	/* DEBUG */
}

static void smt_stop_watchdog(struct s_smc *smc)
{
	SK_UNUSED(smc) ;	/* Make LINT happy. */
#ifndef	DEBUG

#ifdef	PCI
	if (smc->hw.wdog_used) {
		outpw(ADDR(B2_WDOG_CRTL),TIM_STOP) ;	/* Stop timer. */
	}
#endif

#endif	/* DEBUG */
}

#ifdef	PCI

void mac_do_pci_fix(struct s_smc *smc)
{
	SK_UNUSED(smc) ;
}
#endif	/* PCI */
Commit	Line	Data
1da177e4 LT	1	/******************************************************************************
	2	*
	3	* (C)Copyright 1998,1999 SysKonnect,
	4	* a business unit of Schneider & Koch & Co. Datensysteme GmbH.
	5	*
	6	* See the file "skfddi.c" for further information.
	7	*
	8	* This program is free software; you can redistribute it and/or modify
	9	* it under the terms of the GNU General Public License as published by
	10	* the Free Software Foundation; either version 2 of the License, or
	11	* (at your option) any later version.
	12	*
	13	* The information in this file is provided "AS IS" without warranty.
	14	*
	15	******************************************************************************/
	16
	17	/*
	18	* FBI board dependent Driver for SMT and LLC
	19	*/
	20
	21	#include "h/types.h"
	22	#include "h/fddi.h"
	23	#include "h/smc.h"
	24	#include "h/supern_2.h"
	25	#include "h/skfbiinc.h"
bc63eb9c	26	#include <linux/bitrev.h>
1da177e4 LT	27
	28	#ifndef lint
	29	static const char ID_sccs[] = "@(#)drvfbi.c 1.63 99/02/11 (C) SK " ;
	30	#endif
	31
	32	/*
	33	* PCM active state
	34	*/
	35	#define PC8_ACTIVE 8
	36
	37	#define LED_Y_ON 0x11 /* Used for ring up/down indication */
	38	#define LED_Y_OFF 0x10
	39
	40
	41	#define MS2BCLK(x) ((x)*12500L)
	42
	43	/*
	44	* valid configuration values are:
	45	*/
1da177e4 LT	46
	47	/*
	48	* xPOS_ID:xxxx
	49	* \| \ /
	50	* \| \/
	51	* \| --------------------- the patched POS_ID of the Adapter
	52	* \| xxxx = (Vendor ID low byte,
	53	* \| Vendor ID high byte,
	54	* \| Device ID low byte,
	55	* \| Device ID high byte)
	56	* +------------------------------ the patched oem_id must be
	57	* 'S' for SK or 'I' for IBM
	58	* this is a short id for the driver.
	59	*/
	60	#ifndef MULT_OEM
	61	#ifndef OEM_CONCEPT
1da177e4	62	const u_char oem_id[] = "xPOS_ID:xxxx" ;
1da177e4	63	#else /* OEM_CONCEPT */
1da177e4	64	const u_char oem_id[] = OEM_ID ;
1da177e4 LT	65	#endif /* OEM_CONCEPT */
	66	#define ID_BYTE0 8
	67	#define OEMID(smc,i) oem_id[ID_BYTE0 + i]
	68	#else /* MULT_OEM */
	69	const struct s_oem_ids oem_ids[] = {
	70	#include "oemids.h"
	71	{0}
	72	};
	73	#define OEMID(smc,i) smc->hw.oem_id->oi_id[i]
	74	#endif /* MULT_OEM */
	75
	76	/* Prototypes of external functions */
	77	#ifdef AIX
	78	extern int AIX_vpdReadByte() ;
	79	#endif
	80
	81
7aa55fce AB	82	/* Prototype of a local function. */
7aa55fce AB	83	static void smt_stop_watchdog(struct s_smc *smc);
1da177e4	84
1da177e4 LT	85	/*
	86	* FDDI card reset
	87	*/
	88	static void card_start(struct s_smc *smc)
	89	{
	90	int i ;
	91	#ifdef PCI
	92	u_char rev_id ;
	93	u_short word;
	94	#endif
	95
	96	smt_stop_watchdog(smc) ;
	97
1da177e4 LT	98	#ifdef PCI
	99	/*
	100	* make sure no transfer activity is pending
	101	*/
	102	outpw(FM_A(FM_MDREG1),FM_MINIT) ;
	103	outp(ADDR(B0_CTRL), CTRL_HPI_SET) ;
	104	hwt_wait_time(smc,hwt_quick_read(smc),MS2BCLK(10)) ;
	105	/*
	106	* now reset everything
	107	*/
	108	outp(ADDR(B0_CTRL),CTRL_RST_SET) ; /* reset for all chips */
	109	i = (int) inp(ADDR(B0_CTRL)) ; /* do dummy read */
	110	SK_UNUSED(i) ; /* Make LINT happy. */
	111	outp(ADDR(B0_CTRL), CTRL_RST_CLR) ;
	112
	113	/*
	114	* Reset all bits in the PCI STATUS register
	115	*/
	116	outp(ADDR(B0_TST_CTRL), TST_CFG_WRITE_ON) ; /* enable for writes */
	117	word = inpw(PCI_C(PCI_STATUS)) ;
	118	outpw(PCI_C(PCI_STATUS), word \| PCI_ERRBITS) ;
	119	outp(ADDR(B0_TST_CTRL), TST_CFG_WRITE_OFF) ; /* disable writes */
	120
	121	/*
	122	* Release the reset of all the State machines
	123	* Release Master_Reset
	124	* Release HPI_SM_Reset
	125	*/
	126	outp(ADDR(B0_CTRL), CTRL_MRST_CLR\|CTRL_HPI_CLR) ;
	127
	128	/*
	129	* determine the adapter type
	130	* Note: Do it here, because some drivers may call card_start() once
	131	* at very first before any other initialization functions is
	132	* executed.
	133	*/
	134	rev_id = inp(PCI_C(PCI_REV_ID)) ;
	135	if ((rev_id & 0xf0) == SK_ML_ID_1 \|\| (rev_id & 0xf0) == SK_ML_ID_2) {
	136	smc->hw.hw_is_64bit = TRUE ;
	137	} else {
	138	smc->hw.hw_is_64bit = FALSE ;
	139	}
	140
	141	/*
	142	* Watermark initialization
	143	*/
	144	if (!smc->hw.hw_is_64bit) {
	145	outpd(ADDR(B4_R1_F), RX_WATERMARK) ;
	146	outpd(ADDR(B5_XA_F), TX_WATERMARK) ;
	147	outpd(ADDR(B5_XS_F), TX_WATERMARK) ;
	148	}
	149
	150	outp(ADDR(B0_CTRL),CTRL_RST_CLR) ; /* clear the reset chips */
	151	outp(ADDR(B0_LED),LED_GA_OFF\|LED_MY_ON\|LED_GB_OFF) ; /* ye LED on */
	152
	153	/* init the timer value for the watch dog 2,5 minutes */
	154	outpd(ADDR(B2_WDOG_INI),0x6FC23AC0) ;
	155
	156	/* initialize the ISR mask */
	157	smc->hw.is_imask = ISR_MASK ;
	158	smc->hw.hw_state = STOPPED ;
	159	#endif
	160	GET_PAGE(0) ; /* necessary for BOOT */
	161	}
162
163	void card_stop(struct s_smc *smc)
164	{
165	smt_stop_watchdog(smc) ;
166	smc->hw.mac_ring_is_up = 0 ; /* ring down */
af096046	167
1da177e4 LT	168	#ifdef PCI
	169	/*
	170	* make sure no transfer activity is pending
	171	*/
	172	outpw(FM_A(FM_MDREG1),FM_MINIT) ;
	173	outp(ADDR(B0_CTRL), CTRL_HPI_SET) ;
	174	hwt_wait_time(smc,hwt_quick_read(smc),MS2BCLK(10)) ;
	175	/*
	176	* now reset everything
	177	*/
	178	outp(ADDR(B0_CTRL),CTRL_RST_SET) ; /* reset for all chips */
	179	outp(ADDR(B0_CTRL),CTRL_RST_CLR) ; /* reset for all chips */
	180	outp(ADDR(B0_LED),LED_GA_OFF\|LED_MY_OFF\|LED_GB_OFF) ; /* all LEDs off */
	181	smc->hw.hw_state = STOPPED ;
	182	#endif
	183	}
	184	/--------------------------- ISR handling ----------------------------------/
	185
	186	void mac1_irq(struct s_smc *smc, u_short stu, u_short stl)
	187	{
	188	int restart_tx = 0 ;
	189	again:
1da177e4 LT	190
	191	/*
	192	* parity error: note encoding error is not possible in tag mode
	193	*/
	194	if (stl & (FM_SPCEPDS \| /* parity err. syn.q.*/
	195	FM_SPCEPDA0 \| /* parity err. a.q.0 */
	196	FM_SPCEPDA1)) { /* parity err. a.q.1 */
	197	SMT_PANIC(smc,SMT_E0134, SMT_E0134_MSG) ;
	198	}
	199	/*
	200	* buffer underrun: can only occur if a tx threshold is specified
	201	*/
	202	if (stl & (FM_STBURS \| /* tx buffer underrun syn.q.*/
	203	FM_STBURA0 \| /* tx buffer underrun a.q.0 */
	204	FM_STBURA1)) { /* tx buffer underrun a.q.2 */
	205	SMT_PANIC(smc,SMT_E0133, SMT_E0133_MSG) ;
	206	}
	207
	208	if ( (stu & (FM_SXMTABT \| /* transmit abort */
	209	FM_STXABRS \| /* syn. tx abort */
	210	FM_STXABRA0)) \|\| /* asyn. tx abort */
	211	(stl & (FM_SQLCKS \| /* lock for syn. q. */
	212	FM_SQLCKA0)) ) { /* lock for asyn. q. */
	213	formac_tx_restart(smc) ; /* init tx */
	214	restart_tx = 1 ;
	215	stu = inpw(FM_A(FM_ST1U)) ;
	216	stl = inpw(FM_A(FM_ST1L)) ;
	217	stu &= ~ (FM_STECFRMA0 \| FM_STEFRMA0 \| FM_STEFRMS) ;
	218	if (stu \|\| stl)
	219	goto again ;
	220	}
	221
	222	if (stu & (FM_STEFRMA0 \| /* end of asyn tx */
	223	FM_STEFRMS)) { /* end of sync tx */
	224	restart_tx = 1 ;
	225	}
	226
	227	if (restart_tx)
	228	llc_restart_tx(smc) ;
	229	}
af096046	230
1da177e4 LT	231	/*
	232	* interrupt source= plc1
	233	* this function is called in nwfbisr.asm
	234	*/
	235	void plc1_irq(struct s_smc *smc)
	236	{
	237	u_short st = inpw(PLC(PB,PL_INTR_EVENT)) ;
	238
1da177e4 LT	239	plc_irq(smc,PB,st) ;
	240	}
	241
	242	/*
	243	* interrupt source= plc2
	244	* this function is called in nwfbisr.asm
	245	*/
	246	void plc2_irq(struct s_smc *smc)
	247	{
	248	u_short st = inpw(PLC(PA,PL_INTR_EVENT)) ;
	249
1da177e4 LT	250	plc_irq(smc,PA,st) ;
	251	}
	252
	253
	254	/*
	255	* interrupt source= timer
	256	*/
	257	void timer_irq(struct s_smc *smc)
	258	{
	259	hwt_restart(smc);
	260	smc->hw.t_stop = smc->hw.t_start;
	261	smt_timer_done(smc) ;
	262	}
	263
	264	/*
	265	* return S-port (PA or PB)
	266	*/
	267	int pcm_get_s_port(struct s_smc *smc)
	268	{
	269	SK_UNUSED(smc) ;
807540ba	270	return PS;
1da177e4 LT	271	}
	272
	273	/*
	274	* Station Label = "FDDI-XYZ" where
	275	*
	276	* X = connector type
	277	* Y = PMD type
	278	* Z = port type
	279	*/
	280	#define STATION_LABEL_CONNECTOR_OFFSET 5
	281	#define STATION_LABEL_PMD_OFFSET 6
	282	#define STATION_LABEL_PORT_OFFSET 7
	283
	284	void read_address(struct s_smc smc, u_char mac_addr)
	285	{
	286	char ConnectorType ;
	287	char PmdType ;
	288	int i ;
	289
1da177e4 LT	290	#ifdef PCI
	291	for (i = 0; i < 6; i++) { /* read mac address from board */
	292	smc->hw.fddi_phys_addr.a[i] =
bc63eb9c	293	bitrev8(inp(ADDR(B2_MAC_0+i)));
1da177e4 LT	294	}
1da177e4 LT	295	#endif
af096046	296
1da177e4 LT	297	ConnectorType = inp(ADDR(B2_CONN_TYP)) ;
1da177e4 LT	298	PmdType = inp(ADDR(B2_PMD_TYP)) ;
1da177e4 LT	299
	300	smc->y[PA].pmd_type[PMD_SK_CONN] =
	301	smc->y[PB].pmd_type[PMD_SK_CONN] = ConnectorType ;
	302	smc->y[PA].pmd_type[PMD_SK_PMD ] =
	303	smc->y[PB].pmd_type[PMD_SK_PMD ] = PmdType ;
	304
	305	if (mac_addr) {
	306	for (i = 0; i < 6 ;i++) {
	307	smc->hw.fddi_canon_addr.a[i] = mac_addr[i] ;
bc63eb9c	308	smc->hw.fddi_home_addr.a[i] = bitrev8(mac_addr[i]);
1da177e4 LT	309	}
	310	return ;
	311	}
	312	smc->hw.fddi_home_addr = smc->hw.fddi_phys_addr ;
	313
	314	for (i = 0; i < 6 ;i++) {
	315	smc->hw.fddi_canon_addr.a[i] =
bc63eb9c	316	bitrev8(smc->hw.fddi_phys_addr.a[i]);
1da177e4 LT	317	}
	318	}
	319
	320	/*
	321	* FDDI card soft reset
	322	*/
	323	void init_board(struct s_smc smc, u_char mac_addr)
	324	{
	325	card_start(smc) ;
	326	read_address(smc,mac_addr) ;
	327
1da177e4	328	if (!(inp(ADDR(B0_DAS)) & DAS_AVAIL))
1da177e4 LT	329	smc->s.sas = SMT_SAS ; /* Single att. station */
	330	else
	331	smc->s.sas = SMT_DAS ; /* Dual att. station */
	332
1da177e4	333	if (!(inp(ADDR(B0_DAS)) & DAS_BYP_ST))
1da177e4 LT	334	smc->mib.fddiSMTBypassPresent = 0 ;
	335	/* without opt. bypass */
	336	else
	337	smc->mib.fddiSMTBypassPresent = 1 ;
	338	/* with opt. bypass */
	339	}
	340
	341	/*
	342	* insert or deinsert optical bypass (called by ECM)
	343	*/
	344	void sm_pm_bypass_req(struct s_smc *smc, int mode)
	345	{
1da177e4 LT	346	DB_ECMN(1,"ECM : sm_pm_bypass_req(%s)\n",(mode == BP_INSERT) ?
	347	"BP_INSERT" : "BP_DEINSERT",0) ;
	348
	349	if (smc->s.sas != SMT_DAS)
	350	return ;
	351
1da177e4 LT	352	#ifdef PCI
	353	switch(mode) {
	354	case BP_INSERT :
	355	outp(ADDR(B0_DAS),DAS_BYP_INS) ; /* insert station */
	356	break ;
	357	case BP_DEINSERT :
	358	outp(ADDR(B0_DAS),DAS_BYP_RMV) ; /* bypass station */
	359	break ;
	360	}
	361	#endif
	362	}
	363
	364	/*
	365	* check if bypass connected
	366	*/
	367	int sm_pm_bypass_present(struct s_smc *smc)
	368	{
807540ba	369	return (inp(ADDR(B0_DAS)) & DAS_BYP_ST) ? TRUE : FALSE;
1da177e4 LT	370	}
	371
	372	void plc_clear_irq(struct s_smc *smc, int p)
	373	{
	374	SK_UNUSED(p) ;
	375
1da177e4	376	SK_UNUSED(smc) ;
1da177e4 LT	377	}
	378
	379
	380	/*
	381	* led_indication called by rmt_indication() and
	382	* pcm_state_change()
	383	*
	384	* Input:
	385	* smc: SMT context
	386	* led_event:
	387	* 0 Only switch green LEDs according to their respective PCM state
	388	* LED_Y_OFF just switch yellow LED off
	389	* LED_Y_ON just switch yello LED on
	390	*/
7aa55fce	391	static void led_indication(struct s_smc *smc, int led_event)
1da177e4 LT	392	{
	393	/* use smc->hw.mac_ring_is_up == TRUE
	394	* as indication for Ring Operational
	395	*/
	396	u_short led_state ;
	397	struct s_phy *phy ;
	398	struct fddi_mib_p *mib_a ;
	399	struct fddi_mib_p *mib_b ;
	400
	401	phy = &smc->y[PA] ;
	402	mib_a = phy->mib ;
	403	phy = &smc->y[PB] ;
	404	mib_b = phy->mib ;
	405
1da177e4 LT	406	#ifdef PCI
	407	led_state = 0 ;
	408
	409	/* Ring up = yellow led OFF*/
	410	if (led_event == LED_Y_ON) {
	411	led_state \|= LED_MY_ON ;
	412	}
	413	else if (led_event == LED_Y_OFF) {
	414	led_state \|= LED_MY_OFF ;
	415	}
	416	else { /* PCM state changed */
	417	/* Link at Port A/S = green led A ON */
	418	if (mib_a->fddiPORTPCMState == PC8_ACTIVE) {
	419	led_state \|= LED_GA_ON ;
	420	}
	421	else {
	422	led_state \|= LED_GA_OFF ;
	423	}
	424
	425	/* Link at Port B = green led B ON */
	426	if (mib_b->fddiPORTPCMState == PC8_ACTIVE) {
	427	led_state \|= LED_GB_ON ;
	428	}
	429	else {
	430	led_state \|= LED_GB_OFF ;
	431	}
	432	}
	433
	434	outp(ADDR(B0_LED), led_state) ;
	435	#endif /* PCI */
	436
	437	}
	438
	439
	440	void pcm_state_change(struct s_smc *smc, int plc, int p_state)
	441	{
	442	/*
	443	* the current implementation of pcm_state_change() in the driver
	444	* parts must be renamed to drv_pcm_state_change() which will be called
	445	* now after led_indication.
	446	*/
	447	DRV_PCM_STATE_CHANGE(smc,plc,p_state) ;
	448
	449	led_indication(smc,0) ;
	450	}
	451
	452
	453	void rmt_indication(struct s_smc *smc, int i)
	454	{
	455	/* Call a driver special function if defined */
	456	DRV_RMT_INDICATION(smc,i) ;
	457
	458	led_indication(smc, i ? LED_Y_OFF : LED_Y_ON) ;
	459	}
	460
	461
	462	/*
	463	* llc_recover_tx called by init_tx (fplus.c)
	464	*/
	465	void llc_recover_tx(struct s_smc *smc)
	466	{
	467	#ifdef LOAD_GEN
	468	extern int load_gen_flag ;
	469
470	load_gen_flag = 0 ;
471	#endif
472	#ifndef SYNC
473	smc->hw.n_a_send= 0 ;
474	#else
475	SK_UNUSED(smc) ;
476	#endif
477	}
478
1da177e4 LT	479	#ifdef MULT_OEM
	480	static int is_equal_num(char comp1[], char comp2[], int num)
	481	{
	482	int i ;
	483
	484	for (i = 0 ; i < num ; i++) {
	485	if (comp1[i] != comp2[i])
807540ba	486	return 0;
1da177e4	487	}
807540ba	488	return 1;
1da177e4 LT	489	} /* is_equal_num */
	490
	491
	492	/*
	493	* set the OEM ID defaults, and test the contents of the OEM data base
	494	* The default OEM is the first ACTIVE entry in the OEM data base
	495	*
	496	* returns: 0 success
	497	* 1 error in data base
	498	* 2 data base empty
	499	* 3 no active entry
	500	*/
	501	int set_oi_id_def(struct s_smc *smc)
	502	{
	503	int sel_id ;
	504	int i ;
	505	int act_entries ;
	506
	507	i = 0 ;
	508	sel_id = -1 ;
	509	act_entries = FALSE ;
	510	smc->hw.oem_id = 0 ;
	511	smc->hw.oem_min_status = OI_STAT_ACTIVE ;
	512
	513	/* check OEM data base */
	514	while (oem_ids[i].oi_status) {
	515	switch (oem_ids[i].oi_status) {
	516	case OI_STAT_ACTIVE:
	517	act_entries = TRUE ; /* we have active IDs */
	518	if (sel_id == -1)
	519	sel_id = i ; /* save the first active ID */
	520	case OI_STAT_VALID:
	521	case OI_STAT_PRESENT:
	522	i++ ;
	523	break ; /* entry ok */
	524	default:
807540ba	525	return 1; /* invalid oi_status */
1da177e4 LT	526	}
	527	}
	528
	529	if (i == 0)
807540ba	530	return 2;
1da177e4	531	if (!act_entries)
807540ba	532	return 3;
1da177e4 LT	533
	534	/* ok, we have a valid OEM data base with an active entry */
	535	smc->hw.oem_id = (struct s_oem_ids *) &oem_ids[sel_id] ;
807540ba	536	return 0;
1da177e4 LT	537	}
	538	#endif /* MULT_OEM */
	539
1da177e4 LT	540	void driver_get_bia(struct s_smc smc, struct fddi_addr bia_addr)
	541	{
	542	int i ;
	543
bc63eb9c AM	544	for (i = 0 ; i < 6 ; i++)
bc63eb9c AM	545	bia_addr->a[i] = bitrev8(smc->hw.fddi_phys_addr.a[i]);
1da177e4 LT	546	}
	547
	548	void smt_start_watchdog(struct s_smc *smc)
	549	{
	550	SK_UNUSED(smc) ; /* Make LINT happy. */
	551
	552	#ifndef DEBUG
	553
	554	#ifdef PCI
	555	if (smc->hw.wdog_used) {
	556	outpw(ADDR(B2_WDOG_CRTL),TIM_START) ; /* Start timer. */
	557	}
	558	#endif
	559
	560	#endif /* DEBUG */
	561	}
	562
7aa55fce	563	static void smt_stop_watchdog(struct s_smc *smc)
1da177e4 LT	564	{
	565	SK_UNUSED(smc) ; /* Make LINT happy. */
	566	#ifndef DEBUG
	567
	568	#ifdef PCI
	569	if (smc->hw.wdog_used) {
	570	outpw(ADDR(B2_WDOG_CRTL),TIM_STOP) ; /* Stop timer. */
	571	}
	572	#endif
	573
	574	#endif /* DEBUG */
	575	}
	576
	577	#ifdef PCI
1da177e4 LT	578
	579	void mac_do_pci_fix(struct s_smc *smc)
	580	{
	581	SK_UNUSED(smc) ;
	582	}
	583	#endif /* PCI */
	584