tpm: increase size of internal TPM response buffers
[GitHub/mt8127/android_kernel_alcatel_ttab.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);
42a77a1b 601static int stli_putchar(struct tty_struct *tty, unsigned char ch);
1da177e4
LT
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);
9e98966c 612static int stli_breakctl(struct tty_struct *tty, int state);
1da177e4
LT
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) {
b02f5ad6
AC
738 if (portp->port.tty != NULL)
739 tty_hangup(portp->port.tty);
845bead4
JS
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 */
b02f5ad6
AC
814 if (portp->port.flags & ASYNC_CLOSING) {
815 interruptible_sleep_on(&portp->port.close_wait);
816 if (portp->port.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 */
b02f5ad6 827 portp->port.tty = tty;
1da177e4 828 tty->driver_data = portp;
42a77a1b 829 portp->port.count++;
1da177e4
LT
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 835
b02f5ad6 836 if ((portp->port.flags & ASYNC_INITIALIZED) == 0) {
1da177e4
LT
837 set_bit(ST_INITIALIZING, &portp->state);
838 if ((rc = stli_initopen(brdp, portp)) >= 0) {
b02f5ad6 839 portp->port.flags |= ASYNC_INITIALIZED;
1da177e4
LT
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 */
b02f5ad6
AC
854 if (portp->port.flags & ASYNC_CLOSING) {
855 interruptible_sleep_on(&portp->port.close_wait);
856 if (portp->port.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 869 }
b02f5ad6 870 portp->port.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 }
42a77a1b
WC
891 if ((tty->count == 1) && (portp->port.count != 1))
892 portp->port.count = 1;
893 if (portp->port.count-- > 1) {
4ac4360b 894 spin_unlock_irqrestore(&stli_lock, flags);
1da177e4
LT
895 return;
896 }
897
b02f5ad6 898 portp->port.flags |= ASYNC_CLOSING;
1da177e4
LT
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
b02f5ad6 914 portp->port.flags &= ~ASYNC_INITIALIZED;
1da177e4
LT
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);
ed569bfb 928 tty_ldisc_flush(tty);
1da177e4
LT
929 set_bit(ST_DOFLUSHRX, &portp->state);
930 stli_flushbuffer(tty);
931
932 tty->closing = 0;
b02f5ad6 933 portp->port.tty = NULL;
1da177e4
LT
934
935 if (portp->openwaitcnt) {
936 if (portp->close_delay)
937 msleep_interruptible(jiffies_to_msecs(portp->close_delay));
b02f5ad6 938 wake_up_interruptible(&portp->port.open_wait);
1da177e4
LT
939 }
940
b02f5ad6
AC
941 portp->port.flags &= ~(ASYNC_NORMAL_ACTIVE|ASYNC_CLOSING);
942 wake_up_interruptible(&portp->port.close_wait);
1da177e4
LT
943}
944
945/*****************************************************************************/
946
947/*
948 * Carry out first open operations on a port. This involves a number of
949 * commands to be sent to the slave. We need to open the port, set the
950 * notification events, set the initial port settings, get and set the
951 * initial signal values. We sleep and wait in between each one. But
952 * this still all happens pretty quickly.
953 */
954
1f8ec435 955static int stli_initopen(struct stlibrd *brdp, struct stliport *portp)
1da177e4 956{
4ac4360b
AC
957 struct tty_struct *tty;
958 asynotify_t nt;
959 asyport_t aport;
960 int rc;
1da177e4
LT
961
962 if ((rc = stli_rawopen(brdp, portp, 0, 1)) < 0)
4ac4360b 963 return rc;
1da177e4
LT
964
965 memset(&nt, 0, sizeof(asynotify_t));
966 nt.data = (DT_TXLOW | DT_TXEMPTY | DT_RXBUSY | DT_RXBREAK);
967 nt.signal = SG_DCD;
968 if ((rc = stli_cmdwait(brdp, portp, A_SETNOTIFY, &nt,
969 sizeof(asynotify_t), 0)) < 0)
4ac4360b 970 return rc;
1da177e4 971
b02f5ad6 972 tty = portp->port.tty;
4ac4360b
AC
973 if (tty == NULL)
974 return -ENODEV;
1da177e4
LT
975 stli_mkasyport(portp, &aport, tty->termios);
976 if ((rc = stli_cmdwait(brdp, portp, A_SETPORT, &aport,
977 sizeof(asyport_t), 0)) < 0)
4ac4360b 978 return rc;
1da177e4
LT
979
980 set_bit(ST_GETSIGS, &portp->state);
981 if ((rc = stli_cmdwait(brdp, portp, A_GETSIGNALS, &portp->asig,
982 sizeof(asysigs_t), 1)) < 0)
4ac4360b 983 return rc;
1da177e4
LT
984 if (test_and_clear_bit(ST_GETSIGS, &portp->state))
985 portp->sigs = stli_mktiocm(portp->asig.sigvalue);
986 stli_mkasysigs(&portp->asig, 1, 1);
987 if ((rc = stli_cmdwait(brdp, portp, A_SETSIGNALS, &portp->asig,
988 sizeof(asysigs_t), 0)) < 0)
4ac4360b 989 return rc;
1da177e4 990
4ac4360b 991 return 0;
1da177e4
LT
992}
993
994/*****************************************************************************/
995
996/*
997 * Send an open message to the slave. This will sleep waiting for the
998 * acknowledgement, so must have user context. We need to co-ordinate
999 * with close events here, since we don't want open and close events
1000 * to overlap.
1001 */
1002
1f8ec435 1003static int stli_rawopen(struct stlibrd *brdp, struct stliport *portp, unsigned long arg, int wait)
1da177e4 1004{
4ac4360b
AC
1005 cdkhdr_t __iomem *hdrp;
1006 cdkctrl_t __iomem *cp;
1007 unsigned char __iomem *bits;
1008 unsigned long flags;
1009 int rc;
1da177e4
LT
1010
1011/*
1012 * Send a message to the slave to open this port.
1013 */
1da177e4
LT
1014
1015/*
1016 * Slave is already closing this port. This can happen if a hangup
1017 * occurs on this port. So we must wait until it is complete. The
1018 * order of opens and closes may not be preserved across shared
1019 * memory, so we must wait until it is complete.
1020 */
1021 wait_event_interruptible(portp->raw_wait,
1022 !test_bit(ST_CLOSING, &portp->state));
1023 if (signal_pending(current)) {
1da177e4
LT
1024 return -ERESTARTSYS;
1025 }
1026
1027/*
1028 * Everything is ready now, so write the open message into shared
1029 * memory. Once the message is in set the service bits to say that
1030 * this port wants service.
1031 */
4ac4360b 1032 spin_lock_irqsave(&brd_lock, flags);
1da177e4 1033 EBRDENABLE(brdp);
4ac4360b
AC
1034 cp = &((cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr))->ctrl;
1035 writel(arg, &cp->openarg);
1036 writeb(1, &cp->open);
1037 hdrp = (cdkhdr_t __iomem *) EBRDGETMEMPTR(brdp, CDK_CDKADDR);
1038 bits = ((unsigned char __iomem *) hdrp) + brdp->slaveoffset +
1da177e4 1039 portp->portidx;
4ac4360b 1040 writeb(readb(bits) | portp->portbit, bits);
1da177e4
LT
1041 EBRDDISABLE(brdp);
1042
1043 if (wait == 0) {
4ac4360b
AC
1044 spin_unlock_irqrestore(&brd_lock, flags);
1045 return 0;
1da177e4
LT
1046 }
1047
1048/*
1049 * Slave is in action, so now we must wait for the open acknowledgment
1050 * to come back.
1051 */
1052 rc = 0;
1053 set_bit(ST_OPENING, &portp->state);
4ac4360b
AC
1054 spin_unlock_irqrestore(&brd_lock, flags);
1055
1da177e4
LT
1056 wait_event_interruptible(portp->raw_wait,
1057 !test_bit(ST_OPENING, &portp->state));
1058 if (signal_pending(current))
1059 rc = -ERESTARTSYS;
1da177e4
LT
1060
1061 if ((rc == 0) && (portp->rc != 0))
1062 rc = -EIO;
4ac4360b 1063 return rc;
1da177e4
LT
1064}
1065
1066/*****************************************************************************/
1067
1068/*
1069 * Send a close message to the slave. Normally this will sleep waiting
1070 * for the acknowledgement, but if wait parameter is 0 it will not. If
1071 * wait is true then must have user context (to sleep).
1072 */
1073
1f8ec435 1074static int stli_rawclose(struct stlibrd *brdp, struct stliport *portp, unsigned long arg, int wait)
1da177e4 1075{
4ac4360b
AC
1076 cdkhdr_t __iomem *hdrp;
1077 cdkctrl_t __iomem *cp;
1078 unsigned char __iomem *bits;
1079 unsigned long flags;
1080 int rc;
1da177e4
LT
1081
1082/*
1083 * Slave is already closing this port. This can happen if a hangup
1084 * occurs on this port.
1085 */
1086 if (wait) {
1087 wait_event_interruptible(portp->raw_wait,
1088 !test_bit(ST_CLOSING, &portp->state));
1089 if (signal_pending(current)) {
1da177e4
LT
1090 return -ERESTARTSYS;
1091 }
1092 }
1093
1094/*
1095 * Write the close command into shared memory.
1096 */
4ac4360b 1097 spin_lock_irqsave(&brd_lock, flags);
1da177e4 1098 EBRDENABLE(brdp);
4ac4360b
AC
1099 cp = &((cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr))->ctrl;
1100 writel(arg, &cp->closearg);
1101 writeb(1, &cp->close);
1102 hdrp = (cdkhdr_t __iomem *) EBRDGETMEMPTR(brdp, CDK_CDKADDR);
1103 bits = ((unsigned char __iomem *) hdrp) + brdp->slaveoffset +
1da177e4 1104 portp->portidx;
4ac4360b 1105 writeb(readb(bits) |portp->portbit, bits);
1da177e4
LT
1106 EBRDDISABLE(brdp);
1107
1108 set_bit(ST_CLOSING, &portp->state);
4ac4360b
AC
1109 spin_unlock_irqrestore(&brd_lock, flags);
1110
1111 if (wait == 0)
1112 return 0;
1da177e4
LT
1113
1114/*
1115 * Slave is in action, so now we must wait for the open acknowledgment
1116 * to come back.
1117 */
1118 rc = 0;
1119 wait_event_interruptible(portp->raw_wait,
1120 !test_bit(ST_CLOSING, &portp->state));
1121 if (signal_pending(current))
1122 rc = -ERESTARTSYS;
1da177e4
LT
1123
1124 if ((rc == 0) && (portp->rc != 0))
1125 rc = -EIO;
4ac4360b 1126 return rc;
1da177e4
LT
1127}
1128
1129/*****************************************************************************/
1130
1131/*
1132 * Send a command to the slave and wait for the response. This must
1133 * have user context (it sleeps). This routine is generic in that it
1134 * can send any type of command. Its purpose is to wait for that command
1135 * to complete (as opposed to initiating the command then returning).
1136 */
1137
1f8ec435 1138static int stli_cmdwait(struct stlibrd *brdp, struct stliport *portp, unsigned long cmd, void *arg, int size, int copyback)
1da177e4 1139{
1da177e4
LT
1140 wait_event_interruptible(portp->raw_wait,
1141 !test_bit(ST_CMDING, &portp->state));
4ac4360b 1142 if (signal_pending(current))
1da177e4 1143 return -ERESTARTSYS;
1da177e4
LT
1144
1145 stli_sendcmd(brdp, portp, cmd, arg, size, copyback);
1146
1147 wait_event_interruptible(portp->raw_wait,
1148 !test_bit(ST_CMDING, &portp->state));
4ac4360b 1149 if (signal_pending(current))
1da177e4 1150 return -ERESTARTSYS;
1da177e4
LT
1151
1152 if (portp->rc != 0)
4ac4360b
AC
1153 return -EIO;
1154 return 0;
1da177e4
LT
1155}
1156
1157/*****************************************************************************/
1158
1159/*
1160 * Send the termios settings for this port to the slave. This sleeps
1161 * waiting for the command to complete - so must have user context.
1162 */
1163
1f8ec435 1164static int stli_setport(struct stliport *portp)
1da177e4 1165{
1f8ec435 1166 struct stlibrd *brdp;
4ac4360b 1167 asyport_t aport;
1da177e4 1168
4ac4360b
AC
1169 if (portp == NULL)
1170 return -ENODEV;
b02f5ad6 1171 if (portp->port.tty == NULL)
4ac4360b 1172 return -ENODEV;
1328d737 1173 if (portp->brdnr >= stli_nrbrds)
4ac4360b 1174 return -ENODEV;
1da177e4 1175 brdp = stli_brds[portp->brdnr];
4ac4360b
AC
1176 if (brdp == NULL)
1177 return -ENODEV;
1da177e4 1178
b02f5ad6 1179 stli_mkasyport(portp, &aport, portp->port.tty->termios);
1da177e4
LT
1180 return(stli_cmdwait(brdp, portp, A_SETPORT, &aport, sizeof(asyport_t), 0));
1181}
1182
1183/*****************************************************************************/
1184
1185/*
1186 * Possibly need to wait for carrier (DCD signal) to come high. Say
1187 * maybe because if we are clocal then we don't need to wait...
1188 */
1189
1f8ec435 1190static int stli_waitcarrier(struct stlibrd *brdp, struct stliport *portp, struct file *filp)
1da177e4 1191{
4ac4360b
AC
1192 unsigned long flags;
1193 int rc, doclocal;
1da177e4
LT
1194
1195 rc = 0;
1196 doclocal = 0;
1197
b02f5ad6 1198 if (portp->port.tty->termios->c_cflag & CLOCAL)
1da177e4
LT
1199 doclocal++;
1200
4ac4360b 1201 spin_lock_irqsave(&stli_lock, flags);
1da177e4
LT
1202 portp->openwaitcnt++;
1203 if (! tty_hung_up_p(filp))
42a77a1b 1204 portp->port.count--;
4ac4360b 1205 spin_unlock_irqrestore(&stli_lock, flags);
1da177e4
LT
1206
1207 for (;;) {
1208 stli_mkasysigs(&portp->asig, 1, 1);
1209 if ((rc = stli_cmdwait(brdp, portp, A_SETSIGNALS,
1210 &portp->asig, sizeof(asysigs_t), 0)) < 0)
1211 break;
1212 if (tty_hung_up_p(filp) ||
b02f5ad6
AC
1213 ((portp->port.flags & ASYNC_INITIALIZED) == 0)) {
1214 if (portp->port.flags & ASYNC_HUP_NOTIFY)
1da177e4
LT
1215 rc = -EBUSY;
1216 else
1217 rc = -ERESTARTSYS;
1218 break;
1219 }
b02f5ad6 1220 if (((portp->port.flags & ASYNC_CLOSING) == 0) &&
1da177e4
LT
1221 (doclocal || (portp->sigs & TIOCM_CD))) {
1222 break;
1223 }
1224 if (signal_pending(current)) {
1225 rc = -ERESTARTSYS;
1226 break;
1227 }
b02f5ad6 1228 interruptible_sleep_on(&portp->port.open_wait);
1da177e4
LT
1229 }
1230
4ac4360b 1231 spin_lock_irqsave(&stli_lock, flags);
1da177e4 1232 if (! tty_hung_up_p(filp))
42a77a1b 1233 portp->port.count++;
1da177e4 1234 portp->openwaitcnt--;
4ac4360b 1235 spin_unlock_irqrestore(&stli_lock, flags);
1da177e4 1236
4ac4360b 1237 return rc;
1da177e4
LT
1238}
1239
1240/*****************************************************************************/
1241
1242/*
1243 * Write routine. Take the data and put it in the shared memory ring
1244 * queue. If port is not already sending chars then need to mark the
1245 * service bits for this port.
1246 */
1247
1248static int stli_write(struct tty_struct *tty, const unsigned char *buf, int count)
1249{
4ac4360b
AC
1250 cdkasy_t __iomem *ap;
1251 cdkhdr_t __iomem *hdrp;
1252 unsigned char __iomem *bits;
1253 unsigned char __iomem *shbuf;
1254 unsigned char *chbuf;
1f8ec435
JS
1255 struct stliport *portp;
1256 struct stlibrd *brdp;
4ac4360b
AC
1257 unsigned int len, stlen, head, tail, size;
1258 unsigned long flags;
1da177e4 1259
1da177e4
LT
1260 if (tty == stli_txcooktty)
1261 stli_flushchars(tty);
1262 portp = tty->driver_data;
4ac4360b
AC
1263 if (portp == NULL)
1264 return 0;
1328d737 1265 if (portp->brdnr >= stli_nrbrds)
4ac4360b 1266 return 0;
1da177e4 1267 brdp = stli_brds[portp->brdnr];
4ac4360b
AC
1268 if (brdp == NULL)
1269 return 0;
1da177e4
LT
1270 chbuf = (unsigned char *) buf;
1271
1272/*
1273 * All data is now local, shove as much as possible into shared memory.
1274 */
4ac4360b 1275 spin_lock_irqsave(&brd_lock, flags);
1da177e4 1276 EBRDENABLE(brdp);
4ac4360b
AC
1277 ap = (cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr);
1278 head = (unsigned int) readw(&ap->txq.head);
1279 tail = (unsigned int) readw(&ap->txq.tail);
1280 if (tail != ((unsigned int) readw(&ap->txq.tail)))
1281 tail = (unsigned int) readw(&ap->txq.tail);
1da177e4
LT
1282 size = portp->txsize;
1283 if (head >= tail) {
1284 len = size - (head - tail) - 1;
1285 stlen = size - head;
1286 } else {
1287 len = tail - head - 1;
1288 stlen = len;
1289 }
1290
a3f8d9d5 1291 len = min(len, (unsigned int)count);
1da177e4 1292 count = 0;
4ac4360b 1293 shbuf = (char __iomem *) EBRDGETMEMPTR(brdp, portp->txoffset);
1da177e4
LT
1294
1295 while (len > 0) {
a3f8d9d5 1296 stlen = min(len, stlen);
4ac4360b 1297 memcpy_toio(shbuf + head, chbuf, stlen);
1da177e4
LT
1298 chbuf += stlen;
1299 len -= stlen;
1300 count += stlen;
1301 head += stlen;
1302 if (head >= size) {
1303 head = 0;
1304 stlen = tail;
1305 }
1306 }
1307
4ac4360b
AC
1308 ap = (cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr);
1309 writew(head, &ap->txq.head);
1da177e4 1310 if (test_bit(ST_TXBUSY, &portp->state)) {
4ac4360b
AC
1311 if (readl(&ap->changed.data) & DT_TXEMPTY)
1312 writel(readl(&ap->changed.data) & ~DT_TXEMPTY, &ap->changed.data);
1da177e4 1313 }
4ac4360b
AC
1314 hdrp = (cdkhdr_t __iomem *) EBRDGETMEMPTR(brdp, CDK_CDKADDR);
1315 bits = ((unsigned char __iomem *) hdrp) + brdp->slaveoffset +
1da177e4 1316 portp->portidx;
4ac4360b 1317 writeb(readb(bits) | portp->portbit, bits);
1da177e4
LT
1318 set_bit(ST_TXBUSY, &portp->state);
1319 EBRDDISABLE(brdp);
4ac4360b 1320 spin_unlock_irqrestore(&brd_lock, flags);
1da177e4
LT
1321
1322 return(count);
1323}
1324
1325/*****************************************************************************/
1326
1327/*
1328 * Output a single character. We put it into a temporary local buffer
1329 * (for speed) then write out that buffer when the flushchars routine
1330 * is called. There is a safety catch here so that if some other port
1331 * writes chars before the current buffer has been, then we write them
1332 * first them do the new ports.
1333 */
1334
42a77a1b 1335static int stli_putchar(struct tty_struct *tty, unsigned char ch)
1da177e4 1336{
1da177e4 1337 if (tty != stli_txcooktty) {
4ac4360b 1338 if (stli_txcooktty != NULL)
1da177e4
LT
1339 stli_flushchars(stli_txcooktty);
1340 stli_txcooktty = tty;
1341 }
1342
1343 stli_txcookbuf[stli_txcooksize++] = ch;
42a77a1b 1344 return 0;
1da177e4
LT
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;
b02f5ad6 1551 sio.flags = portp->port.flags;
1da177e4
LT
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) !=
b02f5ad6 1586 (portp->port.flags & ~ASYNC_USR_MASK)))
4ac4360b 1587 return -EPERM;
1da177e4
LT
1588 }
1589
b02f5ad6 1590 portp->port.flags = (portp->port.flags & ~ASYNC_USR_MASK) |
1da177e4
LT
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 1663 int rc;
1da177e4
LT
1664 void __user *argp = (void __user *)arg;
1665
1da177e4 1666 portp = tty->driver_data;
4ac4360b
AC
1667 if (portp == NULL)
1668 return -ENODEV;
1328d737 1669 if (portp->brdnr >= stli_nrbrds)
4ac4360b 1670 return 0;
1da177e4 1671 brdp = stli_brds[portp->brdnr];
4ac4360b
AC
1672 if (brdp == NULL)
1673 return 0;
1da177e4
LT
1674
1675 if ((cmd != TIOCGSERIAL) && (cmd != TIOCSSERIAL) &&
1676 (cmd != COM_GETPORTSTATS) && (cmd != COM_CLRPORTSTATS)) {
1677 if (tty->flags & (1 << TTY_IO_ERROR))
4ac4360b 1678 return -EIO;
1da177e4
LT
1679 }
1680
1681 rc = 0;
1682
1683 switch (cmd) {
1da177e4
LT
1684 case TIOCGSERIAL:
1685 rc = stli_getserial(portp, argp);
1686 break;
1687 case TIOCSSERIAL:
1688 rc = stli_setserial(portp, argp);
1689 break;
1690 case STL_GETPFLAG:
1691 rc = put_user(portp->pflag, (unsigned __user *)argp);
1692 break;
1693 case STL_SETPFLAG:
1694 if ((rc = get_user(portp->pflag, (unsigned __user *)argp)) == 0)
1695 stli_setport(portp);
1696 break;
1697 case COM_GETPORTSTATS:
1698 rc = stli_getportstats(portp, argp);
1699 break;
1700 case COM_CLRPORTSTATS:
1701 rc = stli_clrportstats(portp, argp);
1702 break;
1703 case TIOCSERCONFIG:
1704 case TIOCSERGWILD:
1705 case TIOCSERSWILD:
1706 case TIOCSERGETLSR:
1707 case TIOCSERGSTRUCT:
1708 case TIOCSERGETMULTI:
1709 case TIOCSERSETMULTI:
1710 default:
1711 rc = -ENOIOCTLCMD;
1712 break;
1713 }
1714
4ac4360b 1715 return rc;
1da177e4
LT
1716}
1717
1718/*****************************************************************************/
1719
1720/*
1721 * This routine assumes that we have user context and can sleep.
1722 * Looks like it is true for the current ttys implementation..!!
1723 */
1724
606d099c 1725static void stli_settermios(struct tty_struct *tty, struct ktermios *old)
1da177e4 1726{
1f8ec435
JS
1727 struct stliport *portp;
1728 struct stlibrd *brdp;
606d099c 1729 struct ktermios *tiosp;
4ac4360b 1730 asyport_t aport;
1da177e4 1731
4ac4360b 1732 if (tty == NULL)
1da177e4
LT
1733 return;
1734 portp = tty->driver_data;
4ac4360b 1735 if (portp == NULL)
1da177e4 1736 return;
1328d737 1737 if (portp->brdnr >= stli_nrbrds)
1da177e4
LT
1738 return;
1739 brdp = stli_brds[portp->brdnr];
4ac4360b 1740 if (brdp == NULL)
1da177e4
LT
1741 return;
1742
1743 tiosp = tty->termios;
1da177e4
LT
1744
1745 stli_mkasyport(portp, &aport, tiosp);
1746 stli_cmdwait(brdp, portp, A_SETPORT, &aport, sizeof(asyport_t), 0);
1747 stli_mkasysigs(&portp->asig, ((tiosp->c_cflag & CBAUD) ? 1 : 0), -1);
1748 stli_cmdwait(brdp, portp, A_SETSIGNALS, &portp->asig,
1749 sizeof(asysigs_t), 0);
1750 if ((old->c_cflag & CRTSCTS) && ((tiosp->c_cflag & CRTSCTS) == 0))
1751 tty->hw_stopped = 0;
1752 if (((old->c_cflag & CLOCAL) == 0) && (tiosp->c_cflag & CLOCAL))
b02f5ad6 1753 wake_up_interruptible(&portp->port.open_wait);
1da177e4
LT
1754}
1755
1756/*****************************************************************************/
1757
1758/*
1759 * Attempt to flow control who ever is sending us data. We won't really
1760 * do any flow control action here. We can't directly, and even if we
1761 * wanted to we would have to send a command to the slave. The slave
1762 * knows how to flow control, and will do so when its buffers reach its
1763 * internal high water marks. So what we will do is set a local state
1764 * bit that will stop us sending any RX data up from the poll routine
1765 * (which is the place where RX data from the slave is handled).
1766 */
1767
1768static void stli_throttle(struct tty_struct *tty)
1769{
1f8ec435 1770 struct stliport *portp = tty->driver_data;
4ac4360b 1771 if (portp == NULL)
1da177e4 1772 return;
1da177e4
LT
1773 set_bit(ST_RXSTOP, &portp->state);
1774}
1775
1776/*****************************************************************************/
1777
1778/*
1779 * Unflow control the device sending us data... That means that all
1780 * we have to do is clear the RXSTOP state bit. The next poll call
1781 * will then be able to pass the RX data back up.
1782 */
1783
1784static void stli_unthrottle(struct tty_struct *tty)
1785{
1f8ec435 1786 struct stliport *portp = tty->driver_data;
4ac4360b 1787 if (portp == NULL)
1da177e4 1788 return;
1da177e4
LT
1789 clear_bit(ST_RXSTOP, &portp->state);
1790}
1791
1792/*****************************************************************************/
1793
1794/*
4ac4360b 1795 * Stop the transmitter.
1da177e4
LT
1796 */
1797
1798static void stli_stop(struct tty_struct *tty)
1799{
1da177e4
LT
1800}
1801
1802/*****************************************************************************/
1803
1804/*
4ac4360b 1805 * Start the transmitter again.
1da177e4
LT
1806 */
1807
1808static void stli_start(struct tty_struct *tty)
1809{
1da177e4
LT
1810}
1811
1812/*****************************************************************************/
1813
1da177e4
LT
1814/*
1815 * Hangup this port. This is pretty much like closing the port, only
1816 * a little more brutal. No waiting for data to drain. Shutdown the
1817 * port and maybe drop signals. This is rather tricky really. We want
1818 * to close the port as well.
1819 */
1820
1821static void stli_hangup(struct tty_struct *tty)
1822{
1f8ec435
JS
1823 struct stliport *portp;
1824 struct stlibrd *brdp;
4ac4360b 1825 unsigned long flags;
1da177e4 1826
1da177e4 1827 portp = tty->driver_data;
4ac4360b 1828 if (portp == NULL)
1da177e4 1829 return;
1328d737 1830 if (portp->brdnr >= stli_nrbrds)
1da177e4
LT
1831 return;
1832 brdp = stli_brds[portp->brdnr];
4ac4360b 1833 if (brdp == NULL)
1da177e4
LT
1834 return;
1835
b02f5ad6 1836 portp->port.flags &= ~ASYNC_INITIALIZED;
1da177e4 1837
4ac4360b 1838 if (!test_bit(ST_CLOSING, &portp->state))
1da177e4 1839 stli_rawclose(brdp, portp, 0, 0);
4ac4360b
AC
1840
1841 spin_lock_irqsave(&stli_lock, flags);
1da177e4
LT
1842 if (tty->termios->c_cflag & HUPCL) {
1843 stli_mkasysigs(&portp->asig, 0, 0);
1844 if (test_bit(ST_CMDING, &portp->state)) {
1845 set_bit(ST_DOSIGS, &portp->state);
1846 set_bit(ST_DOFLUSHTX, &portp->state);
1847 set_bit(ST_DOFLUSHRX, &portp->state);
1848 } else {
1849 stli_sendcmd(brdp, portp, A_SETSIGNALSF,
1850 &portp->asig, sizeof(asysigs_t), 0);
1851 }
1852 }
1da177e4
LT
1853
1854 clear_bit(ST_TXBUSY, &portp->state);
1855 clear_bit(ST_RXSTOP, &portp->state);
1856 set_bit(TTY_IO_ERROR, &tty->flags);
b02f5ad6
AC
1857 portp->port.tty = NULL;
1858 portp->port.flags &= ~ASYNC_NORMAL_ACTIVE;
42a77a1b 1859 portp->port.count = 0;
4ac4360b
AC
1860 spin_unlock_irqrestore(&stli_lock, flags);
1861
b02f5ad6 1862 wake_up_interruptible(&portp->port.open_wait);
1da177e4
LT
1863}
1864
1865/*****************************************************************************/
1866
1867/*
1868 * Flush characters from the lower buffer. We may not have user context
1869 * so we cannot sleep waiting for it to complete. Also we need to check
1870 * if there is chars for this port in the TX cook buffer, and flush them
1871 * as well.
1872 */
1873
1874static void stli_flushbuffer(struct tty_struct *tty)
1875{
1f8ec435
JS
1876 struct stliport *portp;
1877 struct stlibrd *brdp;
4ac4360b 1878 unsigned long ftype, flags;
1da177e4 1879
1da177e4 1880 portp = tty->driver_data;
4ac4360b 1881 if (portp == NULL)
1da177e4 1882 return;
1328d737 1883 if (portp->brdnr >= stli_nrbrds)
1da177e4
LT
1884 return;
1885 brdp = stli_brds[portp->brdnr];
4ac4360b 1886 if (brdp == NULL)
1da177e4
LT
1887 return;
1888
4ac4360b 1889 spin_lock_irqsave(&brd_lock, flags);
1da177e4 1890 if (tty == stli_txcooktty) {
4ac4360b 1891 stli_txcooktty = NULL;
1da177e4
LT
1892 stli_txcooksize = 0;
1893 stli_txcookrealsize = 0;
1894 }
1895 if (test_bit(ST_CMDING, &portp->state)) {
1896 set_bit(ST_DOFLUSHTX, &portp->state);
1897 } else {
1898 ftype = FLUSHTX;
1899 if (test_bit(ST_DOFLUSHRX, &portp->state)) {
1900 ftype |= FLUSHRX;
1901 clear_bit(ST_DOFLUSHRX, &portp->state);
1902 }
4ac4360b 1903 __stli_sendcmd(brdp, portp, A_FLUSH, &ftype, sizeof(u32), 0);
1da177e4 1904 }
4ac4360b
AC
1905 spin_unlock_irqrestore(&brd_lock, flags);
1906 tty_wakeup(tty);
1da177e4
LT
1907}
1908
1909/*****************************************************************************/
1910
9e98966c 1911static int stli_breakctl(struct tty_struct *tty, int state)
1da177e4 1912{
1f8ec435
JS
1913 struct stlibrd *brdp;
1914 struct stliport *portp;
1da177e4 1915 long arg;
1da177e4 1916
1da177e4 1917 portp = tty->driver_data;
4ac4360b 1918 if (portp == NULL)
9e98966c 1919 return -EINVAL;
1328d737 1920 if (portp->brdnr >= stli_nrbrds)
9e98966c 1921 return -EINVAL;
1da177e4 1922 brdp = stli_brds[portp->brdnr];
4ac4360b 1923 if (brdp == NULL)
9e98966c 1924 return -EINVAL;
1da177e4 1925
1da177e4
LT
1926 arg = (state == -1) ? BREAKON : BREAKOFF;
1927 stli_cmdwait(brdp, portp, A_BREAK, &arg, sizeof(long), 0);
9e98966c 1928 return 0;
1da177e4
LT
1929}
1930
1931/*****************************************************************************/
1932
1933static void stli_waituntilsent(struct tty_struct *tty, int timeout)
1934{
1f8ec435 1935 struct stliport *portp;
4ac4360b 1936 unsigned long tend;
1da177e4 1937
4ac4360b 1938 if (tty == NULL)
1da177e4
LT
1939 return;
1940 portp = tty->driver_data;
4ac4360b 1941 if (portp == NULL)
1da177e4
LT
1942 return;
1943
1944 if (timeout == 0)
1945 timeout = HZ;
1946 tend = jiffies + timeout;
1947
1948 while (test_bit(ST_TXBUSY, &portp->state)) {
1949 if (signal_pending(current))
1950 break;
1951 msleep_interruptible(20);
1952 if (time_after_eq(jiffies, tend))
1953 break;
1954 }
1955}
1956
1957/*****************************************************************************/
1958
1959static void stli_sendxchar(struct tty_struct *tty, char ch)
1960{
1f8ec435
JS
1961 struct stlibrd *brdp;
1962 struct stliport *portp;
1da177e4
LT
1963 asyctrl_t actrl;
1964
1da177e4 1965 portp = tty->driver_data;
4ac4360b 1966 if (portp == NULL)
1da177e4 1967 return;
1328d737 1968 if (portp->brdnr >= stli_nrbrds)
1da177e4
LT
1969 return;
1970 brdp = stli_brds[portp->brdnr];
4ac4360b 1971 if (brdp == NULL)
1da177e4
LT
1972 return;
1973
1974 memset(&actrl, 0, sizeof(asyctrl_t));
1975 if (ch == STOP_CHAR(tty)) {
1976 actrl.rxctrl = CT_STOPFLOW;
1977 } else if (ch == START_CHAR(tty)) {
1978 actrl.rxctrl = CT_STARTFLOW;
1979 } else {
1980 actrl.txctrl = CT_SENDCHR;
1981 actrl.tximdch = ch;
1982 }
1da177e4
LT
1983 stli_cmdwait(brdp, portp, A_PORTCTRL, &actrl, sizeof(asyctrl_t), 0);
1984}
1985
1986/*****************************************************************************/
1987
1988#define MAXLINE 80
1989
1990/*
1991 * Format info for a specified port. The line is deliberately limited
1992 * to 80 characters. (If it is too long it will be truncated, if too
1993 * short then padded with spaces).
1994 */
1995
1f8ec435 1996static int stli_portinfo(struct stlibrd *brdp, struct stliport *portp, int portnr, char *pos)
1da177e4 1997{
4ac4360b
AC
1998 char *sp, *uart;
1999 int rc, cnt;
1da177e4
LT
2000
2001 rc = stli_portcmdstats(portp);
2002
2003 uart = "UNKNOWN";
2004 if (brdp->state & BST_STARTED) {
2005 switch (stli_comstats.hwid) {
4ac4360b
AC
2006 case 0: uart = "2681"; break;
2007 case 1: uart = "SC26198"; break;
2008 default:uart = "CD1400"; break;
1da177e4
LT
2009 }
2010 }
2011
2012 sp = pos;
2013 sp += sprintf(sp, "%d: uart:%s ", portnr, uart);
2014
2015 if ((brdp->state & BST_STARTED) && (rc >= 0)) {
2016 sp += sprintf(sp, "tx:%d rx:%d", (int) stli_comstats.txtotal,
2017 (int) stli_comstats.rxtotal);
2018
2019 if (stli_comstats.rxframing)
2020 sp += sprintf(sp, " fe:%d",
2021 (int) stli_comstats.rxframing);
2022 if (stli_comstats.rxparity)
2023 sp += sprintf(sp, " pe:%d",
2024 (int) stli_comstats.rxparity);
2025 if (stli_comstats.rxbreaks)
2026 sp += sprintf(sp, " brk:%d",
2027 (int) stli_comstats.rxbreaks);
2028 if (stli_comstats.rxoverrun)
2029 sp += sprintf(sp, " oe:%d",
2030 (int) stli_comstats.rxoverrun);
2031
2032 cnt = sprintf(sp, "%s%s%s%s%s ",
2033 (stli_comstats.signals & TIOCM_RTS) ? "|RTS" : "",
2034 (stli_comstats.signals & TIOCM_CTS) ? "|CTS" : "",
2035 (stli_comstats.signals & TIOCM_DTR) ? "|DTR" : "",
2036 (stli_comstats.signals & TIOCM_CD) ? "|DCD" : "",
2037 (stli_comstats.signals & TIOCM_DSR) ? "|DSR" : "");
2038 *sp = ' ';
2039 sp += cnt;
2040 }
2041
2042 for (cnt = (sp - pos); (cnt < (MAXLINE - 1)); cnt++)
2043 *sp++ = ' ';
2044 if (cnt >= MAXLINE)
2045 pos[(MAXLINE - 2)] = '+';
2046 pos[(MAXLINE - 1)] = '\n';
2047
2048 return(MAXLINE);
2049}
2050
2051/*****************************************************************************/
2052
2053/*
2054 * Port info, read from the /proc file system.
2055 */
2056
2057static int stli_readproc(char *page, char **start, off_t off, int count, int *eof, void *data)
2058{
1f8ec435
JS
2059 struct stlibrd *brdp;
2060 struct stliport *portp;
1328d737 2061 unsigned int brdnr, portnr, totalport;
4ac4360b
AC
2062 int curoff, maxoff;
2063 char *pos;
1da177e4
LT
2064
2065 pos = page;
2066 totalport = 0;
2067 curoff = 0;
2068
2069 if (off == 0) {
2070 pos += sprintf(pos, "%s: version %s", stli_drvtitle,
2071 stli_drvversion);
2072 while (pos < (page + MAXLINE - 1))
2073 *pos++ = ' ';
2074 *pos++ = '\n';
2075 }
2076 curoff = MAXLINE;
2077
2078/*
2079 * We scan through for each board, panel and port. The offset is
2080 * calculated on the fly, and irrelevant ports are skipped.
2081 */
2082 for (brdnr = 0; (brdnr < stli_nrbrds); brdnr++) {
2083 brdp = stli_brds[brdnr];
4ac4360b 2084 if (brdp == NULL)
1da177e4
LT
2085 continue;
2086 if (brdp->state == 0)
2087 continue;
2088
2089 maxoff = curoff + (brdp->nrports * MAXLINE);
2090 if (off >= maxoff) {
2091 curoff = maxoff;
2092 continue;
2093 }
2094
2095 totalport = brdnr * STL_MAXPORTS;
2096 for (portnr = 0; (portnr < brdp->nrports); portnr++,
2097 totalport++) {
2098 portp = brdp->ports[portnr];
4ac4360b 2099 if (portp == NULL)
1da177e4
LT
2100 continue;
2101 if (off >= (curoff += MAXLINE))
2102 continue;
2103 if ((pos - page + MAXLINE) > count)
2104 goto stli_readdone;
2105 pos += stli_portinfo(brdp, portp, totalport, pos);
2106 }
2107 }
2108
2109 *eof = 1;
2110
2111stli_readdone:
2112 *start = page;
2113 return(pos - page);
2114}
2115
2116/*****************************************************************************/
2117
2118/*
2119 * Generic send command routine. This will send a message to the slave,
2120 * of the specified type with the specified argument. Must be very
2121 * careful of data that will be copied out from shared memory -
2122 * containing command results. The command completion is all done from
2123 * a poll routine that does not have user context. Therefore you cannot
2124 * copy back directly into user space, or to the kernel stack of a
2125 * process. This routine does not sleep, so can be called from anywhere.
4ac4360b
AC
2126 *
2127 * The caller must hold the brd_lock (see also stli_sendcmd the usual
2128 * entry point)
1da177e4
LT
2129 */
2130
1f8ec435 2131static void __stli_sendcmd(struct stlibrd *brdp, struct stliport *portp, unsigned long cmd, void *arg, int size, int copyback)
1da177e4 2132{
4ac4360b
AC
2133 cdkhdr_t __iomem *hdrp;
2134 cdkctrl_t __iomem *cp;
2135 unsigned char __iomem *bits;
1da177e4
LT
2136
2137 if (test_bit(ST_CMDING, &portp->state)) {
2138 printk(KERN_ERR "STALLION: command already busy, cmd=%x!\n",
2139 (int) cmd);
1da177e4
LT
2140 return;
2141 }
2142
2143 EBRDENABLE(brdp);
4ac4360b 2144 cp = &((cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr))->ctrl;
1da177e4 2145 if (size > 0) {
4ac4360b 2146 memcpy_toio((void __iomem *) &(cp->args[0]), arg, size);
1da177e4
LT
2147 if (copyback) {
2148 portp->argp = arg;
2149 portp->argsize = size;
2150 }
2151 }
4ac4360b
AC
2152 writel(0, &cp->status);
2153 writel(cmd, &cp->cmd);
2154 hdrp = (cdkhdr_t __iomem *) EBRDGETMEMPTR(brdp, CDK_CDKADDR);
2155 bits = ((unsigned char __iomem *) hdrp) + brdp->slaveoffset +
1da177e4 2156 portp->portidx;
4ac4360b 2157 writeb(readb(bits) | portp->portbit, bits);
1da177e4
LT
2158 set_bit(ST_CMDING, &portp->state);
2159 EBRDDISABLE(brdp);
4ac4360b
AC
2160}
2161
1f8ec435 2162static void stli_sendcmd(struct stlibrd *brdp, struct stliport *portp, unsigned long cmd, void *arg, int size, int copyback)
4ac4360b
AC
2163{
2164 unsigned long flags;
2165
2166 spin_lock_irqsave(&brd_lock, flags);
2167 __stli_sendcmd(brdp, portp, cmd, arg, size, copyback);
2168 spin_unlock_irqrestore(&brd_lock, flags);
1da177e4
LT
2169}
2170
2171/*****************************************************************************/
2172
2173/*
2174 * Read data from shared memory. This assumes that the shared memory
2175 * is enabled and that interrupts are off. Basically we just empty out
2176 * the shared memory buffer into the tty buffer. Must be careful to
2177 * handle the case where we fill up the tty buffer, but still have
2178 * more chars to unload.
2179 */
2180
1f8ec435 2181static void stli_read(struct stlibrd *brdp, struct stliport *portp)
1da177e4 2182{
4ac4360b
AC
2183 cdkasyrq_t __iomem *rp;
2184 char __iomem *shbuf;
1da177e4 2185 struct tty_struct *tty;
4ac4360b
AC
2186 unsigned int head, tail, size;
2187 unsigned int len, stlen;
1da177e4
LT
2188
2189 if (test_bit(ST_RXSTOP, &portp->state))
2190 return;
b02f5ad6 2191 tty = portp->port.tty;
4ac4360b 2192 if (tty == NULL)
1da177e4
LT
2193 return;
2194
4ac4360b
AC
2195 rp = &((cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr))->rxq;
2196 head = (unsigned int) readw(&rp->head);
2197 if (head != ((unsigned int) readw(&rp->head)))
2198 head = (unsigned int) readw(&rp->head);
2199 tail = (unsigned int) readw(&rp->tail);
1da177e4
LT
2200 size = portp->rxsize;
2201 if (head >= tail) {
2202 len = head - tail;
2203 stlen = len;
2204 } else {
2205 len = size - (tail - head);
2206 stlen = size - tail;
2207 }
2208
33f0f88f 2209 len = tty_buffer_request_room(tty, len);
4ac4360b
AC
2210
2211 shbuf = (char __iomem *) EBRDGETMEMPTR(brdp, portp->rxoffset);
1da177e4
LT
2212
2213 while (len > 0) {
4ac4360b
AC
2214 unsigned char *cptr;
2215
a3f8d9d5 2216 stlen = min(len, stlen);
4ac4360b
AC
2217 tty_prepare_flip_string(tty, &cptr, stlen);
2218 memcpy_fromio(cptr, shbuf + tail, stlen);
1da177e4
LT
2219 len -= stlen;
2220 tail += stlen;
2221 if (tail >= size) {
2222 tail = 0;
2223 stlen = head;
2224 }
2225 }
4ac4360b
AC
2226 rp = &((cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr))->rxq;
2227 writew(tail, &rp->tail);
1da177e4
LT
2228
2229 if (head != tail)
2230 set_bit(ST_RXING, &portp->state);
2231
2232 tty_schedule_flip(tty);
2233}
2234
2235/*****************************************************************************/
2236
2237/*
2238 * Set up and carry out any delayed commands. There is only a small set
2239 * of slave commands that can be done "off-level". So it is not too
2240 * difficult to deal with them here.
2241 */
2242
1f8ec435 2243static void stli_dodelaycmd(struct stliport *portp, cdkctrl_t __iomem *cp)
1da177e4 2244{
4ac4360b 2245 int cmd;
1da177e4
LT
2246
2247 if (test_bit(ST_DOSIGS, &portp->state)) {
2248 if (test_bit(ST_DOFLUSHTX, &portp->state) &&
2249 test_bit(ST_DOFLUSHRX, &portp->state))
2250 cmd = A_SETSIGNALSF;
2251 else if (test_bit(ST_DOFLUSHTX, &portp->state))
2252 cmd = A_SETSIGNALSFTX;
2253 else if (test_bit(ST_DOFLUSHRX, &portp->state))
2254 cmd = A_SETSIGNALSFRX;
2255 else
2256 cmd = A_SETSIGNALS;
2257 clear_bit(ST_DOFLUSHTX, &portp->state);
2258 clear_bit(ST_DOFLUSHRX, &portp->state);
2259 clear_bit(ST_DOSIGS, &portp->state);
4ac4360b 2260 memcpy_toio((void __iomem *) &(cp->args[0]), (void *) &portp->asig,
1da177e4 2261 sizeof(asysigs_t));
4ac4360b
AC
2262 writel(0, &cp->status);
2263 writel(cmd, &cp->cmd);
1da177e4
LT
2264 set_bit(ST_CMDING, &portp->state);
2265 } else if (test_bit(ST_DOFLUSHTX, &portp->state) ||
2266 test_bit(ST_DOFLUSHRX, &portp->state)) {
2267 cmd = ((test_bit(ST_DOFLUSHTX, &portp->state)) ? FLUSHTX : 0);
2268 cmd |= ((test_bit(ST_DOFLUSHRX, &portp->state)) ? FLUSHRX : 0);
2269 clear_bit(ST_DOFLUSHTX, &portp->state);
2270 clear_bit(ST_DOFLUSHRX, &portp->state);
4ac4360b
AC
2271 memcpy_toio((void __iomem *) &(cp->args[0]), (void *) &cmd, sizeof(int));
2272 writel(0, &cp->status);
2273 writel(A_FLUSH, &cp->cmd);
1da177e4
LT
2274 set_bit(ST_CMDING, &portp->state);
2275 }
2276}
2277
2278/*****************************************************************************/
2279
2280/*
2281 * Host command service checking. This handles commands or messages
2282 * coming from the slave to the host. Must have board shared memory
2283 * enabled and interrupts off when called. Notice that by servicing the
2284 * read data last we don't need to change the shared memory pointer
2285 * during processing (which is a slow IO operation).
2286 * Return value indicates if this port is still awaiting actions from
2287 * the slave (like open, command, or even TX data being sent). If 0
2288 * then port is still busy, otherwise no longer busy.
2289 */
2290
1f8ec435 2291static int stli_hostcmd(struct stlibrd *brdp, struct stliport *portp)
1da177e4 2292{
4ac4360b
AC
2293 cdkasy_t __iomem *ap;
2294 cdkctrl_t __iomem *cp;
2295 struct tty_struct *tty;
2296 asynotify_t nt;
2297 unsigned long oldsigs;
2298 int rc, donerx;
2299
2300 ap = (cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr);
1da177e4
LT
2301 cp = &ap->ctrl;
2302
2303/*
2304 * Check if we are waiting for an open completion message.
2305 */
2306 if (test_bit(ST_OPENING, &portp->state)) {
4ac4360b
AC
2307 rc = readl(&cp->openarg);
2308 if (readb(&cp->open) == 0 && rc != 0) {
1da177e4
LT
2309 if (rc > 0)
2310 rc--;
4ac4360b 2311 writel(0, &cp->openarg);
1da177e4
LT
2312 portp->rc = rc;
2313 clear_bit(ST_OPENING, &portp->state);
2314 wake_up_interruptible(&portp->raw_wait);
2315 }
2316 }
2317
2318/*
2319 * Check if we are waiting for a close completion message.
2320 */
2321 if (test_bit(ST_CLOSING, &portp->state)) {
4ac4360b
AC
2322 rc = (int) readl(&cp->closearg);
2323 if (readb(&cp->close) == 0 && rc != 0) {
1da177e4
LT
2324 if (rc > 0)
2325 rc--;
4ac4360b 2326 writel(0, &cp->closearg);
1da177e4
LT
2327 portp->rc = rc;
2328 clear_bit(ST_CLOSING, &portp->state);
2329 wake_up_interruptible(&portp->raw_wait);
2330 }
2331 }
2332
2333/*
2334 * Check if we are waiting for a command completion message. We may
2335 * need to copy out the command results associated with this command.
2336 */
2337 if (test_bit(ST_CMDING, &portp->state)) {
4ac4360b
AC
2338 rc = readl(&cp->status);
2339 if (readl(&cp->cmd) == 0 && rc != 0) {
1da177e4
LT
2340 if (rc > 0)
2341 rc--;
4ac4360b
AC
2342 if (portp->argp != NULL) {
2343 memcpy_fromio(portp->argp, (void __iomem *) &(cp->args[0]),
1da177e4 2344 portp->argsize);
4ac4360b 2345 portp->argp = NULL;
1da177e4 2346 }
4ac4360b 2347 writel(0, &cp->status);
1da177e4
LT
2348 portp->rc = rc;
2349 clear_bit(ST_CMDING, &portp->state);
2350 stli_dodelaycmd(portp, cp);
2351 wake_up_interruptible(&portp->raw_wait);
2352 }
2353 }
2354
2355/*
2356 * Check for any notification messages ready. This includes lots of
2357 * different types of events - RX chars ready, RX break received,
2358 * TX data low or empty in the slave, modem signals changed state.
2359 */
2360 donerx = 0;
2361
2362 if (ap->notify) {
2363 nt = ap->changed;
2364 ap->notify = 0;
b02f5ad6 2365 tty = portp->port.tty;
1da177e4
LT
2366
2367 if (nt.signal & SG_DCD) {
2368 oldsigs = portp->sigs;
2369 portp->sigs = stli_mktiocm(nt.sigvalue);
2370 clear_bit(ST_GETSIGS, &portp->state);
2371 if ((portp->sigs & TIOCM_CD) &&
2372 ((oldsigs & TIOCM_CD) == 0))
b02f5ad6 2373 wake_up_interruptible(&portp->port.open_wait);
1da177e4
LT
2374 if ((oldsigs & TIOCM_CD) &&
2375 ((portp->sigs & TIOCM_CD) == 0)) {
b02f5ad6 2376 if (portp->port.flags & ASYNC_CHECK_CD) {
1da177e4 2377 if (tty)
cfccaeea 2378 tty_hangup(tty);
1da177e4
LT
2379 }
2380 }
2381 }
2382
2383 if (nt.data & DT_TXEMPTY)
2384 clear_bit(ST_TXBUSY, &portp->state);
2385 if (nt.data & (DT_TXEMPTY | DT_TXLOW)) {
4ac4360b
AC
2386 if (tty != NULL) {
2387 tty_wakeup(tty);
2388 EBRDENABLE(brdp);
1da177e4
LT
2389 }
2390 }
2391
2392 if ((nt.data & DT_RXBREAK) && (portp->rxmarkmsk & BRKINT)) {
4ac4360b 2393 if (tty != NULL) {
33f0f88f 2394 tty_insert_flip_char(tty, 0, TTY_BREAK);
b02f5ad6 2395 if (portp->port.flags & ASYNC_SAK) {
33f0f88f
AC
2396 do_SAK(tty);
2397 EBRDENABLE(brdp);
1da177e4 2398 }
33f0f88f 2399 tty_schedule_flip(tty);
1da177e4
LT
2400 }
2401 }
2402
2403 if (nt.data & DT_RXBUSY) {
2404 donerx++;
2405 stli_read(brdp, portp);
2406 }
2407 }
2408
2409/*
2410 * It might seem odd that we are checking for more RX chars here.
2411 * But, we need to handle the case where the tty buffer was previously
2412 * filled, but we had more characters to pass up. The slave will not
2413 * send any more RX notify messages until the RX buffer has been emptied.
2414 * But it will leave the service bits on (since the buffer is not empty).
2415 * So from here we can try to process more RX chars.
2416 */
2417 if ((!donerx) && test_bit(ST_RXING, &portp->state)) {
2418 clear_bit(ST_RXING, &portp->state);
2419 stli_read(brdp, portp);
2420 }
2421
2422 return((test_bit(ST_OPENING, &portp->state) ||
2423 test_bit(ST_CLOSING, &portp->state) ||
2424 test_bit(ST_CMDING, &portp->state) ||
2425 test_bit(ST_TXBUSY, &portp->state) ||
2426 test_bit(ST_RXING, &portp->state)) ? 0 : 1);
2427}
2428
2429/*****************************************************************************/
2430
2431/*
2432 * Service all ports on a particular board. Assumes that the boards
2433 * shared memory is enabled, and that the page pointer is pointed
2434 * at the cdk header structure.
2435 */
2436
1f8ec435 2437static void stli_brdpoll(struct stlibrd *brdp, cdkhdr_t __iomem *hdrp)
1da177e4 2438{
1f8ec435 2439 struct stliport *portp;
4ac4360b
AC
2440 unsigned char hostbits[(STL_MAXCHANS / 8) + 1];
2441 unsigned char slavebits[(STL_MAXCHANS / 8) + 1];
2442 unsigned char __iomem *slavep;
2443 int bitpos, bitat, bitsize;
2444 int channr, nrdevs, slavebitchange;
1da177e4
LT
2445
2446 bitsize = brdp->bitsize;
2447 nrdevs = brdp->nrdevs;
2448
2449/*
2450 * Check if slave wants any service. Basically we try to do as
2451 * little work as possible here. There are 2 levels of service
2452 * bits. So if there is nothing to do we bail early. We check
2453 * 8 service bits at a time in the inner loop, so we can bypass
2454 * the lot if none of them want service.
2455 */
4ac4360b 2456 memcpy_fromio(&hostbits[0], (((unsigned char __iomem *) hdrp) + brdp->hostoffset),
1da177e4
LT
2457 bitsize);
2458
2459 memset(&slavebits[0], 0, bitsize);
2460 slavebitchange = 0;
2461
2462 for (bitpos = 0; (bitpos < bitsize); bitpos++) {
2463 if (hostbits[bitpos] == 0)
2464 continue;
2465 channr = bitpos * 8;
2466 for (bitat = 0x1; (channr < nrdevs); channr++, bitat <<= 1) {
2467 if (hostbits[bitpos] & bitat) {
2468 portp = brdp->ports[(channr - 1)];
2469 if (stli_hostcmd(brdp, portp)) {
2470 slavebitchange++;
2471 slavebits[bitpos] |= bitat;
2472 }
2473 }
2474 }
2475 }
2476
2477/*
2478 * If any of the ports are no longer busy then update them in the
2479 * slave request bits. We need to do this after, since a host port
2480 * service may initiate more slave requests.
2481 */
2482 if (slavebitchange) {
4ac4360b
AC
2483 hdrp = (cdkhdr_t __iomem *) EBRDGETMEMPTR(brdp, CDK_CDKADDR);
2484 slavep = ((unsigned char __iomem *) hdrp) + brdp->slaveoffset;
1da177e4 2485 for (bitpos = 0; (bitpos < bitsize); bitpos++) {
4ac4360b
AC
2486 if (readb(slavebits + bitpos))
2487 writeb(readb(slavep + bitpos) & ~slavebits[bitpos], slavebits + bitpos);
1da177e4
LT
2488 }
2489 }
2490}
2491
2492/*****************************************************************************/
2493
2494/*
2495 * Driver poll routine. This routine polls the boards in use and passes
2496 * messages back up to host when necessary. This is actually very
2497 * CPU efficient, since we will always have the kernel poll clock, it
2498 * adds only a few cycles when idle (since board service can be
2499 * determined very easily), but when loaded generates no interrupts
2500 * (with their expensive associated context change).
2501 */
2502
2503static void stli_poll(unsigned long arg)
2504{
4ac4360b 2505 cdkhdr_t __iomem *hdrp;
1f8ec435 2506 struct stlibrd *brdp;
1328d737 2507 unsigned int brdnr;
1da177e4 2508
ff8efe97 2509 mod_timer(&stli_timerlist, STLI_TIMEOUT);
1da177e4
LT
2510
2511/*
2512 * Check each board and do any servicing required.
2513 */
2514 for (brdnr = 0; (brdnr < stli_nrbrds); brdnr++) {
2515 brdp = stli_brds[brdnr];
4ac4360b 2516 if (brdp == NULL)
1da177e4
LT
2517 continue;
2518 if ((brdp->state & BST_STARTED) == 0)
2519 continue;
2520
4ac4360b 2521 spin_lock(&brd_lock);
1da177e4 2522 EBRDENABLE(brdp);
4ac4360b
AC
2523 hdrp = (cdkhdr_t __iomem *) EBRDGETMEMPTR(brdp, CDK_CDKADDR);
2524 if (readb(&hdrp->hostreq))
1da177e4
LT
2525 stli_brdpoll(brdp, hdrp);
2526 EBRDDISABLE(brdp);
4ac4360b 2527 spin_unlock(&brd_lock);
1da177e4
LT
2528 }
2529}
2530
2531/*****************************************************************************/
2532
2533/*
2534 * Translate the termios settings into the port setting structure of
2535 * the slave.
2536 */
2537
1f8ec435 2538static void stli_mkasyport(struct stliport *portp, asyport_t *pp, struct ktermios *tiosp)
1da177e4 2539{
1da177e4
LT
2540 memset(pp, 0, sizeof(asyport_t));
2541
2542/*
2543 * Start of by setting the baud, char size, parity and stop bit info.
2544 */
b02f5ad6 2545 pp->baudout = tty_get_baud_rate(portp->port.tty);
1da177e4 2546 if ((tiosp->c_cflag & CBAUD) == B38400) {
b02f5ad6 2547 if ((portp->port.flags & ASYNC_SPD_MASK) == ASYNC_SPD_HI)
1da177e4 2548 pp->baudout = 57600;
b02f5ad6 2549 else if ((portp->port.flags & ASYNC_SPD_MASK) == ASYNC_SPD_VHI)
1da177e4 2550 pp->baudout = 115200;
b02f5ad6 2551 else if ((portp->port.flags & ASYNC_SPD_MASK) == ASYNC_SPD_SHI)
1da177e4 2552 pp->baudout = 230400;
b02f5ad6 2553 else if ((portp->port.flags & ASYNC_SPD_MASK) == ASYNC_SPD_WARP)
1da177e4 2554 pp->baudout = 460800;
b02f5ad6 2555 else if ((portp->port.flags & ASYNC_SPD_MASK) == ASYNC_SPD_CUST)
1da177e4
LT
2556 pp->baudout = (portp->baud_base / portp->custom_divisor);
2557 }
2558 if (pp->baudout > STL_MAXBAUD)
2559 pp->baudout = STL_MAXBAUD;
2560 pp->baudin = pp->baudout;
2561
2562 switch (tiosp->c_cflag & CSIZE) {
2563 case CS5:
2564 pp->csize = 5;
2565 break;
2566 case CS6:
2567 pp->csize = 6;
2568 break;
2569 case CS7:
2570 pp->csize = 7;
2571 break;
2572 default:
2573 pp->csize = 8;
2574 break;
2575 }
2576
2577 if (tiosp->c_cflag & CSTOPB)
2578 pp->stopbs = PT_STOP2;
2579 else
2580 pp->stopbs = PT_STOP1;
2581
2582 if (tiosp->c_cflag & PARENB) {
2583 if (tiosp->c_cflag & PARODD)
2584 pp->parity = PT_ODDPARITY;
2585 else
2586 pp->parity = PT_EVENPARITY;
2587 } else {
2588 pp->parity = PT_NOPARITY;
2589 }
2590
2591/*
2592 * Set up any flow control options enabled.
2593 */
2594 if (tiosp->c_iflag & IXON) {
2595 pp->flow |= F_IXON;
2596 if (tiosp->c_iflag & IXANY)
2597 pp->flow |= F_IXANY;
2598 }
2599 if (tiosp->c_cflag & CRTSCTS)
2600 pp->flow |= (F_RTSFLOW | F_CTSFLOW);
2601
2602 pp->startin = tiosp->c_cc[VSTART];
2603 pp->stopin = tiosp->c_cc[VSTOP];
2604 pp->startout = tiosp->c_cc[VSTART];
2605 pp->stopout = tiosp->c_cc[VSTOP];
2606
2607/*
2608 * Set up the RX char marking mask with those RX error types we must
2609 * catch. We can get the slave to help us out a little here, it will
2610 * ignore parity errors and breaks for us, and mark parity errors in
2611 * the data stream.
2612 */
2613 if (tiosp->c_iflag & IGNPAR)
2614 pp->iflag |= FI_IGNRXERRS;
2615 if (tiosp->c_iflag & IGNBRK)
2616 pp->iflag |= FI_IGNBREAK;
2617
2618 portp->rxmarkmsk = 0;
2619 if (tiosp->c_iflag & (INPCK | PARMRK))
2620 pp->iflag |= FI_1MARKRXERRS;
2621 if (tiosp->c_iflag & BRKINT)
2622 portp->rxmarkmsk |= BRKINT;
2623
2624/*
2625 * Set up clocal processing as required.
2626 */
2627 if (tiosp->c_cflag & CLOCAL)
b02f5ad6 2628 portp->port.flags &= ~ASYNC_CHECK_CD;
1da177e4 2629 else
b02f5ad6 2630 portp->port.flags |= ASYNC_CHECK_CD;
1da177e4
LT
2631
2632/*
2633 * Transfer any persistent flags into the asyport structure.
2634 */
2635 pp->pflag = (portp->pflag & 0xffff);
2636 pp->vmin = (portp->pflag & P_RXIMIN) ? 1 : 0;
2637 pp->vtime = (portp->pflag & P_RXITIME) ? 1 : 0;
2638 pp->cc[1] = (portp->pflag & P_RXTHOLD) ? 1 : 0;
2639}
2640
2641/*****************************************************************************/
2642
2643/*
2644 * Construct a slave signals structure for setting the DTR and RTS
2645 * signals as specified.
2646 */
2647
2648static void stli_mkasysigs(asysigs_t *sp, int dtr, int rts)
2649{
1da177e4
LT
2650 memset(sp, 0, sizeof(asysigs_t));
2651 if (dtr >= 0) {
2652 sp->signal |= SG_DTR;
2653 sp->sigvalue |= ((dtr > 0) ? SG_DTR : 0);
2654 }
2655 if (rts >= 0) {
2656 sp->signal |= SG_RTS;
2657 sp->sigvalue |= ((rts > 0) ? SG_RTS : 0);
2658 }
2659}
2660
2661/*****************************************************************************/
2662
2663/*
2664 * Convert the signals returned from the slave into a local TIOCM type
2665 * signals value. We keep them locally in TIOCM format.
2666 */
2667
2668static long stli_mktiocm(unsigned long sigvalue)
2669{
4ac4360b 2670 long tiocm = 0;
1da177e4
LT
2671 tiocm |= ((sigvalue & SG_DCD) ? TIOCM_CD : 0);
2672 tiocm |= ((sigvalue & SG_CTS) ? TIOCM_CTS : 0);
2673 tiocm |= ((sigvalue & SG_RI) ? TIOCM_RI : 0);
2674 tiocm |= ((sigvalue & SG_DSR) ? TIOCM_DSR : 0);
2675 tiocm |= ((sigvalue & SG_DTR) ? TIOCM_DTR : 0);
2676 tiocm |= ((sigvalue & SG_RTS) ? TIOCM_RTS : 0);
2677 return(tiocm);
2678}
2679
2680/*****************************************************************************/
2681
2682/*
2683 * All panels and ports actually attached have been worked out. All
2684 * we need to do here is set up the appropriate per port data structures.
2685 */
2686
1f8ec435 2687static int stli_initports(struct stlibrd *brdp)
1da177e4 2688{
1f8ec435 2689 struct stliport *portp;
1328d737 2690 unsigned int i, panelnr, panelport;
1da177e4 2691
1da177e4 2692 for (i = 0, panelnr = 0, panelport = 0; (i < brdp->nrports); i++) {
1f8ec435 2693 portp = kzalloc(sizeof(struct stliport), GFP_KERNEL);
b0b4ed72 2694 if (!portp) {
1da177e4
LT
2695 printk("STALLION: failed to allocate port structure\n");
2696 continue;
2697 }
2698
1da177e4
LT
2699 portp->magic = STLI_PORTMAGIC;
2700 portp->portnr = i;
2701 portp->brdnr = brdp->brdnr;
2702 portp->panelnr = panelnr;
2703 portp->baud_base = STL_BAUDBASE;
2704 portp->close_delay = STL_CLOSEDELAY;
2705 portp->closing_wait = 30 * HZ;
b02f5ad6
AC
2706 init_waitqueue_head(&portp->port.open_wait);
2707 init_waitqueue_head(&portp->port.close_wait);
1da177e4
LT
2708 init_waitqueue_head(&portp->raw_wait);
2709 panelport++;
2710 if (panelport >= brdp->panels[panelnr]) {
2711 panelport = 0;
2712 panelnr++;
2713 }
2714 brdp->ports[i] = portp;
2715 }
2716
4ac4360b 2717 return 0;
1da177e4
LT
2718}
2719
2720/*****************************************************************************/
2721
2722/*
2723 * All the following routines are board specific hardware operations.
2724 */
2725
1f8ec435 2726static void stli_ecpinit(struct stlibrd *brdp)
1da177e4
LT
2727{
2728 unsigned long memconf;
2729
1da177e4
LT
2730 outb(ECP_ATSTOP, (brdp->iobase + ECP_ATCONFR));
2731 udelay(10);
2732 outb(ECP_ATDISABLE, (brdp->iobase + ECP_ATCONFR));
2733 udelay(100);
2734
2735 memconf = (brdp->memaddr & ECP_ATADDRMASK) >> ECP_ATADDRSHFT;
2736 outb(memconf, (brdp->iobase + ECP_ATMEMAR));
2737}
2738
2739/*****************************************************************************/
2740
1f8ec435 2741static void stli_ecpenable(struct stlibrd *brdp)
1da177e4 2742{
1da177e4
LT
2743 outb(ECP_ATENABLE, (brdp->iobase + ECP_ATCONFR));
2744}
2745
2746/*****************************************************************************/
2747
1f8ec435 2748static void stli_ecpdisable(struct stlibrd *brdp)
1da177e4 2749{
1da177e4
LT
2750 outb(ECP_ATDISABLE, (brdp->iobase + ECP_ATCONFR));
2751}
2752
2753/*****************************************************************************/
2754
1f8ec435 2755static void __iomem *stli_ecpgetmemptr(struct stlibrd *brdp, unsigned long offset, int line)
1da177e4 2756{
29756fa3 2757 void __iomem *ptr;
4ac4360b 2758 unsigned char val;
1da177e4
LT
2759
2760 if (offset > brdp->memsize) {
2761 printk(KERN_ERR "STALLION: shared memory pointer=%x out of "
2762 "range at line=%d(%d), brd=%d\n",
2763 (int) offset, line, __LINE__, brdp->brdnr);
2764 ptr = NULL;
2765 val = 0;
2766 } else {
2767 ptr = brdp->membase + (offset % ECP_ATPAGESIZE);
2768 val = (unsigned char) (offset / ECP_ATPAGESIZE);
2769 }
2770 outb(val, (brdp->iobase + ECP_ATMEMPR));
2771 return(ptr);
2772}
2773
2774/*****************************************************************************/
2775
1f8ec435 2776static void stli_ecpreset(struct stlibrd *brdp)
1da177e4 2777{
1da177e4
LT
2778 outb(ECP_ATSTOP, (brdp->iobase + ECP_ATCONFR));
2779 udelay(10);
2780 outb(ECP_ATDISABLE, (brdp->iobase + ECP_ATCONFR));
2781 udelay(500);
2782}
2783
2784/*****************************************************************************/
2785
1f8ec435 2786static void stli_ecpintr(struct stlibrd *brdp)
1da177e4 2787{
1da177e4
LT
2788 outb(0x1, brdp->iobase);
2789}
2790
2791/*****************************************************************************/
2792
2793/*
2794 * The following set of functions act on ECP EISA boards.
2795 */
2796
1f8ec435 2797static void stli_ecpeiinit(struct stlibrd *brdp)
1da177e4
LT
2798{
2799 unsigned long memconf;
2800
1da177e4
LT
2801 outb(0x1, (brdp->iobase + ECP_EIBRDENAB));
2802 outb(ECP_EISTOP, (brdp->iobase + ECP_EICONFR));
2803 udelay(10);
2804 outb(ECP_EIDISABLE, (brdp->iobase + ECP_EICONFR));
2805 udelay(500);
2806
2807 memconf = (brdp->memaddr & ECP_EIADDRMASKL) >> ECP_EIADDRSHFTL;
2808 outb(memconf, (brdp->iobase + ECP_EIMEMARL));
2809 memconf = (brdp->memaddr & ECP_EIADDRMASKH) >> ECP_EIADDRSHFTH;
2810 outb(memconf, (brdp->iobase + ECP_EIMEMARH));
2811}
2812
2813/*****************************************************************************/
2814
1f8ec435 2815static void stli_ecpeienable(struct stlibrd *brdp)
1da177e4
LT
2816{
2817 outb(ECP_EIENABLE, (brdp->iobase + ECP_EICONFR));
2818}
2819
2820/*****************************************************************************/
2821
1f8ec435 2822static void stli_ecpeidisable(struct stlibrd *brdp)
1da177e4
LT
2823{
2824 outb(ECP_EIDISABLE, (brdp->iobase + ECP_EICONFR));
2825}
2826
2827/*****************************************************************************/
2828
1f8ec435 2829static void __iomem *stli_ecpeigetmemptr(struct stlibrd *brdp, unsigned long offset, int line)
1da177e4 2830{
29756fa3 2831 void __iomem *ptr;
1da177e4
LT
2832 unsigned char val;
2833
1da177e4
LT
2834 if (offset > brdp->memsize) {
2835 printk(KERN_ERR "STALLION: shared memory pointer=%x out of "
2836 "range at line=%d(%d), brd=%d\n",
2837 (int) offset, line, __LINE__, brdp->brdnr);
2838 ptr = NULL;
2839 val = 0;
2840 } else {
2841 ptr = brdp->membase + (offset % ECP_EIPAGESIZE);
2842 if (offset < ECP_EIPAGESIZE)
2843 val = ECP_EIENABLE;
2844 else
2845 val = ECP_EIENABLE | 0x40;
2846 }
2847 outb(val, (brdp->iobase + ECP_EICONFR));
2848 return(ptr);
2849}
2850
2851/*****************************************************************************/
2852
1f8ec435 2853static void stli_ecpeireset(struct stlibrd *brdp)
1da177e4
LT
2854{
2855 outb(ECP_EISTOP, (brdp->iobase + ECP_EICONFR));
2856 udelay(10);
2857 outb(ECP_EIDISABLE, (brdp->iobase + ECP_EICONFR));
2858 udelay(500);
2859}
2860
2861/*****************************************************************************/
2862
2863/*
2864 * The following set of functions act on ECP MCA boards.
2865 */
2866
1f8ec435 2867static void stli_ecpmcenable(struct stlibrd *brdp)
1da177e4
LT
2868{
2869 outb(ECP_MCENABLE, (brdp->iobase + ECP_MCCONFR));
2870}
2871
2872/*****************************************************************************/
2873
1f8ec435 2874static void stli_ecpmcdisable(struct stlibrd *brdp)
1da177e4
LT
2875{
2876 outb(ECP_MCDISABLE, (brdp->iobase + ECP_MCCONFR));
2877}
2878
2879/*****************************************************************************/
2880
1f8ec435 2881static void __iomem *stli_ecpmcgetmemptr(struct stlibrd *brdp, unsigned long offset, int line)
1da177e4 2882{
29756fa3 2883 void __iomem *ptr;
4ac4360b 2884 unsigned char val;
1da177e4
LT
2885
2886 if (offset > brdp->memsize) {
2887 printk(KERN_ERR "STALLION: shared memory pointer=%x out of "
2888 "range at line=%d(%d), brd=%d\n",
2889 (int) offset, line, __LINE__, brdp->brdnr);
2890 ptr = NULL;
2891 val = 0;
2892 } else {
2893 ptr = brdp->membase + (offset % ECP_MCPAGESIZE);
2894 val = ((unsigned char) (offset / ECP_MCPAGESIZE)) | ECP_MCENABLE;
2895 }
2896 outb(val, (brdp->iobase + ECP_MCCONFR));
2897 return(ptr);
2898}
2899
2900/*****************************************************************************/
2901
1f8ec435 2902static void stli_ecpmcreset(struct stlibrd *brdp)
1da177e4
LT
2903{
2904 outb(ECP_MCSTOP, (brdp->iobase + ECP_MCCONFR));
2905 udelay(10);
2906 outb(ECP_MCDISABLE, (brdp->iobase + ECP_MCCONFR));
2907 udelay(500);
2908}
2909
2910/*****************************************************************************/
2911
2912/*
2913 * The following set of functions act on ECP PCI boards.
2914 */
2915
1f8ec435 2916static void stli_ecppciinit(struct stlibrd *brdp)
1da177e4 2917{
1da177e4
LT
2918 outb(ECP_PCISTOP, (brdp->iobase + ECP_PCICONFR));
2919 udelay(10);
2920 outb(0, (brdp->iobase + ECP_PCICONFR));
2921 udelay(500);
2922}
2923
2924/*****************************************************************************/
2925
1f8ec435 2926static void __iomem *stli_ecppcigetmemptr(struct stlibrd *brdp, unsigned long offset, int line)
1da177e4 2927{
29756fa3 2928 void __iomem *ptr;
1da177e4
LT
2929 unsigned char val;
2930
1da177e4
LT
2931 if (offset > brdp->memsize) {
2932 printk(KERN_ERR "STALLION: shared memory pointer=%x out of "
2933 "range at line=%d(%d), board=%d\n",
2934 (int) offset, line, __LINE__, brdp->brdnr);
2935 ptr = NULL;
2936 val = 0;
2937 } else {
2938 ptr = brdp->membase + (offset % ECP_PCIPAGESIZE);
2939 val = (offset / ECP_PCIPAGESIZE) << 1;
2940 }
2941 outb(val, (brdp->iobase + ECP_PCICONFR));
2942 return(ptr);
2943}
2944
2945/*****************************************************************************/
2946
1f8ec435 2947static void stli_ecppcireset(struct stlibrd *brdp)
1da177e4
LT
2948{
2949 outb(ECP_PCISTOP, (brdp->iobase + ECP_PCICONFR));
2950 udelay(10);
2951 outb(0, (brdp->iobase + ECP_PCICONFR));
2952 udelay(500);
2953}
2954
2955/*****************************************************************************/
2956
2957/*
2958 * The following routines act on ONboards.
2959 */
2960
1f8ec435 2961static void stli_onbinit(struct stlibrd *brdp)
1da177e4
LT
2962{
2963 unsigned long memconf;
2964
1da177e4
LT
2965 outb(ONB_ATSTOP, (brdp->iobase + ONB_ATCONFR));
2966 udelay(10);
2967 outb(ONB_ATDISABLE, (brdp->iobase + ONB_ATCONFR));
2968 mdelay(1000);
2969
2970 memconf = (brdp->memaddr & ONB_ATADDRMASK) >> ONB_ATADDRSHFT;
2971 outb(memconf, (brdp->iobase + ONB_ATMEMAR));
2972 outb(0x1, brdp->iobase);
2973 mdelay(1);
2974}
2975
2976/*****************************************************************************/
2977
1f8ec435 2978static void stli_onbenable(struct stlibrd *brdp)
1da177e4 2979{
1da177e4
LT
2980 outb((brdp->enabval | ONB_ATENABLE), (brdp->iobase + ONB_ATCONFR));
2981}
2982
2983/*****************************************************************************/
2984
1f8ec435 2985static void stli_onbdisable(struct stlibrd *brdp)
1da177e4 2986{
1da177e4
LT
2987 outb((brdp->enabval | ONB_ATDISABLE), (brdp->iobase + ONB_ATCONFR));
2988}
2989
2990/*****************************************************************************/
2991
1f8ec435 2992static void __iomem *stli_onbgetmemptr(struct stlibrd *brdp, unsigned long offset, int line)
1da177e4 2993{
29756fa3 2994 void __iomem *ptr;
1da177e4 2995
1da177e4
LT
2996 if (offset > brdp->memsize) {
2997 printk(KERN_ERR "STALLION: shared memory pointer=%x out of "
2998 "range at line=%d(%d), brd=%d\n",
2999 (int) offset, line, __LINE__, brdp->brdnr);
3000 ptr = NULL;
3001 } else {
3002 ptr = brdp->membase + (offset % ONB_ATPAGESIZE);
3003 }
3004 return(ptr);
3005}
3006
3007/*****************************************************************************/
3008
1f8ec435 3009static void stli_onbreset(struct stlibrd *brdp)
1da177e4 3010{
1da177e4
LT
3011 outb(ONB_ATSTOP, (brdp->iobase + ONB_ATCONFR));
3012 udelay(10);
3013 outb(ONB_ATDISABLE, (brdp->iobase + ONB_ATCONFR));
3014 mdelay(1000);
3015}
3016
3017/*****************************************************************************/
3018
3019/*
3020 * The following routines act on ONboard EISA.
3021 */
3022
1f8ec435 3023static void stli_onbeinit(struct stlibrd *brdp)
1da177e4
LT
3024{
3025 unsigned long memconf;
3026
1da177e4
LT
3027 outb(0x1, (brdp->iobase + ONB_EIBRDENAB));
3028 outb(ONB_EISTOP, (brdp->iobase + ONB_EICONFR));
3029 udelay(10);
3030 outb(ONB_EIDISABLE, (brdp->iobase + ONB_EICONFR));
3031 mdelay(1000);
3032
3033 memconf = (brdp->memaddr & ONB_EIADDRMASKL) >> ONB_EIADDRSHFTL;
3034 outb(memconf, (brdp->iobase + ONB_EIMEMARL));
3035 memconf = (brdp->memaddr & ONB_EIADDRMASKH) >> ONB_EIADDRSHFTH;
3036 outb(memconf, (brdp->iobase + ONB_EIMEMARH));
3037 outb(0x1, brdp->iobase);
3038 mdelay(1);
3039}
3040
3041/*****************************************************************************/
3042
1f8ec435 3043static void stli_onbeenable(struct stlibrd *brdp)
1da177e4 3044{
1da177e4
LT
3045 outb(ONB_EIENABLE, (brdp->iobase + ONB_EICONFR));
3046}
3047
3048/*****************************************************************************/
3049
1f8ec435 3050static void stli_onbedisable(struct stlibrd *brdp)
1da177e4 3051{
1da177e4
LT
3052 outb(ONB_EIDISABLE, (brdp->iobase + ONB_EICONFR));
3053}
3054
3055/*****************************************************************************/
3056
1f8ec435 3057static void __iomem *stli_onbegetmemptr(struct stlibrd *brdp, unsigned long offset, int line)
1da177e4 3058{
29756fa3 3059 void __iomem *ptr;
4ac4360b 3060 unsigned char val;
1da177e4
LT
3061
3062 if (offset > brdp->memsize) {
3063 printk(KERN_ERR "STALLION: shared memory pointer=%x out of "
3064 "range at line=%d(%d), brd=%d\n",
3065 (int) offset, line, __LINE__, brdp->brdnr);
3066 ptr = NULL;
3067 val = 0;
3068 } else {
3069 ptr = brdp->membase + (offset % ONB_EIPAGESIZE);
3070 if (offset < ONB_EIPAGESIZE)
3071 val = ONB_EIENABLE;
3072 else
3073 val = ONB_EIENABLE | 0x40;
3074 }
3075 outb(val, (brdp->iobase + ONB_EICONFR));
3076 return(ptr);
3077}
3078
3079/*****************************************************************************/
3080
1f8ec435 3081static void stli_onbereset(struct stlibrd *brdp)
1da177e4 3082{
1da177e4
LT
3083 outb(ONB_EISTOP, (brdp->iobase + ONB_EICONFR));
3084 udelay(10);
3085 outb(ONB_EIDISABLE, (brdp->iobase + ONB_EICONFR));
3086 mdelay(1000);
3087}
3088
3089/*****************************************************************************/
3090
3091/*
3092 * The following routines act on Brumby boards.
3093 */
3094
1f8ec435 3095static void stli_bbyinit(struct stlibrd *brdp)
1da177e4 3096{
1da177e4
LT
3097 outb(BBY_ATSTOP, (brdp->iobase + BBY_ATCONFR));
3098 udelay(10);
3099 outb(0, (brdp->iobase + BBY_ATCONFR));
3100 mdelay(1000);
3101 outb(0x1, brdp->iobase);
3102 mdelay(1);
3103}
3104
3105/*****************************************************************************/
3106
1f8ec435 3107static void __iomem *stli_bbygetmemptr(struct stlibrd *brdp, unsigned long offset, int line)
1da177e4 3108{
29756fa3 3109 void __iomem *ptr;
4ac4360b 3110 unsigned char val;
1da177e4 3111
4ac4360b 3112 BUG_ON(offset > brdp->memsize);
1da177e4 3113
4ac4360b
AC
3114 ptr = brdp->membase + (offset % BBY_PAGESIZE);
3115 val = (unsigned char) (offset / BBY_PAGESIZE);
1da177e4
LT
3116 outb(val, (brdp->iobase + BBY_ATCONFR));
3117 return(ptr);
3118}
3119
3120/*****************************************************************************/
3121
1f8ec435 3122static void stli_bbyreset(struct stlibrd *brdp)
1da177e4 3123{
1da177e4
LT
3124 outb(BBY_ATSTOP, (brdp->iobase + BBY_ATCONFR));
3125 udelay(10);
3126 outb(0, (brdp->iobase + BBY_ATCONFR));
3127 mdelay(1000);
3128}
3129
3130/*****************************************************************************/
3131
3132/*
3133 * The following routines act on original old Stallion boards.
3134 */
3135
1f8ec435 3136static void stli_stalinit(struct stlibrd *brdp)
1da177e4 3137{
1da177e4
LT
3138 outb(0x1, brdp->iobase);
3139 mdelay(1000);
3140}
3141
3142/*****************************************************************************/
3143
1f8ec435 3144static void __iomem *stli_stalgetmemptr(struct stlibrd *brdp, unsigned long offset, int line)
1da177e4 3145{
4ac4360b
AC
3146 BUG_ON(offset > brdp->memsize);
3147 return brdp->membase + (offset % STAL_PAGESIZE);
1da177e4
LT
3148}
3149
3150/*****************************************************************************/
3151
1f8ec435 3152static void stli_stalreset(struct stlibrd *brdp)
1da177e4 3153{
4ac4360b 3154 u32 __iomem *vecp;
1da177e4 3155
4ac4360b
AC
3156 vecp = (u32 __iomem *) (brdp->membase + 0x30);
3157 writel(0xffff0000, vecp);
1da177e4
LT
3158 outb(0, brdp->iobase);
3159 mdelay(1000);
3160}
3161
3162/*****************************************************************************/
3163
3164/*
3165 * Try to find an ECP board and initialize it. This handles only ECP
3166 * board types.
3167 */
3168
1f8ec435 3169static int stli_initecp(struct stlibrd *brdp)
1da177e4 3170{
4ac4360b
AC
3171 cdkecpsig_t sig;
3172 cdkecpsig_t __iomem *sigsp;
3173 unsigned int status, nxtid;
3174 char *name;
8f8f5a58 3175 int retval, panelnr, nrports;
1da177e4 3176
8f8f5a58
JS
3177 if ((brdp->iobase == 0) || (brdp->memaddr == 0)) {
3178 retval = -ENODEV;
3179 goto err;
3180 }
3181
b306122d
IK
3182 brdp->iosize = ECP_IOSIZE;
3183
8f8f5a58
JS
3184 if (!request_region(brdp->iobase, brdp->iosize, "istallion")) {
3185 retval = -EIO;
3186 goto err;
1da177e4
LT
3187 }
3188
1da177e4
LT
3189/*
3190 * Based on the specific board type setup the common vars to access
3191 * and enable shared memory. Set all board specific information now
3192 * as well.
3193 */
3194 switch (brdp->brdtype) {
3195 case BRD_ECP:
1da177e4
LT
3196 brdp->memsize = ECP_MEMSIZE;
3197 brdp->pagesize = ECP_ATPAGESIZE;
3198 brdp->init = stli_ecpinit;
3199 brdp->enable = stli_ecpenable;
3200 brdp->reenable = stli_ecpenable;
3201 brdp->disable = stli_ecpdisable;
3202 brdp->getmemptr = stli_ecpgetmemptr;
3203 brdp->intr = stli_ecpintr;
3204 brdp->reset = stli_ecpreset;
3205 name = "serial(EC8/64)";
3206 break;
3207
3208 case BRD_ECPE:
1da177e4
LT
3209 brdp->memsize = ECP_MEMSIZE;
3210 brdp->pagesize = ECP_EIPAGESIZE;
3211 brdp->init = stli_ecpeiinit;
3212 brdp->enable = stli_ecpeienable;
3213 brdp->reenable = stli_ecpeienable;
3214 brdp->disable = stli_ecpeidisable;
3215 brdp->getmemptr = stli_ecpeigetmemptr;
3216 brdp->intr = stli_ecpintr;
3217 brdp->reset = stli_ecpeireset;
3218 name = "serial(EC8/64-EI)";
3219 break;
3220
3221 case BRD_ECPMC:
1da177e4
LT
3222 brdp->memsize = ECP_MEMSIZE;
3223 brdp->pagesize = ECP_MCPAGESIZE;
3224 brdp->init = NULL;
3225 brdp->enable = stli_ecpmcenable;
3226 brdp->reenable = stli_ecpmcenable;
3227 brdp->disable = stli_ecpmcdisable;
3228 brdp->getmemptr = stli_ecpmcgetmemptr;
3229 brdp->intr = stli_ecpintr;
3230 brdp->reset = stli_ecpmcreset;
3231 name = "serial(EC8/64-MCA)";
3232 break;
3233
3234 case BRD_ECPPCI:
1da177e4
LT
3235 brdp->memsize = ECP_PCIMEMSIZE;
3236 brdp->pagesize = ECP_PCIPAGESIZE;
3237 brdp->init = stli_ecppciinit;
3238 brdp->enable = NULL;
3239 brdp->reenable = NULL;
3240 brdp->disable = NULL;
3241 brdp->getmemptr = stli_ecppcigetmemptr;
3242 brdp->intr = stli_ecpintr;
3243 brdp->reset = stli_ecppcireset;
3244 name = "serial(EC/RA-PCI)";
3245 break;
3246
3247 default:
8f8f5a58
JS
3248 retval = -EINVAL;
3249 goto err_reg;
1da177e4
LT
3250 }
3251
3252/*
3253 * The per-board operations structure is all set up, so now let's go
3254 * and get the board operational. Firstly initialize board configuration
3255 * registers. Set the memory mapping info so we can get at the boards
3256 * shared memory.
3257 */
3258 EBRDINIT(brdp);
3259
24cb2335 3260 brdp->membase = ioremap_nocache(brdp->memaddr, brdp->memsize);
8f8f5a58
JS
3261 if (brdp->membase == NULL) {
3262 retval = -ENOMEM;
3263 goto err_reg;
1da177e4
LT
3264 }
3265
3266/*
3267 * Now that all specific code is set up, enable the shared memory and
3268 * look for the a signature area that will tell us exactly what board
3269 * this is, and what it is connected to it.
3270 */
3271 EBRDENABLE(brdp);
4ac4360b 3272 sigsp = (cdkecpsig_t __iomem *) EBRDGETMEMPTR(brdp, CDK_SIGADDR);
634965f5 3273 memcpy_fromio(&sig, sigsp, sizeof(cdkecpsig_t));
1da177e4
LT
3274 EBRDDISABLE(brdp);
3275
8f8f5a58
JS
3276 if (sig.magic != cpu_to_le32(ECP_MAGIC)) {
3277 retval = -ENODEV;
3278 goto err_unmap;
1da177e4
LT
3279 }
3280
3281/*
3282 * Scan through the signature looking at the panels connected to the
3283 * board. Calculate the total number of ports as we go.
3284 */
3285 for (panelnr = 0, nxtid = 0; (panelnr < STL_MAXPANELS); panelnr++) {
3286 status = sig.panelid[nxtid];
3287 if ((status & ECH_PNLIDMASK) != nxtid)
3288 break;
3289
3290 brdp->panelids[panelnr] = status;
3291 nrports = (status & ECH_PNL16PORT) ? 16 : 8;
3292 if ((nrports == 16) && ((status & ECH_PNLXPID) == 0))
3293 nxtid++;
3294 brdp->panels[panelnr] = nrports;
3295 brdp->nrports += nrports;
3296 nxtid++;
3297 brdp->nrpanels++;
3298 }
3299
3300
3301 brdp->state |= BST_FOUND;
4ac4360b 3302 return 0;
8f8f5a58
JS
3303err_unmap:
3304 iounmap(brdp->membase);
3305 brdp->membase = NULL;
3306err_reg:
3307 release_region(brdp->iobase, brdp->iosize);
3308err:
3309 return retval;
1da177e4
LT
3310}
3311
3312/*****************************************************************************/
3313
3314/*
3315 * Try to find an ONboard, Brumby or Stallion board and initialize it.
3316 * This handles only these board types.
3317 */
3318
1f8ec435 3319static int stli_initonb(struct stlibrd *brdp)
1da177e4 3320{
4ac4360b
AC
3321 cdkonbsig_t sig;
3322 cdkonbsig_t __iomem *sigsp;
3323 char *name;
8f8f5a58 3324 int i, retval;
1da177e4
LT
3325
3326/*
3327 * Do a basic sanity check on the IO and memory addresses.
3328 */
8f8f5a58
JS
3329 if (brdp->iobase == 0 || brdp->memaddr == 0) {
3330 retval = -ENODEV;
3331 goto err;
3332 }
1da177e4
LT
3333
3334 brdp->iosize = ONB_IOSIZE;
3335
8f8f5a58
JS
3336 if (!request_region(brdp->iobase, brdp->iosize, "istallion")) {
3337 retval = -EIO;
3338 goto err;
3339 }
1da177e4
LT
3340
3341/*
3342 * Based on the specific board type setup the common vars to access
3343 * and enable shared memory. Set all board specific information now
3344 * as well.
3345 */
3346 switch (brdp->brdtype) {
3347 case BRD_ONBOARD:
1da177e4 3348 case BRD_ONBOARD2:
1da177e4
LT
3349 brdp->memsize = ONB_MEMSIZE;
3350 brdp->pagesize = ONB_ATPAGESIZE;
3351 brdp->init = stli_onbinit;
3352 brdp->enable = stli_onbenable;
3353 brdp->reenable = stli_onbenable;
3354 brdp->disable = stli_onbdisable;
3355 brdp->getmemptr = stli_onbgetmemptr;
3356 brdp->intr = stli_ecpintr;
3357 brdp->reset = stli_onbreset;
3358 if (brdp->memaddr > 0x100000)
3359 brdp->enabval = ONB_MEMENABHI;
3360 else
3361 brdp->enabval = ONB_MEMENABLO;
3362 name = "serial(ONBoard)";
3363 break;
3364
3365 case BRD_ONBOARDE:
1da177e4
LT
3366 brdp->memsize = ONB_EIMEMSIZE;
3367 brdp->pagesize = ONB_EIPAGESIZE;
3368 brdp->init = stli_onbeinit;
3369 brdp->enable = stli_onbeenable;
3370 brdp->reenable = stli_onbeenable;
3371 brdp->disable = stli_onbedisable;
3372 brdp->getmemptr = stli_onbegetmemptr;
3373 brdp->intr = stli_ecpintr;
3374 brdp->reset = stli_onbereset;
3375 name = "serial(ONBoard/E)";
3376 break;
3377
3378 case BRD_BRUMBY4:
1da177e4
LT
3379 brdp->memsize = BBY_MEMSIZE;
3380 brdp->pagesize = BBY_PAGESIZE;
3381 brdp->init = stli_bbyinit;
3382 brdp->enable = NULL;
3383 brdp->reenable = NULL;
3384 brdp->disable = NULL;
3385 brdp->getmemptr = stli_bbygetmemptr;
3386 brdp->intr = stli_ecpintr;
3387 brdp->reset = stli_bbyreset;
3388 name = "serial(Brumby)";
3389 break;
3390
3391 case BRD_STALLION:
1da177e4
LT
3392 brdp->memsize = STAL_MEMSIZE;
3393 brdp->pagesize = STAL_PAGESIZE;
3394 brdp->init = stli_stalinit;
3395 brdp->enable = NULL;
3396 brdp->reenable = NULL;
3397 brdp->disable = NULL;
3398 brdp->getmemptr = stli_stalgetmemptr;
3399 brdp->intr = stli_ecpintr;
3400 brdp->reset = stli_stalreset;
3401 name = "serial(Stallion)";
3402 break;
3403
3404 default:
8f8f5a58
JS
3405 retval = -EINVAL;
3406 goto err_reg;
1da177e4
LT
3407 }
3408
3409/*
3410 * The per-board operations structure is all set up, so now let's go
3411 * and get the board operational. Firstly initialize board configuration
3412 * registers. Set the memory mapping info so we can get at the boards
3413 * shared memory.
3414 */
3415 EBRDINIT(brdp);
3416
24cb2335 3417 brdp->membase = ioremap_nocache(brdp->memaddr, brdp->memsize);
8f8f5a58
JS
3418 if (brdp->membase == NULL) {
3419 retval = -ENOMEM;
3420 goto err_reg;
1da177e4
LT
3421 }
3422
3423/*
3424 * Now that all specific code is set up, enable the shared memory and
3425 * look for the a signature area that will tell us exactly what board
3426 * this is, and how many ports.
3427 */
3428 EBRDENABLE(brdp);
4ac4360b
AC
3429 sigsp = (cdkonbsig_t __iomem *) EBRDGETMEMPTR(brdp, CDK_SIGADDR);
3430 memcpy_fromio(&sig, sigsp, sizeof(cdkonbsig_t));
1da177e4
LT
3431 EBRDDISABLE(brdp);
3432
4ac4360b
AC
3433 if (sig.magic0 != cpu_to_le16(ONB_MAGIC0) ||
3434 sig.magic1 != cpu_to_le16(ONB_MAGIC1) ||
3435 sig.magic2 != cpu_to_le16(ONB_MAGIC2) ||
8f8f5a58
JS
3436 sig.magic3 != cpu_to_le16(ONB_MAGIC3)) {
3437 retval = -ENODEV;
3438 goto err_unmap;
1da177e4
LT
3439 }
3440
3441/*
3442 * Scan through the signature alive mask and calculate how many ports
3443 * there are on this board.
3444 */
3445 brdp->nrpanels = 1;
3446 if (sig.amask1) {
3447 brdp->nrports = 32;
3448 } else {
3449 for (i = 0; (i < 16); i++) {
3450 if (((sig.amask0 << i) & 0x8000) == 0)
3451 break;
3452 }
3453 brdp->nrports = i;
3454 }
3455 brdp->panels[0] = brdp->nrports;
3456
3457
3458 brdp->state |= BST_FOUND;
4ac4360b 3459 return 0;
8f8f5a58
JS
3460err_unmap:
3461 iounmap(brdp->membase);
3462 brdp->membase = NULL;
3463err_reg:
3464 release_region(brdp->iobase, brdp->iosize);
3465err:
3466 return retval;
1da177e4
LT
3467}
3468
3469/*****************************************************************************/
3470
3471/*
3472 * Start up a running board. This routine is only called after the
3473 * code has been down loaded to the board and is operational. It will
3474 * read in the memory map, and get the show on the road...
3475 */
3476
1f8ec435 3477static int stli_startbrd(struct stlibrd *brdp)
1da177e4 3478{
4ac4360b
AC
3479 cdkhdr_t __iomem *hdrp;
3480 cdkmem_t __iomem *memp;
3481 cdkasy_t __iomem *ap;
3482 unsigned long flags;
1328d737 3483 unsigned int portnr, nrdevs, i;
1f8ec435 3484 struct stliport *portp;
1328d737 3485 int rc = 0;
4ac4360b
AC
3486 u32 memoff;
3487
3488 spin_lock_irqsave(&brd_lock, flags);
1da177e4 3489 EBRDENABLE(brdp);
4ac4360b 3490 hdrp = (cdkhdr_t __iomem *) EBRDGETMEMPTR(brdp, CDK_CDKADDR);
1da177e4
LT
3491 nrdevs = hdrp->nrdevs;
3492
3493#if 0
3494 printk("%s(%d): CDK version %d.%d.%d --> "
3495 "nrdevs=%d memp=%x hostp=%x slavep=%x\n",
4ac4360b
AC
3496 __FILE__, __LINE__, readb(&hdrp->ver_release), readb(&hdrp->ver_modification),
3497 readb(&hdrp->ver_fix), nrdevs, (int) readl(&hdrp->memp), readl(&hdrp->hostp),
3498 readl(&hdrp->slavep));
1da177e4
LT
3499#endif
3500
3501 if (nrdevs < (brdp->nrports + 1)) {
3502 printk(KERN_ERR "STALLION: slave failed to allocate memory for "
3503 "all devices, devices=%d\n", nrdevs);
3504 brdp->nrports = nrdevs - 1;
3505 }
3506 brdp->nrdevs = nrdevs;
3507 brdp->hostoffset = hdrp->hostp - CDK_CDKADDR;
3508 brdp->slaveoffset = hdrp->slavep - CDK_CDKADDR;
3509 brdp->bitsize = (nrdevs + 7) / 8;
4ac4360b
AC
3510 memoff = readl(&hdrp->memp);
3511 if (memoff > brdp->memsize) {
1da177e4
LT
3512 printk(KERN_ERR "STALLION: corrupted shared memory region?\n");
3513 rc = -EIO;
3514 goto stli_donestartup;
3515 }
4ac4360b
AC
3516 memp = (cdkmem_t __iomem *) EBRDGETMEMPTR(brdp, memoff);
3517 if (readw(&memp->dtype) != TYP_ASYNCTRL) {
1da177e4
LT
3518 printk(KERN_ERR "STALLION: no slave control device found\n");
3519 goto stli_donestartup;
3520 }
3521 memp++;
3522
3523/*
3524 * Cycle through memory allocation of each port. We are guaranteed to
3525 * have all ports inside the first page of slave window, so no need to
3526 * change pages while reading memory map.
3527 */
3528 for (i = 1, portnr = 0; (i < nrdevs); i++, portnr++, memp++) {
4ac4360b 3529 if (readw(&memp->dtype) != TYP_ASYNC)
1da177e4
LT
3530 break;
3531 portp = brdp->ports[portnr];
4ac4360b 3532 if (portp == NULL)
1da177e4
LT
3533 break;
3534 portp->devnr = i;
4ac4360b 3535 portp->addr = readl(&memp->offset);
1da177e4
LT
3536 portp->reqbit = (unsigned char) (0x1 << (i * 8 / nrdevs));
3537 portp->portidx = (unsigned char) (i / 8);
3538 portp->portbit = (unsigned char) (0x1 << (i % 8));
3539 }
3540
4ac4360b 3541 writeb(0xff, &hdrp->slavereq);
1da177e4
LT
3542
3543/*
3544 * For each port setup a local copy of the RX and TX buffer offsets
3545 * and sizes. We do this separate from the above, because we need to
3546 * move the shared memory page...
3547 */
3548 for (i = 1, portnr = 0; (i < nrdevs); i++, portnr++) {
3549 portp = brdp->ports[portnr];
4ac4360b 3550 if (portp == NULL)
1da177e4
LT
3551 break;
3552 if (portp->addr == 0)
3553 break;
4ac4360b
AC
3554 ap = (cdkasy_t __iomem *) EBRDGETMEMPTR(brdp, portp->addr);
3555 if (ap != NULL) {
3556 portp->rxsize = readw(&ap->rxq.size);
3557 portp->txsize = readw(&ap->txq.size);
3558 portp->rxoffset = readl(&ap->rxq.offset);
3559 portp->txoffset = readl(&ap->txq.offset);
1da177e4
LT
3560 }
3561 }
3562
3563stli_donestartup:
3564 EBRDDISABLE(brdp);
4ac4360b 3565 spin_unlock_irqrestore(&brd_lock, flags);
1da177e4
LT
3566
3567 if (rc == 0)
3568 brdp->state |= BST_STARTED;
3569
3570 if (! stli_timeron) {
3571 stli_timeron++;
ff8efe97 3572 mod_timer(&stli_timerlist, STLI_TIMEOUT);
1da177e4
LT
3573 }
3574
4ac4360b 3575 return rc;
1da177e4
LT
3576}
3577
3578/*****************************************************************************/
3579
3580/*
3581 * Probe and initialize the specified board.
3582 */
3583
1f8ec435 3584static int __devinit stli_brdinit(struct stlibrd *brdp)
1da177e4 3585{
8f8f5a58
JS
3586 int retval;
3587
1da177e4
LT
3588 switch (brdp->brdtype) {
3589 case BRD_ECP:
3590 case BRD_ECPE:
3591 case BRD_ECPMC:
3592 case BRD_ECPPCI:
8f8f5a58 3593 retval = stli_initecp(brdp);
1da177e4
LT
3594 break;
3595 case BRD_ONBOARD:
3596 case BRD_ONBOARDE:
3597 case BRD_ONBOARD2:
1da177e4 3598 case BRD_BRUMBY4:
1da177e4 3599 case BRD_STALLION:
8f8f5a58 3600 retval = stli_initonb(brdp);
1da177e4 3601 break;
1da177e4
LT
3602 default:
3603 printk(KERN_ERR "STALLION: board=%d is unknown board "
3604 "type=%d\n", brdp->brdnr, brdp->brdtype);
8f8f5a58 3605 retval = -ENODEV;
1da177e4
LT
3606 }
3607
8f8f5a58
JS
3608 if (retval)
3609 return retval;
1da177e4
LT
3610
3611 stli_initports(brdp);
3612 printk(KERN_INFO "STALLION: %s found, board=%d io=%x mem=%x "
3613 "nrpanels=%d nrports=%d\n", stli_brdnames[brdp->brdtype],
3614 brdp->brdnr, brdp->iobase, (int) brdp->memaddr,
3615 brdp->nrpanels, brdp->nrports);
4ac4360b 3616 return 0;
1da177e4
LT
3617}
3618
a00f33f3 3619#if STLI_EISAPROBE != 0
1da177e4
LT
3620/*****************************************************************************/
3621
3622/*
3623 * Probe around trying to find where the EISA boards shared memory
3624 * might be. This is a bit if hack, but it is the best we can do.
3625 */
3626
1f8ec435 3627static int stli_eisamemprobe(struct stlibrd *brdp)
1da177e4 3628{
4ac4360b
AC
3629 cdkecpsig_t ecpsig, __iomem *ecpsigp;
3630 cdkonbsig_t onbsig, __iomem *onbsigp;
1da177e4
LT
3631 int i, foundit;
3632
1da177e4
LT
3633/*
3634 * First up we reset the board, to get it into a known state. There
3635 * is only 2 board types here we need to worry about. Don;t use the
3636 * standard board init routine here, it programs up the shared
3637 * memory address, and we don't know it yet...
3638 */
3639 if (brdp->brdtype == BRD_ECPE) {
3640 outb(0x1, (brdp->iobase + ECP_EIBRDENAB));
3641 outb(ECP_EISTOP, (brdp->iobase + ECP_EICONFR));
3642 udelay(10);
3643 outb(ECP_EIDISABLE, (brdp->iobase + ECP_EICONFR));
3644 udelay(500);
3645 stli_ecpeienable(brdp);
3646 } else if (brdp->brdtype == BRD_ONBOARDE) {
3647 outb(0x1, (brdp->iobase + ONB_EIBRDENAB));
3648 outb(ONB_EISTOP, (brdp->iobase + ONB_EICONFR));
3649 udelay(10);
3650 outb(ONB_EIDISABLE, (brdp->iobase + ONB_EICONFR));
3651 mdelay(100);
3652 outb(0x1, brdp->iobase);
3653 mdelay(1);
3654 stli_onbeenable(brdp);
3655 } else {
4ac4360b 3656 return -ENODEV;
1da177e4
LT
3657 }
3658
3659 foundit = 0;
3660 brdp->memsize = ECP_MEMSIZE;
3661
3662/*
3663 * Board shared memory is enabled, so now we have a poke around and
3664 * see if we can find it.
3665 */
3666 for (i = 0; (i < stli_eisamempsize); i++) {
3667 brdp->memaddr = stli_eisamemprobeaddrs[i];
24cb2335 3668 brdp->membase = ioremap_nocache(brdp->memaddr, brdp->memsize);
4ac4360b 3669 if (brdp->membase == NULL)
1da177e4
LT
3670 continue;
3671
3672 if (brdp->brdtype == BRD_ECPE) {
29756fa3 3673 ecpsigp = stli_ecpeigetmemptr(brdp,
1da177e4 3674 CDK_SIGADDR, __LINE__);
4ac4360b
AC
3675 memcpy_fromio(&ecpsig, ecpsigp, sizeof(cdkecpsig_t));
3676 if (ecpsig.magic == cpu_to_le32(ECP_MAGIC))
1da177e4
LT
3677 foundit = 1;
3678 } else {
4ac4360b 3679 onbsigp = (cdkonbsig_t __iomem *) stli_onbegetmemptr(brdp,
1da177e4 3680 CDK_SIGADDR, __LINE__);
4ac4360b
AC
3681 memcpy_fromio(&onbsig, onbsigp, sizeof(cdkonbsig_t));
3682 if ((onbsig.magic0 == cpu_to_le16(ONB_MAGIC0)) &&
3683 (onbsig.magic1 == cpu_to_le16(ONB_MAGIC1)) &&
3684 (onbsig.magic2 == cpu_to_le16(ONB_MAGIC2)) &&
3685 (onbsig.magic3 == cpu_to_le16(ONB_MAGIC3)))
1da177e4
LT
3686 foundit = 1;
3687 }
3688
3689 iounmap(brdp->membase);
3690 if (foundit)
3691 break;
3692 }
3693
3694/*
3695 * Regardless of whether we found the shared memory or not we must
3696 * disable the region. After that return success or failure.
3697 */
3698 if (brdp->brdtype == BRD_ECPE)
3699 stli_ecpeidisable(brdp);
3700 else
3701 stli_onbedisable(brdp);
3702
3703 if (! foundit) {
3704 brdp->memaddr = 0;
3705 brdp->membase = NULL;
3706 printk(KERN_ERR "STALLION: failed to probe shared memory "
3707 "region for %s in EISA slot=%d\n",
3708 stli_brdnames[brdp->brdtype], (brdp->iobase >> 12));
4ac4360b 3709 return -ENODEV;
1da177e4 3710 }
4ac4360b 3711 return 0;
1da177e4 3712}
a00f33f3 3713#endif
1da177e4
LT
3714
3715static int stli_getbrdnr(void)
3716{
1328d737 3717 unsigned int i;
1da177e4
LT
3718
3719 for (i = 0; i < STL_MAXBRDS; i++) {
3720 if (!stli_brds[i]) {
3721 if (i >= stli_nrbrds)
3722 stli_nrbrds = i + 1;
3723 return i;
3724 }
3725 }
3726 return -1;
3727}
3728
a00f33f3 3729#if STLI_EISAPROBE != 0
1da177e4
LT
3730/*****************************************************************************/
3731
3732/*
3733 * Probe around and try to find any EISA boards in system. The biggest
3734 * problem here is finding out what memory address is associated with
3735 * an EISA board after it is found. The registers of the ECPE and
3736 * ONboardE are not readable - so we can't read them from there. We
3737 * don't have access to the EISA CMOS (or EISA BIOS) so we don't
3738 * actually have any way to find out the real value. The best we can
3739 * do is go probing around in the usual places hoping we can find it.
3740 */
3741
3742static int stli_findeisabrds(void)
3743{
1f8ec435 3744 struct stlibrd *brdp;
1328d737 3745 unsigned int iobase, eid, i;
8f8f5a58 3746 int brdnr, found = 0;
1da177e4
LT
3747
3748/*
4ac4360b 3749 * Firstly check if this is an EISA system. If this is not an EISA system then
1da177e4
LT
3750 * don't bother going any further!
3751 */
4ac4360b
AC
3752 if (EISA_bus)
3753 return 0;
1da177e4
LT
3754
3755/*
3756 * Looks like an EISA system, so go searching for EISA boards.
3757 */
3758 for (iobase = 0x1000; (iobase <= 0xc000); iobase += 0x1000) {
3759 outb(0xff, (iobase + 0xc80));
3760 eid = inb(iobase + 0xc80);
3761 eid |= inb(iobase + 0xc81) << 8;
3762 if (eid != STL_EISAID)
3763 continue;
3764
3765/*
3766 * We have found a board. Need to check if this board was
3767 * statically configured already (just in case!).
3768 */
3769 for (i = 0; (i < STL_MAXBRDS); i++) {
3770 brdp = stli_brds[i];
4ac4360b 3771 if (brdp == NULL)
1da177e4
LT
3772 continue;
3773 if (brdp->iobase == iobase)
3774 break;
3775 }
3776 if (i < STL_MAXBRDS)
3777 continue;
3778
3779/*
3780 * We have found a Stallion board and it is not configured already.
3781 * Allocate a board structure and initialize it.
3782 */
4ac4360b 3783 if ((brdp = stli_allocbrd()) == NULL)
8f8f5a58 3784 return found ? : -ENOMEM;
1328d737
JS
3785 brdnr = stli_getbrdnr();
3786 if (brdnr < 0)
8f8f5a58 3787 return found ? : -ENOMEM;
1328d737 3788 brdp->brdnr = (unsigned int)brdnr;
1da177e4
LT
3789 eid = inb(iobase + 0xc82);
3790 if (eid == ECP_EISAID)
3791 brdp->brdtype = BRD_ECPE;
3792 else if (eid == ONB_EISAID)
3793 brdp->brdtype = BRD_ONBOARDE;
3794 else
3795 brdp->brdtype = BRD_UNKNOWN;
3796 brdp->iobase = iobase;
3797 outb(0x1, (iobase + 0xc84));
3798 if (stli_eisamemprobe(brdp))
3799 outb(0, (iobase + 0xc84));
8f8f5a58
JS
3800 if (stli_brdinit(brdp) < 0) {
3801 kfree(brdp);
3802 continue;
3803 }
3804
b103b5cf 3805 stli_brds[brdp->brdnr] = brdp;
8f8f5a58 3806 found++;
ec3dde57
JS
3807
3808 for (i = 0; i < brdp->nrports; i++)
3809 tty_register_device(stli_serial,
3810 brdp->brdnr * STL_MAXPORTS + i, NULL);
1da177e4
LT
3811 }
3812
8f8f5a58 3813 return found;
1da177e4 3814}
a00f33f3
JS
3815#else
3816static inline int stli_findeisabrds(void) { return 0; }
3817#endif
1da177e4
LT
3818
3819/*****************************************************************************/
3820
3821/*
3822 * Find the next available board number that is free.
3823 */
3824
3825/*****************************************************************************/
3826
1da177e4
LT
3827/*
3828 * We have a Stallion board. Allocate a board structure and
3829 * initialize it. Read its IO and MEMORY resources from PCI
3830 * configuration space.
3831 */
3832
845bead4
JS
3833static int __devinit stli_pciprobe(struct pci_dev *pdev,
3834 const struct pci_device_id *ent)
1da177e4 3835{
1f8ec435 3836 struct stlibrd *brdp;
ec3dde57 3837 unsigned int i;
1328d737 3838 int brdnr, retval = -EIO;
845bead4
JS
3839
3840 retval = pci_enable_device(pdev);
3841 if (retval)
3842 goto err;
3843 brdp = stli_allocbrd();
3844 if (brdp == NULL) {
3845 retval = -ENOMEM;
3846 goto err;
3847 }
b103b5cf 3848 mutex_lock(&stli_brdslock);
1328d737 3849 brdnr = stli_getbrdnr();
b103b5cf 3850 if (brdnr < 0) {
1da177e4
LT
3851 printk(KERN_INFO "STALLION: too many boards found, "
3852 "maximum supported %d\n", STL_MAXBRDS);
b103b5cf 3853 mutex_unlock(&stli_brdslock);
845bead4
JS
3854 retval = -EIO;
3855 goto err_fr;
1da177e4 3856 }
1328d737 3857 brdp->brdnr = (unsigned int)brdnr;
b103b5cf
JS
3858 stli_brds[brdp->brdnr] = brdp;
3859 mutex_unlock(&stli_brdslock);
845bead4 3860 brdp->brdtype = BRD_ECPPCI;
1da177e4
LT
3861/*
3862 * We have all resources from the board, so lets setup the actual
3863 * board structure now.
3864 */
845bead4
JS
3865 brdp->iobase = pci_resource_start(pdev, 3);
3866 brdp->memaddr = pci_resource_start(pdev, 2);
3867 retval = stli_brdinit(brdp);
3868 if (retval)
b103b5cf 3869 goto err_null;
845bead4 3870
39014172 3871 brdp->state |= BST_PROBED;
845bead4 3872 pci_set_drvdata(pdev, brdp);
1da177e4 3873
140e92ab
JS
3874 EBRDENABLE(brdp);
3875 brdp->enable = NULL;
3876 brdp->disable = NULL;
3877
ec3dde57
JS
3878 for (i = 0; i < brdp->nrports; i++)
3879 tty_register_device(stli_serial, brdp->brdnr * STL_MAXPORTS + i,
3880 &pdev->dev);
3881
4ac4360b 3882 return 0;
b103b5cf
JS
3883err_null:
3884 stli_brds[brdp->brdnr] = NULL;
845bead4
JS
3885err_fr:
3886 kfree(brdp);
3887err:
3888 return retval;
1da177e4
LT
3889}
3890
845bead4
JS
3891static void stli_pciremove(struct pci_dev *pdev)
3892{
1f8ec435 3893 struct stlibrd *brdp = pci_get_drvdata(pdev);
1da177e4 3894
845bead4 3895 stli_cleanup_ports(brdp);
1da177e4 3896
845bead4
JS
3897 iounmap(brdp->membase);
3898 if (brdp->iosize > 0)
3899 release_region(brdp->iobase, brdp->iosize);
1da177e4 3900
845bead4
JS
3901 stli_brds[brdp->brdnr] = NULL;
3902 kfree(brdp);
1da177e4
LT
3903}
3904
845bead4
JS
3905static struct pci_driver stli_pcidriver = {
3906 .name = "istallion",
3907 .id_table = istallion_pci_tbl,
3908 .probe = stli_pciprobe,
3909 .remove = __devexit_p(stli_pciremove)
3910};
1da177e4
LT
3911/*****************************************************************************/
3912
3913/*
3914 * Allocate a new board structure. Fill out the basic info in it.
3915 */
3916
1f8ec435 3917static struct stlibrd *stli_allocbrd(void)
1da177e4 3918{
1f8ec435 3919 struct stlibrd *brdp;
1da177e4 3920
1f8ec435 3921 brdp = kzalloc(sizeof(struct stlibrd), GFP_KERNEL);
b0b4ed72 3922 if (!brdp) {
1da177e4 3923 printk(KERN_ERR "STALLION: failed to allocate memory "
1f8ec435 3924 "(size=%Zd)\n", sizeof(struct stlibrd));
b0b4ed72 3925 return NULL;
1da177e4 3926 }
1da177e4 3927 brdp->magic = STLI_BOARDMAGIC;
4ac4360b 3928 return brdp;
1da177e4
LT
3929}
3930
3931/*****************************************************************************/
3932
3933/*
3934 * Scan through all the boards in the configuration and see what we
3935 * can find.
3936 */
3937
3938static int stli_initbrds(void)
3939{
1f8ec435
JS
3940 struct stlibrd *brdp, *nxtbrdp;
3941 struct stlconf conf;
8f8f5a58 3942 unsigned int i, j, found = 0;
1328d737 3943 int retval;
1da177e4 3944
a3f8d9d5
JS
3945 for (stli_nrbrds = 0; stli_nrbrds < ARRAY_SIZE(stli_brdsp);
3946 stli_nrbrds++) {
3947 memset(&conf, 0, sizeof(conf));
3948 if (stli_parsebrd(&conf, stli_brdsp[stli_nrbrds]) == 0)
3949 continue;
4ac4360b 3950 if ((brdp = stli_allocbrd()) == NULL)
a3f8d9d5
JS
3951 continue;
3952 brdp->brdnr = stli_nrbrds;
3953 brdp->brdtype = conf.brdtype;
3954 brdp->iobase = conf.ioaddr1;
3955 brdp->memaddr = conf.memaddr;
8f8f5a58
JS
3956 if (stli_brdinit(brdp) < 0) {
3957 kfree(brdp);
3958 continue;
3959 }
b103b5cf 3960 stli_brds[brdp->brdnr] = brdp;
8f8f5a58 3961 found++;
ec3dde57
JS
3962
3963 for (i = 0; i < brdp->nrports; i++)
3964 tty_register_device(stli_serial,
3965 brdp->brdnr * STL_MAXPORTS + i, NULL);
1da177e4
LT
3966 }
3967
8f8f5a58
JS
3968 retval = stli_findeisabrds();
3969 if (retval > 0)
3970 found += retval;
845bead4 3971
1da177e4
LT
3972/*
3973 * All found boards are initialized. Now for a little optimization, if
3974 * no boards are sharing the "shared memory" regions then we can just
3975 * leave them all enabled. This is in fact the usual case.
3976 */
3977 stli_shared = 0;
3978 if (stli_nrbrds > 1) {
3979 for (i = 0; (i < stli_nrbrds); i++) {
3980 brdp = stli_brds[i];
4ac4360b 3981 if (brdp == NULL)
1da177e4
LT
3982 continue;
3983 for (j = i + 1; (j < stli_nrbrds); j++) {
3984 nxtbrdp = stli_brds[j];
4ac4360b 3985 if (nxtbrdp == NULL)
1da177e4
LT
3986 continue;
3987 if ((brdp->membase >= nxtbrdp->membase) &&
3988 (brdp->membase <= (nxtbrdp->membase +
3989 nxtbrdp->memsize - 1))) {
3990 stli_shared++;
3991 break;
3992 }
3993 }
3994 }
3995 }
3996
3997 if (stli_shared == 0) {
3998 for (i = 0; (i < stli_nrbrds); i++) {
3999 brdp = stli_brds[i];
4ac4360b 4000 if (brdp == NULL)
1da177e4
LT
4001 continue;
4002 if (brdp->state & BST_FOUND) {
4003 EBRDENABLE(brdp);
4004 brdp->enable = NULL;
4005 brdp->disable = NULL;
4006 }
4007 }
4008 }
4009
140e92ab
JS
4010 retval = pci_register_driver(&stli_pcidriver);
4011 if (retval && found == 0) {
4012 printk(KERN_ERR "Neither isa nor eisa cards found nor pci "
4013 "driver can be registered!\n");
4014 goto err;
4015 }
4016
4ac4360b 4017 return 0;
8f8f5a58
JS
4018err:
4019 return retval;
1da177e4
LT
4020}
4021
4022/*****************************************************************************/
4023
4024/*
4025 * Code to handle an "staliomem" read operation. This device is the
4026 * contents of the board shared memory. It is used for down loading
4027 * the slave image (and debugging :-)
4028 */
4029
4030static ssize_t stli_memread(struct file *fp, char __user *buf, size_t count, loff_t *offp)
4031{
4ac4360b 4032 unsigned long flags;
29756fa3 4033 void __iomem *memptr;
1f8ec435 4034 struct stlibrd *brdp;
1328d737
JS
4035 unsigned int brdnr;
4036 int size, n;
4ac4360b
AC
4037 void *p;
4038 loff_t off = *offp;
1da177e4 4039
a7113a96 4040 brdnr = iminor(fp->f_path.dentry->d_inode);
1da177e4 4041 if (brdnr >= stli_nrbrds)
4ac4360b 4042 return -ENODEV;
1da177e4 4043 brdp = stli_brds[brdnr];
4ac4360b
AC
4044 if (brdp == NULL)
4045 return -ENODEV;
1da177e4 4046 if (brdp->state == 0)
4ac4360b
AC
4047 return -ENODEV;
4048 if (off >= brdp->memsize || off + count < off)
4049 return 0;
1da177e4 4050
a3f8d9d5 4051 size = min(count, (size_t)(brdp->memsize - off));
4ac4360b
AC
4052
4053 /*
4054 * Copy the data a page at a time
4055 */
4056
4057 p = (void *)__get_free_page(GFP_KERNEL);
4058 if(p == NULL)
4059 return -ENOMEM;
1da177e4 4060
1da177e4 4061 while (size > 0) {
4ac4360b
AC
4062 spin_lock_irqsave(&brd_lock, flags);
4063 EBRDENABLE(brdp);
29756fa3 4064 memptr = EBRDGETMEMPTR(brdp, off);
a3f8d9d5
JS
4065 n = min(size, (int)(brdp->pagesize - (((unsigned long) off) % brdp->pagesize)));
4066 n = min(n, (int)PAGE_SIZE);
4ac4360b
AC
4067 memcpy_fromio(p, memptr, n);
4068 EBRDDISABLE(brdp);
4069 spin_unlock_irqrestore(&brd_lock, flags);
4070 if (copy_to_user(buf, p, n)) {
1da177e4
LT
4071 count = -EFAULT;
4072 goto out;
4073 }
4ac4360b 4074 off += n;
1da177e4
LT
4075 buf += n;
4076 size -= n;
4077 }
4078out:
4ac4360b
AC
4079 *offp = off;
4080 free_page((unsigned long)p);
4081 return count;
1da177e4
LT
4082}
4083
4084/*****************************************************************************/
4085
4086/*
4087 * Code to handle an "staliomem" write operation. This device is the
4088 * contents of the board shared memory. It is used for down loading
4089 * the slave image (and debugging :-)
4ac4360b
AC
4090 *
4091 * FIXME: copy under lock
1da177e4
LT
4092 */
4093
4094static ssize_t stli_memwrite(struct file *fp, const char __user *buf, size_t count, loff_t *offp)
4095{
4ac4360b 4096 unsigned long flags;
29756fa3 4097 void __iomem *memptr;
1f8ec435 4098 struct stlibrd *brdp;
4ac4360b 4099 char __user *chbuf;
1328d737
JS
4100 unsigned int brdnr;
4101 int size, n;
4ac4360b
AC
4102 void *p;
4103 loff_t off = *offp;
1da177e4 4104
a7113a96 4105 brdnr = iminor(fp->f_path.dentry->d_inode);
4ac4360b 4106
1da177e4 4107 if (brdnr >= stli_nrbrds)
4ac4360b 4108 return -ENODEV;
1da177e4 4109 brdp = stli_brds[brdnr];
4ac4360b
AC
4110 if (brdp == NULL)
4111 return -ENODEV;
1da177e4 4112 if (brdp->state == 0)
4ac4360b
AC
4113 return -ENODEV;
4114 if (off >= brdp->memsize || off + count < off)
4115 return 0;
1da177e4
LT
4116
4117 chbuf = (char __user *) buf;
a3f8d9d5 4118 size = min(count, (size_t)(brdp->memsize - off));
4ac4360b
AC
4119
4120 /*
4121 * Copy the data a page at a time
4122 */
4123
4124 p = (void *)__get_free_page(GFP_KERNEL);
4125 if(p == NULL)
4126 return -ENOMEM;
1da177e4 4127
1da177e4 4128 while (size > 0) {
a3f8d9d5
JS
4129 n = min(size, (int)(brdp->pagesize - (((unsigned long) off) % brdp->pagesize)));
4130 n = min(n, (int)PAGE_SIZE);
4ac4360b
AC
4131 if (copy_from_user(p, chbuf, n)) {
4132 if (count == 0)
4133 count = -EFAULT;
1da177e4
LT
4134 goto out;
4135 }
4ac4360b
AC
4136 spin_lock_irqsave(&brd_lock, flags);
4137 EBRDENABLE(brdp);
29756fa3 4138 memptr = EBRDGETMEMPTR(brdp, off);
4ac4360b
AC
4139 memcpy_toio(memptr, p, n);
4140 EBRDDISABLE(brdp);
4141 spin_unlock_irqrestore(&brd_lock, flags);
4142 off += n;
1da177e4
LT
4143 chbuf += n;
4144 size -= n;
4145 }
4146out:
4ac4360b
AC
4147 free_page((unsigned long) p);
4148 *offp = off;
4149 return count;
1da177e4
LT
4150}
4151
4152/*****************************************************************************/
4153
4154/*
4155 * Return the board stats structure to user app.
4156 */
4157
4158static int stli_getbrdstats(combrd_t __user *bp)
4159{
1f8ec435 4160 struct stlibrd *brdp;
1328d737 4161 unsigned int i;
1da177e4
LT
4162
4163 if (copy_from_user(&stli_brdstats, bp, sizeof(combrd_t)))
4164 return -EFAULT;
4165 if (stli_brdstats.brd >= STL_MAXBRDS)
4ac4360b 4166 return -ENODEV;
1da177e4 4167 brdp = stli_brds[stli_brdstats.brd];
4ac4360b
AC
4168 if (brdp == NULL)
4169 return -ENODEV;
1da177e4
LT
4170
4171 memset(&stli_brdstats, 0, sizeof(combrd_t));
4172 stli_brdstats.brd = brdp->brdnr;
4173 stli_brdstats.type = brdp->brdtype;
4174 stli_brdstats.hwid = 0;
4175 stli_brdstats.state = brdp->state;
4176 stli_brdstats.ioaddr = brdp->iobase;
4177 stli_brdstats.memaddr = brdp->memaddr;
4178 stli_brdstats.nrpanels = brdp->nrpanels;
4179 stli_brdstats.nrports = brdp->nrports;
4180 for (i = 0; (i < brdp->nrpanels); i++) {
4181 stli_brdstats.panels[i].panel = i;
4182 stli_brdstats.panels[i].hwid = brdp->panelids[i];
4183 stli_brdstats.panels[i].nrports = brdp->panels[i];
4184 }
4185
4186 if (copy_to_user(bp, &stli_brdstats, sizeof(combrd_t)))
4187 return -EFAULT;
4ac4360b 4188 return 0;
1da177e4
LT
4189}
4190
4191/*****************************************************************************/
4192
4193/*
4194 * Resolve the referenced port number into a port struct pointer.
4195 */
4196
1328d737
JS
4197static struct stliport *stli_getport(unsigned int brdnr, unsigned int panelnr,
4198 unsigned int portnr)
1da177e4 4199{
1f8ec435 4200 struct stlibrd *brdp;
1328d737 4201 unsigned int i;
1da177e4 4202
1328d737 4203 if (brdnr >= STL_MAXBRDS)
4ac4360b 4204 return NULL;
1da177e4 4205 brdp = stli_brds[brdnr];
4ac4360b
AC
4206 if (brdp == NULL)
4207 return NULL;
1da177e4
LT
4208 for (i = 0; (i < panelnr); i++)
4209 portnr += brdp->panels[i];
1328d737 4210 if (portnr >= brdp->nrports)
4ac4360b
AC
4211 return NULL;
4212 return brdp->ports[portnr];
1da177e4
LT
4213}
4214
4215/*****************************************************************************/
4216
4217/*
4218 * Return the port stats structure to user app. A NULL port struct
4219 * pointer passed in means that we need to find out from the app
4220 * what port to get stats for (used through board control device).
4221 */
4222
1f8ec435 4223static int stli_portcmdstats(struct stliport *portp)
1da177e4
LT
4224{
4225 unsigned long flags;
1f8ec435 4226 struct stlibrd *brdp;
1da177e4
LT
4227 int rc;
4228
4229 memset(&stli_comstats, 0, sizeof(comstats_t));
4230
4ac4360b
AC
4231 if (portp == NULL)
4232 return -ENODEV;
1da177e4 4233 brdp = stli_brds[portp->brdnr];
4ac4360b
AC
4234 if (brdp == NULL)
4235 return -ENODEV;
1da177e4
LT
4236
4237 if (brdp->state & BST_STARTED) {
4238 if ((rc = stli_cmdwait(brdp, portp, A_GETSTATS,
4239 &stli_cdkstats, sizeof(asystats_t), 1)) < 0)
4ac4360b 4240 return rc;
1da177e4
LT
4241 } else {
4242 memset(&stli_cdkstats, 0, sizeof(asystats_t));
4243 }
4244
4245 stli_comstats.brd = portp->brdnr;
4246 stli_comstats.panel = portp->panelnr;
4247 stli_comstats.port = portp->portnr;
4248 stli_comstats.state = portp->state;
42a77a1b 4249 stli_comstats.flags = portp->port.flags;
1da177e4 4250
4ac4360b 4251 spin_lock_irqsave(&brd_lock, flags);
b02f5ad6
AC
4252 if (portp->port.tty != NULL) {
4253 if (portp->port.tty->driver_data == portp) {
4254 stli_comstats.ttystate = portp->port.tty->flags;
4ac4360b 4255 stli_comstats.rxbuffered = -1;
b02f5ad6
AC
4256 if (portp->port.tty->termios != NULL) {
4257 stli_comstats.cflags = portp->port.tty->termios->c_cflag;
4258 stli_comstats.iflags = portp->port.tty->termios->c_iflag;
4259 stli_comstats.oflags = portp->port.tty->termios->c_oflag;
4260 stli_comstats.lflags = portp->port.tty->termios->c_lflag;
1da177e4
LT
4261 }
4262 }
4263 }
4ac4360b 4264 spin_unlock_irqrestore(&brd_lock, flags);
1da177e4
LT
4265
4266 stli_comstats.txtotal = stli_cdkstats.txchars;
4267 stli_comstats.rxtotal = stli_cdkstats.rxchars + stli_cdkstats.ringover;
4268 stli_comstats.txbuffered = stli_cdkstats.txringq;
4269 stli_comstats.rxbuffered += stli_cdkstats.rxringq;
4270 stli_comstats.rxoverrun = stli_cdkstats.overruns;
4271 stli_comstats.rxparity = stli_cdkstats.parity;
4272 stli_comstats.rxframing = stli_cdkstats.framing;
4273 stli_comstats.rxlost = stli_cdkstats.ringover;
4274 stli_comstats.rxbreaks = stli_cdkstats.rxbreaks;
4275 stli_comstats.txbreaks = stli_cdkstats.txbreaks;
4276 stli_comstats.txxon = stli_cdkstats.txstart;
4277 stli_comstats.txxoff = stli_cdkstats.txstop;
4278 stli_comstats.rxxon = stli_cdkstats.rxstart;
4279 stli_comstats.rxxoff = stli_cdkstats.rxstop;
4280 stli_comstats.rxrtsoff = stli_cdkstats.rtscnt / 2;
4281 stli_comstats.rxrtson = stli_cdkstats.rtscnt - stli_comstats.rxrtsoff;
4282 stli_comstats.modem = stli_cdkstats.dcdcnt;
4283 stli_comstats.hwid = stli_cdkstats.hwid;
4284 stli_comstats.signals = stli_mktiocm(stli_cdkstats.signals);
4285
4ac4360b 4286 return 0;
1da177e4
LT
4287}
4288
4289/*****************************************************************************/
4290
4291/*
4292 * Return the port stats structure to user app. A NULL port struct
4293 * pointer passed in means that we need to find out from the app
4294 * what port to get stats for (used through board control device).
4295 */
4296
1f8ec435 4297static int stli_getportstats(struct stliport *portp, comstats_t __user *cp)
1da177e4 4298{
1f8ec435 4299 struct stlibrd *brdp;
4ac4360b 4300 int rc;
1da177e4
LT
4301
4302 if (!portp) {
4303 if (copy_from_user(&stli_comstats, cp, sizeof(comstats_t)))
4304 return -EFAULT;
4305 portp = stli_getport(stli_comstats.brd, stli_comstats.panel,
4306 stli_comstats.port);
4307 if (!portp)
4308 return -ENODEV;
4309 }
4310
4311 brdp = stli_brds[portp->brdnr];
4312 if (!brdp)
4313 return -ENODEV;
4314
4315 if ((rc = stli_portcmdstats(portp)) < 0)
4316 return rc;
4317
4318 return copy_to_user(cp, &stli_comstats, sizeof(comstats_t)) ?
4319 -EFAULT : 0;
4320}
4321
4322/*****************************************************************************/
4323
4324/*
4325 * Clear the port stats structure. We also return it zeroed out...
4326 */
4327
1f8ec435 4328static int stli_clrportstats(struct stliport *portp, comstats_t __user *cp)
1da177e4 4329{
1f8ec435 4330 struct stlibrd *brdp;
4ac4360b 4331 int rc;
1da177e4
LT
4332
4333 if (!portp) {
4334 if (copy_from_user(&stli_comstats, cp, sizeof(comstats_t)))
4335 return -EFAULT;
4336 portp = stli_getport(stli_comstats.brd, stli_comstats.panel,
4337 stli_comstats.port);
4338 if (!portp)
4339 return -ENODEV;
4340 }
4341
4342 brdp = stli_brds[portp->brdnr];
4343 if (!brdp)
4344 return -ENODEV;
4345
4346 if (brdp->state & BST_STARTED) {
4347 if ((rc = stli_cmdwait(brdp, portp, A_CLEARSTATS, NULL, 0, 0)) < 0)
4348 return rc;
4349 }
4350
4351 memset(&stli_comstats, 0, sizeof(comstats_t));
4352 stli_comstats.brd = portp->brdnr;
4353 stli_comstats.panel = portp->panelnr;
4354 stli_comstats.port = portp->portnr;
4355
4356 if (copy_to_user(cp, &stli_comstats, sizeof(comstats_t)))
4357 return -EFAULT;
4358 return 0;
4359}
4360
4361/*****************************************************************************/
4362
4363/*
4364 * Return the entire driver ports structure to a user app.
4365 */
4366
1f8ec435 4367static int stli_getportstruct(struct stliport __user *arg)
1da177e4 4368{
1328d737 4369 struct stliport stli_dummyport;
1f8ec435 4370 struct stliport *portp;
1da177e4 4371
1f8ec435 4372 if (copy_from_user(&stli_dummyport, arg, sizeof(struct stliport)))
1da177e4
LT
4373 return -EFAULT;
4374 portp = stli_getport(stli_dummyport.brdnr, stli_dummyport.panelnr,
4375 stli_dummyport.portnr);
4376 if (!portp)
4377 return -ENODEV;
1f8ec435 4378 if (copy_to_user(arg, portp, sizeof(struct stliport)))
1da177e4
LT
4379 return -EFAULT;
4380 return 0;
4381}
4382
4383/*****************************************************************************/
4384
4385/*
4386 * Return the entire driver board structure to a user app.
4387 */
4388
1f8ec435 4389static int stli_getbrdstruct(struct stlibrd __user *arg)
1da177e4 4390{
1328d737 4391 struct stlibrd stli_dummybrd;
1f8ec435 4392 struct stlibrd *brdp;
1da177e4 4393
1f8ec435 4394 if (copy_from_user(&stli_dummybrd, arg, sizeof(struct stlibrd)))
1da177e4 4395 return -EFAULT;
1328d737 4396 if (stli_dummybrd.brdnr >= STL_MAXBRDS)
1da177e4
LT
4397 return -ENODEV;
4398 brdp = stli_brds[stli_dummybrd.brdnr];
4399 if (!brdp)
4400 return -ENODEV;
1f8ec435 4401 if (copy_to_user(arg, brdp, sizeof(struct stlibrd)))
1da177e4
LT
4402 return -EFAULT;
4403 return 0;
4404}
4405
4406/*****************************************************************************/
4407
4408/*
4409 * The "staliomem" device is also required to do some special operations on
4410 * the board. We need to be able to send an interrupt to the board,
4411 * reset it, and start/stop it.
4412 */
4413
4414static int stli_memioctl(struct inode *ip, struct file *fp, unsigned int cmd, unsigned long arg)
4415{
1f8ec435 4416 struct stlibrd *brdp;
4ac4360b 4417 int brdnr, rc, done;
1da177e4
LT
4418 void __user *argp = (void __user *)arg;
4419
1da177e4
LT
4420/*
4421 * First up handle the board independent ioctls.
4422 */
4423 done = 0;
4424 rc = 0;
4425
37361136
AC
4426 lock_kernel();
4427
1da177e4
LT
4428 switch (cmd) {
4429 case COM_GETPORTSTATS:
4430 rc = stli_getportstats(NULL, argp);
4431 done++;
4432 break;
4433 case COM_CLRPORTSTATS:
4434 rc = stli_clrportstats(NULL, argp);
4435 done++;
4436 break;
4437 case COM_GETBRDSTATS:
4438 rc = stli_getbrdstats(argp);
4439 done++;
4440 break;
4441 case COM_READPORT:
4442 rc = stli_getportstruct(argp);
4443 done++;
4444 break;
4445 case COM_READBOARD:
4446 rc = stli_getbrdstruct(argp);
4447 done++;
4448 break;
4449 }
37361136 4450 unlock_kernel();
1da177e4
LT
4451
4452 if (done)
4ac4360b 4453 return rc;
1da177e4
LT
4454
4455/*
4456 * Now handle the board specific ioctls. These all depend on the
4457 * minor number of the device they were called from.
4458 */
4459 brdnr = iminor(ip);
4460 if (brdnr >= STL_MAXBRDS)
4ac4360b 4461 return -ENODEV;
1da177e4
LT
4462 brdp = stli_brds[brdnr];
4463 if (!brdp)
4ac4360b 4464 return -ENODEV;
1da177e4 4465 if (brdp->state == 0)
4ac4360b 4466 return -ENODEV;
1da177e4 4467
37361136
AC
4468 lock_kernel();
4469
1da177e4
LT
4470 switch (cmd) {
4471 case STL_BINTR:
4472 EBRDINTR(brdp);
4473 break;
4474 case STL_BSTART:
4475 rc = stli_startbrd(brdp);
4476 break;
4477 case STL_BSTOP:
4478 brdp->state &= ~BST_STARTED;
4479 break;
4480 case STL_BRESET:
4481 brdp->state &= ~BST_STARTED;
4482 EBRDRESET(brdp);
4483 if (stli_shared == 0) {
4484 if (brdp->reenable != NULL)
4485 (* brdp->reenable)(brdp);
4486 }
4487 break;
4488 default:
4489 rc = -ENOIOCTLCMD;
4490 break;
4491 }
37361136 4492 unlock_kernel();
4ac4360b 4493 return rc;
1da177e4
LT
4494}
4495
b68e31d0 4496static const struct tty_operations stli_ops = {
1da177e4
LT
4497 .open = stli_open,
4498 .close = stli_close,
4499 .write = stli_write,
4500 .put_char = stli_putchar,
4501 .flush_chars = stli_flushchars,
4502 .write_room = stli_writeroom,
4503 .chars_in_buffer = stli_charsinbuffer,
4504 .ioctl = stli_ioctl,
4505 .set_termios = stli_settermios,
4506 .throttle = stli_throttle,
4507 .unthrottle = stli_unthrottle,
4508 .stop = stli_stop,
4509 .start = stli_start,
4510 .hangup = stli_hangup,
4511 .flush_buffer = stli_flushbuffer,
4512 .break_ctl = stli_breakctl,
4513 .wait_until_sent = stli_waituntilsent,
4514 .send_xchar = stli_sendxchar,
4515 .read_proc = stli_readproc,
4516 .tiocmget = stli_tiocmget,
4517 .tiocmset = stli_tiocmset,
4518};
4519
4520/*****************************************************************************/
f1cc54f8
JS
4521/*
4522 * Loadable module initialization stuff.
4523 */
1da177e4 4524
f2362c94
JS
4525static void istallion_cleanup_isa(void)
4526{
4527 struct stlibrd *brdp;
4528 unsigned int j;
4529
4530 for (j = 0; (j < stli_nrbrds); j++) {
4531 if ((brdp = stli_brds[j]) == NULL || (brdp->state & BST_PROBED))
4532 continue;
4533
4534 stli_cleanup_ports(brdp);
4535
4536 iounmap(brdp->membase);
4537 if (brdp->iosize > 0)
4538 release_region(brdp->iobase, brdp->iosize);
4539 kfree(brdp);
4540 stli_brds[j] = NULL;
4541 }
4542}
4543
f1cc54f8 4544static int __init istallion_module_init(void)
1da177e4 4545{
f2362c94
JS
4546 unsigned int i;
4547 int retval;
f1cc54f8 4548
1da177e4
LT
4549 printk(KERN_INFO "%s: version %s\n", stli_drvtitle, stli_drvversion);
4550
4ac4360b
AC
4551 spin_lock_init(&stli_lock);
4552 spin_lock_init(&brd_lock);
4553
b0b4ed72 4554 stli_txcookbuf = kmalloc(STLI_TXBUFSIZE, GFP_KERNEL);
f2362c94 4555 if (!stli_txcookbuf) {
1da177e4
LT
4556 printk(KERN_ERR "STALLION: failed to allocate memory "
4557 "(size=%d)\n", STLI_TXBUFSIZE);
f2362c94
JS
4558 retval = -ENOMEM;
4559 goto err;
4560 }
1da177e4 4561
f2362c94
JS
4562 stli_serial = alloc_tty_driver(STL_MAXBRDS * STL_MAXPORTS);
4563 if (!stli_serial) {
4564 retval = -ENOMEM;
4565 goto err_free;
4566 }
1da177e4 4567
1da177e4
LT
4568 stli_serial->owner = THIS_MODULE;
4569 stli_serial->driver_name = stli_drvname;
4570 stli_serial->name = stli_serialname;
4571 stli_serial->major = STL_SERIALMAJOR;
4572 stli_serial->minor_start = 0;
4573 stli_serial->type = TTY_DRIVER_TYPE_SERIAL;
4574 stli_serial->subtype = SERIAL_TYPE_NORMAL;
4575 stli_serial->init_termios = stli_deftermios;
ec3dde57 4576 stli_serial->flags = TTY_DRIVER_REAL_RAW | TTY_DRIVER_DYNAMIC_DEV;
1da177e4
LT
4577 tty_set_operations(stli_serial, &stli_ops);
4578
f2362c94
JS
4579 retval = tty_register_driver(stli_serial);
4580 if (retval) {
1da177e4 4581 printk(KERN_ERR "STALLION: failed to register serial driver\n");
f2362c94
JS
4582 goto err_ttyput;
4583 }
4584
4585 retval = stli_initbrds();
4586 if (retval)
4587 goto err_ttyunr;
4588
4589/*
4590 * Set up a character driver for the shared memory region. We need this
4591 * to down load the slave code image. Also it is a useful debugging tool.
4592 */
4593 retval = register_chrdev(STL_SIOMEMMAJOR, "staliomem", &stli_fsiomem);
4594 if (retval) {
4595 printk(KERN_ERR "STALLION: failed to register serial memory "
4596 "device\n");
4597 goto err_deinit;
1da177e4 4598 }
f2362c94
JS
4599
4600 istallion_class = class_create(THIS_MODULE, "staliomem");
4601 for (i = 0; i < 4; i++)
47aa5793
GKH
4602 device_create_drvdata(istallion_class, NULL,
4603 MKDEV(STL_SIOMEMMAJOR, i),
4604 NULL, "staliomem%d", i);
f2362c94 4605
4ac4360b 4606 return 0;
f2362c94
JS
4607err_deinit:
4608 pci_unregister_driver(&stli_pcidriver);
4609 istallion_cleanup_isa();
4610err_ttyunr:
4611 tty_unregister_driver(stli_serial);
4612err_ttyput:
4613 put_tty_driver(stli_serial);
4614err_free:
4615 kfree(stli_txcookbuf);
4616err:
4617 return retval;
1da177e4
LT
4618}
4619
4620/*****************************************************************************/
f1cc54f8
JS
4621
4622static void __exit istallion_module_exit(void)
4623{
f1cc54f8 4624 unsigned int j;
f1cc54f8
JS
4625
4626 printk(KERN_INFO "Unloading %s: version %s\n", stli_drvtitle,
4627 stli_drvversion);
4628
f1cc54f8
JS
4629 if (stli_timeron) {
4630 stli_timeron = 0;
4631 del_timer_sync(&stli_timerlist);
4632 }
4633
f2362c94
JS
4634 unregister_chrdev(STL_SIOMEMMAJOR, "staliomem");
4635
f1cc54f8 4636 for (j = 0; j < 4; j++)
07c015e7 4637 device_destroy(istallion_class, MKDEV(STL_SIOMEMMAJOR, j));
f1cc54f8 4638 class_destroy(istallion_class);
f1cc54f8 4639
f2362c94
JS
4640 pci_unregister_driver(&stli_pcidriver);
4641 istallion_cleanup_isa();
f1cc54f8 4642
f2362c94
JS
4643 tty_unregister_driver(stli_serial);
4644 put_tty_driver(stli_serial);
f1cc54f8 4645
f2362c94 4646 kfree(stli_txcookbuf);
f1cc54f8
JS
4647}
4648
4649module_init(istallion_module_init);
4650module_exit(istallion_module_exit);