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