[unix-history] / usr / src / sys / vax / bi / bi.c

/*
 * Copyright (c) 1988 Regents of the University of California.
 * All rights reserved.
 *
 * This code is derived from software contributed to Berkeley by
 * Chris Torek.
 *
 * %sccs.include.redist.c%
 *
 *	@(#)bi.c	7.4 (Berkeley) %G%
 */

/*
 * VAXBI specific routines.
 */

#include "sys/param.h"
#include "../include/cpu.h"
#include "../include/mtpr.h"
#include "../vax/nexus.h"
#include "bireg.h"

bi_reset(bi)
	register struct biiregs *bi;
{

	bi->bi_csr |= BICSR_NRST;
	DELAY(10000);		/* ??? */
}

/*
 * Reset with self test.  Return true iff reset fails.
 * BEWARE, THIS RESETS THE BI ARBITRATION LEVEL TO ARB_NONE
 * does self test ever cause a bi bus error?
 */
bi_selftest(bi)
	register struct biiregs *bi;
{
	register int timo;

	bi->bi_csr |= BICSR_ARB_NONE;	/* why? */
	bi->bi_csr |= BICSR_STS | BICSR_INIT;/* must this be separate? */
	DELAY(50);			/* why? */
	timo = todr() + 1000;
	while (bi->bi_csr & BICSR_BROKE) {
		if (todr() > timo)	/* reset failed */
			return (-1);
	}
	return (0);			/* reset OK */
}

/*
 * THIS SHOULD PROBABLY WORK MORE LIKE ubaerror()
 * (but then we would need to be able to reset BI nodes)
 * (we need a per-BI-device driver structure!)
 */
bi_buserr(binum)
	int binum;
{
	register struct bi_node *bi;
	register int node;
	extern int bi_nodes;
	extern int cold;

	printf("vaxbi%d: bus error\n", binum);
	bi = (struct bi_node *) &nexus[binum * NNODEBI];/* XXX */
	for (node = 0; node < 16; node++, bi++) {
		if ((bi_nodes & (1 << node)) == 0)	/* XXX crude */
			continue;
		printf("node %x: ber=%b\n", node, bi->biic.bi_ber, BIBER_BITS);
	}
	panic("bi_buserr");
}
Commit	Line	Data
a196a004	1	/*
35962040 KB	2	* Copyright (c) 1988 Regents of the University of California.
35962040 KB	3	* All rights reserved.
a196a004	4	*
35962040 KB	5	* This code is derived from software contributed to Berkeley by
	6	* Chris Torek.
	7	*
b702c21d	8	* %sccs.include.redist.c%
35962040	9	*
b28b3a13	10	* @(#)bi.c 7.4 (Berkeley) %G%
35962040 KB	11	*/
	12
	13	/*
a196a004 MK	14	* VAXBI specific routines.
	15	*/
	16
b28b3a13 KB	17	#include "sys/param.h"
	18	#include "../include/cpu.h"
	19	#include "../include/mtpr.h"
a196a004	20	#include "../vax/nexus.h"
a196a004 MK	21	#include "bireg.h"
	22
	23	bi_reset(bi)
	24	register struct biiregs *bi;
	25	{
	26
	27	bi->bi_csr \|= BICSR_NRST;
	28	DELAY(10000); /* ??? */
	29	}
	30
	31	/*
	32	* Reset with self test. Return true iff reset fails.
	33	* BEWARE, THIS RESETS THE BI ARBITRATION LEVEL TO ARB_NONE
	34	* does self test ever cause a bi bus error?
	35	*/
	36	bi_selftest(bi)
	37	register struct biiregs *bi;
	38	{
	39	register int timo;
	40
	41	bi->bi_csr \|= BICSR_ARB_NONE; /* why? */
	42	bi->bi_csr \|= BICSR_STS \| BICSR_INIT;/* must this be separate? */
	43	DELAY(50); /* why? */
	44	timo = todr() + 1000;
	45	while (bi->bi_csr & BICSR_BROKE) {
	46	if (todr() > timo) /* reset failed */
	47	return (-1);
	48	}
	49	return (0); /* reset OK */
	50	}
	51
	52	/*
	53	* THIS SHOULD PROBABLY WORK MORE LIKE ubaerror()
	54	* (but then we would need to be able to reset BI nodes)
	55	* (we need a per-BI-device driver structure!)
	56	*/
	57	bi_buserr(binum)
	58	int binum;
	59	{
	60	register struct bi_node *bi;
	61	register int node;
	62	extern int bi_nodes;
	63	extern int cold;
	64
	65	printf("vaxbi%d: bus error\n", binum);
	66	bi = (struct bi_node ) &nexus[binum NNODEBI];/* XXX */
	67	for (node = 0; node < 16; node++, bi++) {
	68	if ((bi_nodes & (1 << node)) == 0) /* XXX crude */
	69	continue;
	70	printf("node %x: ber=%b\n", node, bi->biic.bi_ber, BIBER_BITS);
	71	}
	72	panic("bi_buserr");
	73	}