]> bbs.cooldavid.org Git - net-next-2.6.git/blame - drivers/char/istallion.c
ipv6: AF_INET6 link address family
[net-next-2.6.git] / drivers / char / istallion.c
CommitLineData
1da177e4
LT
1/*****************************************************************************/
2
3/*
4 * istallion.c -- stallion intelligent multiport serial driver.
5 *
6 * Copyright (C) 1996-1999 Stallion Technologies
7 * Copyright (C) 1994-1996 Greg Ungerer.
8 *
9 * This code is loosely based on the Linux serial driver, written by
10 * Linus Torvalds, Theodore T'so and others.
11 *
12 * This program is free software; you can redistribute it and/or modify
13 * it under the terms of the GNU General Public License as published by
14 * the Free Software Foundation; either version 2 of the License, or
15 * (at your option) any later version.
16 *
1da177e4
LT
17 */
18
19/*****************************************************************************/
20
1da177e4 21#include <linux/module.h>
d43c36dc 22#include <linux/sched.h>
1da177e4 23#include <linux/slab.h>
405f5571 24#include <linux/smp_lock.h>
1da177e4
LT
25#include <linux/interrupt.h>
26#include <linux/tty.h>
27#include <linux/tty_flip.h>
28#include <linux/serial.h>
5bd6de7d 29#include <linux/seq_file.h>
1da177e4
LT
30#include <linux/cdk.h>
31#include <linux/comstats.h>
32#include <linux/istallion.h>
33#include <linux/ioport.h>
34#include <linux/delay.h>
35#include <linux/init.h>
1da177e4
LT
36#include <linux/device.h>
37#include <linux/wait.h>
4ac4360b 38#include <linux/eisa.h>
a3f8d9d5 39#include <linux/ctype.h>
1da177e4
LT
40
41#include <asm/io.h>
42#include <asm/uaccess.h>
43
1da177e4 44#include <linux/pci.h>
1da177e4
LT
45
46/*****************************************************************************/
47
48/*
49 * Define different board types. Not all of the following board types
50 * are supported by this driver. But I will use the standard "assigned"
51 * board numbers. Currently supported boards are abbreviated as:
52 * ECP = EasyConnection 8/64, ONB = ONboard, BBY = Brumby and
53 * STAL = Stallion.
54 */
55#define BRD_UNKNOWN 0
56#define BRD_STALLION 1
57#define BRD_BRUMBY4 2
58#define BRD_ONBOARD2 3
59#define BRD_ONBOARD 4
1da177e4 60#define BRD_ONBOARDE 7
1da177e4
LT
61#define BRD_ECP 23
62#define BRD_ECPE 24
63#define BRD_ECPMC 25
1da177e4
LT
64#define BRD_ECPPCI 29
65
66#define BRD_BRUMBY BRD_BRUMBY4
67
68/*
69 * Define a configuration structure to hold the board configuration.
70 * Need to set this up in the code (for now) with the boards that are
71 * to be configured into the system. This is what needs to be modified
72 * when adding/removing/modifying boards. Each line entry in the
73 * stli_brdconf[] array is a board. Each line contains io/irq/memory
74 * ranges for that board (as well as what type of board it is).
75 * Some examples:
76 * { BRD_ECP, 0x2a0, 0, 0xcc000, 0, 0 },
77 * This line will configure an EasyConnection 8/64 at io address 2a0,
78 * and shared memory address of cc000. Multiple EasyConnection 8/64
79 * boards can share the same shared memory address space. No interrupt
80 * is required for this board type.
81 * Another example:
82 * { BRD_ECPE, 0x5000, 0, 0x80000000, 0, 0 },
83 * This line will configure an EasyConnection 8/64 EISA in slot 5 and
84 * shared memory address of 0x80000000 (2 GByte). Multiple
85 * EasyConnection 8/64 EISA boards can share the same shared memory
86 * address space. No interrupt is required for this board type.
87 * Another example:
88 * { BRD_ONBOARD, 0x240, 0, 0xd0000, 0, 0 },
89 * This line will configure an ONboard (ISA type) at io address 240,
90 * and shared memory address of d0000. Multiple ONboards can share
91 * the same shared memory address space. No interrupt required.
92 * Another example:
93 * { BRD_BRUMBY4, 0x360, 0, 0xc8000, 0, 0 },
94 * This line will configure a Brumby board (any number of ports!) at
95 * io address 360 and shared memory address of c8000. All Brumby boards
96 * configured into a system must have their own separate io and memory
97 * addresses. No interrupt is required.
98 * Another example:
99 * { BRD_STALLION, 0x330, 0, 0xd0000, 0, 0 },
100 * This line will configure an original Stallion board at io address 330
101 * and shared memory address d0000 (this would only be valid for a "V4.0"
102 * or Rev.O Stallion board). All Stallion boards configured into the
103 * system must have their own separate io and memory addresses. No
104 * interrupt is required.
105 */
106
1f8ec435 107struct stlconf {
1da177e4
LT
108 int brdtype;
109 int ioaddr1;
110 int ioaddr2;
111 unsigned long memaddr;
112 int irq;
113 int irqtype;
1f8ec435 114};
1da177e4 115
1328d737 116static unsigned int stli_nrbrds;
1da177e4 117
4ac4360b
AC
118/* stli_lock must NOT be taken holding brd_lock */
119static spinlock_t stli_lock; /* TTY logic lock */
120static spinlock_t brd_lock; /* Board logic lock */
121
1da177e4
LT
122/*
123 * There is some experimental EISA board detection code in this driver.
124 * By default it is disabled, but for those that want to try it out,
125 * then set the define below to be 1.
126 */
127#define STLI_EISAPROBE 0
128
129/*****************************************************************************/
130
131/*
132 * Define some important driver characteristics. Device major numbers
133 * allocated as per Linux Device Registry.
134 */
135#ifndef STL_SIOMEMMAJOR
136#define STL_SIOMEMMAJOR 28
137#endif
138#ifndef STL_SERIALMAJOR
139#define STL_SERIALMAJOR 24
140#endif
141#ifndef STL_CALLOUTMAJOR
142#define STL_CALLOUTMAJOR 25
143#endif
144
145/*****************************************************************************/
146
147/*
148 * Define our local driver identity first. Set up stuff to deal with
149 * all the local structures required by a serial tty driver.
150 */
151static char *stli_drvtitle = "Stallion Intelligent Multiport Serial Driver";
152static char *stli_drvname = "istallion";
153static char *stli_drvversion = "5.6.0";
154static char *stli_serialname = "ttyE";
155
156static struct tty_driver *stli_serial;
31f35939 157static const struct tty_port_operations stli_port_ops;
1da177e4
LT
158
159#define STLI_TXBUFSIZE 4096
160
161/*
162 * Use a fast local buffer for cooked characters. Typically a whole
163 * bunch of cooked characters come in for a port, 1 at a time. So we
164 * save those up into a local buffer, then write out the whole lot
165 * with a large memcpy. Just use 1 buffer for all ports, since its
166 * use it is only need for short periods of time by each port.
167 */
168static char *stli_txcookbuf;
169static int stli_txcooksize;
170static int stli_txcookrealsize;
171static struct tty_struct *stli_txcooktty;
172
173/*
174 * Define a local default termios struct. All ports will be created
175 * with this termios initially. Basically all it defines is a raw port
176 * at 9600 baud, 8 data bits, no parity, 1 stop bit.
177 */
606d099c 178static struct ktermios stli_deftermios = {
1da177e4
LT
179 .c_cflag = (B9600 | CS8 | CREAD | HUPCL | CLOCAL),
180 .c_cc = INIT_C_CC,
606d099c
AC
181 .c_ispeed = 9600,
182 .c_ospeed = 9600,
1da177e4
LT
183};
184
185/*
186 * Define global stats structures. Not used often, and can be
187 * re-used for each stats call.
188 */
189static comstats_t stli_comstats;
190static combrd_t stli_brdstats;
1f8ec435 191static struct asystats stli_cdkstats;
1da177e4
LT
192
193/*****************************************************************************/
194
b103b5cf 195static DEFINE_MUTEX(stli_brdslock);
1f8ec435 196static struct stlibrd *stli_brds[STL_MAXBRDS];
1da177e4
LT
197
198static int stli_shared;
199
200/*
201 * Per board state flags. Used with the state field of the board struct.
202 * Not really much here... All we need to do is keep track of whether
203 * the board has been detected, and whether it is actually running a slave
204 * or not.
205 */
8a1e803d
AC
206#define BST_FOUND 0
207#define BST_STARTED 1
208#define BST_PROBED 2
1da177e4
LT
209
210/*
211 * Define the set of port state flags. These are marked for internal
212 * state purposes only, usually to do with the state of communications
213 * with the slave. Most of them need to be updated atomically, so always
214 * use the bit setting operations (unless protected by cli/sti).
215 */
1da177e4
LT
216#define ST_OPENING 2
217#define ST_CLOSING 3
218#define ST_CMDING 4
219#define ST_TXBUSY 5
220#define ST_RXING 6
221#define ST_DOFLUSHRX 7
222#define ST_DOFLUSHTX 8
223#define ST_DOSIGS 9
224#define ST_RXSTOP 10
225#define ST_GETSIGS 11
226
227/*
228 * Define an array of board names as printable strings. Handy for
229 * referencing boards when printing trace and stuff.
230 */
231static char *stli_brdnames[] = {
232 "Unknown",
233 "Stallion",
234 "Brumby",
235 "ONboard-MC",
236 "ONboard",
237 "Brumby",
238 "Brumby",
239 "ONboard-EI",
a3f8d9d5 240 NULL,
1da177e4
LT
241 "ONboard",
242 "ONboard-MC",
243 "ONboard-MC",
a3f8d9d5
JS
244 NULL,
245 NULL,
246 NULL,
247 NULL,
248 NULL,
249 NULL,
250 NULL,
251 NULL,
1da177e4
LT
252 "EasyIO",
253 "EC8/32-AT",
254 "EC8/32-MC",
255 "EC8/64-AT",
256 "EC8/64-EI",
257 "EC8/64-MC",
258 "EC8/32-PCI",
259 "EC8/64-PCI",
260 "EasyIO-PCI",
261 "EC/RA-PCI",
262};
263
264/*****************************************************************************/
265
1da177e4
LT
266/*
267 * Define some string labels for arguments passed from the module
268 * load line. These allow for easy board definitions, and easy
269 * modification of the io, memory and irq resoucres.
270 */
271
272static char *board0[8];
273static char *board1[8];
274static char *board2[8];
275static char *board3[8];
276
277static char **stli_brdsp[] = {
278 (char **) &board0,
279 (char **) &board1,
280 (char **) &board2,
281 (char **) &board3
282};
283
284/*
285 * Define a set of common board names, and types. This is used to
286 * parse any module arguments.
287 */
288
1f8ec435 289static struct stlibrdtype {
1da177e4
LT
290 char *name;
291 int type;
1f8ec435 292} stli_brdstr[] = {
1da177e4
LT
293 { "stallion", BRD_STALLION },
294 { "1", BRD_STALLION },
295 { "brumby", BRD_BRUMBY },
296 { "brumby4", BRD_BRUMBY },
297 { "brumby/4", BRD_BRUMBY },
298 { "brumby-4", BRD_BRUMBY },
299 { "brumby8", BRD_BRUMBY },
300 { "brumby/8", BRD_BRUMBY },
301 { "brumby-8", BRD_BRUMBY },
302 { "brumby16", BRD_BRUMBY },
303 { "brumby/16", BRD_BRUMBY },
304 { "brumby-16", BRD_BRUMBY },
305 { "2", BRD_BRUMBY },
306 { "onboard2", BRD_ONBOARD2 },
307 { "onboard-2", BRD_ONBOARD2 },
308 { "onboard/2", BRD_ONBOARD2 },
309 { "onboard-mc", BRD_ONBOARD2 },
310 { "onboard/mc", BRD_ONBOARD2 },
311 { "onboard-mca", BRD_ONBOARD2 },
312 { "onboard/mca", BRD_ONBOARD2 },
313 { "3", BRD_ONBOARD2 },
314 { "onboard", BRD_ONBOARD },
315 { "onboardat", BRD_ONBOARD },
316 { "4", BRD_ONBOARD },
317 { "onboarde", BRD_ONBOARDE },
318 { "onboard-e", BRD_ONBOARDE },
319 { "onboard/e", BRD_ONBOARDE },
320 { "onboard-ei", BRD_ONBOARDE },
321 { "onboard/ei", BRD_ONBOARDE },
322 { "7", BRD_ONBOARDE },
323 { "ecp", BRD_ECP },
324 { "ecpat", BRD_ECP },
325 { "ec8/64", BRD_ECP },
326 { "ec8/64-at", BRD_ECP },
327 { "ec8/64-isa", BRD_ECP },
328 { "23", BRD_ECP },
329 { "ecpe", BRD_ECPE },
330 { "ecpei", BRD_ECPE },
331 { "ec8/64-e", BRD_ECPE },
332 { "ec8/64-ei", BRD_ECPE },
333 { "24", BRD_ECPE },
334 { "ecpmc", BRD_ECPMC },
335 { "ec8/64-mc", BRD_ECPMC },
336 { "ec8/64-mca", BRD_ECPMC },
337 { "25", BRD_ECPMC },
338 { "ecppci", BRD_ECPPCI },
339 { "ec/ra", BRD_ECPPCI },
340 { "ec/ra-pc", BRD_ECPPCI },
341 { "ec/ra-pci", BRD_ECPPCI },
342 { "29", BRD_ECPPCI },
343};
344
345/*
346 * Define the module agruments.
347 */
348MODULE_AUTHOR("Greg Ungerer");
349MODULE_DESCRIPTION("Stallion Intelligent Multiport Serial Driver");
350MODULE_LICENSE("GPL");
351
352
8d3b33f6 353module_param_array(board0, charp, NULL, 0);
1da177e4 354MODULE_PARM_DESC(board0, "Board 0 config -> name[,ioaddr[,memaddr]");
8d3b33f6 355module_param_array(board1, charp, NULL, 0);
1da177e4 356MODULE_PARM_DESC(board1, "Board 1 config -> name[,ioaddr[,memaddr]");
8d3b33f6 357module_param_array(board2, charp, NULL, 0);
1da177e4 358MODULE_PARM_DESC(board2, "Board 2 config -> name[,ioaddr[,memaddr]");
8d3b33f6 359module_param_array(board3, charp, NULL, 0);
1da177e4
LT
360MODULE_PARM_DESC(board3, "Board 3 config -> name[,ioaddr[,memaddr]");
361
a00f33f3 362#if STLI_EISAPROBE != 0
1da177e4
LT
363/*
364 * Set up a default memory address table for EISA board probing.
365 * The default addresses are all bellow 1Mbyte, which has to be the
366 * case anyway. They should be safe, since we only read values from
367 * them, and interrupts are disabled while we do it. If the higher
368 * memory support is compiled in then we also try probing around
369 * the 1Gb, 2Gb and 3Gb areas as well...
370 */
371static unsigned long stli_eisamemprobeaddrs[] = {
372 0xc0000, 0xd0000, 0xe0000, 0xf0000,
373 0x80000000, 0x80010000, 0x80020000, 0x80030000,
374 0x40000000, 0x40010000, 0x40020000, 0x40030000,
375 0xc0000000, 0xc0010000, 0xc0020000, 0xc0030000,
376 0xff000000, 0xff010000, 0xff020000, 0xff030000,
377};
378
fe971071 379static int stli_eisamempsize = ARRAY_SIZE(stli_eisamemprobeaddrs);
a00f33f3 380#endif
1da177e4
LT
381
382/*
383 * Define the Stallion PCI vendor and device IDs.
384 */
1da177e4
LT
385#ifndef PCI_DEVICE_ID_ECRA
386#define PCI_DEVICE_ID_ECRA 0x0004
387#endif
388
389static struct pci_device_id istallion_pci_tbl[] = {
4ac4360b 390 { PCI_DEVICE(PCI_VENDOR_ID_STALLION, PCI_DEVICE_ID_ECRA), },
1da177e4
LT
391 { 0 }
392};
393MODULE_DEVICE_TABLE(pci, istallion_pci_tbl);
394
845bead4 395static struct pci_driver stli_pcidriver;
1da177e4
LT
396
397/*****************************************************************************/
398
399/*
400 * Hardware configuration info for ECP boards. These defines apply
401 * to the directly accessible io ports of the ECP. There is a set of
402 * defines for each ECP board type, ISA, EISA, MCA and PCI.
403 */
404#define ECP_IOSIZE 4
405
406#define ECP_MEMSIZE (128 * 1024)
407#define ECP_PCIMEMSIZE (256 * 1024)
408
409#define ECP_ATPAGESIZE (4 * 1024)
410#define ECP_MCPAGESIZE (4 * 1024)
411#define ECP_EIPAGESIZE (64 * 1024)
412#define ECP_PCIPAGESIZE (64 * 1024)
413
414#define STL_EISAID 0x8c4e
415
416/*
417 * Important defines for the ISA class of ECP board.
418 */
419#define ECP_ATIREG 0
420#define ECP_ATCONFR 1
421#define ECP_ATMEMAR 2
422#define ECP_ATMEMPR 3
423#define ECP_ATSTOP 0x1
424#define ECP_ATINTENAB 0x10
425#define ECP_ATENABLE 0x20
426#define ECP_ATDISABLE 0x00
427#define ECP_ATADDRMASK 0x3f000
428#define ECP_ATADDRSHFT 12
429
430/*
431 * Important defines for the EISA class of ECP board.
432 */
433#define ECP_EIIREG 0
434#define ECP_EIMEMARL 1
435#define ECP_EICONFR 2
436#define ECP_EIMEMARH 3
437#define ECP_EIENABLE 0x1
438#define ECP_EIDISABLE 0x0
439#define ECP_EISTOP 0x4
440#define ECP_EIEDGE 0x00
441#define ECP_EILEVEL 0x80
442#define ECP_EIADDRMASKL 0x00ff0000
443#define ECP_EIADDRSHFTL 16
444#define ECP_EIADDRMASKH 0xff000000
445#define ECP_EIADDRSHFTH 24
446#define ECP_EIBRDENAB 0xc84
447
448#define ECP_EISAID 0x4
449
450/*
451 * Important defines for the Micro-channel class of ECP board.
452 * (It has a lot in common with the ISA boards.)
453 */
454#define ECP_MCIREG 0
455#define ECP_MCCONFR 1
456#define ECP_MCSTOP 0x20
457#define ECP_MCENABLE 0x80
458#define ECP_MCDISABLE 0x00
459
460/*
461 * Important defines for the PCI class of ECP board.
462 * (It has a lot in common with the other ECP boards.)
463 */
464#define ECP_PCIIREG 0
465#define ECP_PCICONFR 1
466#define ECP_PCISTOP 0x01
467
468/*
469 * Hardware configuration info for ONboard and Brumby boards. These
470 * defines apply to the directly accessible io ports of these boards.
471 */
472#define ONB_IOSIZE 16
473#define ONB_MEMSIZE (64 * 1024)
474#define ONB_ATPAGESIZE (64 * 1024)
475#define ONB_MCPAGESIZE (64 * 1024)
476#define ONB_EIMEMSIZE (128 * 1024)
477#define ONB_EIPAGESIZE (64 * 1024)
478
479/*
480 * Important defines for the ISA class of ONboard board.
481 */
482#define ONB_ATIREG 0
483#define ONB_ATMEMAR 1
484#define ONB_ATCONFR 2
485#define ONB_ATSTOP 0x4
486#define ONB_ATENABLE 0x01
487#define ONB_ATDISABLE 0x00
488#define ONB_ATADDRMASK 0xff0000
489#define ONB_ATADDRSHFT 16
490
491#define ONB_MEMENABLO 0
492#define ONB_MEMENABHI 0x02
493
494/*
495 * Important defines for the EISA class of ONboard board.
496 */
497#define ONB_EIIREG 0
498#define ONB_EIMEMARL 1
499#define ONB_EICONFR 2
500#define ONB_EIMEMARH 3
501#define ONB_EIENABLE 0x1
502#define ONB_EIDISABLE 0x0
503#define ONB_EISTOP 0x4
504#define ONB_EIEDGE 0x00
505#define ONB_EILEVEL 0x80
506#define ONB_EIADDRMASKL 0x00ff0000
507#define ONB_EIADDRSHFTL 16
508#define ONB_EIADDRMASKH 0xff000000
509#define ONB_EIADDRSHFTH 24
510#define ONB_EIBRDENAB 0xc84
511
512#define ONB_EISAID 0x1
513
514/*
515 * Important defines for the Brumby boards. They are pretty simple,
516 * there is not much that is programmably configurable.
517 */
518#define BBY_IOSIZE 16
519#define BBY_MEMSIZE (64 * 1024)
520#define BBY_PAGESIZE (16 * 1024)
521
522#define BBY_ATIREG 0
523#define BBY_ATCONFR 1
524#define BBY_ATSTOP 0x4
525
526/*
527 * Important defines for the Stallion boards. They are pretty simple,
528 * there is not much that is programmably configurable.
529 */
530#define STAL_IOSIZE 16
531#define STAL_MEMSIZE (64 * 1024)
532#define STAL_PAGESIZE (64 * 1024)
533
534/*
535 * Define the set of status register values for EasyConnection panels.
536 * The signature will return with the status value for each panel. From
537 * this we can determine what is attached to the board - before we have
538 * actually down loaded any code to it.
539 */
540#define ECH_PNLSTATUS 2
541#define ECH_PNL16PORT 0x20
542#define ECH_PNLIDMASK 0x07
543#define ECH_PNLXPID 0x40
544#define ECH_PNLINTRPEND 0x80
545
546/*
547 * Define some macros to do things to the board. Even those these boards
548 * are somewhat related there is often significantly different ways of
549 * doing some operation on it (like enable, paging, reset, etc). So each
550 * board class has a set of functions which do the commonly required
551 * operations. The macros below basically just call these functions,
552 * generally checking for a NULL function - which means that the board
553 * needs nothing done to it to achieve this operation!
554 */
555#define EBRDINIT(brdp) \
556 if (brdp->init != NULL) \
557 (* brdp->init)(brdp)
558
559#define EBRDENABLE(brdp) \
560 if (brdp->enable != NULL) \
561 (* brdp->enable)(brdp);
562
563#define EBRDDISABLE(brdp) \
564 if (brdp->disable != NULL) \
565 (* brdp->disable)(brdp);
566
567#define EBRDINTR(brdp) \
568 if (brdp->intr != NULL) \
569 (* brdp->intr)(brdp);
570
571#define EBRDRESET(brdp) \
572 if (brdp->reset != NULL) \
573 (* brdp->reset)(brdp);
574
575#define EBRDGETMEMPTR(brdp,offset) \
576 (* brdp->getmemptr)(brdp, offset, __LINE__)
577
578/*
579 * Define the maximal baud rate, and the default baud base for ports.
580 */
581#define STL_MAXBAUD 460800
582#define STL_BAUDBASE 115200
583#define STL_CLOSEDELAY (5 * HZ / 10)
584
585/*****************************************************************************/
586
587/*
588 * Define macros to extract a brd or port number from a minor number.
589 */
590#define MINOR2BRD(min) (((min) & 0xc0) >> 6)
591#define MINOR2PORT(min) ((min) & 0x3f)
592
1da177e4
LT
593/*****************************************************************************/
594
1da177e4
LT
595/*
596 * Prototype all functions in this driver!
597 */
598
1f8ec435 599static int stli_parsebrd(struct stlconf *confp, char **argp);
1da177e4
LT
600static int stli_open(struct tty_struct *tty, struct file *filp);
601static void stli_close(struct tty_struct *tty, struct file *filp);
602static int stli_write(struct tty_struct *tty, const unsigned char *buf, int count);
42a77a1b 603static int stli_putchar(struct tty_struct *tty, unsigned char ch);
1da177e4
LT
604static void stli_flushchars(struct tty_struct *tty);
605static int stli_writeroom(struct tty_struct *tty);
606static int stli_charsinbuffer(struct tty_struct *tty);
607static int stli_ioctl(struct tty_struct *tty, struct file *file, unsigned int cmd, unsigned long arg);
606d099c 608static void stli_settermios(struct tty_struct *tty, struct ktermios *old);
1da177e4
LT
609static void stli_throttle(struct tty_struct *tty);
610static void stli_unthrottle(struct tty_struct *tty);
611static void stli_stop(struct tty_struct *tty);
612static void stli_start(struct tty_struct *tty);
613static void stli_flushbuffer(struct tty_struct *tty);
9e98966c 614static int stli_breakctl(struct tty_struct *tty, int state);
1da177e4
LT
615static void stli_waituntilsent(struct tty_struct *tty, int timeout);
616static void stli_sendxchar(struct tty_struct *tty, char ch);
617static void stli_hangup(struct tty_struct *tty);
1da177e4 618
1f8ec435
JS
619static int stli_brdinit(struct stlibrd *brdp);
620static int stli_startbrd(struct stlibrd *brdp);
1da177e4
LT
621static ssize_t stli_memread(struct file *fp, char __user *buf, size_t count, loff_t *offp);
622static ssize_t stli_memwrite(struct file *fp, const char __user *buf, size_t count, loff_t *offp);
62687538 623static long stli_memioctl(struct file *fp, unsigned int cmd, unsigned long arg);
1f8ec435 624static void stli_brdpoll(struct stlibrd *brdp, cdkhdr_t __iomem *hdrp);
1da177e4 625static void stli_poll(unsigned long arg);
1f8ec435 626static int stli_hostcmd(struct stlibrd *brdp, struct stliport *portp);
d18a750f 627static int stli_initopen(struct tty_struct *tty, struct stlibrd *brdp, struct stliport *portp);
1f8ec435
JS
628static int stli_rawopen(struct stlibrd *brdp, struct stliport *portp, unsigned long arg, int wait);
629static int stli_rawclose(struct stlibrd *brdp, struct stliport *portp, unsigned long arg, int wait);
d18a750f 630static int stli_setport(struct tty_struct *tty);
1f8ec435
JS
631static int stli_cmdwait(struct stlibrd *brdp, struct stliport *portp, unsigned long cmd, void *arg, int size, int copyback);
632static void stli_sendcmd(struct stlibrd *brdp, struct stliport *portp, unsigned long cmd, void *arg, int size, int copyback);
633static void __stli_sendcmd(struct stlibrd *brdp, struct stliport *portp, unsigned long cmd, void *arg, int size, int copyback);
634static void stli_dodelaycmd(struct stliport *portp, cdkctrl_t __iomem *cp);
d18a750f 635static void stli_mkasyport(struct tty_struct *tty, struct stliport *portp, asyport_t *pp, struct ktermios *tiosp);
1da177e4
LT
636static void stli_mkasysigs(asysigs_t *sp, int dtr, int rts);
637static long stli_mktiocm(unsigned long sigvalue);
1f8ec435
JS
638static void stli_read(struct stlibrd *brdp, struct stliport *portp);
639static int stli_getserial(struct stliport *portp, struct serial_struct __user *sp);
d18a750f 640static int stli_setserial(struct tty_struct *tty, struct serial_struct __user *sp);
1da177e4 641static int stli_getbrdstats(combrd_t __user *bp);
d18a750f
AC
642static int stli_getportstats(struct tty_struct *tty, struct stliport *portp, comstats_t __user *cp);
643static int stli_portcmdstats(struct tty_struct *tty, struct stliport *portp);
1f8ec435
JS
644static int stli_clrportstats(struct stliport *portp, comstats_t __user *cp);
645static int stli_getportstruct(struct stliport __user *arg);
646static int stli_getbrdstruct(struct stlibrd __user *arg);
647static struct stlibrd *stli_allocbrd(void);
648
649static void stli_ecpinit(struct stlibrd *brdp);
650static void stli_ecpenable(struct stlibrd *brdp);
651static void stli_ecpdisable(struct stlibrd *brdp);
652static void __iomem *stli_ecpgetmemptr(struct stlibrd *brdp, unsigned long offset, int line);
653static void stli_ecpreset(struct stlibrd *brdp);
654static void stli_ecpintr(struct stlibrd *brdp);
655static void stli_ecpeiinit(struct stlibrd *brdp);
656static void stli_ecpeienable(struct stlibrd *brdp);
657static void stli_ecpeidisable(struct stlibrd *brdp);
658static void __iomem *stli_ecpeigetmemptr(struct stlibrd *brdp, unsigned long offset, int line);
659static void stli_ecpeireset(struct stlibrd *brdp);
660static void stli_ecpmcenable(struct stlibrd *brdp);
661static void stli_ecpmcdisable(struct stlibrd *brdp);
662static void __iomem *stli_ecpmcgetmemptr(struct stlibrd *brdp, unsigned long offset, int line);
663static void stli_ecpmcreset(struct stlibrd *brdp);
664static void stli_ecppciinit(struct stlibrd *brdp);
665static void __iomem *stli_ecppcigetmemptr(struct stlibrd *brdp, unsigned long offset, int line);
666static void stli_ecppcireset(struct stlibrd *brdp);
667
668static void stli_onbinit(struct stlibrd *brdp);
669static void stli_onbenable(struct stlibrd *brdp);
670static void stli_onbdisable(struct stlibrd *brdp);
671static void __iomem *stli_onbgetmemptr(struct stlibrd *brdp, unsigned long offset, int line);
672static void stli_onbreset(struct stlibrd *brdp);
673static void stli_onbeinit(struct stlibrd *brdp);
674static void stli_onbeenable(struct stlibrd *brdp);
675static void stli_onbedisable(struct stlibrd *brdp);
676static void __iomem *stli_onbegetmemptr(struct stlibrd *brdp, unsigned long offset, int line);
677static void stli_onbereset(struct stlibrd *brdp);
678static void stli_bbyinit(struct stlibrd *brdp);
679static void __iomem *stli_bbygetmemptr(struct stlibrd *brdp, unsigned long offset, int line);
680static void stli_bbyreset(struct stlibrd *brdp);
681static void stli_stalinit(struct stlibrd *brdp);
682static void __iomem *stli_stalgetmemptr(struct stlibrd *brdp, unsigned long offset, int line);
683static void stli_stalreset(struct stlibrd *brdp);
684
1328d737 685static struct stliport *stli_getport(unsigned int brdnr, unsigned int panelnr, unsigned int portnr);
1f8ec435
JS
686
687static int stli_initecp(struct stlibrd *brdp);
688static int stli_initonb(struct stlibrd *brdp);
a00f33f3 689#if STLI_EISAPROBE != 0
1f8ec435 690static int stli_eisamemprobe(struct stlibrd *brdp);
a00f33f3 691#endif
1f8ec435 692static int stli_initports(struct stlibrd *brdp);
1da177e4 693
1da177e4
LT
694/*****************************************************************************/
695
696/*
697 * Define the driver info for a user level shared memory device. This
698 * device will work sort of like the /dev/kmem device - except that it
699 * will give access to the shared memory on the Stallion intelligent
700 * board. This is also a very useful debugging tool.
701 */
62322d25 702static const struct file_operations stli_fsiomem = {
1da177e4
LT
703 .owner = THIS_MODULE,
704 .read = stli_memread,
705 .write = stli_memwrite,
62687538 706 .unlocked_ioctl = stli_memioctl,
6038f373 707 .llseek = default_llseek,
1da177e4
LT
708};
709
710/*****************************************************************************/
711
712/*
713 * Define a timer_list entry for our poll routine. The slave board
714 * is polled every so often to see if anything needs doing. This is
715 * much cheaper on host cpu than using interrupts. It turns out to
716 * not increase character latency by much either...
717 */
8d06afab 718static DEFINE_TIMER(stli_timerlist, stli_poll, 0, 0);
1da177e4
LT
719
720static int stli_timeron;
721
722/*
723 * Define the calculation for the timeout routine.
724 */
725#define STLI_TIMEOUT (jiffies + 1)
726
727/*****************************************************************************/
728
ca8eca68 729static struct class *istallion_class;
1da177e4 730
1f8ec435 731static void stli_cleanup_ports(struct stlibrd *brdp)
845bead4 732{
1f8ec435 733 struct stliport *portp;
845bead4 734 unsigned int j;
d18a750f 735 struct tty_struct *tty;
845bead4
JS
736
737 for (j = 0; j < STL_MAXPORTS; j++) {
738 portp = brdp->ports[j];
739 if (portp != NULL) {
d18a750f
AC
740 tty = tty_port_tty_get(&portp->port);
741 if (tty != NULL) {
742 tty_hangup(tty);
743 tty_kref_put(tty);
744 }
845bead4
JS
745 kfree(portp);
746 }
747 }
748}
749
1da177e4
LT
750/*****************************************************************************/
751
1da177e4
LT
752/*
753 * Parse the supplied argument string, into the board conf struct.
754 */
755
1f8ec435 756static int stli_parsebrd(struct stlconf *confp, char **argp)
1da177e4 757{
1328d737 758 unsigned int i;
4ac4360b 759 char *sp;
1da177e4 760
4ac4360b
AC
761 if (argp[0] == NULL || *argp[0] == 0)
762 return 0;
1da177e4
LT
763
764 for (sp = argp[0], i = 0; ((*sp != 0) && (i < 25)); sp++, i++)
a3f8d9d5 765 *sp = tolower(*sp);
1da177e4 766
fe971071 767 for (i = 0; i < ARRAY_SIZE(stli_brdstr); i++) {
1da177e4
LT
768 if (strcmp(stli_brdstr[i].name, argp[0]) == 0)
769 break;
770 }
fe971071 771 if (i == ARRAY_SIZE(stli_brdstr)) {
a6614999 772 printk(KERN_WARNING "istallion: unknown board name, %s?\n", argp[0]);
fe971071 773 return 0;
1da177e4
LT
774 }
775
776 confp->brdtype = stli_brdstr[i].type;
4ac4360b 777 if (argp[1] != NULL && *argp[1] != 0)
a3f8d9d5 778 confp->ioaddr1 = simple_strtoul(argp[1], NULL, 0);
4ac4360b 779 if (argp[2] != NULL && *argp[2] != 0)
a3f8d9d5 780 confp->memaddr = simple_strtoul(argp[2], NULL, 0);
1da177e4
LT
781 return(1);
782}
783
1da177e4
LT
784/*****************************************************************************/
785
338818fd
AC
786/*
787 * On the first open of the device setup the port hardware, and
788 * initialize the per port data structure. Since initializing the port
789 * requires several commands to the board we will need to wait for any
790 * other open that is already initializing the port.
791 *
792 * Locking: protected by the port mutex.
793 */
794
795static int stli_activate(struct tty_port *port, struct tty_struct *tty)
796{
797 struct stliport *portp = container_of(port, struct stliport, port);
798 struct stlibrd *brdp = stli_brds[portp->brdnr];
799 int rc;
800
801 if ((rc = stli_initopen(tty, brdp, portp)) >= 0)
802 clear_bit(TTY_IO_ERROR, &tty->flags);
803 wake_up_interruptible(&portp->raw_wait);
804 return rc;
805}
806
1da177e4
LT
807static int stli_open(struct tty_struct *tty, struct file *filp)
808{
1f8ec435
JS
809 struct stlibrd *brdp;
810 struct stliport *portp;
1328d737 811 unsigned int minordev, brdnr, portnr;
1da177e4
LT
812
813 minordev = tty->index;
814 brdnr = MINOR2BRD(minordev);
815 if (brdnr >= stli_nrbrds)
4ac4360b 816 return -ENODEV;
1da177e4 817 brdp = stli_brds[brdnr];
4ac4360b
AC
818 if (brdp == NULL)
819 return -ENODEV;
8a1e803d 820 if (!test_bit(BST_STARTED, &brdp->state))
4ac4360b 821 return -ENODEV;
1da177e4 822 portnr = MINOR2PORT(minordev);
1328d737 823 if (portnr > brdp->nrports)
4ac4360b 824 return -ENODEV;
1da177e4
LT
825
826 portp = brdp->ports[portnr];
4ac4360b
AC
827 if (portp == NULL)
828 return -ENODEV;
1da177e4 829 if (portp->devnr < 1)
4ac4360b 830 return -ENODEV;
a2d1e351
AC
831
832 tty->driver_data = portp;
338818fd 833 return tty_port_open(&portp->port, tty, filp);
1da177e4
LT
834}
835
338818fd 836
1da177e4
LT
837/*****************************************************************************/
838
338818fd 839static void stli_shutdown(struct tty_port *port)
1da177e4 840{
1f8ec435 841 struct stlibrd *brdp;
338818fd 842 unsigned long ftype;
4ac4360b 843 unsigned long flags;
338818fd 844 struct stliport *portp = container_of(port, struct stliport, port);
1da177e4 845
338818fd 846 if (portp->brdnr >= stli_nrbrds)
1da177e4 847 return;
338818fd
AC
848 brdp = stli_brds[portp->brdnr];
849 if (brdp == NULL)
1da177e4 850 return;
1da177e4 851
338818fd
AC
852 /*
853 * May want to wait for data to drain before closing. The BUSY
854 * flag keeps track of whether we are still transmitting or not.
855 * It is updated by messages from the slave - indicating when all
856 * chars really have drained.
857 */
1da177e4 858
338818fd
AC
859 if (!test_bit(ST_CLOSING, &portp->state))
860 stli_rawclose(brdp, portp, 0, 0);
2a6eadbd 861
338818fd 862 spin_lock_irqsave(&stli_lock, flags);
1da177e4
LT
863 clear_bit(ST_TXBUSY, &portp->state);
864 clear_bit(ST_RXSTOP, &portp->state);
338818fd 865 spin_unlock_irqrestore(&stli_lock, flags);
1da177e4 866
338818fd
AC
867 ftype = FLUSHTX | FLUSHRX;
868 stli_cmdwait(brdp, portp, A_FLUSH, &ftype, sizeof(u32), 0);
869}
870
871static void stli_close(struct tty_struct *tty, struct file *filp)
872{
873 struct stliport *portp = tty->driver_data;
874 unsigned long flags;
875 if (portp == NULL)
876 return;
877 spin_lock_irqsave(&stli_lock, flags);
878 /* Flush any internal buffering out first */
879 if (tty == stli_txcooktty)
880 stli_flushchars(tty);
881 spin_unlock_irqrestore(&stli_lock, flags);
882 tty_port_close(&portp->port, tty, filp);
1da177e4
LT
883}
884
885/*****************************************************************************/
886
887/*
888 * Carry out first open operations on a port. This involves a number of
889 * commands to be sent to the slave. We need to open the port, set the
890 * notification events, set the initial port settings, get and set the
891 * initial signal values. We sleep and wait in between each one. But
892 * this still all happens pretty quickly.
893 */
894
d18a750f
AC
895static int stli_initopen(struct tty_struct *tty,
896 struct stlibrd *brdp, struct stliport *portp)
1da177e4 897{
4ac4360b
AC
898 asynotify_t nt;
899 asyport_t aport;
900 int rc;
1da177e4
LT
901
902 if ((rc = stli_rawopen(brdp, portp, 0, 1)) < 0)
4ac4360b 903 return rc;
1da177e4
LT
904
905 memset(&nt, 0, sizeof(asynotify_t));
906 nt.data = (DT_TXLOW | DT_TXEMPTY | DT_RXBUSY | DT_RXBREAK);
907 nt.signal = SG_DCD;
908 if ((rc = stli_cmdwait(brdp, portp, A_SETNOTIFY, &nt,
909 sizeof(asynotify_t), 0)) < 0)
4ac4360b 910 return rc;
1da177e4 911
d18a750f 912 stli_mkasyport(tty, portp, &aport, tty->termios);
1da177e4
LT
913 if ((rc = stli_cmdwait(brdp, portp, A_SETPORT, &aport,
914 sizeof(asyport_t), 0)) < 0)
4ac4360b 915 return rc;
1da177e4
LT
916
917 set_bit(ST_GETSIGS, &portp->state);
918 if ((rc = stli_cmdwait(brdp, portp, A_GETSIGNALS, &portp->asig,
919 sizeof(asysigs_t), 1)) < 0)
4ac4360b 920 return rc;
1da177e4
LT
921 if (test_and_clear_bit(ST_GETSIGS, &portp->state))
922 portp->sigs = stli_mktiocm(portp->asig.sigvalue);
923 stli_mkasysigs(&portp->asig, 1, 1);
924 if ((rc = stli_cmdwait(brdp, portp, A_SETSIGNALS, &portp->asig,
925 sizeof(asysigs_t), 0)) < 0)
4ac4360b 926 return rc;
1da177e4 927
4ac4360b 928 return 0;
1da177e4
LT
929}
930
931/*****************************************************************************/
932
933/*
934 * Send an open message to the slave. This will sleep waiting for the
935 * acknowledgement, so must have user context. We need to co-ordinate
936 * with close events here, since we don't want open and close events
937 * to overlap.
938 */
939
1f8ec435 940static int stli_rawopen(struct stlibrd *brdp, struct stliport *portp, unsigned long arg, int wait)
1da177e4 941{
4ac4360b
AC
942 cdkhdr_t __iomem *hdrp;
943 cdkctrl_t __iomem *cp;
944 unsigned char __iomem *bits;
945 unsigned long flags;
946 int rc;
1da177e4
LT
947
948/*
949 * Send a message to the slave to open this port.
950 */
1da177e4
LT
951
952/*
953 * Slave is already closing this port. This can happen if a hangup
954 * occurs on this port. So we must wait until it is complete. The
955 * order of opens and closes may not be preserved across shared
956 * memory, so we must wait until it is complete.
957 */
be1bc288 958 wait_event_interruptible_tty(portp->raw_wait,
1da177e4
LT
959 !test_bit(ST_CLOSING, &portp->state));
960 if (signal_pending(current)) {
1da177e4
LT
961 return -ERESTARTSYS;
962 }
963
964/*
965 * Everything is ready now, so write the open message into shared
966 * memory. Once the message is in set the service bits to say that
967 * this port wants service.
968 */
4ac4360b 969 spin_lock_irqsave(&brd_lock, flags);
1da177e4 970 EBRDENABLE(brdp);
4ac4360b
AC
971 cp = &((cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr))->ctrl;
972 writel(arg, &cp->openarg);
973 writeb(1, &cp->open);
974 hdrp = (cdkhdr_t __iomem *) EBRDGETMEMPTR(brdp, CDK_CDKADDR);
975 bits = ((unsigned char __iomem *) hdrp) + brdp->slaveoffset +
1da177e4 976 portp->portidx;
4ac4360b 977 writeb(readb(bits) | portp->portbit, bits);
1da177e4
LT
978 EBRDDISABLE(brdp);
979
980 if (wait == 0) {
4ac4360b
AC
981 spin_unlock_irqrestore(&brd_lock, flags);
982 return 0;
1da177e4
LT
983 }
984
985/*
986 * Slave is in action, so now we must wait for the open acknowledgment
987 * to come back.
988 */
989 rc = 0;
990 set_bit(ST_OPENING, &portp->state);
4ac4360b
AC
991 spin_unlock_irqrestore(&brd_lock, flags);
992
be1bc288 993 wait_event_interruptible_tty(portp->raw_wait,
1da177e4
LT
994 !test_bit(ST_OPENING, &portp->state));
995 if (signal_pending(current))
996 rc = -ERESTARTSYS;
1da177e4
LT
997
998 if ((rc == 0) && (portp->rc != 0))
999 rc = -EIO;
4ac4360b 1000 return rc;
1da177e4
LT
1001}
1002
1003/*****************************************************************************/
1004
1005/*
1006 * Send a close message to the slave. Normally this will sleep waiting
1007 * for the acknowledgement, but if wait parameter is 0 it will not. If
1008 * wait is true then must have user context (to sleep).
1009 */
1010
1f8ec435 1011static int stli_rawclose(struct stlibrd *brdp, struct stliport *portp, unsigned long arg, int wait)
1da177e4 1012{
4ac4360b
AC
1013 cdkhdr_t __iomem *hdrp;
1014 cdkctrl_t __iomem *cp;
1015 unsigned char __iomem *bits;
1016 unsigned long flags;
1017 int rc;
1da177e4
LT
1018
1019/*
1020 * Slave is already closing this port. This can happen if a hangup
1021 * occurs on this port.
1022 */
1023 if (wait) {
be1bc288 1024 wait_event_interruptible_tty(portp->raw_wait,
1da177e4
LT
1025 !test_bit(ST_CLOSING, &portp->state));
1026 if (signal_pending(current)) {
1da177e4
LT
1027 return -ERESTARTSYS;
1028 }
1029 }
1030
1031/*
1032 * Write the close command into shared memory.
1033 */
4ac4360b 1034 spin_lock_irqsave(&brd_lock, flags);
1da177e4 1035 EBRDENABLE(brdp);
4ac4360b
AC
1036 cp = &((cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr))->ctrl;
1037 writel(arg, &cp->closearg);
1038 writeb(1, &cp->close);
1039 hdrp = (cdkhdr_t __iomem *) EBRDGETMEMPTR(brdp, CDK_CDKADDR);
1040 bits = ((unsigned char __iomem *) hdrp) + brdp->slaveoffset +
1da177e4 1041 portp->portidx;
4ac4360b 1042 writeb(readb(bits) |portp->portbit, bits);
1da177e4
LT
1043 EBRDDISABLE(brdp);
1044
1045 set_bit(ST_CLOSING, &portp->state);
4ac4360b
AC
1046 spin_unlock_irqrestore(&brd_lock, flags);
1047
1048 if (wait == 0)
1049 return 0;
1da177e4
LT
1050
1051/*
1052 * Slave is in action, so now we must wait for the open acknowledgment
1053 * to come back.
1054 */
1055 rc = 0;
be1bc288 1056 wait_event_interruptible_tty(portp->raw_wait,
1da177e4
LT
1057 !test_bit(ST_CLOSING, &portp->state));
1058 if (signal_pending(current))
1059 rc = -ERESTARTSYS;
1da177e4
LT
1060
1061 if ((rc == 0) && (portp->rc != 0))
1062 rc = -EIO;
4ac4360b 1063 return rc;
1da177e4
LT
1064}
1065
1066/*****************************************************************************/
1067
1068/*
1069 * Send a command to the slave and wait for the response. This must
1070 * have user context (it sleeps). This routine is generic in that it
1071 * can send any type of command. Its purpose is to wait for that command
1072 * to complete (as opposed to initiating the command then returning).
1073 */
1074
1f8ec435 1075static int stli_cmdwait(struct stlibrd *brdp, struct stliport *portp, unsigned long cmd, void *arg, int size, int copyback)
1da177e4 1076{
be1bc288
AB
1077 /*
1078 * no need for wait_event_tty because clearing ST_CMDING cannot block
1079 * on BTM
1080 */
1da177e4
LT
1081 wait_event_interruptible(portp->raw_wait,
1082 !test_bit(ST_CMDING, &portp->state));
4ac4360b 1083 if (signal_pending(current))
1da177e4 1084 return -ERESTARTSYS;
1da177e4
LT
1085
1086 stli_sendcmd(brdp, portp, cmd, arg, size, copyback);
1087
1088 wait_event_interruptible(portp->raw_wait,
1089 !test_bit(ST_CMDING, &portp->state));
4ac4360b 1090 if (signal_pending(current))
1da177e4 1091 return -ERESTARTSYS;
1da177e4
LT
1092
1093 if (portp->rc != 0)
4ac4360b
AC
1094 return -EIO;
1095 return 0;
1da177e4
LT
1096}
1097
1098/*****************************************************************************/
1099
1100/*
1101 * Send the termios settings for this port to the slave. This sleeps
1102 * waiting for the command to complete - so must have user context.
1103 */
1104
d18a750f 1105static int stli_setport(struct tty_struct *tty)
1da177e4 1106{
d18a750f 1107 struct stliport *portp = tty->driver_data;
1f8ec435 1108 struct stlibrd *brdp;
4ac4360b 1109 asyport_t aport;
1da177e4 1110
4ac4360b
AC
1111 if (portp == NULL)
1112 return -ENODEV;
1328d737 1113 if (portp->brdnr >= stli_nrbrds)
4ac4360b 1114 return -ENODEV;
1da177e4 1115 brdp = stli_brds[portp->brdnr];
4ac4360b
AC
1116 if (brdp == NULL)
1117 return -ENODEV;
1da177e4 1118
d18a750f 1119 stli_mkasyport(tty, portp, &aport, tty->termios);
1da177e4
LT
1120 return(stli_cmdwait(brdp, portp, A_SETPORT, &aport, sizeof(asyport_t), 0));
1121}
1122
1123/*****************************************************************************/
1124
31f35939
AC
1125static int stli_carrier_raised(struct tty_port *port)
1126{
1127 struct stliport *portp = container_of(port, struct stliport, port);
1128 return (portp->sigs & TIOCM_CD) ? 1 : 0;
1129}
1130
fcc8ac18 1131static void stli_dtr_rts(struct tty_port *port, int on)
1da177e4 1132{
2a6eadbd
AC
1133 struct stliport *portp = container_of(port, struct stliport, port);
1134 struct stlibrd *brdp = stli_brds[portp->brdnr];
fcc8ac18 1135 stli_mkasysigs(&portp->asig, on, on);
2a6eadbd
AC
1136 if (stli_cmdwait(brdp, portp, A_SETSIGNALS, &portp->asig,
1137 sizeof(asysigs_t), 0) < 0)
fcc8ac18 1138 printk(KERN_WARNING "istallion: dtr set failed.\n");
1da177e4
LT
1139}
1140
2a6eadbd 1141
1da177e4
LT
1142/*****************************************************************************/
1143
1144/*
1145 * Write routine. Take the data and put it in the shared memory ring
1146 * queue. If port is not already sending chars then need to mark the
1147 * service bits for this port.
1148 */
1149
1150static int stli_write(struct tty_struct *tty, const unsigned char *buf, int count)
1151{
4ac4360b
AC
1152 cdkasy_t __iomem *ap;
1153 cdkhdr_t __iomem *hdrp;
1154 unsigned char __iomem *bits;
1155 unsigned char __iomem *shbuf;
1156 unsigned char *chbuf;
1f8ec435
JS
1157 struct stliport *portp;
1158 struct stlibrd *brdp;
4ac4360b
AC
1159 unsigned int len, stlen, head, tail, size;
1160 unsigned long flags;
1da177e4 1161
1da177e4
LT
1162 if (tty == stli_txcooktty)
1163 stli_flushchars(tty);
1164 portp = tty->driver_data;
4ac4360b
AC
1165 if (portp == NULL)
1166 return 0;
1328d737 1167 if (portp->brdnr >= stli_nrbrds)
4ac4360b 1168 return 0;
1da177e4 1169 brdp = stli_brds[portp->brdnr];
4ac4360b
AC
1170 if (brdp == NULL)
1171 return 0;
1da177e4
LT
1172 chbuf = (unsigned char *) buf;
1173
1174/*
1175 * All data is now local, shove as much as possible into shared memory.
1176 */
4ac4360b 1177 spin_lock_irqsave(&brd_lock, flags);
1da177e4 1178 EBRDENABLE(brdp);
4ac4360b
AC
1179 ap = (cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr);
1180 head = (unsigned int) readw(&ap->txq.head);
1181 tail = (unsigned int) readw(&ap->txq.tail);
1182 if (tail != ((unsigned int) readw(&ap->txq.tail)))
1183 tail = (unsigned int) readw(&ap->txq.tail);
1da177e4
LT
1184 size = portp->txsize;
1185 if (head >= tail) {
1186 len = size - (head - tail) - 1;
1187 stlen = size - head;
1188 } else {
1189 len = tail - head - 1;
1190 stlen = len;
1191 }
1192
a3f8d9d5 1193 len = min(len, (unsigned int)count);
1da177e4 1194 count = 0;
4ac4360b 1195 shbuf = (char __iomem *) EBRDGETMEMPTR(brdp, portp->txoffset);
1da177e4
LT
1196
1197 while (len > 0) {
a3f8d9d5 1198 stlen = min(len, stlen);
4ac4360b 1199 memcpy_toio(shbuf + head, chbuf, stlen);
1da177e4
LT
1200 chbuf += stlen;
1201 len -= stlen;
1202 count += stlen;
1203 head += stlen;
1204 if (head >= size) {
1205 head = 0;
1206 stlen = tail;
1207 }
1208 }
1209
4ac4360b
AC
1210 ap = (cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr);
1211 writew(head, &ap->txq.head);
1da177e4 1212 if (test_bit(ST_TXBUSY, &portp->state)) {
4ac4360b
AC
1213 if (readl(&ap->changed.data) & DT_TXEMPTY)
1214 writel(readl(&ap->changed.data) & ~DT_TXEMPTY, &ap->changed.data);
1da177e4 1215 }
4ac4360b
AC
1216 hdrp = (cdkhdr_t __iomem *) EBRDGETMEMPTR(brdp, CDK_CDKADDR);
1217 bits = ((unsigned char __iomem *) hdrp) + brdp->slaveoffset +
1da177e4 1218 portp->portidx;
4ac4360b 1219 writeb(readb(bits) | portp->portbit, bits);
1da177e4
LT
1220 set_bit(ST_TXBUSY, &portp->state);
1221 EBRDDISABLE(brdp);
4ac4360b 1222 spin_unlock_irqrestore(&brd_lock, flags);
1da177e4
LT
1223
1224 return(count);
1225}
1226
1227/*****************************************************************************/
1228
1229/*
1230 * Output a single character. We put it into a temporary local buffer
1231 * (for speed) then write out that buffer when the flushchars routine
1232 * is called. There is a safety catch here so that if some other port
1233 * writes chars before the current buffer has been, then we write them
1234 * first them do the new ports.
1235 */
1236
42a77a1b 1237static int stli_putchar(struct tty_struct *tty, unsigned char ch)
1da177e4 1238{
1da177e4 1239 if (tty != stli_txcooktty) {
4ac4360b 1240 if (stli_txcooktty != NULL)
1da177e4
LT
1241 stli_flushchars(stli_txcooktty);
1242 stli_txcooktty = tty;
1243 }
1244
1245 stli_txcookbuf[stli_txcooksize++] = ch;
42a77a1b 1246 return 0;
1da177e4
LT
1247}
1248
1249/*****************************************************************************/
1250
1251/*
1252 * Transfer characters from the local TX cooking buffer to the board.
1253 * We sort of ignore the tty that gets passed in here. We rely on the
1254 * info stored with the TX cook buffer to tell us which port to flush
1255 * the data on. In any case we clean out the TX cook buffer, for re-use
1256 * by someone else.
1257 */
1258
1259static void stli_flushchars(struct tty_struct *tty)
1260{
4ac4360b
AC
1261 cdkhdr_t __iomem *hdrp;
1262 unsigned char __iomem *bits;
1263 cdkasy_t __iomem *ap;
1264 struct tty_struct *cooktty;
1f8ec435
JS
1265 struct stliport *portp;
1266 struct stlibrd *brdp;
4ac4360b
AC
1267 unsigned int len, stlen, head, tail, size, count, cooksize;
1268 unsigned char *buf;
1269 unsigned char __iomem *shbuf;
1270 unsigned long flags;
1da177e4
LT
1271
1272 cooksize = stli_txcooksize;
1273 cooktty = stli_txcooktty;
1274 stli_txcooksize = 0;
1275 stli_txcookrealsize = 0;
4ac4360b 1276 stli_txcooktty = NULL;
1da177e4 1277
4ac4360b 1278 if (cooktty == NULL)
1da177e4
LT
1279 return;
1280 if (tty != cooktty)
1281 tty = cooktty;
1282 if (cooksize == 0)
1283 return;
1284
1285 portp = tty->driver_data;
4ac4360b 1286 if (portp == NULL)
1da177e4 1287 return;
1328d737 1288 if (portp->brdnr >= stli_nrbrds)
1da177e4
LT
1289 return;
1290 brdp = stli_brds[portp->brdnr];
4ac4360b 1291 if (brdp == NULL)
1da177e4
LT
1292 return;
1293
4ac4360b 1294 spin_lock_irqsave(&brd_lock, flags);
1da177e4
LT
1295 EBRDENABLE(brdp);
1296
4ac4360b
AC
1297 ap = (cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr);
1298 head = (unsigned int) readw(&ap->txq.head);
1299 tail = (unsigned int) readw(&ap->txq.tail);
1300 if (tail != ((unsigned int) readw(&ap->txq.tail)))
1301 tail = (unsigned int) readw(&ap->txq.tail);
1da177e4
LT
1302 size = portp->txsize;
1303 if (head >= tail) {
1304 len = size - (head - tail) - 1;
1305 stlen = size - head;
1306 } else {
1307 len = tail - head - 1;
1308 stlen = len;
1309 }
1310
a3f8d9d5 1311 len = min(len, cooksize);
1da177e4 1312 count = 0;
29756fa3 1313 shbuf = EBRDGETMEMPTR(brdp, portp->txoffset);
1da177e4
LT
1314 buf = stli_txcookbuf;
1315
1316 while (len > 0) {
a3f8d9d5 1317 stlen = min(len, stlen);
4ac4360b 1318 memcpy_toio(shbuf + head, buf, stlen);
1da177e4
LT
1319 buf += stlen;
1320 len -= stlen;
1321 count += stlen;
1322 head += stlen;
1323 if (head >= size) {
1324 head = 0;
1325 stlen = tail;
1326 }
1327 }
1328
4ac4360b
AC
1329 ap = (cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr);
1330 writew(head, &ap->txq.head);
1da177e4
LT
1331
1332 if (test_bit(ST_TXBUSY, &portp->state)) {
4ac4360b
AC
1333 if (readl(&ap->changed.data) & DT_TXEMPTY)
1334 writel(readl(&ap->changed.data) & ~DT_TXEMPTY, &ap->changed.data);
1da177e4 1335 }
4ac4360b
AC
1336 hdrp = (cdkhdr_t __iomem *) EBRDGETMEMPTR(brdp, CDK_CDKADDR);
1337 bits = ((unsigned char __iomem *) hdrp) + brdp->slaveoffset +
1da177e4 1338 portp->portidx;
4ac4360b 1339 writeb(readb(bits) | portp->portbit, bits);
1da177e4
LT
1340 set_bit(ST_TXBUSY, &portp->state);
1341
1342 EBRDDISABLE(brdp);
4ac4360b 1343 spin_unlock_irqrestore(&brd_lock, flags);
1da177e4
LT
1344}
1345
1346/*****************************************************************************/
1347
1348static int stli_writeroom(struct tty_struct *tty)
1349{
4ac4360b 1350 cdkasyrq_t __iomem *rp;
1f8ec435
JS
1351 struct stliport *portp;
1352 struct stlibrd *brdp;
4ac4360b
AC
1353 unsigned int head, tail, len;
1354 unsigned long flags;
1da177e4 1355
1da177e4
LT
1356 if (tty == stli_txcooktty) {
1357 if (stli_txcookrealsize != 0) {
1358 len = stli_txcookrealsize - stli_txcooksize;
4ac4360b 1359 return len;
1da177e4
LT
1360 }
1361 }
1362
1363 portp = tty->driver_data;
4ac4360b
AC
1364 if (portp == NULL)
1365 return 0;
1328d737 1366 if (portp->brdnr >= stli_nrbrds)
4ac4360b 1367 return 0;
1da177e4 1368 brdp = stli_brds[portp->brdnr];
4ac4360b
AC
1369 if (brdp == NULL)
1370 return 0;
1da177e4 1371
4ac4360b 1372 spin_lock_irqsave(&brd_lock, flags);
1da177e4 1373 EBRDENABLE(brdp);
4ac4360b
AC
1374 rp = &((cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr))->txq;
1375 head = (unsigned int) readw(&rp->head);
1376 tail = (unsigned int) readw(&rp->tail);
1377 if (tail != ((unsigned int) readw(&rp->tail)))
1378 tail = (unsigned int) readw(&rp->tail);
1da177e4
LT
1379 len = (head >= tail) ? (portp->txsize - (head - tail)) : (tail - head);
1380 len--;
1381 EBRDDISABLE(brdp);
4ac4360b 1382 spin_unlock_irqrestore(&brd_lock, flags);
1da177e4
LT
1383
1384 if (tty == stli_txcooktty) {
1385 stli_txcookrealsize = len;
1386 len -= stli_txcooksize;
1387 }
4ac4360b 1388 return len;
1da177e4
LT
1389}
1390
1391/*****************************************************************************/
1392
1393/*
1394 * Return the number of characters in the transmit buffer. Normally we
1395 * will return the number of chars in the shared memory ring queue.
1396 * We need to kludge around the case where the shared memory buffer is
1397 * empty but not all characters have drained yet, for this case just
1398 * return that there is 1 character in the buffer!
1399 */
1400
1401static int stli_charsinbuffer(struct tty_struct *tty)
1402{
4ac4360b 1403 cdkasyrq_t __iomem *rp;
1f8ec435
JS
1404 struct stliport *portp;
1405 struct stlibrd *brdp;
4ac4360b
AC
1406 unsigned int head, tail, len;
1407 unsigned long flags;
1da177e4 1408
1da177e4
LT
1409 if (tty == stli_txcooktty)
1410 stli_flushchars(tty);
1411 portp = tty->driver_data;
4ac4360b
AC
1412 if (portp == NULL)
1413 return 0;
1328d737 1414 if (portp->brdnr >= stli_nrbrds)
4ac4360b 1415 return 0;
1da177e4 1416 brdp = stli_brds[portp->brdnr];
4ac4360b
AC
1417 if (brdp == NULL)
1418 return 0;
1da177e4 1419
4ac4360b 1420 spin_lock_irqsave(&brd_lock, flags);
1da177e4 1421 EBRDENABLE(brdp);
4ac4360b
AC
1422 rp = &((cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr))->txq;
1423 head = (unsigned int) readw(&rp->head);
1424 tail = (unsigned int) readw(&rp->tail);
1425 if (tail != ((unsigned int) readw(&rp->tail)))
1426 tail = (unsigned int) readw(&rp->tail);
1da177e4
LT
1427 len = (head >= tail) ? (head - tail) : (portp->txsize - (tail - head));
1428 if ((len == 0) && test_bit(ST_TXBUSY, &portp->state))
1429 len = 1;
1430 EBRDDISABLE(brdp);
4ac4360b 1431 spin_unlock_irqrestore(&brd_lock, flags);
1da177e4 1432
4ac4360b 1433 return len;
1da177e4
LT
1434}
1435
1436/*****************************************************************************/
1437
1438/*
1439 * Generate the serial struct info.
1440 */
1441
1f8ec435 1442static int stli_getserial(struct stliport *portp, struct serial_struct __user *sp)
1da177e4 1443{
4ac4360b 1444 struct serial_struct sio;
1f8ec435 1445 struct stlibrd *brdp;
1da177e4
LT
1446
1447 memset(&sio, 0, sizeof(struct serial_struct));
1448 sio.type = PORT_UNKNOWN;
1449 sio.line = portp->portnr;
1450 sio.irq = 0;
b02f5ad6 1451 sio.flags = portp->port.flags;
1da177e4 1452 sio.baud_base = portp->baud_base;
a6614999 1453 sio.close_delay = portp->port.close_delay;
1da177e4
LT
1454 sio.closing_wait = portp->closing_wait;
1455 sio.custom_divisor = portp->custom_divisor;
1456 sio.xmit_fifo_size = 0;
1457 sio.hub6 = 0;
1458
1459 brdp = stli_brds[portp->brdnr];
4ac4360b 1460 if (brdp != NULL)
1da177e4
LT
1461 sio.port = brdp->iobase;
1462
1463 return copy_to_user(sp, &sio, sizeof(struct serial_struct)) ?
1464 -EFAULT : 0;
1465}
1466
1467/*****************************************************************************/
1468
1469/*
1470 * Set port according to the serial struct info.
1471 * At this point we do not do any auto-configure stuff, so we will
1472 * just quietly ignore any requests to change irq, etc.
1473 */
1474
d18a750f 1475static int stli_setserial(struct tty_struct *tty, struct serial_struct __user *sp)
1da177e4 1476{
4ac4360b
AC
1477 struct serial_struct sio;
1478 int rc;
d18a750f 1479 struct stliport *portp = tty->driver_data;
1da177e4
LT
1480
1481 if (copy_from_user(&sio, sp, sizeof(struct serial_struct)))
1482 return -EFAULT;
1483 if (!capable(CAP_SYS_ADMIN)) {
1484 if ((sio.baud_base != portp->baud_base) ||
a6614999 1485 (sio.close_delay != portp->port.close_delay) ||
1da177e4 1486 ((sio.flags & ~ASYNC_USR_MASK) !=
b02f5ad6 1487 (portp->port.flags & ~ASYNC_USR_MASK)))
4ac4360b 1488 return -EPERM;
1da177e4
LT
1489 }
1490
b02f5ad6 1491 portp->port.flags = (portp->port.flags & ~ASYNC_USR_MASK) |
1da177e4
LT
1492 (sio.flags & ASYNC_USR_MASK);
1493 portp->baud_base = sio.baud_base;
a6614999 1494 portp->port.close_delay = sio.close_delay;
1da177e4
LT
1495 portp->closing_wait = sio.closing_wait;
1496 portp->custom_divisor = sio.custom_divisor;
1497
d18a750f 1498 if ((rc = stli_setport(tty)) < 0)
4ac4360b
AC
1499 return rc;
1500 return 0;
1da177e4
LT
1501}
1502
1503/*****************************************************************************/
1504
1505static int stli_tiocmget(struct tty_struct *tty, struct file *file)
1506{
1f8ec435
JS
1507 struct stliport *portp = tty->driver_data;
1508 struct stlibrd *brdp;
1da177e4
LT
1509 int rc;
1510
4ac4360b
AC
1511 if (portp == NULL)
1512 return -ENODEV;
1328d737 1513 if (portp->brdnr >= stli_nrbrds)
4ac4360b 1514 return 0;
1da177e4 1515 brdp = stli_brds[portp->brdnr];
4ac4360b
AC
1516 if (brdp == NULL)
1517 return 0;
1da177e4 1518 if (tty->flags & (1 << TTY_IO_ERROR))
4ac4360b 1519 return -EIO;
1da177e4
LT
1520
1521 if ((rc = stli_cmdwait(brdp, portp, A_GETSIGNALS,
1522 &portp->asig, sizeof(asysigs_t), 1)) < 0)
4ac4360b 1523 return rc;
1da177e4
LT
1524
1525 return stli_mktiocm(portp->asig.sigvalue);
1526}
1527
1528static int stli_tiocmset(struct tty_struct *tty, struct file *file,
1529 unsigned int set, unsigned int clear)
1530{
1f8ec435
JS
1531 struct stliport *portp = tty->driver_data;
1532 struct stlibrd *brdp;
1da177e4
LT
1533 int rts = -1, dtr = -1;
1534
4ac4360b
AC
1535 if (portp == NULL)
1536 return -ENODEV;
1328d737 1537 if (portp->brdnr >= stli_nrbrds)
4ac4360b 1538 return 0;
1da177e4 1539 brdp = stli_brds[portp->brdnr];
4ac4360b
AC
1540 if (brdp == NULL)
1541 return 0;
1da177e4 1542 if (tty->flags & (1 << TTY_IO_ERROR))
4ac4360b 1543 return -EIO;
1da177e4
LT
1544
1545 if (set & TIOCM_RTS)
1546 rts = 1;
1547 if (set & TIOCM_DTR)
1548 dtr = 1;
1549 if (clear & TIOCM_RTS)
1550 rts = 0;
1551 if (clear & TIOCM_DTR)
1552 dtr = 0;
1553
1554 stli_mkasysigs(&portp->asig, dtr, rts);
1555
1556 return stli_cmdwait(brdp, portp, A_SETSIGNALS, &portp->asig,
1557 sizeof(asysigs_t), 0);
1558}
1559
1560static int stli_ioctl(struct tty_struct *tty, struct file *file, unsigned int cmd, unsigned long arg)
1561{
1f8ec435
JS
1562 struct stliport *portp;
1563 struct stlibrd *brdp;
4ac4360b 1564 int rc;
1da177e4
LT
1565 void __user *argp = (void __user *)arg;
1566
1da177e4 1567 portp = tty->driver_data;
4ac4360b
AC
1568 if (portp == NULL)
1569 return -ENODEV;
1328d737 1570 if (portp->brdnr >= stli_nrbrds)
4ac4360b 1571 return 0;
1da177e4 1572 brdp = stli_brds[portp->brdnr];
4ac4360b
AC
1573 if (brdp == NULL)
1574 return 0;
1da177e4
LT
1575
1576 if ((cmd != TIOCGSERIAL) && (cmd != TIOCSSERIAL) &&
1577 (cmd != COM_GETPORTSTATS) && (cmd != COM_CLRPORTSTATS)) {
1578 if (tty->flags & (1 << TTY_IO_ERROR))
4ac4360b 1579 return -EIO;
1da177e4
LT
1580 }
1581
1582 rc = 0;
1583
1584 switch (cmd) {
1da177e4
LT
1585 case TIOCGSERIAL:
1586 rc = stli_getserial(portp, argp);
1587 break;
1588 case TIOCSSERIAL:
d18a750f 1589 rc = stli_setserial(tty, argp);
1da177e4
LT
1590 break;
1591 case STL_GETPFLAG:
1592 rc = put_user(portp->pflag, (unsigned __user *)argp);
1593 break;
1594 case STL_SETPFLAG:
1595 if ((rc = get_user(portp->pflag, (unsigned __user *)argp)) == 0)
d18a750f 1596 stli_setport(tty);
1da177e4
LT
1597 break;
1598 case COM_GETPORTSTATS:
d18a750f 1599 rc = stli_getportstats(tty, portp, argp);
1da177e4
LT
1600 break;
1601 case COM_CLRPORTSTATS:
1602 rc = stli_clrportstats(portp, argp);
1603 break;
1604 case TIOCSERCONFIG:
1605 case TIOCSERGWILD:
1606 case TIOCSERSWILD:
1607 case TIOCSERGETLSR:
1608 case TIOCSERGSTRUCT:
1609 case TIOCSERGETMULTI:
1610 case TIOCSERSETMULTI:
1611 default:
1612 rc = -ENOIOCTLCMD;
1613 break;
1614 }
1615
4ac4360b 1616 return rc;
1da177e4
LT
1617}
1618
1619/*****************************************************************************/
1620
1621/*
1622 * This routine assumes that we have user context and can sleep.
1623 * Looks like it is true for the current ttys implementation..!!
1624 */
1625
606d099c 1626static void stli_settermios(struct tty_struct *tty, struct ktermios *old)
1da177e4 1627{
1f8ec435
JS
1628 struct stliport *portp;
1629 struct stlibrd *brdp;
606d099c 1630 struct ktermios *tiosp;
4ac4360b 1631 asyport_t aport;
1da177e4 1632
1da177e4 1633 portp = tty->driver_data;
4ac4360b 1634 if (portp == NULL)
1da177e4 1635 return;
1328d737 1636 if (portp->brdnr >= stli_nrbrds)
1da177e4
LT
1637 return;
1638 brdp = stli_brds[portp->brdnr];
4ac4360b 1639 if (brdp == NULL)
1da177e4
LT
1640 return;
1641
1642 tiosp = tty->termios;
1da177e4 1643
d18a750f 1644 stli_mkasyport(tty, portp, &aport, tiosp);
1da177e4
LT
1645 stli_cmdwait(brdp, portp, A_SETPORT, &aport, sizeof(asyport_t), 0);
1646 stli_mkasysigs(&portp->asig, ((tiosp->c_cflag & CBAUD) ? 1 : 0), -1);
1647 stli_cmdwait(brdp, portp, A_SETSIGNALS, &portp->asig,
1648 sizeof(asysigs_t), 0);
1649 if ((old->c_cflag & CRTSCTS) && ((tiosp->c_cflag & CRTSCTS) == 0))
1650 tty->hw_stopped = 0;
1651 if (((old->c_cflag & CLOCAL) == 0) && (tiosp->c_cflag & CLOCAL))
b02f5ad6 1652 wake_up_interruptible(&portp->port.open_wait);
1da177e4
LT
1653}
1654
1655/*****************************************************************************/
1656
1657/*
1658 * Attempt to flow control who ever is sending us data. We won't really
1659 * do any flow control action here. We can't directly, and even if we
1660 * wanted to we would have to send a command to the slave. The slave
1661 * knows how to flow control, and will do so when its buffers reach its
1662 * internal high water marks. So what we will do is set a local state
1663 * bit that will stop us sending any RX data up from the poll routine
1664 * (which is the place where RX data from the slave is handled).
1665 */
1666
1667static void stli_throttle(struct tty_struct *tty)
1668{
1f8ec435 1669 struct stliport *portp = tty->driver_data;
4ac4360b 1670 if (portp == NULL)
1da177e4 1671 return;
1da177e4
LT
1672 set_bit(ST_RXSTOP, &portp->state);
1673}
1674
1675/*****************************************************************************/
1676
1677/*
1678 * Unflow control the device sending us data... That means that all
1679 * we have to do is clear the RXSTOP state bit. The next poll call
1680 * will then be able to pass the RX data back up.
1681 */
1682
1683static void stli_unthrottle(struct tty_struct *tty)
1684{
1f8ec435 1685 struct stliport *portp = tty->driver_data;
4ac4360b 1686 if (portp == NULL)
1da177e4 1687 return;
1da177e4
LT
1688 clear_bit(ST_RXSTOP, &portp->state);
1689}
1690
1691/*****************************************************************************/
1692
1693/*
4ac4360b 1694 * Stop the transmitter.
1da177e4
LT
1695 */
1696
1697static void stli_stop(struct tty_struct *tty)
1698{
1da177e4
LT
1699}
1700
1701/*****************************************************************************/
1702
1703/*
4ac4360b 1704 * Start the transmitter again.
1da177e4
LT
1705 */
1706
1707static void stli_start(struct tty_struct *tty)
1708{
1da177e4
LT
1709}
1710
1711/*****************************************************************************/
1712
338818fd 1713
1da177e4
LT
1714/*
1715 * Hangup this port. This is pretty much like closing the port, only
1716 * a little more brutal. No waiting for data to drain. Shutdown the
1717 * port and maybe drop signals. This is rather tricky really. We want
1718 * to close the port as well.
1719 */
1720
1721static void stli_hangup(struct tty_struct *tty)
1722{
338818fd
AC
1723 struct stliport *portp = tty->driver_data;
1724 tty_port_hangup(&portp->port);
1da177e4
LT
1725}
1726
1727/*****************************************************************************/
1728
1729/*
1730 * Flush characters from the lower buffer. We may not have user context
1731 * so we cannot sleep waiting for it to complete. Also we need to check
1732 * if there is chars for this port in the TX cook buffer, and flush them
1733 * as well.
1734 */
1735
1736static void stli_flushbuffer(struct tty_struct *tty)
1737{
1f8ec435
JS
1738 struct stliport *portp;
1739 struct stlibrd *brdp;
4ac4360b 1740 unsigned long ftype, flags;
1da177e4 1741
1da177e4 1742 portp = tty->driver_data;
4ac4360b 1743 if (portp == NULL)
1da177e4 1744 return;
1328d737 1745 if (portp->brdnr >= stli_nrbrds)
1da177e4
LT
1746 return;
1747 brdp = stli_brds[portp->brdnr];
4ac4360b 1748 if (brdp == NULL)
1da177e4
LT
1749 return;
1750
4ac4360b 1751 spin_lock_irqsave(&brd_lock, flags);
1da177e4 1752 if (tty == stli_txcooktty) {
4ac4360b 1753 stli_txcooktty = NULL;
1da177e4
LT
1754 stli_txcooksize = 0;
1755 stli_txcookrealsize = 0;
1756 }
1757 if (test_bit(ST_CMDING, &portp->state)) {
1758 set_bit(ST_DOFLUSHTX, &portp->state);
1759 } else {
1760 ftype = FLUSHTX;
1761 if (test_bit(ST_DOFLUSHRX, &portp->state)) {
1762 ftype |= FLUSHRX;
1763 clear_bit(ST_DOFLUSHRX, &portp->state);
1764 }
4ac4360b 1765 __stli_sendcmd(brdp, portp, A_FLUSH, &ftype, sizeof(u32), 0);
1da177e4 1766 }
4ac4360b
AC
1767 spin_unlock_irqrestore(&brd_lock, flags);
1768 tty_wakeup(tty);
1da177e4
LT
1769}
1770
1771/*****************************************************************************/
1772
9e98966c 1773static int stli_breakctl(struct tty_struct *tty, int state)
1da177e4 1774{
1f8ec435
JS
1775 struct stlibrd *brdp;
1776 struct stliport *portp;
1da177e4 1777 long arg;
1da177e4 1778
1da177e4 1779 portp = tty->driver_data;
4ac4360b 1780 if (portp == NULL)
9e98966c 1781 return -EINVAL;
1328d737 1782 if (portp->brdnr >= stli_nrbrds)
9e98966c 1783 return -EINVAL;
1da177e4 1784 brdp = stli_brds[portp->brdnr];
4ac4360b 1785 if (brdp == NULL)
9e98966c 1786 return -EINVAL;
1da177e4 1787
1da177e4
LT
1788 arg = (state == -1) ? BREAKON : BREAKOFF;
1789 stli_cmdwait(brdp, portp, A_BREAK, &arg, sizeof(long), 0);
9e98966c 1790 return 0;
1da177e4
LT
1791}
1792
1793/*****************************************************************************/
1794
1795static void stli_waituntilsent(struct tty_struct *tty, int timeout)
1796{
1f8ec435 1797 struct stliport *portp;
4ac4360b 1798 unsigned long tend;
1da177e4 1799
1da177e4 1800 portp = tty->driver_data;
4ac4360b 1801 if (portp == NULL)
1da177e4
LT
1802 return;
1803
1804 if (timeout == 0)
1805 timeout = HZ;
1806 tend = jiffies + timeout;
1807
1808 while (test_bit(ST_TXBUSY, &portp->state)) {
1809 if (signal_pending(current))
1810 break;
1811 msleep_interruptible(20);
1812 if (time_after_eq(jiffies, tend))
1813 break;
1814 }
1815}
1816
1817/*****************************************************************************/
1818
1819static void stli_sendxchar(struct tty_struct *tty, char ch)
1820{
1f8ec435
JS
1821 struct stlibrd *brdp;
1822 struct stliport *portp;
1da177e4
LT
1823 asyctrl_t actrl;
1824
1da177e4 1825 portp = tty->driver_data;
4ac4360b 1826 if (portp == NULL)
1da177e4 1827 return;
1328d737 1828 if (portp->brdnr >= stli_nrbrds)
1da177e4
LT
1829 return;
1830 brdp = stli_brds[portp->brdnr];
4ac4360b 1831 if (brdp == NULL)
1da177e4
LT
1832 return;
1833
1834 memset(&actrl, 0, sizeof(asyctrl_t));
1835 if (ch == STOP_CHAR(tty)) {
1836 actrl.rxctrl = CT_STOPFLOW;
1837 } else if (ch == START_CHAR(tty)) {
1838 actrl.rxctrl = CT_STARTFLOW;
1839 } else {
1840 actrl.txctrl = CT_SENDCHR;
1841 actrl.tximdch = ch;
1842 }
1da177e4
LT
1843 stli_cmdwait(brdp, portp, A_PORTCTRL, &actrl, sizeof(asyctrl_t), 0);
1844}
1845
5bd6de7d 1846static void stli_portinfo(struct seq_file *m, struct stlibrd *brdp, struct stliport *portp, int portnr)
1da177e4 1847{
5bd6de7d
AD
1848 char *uart;
1849 int rc;
1da177e4 1850
d18a750f 1851 rc = stli_portcmdstats(NULL, portp);
1da177e4
LT
1852
1853 uart = "UNKNOWN";
8a1e803d 1854 if (test_bit(BST_STARTED, &brdp->state)) {
1da177e4 1855 switch (stli_comstats.hwid) {
4ac4360b
AC
1856 case 0: uart = "2681"; break;
1857 case 1: uart = "SC26198"; break;
1858 default:uart = "CD1400"; break;
1da177e4
LT
1859 }
1860 }
5bd6de7d 1861 seq_printf(m, "%d: uart:%s ", portnr, uart);
1da177e4 1862
8a1e803d 1863 if (test_bit(BST_STARTED, &brdp->state) && rc >= 0) {
5bd6de7d
AD
1864 char sep;
1865
1866 seq_printf(m, "tx:%d rx:%d", (int) stli_comstats.txtotal,
1da177e4
LT
1867 (int) stli_comstats.rxtotal);
1868
1869 if (stli_comstats.rxframing)
5bd6de7d 1870 seq_printf(m, " fe:%d",
1da177e4
LT
1871 (int) stli_comstats.rxframing);
1872 if (stli_comstats.rxparity)
5bd6de7d 1873 seq_printf(m, " pe:%d",
1da177e4
LT
1874 (int) stli_comstats.rxparity);
1875 if (stli_comstats.rxbreaks)
5bd6de7d 1876 seq_printf(m, " brk:%d",
1da177e4
LT
1877 (int) stli_comstats.rxbreaks);
1878 if (stli_comstats.rxoverrun)
5bd6de7d 1879 seq_printf(m, " oe:%d",
1da177e4
LT
1880 (int) stli_comstats.rxoverrun);
1881
5bd6de7d
AD
1882 sep = ' ';
1883 if (stli_comstats.signals & TIOCM_RTS) {
1884 seq_printf(m, "%c%s", sep, "RTS");
1885 sep = '|';
1886 }
1887 if (stli_comstats.signals & TIOCM_CTS) {
1888 seq_printf(m, "%c%s", sep, "CTS");
1889 sep = '|';
1890 }
1891 if (stli_comstats.signals & TIOCM_DTR) {
1892 seq_printf(m, "%c%s", sep, "DTR");
1893 sep = '|';
1894 }
1895 if (stli_comstats.signals & TIOCM_CD) {
1896 seq_printf(m, "%c%s", sep, "DCD");
1897 sep = '|';
1898 }
1899 if (stli_comstats.signals & TIOCM_DSR) {
1900 seq_printf(m, "%c%s", sep, "DSR");
1901 sep = '|';
1902 }
1da177e4 1903 }
5bd6de7d 1904 seq_putc(m, '\n');
1da177e4
LT
1905}
1906
1907/*****************************************************************************/
1908
1909/*
1910 * Port info, read from the /proc file system.
1911 */
1912
5bd6de7d 1913static int stli_proc_show(struct seq_file *m, void *v)
1da177e4 1914{
1f8ec435
JS
1915 struct stlibrd *brdp;
1916 struct stliport *portp;
1328d737 1917 unsigned int brdnr, portnr, totalport;
1da177e4 1918
1da177e4 1919 totalport = 0;
5bd6de7d
AD
1920
1921 seq_printf(m, "%s: version %s\n", stli_drvtitle, stli_drvversion);
1da177e4
LT
1922
1923/*
1924 * We scan through for each board, panel and port. The offset is
1925 * calculated on the fly, and irrelevant ports are skipped.
1926 */
1927 for (brdnr = 0; (brdnr < stli_nrbrds); brdnr++) {
1928 brdp = stli_brds[brdnr];
4ac4360b 1929 if (brdp == NULL)
1da177e4
LT
1930 continue;
1931 if (brdp->state == 0)
1932 continue;
1933
1da177e4
LT
1934 totalport = brdnr * STL_MAXPORTS;
1935 for (portnr = 0; (portnr < brdp->nrports); portnr++,
1936 totalport++) {
1937 portp = brdp->ports[portnr];
4ac4360b 1938 if (portp == NULL)
1da177e4 1939 continue;
5bd6de7d 1940 stli_portinfo(m, brdp, portp, totalport);
1da177e4
LT
1941 }
1942 }
5bd6de7d
AD
1943 return 0;
1944}
1da177e4 1945
5bd6de7d
AD
1946static int stli_proc_open(struct inode *inode, struct file *file)
1947{
1948 return single_open(file, stli_proc_show, NULL);
1da177e4
LT
1949}
1950
5bd6de7d
AD
1951static const struct file_operations stli_proc_fops = {
1952 .owner = THIS_MODULE,
1953 .open = stli_proc_open,
1954 .read = seq_read,
1955 .llseek = seq_lseek,
1956 .release = single_release,
1957};
1958
1da177e4
LT
1959/*****************************************************************************/
1960
1961/*
1962 * Generic send command routine. This will send a message to the slave,
1963 * of the specified type with the specified argument. Must be very
1964 * careful of data that will be copied out from shared memory -
1965 * containing command results. The command completion is all done from
1966 * a poll routine that does not have user context. Therefore you cannot
1967 * copy back directly into user space, or to the kernel stack of a
1968 * process. This routine does not sleep, so can be called from anywhere.
4ac4360b
AC
1969 *
1970 * The caller must hold the brd_lock (see also stli_sendcmd the usual
1971 * entry point)
1da177e4
LT
1972 */
1973
1f8ec435 1974static void __stli_sendcmd(struct stlibrd *brdp, struct stliport *portp, unsigned long cmd, void *arg, int size, int copyback)
1da177e4 1975{
4ac4360b
AC
1976 cdkhdr_t __iomem *hdrp;
1977 cdkctrl_t __iomem *cp;
1978 unsigned char __iomem *bits;
1da177e4
LT
1979
1980 if (test_bit(ST_CMDING, &portp->state)) {
a6614999 1981 printk(KERN_ERR "istallion: command already busy, cmd=%x!\n",
1da177e4 1982 (int) cmd);
1da177e4
LT
1983 return;
1984 }
1985
1986 EBRDENABLE(brdp);
4ac4360b 1987 cp = &((cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr))->ctrl;
1da177e4 1988 if (size > 0) {
4ac4360b 1989 memcpy_toio((void __iomem *) &(cp->args[0]), arg, size);
1da177e4
LT
1990 if (copyback) {
1991 portp->argp = arg;
1992 portp->argsize = size;
1993 }
1994 }
4ac4360b
AC
1995 writel(0, &cp->status);
1996 writel(cmd, &cp->cmd);
1997 hdrp = (cdkhdr_t __iomem *) EBRDGETMEMPTR(brdp, CDK_CDKADDR);
1998 bits = ((unsigned char __iomem *) hdrp) + brdp->slaveoffset +
1da177e4 1999 portp->portidx;
4ac4360b 2000 writeb(readb(bits) | portp->portbit, bits);
1da177e4
LT
2001 set_bit(ST_CMDING, &portp->state);
2002 EBRDDISABLE(brdp);
4ac4360b
AC
2003}
2004
1f8ec435 2005static void stli_sendcmd(struct stlibrd *brdp, struct stliport *portp, unsigned long cmd, void *arg, int size, int copyback)
4ac4360b
AC
2006{
2007 unsigned long flags;
2008
2009 spin_lock_irqsave(&brd_lock, flags);
2010 __stli_sendcmd(brdp, portp, cmd, arg, size, copyback);
2011 spin_unlock_irqrestore(&brd_lock, flags);
1da177e4
LT
2012}
2013
2014/*****************************************************************************/
2015
2016/*
2017 * Read data from shared memory. This assumes that the shared memory
2018 * is enabled and that interrupts are off. Basically we just empty out
2019 * the shared memory buffer into the tty buffer. Must be careful to
2020 * handle the case where we fill up the tty buffer, but still have
2021 * more chars to unload.
2022 */
2023
1f8ec435 2024static void stli_read(struct stlibrd *brdp, struct stliport *portp)
1da177e4 2025{
4ac4360b
AC
2026 cdkasyrq_t __iomem *rp;
2027 char __iomem *shbuf;
1da177e4 2028 struct tty_struct *tty;
4ac4360b
AC
2029 unsigned int head, tail, size;
2030 unsigned int len, stlen;
1da177e4
LT
2031
2032 if (test_bit(ST_RXSTOP, &portp->state))
2033 return;
d18a750f 2034 tty = tty_port_tty_get(&portp->port);
4ac4360b 2035 if (tty == NULL)
1da177e4
LT
2036 return;
2037
4ac4360b
AC
2038 rp = &((cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr))->rxq;
2039 head = (unsigned int) readw(&rp->head);
2040 if (head != ((unsigned int) readw(&rp->head)))
2041 head = (unsigned int) readw(&rp->head);
2042 tail = (unsigned int) readw(&rp->tail);
1da177e4
LT
2043 size = portp->rxsize;
2044 if (head >= tail) {
2045 len = head - tail;
2046 stlen = len;
2047 } else {
2048 len = size - (tail - head);
2049 stlen = size - tail;
2050 }
2051
33f0f88f 2052 len = tty_buffer_request_room(tty, len);
4ac4360b
AC
2053
2054 shbuf = (char __iomem *) EBRDGETMEMPTR(brdp, portp->rxoffset);
1da177e4
LT
2055
2056 while (len > 0) {
4ac4360b
AC
2057 unsigned char *cptr;
2058
a3f8d9d5 2059 stlen = min(len, stlen);
4ac4360b
AC
2060 tty_prepare_flip_string(tty, &cptr, stlen);
2061 memcpy_fromio(cptr, shbuf + tail, stlen);
1da177e4
LT
2062 len -= stlen;
2063 tail += stlen;
2064 if (tail >= size) {
2065 tail = 0;
2066 stlen = head;
2067 }
2068 }
4ac4360b
AC
2069 rp = &((cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr))->rxq;
2070 writew(tail, &rp->tail);
1da177e4
LT
2071
2072 if (head != tail)
2073 set_bit(ST_RXING, &portp->state);
2074
2075 tty_schedule_flip(tty);
d18a750f 2076 tty_kref_put(tty);
1da177e4
LT
2077}
2078
2079/*****************************************************************************/
2080
2081/*
2082 * Set up and carry out any delayed commands. There is only a small set
2083 * of slave commands that can be done "off-level". So it is not too
2084 * difficult to deal with them here.
2085 */
2086
1f8ec435 2087static void stli_dodelaycmd(struct stliport *portp, cdkctrl_t __iomem *cp)
1da177e4 2088{
4ac4360b 2089 int cmd;
1da177e4
LT
2090
2091 if (test_bit(ST_DOSIGS, &portp->state)) {
2092 if (test_bit(ST_DOFLUSHTX, &portp->state) &&
2093 test_bit(ST_DOFLUSHRX, &portp->state))
2094 cmd = A_SETSIGNALSF;
2095 else if (test_bit(ST_DOFLUSHTX, &portp->state))
2096 cmd = A_SETSIGNALSFTX;
2097 else if (test_bit(ST_DOFLUSHRX, &portp->state))
2098 cmd = A_SETSIGNALSFRX;
2099 else
2100 cmd = A_SETSIGNALS;
2101 clear_bit(ST_DOFLUSHTX, &portp->state);
2102 clear_bit(ST_DOFLUSHRX, &portp->state);
2103 clear_bit(ST_DOSIGS, &portp->state);
4ac4360b 2104 memcpy_toio((void __iomem *) &(cp->args[0]), (void *) &portp->asig,
1da177e4 2105 sizeof(asysigs_t));
4ac4360b
AC
2106 writel(0, &cp->status);
2107 writel(cmd, &cp->cmd);
1da177e4
LT
2108 set_bit(ST_CMDING, &portp->state);
2109 } else if (test_bit(ST_DOFLUSHTX, &portp->state) ||
2110 test_bit(ST_DOFLUSHRX, &portp->state)) {
2111 cmd = ((test_bit(ST_DOFLUSHTX, &portp->state)) ? FLUSHTX : 0);
2112 cmd |= ((test_bit(ST_DOFLUSHRX, &portp->state)) ? FLUSHRX : 0);
2113 clear_bit(ST_DOFLUSHTX, &portp->state);
2114 clear_bit(ST_DOFLUSHRX, &portp->state);
4ac4360b
AC
2115 memcpy_toio((void __iomem *) &(cp->args[0]), (void *) &cmd, sizeof(int));
2116 writel(0, &cp->status);
2117 writel(A_FLUSH, &cp->cmd);
1da177e4
LT
2118 set_bit(ST_CMDING, &portp->state);
2119 }
2120}
2121
2122/*****************************************************************************/
2123
2124/*
2125 * Host command service checking. This handles commands or messages
2126 * coming from the slave to the host. Must have board shared memory
2127 * enabled and interrupts off when called. Notice that by servicing the
2128 * read data last we don't need to change the shared memory pointer
2129 * during processing (which is a slow IO operation).
2130 * Return value indicates if this port is still awaiting actions from
2131 * the slave (like open, command, or even TX data being sent). If 0
2132 * then port is still busy, otherwise no longer busy.
2133 */
2134
1f8ec435 2135static int stli_hostcmd(struct stlibrd *brdp, struct stliport *portp)
1da177e4 2136{
4ac4360b
AC
2137 cdkasy_t __iomem *ap;
2138 cdkctrl_t __iomem *cp;
2139 struct tty_struct *tty;
2140 asynotify_t nt;
2141 unsigned long oldsigs;
2142 int rc, donerx;
2143
2144 ap = (cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr);
1da177e4
LT
2145 cp = &ap->ctrl;
2146
2147/*
2148 * Check if we are waiting for an open completion message.
2149 */
2150 if (test_bit(ST_OPENING, &portp->state)) {
4ac4360b
AC
2151 rc = readl(&cp->openarg);
2152 if (readb(&cp->open) == 0 && rc != 0) {
1da177e4
LT
2153 if (rc > 0)
2154 rc--;
4ac4360b 2155 writel(0, &cp->openarg);
1da177e4
LT
2156 portp->rc = rc;
2157 clear_bit(ST_OPENING, &portp->state);
2158 wake_up_interruptible(&portp->raw_wait);
2159 }
2160 }
2161
2162/*
2163 * Check if we are waiting for a close completion message.
2164 */
2165 if (test_bit(ST_CLOSING, &portp->state)) {
4ac4360b
AC
2166 rc = (int) readl(&cp->closearg);
2167 if (readb(&cp->close) == 0 && rc != 0) {
1da177e4
LT
2168 if (rc > 0)
2169 rc--;
4ac4360b 2170 writel(0, &cp->closearg);
1da177e4
LT
2171 portp->rc = rc;
2172 clear_bit(ST_CLOSING, &portp->state);
2173 wake_up_interruptible(&portp->raw_wait);
2174 }
2175 }
2176
2177/*
2178 * Check if we are waiting for a command completion message. We may
2179 * need to copy out the command results associated with this command.
2180 */
2181 if (test_bit(ST_CMDING, &portp->state)) {
4ac4360b
AC
2182 rc = readl(&cp->status);
2183 if (readl(&cp->cmd) == 0 && rc != 0) {
1da177e4
LT
2184 if (rc > 0)
2185 rc--;
4ac4360b
AC
2186 if (portp->argp != NULL) {
2187 memcpy_fromio(portp->argp, (void __iomem *) &(cp->args[0]),
1da177e4 2188 portp->argsize);
4ac4360b 2189 portp->argp = NULL;
1da177e4 2190 }
4ac4360b 2191 writel(0, &cp->status);
1da177e4
LT
2192 portp->rc = rc;
2193 clear_bit(ST_CMDING, &portp->state);
2194 stli_dodelaycmd(portp, cp);
2195 wake_up_interruptible(&portp->raw_wait);
2196 }
2197 }
2198
2199/*
2200 * Check for any notification messages ready. This includes lots of
2201 * different types of events - RX chars ready, RX break received,
2202 * TX data low or empty in the slave, modem signals changed state.
2203 */
2204 donerx = 0;
2205
2206 if (ap->notify) {
2207 nt = ap->changed;
2208 ap->notify = 0;
d18a750f 2209 tty = tty_port_tty_get(&portp->port);
1da177e4
LT
2210
2211 if (nt.signal & SG_DCD) {
2212 oldsigs = portp->sigs;
2213 portp->sigs = stli_mktiocm(nt.sigvalue);
2214 clear_bit(ST_GETSIGS, &portp->state);
2215 if ((portp->sigs & TIOCM_CD) &&
2216 ((oldsigs & TIOCM_CD) == 0))
b02f5ad6 2217 wake_up_interruptible(&portp->port.open_wait);
1da177e4
LT
2218 if ((oldsigs & TIOCM_CD) &&
2219 ((portp->sigs & TIOCM_CD) == 0)) {
b02f5ad6 2220 if (portp->port.flags & ASYNC_CHECK_CD) {
1da177e4 2221 if (tty)
cfccaeea 2222 tty_hangup(tty);
1da177e4
LT
2223 }
2224 }
2225 }
2226
2227 if (nt.data & DT_TXEMPTY)
2228 clear_bit(ST_TXBUSY, &portp->state);
2229 if (nt.data & (DT_TXEMPTY | DT_TXLOW)) {
4ac4360b
AC
2230 if (tty != NULL) {
2231 tty_wakeup(tty);
2232 EBRDENABLE(brdp);
1da177e4
LT
2233 }
2234 }
2235
2236 if ((nt.data & DT_RXBREAK) && (portp->rxmarkmsk & BRKINT)) {
4ac4360b 2237 if (tty != NULL) {
33f0f88f 2238 tty_insert_flip_char(tty, 0, TTY_BREAK);
b02f5ad6 2239 if (portp->port.flags & ASYNC_SAK) {
33f0f88f
AC
2240 do_SAK(tty);
2241 EBRDENABLE(brdp);
1da177e4 2242 }
33f0f88f 2243 tty_schedule_flip(tty);
1da177e4
LT
2244 }
2245 }
d18a750f 2246 tty_kref_put(tty);
1da177e4
LT
2247
2248 if (nt.data & DT_RXBUSY) {
2249 donerx++;
2250 stli_read(brdp, portp);
2251 }
2252 }
2253
2254/*
2255 * It might seem odd that we are checking for more RX chars here.
2256 * But, we need to handle the case where the tty buffer was previously
2257 * filled, but we had more characters to pass up. The slave will not
2258 * send any more RX notify messages until the RX buffer has been emptied.
2259 * But it will leave the service bits on (since the buffer is not empty).
2260 * So from here we can try to process more RX chars.
2261 */
2262 if ((!donerx) && test_bit(ST_RXING, &portp->state)) {
2263 clear_bit(ST_RXING, &portp->state);
2264 stli_read(brdp, portp);
2265 }
2266
2267 return((test_bit(ST_OPENING, &portp->state) ||
2268 test_bit(ST_CLOSING, &portp->state) ||
2269 test_bit(ST_CMDING, &portp->state) ||
2270 test_bit(ST_TXBUSY, &portp->state) ||
2271 test_bit(ST_RXING, &portp->state)) ? 0 : 1);
2272}
2273
2274/*****************************************************************************/
2275
2276/*
2277 * Service all ports on a particular board. Assumes that the boards
2278 * shared memory is enabled, and that the page pointer is pointed
2279 * at the cdk header structure.
2280 */
2281
1f8ec435 2282static void stli_brdpoll(struct stlibrd *brdp, cdkhdr_t __iomem *hdrp)
1da177e4 2283{
1f8ec435 2284 struct stliport *portp;
4ac4360b
AC
2285 unsigned char hostbits[(STL_MAXCHANS / 8) + 1];
2286 unsigned char slavebits[(STL_MAXCHANS / 8) + 1];
2287 unsigned char __iomem *slavep;
2288 int bitpos, bitat, bitsize;
2289 int channr, nrdevs, slavebitchange;
1da177e4
LT
2290
2291 bitsize = brdp->bitsize;
2292 nrdevs = brdp->nrdevs;
2293
2294/*
2295 * Check if slave wants any service. Basically we try to do as
2296 * little work as possible here. There are 2 levels of service
2297 * bits. So if there is nothing to do we bail early. We check
2298 * 8 service bits at a time in the inner loop, so we can bypass
2299 * the lot if none of them want service.
2300 */
4ac4360b 2301 memcpy_fromio(&hostbits[0], (((unsigned char __iomem *) hdrp) + brdp->hostoffset),
1da177e4
LT
2302 bitsize);
2303
2304 memset(&slavebits[0], 0, bitsize);
2305 slavebitchange = 0;
2306
2307 for (bitpos = 0; (bitpos < bitsize); bitpos++) {
2308 if (hostbits[bitpos] == 0)
2309 continue;
2310 channr = bitpos * 8;
2311 for (bitat = 0x1; (channr < nrdevs); channr++, bitat <<= 1) {
2312 if (hostbits[bitpos] & bitat) {
2313 portp = brdp->ports[(channr - 1)];
2314 if (stli_hostcmd(brdp, portp)) {
2315 slavebitchange++;
2316 slavebits[bitpos] |= bitat;
2317 }
2318 }
2319 }
2320 }
2321
2322/*
2323 * If any of the ports are no longer busy then update them in the
2324 * slave request bits. We need to do this after, since a host port
2325 * service may initiate more slave requests.
2326 */
2327 if (slavebitchange) {
4ac4360b
AC
2328 hdrp = (cdkhdr_t __iomem *) EBRDGETMEMPTR(brdp, CDK_CDKADDR);
2329 slavep = ((unsigned char __iomem *) hdrp) + brdp->slaveoffset;
1da177e4 2330 for (bitpos = 0; (bitpos < bitsize); bitpos++) {
4ac4360b
AC
2331 if (readb(slavebits + bitpos))
2332 writeb(readb(slavep + bitpos) & ~slavebits[bitpos], slavebits + bitpos);
1da177e4
LT
2333 }
2334 }
2335}
2336
2337/*****************************************************************************/
2338
2339/*
2340 * Driver poll routine. This routine polls the boards in use and passes
2341 * messages back up to host when necessary. This is actually very
2342 * CPU efficient, since we will always have the kernel poll clock, it
2343 * adds only a few cycles when idle (since board service can be
2344 * determined very easily), but when loaded generates no interrupts
2345 * (with their expensive associated context change).
2346 */
2347
2348static void stli_poll(unsigned long arg)
2349{
4ac4360b 2350 cdkhdr_t __iomem *hdrp;
1f8ec435 2351 struct stlibrd *brdp;
1328d737 2352 unsigned int brdnr;
1da177e4 2353
ff8efe97 2354 mod_timer(&stli_timerlist, STLI_TIMEOUT);
1da177e4
LT
2355
2356/*
2357 * Check each board and do any servicing required.
2358 */
2359 for (brdnr = 0; (brdnr < stli_nrbrds); brdnr++) {
2360 brdp = stli_brds[brdnr];
4ac4360b 2361 if (brdp == NULL)
1da177e4 2362 continue;
8a1e803d 2363 if (!test_bit(BST_STARTED, &brdp->state))
1da177e4
LT
2364 continue;
2365
4ac4360b 2366 spin_lock(&brd_lock);
1da177e4 2367 EBRDENABLE(brdp);
4ac4360b
AC
2368 hdrp = (cdkhdr_t __iomem *) EBRDGETMEMPTR(brdp, CDK_CDKADDR);
2369 if (readb(&hdrp->hostreq))
1da177e4
LT
2370 stli_brdpoll(brdp, hdrp);
2371 EBRDDISABLE(brdp);
4ac4360b 2372 spin_unlock(&brd_lock);
1da177e4
LT
2373 }
2374}
2375
2376/*****************************************************************************/
2377
2378/*
2379 * Translate the termios settings into the port setting structure of
2380 * the slave.
2381 */
2382
d18a750f
AC
2383static void stli_mkasyport(struct tty_struct *tty, struct stliport *portp,
2384 asyport_t *pp, struct ktermios *tiosp)
1da177e4 2385{
1da177e4
LT
2386 memset(pp, 0, sizeof(asyport_t));
2387
2388/*
2389 * Start of by setting the baud, char size, parity and stop bit info.
2390 */
d18a750f 2391 pp->baudout = tty_get_baud_rate(tty);
1da177e4 2392 if ((tiosp->c_cflag & CBAUD) == B38400) {
b02f5ad6 2393 if ((portp->port.flags & ASYNC_SPD_MASK) == ASYNC_SPD_HI)
1da177e4 2394 pp->baudout = 57600;
b02f5ad6 2395 else if ((portp->port.flags & ASYNC_SPD_MASK) == ASYNC_SPD_VHI)
1da177e4 2396 pp->baudout = 115200;
b02f5ad6 2397 else if ((portp->port.flags & ASYNC_SPD_MASK) == ASYNC_SPD_SHI)
1da177e4 2398 pp->baudout = 230400;
b02f5ad6 2399 else if ((portp->port.flags & ASYNC_SPD_MASK) == ASYNC_SPD_WARP)
1da177e4 2400 pp->baudout = 460800;
b02f5ad6 2401 else if ((portp->port.flags & ASYNC_SPD_MASK) == ASYNC_SPD_CUST)
1da177e4
LT
2402 pp->baudout = (portp->baud_base / portp->custom_divisor);
2403 }
2404 if (pp->baudout > STL_MAXBAUD)
2405 pp->baudout = STL_MAXBAUD;
2406 pp->baudin = pp->baudout;
2407
2408 switch (tiosp->c_cflag & CSIZE) {
2409 case CS5:
2410 pp->csize = 5;
2411 break;
2412 case CS6:
2413 pp->csize = 6;
2414 break;
2415 case CS7:
2416 pp->csize = 7;
2417 break;
2418 default:
2419 pp->csize = 8;
2420 break;
2421 }
2422
2423 if (tiosp->c_cflag & CSTOPB)
2424 pp->stopbs = PT_STOP2;
2425 else
2426 pp->stopbs = PT_STOP1;
2427
2428 if (tiosp->c_cflag & PARENB) {
2429 if (tiosp->c_cflag & PARODD)
2430 pp->parity = PT_ODDPARITY;
2431 else
2432 pp->parity = PT_EVENPARITY;
2433 } else {
2434 pp->parity = PT_NOPARITY;
2435 }
2436
2437/*
2438 * Set up any flow control options enabled.
2439 */
2440 if (tiosp->c_iflag & IXON) {
2441 pp->flow |= F_IXON;
2442 if (tiosp->c_iflag & IXANY)
2443 pp->flow |= F_IXANY;
2444 }
2445 if (tiosp->c_cflag & CRTSCTS)
2446 pp->flow |= (F_RTSFLOW | F_CTSFLOW);
2447
2448 pp->startin = tiosp->c_cc[VSTART];
2449 pp->stopin = tiosp->c_cc[VSTOP];
2450 pp->startout = tiosp->c_cc[VSTART];
2451 pp->stopout = tiosp->c_cc[VSTOP];
2452
2453/*
2454 * Set up the RX char marking mask with those RX error types we must
2455 * catch. We can get the slave to help us out a little here, it will
2456 * ignore parity errors and breaks for us, and mark parity errors in
2457 * the data stream.
2458 */
2459 if (tiosp->c_iflag & IGNPAR)
2460 pp->iflag |= FI_IGNRXERRS;
2461 if (tiosp->c_iflag & IGNBRK)
2462 pp->iflag |= FI_IGNBREAK;
2463
2464 portp->rxmarkmsk = 0;
2465 if (tiosp->c_iflag & (INPCK | PARMRK))
2466 pp->iflag |= FI_1MARKRXERRS;
2467 if (tiosp->c_iflag & BRKINT)
2468 portp->rxmarkmsk |= BRKINT;
2469
2470/*
2471 * Set up clocal processing as required.
2472 */
2473 if (tiosp->c_cflag & CLOCAL)
b02f5ad6 2474 portp->port.flags &= ~ASYNC_CHECK_CD;
1da177e4 2475 else
b02f5ad6 2476 portp->port.flags |= ASYNC_CHECK_CD;
1da177e4
LT
2477
2478/*
2479 * Transfer any persistent flags into the asyport structure.
2480 */
2481 pp->pflag = (portp->pflag & 0xffff);
2482 pp->vmin = (portp->pflag & P_RXIMIN) ? 1 : 0;
2483 pp->vtime = (portp->pflag & P_RXITIME) ? 1 : 0;
2484 pp->cc[1] = (portp->pflag & P_RXTHOLD) ? 1 : 0;
2485}
2486
2487/*****************************************************************************/
2488
2489/*
2490 * Construct a slave signals structure for setting the DTR and RTS
2491 * signals as specified.
2492 */
2493
2494static void stli_mkasysigs(asysigs_t *sp, int dtr, int rts)
2495{
1da177e4
LT
2496 memset(sp, 0, sizeof(asysigs_t));
2497 if (dtr >= 0) {
2498 sp->signal |= SG_DTR;
2499 sp->sigvalue |= ((dtr > 0) ? SG_DTR : 0);
2500 }
2501 if (rts >= 0) {
2502 sp->signal |= SG_RTS;
2503 sp->sigvalue |= ((rts > 0) ? SG_RTS : 0);
2504 }
2505}
2506
2507/*****************************************************************************/
2508
2509/*
2510 * Convert the signals returned from the slave into a local TIOCM type
2511 * signals value. We keep them locally in TIOCM format.
2512 */
2513
2514static long stli_mktiocm(unsigned long sigvalue)
2515{
4ac4360b 2516 long tiocm = 0;
1da177e4
LT
2517 tiocm |= ((sigvalue & SG_DCD) ? TIOCM_CD : 0);
2518 tiocm |= ((sigvalue & SG_CTS) ? TIOCM_CTS : 0);
2519 tiocm |= ((sigvalue & SG_RI) ? TIOCM_RI : 0);
2520 tiocm |= ((sigvalue & SG_DSR) ? TIOCM_DSR : 0);
2521 tiocm |= ((sigvalue & SG_DTR) ? TIOCM_DTR : 0);
2522 tiocm |= ((sigvalue & SG_RTS) ? TIOCM_RTS : 0);
2523 return(tiocm);
2524}
2525
2526/*****************************************************************************/
2527
2528/*
2529 * All panels and ports actually attached have been worked out. All
2530 * we need to do here is set up the appropriate per port data structures.
2531 */
2532
1f8ec435 2533static int stli_initports(struct stlibrd *brdp)
1da177e4 2534{
1f8ec435 2535 struct stliport *portp;
1328d737 2536 unsigned int i, panelnr, panelport;
1da177e4 2537
1da177e4 2538 for (i = 0, panelnr = 0, panelport = 0; (i < brdp->nrports); i++) {
1f8ec435 2539 portp = kzalloc(sizeof(struct stliport), GFP_KERNEL);
b0b4ed72 2540 if (!portp) {
a6614999 2541 printk(KERN_WARNING "istallion: failed to allocate port structure\n");
1da177e4
LT
2542 continue;
2543 }
d18a750f 2544 tty_port_init(&portp->port);
31f35939 2545 portp->port.ops = &stli_port_ops;
1da177e4
LT
2546 portp->magic = STLI_PORTMAGIC;
2547 portp->portnr = i;
2548 portp->brdnr = brdp->brdnr;
2549 portp->panelnr = panelnr;
2550 portp->baud_base = STL_BAUDBASE;
a6614999 2551 portp->port.close_delay = STL_CLOSEDELAY;
1da177e4 2552 portp->closing_wait = 30 * HZ;
b02f5ad6
AC
2553 init_waitqueue_head(&portp->port.open_wait);
2554 init_waitqueue_head(&portp->port.close_wait);
1da177e4
LT
2555 init_waitqueue_head(&portp->raw_wait);
2556 panelport++;
2557 if (panelport >= brdp->panels[panelnr]) {
2558 panelport = 0;
2559 panelnr++;
2560 }
2561 brdp->ports[i] = portp;
2562 }
2563
4ac4360b 2564 return 0;
1da177e4
LT
2565}
2566
2567/*****************************************************************************/
2568
2569/*
2570 * All the following routines are board specific hardware operations.
2571 */
2572
1f8ec435 2573static void stli_ecpinit(struct stlibrd *brdp)
1da177e4
LT
2574{
2575 unsigned long memconf;
2576
1da177e4
LT
2577 outb(ECP_ATSTOP, (brdp->iobase + ECP_ATCONFR));
2578 udelay(10);
2579 outb(ECP_ATDISABLE, (brdp->iobase + ECP_ATCONFR));
2580 udelay(100);
2581
2582 memconf = (brdp->memaddr & ECP_ATADDRMASK) >> ECP_ATADDRSHFT;
2583 outb(memconf, (brdp->iobase + ECP_ATMEMAR));
2584}
2585
2586/*****************************************************************************/
2587
1f8ec435 2588static void stli_ecpenable(struct stlibrd *brdp)
1da177e4 2589{
1da177e4
LT
2590 outb(ECP_ATENABLE, (brdp->iobase + ECP_ATCONFR));
2591}
2592
2593/*****************************************************************************/
2594
1f8ec435 2595static void stli_ecpdisable(struct stlibrd *brdp)
1da177e4 2596{
1da177e4
LT
2597 outb(ECP_ATDISABLE, (brdp->iobase + ECP_ATCONFR));
2598}
2599
2600/*****************************************************************************/
2601
1f8ec435 2602static void __iomem *stli_ecpgetmemptr(struct stlibrd *brdp, unsigned long offset, int line)
1da177e4 2603{
29756fa3 2604 void __iomem *ptr;
4ac4360b 2605 unsigned char val;
1da177e4
LT
2606
2607 if (offset > brdp->memsize) {
a6614999 2608 printk(KERN_ERR "istallion: shared memory pointer=%x out of "
1da177e4
LT
2609 "range at line=%d(%d), brd=%d\n",
2610 (int) offset, line, __LINE__, brdp->brdnr);
2611 ptr = NULL;
2612 val = 0;
2613 } else {
2614 ptr = brdp->membase + (offset % ECP_ATPAGESIZE);
2615 val = (unsigned char) (offset / ECP_ATPAGESIZE);
2616 }
2617 outb(val, (brdp->iobase + ECP_ATMEMPR));
2618 return(ptr);
2619}
2620
2621/*****************************************************************************/
2622
1f8ec435 2623static void stli_ecpreset(struct stlibrd *brdp)
1da177e4 2624{
1da177e4
LT
2625 outb(ECP_ATSTOP, (brdp->iobase + ECP_ATCONFR));
2626 udelay(10);
2627 outb(ECP_ATDISABLE, (brdp->iobase + ECP_ATCONFR));
2628 udelay(500);
2629}
2630
2631/*****************************************************************************/
2632
1f8ec435 2633static void stli_ecpintr(struct stlibrd *brdp)
1da177e4 2634{
1da177e4
LT
2635 outb(0x1, brdp->iobase);
2636}
2637
2638/*****************************************************************************/
2639
2640/*
2641 * The following set of functions act on ECP EISA boards.
2642 */
2643
1f8ec435 2644static void stli_ecpeiinit(struct stlibrd *brdp)
1da177e4
LT
2645{
2646 unsigned long memconf;
2647
1da177e4
LT
2648 outb(0x1, (brdp->iobase + ECP_EIBRDENAB));
2649 outb(ECP_EISTOP, (brdp->iobase + ECP_EICONFR));
2650 udelay(10);
2651 outb(ECP_EIDISABLE, (brdp->iobase + ECP_EICONFR));
2652 udelay(500);
2653
2654 memconf = (brdp->memaddr & ECP_EIADDRMASKL) >> ECP_EIADDRSHFTL;
2655 outb(memconf, (brdp->iobase + ECP_EIMEMARL));
2656 memconf = (brdp->memaddr & ECP_EIADDRMASKH) >> ECP_EIADDRSHFTH;
2657 outb(memconf, (brdp->iobase + ECP_EIMEMARH));
2658}
2659
2660/*****************************************************************************/
2661
1f8ec435 2662static void stli_ecpeienable(struct stlibrd *brdp)
1da177e4
LT
2663{
2664 outb(ECP_EIENABLE, (brdp->iobase + ECP_EICONFR));
2665}
2666
2667/*****************************************************************************/
2668
1f8ec435 2669static void stli_ecpeidisable(struct stlibrd *brdp)
1da177e4
LT
2670{
2671 outb(ECP_EIDISABLE, (brdp->iobase + ECP_EICONFR));
2672}
2673
2674/*****************************************************************************/
2675
1f8ec435 2676static void __iomem *stli_ecpeigetmemptr(struct stlibrd *brdp, unsigned long offset, int line)
1da177e4 2677{
29756fa3 2678 void __iomem *ptr;
1da177e4
LT
2679 unsigned char val;
2680
1da177e4 2681 if (offset > brdp->memsize) {
a6614999 2682 printk(KERN_ERR "istallion: shared memory pointer=%x out of "
1da177e4
LT
2683 "range at line=%d(%d), brd=%d\n",
2684 (int) offset, line, __LINE__, brdp->brdnr);
2685 ptr = NULL;
2686 val = 0;
2687 } else {
2688 ptr = brdp->membase + (offset % ECP_EIPAGESIZE);
2689 if (offset < ECP_EIPAGESIZE)
2690 val = ECP_EIENABLE;
2691 else
2692 val = ECP_EIENABLE | 0x40;
2693 }
2694 outb(val, (brdp->iobase + ECP_EICONFR));
2695 return(ptr);
2696}
2697
2698/*****************************************************************************/
2699
1f8ec435 2700static void stli_ecpeireset(struct stlibrd *brdp)
1da177e4
LT
2701{
2702 outb(ECP_EISTOP, (brdp->iobase + ECP_EICONFR));
2703 udelay(10);
2704 outb(ECP_EIDISABLE, (brdp->iobase + ECP_EICONFR));
2705 udelay(500);
2706}
2707
2708/*****************************************************************************/
2709
2710/*
2711 * The following set of functions act on ECP MCA boards.
2712 */
2713
1f8ec435 2714static void stli_ecpmcenable(struct stlibrd *brdp)
1da177e4
LT
2715{
2716 outb(ECP_MCENABLE, (brdp->iobase + ECP_MCCONFR));
2717}
2718
2719/*****************************************************************************/
2720
1f8ec435 2721static void stli_ecpmcdisable(struct stlibrd *brdp)
1da177e4
LT
2722{
2723 outb(ECP_MCDISABLE, (brdp->iobase + ECP_MCCONFR));
2724}
2725
2726/*****************************************************************************/
2727
1f8ec435 2728static void __iomem *stli_ecpmcgetmemptr(struct stlibrd *brdp, unsigned long offset, int line)
1da177e4 2729{
29756fa3 2730 void __iomem *ptr;
4ac4360b 2731 unsigned char val;
1da177e4
LT
2732
2733 if (offset > brdp->memsize) {
a6614999 2734 printk(KERN_ERR "istallion: shared memory pointer=%x out of "
1da177e4
LT
2735 "range at line=%d(%d), brd=%d\n",
2736 (int) offset, line, __LINE__, brdp->brdnr);
2737 ptr = NULL;
2738 val = 0;
2739 } else {
2740 ptr = brdp->membase + (offset % ECP_MCPAGESIZE);
2741 val = ((unsigned char) (offset / ECP_MCPAGESIZE)) | ECP_MCENABLE;
2742 }
2743 outb(val, (brdp->iobase + ECP_MCCONFR));
2744 return(ptr);
2745}
2746
2747/*****************************************************************************/
2748
1f8ec435 2749static void stli_ecpmcreset(struct stlibrd *brdp)
1da177e4
LT
2750{
2751 outb(ECP_MCSTOP, (brdp->iobase + ECP_MCCONFR));
2752 udelay(10);
2753 outb(ECP_MCDISABLE, (brdp->iobase + ECP_MCCONFR));
2754 udelay(500);
2755}
2756
2757/*****************************************************************************/
2758
2759/*
2760 * The following set of functions act on ECP PCI boards.
2761 */
2762
1f8ec435 2763static void stli_ecppciinit(struct stlibrd *brdp)
1da177e4 2764{
1da177e4
LT
2765 outb(ECP_PCISTOP, (brdp->iobase + ECP_PCICONFR));
2766 udelay(10);
2767 outb(0, (brdp->iobase + ECP_PCICONFR));
2768 udelay(500);
2769}
2770
2771/*****************************************************************************/
2772
1f8ec435 2773static void __iomem *stli_ecppcigetmemptr(struct stlibrd *brdp, unsigned long offset, int line)
1da177e4 2774{
29756fa3 2775 void __iomem *ptr;
1da177e4
LT
2776 unsigned char val;
2777
1da177e4 2778 if (offset > brdp->memsize) {
a6614999 2779 printk(KERN_ERR "istallion: shared memory pointer=%x out of "
1da177e4
LT
2780 "range at line=%d(%d), board=%d\n",
2781 (int) offset, line, __LINE__, brdp->brdnr);
2782 ptr = NULL;
2783 val = 0;
2784 } else {
2785 ptr = brdp->membase + (offset % ECP_PCIPAGESIZE);
2786 val = (offset / ECP_PCIPAGESIZE) << 1;
2787 }
2788 outb(val, (brdp->iobase + ECP_PCICONFR));
2789 return(ptr);
2790}
2791
2792/*****************************************************************************/
2793
1f8ec435 2794static void stli_ecppcireset(struct stlibrd *brdp)
1da177e4
LT
2795{
2796 outb(ECP_PCISTOP, (brdp->iobase + ECP_PCICONFR));
2797 udelay(10);
2798 outb(0, (brdp->iobase + ECP_PCICONFR));
2799 udelay(500);
2800}
2801
2802/*****************************************************************************/
2803
2804/*
2805 * The following routines act on ONboards.
2806 */
2807
1f8ec435 2808static void stli_onbinit(struct stlibrd *brdp)
1da177e4
LT
2809{
2810 unsigned long memconf;
2811
1da177e4
LT
2812 outb(ONB_ATSTOP, (brdp->iobase + ONB_ATCONFR));
2813 udelay(10);
2814 outb(ONB_ATDISABLE, (brdp->iobase + ONB_ATCONFR));
2815 mdelay(1000);
2816
2817 memconf = (brdp->memaddr & ONB_ATADDRMASK) >> ONB_ATADDRSHFT;
2818 outb(memconf, (brdp->iobase + ONB_ATMEMAR));
2819 outb(0x1, brdp->iobase);
2820 mdelay(1);
2821}
2822
2823/*****************************************************************************/
2824
1f8ec435 2825static void stli_onbenable(struct stlibrd *brdp)
1da177e4 2826{
1da177e4
LT
2827 outb((brdp->enabval | ONB_ATENABLE), (brdp->iobase + ONB_ATCONFR));
2828}
2829
2830/*****************************************************************************/
2831
1f8ec435 2832static void stli_onbdisable(struct stlibrd *brdp)
1da177e4 2833{
1da177e4
LT
2834 outb((brdp->enabval | ONB_ATDISABLE), (brdp->iobase + ONB_ATCONFR));
2835}
2836
2837/*****************************************************************************/
2838
1f8ec435 2839static void __iomem *stli_onbgetmemptr(struct stlibrd *brdp, unsigned long offset, int line)
1da177e4 2840{
29756fa3 2841 void __iomem *ptr;
1da177e4 2842
1da177e4 2843 if (offset > brdp->memsize) {
a6614999 2844 printk(KERN_ERR "istallion: shared memory pointer=%x out of "
1da177e4
LT
2845 "range at line=%d(%d), brd=%d\n",
2846 (int) offset, line, __LINE__, brdp->brdnr);
2847 ptr = NULL;
2848 } else {
2849 ptr = brdp->membase + (offset % ONB_ATPAGESIZE);
2850 }
2851 return(ptr);
2852}
2853
2854/*****************************************************************************/
2855
1f8ec435 2856static void stli_onbreset(struct stlibrd *brdp)
1da177e4 2857{
1da177e4
LT
2858 outb(ONB_ATSTOP, (brdp->iobase + ONB_ATCONFR));
2859 udelay(10);
2860 outb(ONB_ATDISABLE, (brdp->iobase + ONB_ATCONFR));
2861 mdelay(1000);
2862}
2863
2864/*****************************************************************************/
2865
2866/*
2867 * The following routines act on ONboard EISA.
2868 */
2869
1f8ec435 2870static void stli_onbeinit(struct stlibrd *brdp)
1da177e4
LT
2871{
2872 unsigned long memconf;
2873
1da177e4
LT
2874 outb(0x1, (brdp->iobase + ONB_EIBRDENAB));
2875 outb(ONB_EISTOP, (brdp->iobase + ONB_EICONFR));
2876 udelay(10);
2877 outb(ONB_EIDISABLE, (brdp->iobase + ONB_EICONFR));
2878 mdelay(1000);
2879
2880 memconf = (brdp->memaddr & ONB_EIADDRMASKL) >> ONB_EIADDRSHFTL;
2881 outb(memconf, (brdp->iobase + ONB_EIMEMARL));
2882 memconf = (brdp->memaddr & ONB_EIADDRMASKH) >> ONB_EIADDRSHFTH;
2883 outb(memconf, (brdp->iobase + ONB_EIMEMARH));
2884 outb(0x1, brdp->iobase);
2885 mdelay(1);
2886}
2887
2888/*****************************************************************************/
2889
1f8ec435 2890static void stli_onbeenable(struct stlibrd *brdp)
1da177e4 2891{
1da177e4
LT
2892 outb(ONB_EIENABLE, (brdp->iobase + ONB_EICONFR));
2893}
2894
2895/*****************************************************************************/
2896
1f8ec435 2897static void stli_onbedisable(struct stlibrd *brdp)
1da177e4 2898{
1da177e4
LT
2899 outb(ONB_EIDISABLE, (brdp->iobase + ONB_EICONFR));
2900}
2901
2902/*****************************************************************************/
2903
1f8ec435 2904static void __iomem *stli_onbegetmemptr(struct stlibrd *brdp, unsigned long offset, int line)
1da177e4 2905{
29756fa3 2906 void __iomem *ptr;
4ac4360b 2907 unsigned char val;
1da177e4
LT
2908
2909 if (offset > brdp->memsize) {
a6614999 2910 printk(KERN_ERR "istallion: shared memory pointer=%x out of "
1da177e4
LT
2911 "range at line=%d(%d), brd=%d\n",
2912 (int) offset, line, __LINE__, brdp->brdnr);
2913 ptr = NULL;
2914 val = 0;
2915 } else {
2916 ptr = brdp->membase + (offset % ONB_EIPAGESIZE);
2917 if (offset < ONB_EIPAGESIZE)
2918 val = ONB_EIENABLE;
2919 else
2920 val = ONB_EIENABLE | 0x40;
2921 }
2922 outb(val, (brdp->iobase + ONB_EICONFR));
2923 return(ptr);
2924}
2925
2926/*****************************************************************************/
2927
1f8ec435 2928static void stli_onbereset(struct stlibrd *brdp)
1da177e4 2929{
1da177e4
LT
2930 outb(ONB_EISTOP, (brdp->iobase + ONB_EICONFR));
2931 udelay(10);
2932 outb(ONB_EIDISABLE, (brdp->iobase + ONB_EICONFR));
2933 mdelay(1000);
2934}
2935
2936/*****************************************************************************/
2937
2938/*
2939 * The following routines act on Brumby boards.
2940 */
2941
1f8ec435 2942static void stli_bbyinit(struct stlibrd *brdp)
1da177e4 2943{
1da177e4
LT
2944 outb(BBY_ATSTOP, (brdp->iobase + BBY_ATCONFR));
2945 udelay(10);
2946 outb(0, (brdp->iobase + BBY_ATCONFR));
2947 mdelay(1000);
2948 outb(0x1, brdp->iobase);
2949 mdelay(1);
2950}
2951
2952/*****************************************************************************/
2953
1f8ec435 2954static void __iomem *stli_bbygetmemptr(struct stlibrd *brdp, unsigned long offset, int line)
1da177e4 2955{
29756fa3 2956 void __iomem *ptr;
4ac4360b 2957 unsigned char val;
1da177e4 2958
4ac4360b 2959 BUG_ON(offset > brdp->memsize);
1da177e4 2960
4ac4360b
AC
2961 ptr = brdp->membase + (offset % BBY_PAGESIZE);
2962 val = (unsigned char) (offset / BBY_PAGESIZE);
1da177e4
LT
2963 outb(val, (brdp->iobase + BBY_ATCONFR));
2964 return(ptr);
2965}
2966
2967/*****************************************************************************/
2968
1f8ec435 2969static void stli_bbyreset(struct stlibrd *brdp)
1da177e4 2970{
1da177e4
LT
2971 outb(BBY_ATSTOP, (brdp->iobase + BBY_ATCONFR));
2972 udelay(10);
2973 outb(0, (brdp->iobase + BBY_ATCONFR));
2974 mdelay(1000);
2975}
2976
2977/*****************************************************************************/
2978
2979/*
2980 * The following routines act on original old Stallion boards.
2981 */
2982
1f8ec435 2983static void stli_stalinit(struct stlibrd *brdp)
1da177e4 2984{
1da177e4
LT
2985 outb(0x1, brdp->iobase);
2986 mdelay(1000);
2987}
2988
2989/*****************************************************************************/
2990
1f8ec435 2991static void __iomem *stli_stalgetmemptr(struct stlibrd *brdp, unsigned long offset, int line)
1da177e4 2992{
4ac4360b
AC
2993 BUG_ON(offset > brdp->memsize);
2994 return brdp->membase + (offset % STAL_PAGESIZE);
1da177e4
LT
2995}
2996
2997/*****************************************************************************/
2998
1f8ec435 2999static void stli_stalreset(struct stlibrd *brdp)
1da177e4 3000{
4ac4360b 3001 u32 __iomem *vecp;
1da177e4 3002
4ac4360b
AC
3003 vecp = (u32 __iomem *) (brdp->membase + 0x30);
3004 writel(0xffff0000, vecp);
1da177e4
LT
3005 outb(0, brdp->iobase);
3006 mdelay(1000);
3007}
3008
3009/*****************************************************************************/
3010
3011/*
3012 * Try to find an ECP board and initialize it. This handles only ECP
3013 * board types.
3014 */
3015
1f8ec435 3016static int stli_initecp(struct stlibrd *brdp)
1da177e4 3017{
4ac4360b
AC
3018 cdkecpsig_t sig;
3019 cdkecpsig_t __iomem *sigsp;
3020 unsigned int status, nxtid;
3021 char *name;
8f8f5a58 3022 int retval, panelnr, nrports;
1da177e4 3023
8f8f5a58
JS
3024 if ((brdp->iobase == 0) || (brdp->memaddr == 0)) {
3025 retval = -ENODEV;
3026 goto err;
3027 }
3028
b306122d
IK
3029 brdp->iosize = ECP_IOSIZE;
3030
8f8f5a58
JS
3031 if (!request_region(brdp->iobase, brdp->iosize, "istallion")) {
3032 retval = -EIO;
3033 goto err;
1da177e4
LT
3034 }
3035
1da177e4
LT
3036/*
3037 * Based on the specific board type setup the common vars to access
3038 * and enable shared memory. Set all board specific information now
3039 * as well.
3040 */
3041 switch (brdp->brdtype) {
3042 case BRD_ECP:
1da177e4
LT
3043 brdp->memsize = ECP_MEMSIZE;
3044 brdp->pagesize = ECP_ATPAGESIZE;
3045 brdp->init = stli_ecpinit;
3046 brdp->enable = stli_ecpenable;
3047 brdp->reenable = stli_ecpenable;
3048 brdp->disable = stli_ecpdisable;
3049 brdp->getmemptr = stli_ecpgetmemptr;
3050 brdp->intr = stli_ecpintr;
3051 brdp->reset = stli_ecpreset;
3052 name = "serial(EC8/64)";
3053 break;
3054
3055 case BRD_ECPE:
1da177e4
LT
3056 brdp->memsize = ECP_MEMSIZE;
3057 brdp->pagesize = ECP_EIPAGESIZE;
3058 brdp->init = stli_ecpeiinit;
3059 brdp->enable = stli_ecpeienable;
3060 brdp->reenable = stli_ecpeienable;
3061 brdp->disable = stli_ecpeidisable;
3062 brdp->getmemptr = stli_ecpeigetmemptr;
3063 brdp->intr = stli_ecpintr;
3064 brdp->reset = stli_ecpeireset;
3065 name = "serial(EC8/64-EI)";
3066 break;
3067
3068 case BRD_ECPMC:
1da177e4
LT
3069 brdp->memsize = ECP_MEMSIZE;
3070 brdp->pagesize = ECP_MCPAGESIZE;
3071 brdp->init = NULL;
3072 brdp->enable = stli_ecpmcenable;
3073 brdp->reenable = stli_ecpmcenable;
3074 brdp->disable = stli_ecpmcdisable;
3075 brdp->getmemptr = stli_ecpmcgetmemptr;
3076 brdp->intr = stli_ecpintr;
3077 brdp->reset = stli_ecpmcreset;
3078 name = "serial(EC8/64-MCA)";
3079 break;
3080
3081 case BRD_ECPPCI:
1da177e4
LT
3082 brdp->memsize = ECP_PCIMEMSIZE;
3083 brdp->pagesize = ECP_PCIPAGESIZE;
3084 brdp->init = stli_ecppciinit;
3085 brdp->enable = NULL;
3086 brdp->reenable = NULL;
3087 brdp->disable = NULL;
3088 brdp->getmemptr = stli_ecppcigetmemptr;
3089 brdp->intr = stli_ecpintr;
3090 brdp->reset = stli_ecppcireset;
3091 name = "serial(EC/RA-PCI)";
3092 break;
3093
3094 default:
8f8f5a58
JS
3095 retval = -EINVAL;
3096 goto err_reg;
1da177e4
LT
3097 }
3098
3099/*
3100 * The per-board operations structure is all set up, so now let's go
3101 * and get the board operational. Firstly initialize board configuration
3102 * registers. Set the memory mapping info so we can get at the boards
3103 * shared memory.
3104 */
3105 EBRDINIT(brdp);
3106
24cb2335 3107 brdp->membase = ioremap_nocache(brdp->memaddr, brdp->memsize);
8f8f5a58
JS
3108 if (brdp->membase == NULL) {
3109 retval = -ENOMEM;
3110 goto err_reg;
1da177e4
LT
3111 }
3112
3113/*
3114 * Now that all specific code is set up, enable the shared memory and
3115 * look for the a signature area that will tell us exactly what board
3116 * this is, and what it is connected to it.
3117 */
3118 EBRDENABLE(brdp);
4ac4360b 3119 sigsp = (cdkecpsig_t __iomem *) EBRDGETMEMPTR(brdp, CDK_SIGADDR);
634965f5 3120 memcpy_fromio(&sig, sigsp, sizeof(cdkecpsig_t));
1da177e4
LT
3121 EBRDDISABLE(brdp);
3122
8f8f5a58
JS
3123 if (sig.magic != cpu_to_le32(ECP_MAGIC)) {
3124 retval = -ENODEV;
3125 goto err_unmap;
1da177e4
LT
3126 }
3127
3128/*
3129 * Scan through the signature looking at the panels connected to the
3130 * board. Calculate the total number of ports as we go.
3131 */
3132 for (panelnr = 0, nxtid = 0; (panelnr < STL_MAXPANELS); panelnr++) {
3133 status = sig.panelid[nxtid];
3134 if ((status & ECH_PNLIDMASK) != nxtid)
3135 break;
3136
3137 brdp->panelids[panelnr] = status;
3138 nrports = (status & ECH_PNL16PORT) ? 16 : 8;
3139 if ((nrports == 16) && ((status & ECH_PNLXPID) == 0))
3140 nxtid++;
3141 brdp->panels[panelnr] = nrports;
3142 brdp->nrports += nrports;
3143 nxtid++;
3144 brdp->nrpanels++;
3145 }
3146
3147
8a1e803d 3148 set_bit(BST_FOUND, &brdp->state);
4ac4360b 3149 return 0;
8f8f5a58
JS
3150err_unmap:
3151 iounmap(brdp->membase);
3152 brdp->membase = NULL;
3153err_reg:
3154 release_region(brdp->iobase, brdp->iosize);
3155err:
3156 return retval;
1da177e4
LT
3157}
3158
3159/*****************************************************************************/
3160
3161/*
3162 * Try to find an ONboard, Brumby or Stallion board and initialize it.
3163 * This handles only these board types.
3164 */
3165
1f8ec435 3166static int stli_initonb(struct stlibrd *brdp)
1da177e4 3167{
4ac4360b
AC
3168 cdkonbsig_t sig;
3169 cdkonbsig_t __iomem *sigsp;
3170 char *name;
8f8f5a58 3171 int i, retval;
1da177e4
LT
3172
3173/*
3174 * Do a basic sanity check on the IO and memory addresses.
3175 */
8f8f5a58
JS
3176 if (brdp->iobase == 0 || brdp->memaddr == 0) {
3177 retval = -ENODEV;
3178 goto err;
3179 }
1da177e4
LT
3180
3181 brdp->iosize = ONB_IOSIZE;
3182
8f8f5a58
JS
3183 if (!request_region(brdp->iobase, brdp->iosize, "istallion")) {
3184 retval = -EIO;
3185 goto err;
3186 }
1da177e4
LT
3187
3188/*
3189 * Based on the specific board type setup the common vars to access
3190 * and enable shared memory. Set all board specific information now
3191 * as well.
3192 */
3193 switch (brdp->brdtype) {
3194 case BRD_ONBOARD:
1da177e4 3195 case BRD_ONBOARD2:
1da177e4
LT
3196 brdp->memsize = ONB_MEMSIZE;
3197 brdp->pagesize = ONB_ATPAGESIZE;
3198 brdp->init = stli_onbinit;
3199 brdp->enable = stli_onbenable;
3200 brdp->reenable = stli_onbenable;
3201 brdp->disable = stli_onbdisable;
3202 brdp->getmemptr = stli_onbgetmemptr;
3203 brdp->intr = stli_ecpintr;
3204 brdp->reset = stli_onbreset;
3205 if (brdp->memaddr > 0x100000)
3206 brdp->enabval = ONB_MEMENABHI;
3207 else
3208 brdp->enabval = ONB_MEMENABLO;
3209 name = "serial(ONBoard)";
3210 break;
3211
3212 case BRD_ONBOARDE:
1da177e4
LT
3213 brdp->memsize = ONB_EIMEMSIZE;
3214 brdp->pagesize = ONB_EIPAGESIZE;
3215 brdp->init = stli_onbeinit;
3216 brdp->enable = stli_onbeenable;
3217 brdp->reenable = stli_onbeenable;
3218 brdp->disable = stli_onbedisable;
3219 brdp->getmemptr = stli_onbegetmemptr;
3220 brdp->intr = stli_ecpintr;
3221 brdp->reset = stli_onbereset;
3222 name = "serial(ONBoard/E)";
3223 break;
3224
3225 case BRD_BRUMBY4:
1da177e4
LT
3226 brdp->memsize = BBY_MEMSIZE;
3227 brdp->pagesize = BBY_PAGESIZE;
3228 brdp->init = stli_bbyinit;
3229 brdp->enable = NULL;
3230 brdp->reenable = NULL;
3231 brdp->disable = NULL;
3232 brdp->getmemptr = stli_bbygetmemptr;
3233 brdp->intr = stli_ecpintr;
3234 brdp->reset = stli_bbyreset;
3235 name = "serial(Brumby)";
3236 break;
3237
3238 case BRD_STALLION:
1da177e4
LT
3239 brdp->memsize = STAL_MEMSIZE;
3240 brdp->pagesize = STAL_PAGESIZE;
3241 brdp->init = stli_stalinit;
3242 brdp->enable = NULL;
3243 brdp->reenable = NULL;
3244 brdp->disable = NULL;
3245 brdp->getmemptr = stli_stalgetmemptr;
3246 brdp->intr = stli_ecpintr;
3247 brdp->reset = stli_stalreset;
3248 name = "serial(Stallion)";
3249 break;
3250
3251 default:
8f8f5a58
JS
3252 retval = -EINVAL;
3253 goto err_reg;
1da177e4
LT
3254 }
3255
3256/*
3257 * The per-board operations structure is all set up, so now let's go
3258 * and get the board operational. Firstly initialize board configuration
3259 * registers. Set the memory mapping info so we can get at the boards
3260 * shared memory.
3261 */
3262 EBRDINIT(brdp);
3263
24cb2335 3264 brdp->membase = ioremap_nocache(brdp->memaddr, brdp->memsize);
8f8f5a58
JS
3265 if (brdp->membase == NULL) {
3266 retval = -ENOMEM;
3267 goto err_reg;
1da177e4
LT
3268 }
3269
3270/*
3271 * Now that all specific code is set up, enable the shared memory and
3272 * look for the a signature area that will tell us exactly what board
3273 * this is, and how many ports.
3274 */
3275 EBRDENABLE(brdp);
4ac4360b
AC
3276 sigsp = (cdkonbsig_t __iomem *) EBRDGETMEMPTR(brdp, CDK_SIGADDR);
3277 memcpy_fromio(&sig, sigsp, sizeof(cdkonbsig_t));
1da177e4
LT
3278 EBRDDISABLE(brdp);
3279
4ac4360b
AC
3280 if (sig.magic0 != cpu_to_le16(ONB_MAGIC0) ||
3281 sig.magic1 != cpu_to_le16(ONB_MAGIC1) ||
3282 sig.magic2 != cpu_to_le16(ONB_MAGIC2) ||
8f8f5a58
JS
3283 sig.magic3 != cpu_to_le16(ONB_MAGIC3)) {
3284 retval = -ENODEV;
3285 goto err_unmap;
1da177e4
LT
3286 }
3287
3288/*
3289 * Scan through the signature alive mask and calculate how many ports
3290 * there are on this board.
3291 */
3292 brdp->nrpanels = 1;
3293 if (sig.amask1) {
3294 brdp->nrports = 32;
3295 } else {
3296 for (i = 0; (i < 16); i++) {
3297 if (((sig.amask0 << i) & 0x8000) == 0)
3298 break;
3299 }
3300 brdp->nrports = i;
3301 }
3302 brdp->panels[0] = brdp->nrports;
3303
3304
8a1e803d 3305 set_bit(BST_FOUND, &brdp->state);
4ac4360b 3306 return 0;
8f8f5a58
JS
3307err_unmap:
3308 iounmap(brdp->membase);
3309 brdp->membase = NULL;
3310err_reg:
3311 release_region(brdp->iobase, brdp->iosize);
3312err:
3313 return retval;
1da177e4
LT
3314}
3315
3316/*****************************************************************************/
3317
3318/*
3319 * Start up a running board. This routine is only called after the
3320 * code has been down loaded to the board and is operational. It will
3321 * read in the memory map, and get the show on the road...
3322 */
3323
1f8ec435 3324static int stli_startbrd(struct stlibrd *brdp)
1da177e4 3325{
4ac4360b
AC
3326 cdkhdr_t __iomem *hdrp;
3327 cdkmem_t __iomem *memp;
3328 cdkasy_t __iomem *ap;
3329 unsigned long flags;
1328d737 3330 unsigned int portnr, nrdevs, i;
1f8ec435 3331 struct stliport *portp;
1328d737 3332 int rc = 0;
4ac4360b
AC
3333 u32 memoff;
3334
3335 spin_lock_irqsave(&brd_lock, flags);
1da177e4 3336 EBRDENABLE(brdp);
4ac4360b 3337 hdrp = (cdkhdr_t __iomem *) EBRDGETMEMPTR(brdp, CDK_CDKADDR);
1da177e4
LT
3338 nrdevs = hdrp->nrdevs;
3339
3340#if 0
3341 printk("%s(%d): CDK version %d.%d.%d --> "
3342 "nrdevs=%d memp=%x hostp=%x slavep=%x\n",
4ac4360b
AC
3343 __FILE__, __LINE__, readb(&hdrp->ver_release), readb(&hdrp->ver_modification),
3344 readb(&hdrp->ver_fix), nrdevs, (int) readl(&hdrp->memp), readl(&hdrp->hostp),
3345 readl(&hdrp->slavep));
1da177e4
LT
3346#endif
3347
3348 if (nrdevs < (brdp->nrports + 1)) {
a6614999 3349 printk(KERN_ERR "istallion: slave failed to allocate memory for "
1da177e4
LT
3350 "all devices, devices=%d\n", nrdevs);
3351 brdp->nrports = nrdevs - 1;
3352 }
3353 brdp->nrdevs = nrdevs;
3354 brdp->hostoffset = hdrp->hostp - CDK_CDKADDR;
3355 brdp->slaveoffset = hdrp->slavep - CDK_CDKADDR;
3356 brdp->bitsize = (nrdevs + 7) / 8;
4ac4360b
AC
3357 memoff = readl(&hdrp->memp);
3358 if (memoff > brdp->memsize) {
a6614999 3359 printk(KERN_ERR "istallion: corrupted shared memory region?\n");
1da177e4
LT
3360 rc = -EIO;
3361 goto stli_donestartup;
3362 }
4ac4360b
AC
3363 memp = (cdkmem_t __iomem *) EBRDGETMEMPTR(brdp, memoff);
3364 if (readw(&memp->dtype) != TYP_ASYNCTRL) {
a6614999 3365 printk(KERN_ERR "istallion: no slave control device found\n");
1da177e4
LT
3366 goto stli_donestartup;
3367 }
3368 memp++;
3369
3370/*
3371 * Cycle through memory allocation of each port. We are guaranteed to
3372 * have all ports inside the first page of slave window, so no need to
3373 * change pages while reading memory map.
3374 */
3375 for (i = 1, portnr = 0; (i < nrdevs); i++, portnr++, memp++) {
4ac4360b 3376 if (readw(&memp->dtype) != TYP_ASYNC)
1da177e4
LT
3377 break;
3378 portp = brdp->ports[portnr];
4ac4360b 3379 if (portp == NULL)
1da177e4
LT
3380 break;
3381 portp->devnr = i;
4ac4360b 3382 portp->addr = readl(&memp->offset);
1da177e4
LT
3383 portp->reqbit = (unsigned char) (0x1 << (i * 8 / nrdevs));
3384 portp->portidx = (unsigned char) (i / 8);
3385 portp->portbit = (unsigned char) (0x1 << (i % 8));
3386 }
3387
4ac4360b 3388 writeb(0xff, &hdrp->slavereq);
1da177e4
LT
3389
3390/*
3391 * For each port setup a local copy of the RX and TX buffer offsets
3392 * and sizes. We do this separate from the above, because we need to
3393 * move the shared memory page...
3394 */
3395 for (i = 1, portnr = 0; (i < nrdevs); i++, portnr++) {
3396 portp = brdp->ports[portnr];
4ac4360b 3397 if (portp == NULL)
1da177e4
LT
3398 break;
3399 if (portp->addr == 0)
3400 break;
4ac4360b
AC
3401 ap = (cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr);
3402 if (ap != NULL) {
3403 portp->rxsize = readw(&ap->rxq.size);
3404 portp->txsize = readw(&ap->txq.size);
3405 portp->rxoffset = readl(&ap->rxq.offset);
3406 portp->txoffset = readl(&ap->txq.offset);
1da177e4
LT
3407 }
3408 }
3409
3410stli_donestartup:
3411 EBRDDISABLE(brdp);
4ac4360b 3412 spin_unlock_irqrestore(&brd_lock, flags);
1da177e4
LT
3413
3414 if (rc == 0)
8a1e803d 3415 set_bit(BST_STARTED, &brdp->state);
1da177e4
LT
3416
3417 if (! stli_timeron) {
3418 stli_timeron++;
ff8efe97 3419 mod_timer(&stli_timerlist, STLI_TIMEOUT);
1da177e4
LT
3420 }
3421
4ac4360b 3422 return rc;
1da177e4
LT
3423}
3424
3425/*****************************************************************************/
3426
3427/*
3428 * Probe and initialize the specified board.
3429 */
3430
1f8ec435 3431static int __devinit stli_brdinit(struct stlibrd *brdp)
1da177e4 3432{
8f8f5a58
JS
3433 int retval;
3434
1da177e4
LT
3435 switch (brdp->brdtype) {
3436 case BRD_ECP:
3437 case BRD_ECPE:
3438 case BRD_ECPMC:
3439 case BRD_ECPPCI:
8f8f5a58 3440 retval = stli_initecp(brdp);
1da177e4
LT
3441 break;
3442 case BRD_ONBOARD:
3443 case BRD_ONBOARDE:
3444 case BRD_ONBOARD2:
1da177e4 3445 case BRD_BRUMBY4:
1da177e4 3446 case BRD_STALLION:
8f8f5a58 3447 retval = stli_initonb(brdp);
1da177e4 3448 break;
1da177e4 3449 default:
a6614999 3450 printk(KERN_ERR "istallion: board=%d is unknown board "
1da177e4 3451 "type=%d\n", brdp->brdnr, brdp->brdtype);
8f8f5a58 3452 retval = -ENODEV;
1da177e4
LT
3453 }
3454
8f8f5a58
JS
3455 if (retval)
3456 return retval;
1da177e4
LT
3457
3458 stli_initports(brdp);
a6614999 3459 printk(KERN_INFO "istallion: %s found, board=%d io=%x mem=%x "
1da177e4
LT
3460 "nrpanels=%d nrports=%d\n", stli_brdnames[brdp->brdtype],
3461 brdp->brdnr, brdp->iobase, (int) brdp->memaddr,
3462 brdp->nrpanels, brdp->nrports);
4ac4360b 3463 return 0;
1da177e4
LT
3464}
3465
a00f33f3 3466#if STLI_EISAPROBE != 0
1da177e4
LT
3467/*****************************************************************************/
3468
3469/*
3470 * Probe around trying to find where the EISA boards shared memory
3471 * might be. This is a bit if hack, but it is the best we can do.
3472 */
3473
1f8ec435 3474static int stli_eisamemprobe(struct stlibrd *brdp)
1da177e4 3475{
4ac4360b
AC
3476 cdkecpsig_t ecpsig, __iomem *ecpsigp;
3477 cdkonbsig_t onbsig, __iomem *onbsigp;
1da177e4
LT
3478 int i, foundit;
3479
1da177e4
LT
3480/*
3481 * First up we reset the board, to get it into a known state. There
3482 * is only 2 board types here we need to worry about. Don;t use the
3483 * standard board init routine here, it programs up the shared
3484 * memory address, and we don't know it yet...
3485 */
3486 if (brdp->brdtype == BRD_ECPE) {
3487 outb(0x1, (brdp->iobase + ECP_EIBRDENAB));
3488 outb(ECP_EISTOP, (brdp->iobase + ECP_EICONFR));
3489 udelay(10);
3490 outb(ECP_EIDISABLE, (brdp->iobase + ECP_EICONFR));
3491 udelay(500);
3492 stli_ecpeienable(brdp);
3493 } else if (brdp->brdtype == BRD_ONBOARDE) {
3494 outb(0x1, (brdp->iobase + ONB_EIBRDENAB));
3495 outb(ONB_EISTOP, (brdp->iobase + ONB_EICONFR));
3496 udelay(10);
3497 outb(ONB_EIDISABLE, (brdp->iobase + ONB_EICONFR));
3498 mdelay(100);
3499 outb(0x1, brdp->iobase);
3500 mdelay(1);
3501 stli_onbeenable(brdp);
3502 } else {
4ac4360b 3503 return -ENODEV;
1da177e4
LT
3504 }
3505
3506 foundit = 0;
3507 brdp->memsize = ECP_MEMSIZE;
3508
3509/*
3510 * Board shared memory is enabled, so now we have a poke around and
3511 * see if we can find it.
3512 */
3513 for (i = 0; (i < stli_eisamempsize); i++) {
3514 brdp->memaddr = stli_eisamemprobeaddrs[i];
24cb2335 3515 brdp->membase = ioremap_nocache(brdp->memaddr, brdp->memsize);
4ac4360b 3516 if (brdp->membase == NULL)
1da177e4
LT
3517 continue;
3518
3519 if (brdp->brdtype == BRD_ECPE) {
29756fa3 3520 ecpsigp = stli_ecpeigetmemptr(brdp,
1da177e4 3521 CDK_SIGADDR, __LINE__);
4ac4360b
AC
3522 memcpy_fromio(&ecpsig, ecpsigp, sizeof(cdkecpsig_t));
3523 if (ecpsig.magic == cpu_to_le32(ECP_MAGIC))
1da177e4
LT
3524 foundit = 1;
3525 } else {
4ac4360b 3526 onbsigp = (cdkonbsig_t __iomem *) stli_onbegetmemptr(brdp,
1da177e4 3527 CDK_SIGADDR, __LINE__);
4ac4360b
AC
3528 memcpy_fromio(&onbsig, onbsigp, sizeof(cdkonbsig_t));
3529 if ((onbsig.magic0 == cpu_to_le16(ONB_MAGIC0)) &&
3530 (onbsig.magic1 == cpu_to_le16(ONB_MAGIC1)) &&
3531 (onbsig.magic2 == cpu_to_le16(ONB_MAGIC2)) &&
3532 (onbsig.magic3 == cpu_to_le16(ONB_MAGIC3)))
1da177e4
LT
3533 foundit = 1;
3534 }
3535
3536 iounmap(brdp->membase);
3537 if (foundit)
3538 break;
3539 }
3540
3541/*
3542 * Regardless of whether we found the shared memory or not we must
3543 * disable the region. After that return success or failure.
3544 */
3545 if (brdp->brdtype == BRD_ECPE)
3546 stli_ecpeidisable(brdp);
3547 else
3548 stli_onbedisable(brdp);
3549
3550 if (! foundit) {
3551 brdp->memaddr = 0;
3552 brdp->membase = NULL;
a6614999 3553 printk(KERN_ERR "istallion: failed to probe shared memory "
1da177e4
LT
3554 "region for %s in EISA slot=%d\n",
3555 stli_brdnames[brdp->brdtype], (brdp->iobase >> 12));
4ac4360b 3556 return -ENODEV;
1da177e4 3557 }
4ac4360b 3558 return 0;
1da177e4 3559}
a00f33f3 3560#endif
1da177e4
LT
3561
3562static int stli_getbrdnr(void)
3563{
1328d737 3564 unsigned int i;
1da177e4
LT
3565
3566 for (i = 0; i < STL_MAXBRDS; i++) {
3567 if (!stli_brds[i]) {
3568 if (i >= stli_nrbrds)
3569 stli_nrbrds = i + 1;
3570 return i;
3571 }
3572 }
3573 return -1;
3574}
3575
a00f33f3 3576#if STLI_EISAPROBE != 0
1da177e4
LT
3577/*****************************************************************************/
3578
3579/*
3580 * Probe around and try to find any EISA boards in system. The biggest
3581 * problem here is finding out what memory address is associated with
3582 * an EISA board after it is found. The registers of the ECPE and
3583 * ONboardE are not readable - so we can't read them from there. We
3584 * don't have access to the EISA CMOS (or EISA BIOS) so we don't
3585 * actually have any way to find out the real value. The best we can
3586 * do is go probing around in the usual places hoping we can find it.
3587 */
3588
6005e3eb 3589static int __init stli_findeisabrds(void)
1da177e4 3590{
1f8ec435 3591 struct stlibrd *brdp;
1328d737 3592 unsigned int iobase, eid, i;
8f8f5a58 3593 int brdnr, found = 0;
1da177e4
LT
3594
3595/*
4ac4360b 3596 * Firstly check if this is an EISA system. If this is not an EISA system then
1da177e4
LT
3597 * don't bother going any further!
3598 */
4ac4360b
AC
3599 if (EISA_bus)
3600 return 0;
1da177e4
LT
3601
3602/*
3603 * Looks like an EISA system, so go searching for EISA boards.
3604 */
3605 for (iobase = 0x1000; (iobase <= 0xc000); iobase += 0x1000) {
3606 outb(0xff, (iobase + 0xc80));
3607 eid = inb(iobase + 0xc80);
3608 eid |= inb(iobase + 0xc81) << 8;
3609 if (eid != STL_EISAID)
3610 continue;
3611
3612/*
3613 * We have found a board. Need to check if this board was
3614 * statically configured already (just in case!).
3615 */
3616 for (i = 0; (i < STL_MAXBRDS); i++) {
3617 brdp = stli_brds[i];
4ac4360b 3618 if (brdp == NULL)
1da177e4
LT
3619 continue;
3620 if (brdp->iobase == iobase)
3621 break;
3622 }
3623 if (i < STL_MAXBRDS)
3624 continue;
3625
3626/*
3627 * We have found a Stallion board and it is not configured already.
3628 * Allocate a board structure and initialize it.
3629 */
4ac4360b 3630 if ((brdp = stli_allocbrd()) == NULL)
8f8f5a58 3631 return found ? : -ENOMEM;
1328d737
JS
3632 brdnr = stli_getbrdnr();
3633 if (brdnr < 0)
8f8f5a58 3634 return found ? : -ENOMEM;
1328d737 3635 brdp->brdnr = (unsigned int)brdnr;
1da177e4
LT
3636 eid = inb(iobase + 0xc82);
3637 if (eid == ECP_EISAID)
3638 brdp->brdtype = BRD_ECPE;
3639 else if (eid == ONB_EISAID)
3640 brdp->brdtype = BRD_ONBOARDE;
3641 else
3642 brdp->brdtype = BRD_UNKNOWN;
3643 brdp->iobase = iobase;
3644 outb(0x1, (iobase + 0xc84));
3645 if (stli_eisamemprobe(brdp))
3646 outb(0, (iobase + 0xc84));
8f8f5a58
JS
3647 if (stli_brdinit(brdp) < 0) {
3648 kfree(brdp);
3649 continue;
3650 }
3651
b103b5cf 3652 stli_brds[brdp->brdnr] = brdp;
8f8f5a58 3653 found++;
ec3dde57
JS
3654
3655 for (i = 0; i < brdp->nrports; i++)
3656 tty_register_device(stli_serial,
3657 brdp->brdnr * STL_MAXPORTS + i, NULL);
1da177e4
LT
3658 }
3659
8f8f5a58 3660 return found;
1da177e4 3661}
a00f33f3
JS
3662#else
3663static inline int stli_findeisabrds(void) { return 0; }
3664#endif
1da177e4
LT
3665
3666/*****************************************************************************/
3667
3668/*
3669 * Find the next available board number that is free.
3670 */
3671
3672/*****************************************************************************/
3673
1da177e4
LT
3674/*
3675 * We have a Stallion board. Allocate a board structure and
3676 * initialize it. Read its IO and MEMORY resources from PCI
3677 * configuration space.
3678 */
3679
845bead4
JS
3680static int __devinit stli_pciprobe(struct pci_dev *pdev,
3681 const struct pci_device_id *ent)
1da177e4 3682{
1f8ec435 3683 struct stlibrd *brdp;
ec3dde57 3684 unsigned int i;
1328d737 3685 int brdnr, retval = -EIO;
845bead4
JS
3686
3687 retval = pci_enable_device(pdev);
3688 if (retval)
3689 goto err;
3690 brdp = stli_allocbrd();
3691 if (brdp == NULL) {
3692 retval = -ENOMEM;
3693 goto err;
3694 }
b103b5cf 3695 mutex_lock(&stli_brdslock);
1328d737 3696 brdnr = stli_getbrdnr();
b103b5cf 3697 if (brdnr < 0) {
a6614999 3698 printk(KERN_INFO "istallion: too many boards found, "
1da177e4 3699 "maximum supported %d\n", STL_MAXBRDS);
b103b5cf 3700 mutex_unlock(&stli_brdslock);
845bead4
JS
3701 retval = -EIO;
3702 goto err_fr;
1da177e4 3703 }
1328d737 3704 brdp->brdnr = (unsigned int)brdnr;
b103b5cf
JS
3705 stli_brds[brdp->brdnr] = brdp;
3706 mutex_unlock(&stli_brdslock);
845bead4 3707 brdp->brdtype = BRD_ECPPCI;
1da177e4
LT
3708/*
3709 * We have all resources from the board, so lets setup the actual
3710 * board structure now.
3711 */
845bead4
JS
3712 brdp->iobase = pci_resource_start(pdev, 3);
3713 brdp->memaddr = pci_resource_start(pdev, 2);
3714 retval = stli_brdinit(brdp);
3715 if (retval)
b103b5cf 3716 goto err_null;
845bead4 3717
8a1e803d 3718 set_bit(BST_PROBED, &brdp->state);
845bead4 3719 pci_set_drvdata(pdev, brdp);
1da177e4 3720
140e92ab
JS
3721 EBRDENABLE(brdp);
3722 brdp->enable = NULL;
3723 brdp->disable = NULL;
3724
ec3dde57
JS
3725 for (i = 0; i < brdp->nrports; i++)
3726 tty_register_device(stli_serial, brdp->brdnr * STL_MAXPORTS + i,
3727 &pdev->dev);
3728
4ac4360b 3729 return 0;
b103b5cf
JS
3730err_null:
3731 stli_brds[brdp->brdnr] = NULL;
845bead4
JS
3732err_fr:
3733 kfree(brdp);
3734err:
3735 return retval;
1da177e4
LT
3736}
3737
0b9ce5a2 3738static void __devexit stli_pciremove(struct pci_dev *pdev)
845bead4 3739{
1f8ec435 3740 struct stlibrd *brdp = pci_get_drvdata(pdev);
1da177e4 3741
845bead4 3742 stli_cleanup_ports(brdp);
1da177e4 3743
845bead4
JS
3744 iounmap(brdp->membase);
3745 if (brdp->iosize > 0)
3746 release_region(brdp->iobase, brdp->iosize);
1da177e4 3747
845bead4
JS
3748 stli_brds[brdp->brdnr] = NULL;
3749 kfree(brdp);
1da177e4
LT
3750}
3751
845bead4
JS
3752static struct pci_driver stli_pcidriver = {
3753 .name = "istallion",
3754 .id_table = istallion_pci_tbl,
3755 .probe = stli_pciprobe,
3756 .remove = __devexit_p(stli_pciremove)
3757};
1da177e4
LT
3758/*****************************************************************************/
3759
3760/*
3761 * Allocate a new board structure. Fill out the basic info in it.
3762 */
3763
1f8ec435 3764static struct stlibrd *stli_allocbrd(void)
1da177e4 3765{
1f8ec435 3766 struct stlibrd *brdp;
1da177e4 3767
1f8ec435 3768 brdp = kzalloc(sizeof(struct stlibrd), GFP_KERNEL);
b0b4ed72 3769 if (!brdp) {
a6614999 3770 printk(KERN_ERR "istallion: failed to allocate memory "
1f8ec435 3771 "(size=%Zd)\n", sizeof(struct stlibrd));
b0b4ed72 3772 return NULL;
1da177e4 3773 }
1da177e4 3774 brdp->magic = STLI_BOARDMAGIC;
4ac4360b 3775 return brdp;
1da177e4
LT
3776}
3777
3778/*****************************************************************************/
3779
3780/*
3781 * Scan through all the boards in the configuration and see what we
3782 * can find.
3783 */
3784
6005e3eb 3785static int __init stli_initbrds(void)
1da177e4 3786{
1f8ec435
JS
3787 struct stlibrd *brdp, *nxtbrdp;
3788 struct stlconf conf;
8f8f5a58 3789 unsigned int i, j, found = 0;
1328d737 3790 int retval;
1da177e4 3791
a3f8d9d5
JS
3792 for (stli_nrbrds = 0; stli_nrbrds < ARRAY_SIZE(stli_brdsp);
3793 stli_nrbrds++) {
3794 memset(&conf, 0, sizeof(conf));
3795 if (stli_parsebrd(&conf, stli_brdsp[stli_nrbrds]) == 0)
3796 continue;
4ac4360b 3797 if ((brdp = stli_allocbrd()) == NULL)
a3f8d9d5
JS
3798 continue;
3799 brdp->brdnr = stli_nrbrds;
3800 brdp->brdtype = conf.brdtype;
3801 brdp->iobase = conf.ioaddr1;
3802 brdp->memaddr = conf.memaddr;
8f8f5a58
JS
3803 if (stli_brdinit(brdp) < 0) {
3804 kfree(brdp);
3805 continue;
3806 }
b103b5cf 3807 stli_brds[brdp->brdnr] = brdp;
8f8f5a58 3808 found++;
ec3dde57
JS
3809
3810 for (i = 0; i < brdp->nrports; i++)
3811 tty_register_device(stli_serial,
3812 brdp->brdnr * STL_MAXPORTS + i, NULL);
1da177e4
LT
3813 }
3814
8f8f5a58
JS
3815 retval = stli_findeisabrds();
3816 if (retval > 0)
3817 found += retval;
845bead4 3818
1da177e4
LT
3819/*
3820 * All found boards are initialized. Now for a little optimization, if
3821 * no boards are sharing the "shared memory" regions then we can just
3822 * leave them all enabled. This is in fact the usual case.
3823 */
3824 stli_shared = 0;
3825 if (stli_nrbrds > 1) {
3826 for (i = 0; (i < stli_nrbrds); i++) {
3827 brdp = stli_brds[i];
4ac4360b 3828 if (brdp == NULL)
1da177e4
LT
3829 continue;
3830 for (j = i + 1; (j < stli_nrbrds); j++) {
3831 nxtbrdp = stli_brds[j];
4ac4360b 3832 if (nxtbrdp == NULL)
1da177e4
LT
3833 continue;
3834 if ((brdp->membase >= nxtbrdp->membase) &&
3835 (brdp->membase <= (nxtbrdp->membase +
3836 nxtbrdp->memsize - 1))) {
3837 stli_shared++;
3838 break;
3839 }
3840 }
3841 }
3842 }
3843
3844 if (stli_shared == 0) {
3845 for (i = 0; (i < stli_nrbrds); i++) {
3846 brdp = stli_brds[i];
4ac4360b 3847 if (brdp == NULL)
1da177e4 3848 continue;
8a1e803d 3849 if (test_bit(BST_FOUND, &brdp->state)) {
1da177e4
LT
3850 EBRDENABLE(brdp);
3851 brdp->enable = NULL;
3852 brdp->disable = NULL;
3853 }
3854 }
3855 }
3856
140e92ab
JS
3857 retval = pci_register_driver(&stli_pcidriver);
3858 if (retval && found == 0) {
3859 printk(KERN_ERR "Neither isa nor eisa cards found nor pci "
3860 "driver can be registered!\n");
3861 goto err;
3862 }
3863
4ac4360b 3864 return 0;
8f8f5a58
JS
3865err:
3866 return retval;
1da177e4
LT
3867}
3868
3869/*****************************************************************************/
3870
3871/*
3872 * Code to handle an "staliomem" read operation. This device is the
3873 * contents of the board shared memory. It is used for down loading
3874 * the slave image (and debugging :-)
3875 */
3876
3877static ssize_t stli_memread(struct file *fp, char __user *buf, size_t count, loff_t *offp)
3878{
4ac4360b 3879 unsigned long flags;
29756fa3 3880 void __iomem *memptr;
1f8ec435 3881 struct stlibrd *brdp;
1328d737
JS
3882 unsigned int brdnr;
3883 int size, n;
4ac4360b
AC
3884 void *p;
3885 loff_t off = *offp;
1da177e4 3886
a7113a96 3887 brdnr = iminor(fp->f_path.dentry->d_inode);
1da177e4 3888 if (brdnr >= stli_nrbrds)
4ac4360b 3889 return -ENODEV;
1da177e4 3890 brdp = stli_brds[brdnr];
4ac4360b
AC
3891 if (brdp == NULL)
3892 return -ENODEV;
1da177e4 3893 if (brdp->state == 0)
4ac4360b
AC
3894 return -ENODEV;
3895 if (off >= brdp->memsize || off + count < off)
3896 return 0;
1da177e4 3897
a3f8d9d5 3898 size = min(count, (size_t)(brdp->memsize - off));
4ac4360b
AC
3899
3900 /*
3901 * Copy the data a page at a time
3902 */
3903
3904 p = (void *)__get_free_page(GFP_KERNEL);
3905 if(p == NULL)
3906 return -ENOMEM;
1da177e4 3907
1da177e4 3908 while (size > 0) {
4ac4360b
AC
3909 spin_lock_irqsave(&brd_lock, flags);
3910 EBRDENABLE(brdp);
29756fa3 3911 memptr = EBRDGETMEMPTR(brdp, off);
a3f8d9d5
JS
3912 n = min(size, (int)(brdp->pagesize - (((unsigned long) off) % brdp->pagesize)));
3913 n = min(n, (int)PAGE_SIZE);
4ac4360b
AC
3914 memcpy_fromio(p, memptr, n);
3915 EBRDDISABLE(brdp);
3916 spin_unlock_irqrestore(&brd_lock, flags);
3917 if (copy_to_user(buf, p, n)) {
1da177e4
LT
3918 count = -EFAULT;
3919 goto out;
3920 }
4ac4360b 3921 off += n;
1da177e4
LT
3922 buf += n;
3923 size -= n;
3924 }
3925out:
4ac4360b
AC
3926 *offp = off;
3927 free_page((unsigned long)p);
3928 return count;
1da177e4
LT
3929}
3930
3931/*****************************************************************************/
3932
3933/*
3934 * Code to handle an "staliomem" write operation. This device is the
3935 * contents of the board shared memory. It is used for down loading
3936 * the slave image (and debugging :-)
4ac4360b
AC
3937 *
3938 * FIXME: copy under lock
1da177e4
LT
3939 */
3940
3941static ssize_t stli_memwrite(struct file *fp, const char __user *buf, size_t count, loff_t *offp)
3942{
4ac4360b 3943 unsigned long flags;
29756fa3 3944 void __iomem *memptr;
1f8ec435 3945 struct stlibrd *brdp;
4ac4360b 3946 char __user *chbuf;
1328d737
JS
3947 unsigned int brdnr;
3948 int size, n;
4ac4360b
AC
3949 void *p;
3950 loff_t off = *offp;
1da177e4 3951
a7113a96 3952 brdnr = iminor(fp->f_path.dentry->d_inode);
4ac4360b 3953
1da177e4 3954 if (brdnr >= stli_nrbrds)
4ac4360b 3955 return -ENODEV;
1da177e4 3956 brdp = stli_brds[brdnr];
4ac4360b
AC
3957 if (brdp == NULL)
3958 return -ENODEV;
1da177e4 3959 if (brdp->state == 0)
4ac4360b
AC
3960 return -ENODEV;
3961 if (off >= brdp->memsize || off + count < off)
3962 return 0;
1da177e4
LT
3963
3964 chbuf = (char __user *) buf;
a3f8d9d5 3965 size = min(count, (size_t)(brdp->memsize - off));
4ac4360b
AC
3966
3967 /*
3968 * Copy the data a page at a time
3969 */
3970
3971 p = (void *)__get_free_page(GFP_KERNEL);
3972 if(p == NULL)
3973 return -ENOMEM;
1da177e4 3974
1da177e4 3975 while (size > 0) {
a3f8d9d5
JS
3976 n = min(size, (int)(brdp->pagesize - (((unsigned long) off) % brdp->pagesize)));
3977 n = min(n, (int)PAGE_SIZE);
4ac4360b
AC
3978 if (copy_from_user(p, chbuf, n)) {
3979 if (count == 0)
3980 count = -EFAULT;
1da177e4
LT
3981 goto out;
3982 }
4ac4360b
AC
3983 spin_lock_irqsave(&brd_lock, flags);
3984 EBRDENABLE(brdp);
29756fa3 3985 memptr = EBRDGETMEMPTR(brdp, off);
4ac4360b
AC
3986 memcpy_toio(memptr, p, n);
3987 EBRDDISABLE(brdp);
3988 spin_unlock_irqrestore(&brd_lock, flags);
3989 off += n;
1da177e4
LT
3990 chbuf += n;
3991 size -= n;
3992 }
3993out:
4ac4360b
AC
3994 free_page((unsigned long) p);
3995 *offp = off;
3996 return count;
1da177e4
LT
3997}
3998
3999/*****************************************************************************/
4000
4001/*
4002 * Return the board stats structure to user app.
4003 */
4004
4005static int stli_getbrdstats(combrd_t __user *bp)
4006{
1f8ec435 4007 struct stlibrd *brdp;
1328d737 4008 unsigned int i;
1da177e4
LT
4009
4010 if (copy_from_user(&stli_brdstats, bp, sizeof(combrd_t)))
4011 return -EFAULT;
4012 if (stli_brdstats.brd >= STL_MAXBRDS)
4ac4360b 4013 return -ENODEV;
1da177e4 4014 brdp = stli_brds[stli_brdstats.brd];
4ac4360b
AC
4015 if (brdp == NULL)
4016 return -ENODEV;
1da177e4
LT
4017
4018 memset(&stli_brdstats, 0, sizeof(combrd_t));
b4eda9cb 4019
1da177e4
LT
4020 stli_brdstats.brd = brdp->brdnr;
4021 stli_brdstats.type = brdp->brdtype;
4022 stli_brdstats.hwid = 0;
4023 stli_brdstats.state = brdp->state;
4024 stli_brdstats.ioaddr = brdp->iobase;
4025 stli_brdstats.memaddr = brdp->memaddr;
4026 stli_brdstats.nrpanels = brdp->nrpanels;
4027 stli_brdstats.nrports = brdp->nrports;
4028 for (i = 0; (i < brdp->nrpanels); i++) {
4029 stli_brdstats.panels[i].panel = i;
4030 stli_brdstats.panels[i].hwid = brdp->panelids[i];
4031 stli_brdstats.panels[i].nrports = brdp->panels[i];
4032 }
4033
4034 if (copy_to_user(bp, &stli_brdstats, sizeof(combrd_t)))
4035 return -EFAULT;
4ac4360b 4036 return 0;
1da177e4
LT
4037}
4038
4039/*****************************************************************************/
4040
4041/*
4042 * Resolve the referenced port number into a port struct pointer.
4043 */
4044
1328d737
JS
4045static struct stliport *stli_getport(unsigned int brdnr, unsigned int panelnr,
4046 unsigned int portnr)
1da177e4 4047{
1f8ec435 4048 struct stlibrd *brdp;
1328d737 4049 unsigned int i;
1da177e4 4050
1328d737 4051 if (brdnr >= STL_MAXBRDS)
4ac4360b 4052 return NULL;
1da177e4 4053 brdp = stli_brds[brdnr];
4ac4360b
AC
4054 if (brdp == NULL)
4055 return NULL;
1da177e4
LT
4056 for (i = 0; (i < panelnr); i++)
4057 portnr += brdp->panels[i];
1328d737 4058 if (portnr >= brdp->nrports)
4ac4360b
AC
4059 return NULL;
4060 return brdp->ports[portnr];
1da177e4
LT
4061}
4062
4063/*****************************************************************************/
4064
4065/*
4066 * Return the port stats structure to user app. A NULL port struct
4067 * pointer passed in means that we need to find out from the app
4068 * what port to get stats for (used through board control device).
4069 */
4070
d18a750f 4071static int stli_portcmdstats(struct tty_struct *tty, struct stliport *portp)
1da177e4
LT
4072{
4073 unsigned long flags;
1f8ec435 4074 struct stlibrd *brdp;
1da177e4
LT
4075 int rc;
4076
4077 memset(&stli_comstats, 0, sizeof(comstats_t));
4078
4ac4360b
AC
4079 if (portp == NULL)
4080 return -ENODEV;
1da177e4 4081 brdp = stli_brds[portp->brdnr];
4ac4360b
AC
4082 if (brdp == NULL)
4083 return -ENODEV;
1da177e4 4084
b4eda9cb 4085 mutex_lock(&portp->port.mutex);
8a1e803d 4086 if (test_bit(BST_STARTED, &brdp->state)) {
1da177e4 4087 if ((rc = stli_cmdwait(brdp, portp, A_GETSTATS,
b4eda9cb
AC
4088 &stli_cdkstats, sizeof(asystats_t), 1)) < 0) {
4089 mutex_unlock(&portp->port.mutex);
4ac4360b 4090 return rc;
b4eda9cb 4091 }
1da177e4
LT
4092 } else {
4093 memset(&stli_cdkstats, 0, sizeof(asystats_t));
4094 }
4095
4096 stli_comstats.brd = portp->brdnr;
4097 stli_comstats.panel = portp->panelnr;
4098 stli_comstats.port = portp->portnr;
4099 stli_comstats.state = portp->state;
42a77a1b 4100 stli_comstats.flags = portp->port.flags;
1da177e4 4101
4ac4360b 4102 spin_lock_irqsave(&brd_lock, flags);
d18a750f
AC
4103 if (tty != NULL) {
4104 if (portp->port.tty == tty) {
4105 stli_comstats.ttystate = tty->flags;
4ac4360b 4106 stli_comstats.rxbuffered = -1;
d18a750f
AC
4107 if (tty->termios != NULL) {
4108 stli_comstats.cflags = tty->termios->c_cflag;
4109 stli_comstats.iflags = tty->termios->c_iflag;
4110 stli_comstats.oflags = tty->termios->c_oflag;
4111 stli_comstats.lflags = tty->termios->c_lflag;
1da177e4
LT
4112 }
4113 }
4114 }
4ac4360b 4115 spin_unlock_irqrestore(&brd_lock, flags);
1da177e4
LT
4116
4117 stli_comstats.txtotal = stli_cdkstats.txchars;
4118 stli_comstats.rxtotal = stli_cdkstats.rxchars + stli_cdkstats.ringover;
4119 stli_comstats.txbuffered = stli_cdkstats.txringq;
4120 stli_comstats.rxbuffered += stli_cdkstats.rxringq;
4121 stli_comstats.rxoverrun = stli_cdkstats.overruns;
4122 stli_comstats.rxparity = stli_cdkstats.parity;
4123 stli_comstats.rxframing = stli_cdkstats.framing;
4124 stli_comstats.rxlost = stli_cdkstats.ringover;
4125 stli_comstats.rxbreaks = stli_cdkstats.rxbreaks;
4126 stli_comstats.txbreaks = stli_cdkstats.txbreaks;
4127 stli_comstats.txxon = stli_cdkstats.txstart;
4128 stli_comstats.txxoff = stli_cdkstats.txstop;
4129 stli_comstats.rxxon = stli_cdkstats.rxstart;
4130 stli_comstats.rxxoff = stli_cdkstats.rxstop;
4131 stli_comstats.rxrtsoff = stli_cdkstats.rtscnt / 2;
4132 stli_comstats.rxrtson = stli_cdkstats.rtscnt - stli_comstats.rxrtsoff;
4133 stli_comstats.modem = stli_cdkstats.dcdcnt;
4134 stli_comstats.hwid = stli_cdkstats.hwid;
4135 stli_comstats.signals = stli_mktiocm(stli_cdkstats.signals);
b4eda9cb 4136 mutex_unlock(&portp->port.mutex);
1da177e4 4137
4ac4360b 4138 return 0;
1da177e4
LT
4139}
4140
4141/*****************************************************************************/
4142
4143/*
4144 * Return the port stats structure to user app. A NULL port struct
4145 * pointer passed in means that we need to find out from the app
4146 * what port to get stats for (used through board control device).
4147 */
4148
d18a750f
AC
4149static int stli_getportstats(struct tty_struct *tty, struct stliport *portp,
4150 comstats_t __user *cp)
1da177e4 4151{
1f8ec435 4152 struct stlibrd *brdp;
4ac4360b 4153 int rc;
1da177e4
LT
4154
4155 if (!portp) {
4156 if (copy_from_user(&stli_comstats, cp, sizeof(comstats_t)))
4157 return -EFAULT;
4158 portp = stli_getport(stli_comstats.brd, stli_comstats.panel,
4159 stli_comstats.port);
4160 if (!portp)
4161 return -ENODEV;
4162 }
4163
4164 brdp = stli_brds[portp->brdnr];
4165 if (!brdp)
4166 return -ENODEV;
4167
d18a750f 4168 if ((rc = stli_portcmdstats(tty, portp)) < 0)
1da177e4
LT
4169 return rc;
4170
4171 return copy_to_user(cp, &stli_comstats, sizeof(comstats_t)) ?
4172 -EFAULT : 0;
4173}
4174
4175/*****************************************************************************/
4176
4177/*
4178 * Clear the port stats structure. We also return it zeroed out...
4179 */
4180
1f8ec435 4181static int stli_clrportstats(struct stliport *portp, comstats_t __user *cp)
1da177e4 4182{
1f8ec435 4183 struct stlibrd *brdp;
4ac4360b 4184 int rc;
1da177e4
LT
4185
4186 if (!portp) {
4187 if (copy_from_user(&stli_comstats, cp, sizeof(comstats_t)))
4188 return -EFAULT;
4189 portp = stli_getport(stli_comstats.brd, stli_comstats.panel,
4190 stli_comstats.port);
4191 if (!portp)
4192 return -ENODEV;
4193 }
4194
4195 brdp = stli_brds[portp->brdnr];
4196 if (!brdp)
4197 return -ENODEV;
4198
b4eda9cb
AC
4199 mutex_lock(&portp->port.mutex);
4200
8a1e803d 4201 if (test_bit(BST_STARTED, &brdp->state)) {
b4eda9cb
AC
4202 if ((rc = stli_cmdwait(brdp, portp, A_CLEARSTATS, NULL, 0, 0)) < 0) {
4203 mutex_unlock(&portp->port.mutex);
1da177e4 4204 return rc;
b4eda9cb 4205 }
1da177e4
LT
4206 }
4207
4208 memset(&stli_comstats, 0, sizeof(comstats_t));
4209 stli_comstats.brd = portp->brdnr;
4210 stli_comstats.panel = portp->panelnr;
4211 stli_comstats.port = portp->portnr;
b4eda9cb 4212 mutex_unlock(&portp->port.mutex);
1da177e4
LT
4213
4214 if (copy_to_user(cp, &stli_comstats, sizeof(comstats_t)))
4215 return -EFAULT;
4216 return 0;
4217}
4218
4219/*****************************************************************************/
4220
4221/*
4222 * Return the entire driver ports structure to a user app.
4223 */
4224
1f8ec435 4225static int stli_getportstruct(struct stliport __user *arg)
1da177e4 4226{
1328d737 4227 struct stliport stli_dummyport;
1f8ec435 4228 struct stliport *portp;
1da177e4 4229
1f8ec435 4230 if (copy_from_user(&stli_dummyport, arg, sizeof(struct stliport)))
1da177e4
LT
4231 return -EFAULT;
4232 portp = stli_getport(stli_dummyport.brdnr, stli_dummyport.panelnr,
4233 stli_dummyport.portnr);
4234 if (!portp)
4235 return -ENODEV;
1f8ec435 4236 if (copy_to_user(arg, portp, sizeof(struct stliport)))
1da177e4
LT
4237 return -EFAULT;
4238 return 0;
4239}
4240
4241/*****************************************************************************/
4242
4243/*
4244 * Return the entire driver board structure to a user app.
4245 */
4246
1f8ec435 4247static int stli_getbrdstruct(struct stlibrd __user *arg)
1da177e4 4248{
1328d737 4249 struct stlibrd stli_dummybrd;
1f8ec435 4250 struct stlibrd *brdp;
1da177e4 4251
1f8ec435 4252 if (copy_from_user(&stli_dummybrd, arg, sizeof(struct stlibrd)))
1da177e4 4253 return -EFAULT;
1328d737 4254 if (stli_dummybrd.brdnr >= STL_MAXBRDS)
1da177e4
LT
4255 return -ENODEV;
4256 brdp = stli_brds[stli_dummybrd.brdnr];
4257 if (!brdp)
4258 return -ENODEV;
1f8ec435 4259 if (copy_to_user(arg, brdp, sizeof(struct stlibrd)))
1da177e4
LT
4260 return -EFAULT;
4261 return 0;
4262}
4263
4264/*****************************************************************************/
4265
4266/*
4267 * The "staliomem" device is also required to do some special operations on
4268 * the board. We need to be able to send an interrupt to the board,
4269 * reset it, and start/stop it.
4270 */
4271
62687538 4272static long stli_memioctl(struct file *fp, unsigned int cmd, unsigned long arg)
1da177e4 4273{
1f8ec435 4274 struct stlibrd *brdp;
4ac4360b 4275 int brdnr, rc, done;
1da177e4
LT
4276 void __user *argp = (void __user *)arg;
4277
1da177e4
LT
4278/*
4279 * First up handle the board independent ioctls.
4280 */
4281 done = 0;
4282 rc = 0;
4283
4284 switch (cmd) {
4285 case COM_GETPORTSTATS:
d18a750f 4286 rc = stli_getportstats(NULL, NULL, argp);
1da177e4
LT
4287 done++;
4288 break;
4289 case COM_CLRPORTSTATS:
4290 rc = stli_clrportstats(NULL, argp);
4291 done++;
4292 break;
4293 case COM_GETBRDSTATS:
4294 rc = stli_getbrdstats(argp);
4295 done++;
4296 break;
4297 case COM_READPORT:
4298 rc = stli_getportstruct(argp);
4299 done++;
4300 break;
4301 case COM_READBOARD:
4302 rc = stli_getbrdstruct(argp);
4303 done++;
4304 break;
4305 }
1da177e4 4306 if (done)
4ac4360b 4307 return rc;
1da177e4
LT
4308
4309/*
4310 * Now handle the board specific ioctls. These all depend on the
4311 * minor number of the device they were called from.
4312 */
62687538 4313 brdnr = iminor(fp->f_dentry->d_inode);
1da177e4 4314 if (brdnr >= STL_MAXBRDS)
4ac4360b 4315 return -ENODEV;
1da177e4
LT
4316 brdp = stli_brds[brdnr];
4317 if (!brdp)
4ac4360b 4318 return -ENODEV;
1da177e4 4319 if (brdp->state == 0)
4ac4360b 4320 return -ENODEV;
1da177e4
LT
4321
4322 switch (cmd) {
4323 case STL_BINTR:
4324 EBRDINTR(brdp);
4325 break;
4326 case STL_BSTART:
4327 rc = stli_startbrd(brdp);
4328 break;
4329 case STL_BSTOP:
8a1e803d 4330 clear_bit(BST_STARTED, &brdp->state);
1da177e4
LT
4331 break;
4332 case STL_BRESET:
8a1e803d 4333 clear_bit(BST_STARTED, &brdp->state);
1da177e4
LT
4334 EBRDRESET(brdp);
4335 if (stli_shared == 0) {
4336 if (brdp->reenable != NULL)
4337 (* brdp->reenable)(brdp);
4338 }
4339 break;
4340 default:
4341 rc = -ENOIOCTLCMD;
4342 break;
4343 }
4ac4360b 4344 return rc;
1da177e4
LT
4345}
4346
b68e31d0 4347static const struct tty_operations stli_ops = {
1da177e4
LT
4348 .open = stli_open,
4349 .close = stli_close,
4350 .write = stli_write,
4351 .put_char = stli_putchar,
4352 .flush_chars = stli_flushchars,
4353 .write_room = stli_writeroom,
4354 .chars_in_buffer = stli_charsinbuffer,
4355 .ioctl = stli_ioctl,
4356 .set_termios = stli_settermios,
4357 .throttle = stli_throttle,
4358 .unthrottle = stli_unthrottle,
4359 .stop = stli_stop,
4360 .start = stli_start,
4361 .hangup = stli_hangup,
4362 .flush_buffer = stli_flushbuffer,
4363 .break_ctl = stli_breakctl,
4364 .wait_until_sent = stli_waituntilsent,
4365 .send_xchar = stli_sendxchar,
1da177e4
LT
4366 .tiocmget = stli_tiocmget,
4367 .tiocmset = stli_tiocmset,
5bd6de7d 4368 .proc_fops = &stli_proc_fops,
1da177e4
LT
4369};
4370
31f35939
AC
4371static const struct tty_port_operations stli_port_ops = {
4372 .carrier_raised = stli_carrier_raised,
fcc8ac18 4373 .dtr_rts = stli_dtr_rts,
338818fd
AC
4374 .activate = stli_activate,
4375 .shutdown = stli_shutdown,
31f35939
AC
4376};
4377
1da177e4 4378/*****************************************************************************/
f1cc54f8
JS
4379/*
4380 * Loadable module initialization stuff.
4381 */
1da177e4 4382
f2362c94
JS
4383static void istallion_cleanup_isa(void)
4384{
4385 struct stlibrd *brdp;
4386 unsigned int j;
4387
4388 for (j = 0; (j < stli_nrbrds); j++) {
8a1e803d
AC
4389 if ((brdp = stli_brds[j]) == NULL ||
4390 test_bit(BST_PROBED, &brdp->state))
f2362c94
JS
4391 continue;
4392
4393 stli_cleanup_ports(brdp);
4394
4395 iounmap(brdp->membase);
4396 if (brdp->iosize > 0)
4397 release_region(brdp->iobase, brdp->iosize);
4398 kfree(brdp);
4399 stli_brds[j] = NULL;
4400 }
4401}
4402
f1cc54f8 4403static int __init istallion_module_init(void)
1da177e4 4404{
f2362c94
JS
4405 unsigned int i;
4406 int retval;
f1cc54f8 4407
1da177e4
LT
4408 printk(KERN_INFO "%s: version %s\n", stli_drvtitle, stli_drvversion);
4409
4ac4360b
AC
4410 spin_lock_init(&stli_lock);
4411 spin_lock_init(&brd_lock);
4412
b0b4ed72 4413 stli_txcookbuf = kmalloc(STLI_TXBUFSIZE, GFP_KERNEL);
f2362c94 4414 if (!stli_txcookbuf) {
a6614999 4415 printk(KERN_ERR "istallion: failed to allocate memory "
1da177e4 4416 "(size=%d)\n", STLI_TXBUFSIZE);
f2362c94
JS
4417 retval = -ENOMEM;
4418 goto err;
4419 }
1da177e4 4420
f2362c94
JS
4421 stli_serial = alloc_tty_driver(STL_MAXBRDS * STL_MAXPORTS);
4422 if (!stli_serial) {
4423 retval = -ENOMEM;
4424 goto err_free;
4425 }
1da177e4 4426
1da177e4
LT
4427 stli_serial->owner = THIS_MODULE;
4428 stli_serial->driver_name = stli_drvname;
4429 stli_serial->name = stli_serialname;
4430 stli_serial->major = STL_SERIALMAJOR;
4431 stli_serial->minor_start = 0;
4432 stli_serial->type = TTY_DRIVER_TYPE_SERIAL;
4433 stli_serial->subtype = SERIAL_TYPE_NORMAL;
4434 stli_serial->init_termios = stli_deftermios;
ec3dde57 4435 stli_serial->flags = TTY_DRIVER_REAL_RAW | TTY_DRIVER_DYNAMIC_DEV;
1da177e4
LT
4436 tty_set_operations(stli_serial, &stli_ops);
4437
f2362c94
JS
4438 retval = tty_register_driver(stli_serial);
4439 if (retval) {
a6614999 4440 printk(KERN_ERR "istallion: failed to register serial driver\n");
f2362c94
JS
4441 goto err_ttyput;
4442 }
4443
4444 retval = stli_initbrds();
4445 if (retval)
4446 goto err_ttyunr;
4447
4448/*
4449 * Set up a character driver for the shared memory region. We need this
4450 * to down load the slave code image. Also it is a useful debugging tool.
4451 */
4452 retval = register_chrdev(STL_SIOMEMMAJOR, "staliomem", &stli_fsiomem);
4453 if (retval) {
a6614999 4454 printk(KERN_ERR "istallion: failed to register serial memory "
f2362c94
JS
4455 "device\n");
4456 goto err_deinit;
1da177e4 4457 }
f2362c94
JS
4458
4459 istallion_class = class_create(THIS_MODULE, "staliomem");
4460 for (i = 0; i < 4; i++)
03457cd4
GKH
4461 device_create(istallion_class, NULL, MKDEV(STL_SIOMEMMAJOR, i),
4462 NULL, "staliomem%d", i);
f2362c94 4463
4ac4360b 4464 return 0;
f2362c94
JS
4465err_deinit:
4466 pci_unregister_driver(&stli_pcidriver);
4467 istallion_cleanup_isa();
4468err_ttyunr:
4469 tty_unregister_driver(stli_serial);
4470err_ttyput:
4471 put_tty_driver(stli_serial);
4472err_free:
4473 kfree(stli_txcookbuf);
4474err:
4475 return retval;
1da177e4
LT
4476}
4477
4478/*****************************************************************************/
f1cc54f8
JS
4479
4480static void __exit istallion_module_exit(void)
4481{
f1cc54f8 4482 unsigned int j;
f1cc54f8
JS
4483
4484 printk(KERN_INFO "Unloading %s: version %s\n", stli_drvtitle,
4485 stli_drvversion);
4486
f1cc54f8
JS
4487 if (stli_timeron) {
4488 stli_timeron = 0;
4489 del_timer_sync(&stli_timerlist);
4490 }
4491
f2362c94
JS
4492 unregister_chrdev(STL_SIOMEMMAJOR, "staliomem");
4493
f1cc54f8 4494 for (j = 0; j < 4; j++)
07c015e7 4495 device_destroy(istallion_class, MKDEV(STL_SIOMEMMAJOR, j));
f1cc54f8 4496 class_destroy(istallion_class);
f1cc54f8 4497
f2362c94
JS
4498 pci_unregister_driver(&stli_pcidriver);
4499 istallion_cleanup_isa();
f1cc54f8 4500
f2362c94
JS
4501 tty_unregister_driver(stli_serial);
4502 put_tty_driver(stli_serial);
f1cc54f8 4503
f2362c94 4504 kfree(stli_txcookbuf);
f1cc54f8
JS
4505}
4506
4507module_init(istallion_module_init);
4508module_exit(istallion_module_exit);