2
** -----------------------------------------------------------------------------
4
** Perle Specialix driver for Linux
5
** Ported from existing RIO Driver for SCO sources.
7
* (C) 1990 - 2000 Specialix International Ltd., Byfleet, Surrey, UK.
9
* This program is free software; you can redistribute it and/or modify
10
* it under the terms of the GNU General Public License as published by
11
* the Free Software Foundation; either version 2 of the License, or
12
* (at your option) any later version.
14
* This program is distributed in the hope that it will be useful,
15
* but WITHOUT ANY WARRANTY; without even the implied warranty of
16
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17
* GNU General Public License for more details.
19
* You should have received a copy of the GNU General Public License
20
* along with this program; if not, write to the Free Software
21
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
25
** Last Modified : 11/6/98 10:33:43
26
** Retrieved : 11/6/98 10:33:49
28
** ident @(#)rioinit.c 1.3
30
** -----------------------------------------------------------------------------
33
#include <linux/module.h>
34
#include <linux/errno.h>
35
#include <linux/delay.h>
37
#include <asm/system.h>
38
#include <asm/string.h>
39
#include <asm/uaccess.h>
41
#include <linux/termios.h>
42
#include <linux/serial.h>
44
#include <linux/generic_serial.h>
47
#include "linux_compat.h"
72
#include "rio_linux.h"
74
int RIOPCIinit(struct rio_info *p, int Mode);
76
static int RIOScrub(int, u8 __iomem *, int);
82
** Fill out the fields in the p->RIOHosts structure now we know we know
83
** we have a board present.
85
** bits < 0 indicates 8 bit operation requested,
86
** bits > 0 indicates 16 bit operation.
89
int RIOAssignAT(struct rio_info *p, int Base, void __iomem *virtAddr, int mode)
92
struct DpRam __iomem *cardp = (struct DpRam __iomem *)virtAddr;
94
if ((Base < ONE_MEG) || (mode & BYTE_ACCESS_MODE))
95
bits = BYTE_OPERATION;
97
bits = WORD_OPERATION;
100
** Board has passed its scrub test. Fill in all the
103
p->RIOHosts[p->RIONumHosts].Caddr = virtAddr;
104
p->RIOHosts[p->RIONumHosts].CardP = virtAddr;
107
** Revision 01 AT host cards don't support WORD operations,
109
if (readb(&cardp->DpRevision) == 01)
110
bits = BYTE_OPERATION;
112
p->RIOHosts[p->RIONumHosts].Type = RIO_AT;
113
p->RIOHosts[p->RIONumHosts].Copy = rio_copy_to_card;
115
p->RIOHosts[p->RIONumHosts].Slot = -1;
116
p->RIOHosts[p->RIONumHosts].Mode = SLOW_LINKS | SLOW_AT_BUS | bits;
117
writeb(BOOT_FROM_RAM | EXTERNAL_BUS_OFF | p->RIOHosts[p->RIONumHosts].Mode | INTERRUPT_DISABLE ,
118
&p->RIOHosts[p->RIONumHosts].Control);
119
writeb(0xFF, &p->RIOHosts[p->RIONumHosts].ResetInt);
120
writeb(BOOT_FROM_RAM | EXTERNAL_BUS_OFF | p->RIOHosts[p->RIONumHosts].Mode | INTERRUPT_DISABLE,
121
&p->RIOHosts[p->RIONumHosts].Control);
122
writeb(0xFF, &p->RIOHosts[p->RIONumHosts].ResetInt);
123
p->RIOHosts[p->RIONumHosts].UniqueNum =
124
((readb(&p->RIOHosts[p->RIONumHosts].Unique[0])&0xFF)<<0)|
125
((readb(&p->RIOHosts[p->RIONumHosts].Unique[1])&0xFF)<<8)|
126
((readb(&p->RIOHosts[p->RIONumHosts].Unique[2])&0xFF)<<16)|
127
((readb(&p->RIOHosts[p->RIONumHosts].Unique[3])&0xFF)<<24);
128
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: Uniquenum 0x%x\n",p->RIOHosts[p->RIONumHosts].UniqueNum);
131
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: Tests Passed at 0x%x\n", Base);
136
#ifdef VERY_LONG_TEST
137
0x00, 0x01, 0x02, 0x04, 0x08, 0x10, 0x20, 0x40, 0x80,
138
0xa5, 0xff, 0x5a, 0x00, 0xff, 0xc9, 0x36,
142
#define TEST_END sizeof(val)
146
** Nothing too complicated, just enough to check it out.
148
int RIOBoardTest(unsigned long paddr, void __iomem *caddr, unsigned char type, int slot)
150
struct DpRam __iomem *DpRam = caddr;
151
void __iomem *ram[4];
156
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: Reset host type=%d, DpRam=%p, slot=%d\n",
159
RIOHostReset(type, DpRam, slot);
162
** Scrub the memory. This comes in several banks:
163
** DPsram1 - 7000h bytes
164
** DPsram2 - 200h bytes
165
** DPsram3 - 7000h bytes
166
** scratch - 1000h bytes
169
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: Setup ram/size arrays\n");
171
size[0] = DP_SRAM1_SIZE;
172
size[1] = DP_SRAM2_SIZE;
173
size[2] = DP_SRAM3_SIZE;
174
size[3] = DP_SCRATCH_SIZE;
176
ram[0] = DpRam->DpSram1;
177
ram[1] = DpRam->DpSram2;
178
ram[2] = DpRam->DpSram3;
179
nbanks = (type == RIO_PCI) ? 3 : 4;
181
ram[3] = DpRam->DpScratch;
185
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: Memory: %p(0x%x), %p(0x%x), %p(0x%x)\n",
186
ram[0], size[0], ram[1], size[1], ram[2], size[2]);
188
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: %p(0x%x), %p(0x%x), %p(0x%x), %p(0x%x)\n",
189
ram[0], size[0], ram[1], size[1], ram[2], size[2], ram[3], size[3]);
193
** This scrub operation will test for crosstalk between
194
** banks. TEST_END is a magic number, and relates to the offset
195
** within the 'val' array used by Scrub.
197
for (op=0; op<TEST_END; op++) {
198
for (bank=0; bank<nbanks; bank++) {
199
if (RIOScrub(op, ram[bank], size[bank]) == RIO_FAIL) {
200
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: RIOScrub band %d, op %d failed\n",
207
rio_dprintk (RIO_DEBUG_INIT, "Test completed\n");
213
** Scrub an area of RAM.
214
** Define PRETEST and POSTTEST for a more thorough checking of the
215
** state of the memory.
216
** Call with op set to an index into the above 'val' array to determine
217
** which value will be written into memory.
218
** Call with op set to zero means that the RAM will not be read and checked
219
** before it is written.
220
** Call with op not zero and the RAM will be read and compared with val[op-1]
221
** to check that the data from the previous phase was retained.
224
static int RIOScrub(int op, u8 __iomem *ram, int size)
227
unsigned char oldbyte;
228
unsigned char newbyte;
229
unsigned char invbyte;
230
unsigned short oldword;
231
unsigned short newword;
232
unsigned short invword;
233
unsigned short swapword;
237
oldword = oldbyte | (oldbyte<<8);
239
oldbyte = oldword = 0; /* Tell the compiler we've initilalized them. */
241
newword = newbyte | (newbyte<<8);
243
invword = invbyte | (invbyte<<8);
246
** Check that the RAM contains the value that should have been left there
247
** by the previous test (not applicable for pass zero)
250
for (off=0; off<size; off++) {
251
if (readb(ram + off) != oldbyte) {
252
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: Byte Pre Check 1: BYTE at offset 0x%x should have been=%x, was=%x\n", off, oldbyte, readb(ram + off));
256
for (off=0; off<size; off+=2) {
257
if (readw(ram + off) != oldword) {
258
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: Word Pre Check: WORD at offset 0x%x should have been=%x, was=%x\n",off,oldword, readw(ram + off));
259
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: Word Pre Check: BYTE at offset 0x%x is %x BYTE at offset 0x%x is %x\n", off, readb(ram + off), off+1, readb(ram+off+1));
266
** Now write the INVERSE of the test data into every location, using
267
** BYTE write operations, first checking before each byte is written
268
** that the location contains the old value still, and checking after
269
** the write that the location contains the data specified - this is
270
** the BYTE read/write test.
272
for (off=0; off<size; off++) {
273
if (op && (readb(ram + off) != oldbyte)) {
274
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: Byte Pre Check 2: BYTE at offset 0x%x should have been=%x, was=%x\n", off, oldbyte, readb(ram + off));
277
writeb(invbyte, ram + off);
278
if (readb(ram + off) != invbyte) {
279
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: Byte Inv Check: BYTE at offset 0x%x should have been=%x, was=%x\n", off, invbyte, readb(ram + off));
285
** now, use WORD operations to write the test value into every location,
286
** check as before that the location contains the previous test value
287
** before overwriting, and that it contains the data value written
289
** This is the WORD operation test.
291
for (off=0; off<size; off+=2) {
292
if (readw(ram + off) != invword) {
293
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: Word Inv Check: WORD at offset 0x%x should have been=%x, was=%x\n", off, invword, readw(ram + off));
294
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: Word Inv Check: BYTE at offset 0x%x is %x BYTE at offset 0x%x is %x\n", off, readb(ram + off), off+1, readb(ram+off+1));
298
writew(newword, ram + off);
299
if ( readw(ram + off) != newword ) {
300
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: Post Word Check 1: WORD at offset 0x%x should have been=%x, was=%x\n", off, newword, readw(ram + off));
301
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: Post Word Check 1: BYTE at offset 0x%x is %x BYTE at offset 0x%x is %x\n", off, readb(ram + off), off+1, readb(ram + off + 1));
307
** now run through the block of memory again, first in byte mode
308
** then in word mode, and check that all the locations contain the
309
** required test data.
311
for (off=0; off<size; off++) {
312
if (readb(ram + off) != newbyte) {
313
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: Post Byte Check: BYTE at offset 0x%x should have been=%x, was=%x\n", off, newbyte, readb(ram + off));
318
for (off=0; off<size; off+=2) {
319
if (readw(ram + off) != newword ) {
320
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: Post Word Check 2: WORD at offset 0x%x should have been=%x, was=%x\n", off, newword, readw(ram + off));
321
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: Post Word Check 2: BYTE at offset 0x%x is %x BYTE at offset 0x%x is %x\n", off, readb(ram + off), off+1, readb(ram + off + 1));
327
** time to check out byte swapping errors
329
swapword = invbyte | (newbyte << 8);
331
for (off=0; off<size; off+=2) {
332
writeb(invbyte, &ram[off]);
333
writeb(newbyte, &ram[off+1]);
336
for ( off=0; off<size; off+=2 ) {
337
if (readw(ram + off) != swapword) {
338
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: SwapWord Check 1: WORD at offset 0x%x should have been=%x, was=%x\n", off, swapword, readw(ram + off));
339
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: SwapWord Check 1: BYTE at offset 0x%x is %x BYTE at offset 0x%x is %x\n", off, readb(ram + off), off+1, readb(ram + off + 1));
342
writew(~swapword, ram + off);
345
for (off=0; off<size; off+=2) {
346
if (readb(ram + off) != newbyte) {
347
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: SwapWord Check 2: BYTE at offset 0x%x should have been=%x, was=%x\n", off, newbyte, readb(ram + off));
350
if (readb(ram + off + 1) != invbyte) {
351
rio_dprintk (RIO_DEBUG_INIT, "RIO-init: SwapWord Check 2: BYTE at offset 0x%x should have been=%x, was=%x\n", off+1, invbyte, readb(ram + off + 1));
354
writew(newword, ram + off);
360
int RIODefaultName(struct rio_info *p, struct Host *HostP, unsigned int UnitId)
362
memcpy(HostP->Mapping[UnitId].Name, "UNKNOWN RTA X-XX", 17);
363
HostP->Mapping[UnitId].Name[12]='1'+(HostP-p->RIOHosts);
364
if ((UnitId+1) > 9) {
365
HostP->Mapping[UnitId].Name[14]='0'+((UnitId+1)/10);
366
HostP->Mapping[UnitId].Name[15]='0'+((UnitId+1)%10);
369
HostP->Mapping[UnitId].Name[14]='1'+UnitId;
370
HostP->Mapping[UnitId].Name[15]=0;
375
#define RIO_RELEASE "Linux"
376
#define RELEASE_ID "1.0"
378
static struct rioVersion stVersion;
380
struct rioVersion *RIOVersid(void)
382
strlcpy(stVersion.version, "RIO driver for linux V1.0",
383
sizeof(stVersion.version));
384
strlcpy(stVersion.buildDate, __DATE__,
385
sizeof(stVersion.buildDate));
390
void RIOHostReset(unsigned int Type, struct DpRam __iomem *DpRamP, unsigned int Slot)
395
rio_dprintk (RIO_DEBUG_INIT, "RIOHostReset: type 0x%x", Type);
398
rio_dprintk (RIO_DEBUG_INIT, " (RIO_AT)\n");
399
writeb(BOOT_FROM_RAM | EXTERNAL_BUS_OFF | INTERRUPT_DISABLE | BYTE_OPERATION |
400
SLOW_LINKS | SLOW_AT_BUS, &DpRamP->DpControl);
401
writeb(0xFF, &DpRamP->DpResetTpu);
403
rio_dprintk (RIO_DEBUG_INIT, "RIOHostReset: Don't know if it worked. Try reset again\n");
404
writeb(BOOT_FROM_RAM | EXTERNAL_BUS_OFF | INTERRUPT_DISABLE |
405
BYTE_OPERATION | SLOW_LINKS | SLOW_AT_BUS, &DpRamP->DpControl);
406
writeb(0xFF, &DpRamP->DpResetTpu);
410
rio_dprintk (RIO_DEBUG_INIT, " (RIO_PCI)\n");
411
writeb(RIO_PCI_BOOT_FROM_RAM, &DpRamP->DpControl);
412
writeb(0xFF, &DpRamP->DpResetInt);
413
writeb(0xFF, &DpRamP->DpResetTpu);
417
rio_dprintk (RIO_DEBUG_INIT, " (UNKNOWN)\n");