drivers/char/stallion.c

   1 /*****************************************************************************/
   2
   3 /*
   4  *      stallion.c  -- stallion 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  *
  17  *      This program is distributed in the hope that it will be useful,
  18  *      but WITHOUT ANY WARRANTY; without even the implied warranty of
  19  *      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20  *      GNU General Public License for more details.
  21  *
  22  *      You should have received a copy of the GNU General Public License
  23  *      along with this program; if not, write to the Free Software
  24  *      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  25  */
  26
  27 /*****************************************************************************/
  28
  29 #include <linux/module.h>
  30 #include <linux/slab.h>
  31 #include <linux/interrupt.h>
  32 #include <linux/tty.h>
  33 #include <linux/tty_flip.h>
  34 #include <linux/serial.h>
  35 #include <linux/cd1400.h>
  36 #include <linux/sc26198.h>
  37 #include <linux/comstats.h>
  38 #include <linux/stallion.h>
  39 #include <linux/ioport.h>
  40 #include <linux/init.h>
  41 #include <linux/smp_lock.h>
  42 #include <linux/device.h>
  43 #include <linux/delay.h>
  44 #include <linux/ctype.h>
  45
  46 #include <asm/io.h>
  47 #include <asm/uaccess.h>
  48
  49 #include <linux/pci.h>
  50
  51 /*****************************************************************************/
  52
  53 /*
  54  *      Define different board types. Use the standard Stallion "assigned"
  55  *      board numbers. Boards supported in this driver are abbreviated as
  56  *      EIO = EasyIO and ECH = EasyConnection 8/32.
  57  */
  58 #define BRD_EASYIO      20
  59 #define BRD_ECH         21
  60 #define BRD_ECHMC       22
  61 #define BRD_ECHPCI      26
  62 #define BRD_ECH64PCI    27
  63 #define BRD_EASYIOPCI   28
  64
  65 struct stlconf {
  66         unsigned int    brdtype;
  67         int             ioaddr1;
  68         int             ioaddr2;
  69         unsigned long   memaddr;
  70         int             irq;
  71         int             irqtype;
  72 };
  73
  74 static unsigned int stl_nrbrds;
  75
  76 /*****************************************************************************/
  77
  78 /*
  79  *      Define some important driver characteristics. Device major numbers
  80  *      allocated as per Linux Device Registry.
  81  */
  82 #ifndef STL_SIOMEMMAJOR
  83 #define STL_SIOMEMMAJOR         28
  84 #endif
  85 #ifndef STL_SERIALMAJOR
  86 #define STL_SERIALMAJOR         24
  87 #endif
  88 #ifndef STL_CALLOUTMAJOR
  89 #define STL_CALLOUTMAJOR        25
  90 #endif
  91
  92 /*
  93  *      Set the TX buffer size. Bigger is better, but we don't want
  94  *      to chew too much memory with buffers!
  95  */
  96 #define STL_TXBUFLOW            512
  97 #define STL_TXBUFSIZE           4096
  98
  99 /*****************************************************************************/
 100
 101 /*
 102  *      Define our local driver identity first. Set up stuff to deal with
 103  *      all the local structures required by a serial tty driver.
 104  */
 105 static char     *stl_drvtitle = "Stallion Multiport Serial Driver";
 106 static char     *stl_drvname = "stallion";
 107 static char     *stl_drvversion = "5.6.0";
 108
 109 static struct tty_driver        *stl_serial;
 110
 111 /*
 112  *      Define a local default termios struct. All ports will be created
 113  *      with this termios initially. Basically all it defines is a raw port
 114  *      at 9600, 8 data bits, 1 stop bit.
 115  */
 116 static struct ktermios          stl_deftermios = {
 117         .c_cflag        = (B9600 | CS8 | CREAD | HUPCL | CLOCAL),
 118         .c_cc           = INIT_C_CC,
 119         .c_ispeed       = 9600,
 120         .c_ospeed       = 9600,
 121 };
 122
 123 /*
 124  *      Define global place to put buffer overflow characters.
 125  */
 126 static char             stl_unwanted[SC26198_RXFIFOSIZE];
 127
 128 /*****************************************************************************/
 129
 130 static DEFINE_MUTEX(stl_brdslock);
 131 static struct stlbrd            *stl_brds[STL_MAXBRDS];
 132
 133 /*
 134  *      Per board state flags. Used with the state field of the board struct.
 135  *      Not really much here!
 136  */
 137 #define BRD_FOUND       0x1
 138 #define STL_PROBED      0x2
 139
 140
 141 /*
 142  *      Define the port structure istate flags. These set of flags are
 143  *      modified at interrupt time - so setting and reseting them needs
 144  *      to be atomic. Use the bit clear/setting routines for this.
 145  */
 146 #define ASYI_TXBUSY     1
 147 #define ASYI_TXLOW      2
 148 #define ASYI_DCDCHANGE  3
 149 #define ASYI_TXFLOWED   4
 150
 151 /*
 152  *      Define an array of board names as printable strings. Handy for
 153  *      referencing boards when printing trace and stuff.
 154  */
 155 static char     *stl_brdnames[] = {
 156         NULL,
 157         NULL,
 158         NULL,
 159         NULL,
 160         NULL,
 161         NULL,
 162         NULL,
 163         NULL,
 164         NULL,
 165         NULL,
 166         NULL,
 167         NULL,
 168         NULL,
 169         NULL,
 170         NULL,
 171         NULL,
 172         NULL,
 173         NULL,
 174         NULL,
 175         NULL,
 176         "EasyIO",
 177         "EC8/32-AT",
 178         "EC8/32-MC",
 179         NULL,
 180         NULL,
 181         NULL,
 182         "EC8/32-PCI",
 183         "EC8/64-PCI",
 184         "EasyIO-PCI",
 185 };
 186
 187 /*****************************************************************************/
 188
 189 /*
 190  *      Define some string labels for arguments passed from the module
 191  *      load line. These allow for easy board definitions, and easy
 192  *      modification of the io, memory and irq resoucres.
 193  */
 194 static unsigned int stl_nargs;
 195 static char     *board0[4];
 196 static char     *board1[4];
 197 static char     *board2[4];
 198 static char     *board3[4];
 199
 200 static char     **stl_brdsp[] = {
 201         (char **) &board0,
 202         (char **) &board1,
 203         (char **) &board2,
 204         (char **) &board3
 205 };
 206
 207 /*
 208  *      Define a set of common board names, and types. This is used to
 209  *      parse any module arguments.
 210  */
 211
 212 static struct {
 213         char    *name;
 214         int     type;
 215 } stl_brdstr[] = {
 216         { "easyio", BRD_EASYIO },
 217         { "eio", BRD_EASYIO },
 218         { "20", BRD_EASYIO },
 219         { "ec8/32", BRD_ECH },
 220         { "ec8/32-at", BRD_ECH },
 221         { "ec8/32-isa", BRD_ECH },
 222         { "ech", BRD_ECH },
 223         { "echat", BRD_ECH },
 224         { "21", BRD_ECH },
 225         { "ec8/32-mc", BRD_ECHMC },
 226         { "ec8/32-mca", BRD_ECHMC },
 227         { "echmc", BRD_ECHMC },
 228         { "echmca", BRD_ECHMC },
 229         { "22", BRD_ECHMC },
 230         { "ec8/32-pc", BRD_ECHPCI },
 231         { "ec8/32-pci", BRD_ECHPCI },
 232         { "26", BRD_ECHPCI },
 233         { "ec8/64-pc", BRD_ECH64PCI },
 234         { "ec8/64-pci", BRD_ECH64PCI },
 235         { "ech-pci", BRD_ECH64PCI },
 236         { "echpci", BRD_ECH64PCI },
 237         { "echpc", BRD_ECH64PCI },
 238         { "27", BRD_ECH64PCI },
 239         { "easyio-pc", BRD_EASYIOPCI },
 240         { "easyio-pci", BRD_EASYIOPCI },
 241         { "eio-pci", BRD_EASYIOPCI },
 242         { "eiopci", BRD_EASYIOPCI },
 243         { "28", BRD_EASYIOPCI },
 244 };
 245
 246 /*
 247  *      Define the module agruments.
 248  */
 249
 250 module_param_array(board0, charp, &stl_nargs, 0);
 251 MODULE_PARM_DESC(board0, "Board 0 config -> name[,ioaddr[,ioaddr2][,irq]]");
 252 module_param_array(board1, charp, &stl_nargs, 0);
 253 MODULE_PARM_DESC(board1, "Board 1 config -> name[,ioaddr[,ioaddr2][,irq]]");
 254 module_param_array(board2, charp, &stl_nargs, 0);
 255 MODULE_PARM_DESC(board2, "Board 2 config -> name[,ioaddr[,ioaddr2][,irq]]");
 256 module_param_array(board3, charp, &stl_nargs, 0);
 257 MODULE_PARM_DESC(board3, "Board 3 config -> name[,ioaddr[,ioaddr2][,irq]]");
 258
 259 /*****************************************************************************/
 260
 261 /*
 262  *      Hardware ID bits for the EasyIO and ECH boards. These defines apply
 263  *      to the directly accessible io ports of these boards (not the uarts -
 264  *      they are in cd1400.h and sc26198.h).
 265  */
 266 #define EIO_8PORTRS     0x04
 267 #define EIO_4PORTRS     0x05
 268 #define EIO_8PORTDI     0x00
 269 #define EIO_8PORTM      0x06
 270 #define EIO_MK3         0x03
 271 #define EIO_IDBITMASK   0x07
 272
 273 #define EIO_BRDMASK     0xf0
 274 #define ID_BRD4         0x10
 275 #define ID_BRD8         0x20
 276 #define ID_BRD16        0x30
 277
 278 #define EIO_INTRPEND    0x08
 279 #define EIO_INTEDGE     0x00
 280 #define EIO_INTLEVEL    0x08
 281 #define EIO_0WS         0x10
 282
 283 #define ECH_ID          0xa0
 284 #define ECH_IDBITMASK   0xe0
 285 #define ECH_BRDENABLE   0x08
 286 #define ECH_BRDDISABLE  0x00
 287 #define ECH_INTENABLE   0x01
 288 #define ECH_INTDISABLE  0x00
 289 #define ECH_INTLEVEL    0x02
 290 #define ECH_INTEDGE     0x00
 291 #define ECH_INTRPEND    0x01
 292 #define ECH_BRDRESET    0x01
 293
 294 #define ECHMC_INTENABLE 0x01
 295 #define ECHMC_BRDRESET  0x02
 296
 297 #define ECH_PNLSTATUS   2
 298 #define ECH_PNL16PORT   0x20
 299 #define ECH_PNLIDMASK   0x07
 300 #define ECH_PNLXPID     0x40
 301 #define ECH_PNLINTRPEND 0x80
 302
 303 #define ECH_ADDR2MASK   0x1e0
 304
 305 /*
 306  *      Define the vector mapping bits for the programmable interrupt board
 307  *      hardware. These bits encode the interrupt for the board to use - it
 308  *      is software selectable (except the EIO-8M).
 309  */
 310 static unsigned char    stl_vecmap[] = {
 311         0xff, 0xff, 0xff, 0x04, 0x06, 0x05, 0xff, 0x07,
 312         0xff, 0xff, 0x00, 0x02, 0x01, 0xff, 0xff, 0x03
 313 };
 314
 315 /*
 316  *      Lock ordering is that you may not take stallion_lock holding
 317  *      brd_lock.
 318  */
 319
 320 static spinlock_t brd_lock;             /* Guard the board mapping */
 321 static spinlock_t stallion_lock;        /* Guard the tty driver */
 322
 323 /*
 324  *      Set up enable and disable macros for the ECH boards. They require
 325  *      the secondary io address space to be activated and deactivated.
 326  *      This way all ECH boards can share their secondary io region.
 327  *      If this is an ECH-PCI board then also need to set the page pointer
 328  *      to point to the correct page.
 329  */
 330 #define BRDENABLE(brdnr,pagenr)                                         \
 331         if (stl_brds[(brdnr)]->brdtype == BRD_ECH)                      \
 332                 outb((stl_brds[(brdnr)]->ioctrlval | ECH_BRDENABLE),    \
 333                         stl_brds[(brdnr)]->ioctrl);                     \
 334         else if (stl_brds[(brdnr)]->brdtype == BRD_ECHPCI)              \
 335                 outb((pagenr), stl_brds[(brdnr)]->ioctrl);
 336
 337 #define BRDDISABLE(brdnr)                                               \
 338         if (stl_brds[(brdnr)]->brdtype == BRD_ECH)                      \
 339                 outb((stl_brds[(brdnr)]->ioctrlval | ECH_BRDDISABLE),   \
 340                         stl_brds[(brdnr)]->ioctrl);
 341
 342 #define STL_CD1400MAXBAUD       230400
 343 #define STL_SC26198MAXBAUD      460800
 344
 345 #define STL_BAUDBASE            115200
 346 #define STL_CLOSEDELAY          (5 * HZ / 10)
 347
 348 /*****************************************************************************/
 349
 350 /*
 351  *      Define the Stallion PCI vendor and device IDs.
 352  */
 353 #ifndef PCI_VENDOR_ID_STALLION
 354 #define PCI_VENDOR_ID_STALLION          0x124d
 355 #endif
 356 #ifndef PCI_DEVICE_ID_ECHPCI832
 357 #define PCI_DEVICE_ID_ECHPCI832         0x0000
 358 #endif
 359 #ifndef PCI_DEVICE_ID_ECHPCI864
 360 #define PCI_DEVICE_ID_ECHPCI864         0x0002
 361 #endif
 362 #ifndef PCI_DEVICE_ID_EIOPCI
 363 #define PCI_DEVICE_ID_EIOPCI            0x0003
 364 #endif
 365
 366 /*
 367  *      Define structure to hold all Stallion PCI boards.
 368  */
 369
 370 static struct pci_device_id stl_pcibrds[] = {
 371         { PCI_DEVICE(PCI_VENDOR_ID_STALLION, PCI_DEVICE_ID_ECHPCI864),
 372                 .driver_data = BRD_ECH64PCI },
 373         { PCI_DEVICE(PCI_VENDOR_ID_STALLION, PCI_DEVICE_ID_EIOPCI),
 374                 .driver_data = BRD_EASYIOPCI },
 375         { PCI_DEVICE(PCI_VENDOR_ID_STALLION, PCI_DEVICE_ID_ECHPCI832),
 376                 .driver_data = BRD_ECHPCI },
 377         { PCI_DEVICE(PCI_VENDOR_ID_NS, PCI_DEVICE_ID_NS_87410),
 378                 .driver_data = BRD_ECHPCI },
 379         { }
 380 };
 381 MODULE_DEVICE_TABLE(pci, stl_pcibrds);
 382
 383 /*****************************************************************************/
 384
 385 /*
 386  *      Define macros to extract a brd/port number from a minor number.
 387  */
 388 #define MINOR2BRD(min)          (((min) & 0xc0) >> 6)
 389 #define MINOR2PORT(min)         ((min) & 0x3f)
 390
 391 /*
 392  *      Define a baud rate table that converts termios baud rate selector
 393  *      into the actual baud rate value. All baud rate calculations are
 394  *      based on the actual baud rate required.
 395  */
 396 static unsigned int     stl_baudrates[] = {
 397         0, 50, 75, 110, 134, 150, 200, 300, 600, 1200, 1800, 2400, 4800,
 398         9600, 19200, 38400, 57600, 115200, 230400, 460800, 921600
 399 };
 400
 401 /*****************************************************************************/
 402
 403 /*
 404  *      Declare all those functions in this driver!
 405  */
 406
 407 static int      stl_memioctl(struct inode *ip, struct file *fp, unsigned int cmd, unsigned long arg);
 408 static int      stl_brdinit(struct stlbrd *brdp);
 409 static int      stl_getportstats(struct stlport *portp, comstats_t __user *cp);
 410 static int      stl_clrportstats(struct stlport *portp, comstats_t __user *cp);
 411 static int      stl_waitcarrier(struct stlport *portp, struct file *filp);
 412
 413 /*
 414  *      CD1400 uart specific handling functions.
 415  */
 416 static void     stl_cd1400setreg(struct stlport *portp, int regnr, int value);
 417 static int      stl_cd1400getreg(struct stlport *portp, int regnr);
 418 static int      stl_cd1400updatereg(struct stlport *portp, int regnr, int value);
 419 static int      stl_cd1400panelinit(struct stlbrd *brdp, struct stlpanel *panelp);
 420 static void     stl_cd1400portinit(struct stlbrd *brdp, struct stlpanel *panelp, struct stlport *portp);
 421 static void     stl_cd1400setport(struct stlport *portp, struct ktermios *tiosp);
 422 static int      stl_cd1400getsignals(struct stlport *portp);
 423 static void     stl_cd1400setsignals(struct stlport *portp, int dtr, int rts);
 424 static void     stl_cd1400ccrwait(struct stlport *portp);
 425 static void     stl_cd1400enablerxtx(struct stlport *portp, int rx, int tx);
 426 static void     stl_cd1400startrxtx(struct stlport *portp, int rx, int tx);
 427 static void     stl_cd1400disableintrs(struct stlport *portp);
 428 static void     stl_cd1400sendbreak(struct stlport *portp, int len);
 429 static void     stl_cd1400flowctrl(struct stlport *portp, int state);
 430 static void     stl_cd1400sendflow(struct stlport *portp, int state);
 431 static void     stl_cd1400flush(struct stlport *portp);
 432 static int      stl_cd1400datastate(struct stlport *portp);
 433 static void     stl_cd1400eiointr(struct stlpanel *panelp, unsigned int iobase);
 434 static void     stl_cd1400echintr(struct stlpanel *panelp, unsigned int iobase);
 435 static void     stl_cd1400txisr(struct stlpanel *panelp, int ioaddr);
 436 static void     stl_cd1400rxisr(struct stlpanel *panelp, int ioaddr);
 437 static void     stl_cd1400mdmisr(struct stlpanel *panelp, int ioaddr);
 438
 439 static inline int       stl_cd1400breakisr(struct stlport *portp, int ioaddr);
 440
 441 /*
 442  *      SC26198 uart specific handling functions.
 443  */
 444 static void     stl_sc26198setreg(struct stlport *portp, int regnr, int value);
 445 static int      stl_sc26198getreg(struct stlport *portp, int regnr);
 446 static int      stl_sc26198updatereg(struct stlport *portp, int regnr, int value);
 447 static int      stl_sc26198getglobreg(struct stlport *portp, int regnr);
 448 static int      stl_sc26198panelinit(struct stlbrd *brdp, struct stlpanel *panelp);
 449 static void     stl_sc26198portinit(struct stlbrd *brdp, struct stlpanel *panelp, struct stlport *portp);
 450 static void     stl_sc26198setport(struct stlport *portp, struct ktermios *tiosp);
 451 static int      stl_sc26198getsignals(struct stlport *portp);
 452 static void     stl_sc26198setsignals(struct stlport *portp, int dtr, int rts);
 453 static void     stl_sc26198enablerxtx(struct stlport *portp, int rx, int tx);
 454 static void     stl_sc26198startrxtx(struct stlport *portp, int rx, int tx);
 455 static void     stl_sc26198disableintrs(struct stlport *portp);
 456 static void     stl_sc26198sendbreak(struct stlport *portp, int len);
 457 static void     stl_sc26198flowctrl(struct stlport *portp, int state);
 458 static void     stl_sc26198sendflow(struct stlport *portp, int state);
 459 static void     stl_sc26198flush(struct stlport *portp);
 460 static int      stl_sc26198datastate(struct stlport *portp);
 461 static void     stl_sc26198wait(struct stlport *portp);
 462 static void     stl_sc26198txunflow(struct stlport *portp, struct tty_struct *tty);
 463 static void     stl_sc26198intr(struct stlpanel *panelp, unsigned int iobase);
 464 static void     stl_sc26198txisr(struct stlport *port);
 465 static void     stl_sc26198rxisr(struct stlport *port, unsigned int iack);
 466 static void     stl_sc26198rxbadch(struct stlport *portp, unsigned char status, char ch);
 467 static void     stl_sc26198rxbadchars(struct stlport *portp);
 468 static void     stl_sc26198otherisr(struct stlport *port, unsigned int iack);
 469
 470 /*****************************************************************************/
 471
 472 /*
 473  *      Generic UART support structure.
 474  */
 475 typedef struct uart {
 476         int     (*panelinit)(struct stlbrd *brdp, struct stlpanel *panelp);
 477         void    (*portinit)(struct stlbrd *brdp, struct stlpanel *panelp, struct stlport *portp);
 478         void    (*setport)(struct stlport *portp, struct ktermios *tiosp);
 479         int     (*getsignals)(struct stlport *portp);
 480         void    (*setsignals)(struct stlport *portp, int dtr, int rts);
 481         void    (*enablerxtx)(struct stlport *portp, int rx, int tx);
 482         void    (*startrxtx)(struct stlport *portp, int rx, int tx);
 483         void    (*disableintrs)(struct stlport *portp);
 484         void    (*sendbreak)(struct stlport *portp, int len);
 485         void    (*flowctrl)(struct stlport *portp, int state);
 486         void    (*sendflow)(struct stlport *portp, int state);
 487         void    (*flush)(struct stlport *portp);
 488         int     (*datastate)(struct stlport *portp);
 489         void    (*intr)(struct stlpanel *panelp, unsigned int iobase);
 490 } uart_t;
 491
 492 /*
 493  *      Define some macros to make calling these functions nice and clean.
 494  */
 495 #define stl_panelinit           (* ((uart_t *) panelp->uartp)->panelinit)
 496 #define stl_portinit            (* ((uart_t *) portp->uartp)->portinit)
 497 #define stl_setport             (* ((uart_t *) portp->uartp)->setport)
 498 #define stl_getsignals          (* ((uart_t *) portp->uartp)->getsignals)
 499 #define stl_setsignals          (* ((uart_t *) portp->uartp)->setsignals)
 500 #define stl_enablerxtx          (* ((uart_t *) portp->uartp)->enablerxtx)
 501 #define stl_startrxtx           (* ((uart_t *) portp->uartp)->startrxtx)
 502 #define stl_disableintrs        (* ((uart_t *) portp->uartp)->disableintrs)
 503 #define stl_sendbreak           (* ((uart_t *) portp->uartp)->sendbreak)
 504 #define stl_flowctrl            (* ((uart_t *) portp->uartp)->flowctrl)
 505 #define stl_sendflow            (* ((uart_t *) portp->uartp)->sendflow)
 506 #define stl_flush               (* ((uart_t *) portp->uartp)->flush)
 507 #define stl_datastate           (* ((uart_t *) portp->uartp)->datastate)
 508
 509 /*****************************************************************************/
 510
 511 /*
 512  *      CD1400 UART specific data initialization.
 513  */
 514 static uart_t stl_cd1400uart = {
 515         stl_cd1400panelinit,
 516         stl_cd1400portinit,
 517         stl_cd1400setport,
 518         stl_cd1400getsignals,
 519         stl_cd1400setsignals,
 520         stl_cd1400enablerxtx,
 521         stl_cd1400startrxtx,
 522         stl_cd1400disableintrs,
 523         stl_cd1400sendbreak,
 524         stl_cd1400flowctrl,
 525         stl_cd1400sendflow,
 526         stl_cd1400flush,
 527         stl_cd1400datastate,
 528         stl_cd1400eiointr
 529 };
 530
 531 /*
 532  *      Define the offsets within the register bank of a cd1400 based panel.
 533  *      These io address offsets are common to the EasyIO board as well.
 534  */
 535 #define EREG_ADDR       0
 536 #define EREG_DATA       4
 537 #define EREG_RXACK      5
 538 #define EREG_TXACK      6
 539 #define EREG_MDACK      7
 540
 541 #define EREG_BANKSIZE   8
 542
 543 #define CD1400_CLK      25000000
 544 #define CD1400_CLK8M    20000000
 545
 546 /*
 547  *      Define the cd1400 baud rate clocks. These are used when calculating
 548  *      what clock and divisor to use for the required baud rate. Also
 549  *      define the maximum baud rate allowed, and the default base baud.
 550  */
 551 static int      stl_cd1400clkdivs[] = {
 552         CD1400_CLK0, CD1400_CLK1, CD1400_CLK2, CD1400_CLK3, CD1400_CLK4
 553 };
 554
 555 /*****************************************************************************/
 556
 557 /*
 558  *      SC26198 UART specific data initization.
 559  */
 560 static uart_t stl_sc26198uart = {
 561         stl_sc26198panelinit,
 562         stl_sc26198portinit,
 563         stl_sc26198setport,
 564         stl_sc26198getsignals,
 565         stl_sc26198setsignals,
 566         stl_sc26198enablerxtx,
 567         stl_sc26198startrxtx,
 568         stl_sc26198disableintrs,
 569         stl_sc26198sendbreak,
 570         stl_sc26198flowctrl,
 571         stl_sc26198sendflow,
 572         stl_sc26198flush,
 573         stl_sc26198datastate,
 574         stl_sc26198intr
 575 };
 576
 577 /*
 578  *      Define the offsets within the register bank of a sc26198 based panel.
 579  */
 580 #define XP_DATA         0
 581 #define XP_ADDR         1
 582 #define XP_MODID        2
 583 #define XP_STATUS       2
 584 #define XP_IACK         3
 585
 586 #define XP_BANKSIZE     4
 587
 588 /*
 589  *      Define the sc26198 baud rate table. Offsets within the table
 590  *      represent the actual baud rate selector of sc26198 registers.
 591  */
 592 static unsigned int     sc26198_baudtable[] = {
 593         50, 75, 150, 200, 300, 450, 600, 900, 1200, 1800, 2400, 3600,
 594         4800, 7200, 9600, 14400, 19200, 28800, 38400, 57600, 115200,
 595         230400, 460800, 921600
 596 };
 597
 598 #define SC26198_NRBAUDS         ARRAY_SIZE(sc26198_baudtable)
 599
 600 /*****************************************************************************/
 601
 602 /*
 603  *      Define the driver info for a user level control device. Used mainly
 604  *      to get at port stats - only not using the port device itself.
 605  */
 606 static const struct file_operations     stl_fsiomem = {
 607         .owner          = THIS_MODULE,
 608         .ioctl          = stl_memioctl,
 609 };
 610
 611 static struct class *stallion_class;
 612
 613 /*
 614  *      Check for any arguments passed in on the module load command line.
 615  */
 616
 617 /*****************************************************************************/
 618
 619 /*
 620  *      Parse the supplied argument string, into the board conf struct.
 621  */
 622
 623 static int __init stl_parsebrd(struct stlconf *confp, char **argp)
 624 {
 625         char    *sp;
 626         unsigned int i;
 627
 628         pr_debug("stl_parsebrd(confp=%p,argp=%p)\n", confp, argp);
 629
 630         if ((argp[0] == NULL) || (*argp[0] == 0))
 631                 return 0;
 632
 633         for (sp = argp[0], i = 0; (*sp != 0) && (i < 25); sp++, i++)
 634                 *sp = tolower(*sp);
 635
 636         for (i = 0; i < ARRAY_SIZE(stl_brdstr); i++)
 637                 if (strcmp(stl_brdstr[i].name, argp[0]) == 0)
 638                         break;
 639
 640         if (i == ARRAY_SIZE(stl_brdstr)) {
 641                 printk("STALLION: unknown board name, %s?\n", argp[0]);
 642                 return 0;
 643         }
 644
 645         confp->brdtype = stl_brdstr[i].type;
 646
 647         i = 1;
 648         if ((argp[i] != NULL) && (*argp[i] != 0))
 649                 confp->ioaddr1 = simple_strtoul(argp[i], NULL, 0);
 650         i++;
 651         if (confp->brdtype == BRD_ECH) {
 652                 if ((argp[i] != NULL) && (*argp[i] != 0))
 653                         confp->ioaddr2 = simple_strtoul(argp[i], NULL, 0);
 654                 i++;
 655         }
 656         if ((argp[i] != NULL) && (*argp[i] != 0))
 657                 confp->irq = simple_strtoul(argp[i], NULL, 0);
 658         return 1;
 659 }
 660
 661 /*****************************************************************************/
 662
 663 /*
 664  *      Allocate a new board structure. Fill out the basic info in it.
 665  */
 666
 667 static struct stlbrd *stl_allocbrd(void)
 668 {
 669         struct stlbrd   *brdp;
 670
 671         brdp = kzalloc(sizeof(struct stlbrd), GFP_KERNEL);
 672         if (!brdp) {
 673                 printk("STALLION: failed to allocate memory (size=%Zd)\n",
 674                         sizeof(struct stlbrd));
 675                 return NULL;
 676         }
 677
 678         brdp->magic = STL_BOARDMAGIC;
 679         return brdp;
 680 }
 681
 682 /*****************************************************************************/
 683
 684 static int stl_open(struct tty_struct *tty, struct file *filp)
 685 {
 686         struct stlport  *portp;
 687         struct stlbrd   *brdp;
 688         unsigned int    minordev, brdnr, panelnr;
 689         int             portnr, rc;
 690
 691         pr_debug("stl_open(tty=%p,filp=%p): device=%s\n", tty, filp, tty->name);
 692
 693         minordev = tty->index;
 694         brdnr = MINOR2BRD(minordev);
 695         if (brdnr >= stl_nrbrds)
 696                 return -ENODEV;
 697         brdp = stl_brds[brdnr];
 698         if (brdp == NULL)
 699                 return -ENODEV;
 700         minordev = MINOR2PORT(minordev);
 701         for (portnr = -1, panelnr = 0; panelnr < STL_MAXPANELS; panelnr++) {
 702                 if (brdp->panels[panelnr] == NULL)
 703                         break;
 704                 if (minordev < brdp->panels[panelnr]->nrports) {
 705                         portnr = minordev;
 706                         break;
 707                 }
 708                 minordev -= brdp->panels[panelnr]->nrports;
 709         }
 710         if (portnr < 0)
 711                 return -ENODEV;
 712
 713         portp = brdp->panels[panelnr]->ports[portnr];
 714         if (portp == NULL)
 715                 return -ENODEV;
 716
 717 /*
 718  *      On the first open of the device setup the port hardware, and
 719  *      initialize the per port data structure.
 720  */
 721         portp->tty = tty;
 722         tty->driver_data = portp;
 723         portp->refcount++;
 724
 725         if ((portp->flags & ASYNC_INITIALIZED) == 0) {
 726                 if (!portp->tx.buf) {
 727                         portp->tx.buf = kmalloc(STL_TXBUFSIZE, GFP_KERNEL);
 728                         if (!portp->tx.buf)
 729                                 return -ENOMEM;
 730                         portp->tx.head = portp->tx.buf;
 731                         portp->tx.tail = portp->tx.buf;
 732                 }
 733                 stl_setport(portp, tty->termios);
 734                 portp->sigs = stl_getsignals(portp);
 735                 stl_setsignals(portp, 1, 1);
 736                 stl_enablerxtx(portp, 1, 1);
 737                 stl_startrxtx(portp, 1, 0);
 738                 clear_bit(TTY_IO_ERROR, &tty->flags);
 739                 portp->flags |= ASYNC_INITIALIZED;
 740         }
 741
 742 /*
 743  *      Check if this port is in the middle of closing. If so then wait
 744  *      until it is closed then return error status, based on flag settings.
 745  *      The sleep here does not need interrupt protection since the wakeup
 746  *      for it is done with the same context.
 747  */
 748         if (portp->flags & ASYNC_CLOSING) {
 749                 interruptible_sleep_on(&portp->close_wait);
 750                 if (portp->flags & ASYNC_HUP_NOTIFY)
 751                         return -EAGAIN;
 752                 return -ERESTARTSYS;
 753         }
 754
 755 /*
 756  *      Based on type of open being done check if it can overlap with any
 757  *      previous opens still in effect. If we are a normal serial device
 758  *      then also we might have to wait for carrier.
 759  */
 760         if (!(filp->f_flags & O_NONBLOCK))
 761                 if ((rc = stl_waitcarrier(portp, filp)) != 0)
 762                         return rc;
 763
 764         portp->flags |= ASYNC_NORMAL_ACTIVE;
 765
 766         return 0;
 767 }
 768
 769 /*****************************************************************************/
 770
 771 /*
 772  *      Possibly need to wait for carrier (DCD signal) to come high. Say
 773  *      maybe because if we are clocal then we don't need to wait...
 774  */
 775
 776 static int stl_waitcarrier(struct stlport *portp, struct file *filp)
 777 {
 778         unsigned long   flags;
 779         int             rc, doclocal;
 780
 781         pr_debug("stl_waitcarrier(portp=%p,filp=%p)\n", portp, filp);
 782
 783         rc = 0;
 784         doclocal = 0;
 785
 786         spin_lock_irqsave(&stallion_lock, flags);
 787
 788         if (portp->tty->termios->c_cflag & CLOCAL)
 789                 doclocal++;
 790
 791         portp->openwaitcnt++;
 792         if (! tty_hung_up_p(filp))
 793                 portp->refcount--;
 794
 795         for (;;) {
 796                 /* Takes brd_lock internally */
 797                 stl_setsignals(portp, 1, 1);
 798                 if (tty_hung_up_p(filp) ||
 799                     ((portp->flags & ASYNC_INITIALIZED) == 0)) {
 800                         if (portp->flags & ASYNC_HUP_NOTIFY)
 801                                 rc = -EBUSY;
 802                         else
 803                                 rc = -ERESTARTSYS;
 804                         break;
 805                 }
 806                 if (((portp->flags & ASYNC_CLOSING) == 0) &&
 807                     (doclocal || (portp->sigs & TIOCM_CD)))
 808                         break;
 809                 if (signal_pending(current)) {
 810                         rc = -ERESTARTSYS;
 811                         break;
 812                 }
 813                 /* FIXME */
 814                 interruptible_sleep_on(&portp->open_wait);
 815         }
 816
 817         if (! tty_hung_up_p(filp))
 818                 portp->refcount++;
 819         portp->openwaitcnt--;
 820         spin_unlock_irqrestore(&stallion_lock, flags);
 821
 822         return rc;
 823 }
 824
 825 /*****************************************************************************/
 826
 827 static void stl_flushbuffer(struct tty_struct *tty)
 828 {
 829         struct stlport  *portp;
 830
 831         pr_debug("stl_flushbuffer(tty=%p)\n", tty);
 832
 833         if (tty == NULL)
 834                 return;
 835         portp = tty->driver_data;
 836         if (portp == NULL)
 837                 return;
 838
 839         stl_flush(portp);
 840         tty_wakeup(tty);
 841 }
 842
 843 /*****************************************************************************/
 844
 845 static void stl_waituntilsent(struct tty_struct *tty, int timeout)
 846 {
 847         struct stlport  *portp;
 848         unsigned long   tend;
 849
 850         pr_debug("stl_waituntilsent(tty=%p,timeout=%d)\n", tty, timeout);
 851
 852         if (tty == NULL)
 853                 return;
 854         portp = tty->driver_data;
 855         if (portp == NULL)
 856                 return;
 857
 858         if (timeout == 0)
 859                 timeout = HZ;
 860         tend = jiffies + timeout;
 861
 862         while (stl_datastate(portp)) {
 863                 if (signal_pending(current))
 864                         break;
 865                 msleep_interruptible(20);
 866                 if (time_after_eq(jiffies, tend))
 867                         break;
 868         }
 869 }
 870
 871 /*****************************************************************************/
 872
 873 static void stl_close(struct tty_struct *tty, struct file *filp)
 874 {
 875         struct stlport  *portp;
 876         unsigned long   flags;
 877
 878         pr_debug("stl_close(tty=%p,filp=%p)\n", tty, filp);
 879
 880         portp = tty->driver_data;
 881         if (portp == NULL)
 882                 return;
 883
 884         spin_lock_irqsave(&stallion_lock, flags);
 885         if (tty_hung_up_p(filp)) {
 886                 spin_unlock_irqrestore(&stallion_lock, flags);
 887                 return;
 888         }
 889         if ((tty->count == 1) && (portp->refcount != 1))
 890                 portp->refcount = 1;
 891         if (portp->refcount-- > 1) {
 892                 spin_unlock_irqrestore(&stallion_lock, flags);
 893                 return;
 894         }
 895
 896         portp->refcount = 0;
 897         portp->flags |= ASYNC_CLOSING;
 898
 899 /*
 900  *      May want to wait for any data to drain before closing. The BUSY
 901  *      flag keeps track of whether we are still sending or not - it is
 902  *      very accurate for the cd1400, not quite so for the sc26198.
 903  *      (The sc26198 has no "end-of-data" interrupt only empty FIFO)
 904  */
 905         tty->closing = 1;
 906
 907         spin_unlock_irqrestore(&stallion_lock, flags);
 908
 909         if (portp->closing_wait != ASYNC_CLOSING_WAIT_NONE)
 910                 tty_wait_until_sent(tty, portp->closing_wait);
 911         stl_waituntilsent(tty, (HZ / 2));
 912
 913
 914         spin_lock_irqsave(&stallion_lock, flags);
 915         portp->flags &= ~ASYNC_INITIALIZED;
 916         spin_unlock_irqrestore(&stallion_lock, flags);
 917
 918         stl_disableintrs(portp);
 919         if (tty->termios->c_cflag & HUPCL)
 920                 stl_setsignals(portp, 0, 0);
 921         stl_enablerxtx(portp, 0, 0);
 922         stl_flushbuffer(tty);
 923         portp->istate = 0;
 924         if (portp->tx.buf != NULL) {
 925                 kfree(portp->tx.buf);
 926                 portp->tx.buf = NULL;
 927                 portp->tx.head = NULL;
 928                 portp->tx.tail = NULL;
 929         }
 930         set_bit(TTY_IO_ERROR, &tty->flags);
 931         tty_ldisc_flush(tty);
 932
 933         tty->closing = 0;
 934         portp->tty = NULL;
 935
 936         if (portp->openwaitcnt) {
 937                 if (portp->close_delay)
 938                         msleep_interruptible(jiffies_to_msecs(portp->close_delay));
 939                 wake_up_interruptible(&portp->open_wait);
 940         }
 941
 942         portp->flags &= ~(ASYNC_NORMAL_ACTIVE|ASYNC_CLOSING);
 943         wake_up_interruptible(&portp->close_wait);
 944 }
 945
 946 /*****************************************************************************/
 947
 948 /*
 949  *      Write routine. Take data and stuff it in to the TX ring queue.
 950  *      If transmit interrupts are not running then start them.
 951  */
 952
 953 static int stl_write(struct tty_struct *tty, const unsigned char *buf, int count)
 954 {
 955         struct stlport  *portp;
 956         unsigned int    len, stlen;
 957         unsigned char   *chbuf;
 958         char            *head, *tail;
 959
 960         pr_debug("stl_write(tty=%p,buf=%p,count=%d)\n", tty, buf, count);
 961
 962         portp = tty->driver_data;
 963         if (portp == NULL)
 964                 return 0;
 965         if (portp->tx.buf == NULL)
 966                 return 0;
 967
 968 /*
 969  *      If copying direct from user space we must cater for page faults,
 970  *      causing us to "sleep" here for a while. To handle this copy in all
 971  *      the data we need now, into a local buffer. Then when we got it all
 972  *      copy it into the TX buffer.
 973  */
 974         chbuf = (unsigned char *) buf;
 975
 976         head = portp->tx.head;
 977         tail = portp->tx.tail;
 978         if (head >= tail) {
 979                 len = STL_TXBUFSIZE - (head - tail) - 1;
 980                 stlen = STL_TXBUFSIZE - (head - portp->tx.buf);
 981         } else {
 982                 len = tail - head - 1;
 983                 stlen = len;
 984         }
 985
 986         len = min(len, (unsigned int)count);
 987         count = 0;
 988         while (len > 0) {
 989                 stlen = min(len, stlen);
 990                 memcpy(head, chbuf, stlen);
 991                 len -= stlen;
 992                 chbuf += stlen;
 993                 count += stlen;
 994                 head += stlen;
 995                 if (head >= (portp->tx.buf + STL_TXBUFSIZE)) {
 996                         head = portp->tx.buf;
 997                         stlen = tail - head;
 998                 }
 999         }
1000         portp->tx.head = head;
1001
1002         clear_bit(ASYI_TXLOW, &portp->istate);
1003         stl_startrxtx(portp, -1, 1);
1004
1005         return count;
1006 }
1007
1008 /*****************************************************************************/
1009
1010 static void stl_putchar(struct tty_struct *tty, unsigned char ch)
1011 {
1012         struct stlport  *portp;
1013         unsigned int    len;
1014         char            *head, *tail;
1015
1016         pr_debug("stl_putchar(tty=%p,ch=%x)\n", tty, ch);
1017
1018         if (tty == NULL)
1019                 return;
1020         portp = tty->driver_data;
1021         if (portp == NULL)
1022                 return;
1023         if (portp->tx.buf == NULL)
1024                 return;
1025
1026         head = portp->tx.head;
1027         tail = portp->tx.tail;
1028
1029         len = (head >= tail) ? (STL_TXBUFSIZE - (head - tail)) : (tail - head);
1030         len--;
1031
1032         if (len > 0) {
1033                 *head++ = ch;
1034                 if (head >= (portp->tx.buf + STL_TXBUFSIZE))
1035                         head = portp->tx.buf;
1036         }
1037         portp->tx.head = head;
1038 }
1039
1040 /*****************************************************************************/
1041
1042 /*
1043  *      If there are any characters in the buffer then make sure that TX
1044  *      interrupts are on and get'em out. Normally used after the putchar
1045  *      routine has been called.
1046  */
1047
1048 static void stl_flushchars(struct tty_struct *tty)
1049 {
1050         struct stlport  *portp;
1051
1052         pr_debug("stl_flushchars(tty=%p)\n", tty);
1053
1054         if (tty == NULL)
1055                 return;
1056         portp = tty->driver_data;
1057         if (portp == NULL)
1058                 return;
1059         if (portp->tx.buf == NULL)
1060                 return;
1061
1062         stl_startrxtx(portp, -1, 1);
1063 }
1064
1065 /*****************************************************************************/
1066
1067 static int stl_writeroom(struct tty_struct *tty)
1068 {
1069         struct stlport  *portp;
1070         char            *head, *tail;
1071
1072         pr_debug("stl_writeroom(tty=%p)\n", tty);
1073
1074         if (tty == NULL)
1075                 return 0;
1076         portp = tty->driver_data;
1077         if (portp == NULL)
1078                 return 0;
1079         if (portp->tx.buf == NULL)
1080                 return 0;
1081
1082         head = portp->tx.head;
1083         tail = portp->tx.tail;
1084         return (head >= tail) ? (STL_TXBUFSIZE - (head - tail) - 1) : (tail - head - 1);
1085 }
1086
1087 /*****************************************************************************/
1088
1089 /*
1090  *      Return number of chars in the TX buffer. Normally we would just
1091  *      calculate the number of chars in the buffer and return that, but if
1092  *      the buffer is empty and TX interrupts are still on then we return
1093  *      that the buffer still has 1 char in it. This way whoever called us
1094  *      will not think that ALL chars have drained - since the UART still
1095  *      must have some chars in it (we are busy after all).
1096  */
1097
1098 static int stl_charsinbuffer(struct tty_struct *tty)
1099 {
1100         struct stlport  *portp;
1101         unsigned int    size;
1102         char            *head, *tail;
1103
1104         pr_debug("stl_charsinbuffer(tty=%p)\n", tty);
1105
1106         if (tty == NULL)
1107                 return 0;
1108         portp = tty->driver_data;
1109         if (portp == NULL)
1110                 return 0;
1111         if (portp->tx.buf == NULL)
1112                 return 0;
1113
1114         head = portp->tx.head;
1115         tail = portp->tx.tail;
1116         size = (head >= tail) ? (head - tail) : (STL_TXBUFSIZE - (tail - head));
1117         if ((size == 0) && test_bit(ASYI_TXBUSY, &portp->istate))
1118                 size = 1;
1119         return size;
1120 }
1121
1122 /*****************************************************************************/
1123
1124 /*
1125  *      Generate the serial struct info.
1126  */
1127
1128 static int stl_getserial(struct stlport *portp, struct serial_struct __user *sp)
1129 {
1130         struct serial_struct    sio;
1131         struct stlbrd           *brdp;
1132
1133         pr_debug("stl_getserial(portp=%p,sp=%p)\n", portp, sp);
1134
1135         memset(&sio, 0, sizeof(struct serial_struct));
1136         sio.line = portp->portnr;
1137         sio.port = portp->ioaddr;
1138         sio.flags = portp->flags;
1139         sio.baud_base = portp->baud_base;
1140         sio.close_delay = portp->close_delay;
1141         sio.closing_wait = portp->closing_wait;
1142         sio.custom_divisor = portp->custom_divisor;
1143         sio.hub6 = 0;
1144         if (portp->uartp == &stl_cd1400uart) {
1145                 sio.type = PORT_CIRRUS;
1146                 sio.xmit_fifo_size = CD1400_TXFIFOSIZE;
1147         } else {
1148                 sio.type = PORT_UNKNOWN;
1149                 sio.xmit_fifo_size = SC26198_TXFIFOSIZE;
1150         }
1151
1152         brdp = stl_brds[portp->brdnr];
1153         if (brdp != NULL)
1154                 sio.irq = brdp->irq;
1155
1156         return copy_to_user(sp, &sio, sizeof(struct serial_struct)) ? -EFAULT : 0;
1157 }
1158
1159 /*****************************************************************************/
1160
1161 /*
1162  *      Set port according to the serial struct info.
1163  *      At this point we do not do any auto-configure stuff, so we will
1164  *      just quietly ignore any requests to change irq, etc.
1165  */
1166
1167 static int stl_setserial(struct stlport *portp, struct serial_struct __user *sp)
1168 {
1169         struct serial_struct    sio;
1170
1171         pr_debug("stl_setserial(portp=%p,sp=%p)\n", portp, sp);
1172
1173         if (copy_from_user(&sio, sp, sizeof(struct serial_struct)))
1174                 return -EFAULT;
1175         if (!capable(CAP_SYS_ADMIN)) {
1176                 if ((sio.baud_base != portp->baud_base) ||
1177                     (sio.close_delay != portp->close_delay) ||
1178                     ((sio.flags & ~ASYNC_USR_MASK) !=
1179                     (portp->flags & ~ASYNC_USR_MASK)))
1180                         return -EPERM;
1181         }
1182
1183         portp->flags = (portp->flags & ~ASYNC_USR_MASK) |
1184                 (sio.flags & ASYNC_USR_MASK);
1185         portp->baud_base = sio.baud_base;
1186         portp->close_delay = sio.close_delay;
1187         portp->closing_wait = sio.closing_wait;
1188         portp->custom_divisor = sio.custom_divisor;
1189         stl_setport(portp, portp->tty->termios);
1190         return 0;
1191 }
1192
1193 /*****************************************************************************/
1194
1195 static int stl_tiocmget(struct tty_struct *tty, struct file *file)
1196 {
1197         struct stlport  *portp;
1198
1199         if (tty == NULL)
1200                 return -ENODEV;
1201         portp = tty->driver_data;
1202         if (portp == NULL)
1203                 return -ENODEV;
1204         if (tty->flags & (1 << TTY_IO_ERROR))
1205                 return -EIO;
1206
1207         return stl_getsignals(portp);
1208 }
1209
1210 static int stl_tiocmset(struct tty_struct *tty, struct file *file,
1211                         unsigned int set, unsigned int clear)
1212 {
1213         struct stlport  *portp;
1214         int rts = -1, dtr = -1;
1215
1216         if (tty == NULL)
1217                 return -ENODEV;
1218         portp = tty->driver_data;
1219         if (portp == NULL)
1220                 return -ENODEV;
1221         if (tty->flags & (1 << TTY_IO_ERROR))
1222                 return -EIO;
1223
1224         if (set & TIOCM_RTS)
1225                 rts = 1;
1226         if (set & TIOCM_DTR)
1227                 dtr = 1;
1228         if (clear & TIOCM_RTS)
1229                 rts = 0;
1230         if (clear & TIOCM_DTR)
1231                 dtr = 0;
1232
1233         stl_setsignals(portp, dtr, rts);
1234         return 0;
1235 }
1236
1237 static int stl_ioctl(struct tty_struct *tty, struct file *file, unsigned int cmd, unsigned long arg)
1238 {
1239         struct stlport  *portp;
1240         unsigned int    ival;
1241         int             rc;
1242         void __user *argp = (void __user *)arg;
1243
1244         pr_debug("stl_ioctl(tty=%p,file=%p,cmd=%x,arg=%lx)\n", tty, file, cmd,
1245                         arg);
1246
1247         if (tty == NULL)
1248                 return -ENODEV;
1249         portp = tty->driver_data;
1250         if (portp == NULL)
1251                 return -ENODEV;
1252
1253         if ((cmd != TIOCGSERIAL) && (cmd != TIOCSSERIAL) &&
1254             (cmd != COM_GETPORTSTATS) && (cmd != COM_CLRPORTSTATS))
1255                 if (tty->flags & (1 << TTY_IO_ERROR))
1256                         return -EIO;
1257
1258         rc = 0;
1259
1260         switch (cmd) {
1261         case TIOCGSOFTCAR:
1262                 rc = put_user(((tty->termios->c_cflag & CLOCAL) ? 1 : 0),
1263                         (unsigned __user *) argp);
1264                 break;
1265         case TIOCSSOFTCAR:
1266                 if (get_user(ival, (unsigned int __user *) arg))
1267                         return -EFAULT;
1268                 tty->termios->c_cflag =
1269                                 (tty->termios->c_cflag & ~CLOCAL) |
1270                                 (ival ? CLOCAL : 0);
1271                 break;
1272         case TIOCGSERIAL:
1273                 rc = stl_getserial(portp, argp);
1274                 break;
1275         case TIOCSSERIAL:
1276                 rc = stl_setserial(portp, argp);
1277                 break;
1278         case COM_GETPORTSTATS:
1279                 rc = stl_getportstats(portp, argp);
1280                 break;
1281         case COM_CLRPORTSTATS:
1282                 rc = stl_clrportstats(portp, argp);
1283                 break;
1284         case TIOCSERCONFIG:
1285         case TIOCSERGWILD:
1286         case TIOCSERSWILD:
1287         case TIOCSERGETLSR:
1288         case TIOCSERGSTRUCT:
1289         case TIOCSERGETMULTI:
1290         case TIOCSERSETMULTI:
1291         default:
1292                 rc = -ENOIOCTLCMD;
1293                 break;
1294         }
1295
1296         return rc;
1297 }
1298
1299 /*****************************************************************************/
1300
1301 /*
1302  *      Start the transmitter again. Just turn TX interrupts back on.
1303  */
1304
1305 static void stl_start(struct tty_struct *tty)
1306 {
1307         struct stlport  *portp;
1308
1309         pr_debug("stl_start(tty=%p)\n", tty);
1310
1311         if (tty == NULL)
1312                 return;
1313         portp = tty->driver_data;
1314         if (portp == NULL)
1315                 return;
1316         stl_startrxtx(portp, -1, 1);
1317 }
1318
1319 /*****************************************************************************/
1320
1321 static void stl_settermios(struct tty_struct *tty, struct ktermios *old)
1322 {
1323         struct stlport  *portp;
1324         struct ktermios *tiosp;
1325
1326         pr_debug("stl_settermios(tty=%p,old=%p)\n", tty, old);
1327
1328         if (tty == NULL)
1329                 return;
1330         portp = tty->driver_data;
1331         if (portp == NULL)
1332                 return;
1333
1334         tiosp = tty->termios;
1335         if ((tiosp->c_cflag == old->c_cflag) &&
1336             (tiosp->c_iflag == old->c_iflag))
1337                 return;
1338
1339         stl_setport(portp, tiosp);
1340         stl_setsignals(portp, ((tiosp->c_cflag & (CBAUD & ~CBAUDEX)) ? 1 : 0),
1341                 -1);
1342         if ((old->c_cflag & CRTSCTS) && ((tiosp->c_cflag & CRTSCTS) == 0)) {
1343                 tty->hw_stopped = 0;
1344                 stl_start(tty);
1345         }
1346         if (((old->c_cflag & CLOCAL) == 0) && (tiosp->c_cflag & CLOCAL))
1347                 wake_up_interruptible(&portp->open_wait);
1348 }
1349
1350 /*****************************************************************************/
1351
1352 /*
1353  *      Attempt to flow control who ever is sending us data. Based on termios
1354  *      settings use software or/and hardware flow control.
1355  */
1356
1357 static void stl_throttle(struct tty_struct *tty)
1358 {
1359         struct stlport  *portp;
1360
1361         pr_debug("stl_throttle(tty=%p)\n", tty);
1362
1363         if (tty == NULL)
1364                 return;
1365         portp = tty->driver_data;
1366         if (portp == NULL)
1367                 return;
1368         stl_flowctrl(portp, 0);
1369 }
1370
1371 /*****************************************************************************/
1372
1373 /*
1374  *      Unflow control the device sending us data...
1375  */
1376
1377 static void stl_unthrottle(struct tty_struct *tty)
1378 {
1379         struct stlport  *portp;
1380
1381         pr_debug("stl_unthrottle(tty=%p)\n", tty);
1382
1383         if (tty == NULL)
1384                 return;
1385         portp = tty->driver_data;
1386         if (portp == NULL)
1387                 return;
1388         stl_flowctrl(portp, 1);
1389 }
1390
1391 /*****************************************************************************/
1392
1393 /*
1394  *      Stop the transmitter. Basically to do this we will just turn TX
1395  *      interrupts off.
1396  */
1397
1398 static void stl_stop(struct tty_struct *tty)
1399 {
1400         struct stlport  *portp;
1401
1402         pr_debug("stl_stop(tty=%p)\n", tty);
1403
1404         if (tty == NULL)
1405                 return;
1406         portp = tty->driver_data;
1407         if (portp == NULL)
1408                 return;
1409         stl_startrxtx(portp, -1, 0);
1410 }
1411
1412 /*****************************************************************************/
1413
1414 /*
1415  *      Hangup this port. This is pretty much like closing the port, only
1416  *      a little more brutal. No waiting for data to drain. Shutdown the
1417  *      port and maybe drop signals.
1418  */
1419
1420 static void stl_hangup(struct tty_struct *tty)
1421 {
1422         struct stlport  *portp;
1423
1424         pr_debug("stl_hangup(tty=%p)\n", tty);
1425
1426         if (tty == NULL)
1427                 return;
1428         portp = tty->driver_data;
1429         if (portp == NULL)
1430                 return;
1431
1432         portp->flags &= ~ASYNC_INITIALIZED;
1433         stl_disableintrs(portp);
1434         if (tty->termios->c_cflag & HUPCL)
1435                 stl_setsignals(portp, 0, 0);
1436         stl_enablerxtx(portp, 0, 0);
1437         stl_flushbuffer(tty);
1438         portp->istate = 0;
1439         set_bit(TTY_IO_ERROR, &tty->flags);
1440         if (portp->tx.buf != NULL) {
1441                 kfree(portp->tx.buf);
1442                 portp->tx.buf = NULL;
1443                 portp->tx.head = NULL;
1444                 portp->tx.tail = NULL;
1445         }
1446         portp->tty = NULL;
1447         portp->flags &= ~ASYNC_NORMAL_ACTIVE;
1448         portp->refcount = 0;
1449         wake_up_interruptible(&portp->open_wait);
1450 }
1451
1452 /*****************************************************************************/
1453
1454 static void stl_breakctl(struct tty_struct *tty, int state)
1455 {
1456         struct stlport  *portp;
1457
1458         pr_debug("stl_breakctl(tty=%p,state=%d)\n", tty, state);
1459
1460         if (tty == NULL)
1461                 return;
1462         portp = tty->driver_data;
1463         if (portp == NULL)
1464                 return;
1465
1466         stl_sendbreak(portp, ((state == -1) ? 1 : 2));
1467 }
1468
1469 /*****************************************************************************/
1470
1471 static void stl_sendxchar(struct tty_struct *tty, char ch)
1472 {
1473         struct stlport  *portp;
1474
1475         pr_debug("stl_sendxchar(tty=%p,ch=%x)\n", tty, ch);
1476
1477         if (tty == NULL)
1478                 return;
1479         portp = tty->driver_data;
1480         if (portp == NULL)
1481                 return;
1482
1483         if (ch == STOP_CHAR(tty))
1484                 stl_sendflow(portp, 0);
1485         else if (ch == START_CHAR(tty))
1486                 stl_sendflow(portp, 1);
1487         else
1488                 stl_putchar(tty, ch);
1489 }
1490
1491 /*****************************************************************************/
1492
1493 #define MAXLINE         80
1494
1495 /*
1496  *      Format info for a specified port. The line is deliberately limited
1497  *      to 80 characters. (If it is too long it will be truncated, if too
1498  *      short then padded with spaces).
1499  */
1500
1501 static int stl_portinfo(struct stlport *portp, int portnr, char *pos)
1502 {
1503         char    *sp;
1504         int     sigs, cnt;
1505
1506         sp = pos;
1507         sp += sprintf(sp, "%d: uart:%s tx:%d rx:%d",
1508                 portnr, (portp->hwid == 1) ? "SC26198" : "CD1400",
1509                 (int) portp->stats.txtotal, (int) portp->stats.rxtotal);
1510
1511         if (portp->stats.rxframing)
1512                 sp += sprintf(sp, " fe:%d", (int) portp->stats.rxframing);
1513         if (portp->stats.rxparity)
1514                 sp += sprintf(sp, " pe:%d", (int) portp->stats.rxparity);
1515         if (portp->stats.rxbreaks)
1516                 sp += sprintf(sp, " brk:%d", (int) portp->stats.rxbreaks);
1517         if (portp->stats.rxoverrun)
1518                 sp += sprintf(sp, " oe:%d", (int) portp->stats.rxoverrun);
1519
1520         sigs = stl_getsignals(portp);
1521         cnt = sprintf(sp, "%s%s%s%s%s ",
1522                 (sigs & TIOCM_RTS) ? "|RTS" : "",
1523                 (sigs & TIOCM_CTS) ? "|CTS" : "",
1524                 (sigs & TIOCM_DTR) ? "|DTR" : "",
1525                 (sigs & TIOCM_CD) ? "|DCD" : "",
1526                 (sigs & TIOCM_DSR) ? "|DSR" : "");
1527         *sp = ' ';
1528         sp += cnt;
1529
1530         for (cnt = sp - pos; cnt < (MAXLINE - 1); cnt++)
1531                 *sp++ = ' ';
1532         if (cnt >= MAXLINE)
1533                 pos[(MAXLINE - 2)] = '+';
1534         pos[(MAXLINE - 1)] = '\n';
1535
1536         return MAXLINE;
1537 }
1538
1539 /*****************************************************************************/
1540
1541 /*
1542  *      Port info, read from the /proc file system.
1543  */
1544
1545 static int stl_readproc(char *page, char **start, off_t off, int count, int *eof, void *data)
1546 {
1547         struct stlbrd   *brdp;
1548         struct stlpanel *panelp;
1549         struct stlport  *portp;
1550         unsigned int    brdnr, panelnr, portnr;
1551         int             totalport, curoff, maxoff;
1552         char            *pos;
1553
1554         pr_debug("stl_readproc(page=%p,start=%p,off=%lx,count=%d,eof=%p,"
1555                 "data=%p\n", page, start, off, count, eof, data);
1556
1557         pos = page;
1558         totalport = 0;
1559         curoff = 0;
1560
1561         if (off == 0) {
1562                 pos += sprintf(pos, "%s: version %s", stl_drvtitle,
1563                         stl_drvversion);
1564                 while (pos < (page + MAXLINE - 1))
1565                         *pos++ = ' ';
1566                 *pos++ = '\n';
1567         }
1568         curoff =  MAXLINE;
1569
1570 /*
1571  *      We scan through for each board, panel and port. The offset is
1572  *      calculated on the fly, and irrelevant ports are skipped.
1573  */
1574         for (brdnr = 0; brdnr < stl_nrbrds; brdnr++) {
1575                 brdp = stl_brds[brdnr];
1576                 if (brdp == NULL)
1577                         continue;
1578                 if (brdp->state == 0)
1579                         continue;
1580
1581                 maxoff = curoff + (brdp->nrports * MAXLINE);
1582                 if (off >= maxoff) {
1583                         curoff = maxoff;
1584                         continue;
1585                 }
1586
1587                 totalport = brdnr * STL_MAXPORTS;
1588                 for (panelnr = 0; panelnr < brdp->nrpanels; panelnr++) {
1589                         panelp = brdp->panels[panelnr];
1590                         if (panelp == NULL)
1591                                 continue;
1592
1593                         maxoff = curoff + (panelp->nrports * MAXLINE);
1594                         if (off >= maxoff) {
1595                                 curoff = maxoff;
1596                                 totalport += panelp->nrports;
1597                                 continue;
1598                         }
1599
1600                         for (portnr = 0; portnr < panelp->nrports; portnr++,
1601                             totalport++) {
1602                                 portp = panelp->ports[portnr];
1603                                 if (portp == NULL)
1604                                         continue;
1605                                 if (off >= (curoff += MAXLINE))
1606                                         continue;
1607                                 if ((pos - page + MAXLINE) > count)
1608                                         goto stl_readdone;
1609                                 pos += stl_portinfo(portp, totalport, pos);
1610                         }
1611                 }
1612         }
1613
1614         *eof = 1;
1615
1616 stl_readdone:
1617         *start = page;
1618         return pos - page;
1619 }
1620
1621 /*****************************************************************************/
1622
1623 /*
1624  *      All board interrupts are vectored through here first. This code then
1625  *      calls off to the approrpriate board interrupt handlers.
1626  */
1627
1628 static irqreturn_t stl_intr(int irq, void *dev_id)
1629 {
1630         struct stlbrd *brdp = dev_id;
1631
1632         pr_debug("stl_intr(brdp=%p,irq=%d)\n", brdp, irq);
1633
1634         return IRQ_RETVAL((* brdp->isr)(brdp));
1635 }
1636
1637 /*****************************************************************************/
1638
1639 /*
1640  *      Interrupt service routine for EasyIO board types.
1641  */
1642
1643 static int stl_eiointr(struct stlbrd *brdp)
1644 {
1645         struct stlpanel *panelp;
1646         unsigned int    iobase;
1647         int             handled = 0;
1648
1649         spin_lock(&brd_lock);
1650         panelp = brdp->panels[0];
1651         iobase = panelp->iobase;
1652         while (inb(brdp->iostatus) & EIO_INTRPEND) {
1653                 handled = 1;
1654                 (* panelp->isr)(panelp, iobase);
1655         }
1656         spin_unlock(&brd_lock);
1657         return handled;
1658 }
1659
1660 /*****************************************************************************/
1661
1662 /*
1663  *      Interrupt service routine for ECH-AT board types.
1664  */
1665
1666 static int stl_echatintr(struct stlbrd *brdp)
1667 {
1668         struct stlpanel *panelp;
1669         unsigned int    ioaddr, bnknr;
1670         int             handled = 0;
1671
1672         outb((brdp->ioctrlval | ECH_BRDENABLE), brdp->ioctrl);
1673
1674         while (inb(brdp->iostatus) & ECH_INTRPEND) {
1675                 handled = 1;
1676                 for (bnknr = 0; bnknr < brdp->nrbnks; bnknr++) {
1677                         ioaddr = brdp->bnkstataddr[bnknr];
1678                         if (inb(ioaddr) & ECH_PNLINTRPEND) {
1679                                 panelp = brdp->bnk2panel[bnknr];
1680                                 (* panelp->isr)(panelp, (ioaddr & 0xfffc));
1681                         }
1682                 }
1683         }
1684
1685         outb((brdp->ioctrlval | ECH_BRDDISABLE), brdp->ioctrl);
1686
1687         return handled;
1688 }
1689
1690 /*****************************************************************************/
1691
1692 /*
1693  *      Interrupt service routine for ECH-MCA board types.
1694  */
1695
1696 static int stl_echmcaintr(struct stlbrd *brdp)
1697 {
1698         struct stlpanel *panelp;
1699         unsigned int    ioaddr, bnknr;
1700         int             handled = 0;
1701
1702         while (inb(brdp->iostatus) & ECH_INTRPEND) {
1703                 handled = 1;
1704                 for (bnknr = 0; bnknr < brdp->nrbnks; bnknr++) {
1705                         ioaddr = brdp->bnkstataddr[bnknr];
1706                         if (inb(ioaddr) & ECH_PNLINTRPEND) {
1707                                 panelp = brdp->bnk2panel[bnknr];
1708                                 (* panelp->isr)(panelp, (ioaddr & 0xfffc));
1709                         }
1710                 }
1711         }
1712         return handled;
1713 }
1714
1715 /*****************************************************************************/
1716
1717 /*
1718  *      Interrupt service routine for ECH-PCI board types.
1719  */
1720
1721 static int stl_echpciintr(struct stlbrd *brdp)
1722 {
1723         struct stlpanel *panelp;
1724         unsigned int    ioaddr, bnknr, recheck;
1725         int             handled = 0;
1726
1727         while (1) {
1728                 recheck = 0;
1729                 for (bnknr = 0; bnknr < brdp->nrbnks; bnknr++) {
1730                         outb(brdp->bnkpageaddr[bnknr], brdp->ioctrl);
1731                         ioaddr = brdp->bnkstataddr[bnknr];
1732                         if (inb(ioaddr) & ECH_PNLINTRPEND) {
1733                                 panelp = brdp->bnk2panel[bnknr];
1734                                 (* panelp->isr)(panelp, (ioaddr & 0xfffc));
1735                                 recheck++;
1736                                 handled = 1;
1737                         }
1738                 }
1739                 if (! recheck)
1740                         break;
1741         }
1742         return handled;
1743 }
1744
1745 /*****************************************************************************/
1746
1747 /*
1748  *      Interrupt service routine for ECH-8/64-PCI board types.
1749  */
1750
1751 static int stl_echpci64intr(struct stlbrd *brdp)
1752 {
1753         struct stlpanel *panelp;
1754         unsigned int    ioaddr, bnknr;
1755         int             handled = 0;
1756
1757         while (inb(brdp->ioctrl) & 0x1) {
1758                 handled = 1;
1759                 for (bnknr = 0; bnknr < brdp->nrbnks; bnknr++) {
1760                         ioaddr = brdp->bnkstataddr[bnknr];
1761                         if (inb(ioaddr) & ECH_PNLINTRPEND) {
1762                                 panelp = brdp->bnk2panel[bnknr];
1763                                 (* panelp->isr)(panelp, (ioaddr & 0xfffc));
1764                         }
1765                 }
1766         }
1767
1768         return handled;
1769 }
1770
1771 /*****************************************************************************/
1772
1773 /*
1774  *      Service an off-level request for some channel.
1775  */
1776 static void stl_offintr(struct work_struct *work)
1777 {
1778         struct stlport          *portp = container_of(work, struct stlport, tqueue);
1779         struct tty_struct       *tty;
1780         unsigned int            oldsigs;
1781
1782         pr_debug("stl_offintr(portp=%p)\n", portp);
1783
1784         if (portp == NULL)
1785                 return;
1786
1787         tty = portp->tty;
1788         if (tty == NULL)
1789                 return;
1790
1791         lock_kernel();
1792         if (test_bit(ASYI_TXLOW, &portp->istate))
1793                 tty_wakeup(tty);
1794
1795         if (test_bit(ASYI_DCDCHANGE, &portp->istate)) {
1796                 clear_bit(ASYI_DCDCHANGE, &portp->istate);
1797                 oldsigs = portp->sigs;
1798                 portp->sigs = stl_getsignals(portp);
1799                 if ((portp->sigs & TIOCM_CD) && ((oldsigs & TIOCM_CD) == 0))
1800                         wake_up_interruptible(&portp->open_wait);
1801                 if ((oldsigs & TIOCM_CD) && ((portp->sigs & TIOCM_CD) == 0))
1802                         if (portp->flags & ASYNC_CHECK_CD)
1803                                 tty_hangup(tty);        /* FIXME: module removal race here - AKPM */
1804         }
1805         unlock_kernel();
1806 }
1807
1808 /*****************************************************************************/
1809
1810 /*
1811  *      Initialize all the ports on a panel.
1812  */
1813
1814 static int __devinit stl_initports(struct stlbrd *brdp, struct stlpanel *panelp)
1815 {
1816         struct stlport *portp;
1817         unsigned int i;
1818         int chipmask;
1819
1820         pr_debug("stl_initports(brdp=%p,panelp=%p)\n", brdp, panelp);
1821
1822         chipmask = stl_panelinit(brdp, panelp);
1823
1824 /*
1825  *      All UART's are initialized (if found!). Now go through and setup
1826  *      each ports data structures.
1827  */
1828         for (i = 0; i < panelp->nrports; i++) {
1829                 portp = kzalloc(sizeof(struct stlport), GFP_KERNEL);
1830                 if (!portp) {
1831                         printk("STALLION: failed to allocate memory "
1832                                 "(size=%Zd)\n", sizeof(struct stlport));
1833                         break;
1834                 }
1835
1836                 portp->magic = STL_PORTMAGIC;
1837                 portp->portnr = i;
1838                 portp->brdnr = panelp->brdnr;
1839                 portp->panelnr = panelp->panelnr;
1840                 portp->uartp = panelp->uartp;
1841                 portp->clk = brdp->clk;
1842                 portp->baud_base = STL_BAUDBASE;
1843                 portp->close_delay = STL_CLOSEDELAY;
1844                 portp->closing_wait = 30 * HZ;
1845                 INIT_WORK(&portp->tqueue, stl_offintr);
1846                 init_waitqueue_head(&portp->open_wait);
1847                 init_waitqueue_head(&portp->close_wait);
1848                 portp->stats.brd = portp->brdnr;
1849                 portp->stats.panel = portp->panelnr;
1850                 portp->stats.port = portp->portnr;
1851                 panelp->ports[i] = portp;
1852                 stl_portinit(brdp, panelp, portp);
1853         }
1854
1855         return 0;
1856 }
1857
1858 static void stl_cleanup_panels(struct stlbrd *brdp)
1859 {
1860         struct stlpanel *panelp;
1861         struct stlport *portp;
1862         unsigned int j, k;
1863
1864         for (j = 0; j < STL_MAXPANELS; j++) {
1865                 panelp = brdp->panels[j];
1866                 if (panelp == NULL)
1867                         continue;
1868                 for (k = 0; k < STL_PORTSPERPANEL; k++) {
1869                         portp = panelp->ports[k];
1870                         if (portp == NULL)
1871                                 continue;
1872                         if (portp->tty != NULL)
1873                                 stl_hangup(portp->tty);
1874                         kfree(portp->tx.buf);
1875                         kfree(portp);
1876                 }
1877                 kfree(panelp);
1878         }
1879 }
1880
1881 /*****************************************************************************/
1882
1883 /*
1884  *      Try to find and initialize an EasyIO board.
1885  */
1886
1887 static int __devinit stl_initeio(struct stlbrd *brdp)
1888 {
1889         struct stlpanel *panelp;
1890         unsigned int    status;
1891         char            *name;
1892         int             retval;
1893
1894         pr_debug("stl_initeio(brdp=%p)\n", brdp);
1895
1896         brdp->ioctrl = brdp->ioaddr1 + 1;
1897         brdp->iostatus = brdp->ioaddr1 + 2;
1898
1899         status = inb(brdp->iostatus);
1900         if ((status & EIO_IDBITMASK) == EIO_MK3)
1901                 brdp->ioctrl++;
1902
1903 /*
1904  *      Handle board specific stuff now. The real difference is PCI
1905  *      or not PCI.
1906  */
1907         if (brdp->brdtype == BRD_EASYIOPCI) {
1908                 brdp->iosize1 = 0x80;
1909                 brdp->iosize2 = 0x80;
1910                 name = "serial(EIO-PCI)";
1911                 outb(0x41, (brdp->ioaddr2 + 0x4c));
1912         } else {
1913                 brdp->iosize1 = 8;
1914                 name = "serial(EIO)";
1915                 if ((brdp->irq < 0) || (brdp->irq > 15) ||
1916                     (stl_vecmap[brdp->irq] == (unsigned char) 0xff)) {
1917                         printk("STALLION: invalid irq=%d for brd=%d\n",
1918                                 brdp->irq, brdp->brdnr);
1919                         retval = -EINVAL;
1920                         goto err;
1921                 }
1922                 outb((stl_vecmap[brdp->irq] | EIO_0WS |
1923                         ((brdp->irqtype) ? EIO_INTLEVEL : EIO_INTEDGE)),
1924                         brdp->ioctrl);
1925         }
1926
1927         retval = -EBUSY;
1928         if (!request_region(brdp->ioaddr1, brdp->iosize1, name)) {
1929                 printk(KERN_WARNING "STALLION: Warning, board %d I/O address "
1930                         "%x conflicts with another device\n", brdp->brdnr,
1931                         brdp->ioaddr1);
1932                 goto err;
1933         }
1934
1935         if (brdp->iosize2 > 0)
1936                 if (!request_region(brdp->ioaddr2, brdp->iosize2, name)) {
1937                         printk(KERN_WARNING "STALLION: Warning, board %d I/O "
1938                                 "address %x conflicts with another device\n",
1939                                 brdp->brdnr, brdp->ioaddr2);
1940                         printk(KERN_WARNING "STALLION: Warning, also "
1941                                 "releasing board %d I/O address %x \n",
1942                                 brdp->brdnr, brdp->ioaddr1);
1943                         goto err_rel1;
1944                 }
1945
1946 /*
1947  *      Everything looks OK, so let's go ahead and probe for the hardware.
1948  */
1949         brdp->clk = CD1400_CLK;
1950         brdp->isr = stl_eiointr;
1951
1952         retval = -ENODEV;
1953         switch (status & EIO_IDBITMASK) {
1954         case EIO_8PORTM:
1955                 brdp->clk = CD1400_CLK8M;
1956                 /* fall thru */
1957         case EIO_8PORTRS:
1958         case EIO_8PORTDI:
1959                 brdp->nrports = 8;
1960                 break;
1961         case EIO_4PORTRS:
1962                 brdp->nrports = 4;
1963                 break;
1964         case EIO_MK3:
1965                 switch (status & EIO_BRDMASK) {
1966                 case ID_BRD4:
1967                         brdp->nrports = 4;
1968                         break;
1969                 case ID_BRD8:
1970                         brdp->nrports = 8;
1971                         break;
1972                 case ID_BRD16:
1973                         brdp->nrports = 16;
1974                         break;
1975                 default:
1976                         goto err_rel2;
1977                 }
1978                 break;
1979         default:
1980                 goto err_rel2;
1981         }
1982
1983 /*
1984  *      We have verified that the board is actually present, so now we
1985  *      can complete the setup.
1986  */
1987
1988         panelp = kzalloc(sizeof(struct stlpanel), GFP_KERNEL);
1989         if (!panelp) {
1990                 printk(KERN_WARNING "STALLION: failed to allocate memory "
1991                         "(size=%Zd)\n", sizeof(struct stlpanel));
1992                 retval = -ENOMEM;
1993                 goto err_rel2;
1994         }
1995
1996         panelp->magic = STL_PANELMAGIC;
1997         panelp->brdnr = brdp->brdnr;
1998         panelp->panelnr = 0;
1999         panelp->nrports = brdp->nrports;
2000         panelp->iobase = brdp->ioaddr1;
2001         panelp->hwid = status;
2002         if ((status & EIO_IDBITMASK) == EIO_MK3) {
2003                 panelp->uartp = &stl_sc26198uart;
2004                 panelp->isr = stl_sc26198intr;
2005         } else {
2006                 panelp->uartp = &stl_cd1400uart;
2007                 panelp->isr = stl_cd1400eiointr;
2008         }
2009
2010         brdp->panels[0] = panelp;
2011         brdp->nrpanels = 1;
2012         brdp->state |= BRD_FOUND;
2013         brdp->hwid = status;
2014         if (request_irq(brdp->irq, stl_intr, IRQF_SHARED, name, brdp) != 0) {
2015                 printk("STALLION: failed to register interrupt "
2016                     "routine for %s irq=%d\n", name, brdp->irq);
2017                 retval = -ENODEV;
2018                 goto err_fr;
2019         }
2020
2021         return 0;
2022 err_fr:
2023         stl_cleanup_panels(brdp);
2024 err_rel2:
2025         if (brdp->iosize2 > 0)
2026                 release_region(brdp->ioaddr2, brdp->iosize2);
2027 err_rel1:
2028         release_region(brdp->ioaddr1, brdp->iosize1);
2029 err:
2030         return retval;
2031 }
2032
2033 /*****************************************************************************/
2034
2035 /*
2036  *      Try to find an ECH board and initialize it. This code is capable of
2037  *      dealing with all types of ECH board.
2038  */
2039
2040 static int __devinit stl_initech(struct stlbrd *brdp)
2041 {
2042         struct stlpanel *panelp;
2043         unsigned int    status, nxtid, ioaddr, conflict, panelnr, banknr, i;
2044         int             retval;
2045         char            *name;
2046
2047         pr_debug("stl_initech(brdp=%p)\n", brdp);
2048
2049         status = 0;
2050         conflict = 0;
2051
2052 /*
2053  *      Set up the initial board register contents for boards. This varies a
2054  *      bit between the different board types. So we need to handle each
2055  *      separately. Also do a check that the supplied IRQ is good.
2056  */
2057         switch (brdp->brdtype) {
2058
2059         case BRD_ECH:
2060                 brdp->isr = stl_echatintr;
2061                 brdp->ioctrl = brdp->ioaddr1 + 1;
2062                 brdp->iostatus = brdp->ioaddr1 + 1;
2063                 status = inb(brdp->iostatus);
2064                 if ((status & ECH_IDBITMASK) != ECH_ID) {
2065                         retval = -ENODEV;
2066                         goto err;
2067                 }
2068                 if ((brdp->irq < 0) || (brdp->irq > 15) ||
2069                     (stl_vecmap[brdp->irq] == (unsigned char) 0xff)) {
2070                         printk("STALLION: invalid irq=%d for brd=%d\n",
2071                                 brdp->irq, brdp->brdnr);
2072                         retval = -EINVAL;
2073                         goto err;
2074                 }
2075                 status = ((brdp->ioaddr2 & ECH_ADDR2MASK) >> 1);
2076                 status |= (stl_vecmap[brdp->irq] << 1);
2077                 outb((status | ECH_BRDRESET), brdp->ioaddr1);
2078                 brdp->ioctrlval = ECH_INTENABLE |
2079                         ((brdp->irqtype) ? ECH_INTLEVEL : ECH_INTEDGE);
2080                 for (i = 0; i < 10; i++)
2081                         outb((brdp->ioctrlval | ECH_BRDENABLE), brdp->ioctrl);
2082                 brdp->iosize1 = 2;
2083                 brdp->iosize2 = 32;
2084                 name = "serial(EC8/32)";
2085                 outb(status, brdp->ioaddr1);
2086                 break;
2087
2088         case BRD_ECHMC:
2089                 brdp->isr = stl_echmcaintr;
2090                 brdp->ioctrl = brdp->ioaddr1 + 0x20;
2091                 brdp->iostatus = brdp->ioctrl;
2092                 status = inb(brdp->iostatus);
2093                 if ((status & ECH_IDBITMASK) != ECH_ID) {
2094                         retval = -ENODEV;
2095                         goto err;
2096                 }
2097                 if ((brdp->irq < 0) || (brdp->irq > 15) ||
2098                     (stl_vecmap[brdp->irq] == (unsigned char) 0xff)) {
2099                         printk("STALLION: invalid irq=%d for brd=%d\n",
2100                                 brdp->irq, brdp->brdnr);
2101                         retval = -EINVAL;
2102                         goto err;
2103                 }
2104                 outb(ECHMC_BRDRESET, brdp->ioctrl);
2105                 outb(ECHMC_INTENABLE, brdp->ioctrl);
2106                 brdp->iosize1 = 64;
2107                 name = "serial(EC8/32-MC)";
2108                 break;
2109
2110         case BRD_ECHPCI:
2111                 brdp->isr = stl_echpciintr;
2112                 brdp->ioctrl = brdp->ioaddr1 + 2;
2113                 brdp->iosize1 = 4;
2114                 brdp->iosize2 = 8;
2115                 name = "serial(EC8/32-PCI)";
2116                 break;
2117
2118         case BRD_ECH64PCI:
2119                 brdp->isr = stl_echpci64intr;
2120                 brdp->ioctrl = brdp->ioaddr2 + 0x40;
2121                 outb(0x43, (brdp->ioaddr1 + 0x4c));
2122                 brdp->iosize1 = 0x80;
2123                 brdp->iosize2 = 0x80;
2124                 name = "serial(EC8/64-PCI)";
2125                 break;
2126
2127         default:
2128                 printk("STALLION: unknown board type=%d\n", brdp->brdtype);
2129                 retval = -EINVAL;
2130                 goto err;
2131         }
2132
2133 /*
2134  *      Check boards for possible IO address conflicts and return fail status
2135  *      if an IO conflict found.
2136  */
2137         retval = -EBUSY;
2138         if (!request_region(brdp->ioaddr1, brdp->iosize1, name)) {
2139                 printk(KERN_WARNING "STALLION: Warning, board %d I/O address "
2140                         "%x conflicts with another device\n", brdp->brdnr,
2141                         brdp->ioaddr1);
2142                 goto err;
2143         }
2144
2145         if (brdp->iosize2 > 0)
2146                 if (!request_region(brdp->ioaddr2, brdp->iosize2, name)) {
2147                         printk(KERN_WARNING "STALLION: Warning, board %d I/O "
2148                                 "address %x conflicts with another device\n",
2149                                 brdp->brdnr, brdp->ioaddr2);
2150                         printk(KERN_WARNING "STALLION: Warning, also "
2151                                 "releasing board %d I/O address %x \n",
2152                                 brdp->brdnr, brdp->ioaddr1);
2153                         goto err_rel1;
2154                 }
2155
2156 /*
2157  *      Scan through the secondary io address space looking for panels.
2158  *      As we find'em allocate and initialize panel structures for each.
2159  */
2160         brdp->clk = CD1400_CLK;
2161         brdp->hwid = status;
2162
2163         ioaddr = brdp->ioaddr2;
2164         banknr = 0;
2165         panelnr = 0;
2166         nxtid = 0;
2167
2168         for (i = 0; i < STL_MAXPANELS; i++) {
2169                 if (brdp->brdtype == BRD_ECHPCI) {
2170                         outb(nxtid, brdp->ioctrl);
2171                         ioaddr = brdp->ioaddr2;
2172                 }
2173                 status = inb(ioaddr + ECH_PNLSTATUS);
2174                 if ((status & ECH_PNLIDMASK) != nxtid)
2175                         goto err_fr;
2176                 panelp = kzalloc(sizeof(struct stlpanel), GFP_KERNEL);
2177                 if (!panelp) {
2178                         printk("STALLION: failed to allocate memory "
2179                                 "(size=%Zd)\n", sizeof(struct stlpanel));
2180                         goto err_fr;
2181                 }
2182                 panelp->magic = STL_PANELMAGIC;
2183                 panelp->brdnr = brdp->brdnr;
2184                 panelp->panelnr = panelnr;
2185                 panelp->iobase = ioaddr;
2186                 panelp->pagenr = nxtid;
2187                 panelp->hwid = status;
2188                 brdp->bnk2panel[banknr] = panelp;
2189                 brdp->bnkpageaddr[banknr] = nxtid;
2190                 brdp->bnkstataddr[banknr++] = ioaddr + ECH_PNLSTATUS;
2191
2192                 if (status & ECH_PNLXPID) {
2193                         panelp->uartp = &stl_sc26198uart;
2194                         panelp->isr = stl_sc26198intr;
2195                         if (status & ECH_PNL16PORT) {
2196                                 panelp->nrports = 16;
2197                                 brdp->bnk2panel[banknr] = panelp;
2198                                 brdp->bnkpageaddr[banknr] = nxtid;
2199                                 brdp->bnkstataddr[banknr++] = ioaddr + 4 +
2200                                         ECH_PNLSTATUS;
2201                         } else
2202                                 panelp->nrports = 8;
2203                 } else {
2204                         panelp->uartp = &stl_cd1400uart;
2205                         panelp->isr = stl_cd1400echintr;
2206                         if (status & ECH_PNL16PORT) {
2207                                 panelp->nrports = 16;
2208                                 panelp->ackmask = 0x80;
2209                                 if (brdp->brdtype != BRD_ECHPCI)
2210                                         ioaddr += EREG_BANKSIZE;
2211                                 brdp->bnk2panel[banknr] = panelp;
2212                                 brdp->bnkpageaddr[banknr] = ++nxtid;
2213                                 brdp->bnkstataddr[banknr++] = ioaddr +
2214                                         ECH_PNLSTATUS;
2215                         } else {
2216                                 panelp->nrports = 8;
2217                                 panelp->ackmask = 0xc0;
2218                         }
2219                 }
2220
2221                 nxtid++;
2222                 ioaddr += EREG_BANKSIZE;
2223                 brdp->nrports += panelp->nrports;
2224                 brdp->panels[panelnr++] = panelp;
2225                 if ((brdp->brdtype != BRD_ECHPCI) &&
2226                     (ioaddr >= (brdp->ioaddr2 + brdp->iosize2)))
2227                         goto err_fr;
2228         }
2229
2230         brdp->nrpanels = panelnr;
2231         brdp->nrbnks = banknr;
2232         if (brdp->brdtype == BRD_ECH)
2233                 outb((brdp->ioctrlval | ECH_BRDDISABLE), brdp->ioctrl);
2234
2235         brdp->state |= BRD_FOUND;
2236         if (request_irq(brdp->irq, stl_intr, IRQF_SHARED, name, brdp) != 0) {
2237                 printk("STALLION: failed to register interrupt "
2238                     "routine for %s irq=%d\n", name, brdp->irq);
2239                 retval = -ENODEV;
2240                 goto err_fr;
2241         }
2242
2243         return 0;
2244 err_fr:
2245         stl_cleanup_panels(brdp);
2246         if (brdp->iosize2 > 0)
2247                 release_region(brdp->ioaddr2, brdp->iosize2);
2248 err_rel1:
2249         release_region(brdp->ioaddr1, brdp->iosize1);
2250 err:
2251         return retval;
2252 }
2253
2254 /*****************************************************************************/
2255
2256 /*
2257  *      Initialize and configure the specified board.
2258  *      Scan through all the boards in the configuration and see what we
2259  *      can find. Handle EIO and the ECH boards a little differently here
2260  *      since the initial search and setup is very different.
2261  */
2262
2263 static int __devinit stl_brdinit(struct stlbrd *brdp)
2264 {
2265         int i, retval;
2266
2267         pr_debug("stl_brdinit(brdp=%p)\n", brdp);
2268
2269         switch (brdp->brdtype) {
2270         case BRD_EASYIO:
2271         case BRD_EASYIOPCI:
2272                 retval = stl_initeio(brdp);
2273                 if (retval)
2274                         goto err;
2275                 break;
2276         case BRD_ECH:
2277         case BRD_ECHMC:
2278         case BRD_ECHPCI:
2279         case BRD_ECH64PCI:
2280                 retval = stl_initech(brdp);
2281                 if (retval)
2282                         goto err;
2283                 break;
2284         default:
2285                 printk("STALLION: board=%d is unknown board type=%d\n",
2286                         brdp->brdnr, brdp->brdtype);
2287                 retval = -ENODEV;
2288                 goto err;
2289         }
2290
2291         if ((brdp->state & BRD_FOUND) == 0) {
2292                 printk("STALLION: %s board not found, board=%d io=%x irq=%d\n",
2293                         stl_brdnames[brdp->brdtype], brdp->brdnr,
2294                         brdp->ioaddr1, brdp->irq);
2295                 goto err_free;
2296         }
2297
2298         for (i = 0; i < STL_MAXPANELS; i++)
2299                 if (brdp->panels[i] != NULL)
2300                         stl_initports(brdp, brdp->panels[i]);
2301
2302         printk("STALLION: %s found, board=%d io=%x irq=%d "
2303                 "nrpanels=%d nrports=%d\n", stl_brdnames[brdp->brdtype],
2304                 brdp->brdnr, brdp->ioaddr1, brdp->irq, brdp->nrpanels,
2305                 brdp->nrports);
2306
2307         return 0;
2308 err_free:
2309         free_irq(brdp->irq, brdp);
2310
2311         stl_cleanup_panels(brdp);
2312
2313         release_region(brdp->ioaddr1, brdp->iosize1);
2314         if (brdp->iosize2 > 0)
2315                 release_region(brdp->ioaddr2, brdp->iosize2);
2316 err:
2317         return retval;
2318 }
2319
2320 /*****************************************************************************/
2321
2322 /*
2323  *      Find the next available board number that is free.
2324  */
2325
2326 static int __devinit stl_getbrdnr(void)
2327 {
2328         unsigned int i;
2329
2330         for (i = 0; i < STL_MAXBRDS; i++)
2331                 if (stl_brds[i] == NULL) {
2332                         if (i >= stl_nrbrds)
2333                                 stl_nrbrds = i + 1;
2334                         return i;
2335                 }
2336
2337         return -1;
2338 }
2339
2340 /*****************************************************************************/
2341 /*
2342  *      We have a Stallion board. Allocate a board structure and
2343  *      initialize it. Read its IO and IRQ resources from PCI
2344  *      configuration space.
2345  */
2346
2347 static int __devinit stl_pciprobe(struct pci_dev *pdev,
2348                 const struct pci_device_id *ent)
2349 {
2350         struct stlbrd *brdp;
2351         unsigned int i, brdtype = ent->driver_data;
2352         int brdnr, retval = -ENODEV;
2353
2354         if ((pdev->class >> 8) == PCI_CLASS_STORAGE_IDE)
2355                 goto err;
2356
2357         dev_info(&pdev->dev, "please, report this to LKML: %x/%x/%x\n",
2358                         pdev->vendor, pdev->device, pdev->class);
2359
2360         retval = pci_enable_device(pdev);
2361         if (retval)
2362                 goto err;
2363         brdp = stl_allocbrd();
2364         if (brdp == NULL) {
2365                 retval = -ENOMEM;
2366                 goto err;
2367         }
2368         mutex_lock(&stl_brdslock);
2369         brdnr = stl_getbrdnr();
2370         if (brdnr < 0) {
2371                 dev_err(&pdev->dev, "too many boards found, "
2372                         "maximum supported %d\n", STL_MAXBRDS);
2373                 mutex_unlock(&stl_brdslock);
2374                 goto err_fr;
2375         }
2376         brdp->brdnr = (unsigned int)brdnr;
2377         stl_brds[brdp->brdnr] = brdp;
2378         mutex_unlock(&stl_brdslock);
2379
2380         brdp->brdtype = brdtype;
2381         brdp->state |= STL_PROBED;
2382
2383 /*
2384  *      We have all resources from the board, so let's setup the actual
2385  *      board structure now.
2386  */
2387         switch (brdtype) {
2388         case BRD_ECHPCI:
2389                 brdp->ioaddr2 = pci_resource_start(pdev, 0);
2390                 brdp->ioaddr1 = pci_resource_start(pdev, 1);
2391                 break;
2392         case BRD_ECH64PCI:
2393                 brdp->ioaddr2 = pci_resource_start(pdev, 2);
2394                 brdp->ioaddr1 = pci_resource_start(pdev, 1);
2395                 break;
2396         case BRD_EASYIOPCI:
2397                 brdp->ioaddr1 = pci_resource_start(pdev, 2);
2398                 brdp->ioaddr2 = pci_resource_start(pdev, 1);
2399                 break;
2400         default:
2401                 dev_err(&pdev->dev, "unknown PCI board type=%u\n", brdtype);
2402                 break;
2403         }
2404
2405         brdp->irq = pdev->irq;
2406         retval = stl_brdinit(brdp);
2407         if (retval)
2408                 goto err_null;
2409
2410         pci_set_drvdata(pdev, brdp);
2411
2412         for (i = 0; i < brdp->nrports; i++)
2413                 tty_register_device(stl_serial,
2414                                 brdp->brdnr * STL_MAXPORTS + i, &pdev->dev);
2415
2416         return 0;
2417 err_null:
2418         stl_brds[brdp->brdnr] = NULL;
2419 err_fr:
2420         kfree(brdp);
2421 err:
2422         return retval;
2423 }
2424
2425 static void __devexit stl_pciremove(struct pci_dev *pdev)
2426 {
2427         struct stlbrd *brdp = pci_get_drvdata(pdev);
2428         unsigned int i;
2429
2430         free_irq(brdp->irq, brdp);
2431
2432         stl_cleanup_panels(brdp);
2433
2434         release_region(brdp->ioaddr1, brdp->iosize1);
2435         if (brdp->iosize2 > 0)
2436                 release_region(brdp->ioaddr2, brdp->iosize2);
2437
2438         for (i = 0; i < brdp->nrports; i++)
2439                 tty_unregister_device(stl_serial,
2440                                 brdp->brdnr * STL_MAXPORTS + i);
2441
2442         stl_brds[brdp->brdnr] = NULL;
2443         kfree(brdp);
2444 }
2445
2446 static struct pci_driver stl_pcidriver = {
2447         .name = "stallion",
2448         .id_table = stl_pcibrds,
2449         .probe = stl_pciprobe,
2450         .remove = __devexit_p(stl_pciremove)
2451 };
2452
2453 /*****************************************************************************/
2454
2455 /*
2456  *      Return the board stats structure to user app.
2457  */
2458
2459 static int stl_getbrdstats(combrd_t __user *bp)
2460 {
2461         combrd_t        stl_brdstats;
2462         struct stlbrd   *brdp;
2463         struct stlpanel *panelp;
2464         unsigned int i;
2465
2466         if (copy_from_user(&stl_brdstats, bp, sizeof(combrd_t)))
2467                 return -EFAULT;
2468         if (stl_brdstats.brd >= STL_MAXBRDS)
2469                 return -ENODEV;
2470         brdp = stl_brds[stl_brdstats.brd];
2471         if (brdp == NULL)
2472                 return -ENODEV;
2473
2474         memset(&stl_brdstats, 0, sizeof(combrd_t));
2475         stl_brdstats.brd = brdp->brdnr;
2476         stl_brdstats.type = brdp->brdtype;
2477         stl_brdstats.hwid = brdp->hwid;
2478         stl_brdstats.state = brdp->state;
2479         stl_brdstats.ioaddr = brdp->ioaddr1;
2480         stl_brdstats.ioaddr2 = brdp->ioaddr2;
2481         stl_brdstats.irq = brdp->irq;
2482         stl_brdstats.nrpanels = brdp->nrpanels;
2483         stl_brdstats.nrports = brdp->nrports;
2484         for (i = 0; i < brdp->nrpanels; i++) {
2485                 panelp = brdp->panels[i];
2486                 stl_brdstats.panels[i].panel = i;
2487                 stl_brdstats.panels[i].hwid = panelp->hwid;
2488                 stl_brdstats.panels[i].nrports = panelp->nrports;
2489         }
2490
2491         return copy_to_user(bp, &stl_brdstats, sizeof(combrd_t)) ? -EFAULT : 0;
2492 }
2493
2494 /*****************************************************************************/
2495
2496 /*
2497  *      Resolve the referenced port number into a port struct pointer.
2498  */
2499
2500 static struct stlport *stl_getport(int brdnr, int panelnr, int portnr)
2501 {
2502         struct stlbrd   *brdp;
2503         struct stlpanel *panelp;
2504
2505         if (brdnr < 0 || brdnr >= STL_MAXBRDS)
2506                 return NULL;
2507         brdp = stl_brds[brdnr];
2508         if (brdp == NULL)
2509                 return NULL;
2510         if (panelnr < 0 || (unsigned int)panelnr >= brdp->nrpanels)
2511                 return NULL;
2512         panelp = brdp->panels[panelnr];
2513         if (panelp == NULL)
2514                 return NULL;
2515         if (portnr < 0 || (unsigned int)portnr >= panelp->nrports)
2516                 return NULL;
2517         return panelp->ports[portnr];
2518 }
2519
2520 /*****************************************************************************/
2521
2522 /*
2523  *      Return the port stats structure to user app. A NULL port struct
2524  *      pointer passed in means that we need to find out from the app
2525  *      what port to get stats for (used through board control device).
2526  */
2527
2528 static int stl_getportstats(struct stlport *portp, comstats_t __user *cp)
2529 {
2530         comstats_t      stl_comstats;
2531         unsigned char   *head, *tail;
2532         unsigned long   flags;
2533
2534         if (!portp) {
2535                 if (copy_from_user(&stl_comstats, cp, sizeof(comstats_t)))
2536                         return -EFAULT;
2537                 portp = stl_getport(stl_comstats.brd, stl_comstats.panel,
2538                         stl_comstats.port);
2539                 if (portp == NULL)
2540                         return -ENODEV;
2541         }
2542
2543         portp->stats.state = portp->istate;
2544         portp->stats.flags = portp->flags;
2545         portp->stats.hwid = portp->hwid;
2546
2547         portp->stats.ttystate = 0;
2548         portp->stats.cflags = 0;
2549         portp->stats.iflags = 0;
2550         portp->stats.oflags = 0;
2551         portp->stats.lflags = 0;
2552         portp->stats.rxbuffered = 0;
2553
2554         spin_lock_irqsave(&stallion_lock, flags);
2555         if (portp->tty != NULL)
2556                 if (portp->tty->driver_data == portp) {
2557                         portp->stats.ttystate = portp->tty->flags;
2558                         /* No longer available as a statistic */
2559                         portp->stats.rxbuffered = 1; /*portp->tty->flip.count; */
2560                         if (portp->tty->termios != NULL) {
2561                                 portp->stats.cflags = portp->tty->termios->c_cflag;
2562                                 portp->stats.iflags = portp->tty->termios->c_iflag;
2563                                 portp->stats.oflags = portp->tty->termios->c_oflag;
2564                                 portp->stats.lflags = portp->tty->termios->c_lflag;
2565                         }
2566                 }
2567         spin_unlock_irqrestore(&stallion_lock, flags);
2568
2569         head = portp->tx.head;
2570         tail = portp->tx.tail;
2571         portp->stats.txbuffered = (head >= tail) ? (head - tail) :
2572                 (STL_TXBUFSIZE - (tail - head));
2573
2574         portp->stats.signals = (unsigned long) stl_getsignals(portp);
2575
2576         return copy_to_user(cp, &portp->stats,
2577                             sizeof(comstats_t)) ? -EFAULT : 0;
2578 }
2579
2580 /*****************************************************************************/
2581
2582 /*
2583  *      Clear the port stats structure. We also return it zeroed out...
2584  */
2585
2586 static int stl_clrportstats(struct stlport *portp, comstats_t __user *cp)
2587 {
2588         comstats_t      stl_comstats;
2589
2590         if (!portp) {
2591                 if (copy_from_user(&stl_comstats, cp, sizeof(comstats_t)))
2592                         return -EFAULT;
2593                 portp = stl_getport(stl_comstats.brd, stl_comstats.panel,
2594                         stl_comstats.port);
2595                 if (portp == NULL)
2596                         return -ENODEV;
2597         }
2598
2599         memset(&portp->stats, 0, sizeof(comstats_t));
2600         portp->stats.brd = portp->brdnr;
2601         portp->stats.panel = portp->panelnr;
2602         portp->stats.port = portp->portnr;
2603         return copy_to_user(cp, &portp->stats,
2604                             sizeof(comstats_t)) ? -EFAULT : 0;
2605 }
2606
2607 /*****************************************************************************/
2608
2609 /*
2610  *      Return the entire driver ports structure to a user app.
2611  */
2612
2613 static int stl_getportstruct(struct stlport __user *arg)
2614 {
2615         struct stlport  stl_dummyport;
2616         struct stlport  *portp;
2617
2618         if (copy_from_user(&stl_dummyport, arg, sizeof(struct stlport)))
2619                 return -EFAULT;
2620         portp = stl_getport(stl_dummyport.brdnr, stl_dummyport.panelnr,
2621                  stl_dummyport.portnr);
2622         if (!portp)
2623                 return -ENODEV;
2624         return copy_to_user(arg, portp, sizeof(struct stlport)) ? -EFAULT : 0;
2625 }
2626
2627 /*****************************************************************************/
2628
2629 /*
2630  *      Return the entire driver board structure to a user app.
2631  */
2632
2633 static int stl_getbrdstruct(struct stlbrd __user *arg)
2634 {
2635         struct stlbrd   stl_dummybrd;
2636         struct stlbrd   *brdp;
2637
2638         if (copy_from_user(&stl_dummybrd, arg, sizeof(struct stlbrd)))
2639                 return -EFAULT;
2640         if (stl_dummybrd.brdnr >= STL_MAXBRDS)
2641                 return -ENODEV;
2642         brdp = stl_brds[stl_dummybrd.brdnr];
2643         if (!brdp)
2644                 return -ENODEV;
2645         return copy_to_user(arg, brdp, sizeof(struct stlbrd)) ? -EFAULT : 0;
2646 }
2647
2648 /*****************************************************************************/
2649
2650 /*
2651  *      The "staliomem" device is also required to do some special operations
2652  *      on the board and/or ports. In this driver it is mostly used for stats
2653  *      collection.
2654  */
2655
2656 static int stl_memioctl(struct inode *ip, struct file *fp, unsigned int cmd, unsigned long arg)
2657 {
2658         int     brdnr, rc;
2659         void __user *argp = (void __user *)arg;
2660
2661         pr_debug("stl_memioctl(ip=%p,fp=%p,cmd=%x,arg=%lx)\n", ip, fp, cmd,arg);
2662
2663         brdnr = iminor(ip);
2664         if (brdnr >= STL_MAXBRDS)
2665                 return -ENODEV;
2666         rc = 0;
2667
2668         switch (cmd) {
2669         case COM_GETPORTSTATS:
2670                 rc = stl_getportstats(NULL, argp);
2671                 break;
2672         case COM_CLRPORTSTATS:
2673                 rc = stl_clrportstats(NULL, argp);
2674                 break;
2675         case COM_GETBRDSTATS:
2676                 rc = stl_getbrdstats(argp);
2677                 break;
2678         case COM_READPORT:
2679                 rc = stl_getportstruct(argp);
2680                 break;
2681         case COM_READBOARD:
2682                 rc = stl_getbrdstruct(argp);
2683                 break;
2684         default:
2685                 rc = -ENOIOCTLCMD;
2686                 break;
2687         }
2688
2689         return rc;
2690 }
2691
2692 static const struct tty_operations stl_ops = {
2693         .open = stl_open,
2694         .close = stl_close,
2695         .write = stl_write,
2696         .put_char = stl_putchar,
2697         .flush_chars = stl_flushchars,
2698         .write_room = stl_writeroom,
2699         .chars_in_buffer = stl_charsinbuffer,
2700         .ioctl = stl_ioctl,
2701         .set_termios = stl_settermios,
2702         .throttle = stl_throttle,
2703         .unthrottle = stl_unthrottle,
2704         .stop = stl_stop,
2705         .start = stl_start,
2706         .hangup = stl_hangup,
2707         .flush_buffer = stl_flushbuffer,
2708         .break_ctl = stl_breakctl,
2709         .wait_until_sent = stl_waituntilsent,
2710         .send_xchar = stl_sendxchar,
2711         .read_proc = stl_readproc,
2712         .tiocmget = stl_tiocmget,
2713         .tiocmset = stl_tiocmset,
2714 };
2715
2716 /*****************************************************************************/
2717 /*                       CD1400 HARDWARE FUNCTIONS                           */
2718 /*****************************************************************************/
2719
2720 /*
2721  *      These functions get/set/update the registers of the cd1400 UARTs.
2722  *      Access to the cd1400 registers is via an address/data io port pair.
2723  *      (Maybe should make this inline...)
2724  */
2725
2726 static int stl_cd1400getreg(struct stlport *portp, int regnr)
2727 {
2728         outb((regnr + portp->uartaddr), portp->ioaddr);
2729         return inb(portp->ioaddr + EREG_DATA);
2730 }
2731
2732 static void stl_cd1400setreg(struct stlport *portp, int regnr, int value)
2733 {
2734         outb(regnr + portp->uartaddr, portp->ioaddr);
2735         outb(value, portp->ioaddr + EREG_DATA);
2736 }
2737
2738 static int stl_cd1400updatereg(struct stlport *portp, int regnr, int value)
2739 {
2740         outb(regnr + portp->uartaddr, portp->ioaddr);
2741         if (inb(portp->ioaddr + EREG_DATA) != value) {
2742                 outb(value, portp->ioaddr + EREG_DATA);
2743                 return 1;
2744         }
2745         return 0;
2746 }
2747
2748 /*****************************************************************************/
2749
2750 /*
2751  *      Inbitialize the UARTs in a panel. We don't care what sort of board
2752  *      these ports are on - since the port io registers are almost
2753  *      identical when dealing with ports.
2754  */
2755
2756 static int stl_cd1400panelinit(struct stlbrd *brdp, struct stlpanel *panelp)
2757 {
2758         unsigned int    gfrcr;
2759         int             chipmask, i, j;
2760         int             nrchips, uartaddr, ioaddr;
2761         unsigned long   flags;
2762
2763         pr_debug("stl_panelinit(brdp=%p,panelp=%p)\n", brdp, panelp);
2764
2765         spin_lock_irqsave(&brd_lock, flags);
2766         BRDENABLE(panelp->brdnr, panelp->pagenr);
2767
2768 /*
2769  *      Check that each chip is present and started up OK.
2770  */
2771         chipmask = 0;
2772         nrchips = panelp->nrports / CD1400_PORTS;
2773         for (i = 0; i < nrchips; i++) {
2774                 if (brdp->brdtype == BRD_ECHPCI) {
2775                         outb((panelp->pagenr + (i >> 1)), brdp->ioctrl);
2776                         ioaddr = panelp->iobase;
2777                 } else
2778                         ioaddr = panelp->iobase + (EREG_BANKSIZE * (i >> 1));
2779                 uartaddr = (i & 0x01) ? 0x080 : 0;
2780                 outb((GFRCR + uartaddr), ioaddr);
2781                 outb(0, (ioaddr + EREG_DATA));
2782                 outb((CCR + uartaddr), ioaddr);
2783                 outb(CCR_RESETFULL, (ioaddr + EREG_DATA));
2784                 outb(CCR_RESETFULL, (ioaddr + EREG_DATA));
2785                 outb((GFRCR + uartaddr), ioaddr);
2786                 for (j = 0; j < CCR_MAXWAIT; j++)
2787                         if ((gfrcr = inb(ioaddr + EREG_DATA)) != 0)
2788                                 break;
2789
2790                 if ((j >= CCR_MAXWAIT) || (gfrcr < 0x40) || (gfrcr > 0x60)) {
2791                         printk("STALLION: cd1400 not responding, "
2792                                 "brd=%d panel=%d chip=%d\n",
2793                                 panelp->brdnr, panelp->panelnr, i);
2794                         continue;
2795                 }
2796                 chipmask |= (0x1 << i);
2797                 outb((PPR + uartaddr), ioaddr);
2798                 outb(PPR_SCALAR, (ioaddr + EREG_DATA));
2799         }
2800
2801         BRDDISABLE(panelp->brdnr);
2802         spin_unlock_irqrestore(&brd_lock, flags);
2803         return chipmask;
2804 }
2805
2806 /*****************************************************************************/
2807
2808 /*
2809  *      Initialize hardware specific port registers.
2810  */
2811
2812 static void stl_cd1400portinit(struct stlbrd *brdp, struct stlpanel *panelp, struct stlport *portp)
2813 {
2814         unsigned long flags;
2815         pr_debug("stl_cd1400portinit(brdp=%p,panelp=%p,portp=%p)\n", brdp,
2816                         panelp, portp);
2817
2818         if ((brdp == NULL) || (panelp == NULL) ||
2819             (portp == NULL))
2820                 return;
2821
2822         spin_lock_irqsave(&brd_lock, flags);
2823         portp->ioaddr = panelp->iobase + (((brdp->brdtype == BRD_ECHPCI) ||
2824                 (portp->portnr < 8)) ? 0 : EREG_BANKSIZE);
2825         portp->uartaddr = (portp->portnr & 0x04) << 5;
2826         portp->pagenr = panelp->pagenr + (portp->portnr >> 3);
2827
2828         BRDENABLE(portp->brdnr, portp->pagenr);
2829         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
2830         stl_cd1400setreg(portp, LIVR, (portp->portnr << 3));
2831         portp->hwid = stl_cd1400getreg(portp, GFRCR);
2832         BRDDISABLE(portp->brdnr);
2833         spin_unlock_irqrestore(&brd_lock, flags);
2834 }
2835
2836 /*****************************************************************************/
2837
2838 /*
2839  *      Wait for the command register to be ready. We will poll this,
2840  *      since it won't usually take too long to be ready.
2841  */
2842
2843 static void stl_cd1400ccrwait(struct stlport *portp)
2844 {
2845         int     i;
2846
2847         for (i = 0; i < CCR_MAXWAIT; i++)
2848                 if (stl_cd1400getreg(portp, CCR) == 0)
2849                         return;
2850
2851         printk("STALLION: cd1400 not responding, port=%d panel=%d brd=%d\n",
2852                 portp->portnr, portp->panelnr, portp->brdnr);
2853 }
2854
2855 /*****************************************************************************/
2856
2857 /*
2858  *      Set up the cd1400 registers for a port based on the termios port
2859  *      settings.
2860  */
2861
2862 static void stl_cd1400setport(struct stlport *portp, struct ktermios *tiosp)
2863 {
2864         struct stlbrd   *brdp;
2865         unsigned long   flags;
2866         unsigned int    clkdiv, baudrate;
2867         unsigned char   cor1, cor2, cor3;
2868         unsigned char   cor4, cor5, ccr;
2869         unsigned char   srer, sreron, sreroff;
2870         unsigned char   mcor1, mcor2, rtpr;
2871         unsigned char   clk, div;
2872
2873         cor1 = 0;
2874         cor2 = 0;
2875         cor3 = 0;
2876         cor4 = 0;
2877         cor5 = 0;
2878         ccr = 0;
2879         rtpr = 0;
2880         clk = 0;
2881         div = 0;
2882         mcor1 = 0;
2883         mcor2 = 0;
2884         sreron = 0;
2885         sreroff = 0;
2886
2887         brdp = stl_brds[portp->brdnr];
2888         if (brdp == NULL)
2889                 return;
2890
2891 /*
2892  *      Set up the RX char ignore mask with those RX error types we
2893  *      can ignore. We can get the cd1400 to help us out a little here,
2894  *      it will ignore parity errors and breaks for us.
2895  */
2896         portp->rxignoremsk = 0;
2897         if (tiosp->c_iflag & IGNPAR) {
2898                 portp->rxignoremsk |= (ST_PARITY | ST_FRAMING | ST_OVERRUN);
2899                 cor1 |= COR1_PARIGNORE;
2900         }
2901         if (tiosp->c_iflag & IGNBRK) {
2902                 portp->rxignoremsk |= ST_BREAK;
2903                 cor4 |= COR4_IGNBRK;
2904         }
2905
2906         portp->rxmarkmsk = ST_OVERRUN;
2907         if (tiosp->c_iflag & (INPCK | PARMRK))
2908                 portp->rxmarkmsk |= (ST_PARITY | ST_FRAMING);
2909         if (tiosp->c_iflag & BRKINT)
2910                 portp->rxmarkmsk |= ST_BREAK;
2911
2912 /*
2913  *      Go through the char size, parity and stop bits and set all the
2914  *      option register appropriately.
2915  */
2916         switch (tiosp->c_cflag & CSIZE) {
2917         case CS5:
2918                 cor1 |= COR1_CHL5;
2919                 break;
2920         case CS6:
2921                 cor1 |= COR1_CHL6;
2922                 break;
2923         case CS7:
2924                 cor1 |= COR1_CHL7;
2925                 break;
2926         default:
2927                 cor1 |= COR1_CHL8;
2928                 break;
2929         }
2930
2931         if (tiosp->c_cflag & CSTOPB)
2932                 cor1 |= COR1_STOP2;
2933         else
2934                 cor1 |= COR1_STOP1;
2935
2936         if (tiosp->c_cflag & PARENB) {
2937                 if (tiosp->c_cflag & PARODD)
2938                         cor1 |= (COR1_PARENB | COR1_PARODD);
2939                 else
2940                         cor1 |= (COR1_PARENB | COR1_PAREVEN);
2941         } else {
2942                 cor1 |= COR1_PARNONE;
2943         }
2944
2945 /*
2946  *      Set the RX FIFO threshold at 6 chars. This gives a bit of breathing
2947  *      space for hardware flow control and the like. This should be set to
2948  *      VMIN. Also here we will set the RX data timeout to 10ms - this should
2949  *      really be based on VTIME.
2950  */
2951         cor3 |= FIFO_RXTHRESHOLD;
2952         rtpr = 2;
2953
2954 /*
2955  *      Calculate the baud rate timers. For now we will just assume that
2956  *      the input and output baud are the same. Could have used a baud
2957  *      table here, but this way we can generate virtually any baud rate
2958  *      we like!
2959  */
2960         baudrate = tiosp->c_cflag & CBAUD;
2961         if (baudrate & CBAUDEX) {
2962                 baudrate &= ~CBAUDEX;
2963                 if ((baudrate < 1) || (baudrate > 4))
2964                         tiosp->c_cflag &= ~CBAUDEX;
2965                 else
2966                         baudrate += 15;
2967         }
2968         baudrate = stl_baudrates[baudrate];
2969         if ((tiosp->c_cflag & CBAUD) == B38400) {
2970                 if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_HI)
2971                         baudrate = 57600;
2972                 else if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_VHI)
2973                         baudrate = 115200;
2974                 else if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_SHI)
2975                         baudrate = 230400;
2976                 else if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_WARP)
2977                         baudrate = 460800;
2978                 else if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_CUST)
2979                         baudrate = (portp->baud_base / portp->custom_divisor);
2980         }
2981         if (baudrate > STL_CD1400MAXBAUD)
2982                 baudrate = STL_CD1400MAXBAUD;
2983
2984         if (baudrate > 0) {
2985                 for (clk = 0; clk < CD1400_NUMCLKS; clk++) {
2986                         clkdiv = (portp->clk / stl_cd1400clkdivs[clk]) / baudrate;
2987                         if (clkdiv < 0x100)
2988                                 break;
2989                 }
2990                 div = (unsigned char) clkdiv;
2991         }
2992
2993 /*
2994  *      Check what form of modem signaling is required and set it up.
2995  */
2996         if ((tiosp->c_cflag & CLOCAL) == 0) {
2997                 mcor1 |= MCOR1_DCD;
2998                 mcor2 |= MCOR2_DCD;
2999                 sreron |= SRER_MODEM;
3000                 portp->flags |= ASYNC_CHECK_CD;
3001         } else
3002                 portp->flags &= ~ASYNC_CHECK_CD;
3003
3004 /*
3005  *      Setup cd1400 enhanced modes if we can. In particular we want to
3006  *      handle as much of the flow control as possible automatically. As
3007  *      well as saving a few CPU cycles it will also greatly improve flow
3008  *      control reliability.
3009  */
3010         if (tiosp->c_iflag & IXON) {
3011                 cor2 |= COR2_TXIBE;
3012                 cor3 |= COR3_SCD12;
3013                 if (tiosp->c_iflag & IXANY)
3014                         cor2 |= COR2_IXM;
3015         }
3016
3017         if (tiosp->c_cflag & CRTSCTS) {
3018                 cor2 |= COR2_CTSAE;
3019                 mcor1 |= FIFO_RTSTHRESHOLD;
3020         }
3021
3022 /*
3023  *      All cd1400 register values calculated so go through and set
3024  *      them all up.
3025  */
3026
3027         pr_debug("SETPORT: portnr=%d panelnr=%d brdnr=%d\n",
3028                 portp->portnr, portp->panelnr, portp->brdnr);
3029         pr_debug("    cor1=%x cor2=%x cor3=%x cor4=%x cor5=%x\n",
3030                 cor1, cor2, cor3, cor4, cor5);
3031         pr_debug("    mcor1=%x mcor2=%x rtpr=%x sreron=%x sreroff=%x\n",
3032                 mcor1, mcor2, rtpr, sreron, sreroff);
3033         pr_debug("    tcor=%x tbpr=%x rcor=%x rbpr=%x\n", clk, div, clk, div);
3034         pr_debug("    schr1=%x schr2=%x schr3=%x schr4=%x\n",
3035                 tiosp->c_cc[VSTART], tiosp->c_cc[VSTOP],
3036                 tiosp->c_cc[VSTART], tiosp->c_cc[VSTOP]);
3037
3038         spin_lock_irqsave(&brd_lock, flags);
3039         BRDENABLE(portp->brdnr, portp->pagenr);
3040         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x3));
3041         srer = stl_cd1400getreg(portp, SRER);
3042         stl_cd1400setreg(portp, SRER, 0);
3043         if (stl_cd1400updatereg(portp, COR1, cor1))
3044                 ccr = 1;
3045         if (stl_cd1400updatereg(portp, COR2, cor2))
3046                 ccr = 1;
3047         if (stl_cd1400updatereg(portp, COR3, cor3))
3048                 ccr = 1;
3049         if (ccr) {
3050                 stl_cd1400ccrwait(portp);
3051                 stl_cd1400setreg(portp, CCR, CCR_CORCHANGE);
3052         }
3053         stl_cd1400setreg(portp, COR4, cor4);
3054         stl_cd1400setreg(portp, COR5, cor5);
3055         stl_cd1400setreg(portp, MCOR1, mcor1);
3056         stl_cd1400setreg(portp, MCOR2, mcor2);
3057         if (baudrate > 0) {
3058                 stl_cd1400setreg(portp, TCOR, clk);
3059                 stl_cd1400setreg(portp, TBPR, div);
3060                 stl_cd1400setreg(portp, RCOR, clk);
3061                 stl_cd1400setreg(portp, RBPR, div);
3062         }
3063         stl_cd1400setreg(portp, SCHR1, tiosp->c_cc[VSTART]);
3064         stl_cd1400setreg(portp, SCHR2, tiosp->c_cc[VSTOP]);
3065         stl_cd1400setreg(portp, SCHR3, tiosp->c_cc[VSTART]);
3066         stl_cd1400setreg(portp, SCHR4, tiosp->c_cc[VSTOP]);
3067         stl_cd1400setreg(portp, RTPR, rtpr);
3068         mcor1 = stl_cd1400getreg(portp, MSVR1);
3069         if (mcor1 & MSVR1_DCD)
3070                 portp->sigs |= TIOCM_CD;
3071         else
3072                 portp->sigs &= ~TIOCM_CD;
3073         stl_cd1400setreg(portp, SRER, ((srer & ~sreroff) | sreron));
3074         BRDDISABLE(portp->brdnr);
3075         spin_unlock_irqrestore(&brd_lock, flags);
3076 }
3077
3078 /*****************************************************************************/
3079
3080 /*
3081  *      Set the state of the DTR and RTS signals.
3082  */
3083
3084 static void stl_cd1400setsignals(struct stlport *portp, int dtr, int rts)
3085 {
3086         unsigned char   msvr1, msvr2;
3087         unsigned long   flags;
3088
3089         pr_debug("stl_cd1400setsignals(portp=%p,dtr=%d,rts=%d)\n",
3090                         portp, dtr, rts);
3091
3092         msvr1 = 0;
3093         msvr2 = 0;
3094         if (dtr > 0)
3095                 msvr1 = MSVR1_DTR;
3096         if (rts > 0)
3097                 msvr2 = MSVR2_RTS;
3098
3099         spin_lock_irqsave(&brd_lock, flags);
3100         BRDENABLE(portp->brdnr, portp->pagenr);
3101         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
3102         if (rts >= 0)
3103                 stl_cd1400setreg(portp, MSVR2, msvr2);
3104         if (dtr >= 0)
3105                 stl_cd1400setreg(portp, MSVR1, msvr1);
3106         BRDDISABLE(portp->brdnr);
3107         spin_unlock_irqrestore(&brd_lock, flags);
3108 }
3109
3110 /*****************************************************************************/
3111
3112 /*
3113  *      Return the state of the signals.
3114  */
3115
3116 static int stl_cd1400getsignals(struct stlport *portp)
3117 {
3118         unsigned char   msvr1, msvr2;
3119         unsigned long   flags;
3120         int             sigs;
3121
3122         pr_debug("stl_cd1400getsignals(portp=%p)\n", portp);
3123
3124         spin_lock_irqsave(&brd_lock, flags);
3125         BRDENABLE(portp->brdnr, portp->pagenr);
3126         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
3127         msvr1 = stl_cd1400getreg(portp, MSVR1);
3128         msvr2 = stl_cd1400getreg(portp, MSVR2);
3129         BRDDISABLE(portp->brdnr);
3130         spin_unlock_irqrestore(&brd_lock, flags);
3131
3132         sigs = 0;
3133         sigs |= (msvr1 & MSVR1_DCD) ? TIOCM_CD : 0;
3134         sigs |= (msvr1 & MSVR1_CTS) ? TIOCM_CTS : 0;
3135         sigs |= (msvr1 & MSVR1_DTR) ? TIOCM_DTR : 0;
3136         sigs |= (msvr2 & MSVR2_RTS) ? TIOCM_RTS : 0;
3137 #if 0
3138         sigs |= (msvr1 & MSVR1_RI) ? TIOCM_RI : 0;
3139         sigs |= (msvr1 & MSVR1_DSR) ? TIOCM_DSR : 0;
3140 #else
3141         sigs |= TIOCM_DSR;
3142 #endif
3143         return sigs;
3144 }
3145
3146 /*****************************************************************************/
3147
3148 /*
3149  *      Enable/Disable the Transmitter and/or Receiver.
3150  */
3151
3152 static void stl_cd1400enablerxtx(struct stlport *portp, int rx, int tx)
3153 {
3154         unsigned char   ccr;
3155         unsigned long   flags;
3156
3157         pr_debug("stl_cd1400enablerxtx(portp=%p,rx=%d,tx=%d)\n", portp, rx, tx);
3158
3159         ccr = 0;
3160
3161         if (tx == 0)
3162                 ccr |= CCR_TXDISABLE;
3163         else if (tx > 0)
3164                 ccr |= CCR_TXENABLE;
3165         if (rx == 0)
3166                 ccr |= CCR_RXDISABLE;
3167         else if (rx > 0)
3168                 ccr |= CCR_RXENABLE;
3169
3170         spin_lock_irqsave(&brd_lock, flags);
3171         BRDENABLE(portp->brdnr, portp->pagenr);
3172         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
3173         stl_cd1400ccrwait(portp);
3174         stl_cd1400setreg(portp, CCR, ccr);
3175         stl_cd1400ccrwait(portp);
3176         BRDDISABLE(portp->brdnr);
3177         spin_unlock_irqrestore(&brd_lock, flags);
3178 }
3179
3180 /*****************************************************************************/
3181
3182 /*
3183  *      Start/stop the Transmitter and/or Receiver.
3184  */
3185
3186 static void stl_cd1400startrxtx(struct stlport *portp, int rx, int tx)
3187 {
3188         unsigned char   sreron, sreroff;
3189         unsigned long   flags;
3190
3191         pr_debug("stl_cd1400startrxtx(portp=%p,rx=%d,tx=%d)\n", portp, rx, tx);
3192
3193         sreron = 0;
3194         sreroff = 0;
3195         if (tx == 0)
3196                 sreroff |= (SRER_TXDATA | SRER_TXEMPTY);
3197         else if (tx == 1)
3198                 sreron |= SRER_TXDATA;
3199         else if (tx >= 2)
3200                 sreron |= SRER_TXEMPTY;
3201         if (rx == 0)
3202                 sreroff |= SRER_RXDATA;
3203         else if (rx > 0)
3204                 sreron |= SRER_RXDATA;
3205
3206         spin_lock_irqsave(&brd_lock, flags);
3207         BRDENABLE(portp->brdnr, portp->pagenr);
3208         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
3209         stl_cd1400setreg(portp, SRER,
3210                 ((stl_cd1400getreg(portp, SRER) & ~sreroff) | sreron));
3211         BRDDISABLE(portp->brdnr);
3212         if (tx > 0)
3213                 set_bit(ASYI_TXBUSY, &portp->istate);
3214         spin_unlock_irqrestore(&brd_lock, flags);
3215 }
3216
3217 /*****************************************************************************/
3218
3219 /*
3220  *      Disable all interrupts from this port.
3221  */
3222
3223 static void stl_cd1400disableintrs(struct stlport *portp)
3224 {
3225         unsigned long   flags;
3226
3227         pr_debug("stl_cd1400disableintrs(portp=%p)\n", portp);
3228
3229         spin_lock_irqsave(&brd_lock, flags);
3230         BRDENABLE(portp->brdnr, portp->pagenr);
3231         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
3232         stl_cd1400setreg(portp, SRER, 0);
3233         BRDDISABLE(portp->brdnr);
3234         spin_unlock_irqrestore(&brd_lock, flags);
3235 }
3236
3237 /*****************************************************************************/
3238
3239 static void stl_cd1400sendbreak(struct stlport *portp, int len)
3240 {
3241         unsigned long   flags;
3242
3243         pr_debug("stl_cd1400sendbreak(portp=%p,len=%d)\n", portp, len);
3244
3245         spin_lock_irqsave(&brd_lock, flags);
3246         BRDENABLE(portp->brdnr, portp->pagenr);
3247         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
3248         stl_cd1400setreg(portp, SRER,
3249                 ((stl_cd1400getreg(portp, SRER) & ~SRER_TXDATA) |
3250                 SRER_TXEMPTY));
3251         BRDDISABLE(portp->brdnr);
3252         portp->brklen = len;
3253         if (len == 1)
3254                 portp->stats.txbreaks++;
3255         spin_unlock_irqrestore(&brd_lock, flags);
3256 }
3257
3258 /*****************************************************************************/
3259
3260 /*
3261  *      Take flow control actions...
3262  */
3263
3264 static void stl_cd1400flowctrl(struct stlport *portp, int state)
3265 {
3266         struct tty_struct       *tty;
3267         unsigned long           flags;
3268
3269         pr_debug("stl_cd1400flowctrl(portp=%p,state=%x)\n", portp, state);
3270
3271         if (portp == NULL)
3272                 return;
3273         tty = portp->tty;
3274         if (tty == NULL)
3275                 return;
3276
3277         spin_lock_irqsave(&brd_lock, flags);
3278         BRDENABLE(portp->brdnr, portp->pagenr);
3279         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
3280
3281         if (state) {
3282                 if (tty->termios->c_iflag & IXOFF) {
3283                         stl_cd1400ccrwait(portp);
3284                         stl_cd1400setreg(portp, CCR, CCR_SENDSCHR1);
3285                         portp->stats.rxxon++;
3286                         stl_cd1400ccrwait(portp);
3287                 }
3288 /*
3289  *              Question: should we return RTS to what it was before? It may
3290  *              have been set by an ioctl... Suppose not, since if you have
3291  *              hardware flow control set then it is pretty silly to go and
3292  *              set the RTS line by hand.
3293  */
3294                 if (tty->termios->c_cflag & CRTSCTS) {
3295                         stl_cd1400setreg(portp, MCOR1,
3296                                 (stl_cd1400getreg(portp, MCOR1) |
3297                                 FIFO_RTSTHRESHOLD));
3298                         stl_cd1400setreg(portp, MSVR2, MSVR2_RTS);
3299                         portp->stats.rxrtson++;
3300                 }
3301         } else {
3302                 if (tty->termios->c_iflag & IXOFF) {
3303                         stl_cd1400ccrwait(portp);
3304                         stl_cd1400setreg(portp, CCR, CCR_SENDSCHR2);
3305                         portp->stats.rxxoff++;
3306                         stl_cd1400ccrwait(portp);
3307                 }
3308                 if (tty->termios->c_cflag & CRTSCTS) {
3309                         stl_cd1400setreg(portp, MCOR1,
3310                                 (stl_cd1400getreg(portp, MCOR1) & 0xf0));
3311                         stl_cd1400setreg(portp, MSVR2, 0);
3312                         portp->stats.rxrtsoff++;
3313                 }
3314         }
3315
3316         BRDDISABLE(portp->brdnr);
3317         spin_unlock_irqrestore(&brd_lock, flags);
3318 }
3319
3320 /*****************************************************************************/
3321
3322 /*
3323  *      Send a flow control character...
3324  */
3325
3326 static void stl_cd1400sendflow(struct stlport *portp, int state)
3327 {
3328         struct tty_struct       *tty;
3329         unsigned long           flags;
3330
3331         pr_debug("stl_cd1400sendflow(portp=%p,state=%x)\n", portp, state);
3332
3333         if (portp == NULL)
3334                 return;
3335         tty = portp->tty;
3336         if (tty == NULL)
3337                 return;
3338
3339         spin_lock_irqsave(&brd_lock, flags);
3340         BRDENABLE(portp->brdnr, portp->pagenr);
3341         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
3342         if (state) {
3343                 stl_cd1400ccrwait(portp);
3344                 stl_cd1400setreg(portp, CCR, CCR_SENDSCHR1);
3345                 portp->stats.rxxon++;
3346                 stl_cd1400ccrwait(portp);
3347         } else {
3348                 stl_cd1400ccrwait(portp);
3349                 stl_cd1400setreg(portp, CCR, CCR_SENDSCHR2);
3350                 portp->stats.rxxoff++;
3351                 stl_cd1400ccrwait(portp);
3352         }
3353         BRDDISABLE(portp->brdnr);
3354         spin_unlock_irqrestore(&brd_lock, flags);
3355 }
3356
3357 /*****************************************************************************/
3358
3359 static void stl_cd1400flush(struct stlport *portp)
3360 {
3361         unsigned long   flags;
3362
3363         pr_debug("stl_cd1400flush(portp=%p)\n", portp);
3364
3365         if (portp == NULL)
3366                 return;
3367
3368         spin_lock_irqsave(&brd_lock, flags);
3369         BRDENABLE(portp->brdnr, portp->pagenr);
3370         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
3371         stl_cd1400ccrwait(portp);
3372         stl_cd1400setreg(portp, CCR, CCR_TXFLUSHFIFO);
3373         stl_cd1400ccrwait(portp);
3374         portp->tx.tail = portp->tx.head;
3375         BRDDISABLE(portp->brdnr);
3376         spin_unlock_irqrestore(&brd_lock, flags);
3377 }
3378
3379 /*****************************************************************************/
3380
3381 /*
3382  *      Return the current state of data flow on this port. This is only
3383  *      really interresting when determining if data has fully completed
3384  *      transmission or not... This is easy for the cd1400, it accurately
3385  *      maintains the busy port flag.
3386  */
3387
3388 static int stl_cd1400datastate(struct stlport *portp)
3389 {
3390         pr_debug("stl_cd1400datastate(portp=%p)\n", portp);
3391
3392         if (portp == NULL)
3393                 return 0;
3394
3395         return test_bit(ASYI_TXBUSY, &portp->istate) ? 1 : 0;
3396 }
3397
3398 /*****************************************************************************/
3399
3400 /*
3401  *      Interrupt service routine for cd1400 EasyIO boards.
3402  */
3403
3404 static void stl_cd1400eiointr(struct stlpanel *panelp, unsigned int iobase)
3405 {
3406         unsigned char   svrtype;
3407
3408         pr_debug("stl_cd1400eiointr(panelp=%p,iobase=%x)\n", panelp, iobase);
3409
3410         spin_lock(&brd_lock);
3411         outb(SVRR, iobase);
3412         svrtype = inb(iobase + EREG_DATA);
3413         if (panelp->nrports > 4) {
3414                 outb((SVRR + 0x80), iobase);
3415                 svrtype |= inb(iobase + EREG_DATA);
3416         }
3417
3418         if (svrtype & SVRR_RX)
3419                 stl_cd1400rxisr(panelp, iobase);
3420         else if (svrtype & SVRR_TX)
3421                 stl_cd1400txisr(panelp, iobase);
3422         else if (svrtype & SVRR_MDM)
3423                 stl_cd1400mdmisr(panelp, iobase);
3424
3425         spin_unlock(&brd_lock);
3426 }
3427
3428 /*****************************************************************************/
3429
3430 /*
3431  *      Interrupt service routine for cd1400 panels.
3432  */
3433
3434 static void stl_cd1400echintr(struct stlpanel *panelp, unsigned int iobase)
3435 {
3436         unsigned char   svrtype;
3437
3438         pr_debug("stl_cd1400echintr(panelp=%p,iobase=%x)\n", panelp, iobase);
3439
3440         outb(SVRR, iobase);
3441         svrtype = inb(iobase + EREG_DATA);
3442         outb((SVRR + 0x80), iobase);
3443         svrtype |= inb(iobase + EREG_DATA);
3444         if (svrtype & SVRR_RX)
3445                 stl_cd1400rxisr(panelp, iobase);
3446         else if (svrtype & SVRR_TX)
3447                 stl_cd1400txisr(panelp, iobase);
3448         else if (svrtype & SVRR_MDM)
3449                 stl_cd1400mdmisr(panelp, iobase);
3450 }
3451
3452
3453 /*****************************************************************************/
3454
3455 /*
3456  *      Unfortunately we need to handle breaks in the TX data stream, since
3457  *      this is the only way to generate them on the cd1400.
3458  */
3459
3460 static int stl_cd1400breakisr(struct stlport *portp, int ioaddr)
3461 {
3462         if (portp->brklen == 1) {
3463                 outb((COR2 + portp->uartaddr), ioaddr);
3464                 outb((inb(ioaddr + EREG_DATA) | COR2_ETC),
3465                         (ioaddr + EREG_DATA));
3466                 outb((TDR + portp->uartaddr), ioaddr);
3467                 outb(ETC_CMD, (ioaddr + EREG_DATA));
3468                 outb(ETC_STARTBREAK, (ioaddr + EREG_DATA));
3469                 outb((SRER + portp->uartaddr), ioaddr);
3470                 outb((inb(ioaddr + EREG_DATA) & ~(SRER_TXDATA | SRER_TXEMPTY)),
3471                         (ioaddr + EREG_DATA));
3472                 return 1;
3473         } else if (portp->brklen > 1) {
3474                 outb((TDR + portp->uartaddr), ioaddr);
3475                 outb(ETC_CMD, (ioaddr + EREG_DATA));
3476                 outb(ETC_STOPBREAK, (ioaddr + EREG_DATA));
3477                 portp->brklen = -1;
3478                 return 1;
3479         } else {
3480                 outb((COR2 + portp->uartaddr), ioaddr);
3481                 outb((inb(ioaddr + EREG_DATA) & ~COR2_ETC),
3482                         (ioaddr + EREG_DATA));
3483                 portp->brklen = 0;
3484         }
3485         return 0;
3486 }
3487
3488 /*****************************************************************************/
3489
3490 /*
3491  *      Transmit interrupt handler. This has gotta be fast!  Handling TX
3492  *      chars is pretty simple, stuff as many as possible from the TX buffer
3493  *      into the cd1400 FIFO. Must also handle TX breaks here, since they
3494  *      are embedded as commands in the data stream. Oh no, had to use a goto!
3495  *      This could be optimized more, will do when I get time...
3496  *      In practice it is possible that interrupts are enabled but that the
3497  *      port has been hung up. Need to handle not having any TX buffer here,
3498  *      this is done by using the side effect that head and tail will also
3499  *      be NULL if the buffer has been freed.
3500  */
3501
3502 static void stl_cd1400txisr(struct stlpanel *panelp, int ioaddr)
3503 {
3504         struct stlport  *portp;
3505         int             len, stlen;
3506         char            *head, *tail;
3507         unsigned char   ioack, srer;
3508
3509         pr_debug("stl_cd1400txisr(panelp=%p,ioaddr=%x)\n", panelp, ioaddr);
3510
3511         ioack = inb(ioaddr + EREG_TXACK);
3512         if (((ioack & panelp->ackmask) != 0) ||
3513             ((ioack & ACK_TYPMASK) != ACK_TYPTX)) {
3514                 printk("STALLION: bad TX interrupt ack value=%x\n", ioack);
3515                 return;
3516         }
3517         portp = panelp->ports[(ioack >> 3)];
3518
3519 /*
3520  *      Unfortunately we need to handle breaks in the data stream, since
3521  *      this is the only way to generate them on the cd1400. Do it now if
3522  *      a break is to be sent.
3523  */
3524         if (portp->brklen != 0)
3525                 if (stl_cd1400breakisr(portp, ioaddr))
3526                         goto stl_txalldone;
3527
3528         head = portp->tx.head;
3529         tail = portp->tx.tail;
3530         len = (head >= tail) ? (head - tail) : (STL_TXBUFSIZE - (tail - head));
3531         if ((len == 0) || ((len < STL_TXBUFLOW) &&
3532             (test_bit(ASYI_TXLOW, &portp->istate) == 0))) {
3533                 set_bit(ASYI_TXLOW, &portp->istate);
3534                 schedule_work(&portp->tqueue);
3535         }
3536
3537         if (len == 0) {
3538                 outb((SRER + portp->uartaddr), ioaddr);
3539                 srer = inb(ioaddr + EREG_DATA);
3540                 if (srer & SRER_TXDATA) {
3541                         srer = (srer & ~SRER_TXDATA) | SRER_TXEMPTY;
3542                 } else {
3543                         srer &= ~(SRER_TXDATA | SRER_TXEMPTY);
3544                         clear_bit(ASYI_TXBUSY, &portp->istate);
3545                 }
3546                 outb(srer, (ioaddr + EREG_DATA));
3547         } else {
3548                 len = min(len, CD1400_TXFIFOSIZE);
3549                 portp->stats.txtotal += len;
3550                 stlen = min(len, ((portp->tx.buf + STL_TXBUFSIZE) - tail));
3551                 outb((TDR + portp->uartaddr), ioaddr);
3552                 outsb((ioaddr + EREG_DATA), tail, stlen);
3553                 len -= stlen;
3554                 tail += stlen;
3555                 if (tail >= (portp->tx.buf + STL_TXBUFSIZE))
3556                         tail = portp->tx.buf;
3557                 if (len > 0) {
3558                         outsb((ioaddr + EREG_DATA), tail, len);
3559                         tail += len;
3560                 }
3561                 portp->tx.tail = tail;
3562         }
3563
3564 stl_txalldone:
3565         outb((EOSRR + portp->uartaddr), ioaddr);
3566         outb(0, (ioaddr + EREG_DATA));
3567 }
3568
3569 /*****************************************************************************/
3570
3571 /*
3572  *      Receive character interrupt handler. Determine if we have good chars
3573  *      or bad chars and then process appropriately. Good chars are easy
3574  *      just shove the lot into the RX buffer and set all status byte to 0.
3575  *      If a bad RX char then process as required. This routine needs to be
3576  *      fast!  In practice it is possible that we get an interrupt on a port
3577  *      that is closed. This can happen on hangups - since they completely
3578  *      shutdown a port not in user context. Need to handle this case.
3579  */
3580
3581 static void stl_cd1400rxisr(struct stlpanel *panelp, int ioaddr)
3582 {
3583         struct stlport          *portp;
3584         struct tty_struct       *tty;
3585         unsigned int            ioack, len, buflen;
3586         unsigned char           status;
3587         char                    ch;
3588
3589         pr_debug("stl_cd1400rxisr(panelp=%p,ioaddr=%x)\n", panelp, ioaddr);
3590
3591         ioack = inb(ioaddr + EREG_RXACK);
3592         if ((ioack & panelp->ackmask) != 0) {
3593                 printk("STALLION: bad RX interrupt ack value=%x\n", ioack);
3594                 return;
3595         }
3596         portp = panelp->ports[(ioack >> 3)];
3597         tty = portp->tty;
3598
3599         if ((ioack & ACK_TYPMASK) == ACK_TYPRXGOOD) {
3600                 outb((RDCR + portp->uartaddr), ioaddr);
3601                 len = inb(ioaddr + EREG_DATA);
3602                 if (tty == NULL || (buflen = tty_buffer_request_room(tty, len)) == 0) {
3603                         len = min(len, sizeof(stl_unwanted));
3604                         outb((RDSR + portp->uartaddr), ioaddr);
3605                         insb((ioaddr + EREG_DATA), &stl_unwanted[0], len);
3606                         portp->stats.rxlost += len;
3607                         portp->stats.rxtotal += len;
3608                 } else {
3609                         len = min(len, buflen);
3610                         if (len > 0) {
3611                                 unsigned char *ptr;
3612                                 outb((RDSR + portp->uartaddr), ioaddr);
3613                                 tty_prepare_flip_string(tty, &ptr, len);
3614                                 insb((ioaddr + EREG_DATA), ptr, len);
3615                                 tty_schedule_flip(tty);
3616                                 portp->stats.rxtotal += len;
3617                         }
3618                 }
3619         } else if ((ioack & ACK_TYPMASK) == ACK_TYPRXBAD) {
3620                 outb((RDSR + portp->uartaddr), ioaddr);
3621                 status = inb(ioaddr + EREG_DATA);
3622                 ch = inb(ioaddr + EREG_DATA);
3623                 if (status & ST_PARITY)
3624                         portp->stats.rxparity++;
3625                 if (status & ST_FRAMING)
3626                         portp->stats.rxframing++;
3627                 if (status & ST_OVERRUN)
3628                         portp->stats.rxoverrun++;
3629                 if (status & ST_BREAK)
3630                         portp->stats.rxbreaks++;
3631                 if (status & ST_SCHARMASK) {
3632                         if ((status & ST_SCHARMASK) == ST_SCHAR1)
3633                                 portp->stats.txxon++;
3634                         if ((status & ST_SCHARMASK) == ST_SCHAR2)
3635                                 portp->stats.txxoff++;
3636                         goto stl_rxalldone;
3637                 }
3638                 if (tty != NULL && (portp->rxignoremsk & status) == 0) {
3639                         if (portp->rxmarkmsk & status) {
3640                                 if (status & ST_BREAK) {
3641                                         status = TTY_BREAK;
3642                                         if (portp->flags & ASYNC_SAK) {
3643                                                 do_SAK(tty);
3644                                                 BRDENABLE(portp->brdnr, portp->pagenr);
3645                                         }
3646                                 } else if (status & ST_PARITY)
3647                                         status = TTY_PARITY;
3648                                 else if (status & ST_FRAMING)
3649                                         status = TTY_FRAME;
3650                                 else if(status & ST_OVERRUN)
3651                                         status = TTY_OVERRUN;
3652                                 else
3653                                         status = 0;
3654                         } else
3655                                 status = 0;
3656                         tty_insert_flip_char(tty, ch, status);
3657                         tty_schedule_flip(tty);
3658                 }
3659         } else {
3660                 printk("STALLION: bad RX interrupt ack value=%x\n", ioack);
3661                 return;
3662         }
3663
3664 stl_rxalldone:
3665         outb((EOSRR + portp->uartaddr), ioaddr);
3666         outb(0, (ioaddr + EREG_DATA));
3667 }
3668
3669 /*****************************************************************************/
3670
3671 /*
3672  *      Modem interrupt handler. The is called when the modem signal line
3673  *      (DCD) has changed state. Leave most of the work to the off-level
3674  *      processing routine.
3675  */
3676
3677 static void stl_cd1400mdmisr(struct stlpanel *panelp, int ioaddr)
3678 {
3679         struct stlport  *portp;
3680         unsigned int    ioack;
3681         unsigned char   misr;
3682
3683         pr_debug("stl_cd1400mdmisr(panelp=%p)\n", panelp);
3684
3685         ioack = inb(ioaddr + EREG_MDACK);
3686         if (((ioack & panelp->ackmask) != 0) ||
3687             ((ioack & ACK_TYPMASK) != ACK_TYPMDM)) {
3688                 printk("STALLION: bad MODEM interrupt ack value=%x\n", ioack);
3689                 return;
3690         }
3691         portp = panelp->ports[(ioack >> 3)];
3692
3693         outb((MISR + portp->uartaddr), ioaddr);
3694         misr = inb(ioaddr + EREG_DATA);
3695         if (misr & MISR_DCD) {
3696                 set_bit(ASYI_DCDCHANGE, &portp->istate);
3697                 schedule_work(&portp->tqueue);
3698                 portp->stats.modem++;
3699         }
3700
3701         outb((EOSRR + portp->uartaddr), ioaddr);
3702         outb(0, (ioaddr + EREG_DATA));
3703 }
3704
3705 /*****************************************************************************/
3706 /*                      SC26198 HARDWARE FUNCTIONS                           */
3707 /*****************************************************************************/
3708
3709 /*
3710  *      These functions get/set/update the registers of the sc26198 UARTs.
3711  *      Access to the sc26198 registers is via an address/data io port pair.
3712  *      (Maybe should make this inline...)
3713  */
3714
3715 static int stl_sc26198getreg(struct stlport *portp, int regnr)
3716 {
3717         outb((regnr | portp->uartaddr), (portp->ioaddr + XP_ADDR));
3718         return inb(portp->ioaddr + XP_DATA);
3719 }
3720
3721 static void stl_sc26198setreg(struct stlport *portp, int regnr, int value)
3722 {
3723         outb((regnr | portp->uartaddr), (portp->ioaddr + XP_ADDR));
3724         outb(value, (portp->ioaddr + XP_DATA));
3725 }
3726
3727 static int stl_sc26198updatereg(struct stlport *portp, int regnr, int value)
3728 {
3729         outb((regnr | portp->uartaddr), (portp->ioaddr + XP_ADDR));
3730         if (inb(portp->ioaddr + XP_DATA) != value) {
3731                 outb(value, (portp->ioaddr + XP_DATA));
3732                 return 1;
3733         }
3734         return 0;
3735 }
3736
3737 /*****************************************************************************/
3738
3739 /*
3740  *      Functions to get and set the sc26198 global registers.
3741  */
3742
3743 static int stl_sc26198getglobreg(struct stlport *portp, int regnr)
3744 {
3745         outb(regnr, (portp->ioaddr + XP_ADDR));
3746         return inb(portp->ioaddr + XP_DATA);
3747 }
3748
3749 #if 0
3750 static void stl_sc26198setglobreg(struct stlport *portp, int regnr, int value)
3751 {
3752         outb(regnr, (portp->ioaddr + XP_ADDR));
3753         outb(value, (portp->ioaddr + XP_DATA));
3754 }
3755 #endif
3756
3757 /*****************************************************************************/
3758
3759 /*
3760  *      Inbitialize the UARTs in a panel. We don't care what sort of board
3761  *      these ports are on - since the port io registers are almost
3762  *      identical when dealing with ports.
3763  */
3764
3765 static int stl_sc26198panelinit(struct stlbrd *brdp, struct stlpanel *panelp)
3766 {
3767         int     chipmask, i;
3768         int     nrchips, ioaddr;
3769
3770         pr_debug("stl_sc26198panelinit(brdp=%p,panelp=%p)\n", brdp, panelp);
3771
3772         BRDENABLE(panelp->brdnr, panelp->pagenr);
3773
3774 /*
3775  *      Check that each chip is present and started up OK.
3776  */
3777         chipmask = 0;
3778         nrchips = (panelp->nrports + 4) / SC26198_PORTS;
3779         if (brdp->brdtype == BRD_ECHPCI)
3780                 outb(panelp->pagenr, brdp->ioctrl);
3781
3782         for (i = 0; i < nrchips; i++) {
3783                 ioaddr = panelp->iobase + (i * 4);
3784                 outb(SCCR, (ioaddr + XP_ADDR));
3785                 outb(CR_RESETALL, (ioaddr + XP_DATA));
3786                 outb(TSTR, (ioaddr + XP_ADDR));
3787                 if (inb(ioaddr + XP_DATA) != 0) {
3788                         printk("STALLION: sc26198 not responding, "
3789                                 "brd=%d panel=%d chip=%d\n",
3790                                 panelp->brdnr, panelp->panelnr, i);
3791                         continue;
3792                 }
3793                 chipmask |= (0x1 << i);
3794                 outb(GCCR, (ioaddr + XP_ADDR));
3795                 outb(GCCR_IVRTYPCHANACK, (ioaddr + XP_DATA));
3796                 outb(WDTRCR, (ioaddr + XP_ADDR));
3797                 outb(0xff, (ioaddr + XP_DATA));
3798         }
3799
3800         BRDDISABLE(panelp->brdnr);
3801         return chipmask;
3802 }
3803
3804 /*****************************************************************************/
3805
3806 /*
3807  *      Initialize hardware specific port registers.
3808  */
3809
3810 static void stl_sc26198portinit(struct stlbrd *brdp, struct stlpanel *panelp, struct stlport *portp)
3811 {
3812         pr_debug("stl_sc26198portinit(brdp=%p,panelp=%p,portp=%p)\n", brdp,
3813                         panelp, portp);
3814
3815         if ((brdp == NULL) || (panelp == NULL) ||
3816             (portp == NULL))
3817                 return;
3818
3819         portp->ioaddr = panelp->iobase + ((portp->portnr < 8) ? 0 : 4);
3820         portp->uartaddr = (portp->portnr & 0x07) << 4;
3821         portp->pagenr = panelp->pagenr;
3822         portp->hwid = 0x1;
3823
3824         BRDENABLE(portp->brdnr, portp->pagenr);
3825         stl_sc26198setreg(portp, IOPCR, IOPCR_SETSIGS);
3826         BRDDISABLE(portp->brdnr);
3827 }
3828
3829 /*****************************************************************************/
3830
3831 /*
3832  *      Set up the sc26198 registers for a port based on the termios port
3833  *      settings.
3834  */
3835
3836 static void stl_sc26198setport(struct stlport *portp, struct ktermios *tiosp)
3837 {
3838         struct stlbrd   *brdp;
3839         unsigned long   flags;
3840         unsigned int    baudrate;
3841         unsigned char   mr0, mr1, mr2, clk;
3842         unsigned char   imron, imroff, iopr, ipr;
3843
3844         mr0 = 0;
3845         mr1 = 0;
3846         mr2 = 0;
3847         clk = 0;
3848         iopr = 0;
3849         imron = 0;
3850         imroff = 0;
3851
3852         brdp = stl_brds[portp->brdnr];
3853         if (brdp == NULL)
3854                 return;
3855
3856 /*
3857  *      Set up the RX char ignore mask with those RX error types we
3858  *      can ignore.
3859  */
3860         portp->rxignoremsk = 0;
3861         if (tiosp->c_iflag & IGNPAR)
3862                 portp->rxignoremsk |= (SR_RXPARITY | SR_RXFRAMING |
3863                         SR_RXOVERRUN);
3864         if (tiosp->c_iflag & IGNBRK)
3865                 portp->rxignoremsk |= SR_RXBREAK;
3866
3867         portp->rxmarkmsk = SR_RXOVERRUN;
3868         if (tiosp->c_iflag & (INPCK | PARMRK))
3869                 portp->rxmarkmsk |= (SR_RXPARITY | SR_RXFRAMING);
3870         if (tiosp->c_iflag & BRKINT)
3871                 portp->rxmarkmsk |= SR_RXBREAK;
3872
3873 /*
3874  *      Go through the char size, parity and stop bits and set all the
3875  *      option register appropriately.
3876  */
3877         switch (tiosp->c_cflag & CSIZE) {
3878         case CS5:
3879                 mr1 |= MR1_CS5;
3880                 break;
3881         case CS6:
3882                 mr1 |= MR1_CS6;
3883                 break;
3884         case CS7:
3885                 mr1 |= MR1_CS7;
3886                 break;
3887         default:
3888                 mr1 |= MR1_CS8;
3889                 break;
3890         }
3891
3892         if (tiosp->c_cflag & CSTOPB)
3893                 mr2 |= MR2_STOP2;
3894         else
3895                 mr2 |= MR2_STOP1;
3896
3897         if (tiosp->c_cflag & PARENB) {
3898                 if (tiosp->c_cflag & PARODD)
3899                         mr1 |= (MR1_PARENB | MR1_PARODD);
3900                 else
3901                         mr1 |= (MR1_PARENB | MR1_PAREVEN);
3902         } else
3903                 mr1 |= MR1_PARNONE;
3904
3905         mr1 |= MR1_ERRBLOCK;
3906
3907 /*
3908  *      Set the RX FIFO threshold at 8 chars. This gives a bit of breathing
3909  *      space for hardware flow control and the like. This should be set to
3910  *      VMIN.
3911  */
3912         mr2 |= MR2_RXFIFOHALF;
3913
3914 /*
3915  *      Calculate the baud rate timers. For now we will just assume that
3916  *      the input and output baud are the same. The sc26198 has a fixed
3917  *      baud rate table, so only discrete baud rates possible.
3918  */
3919         baudrate = tiosp->c_cflag & CBAUD;
3920         if (baudrate & CBAUDEX) {
3921                 baudrate &= ~CBAUDEX;
3922                 if ((baudrate < 1) || (baudrate > 4))
3923                         tiosp->c_cflag &= ~CBAUDEX;
3924                 else
3925                         baudrate += 15;
3926         }
3927         baudrate = stl_baudrates[baudrate];
3928         if ((tiosp->c_cflag & CBAUD) == B38400) {
3929                 if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_HI)
3930                         baudrate = 57600;
3931                 else if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_VHI)
3932                         baudrate = 115200;
3933                 else if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_SHI)
3934                         baudrate = 230400;
3935                 else if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_WARP)
3936                         baudrate = 460800;
3937                 else if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_CUST)
3938                         baudrate = (portp->baud_base / portp->custom_divisor);
3939         }
3940         if (baudrate > STL_SC26198MAXBAUD)
3941                 baudrate = STL_SC26198MAXBAUD;
3942
3943         if (baudrate > 0)
3944                 for (clk = 0; clk < SC26198_NRBAUDS; clk++)
3945                         if (baudrate <= sc26198_baudtable[clk])
3946                                 break;
3947
3948 /*
3949  *      Check what form of modem signaling is required and set it up.
3950  */
3951         if (tiosp->c_cflag & CLOCAL) {
3952                 portp->flags &= ~ASYNC_CHECK_CD;
3953         } else {
3954                 iopr |= IOPR_DCDCOS;
3955                 imron |= IR_IOPORT;
3956                 portp->flags |= ASYNC_CHECK_CD;
3957         }
3958
3959 /*
3960  *      Setup sc26198 enhanced modes if we can. In particular we want to
3961  *      handle as much of the flow control as possible automatically. As
3962  *      well as saving a few CPU cycles it will also greatly improve flow
3963  *      control reliability.
3964  */
3965         if (tiosp->c_iflag & IXON) {
3966                 mr0 |= MR0_SWFTX | MR0_SWFT;
3967                 imron |= IR_XONXOFF;
3968         } else
3969                 imroff |= IR_XONXOFF;
3970
3971         if (tiosp->c_iflag & IXOFF)
3972                 mr0 |= MR0_SWFRX;
3973
3974         if (tiosp->c_cflag & CRTSCTS) {
3975                 mr2 |= MR2_AUTOCTS;
3976                 mr1 |= MR1_AUTORTS;
3977         }
3978
3979 /*
3980  *      All sc26198 register values calculated so go through and set
3981  *      them all up.
3982  */
3983
3984         pr_debug("SETPORT: portnr=%d panelnr=%d brdnr=%d\n",
3985                 portp->portnr, portp->panelnr, portp->brdnr);
3986         pr_debug("    mr0=%x mr1=%x mr2=%x clk=%x\n", mr0, mr1, mr2, clk);
3987         pr_debug("    iopr=%x imron=%x imroff=%x\n", iopr, imron, imroff);
3988         pr_debug("    schr1=%x schr2=%x schr3=%x schr4=%x\n",
3989                 tiosp->c_cc[VSTART], tiosp->c_cc[VSTOP],
3990                 tiosp->c_cc[VSTART], tiosp->c_cc[VSTOP]);
3991
3992         spin_lock_irqsave(&brd_lock, flags);
3993         BRDENABLE(portp->brdnr, portp->pagenr);
3994         stl_sc26198setreg(portp, IMR, 0);
3995         stl_sc26198updatereg(portp, MR0, mr0);
3996         stl_sc26198updatereg(portp, MR1, mr1);
3997         stl_sc26198setreg(portp, SCCR, CR_RXERRBLOCK);
3998         stl_sc26198updatereg(portp, MR2, mr2);
3999         stl_sc26198updatereg(portp, IOPIOR,
4000                 ((stl_sc26198getreg(portp, IOPIOR) & ~IPR_CHANGEMASK) | iopr));
4001
4002         if (baudrate > 0) {
4003                 stl_sc26198setreg(portp, TXCSR, clk);
4004                 stl_sc26198setreg(portp, RXCSR, clk);
4005         }
4006
4007         stl_sc26198setreg(portp, XONCR, tiosp->c_cc[VSTART]);
4008         stl_sc26198setreg(portp, XOFFCR, tiosp->c_cc[VSTOP]);
4009
4010         ipr = stl_sc26198getreg(portp, IPR);
4011         if (ipr & IPR_DCD)
4012                 portp->sigs &= ~TIOCM_CD;
4013         else
4014                 portp->sigs |= TIOCM_CD;
4015
4016         portp->imr = (portp->imr & ~imroff) | imron;
4017         stl_sc26198setreg(portp, IMR, portp->imr);
4018         BRDDISABLE(portp->brdnr);
4019         spin_unlock_irqrestore(&brd_lock, flags);
4020 }
4021
4022 /*****************************************************************************/
4023
4024 /*
4025  *      Set the state of the DTR and RTS signals.
4026  */
4027
4028 static void stl_sc26198setsignals(struct stlport *portp, int dtr, int rts)
4029 {
4030         unsigned char   iopioron, iopioroff;
4031         unsigned long   flags;
4032
4033         pr_debug("stl_sc26198setsignals(portp=%p,dtr=%d,rts=%d)\n", portp,
4034                         dtr, rts);
4035
4036         iopioron = 0;
4037         iopioroff = 0;
4038         if (dtr == 0)
4039                 iopioroff |= IPR_DTR;
4040         else if (dtr > 0)
4041                 iopioron |= IPR_DTR;
4042         if (rts == 0)
4043                 iopioroff |= IPR_RTS;
4044         else if (rts > 0)
4045                 iopioron |= IPR_RTS;
4046
4047         spin_lock_irqsave(&brd_lock, flags);
4048         BRDENABLE(portp->brdnr, portp->pagenr);
4049         stl_sc26198setreg(portp, IOPIOR,
4050                 ((stl_sc26198getreg(portp, IOPIOR) & ~iopioroff) | iopioron));
4051         BRDDISABLE(portp->brdnr);
4052         spin_unlock_irqrestore(&brd_lock, flags);
4053 }
4054
4055 /*****************************************************************************/
4056
4057 /*
4058  *      Return the state of the signals.
4059  */
4060
4061 static int stl_sc26198getsignals(struct stlport *portp)
4062 {
4063         unsigned char   ipr;
4064         unsigned long   flags;
4065         int             sigs;
4066
4067         pr_debug("stl_sc26198getsignals(portp=%p)\n", portp);
4068
4069         spin_lock_irqsave(&brd_lock, flags);
4070         BRDENABLE(portp->brdnr, portp->pagenr);
4071         ipr = stl_sc26198getreg(portp, IPR);
4072         BRDDISABLE(portp->brdnr);
4073         spin_unlock_irqrestore(&brd_lock, flags);
4074
4075         sigs = 0;
4076         sigs |= (ipr & IPR_DCD) ? 0 : TIOCM_CD;
4077         sigs |= (ipr & IPR_CTS) ? 0 : TIOCM_CTS;
4078         sigs |= (ipr & IPR_DTR) ? 0: TIOCM_DTR;
4079         sigs |= (ipr & IPR_RTS) ? 0: TIOCM_RTS;
4080         sigs |= TIOCM_DSR;
4081         return sigs;
4082 }
4083
4084 /*****************************************************************************/
4085
4086 /*
4087  *      Enable/Disable the Transmitter and/or Receiver.
4088  */
4089
4090 static void stl_sc26198enablerxtx(struct stlport *portp, int rx, int tx)
4091 {
4092         unsigned char   ccr;
4093         unsigned long   flags;
4094
4095         pr_debug("stl_sc26198enablerxtx(portp=%p,rx=%d,tx=%d)\n", portp, rx,tx);
4096
4097         ccr = portp->crenable;
4098         if (tx == 0)
4099                 ccr &= ~CR_TXENABLE;
4100         else if (tx > 0)
4101                 ccr |= CR_TXENABLE;
4102         if (rx == 0)
4103                 ccr &= ~CR_RXENABLE;
4104         else if (rx > 0)
4105                 ccr |= CR_RXENABLE;
4106
4107         spin_lock_irqsave(&brd_lock, flags);
4108         BRDENABLE(portp->brdnr, portp->pagenr);
4109         stl_sc26198setreg(portp, SCCR, ccr);
4110         BRDDISABLE(portp->brdnr);
4111         portp->crenable = ccr;
4112         spin_unlock_irqrestore(&brd_lock, flags);
4113 }
4114
4115 /*****************************************************************************/
4116
4117 /*
4118  *      Start/stop the Transmitter and/or Receiver.
4119  */
4120
4121 static void stl_sc26198startrxtx(struct stlport *portp, int rx, int tx)
4122 {
4123         unsigned char   imr;
4124         unsigned long   flags;
4125
4126         pr_debug("stl_sc26198startrxtx(portp=%p,rx=%d,tx=%d)\n", portp, rx, tx);
4127
4128         imr = portp->imr;
4129         if (tx == 0)
4130                 imr &= ~IR_TXRDY;
4131         else if (tx == 1)
4132                 imr |= IR_TXRDY;
4133         if (rx == 0)
4134                 imr &= ~(IR_RXRDY | IR_RXBREAK | IR_RXWATCHDOG);
4135         else if (rx > 0)
4136                 imr |= IR_RXRDY | IR_RXBREAK | IR_RXWATCHDOG;
4137
4138         spin_lock_irqsave(&brd_lock, flags);
4139         BRDENABLE(portp->brdnr, portp->pagenr);
4140         stl_sc26198setreg(portp, IMR, imr);
4141         BRDDISABLE(portp->brdnr);
4142         portp->imr = imr;
4143         if (tx > 0)
4144                 set_bit(ASYI_TXBUSY, &portp->istate);
4145         spin_unlock_irqrestore(&brd_lock, flags);
4146 }
4147
4148 /*****************************************************************************/
4149
4150 /*
4151  *      Disable all interrupts from this port.
4152  */
4153
4154 static void stl_sc26198disableintrs(struct stlport *portp)
4155 {
4156         unsigned long   flags;
4157
4158         pr_debug("stl_sc26198disableintrs(portp=%p)\n", portp);
4159
4160         spin_lock_irqsave(&brd_lock, flags);
4161         BRDENABLE(portp->brdnr, portp->pagenr);
4162         portp->imr = 0;
4163         stl_sc26198setreg(portp, IMR, 0);
4164         BRDDISABLE(portp->brdnr);
4165         spin_unlock_irqrestore(&brd_lock, flags);
4166 }
4167
4168 /*****************************************************************************/
4169
4170 static void stl_sc26198sendbreak(struct stlport *portp, int len)
4171 {
4172         unsigned long   flags;
4173
4174         pr_debug("stl_sc26198sendbreak(portp=%p,len=%d)\n", portp, len);
4175
4176         spin_lock_irqsave(&brd_lock, flags);
4177         BRDENABLE(portp->brdnr, portp->pagenr);
4178         if (len == 1) {
4179                 stl_sc26198setreg(portp, SCCR, CR_TXSTARTBREAK);
4180                 portp->stats.txbreaks++;
4181         } else
4182                 stl_sc26198setreg(portp, SCCR, CR_TXSTOPBREAK);
4183
4184         BRDDISABLE(portp->brdnr);
4185         spin_unlock_irqrestore(&brd_lock, flags);
4186 }
4187
4188 /*****************************************************************************/
4189
4190 /*
4191  *      Take flow control actions...
4192  */
4193
4194 static void stl_sc26198flowctrl(struct stlport *portp, int state)
4195 {
4196         struct tty_struct       *tty;
4197         unsigned long           flags;
4198         unsigned char           mr0;
4199
4200         pr_debug("stl_sc26198flowctrl(portp=%p,state=%x)\n", portp, state);
4201
4202         if (portp == NULL)
4203                 return;
4204         tty = portp->tty;
4205         if (tty == NULL)
4206                 return;
4207
4208         spin_lock_irqsave(&brd_lock, flags);
4209         BRDENABLE(portp->brdnr, portp->pagenr);
4210
4211         if (state) {
4212                 if (tty->termios->c_iflag & IXOFF) {
4213                         mr0 = stl_sc26198getreg(portp, MR0);
4214                         stl_sc26198setreg(portp, MR0, (mr0 & ~MR0_SWFRXTX));
4215                         stl_sc26198setreg(portp, SCCR, CR_TXSENDXON);
4216                         mr0 |= MR0_SWFRX;
4217                         portp->stats.rxxon++;
4218                         stl_sc26198wait(portp);
4219                         stl_sc26198setreg(portp, MR0, mr0);
4220                 }
4221 /*
4222  *              Question: should we return RTS to what it was before? It may
4223  *              have been set by an ioctl... Suppose not, since if you have
4224  *              hardware flow control set then it is pretty silly to go and
4225  *              set the RTS line by hand.
4226  */
4227                 if (tty->termios->c_cflag & CRTSCTS) {
4228                         stl_sc26198setreg(portp, MR1,
4229                                 (stl_sc26198getreg(portp, MR1) | MR1_AUTORTS));
4230                         stl_sc26198setreg(portp, IOPIOR,
4231                                 (stl_sc26198getreg(portp, IOPIOR) | IOPR_RTS));
4232                         portp->stats.rxrtson++;
4233                 }
4234         } else {
4235                 if (tty->termios->c_iflag & IXOFF) {
4236                         mr0 = stl_sc26198getreg(portp, MR0);
4237                         stl_sc26198setreg(portp, MR0, (mr0 & ~MR0_SWFRXTX));
4238                         stl_sc26198setreg(portp, SCCR, CR_TXSENDXOFF);
4239                         mr0 &= ~MR0_SWFRX;
4240                         portp->stats.rxxoff++;
4241                         stl_sc26198wait(portp);
4242                         stl_sc26198setreg(portp, MR0, mr0);
4243                 }
4244                 if (tty->termios->c_cflag & CRTSCTS) {
4245                         stl_sc26198setreg(portp, MR1,
4246                                 (stl_sc26198getreg(portp, MR1) & ~MR1_AUTORTS));
4247                         stl_sc26198setreg(portp, IOPIOR,
4248                                 (stl_sc26198getreg(portp, IOPIOR) & ~IOPR_RTS));
4249                         portp->stats.rxrtsoff++;
4250                 }
4251         }
4252
4253         BRDDISABLE(portp->brdnr);
4254         spin_unlock_irqrestore(&brd_lock, flags);
4255 }
4256
4257 /*****************************************************************************/
4258
4259 /*
4260  *      Send a flow control character.
4261  */
4262
4263 static void stl_sc26198sendflow(struct stlport *portp, int state)
4264 {
4265         struct tty_struct       *tty;
4266         unsigned long           flags;
4267         unsigned char           mr0;
4268
4269         pr_debug("stl_sc26198sendflow(portp=%p,state=%x)\n", portp, state);
4270
4271         if (portp == NULL)
4272                 return;
4273         tty = portp->tty;
4274         if (tty == NULL)
4275                 return;
4276
4277         spin_lock_irqsave(&brd_lock, flags);
4278         BRDENABLE(portp->brdnr, portp->pagenr);
4279         if (state) {
4280                 mr0 = stl_sc26198getreg(portp, MR0);
4281                 stl_sc26198setreg(portp, MR0, (mr0 & ~MR0_SWFRXTX));
4282                 stl_sc26198setreg(portp, SCCR, CR_TXSENDXON);
4283                 mr0 |= MR0_SWFRX;
4284                 portp->stats.rxxon++;
4285                 stl_sc26198wait(portp);
4286                 stl_sc26198setreg(portp, MR0, mr0);
4287         } else {
4288                 mr0 = stl_sc26198getreg(portp, MR0);
4289                 stl_sc26198setreg(portp, MR0, (mr0 & ~MR0_SWFRXTX));
4290                 stl_sc26198setreg(portp, SCCR, CR_TXSENDXOFF);
4291                 mr0 &= ~MR0_SWFRX;
4292                 portp->stats.rxxoff++;
4293                 stl_sc26198wait(portp);
4294                 stl_sc26198setreg(portp, MR0, mr0);
4295         }
4296         BRDDISABLE(portp->brdnr);
4297         spin_unlock_irqrestore(&brd_lock, flags);
4298 }
4299
4300 /*****************************************************************************/
4301
4302 static void stl_sc26198flush(struct stlport *portp)
4303 {
4304         unsigned long   flags;
4305
4306         pr_debug("stl_sc26198flush(portp=%p)\n", portp);
4307
4308         if (portp == NULL)
4309                 return;
4310
4311         spin_lock_irqsave(&brd_lock, flags);
4312         BRDENABLE(portp->brdnr, portp->pagenr);
4313         stl_sc26198setreg(portp, SCCR, CR_TXRESET);
4314         stl_sc26198setreg(portp, SCCR, portp->crenable);
4315         BRDDISABLE(portp->brdnr);
4316         portp->tx.tail = portp->tx.head;
4317         spin_unlock_irqrestore(&brd_lock, flags);
4318 }
4319
4320 /*****************************************************************************/
4321
4322 /*
4323  *      Return the current state of data flow on this port. This is only
4324  *      really interresting when determining if data has fully completed
4325  *      transmission or not... The sc26198 interrupt scheme cannot
4326  *      determine when all data has actually drained, so we need to
4327  *      check the port statusy register to be sure.
4328  */
4329
4330 static int stl_sc26198datastate(struct stlport *portp)
4331 {
4332         unsigned long   flags;
4333         unsigned char   sr;
4334
4335         pr_debug("stl_sc26198datastate(portp=%p)\n", portp);
4336
4337         if (portp == NULL)
4338                 return 0;
4339         if (test_bit(ASYI_TXBUSY, &portp->istate))
4340                 return 1;
4341
4342         spin_lock_irqsave(&brd_lock, flags);
4343         BRDENABLE(portp->brdnr, portp->pagenr);
4344         sr = stl_sc26198getreg(portp, SR);
4345         BRDDISABLE(portp->brdnr);
4346         spin_unlock_irqrestore(&brd_lock, flags);
4347
4348         return (sr & SR_TXEMPTY) ? 0 : 1;
4349 }
4350
4351 /*****************************************************************************/
4352
4353 /*
4354  *      Delay for a small amount of time, to give the sc26198 a chance
4355  *      to process a command...
4356  */
4357
4358 static void stl_sc26198wait(struct stlport *portp)
4359 {
4360         int     i;
4361
4362         pr_debug("stl_sc26198wait(portp=%p)\n", portp);
4363
4364         if (portp == NULL)
4365                 return;
4366
4367         for (i = 0; i < 20; i++)
4368                 stl_sc26198getglobreg(portp, TSTR);
4369 }
4370
4371 /*****************************************************************************/
4372
4373 /*
4374  *      If we are TX flow controlled and in IXANY mode then we may
4375  *      need to unflow control here. We gotta do this because of the
4376  *      automatic flow control modes of the sc26198.
4377  */
4378
4379 static void stl_sc26198txunflow(struct stlport *portp, struct tty_struct *tty)
4380 {
4381         unsigned char   mr0;
4382
4383         mr0 = stl_sc26198getreg(portp, MR0);
4384         stl_sc26198setreg(portp, MR0, (mr0 & ~MR0_SWFRXTX));
4385         stl_sc26198setreg(portp, SCCR, CR_HOSTXON);
4386         stl_sc26198wait(portp);
4387         stl_sc26198setreg(portp, MR0, mr0);
4388         clear_bit(ASYI_TXFLOWED, &portp->istate);
4389 }
4390
4391 /*****************************************************************************/
4392
4393 /*
4394  *      Interrupt service routine for sc26198 panels.
4395  */
4396
4397 static void stl_sc26198intr(struct stlpanel *panelp, unsigned int iobase)
4398 {
4399         struct stlport  *portp;
4400         unsigned int    iack;
4401
4402         spin_lock(&brd_lock);
4403
4404 /*
4405  *      Work around bug in sc26198 chip... Cannot have A6 address
4406  *      line of UART high, else iack will be returned as 0.
4407  */
4408         outb(0, (iobase + 1));
4409
4410         iack = inb(iobase + XP_IACK);
4411         portp = panelp->ports[(iack & IVR_CHANMASK) + ((iobase & 0x4) << 1)];
4412
4413         if (iack & IVR_RXDATA)
4414                 stl_sc26198rxisr(portp, iack);
4415         else if (iack & IVR_TXDATA)
4416                 stl_sc26198txisr(portp);
4417         else
4418                 stl_sc26198otherisr(portp, iack);
4419
4420         spin_unlock(&brd_lock);
4421 }
4422
4423 /*****************************************************************************/
4424
4425 /*
4426  *      Transmit interrupt handler. This has gotta be fast!  Handling TX
4427  *      chars is pretty simple, stuff as many as possible from the TX buffer
4428  *      into the sc26198 FIFO.
4429  *      In practice it is possible that interrupts are enabled but that the
4430  *      port has been hung up. Need to handle not having any TX buffer here,
4431  *      this is done by using the side effect that head and tail will also
4432  *      be NULL if the buffer has been freed.
4433  */
4434
4435 static void stl_sc26198txisr(struct stlport *portp)
4436 {
4437         unsigned int    ioaddr;
4438         unsigned char   mr0;
4439         int             len, stlen;
4440         char            *head, *tail;
4441
4442         pr_debug("stl_sc26198txisr(portp=%p)\n", portp);
4443
4444         ioaddr = portp->ioaddr;
4445         head = portp->tx.head;
4446         tail = portp->tx.tail;
4447         len = (head >= tail) ? (head - tail) : (STL_TXBUFSIZE - (tail - head));
4448         if ((len == 0) || ((len < STL_TXBUFLOW) &&
4449             (test_bit(ASYI_TXLOW, &portp->istate) == 0))) {
4450                 set_bit(ASYI_TXLOW, &portp->istate);
4451                 schedule_work(&portp->tqueue);
4452         }
4453
4454         if (len == 0) {
4455                 outb((MR0 | portp->uartaddr), (ioaddr + XP_ADDR));
4456                 mr0 = inb(ioaddr + XP_DATA);
4457                 if ((mr0 & MR0_TXMASK) == MR0_TXEMPTY) {
4458                         portp->imr &= ~IR_TXRDY;
4459                         outb((IMR | portp->uartaddr), (ioaddr + XP_ADDR));
4460                         outb(portp->imr, (ioaddr + XP_DATA));
4461                         clear_bit(ASYI_TXBUSY, &portp->istate);
4462                 } else {
4463                         mr0 |= ((mr0 & ~MR0_TXMASK) | MR0_TXEMPTY);
4464                         outb(mr0, (ioaddr + XP_DATA));
4465                 }
4466         } else {
4467                 len = min(len, SC26198_TXFIFOSIZE);
4468                 portp->stats.txtotal += len;
4469                 stlen = min(len, ((portp->tx.buf + STL_TXBUFSIZE) - tail));
4470                 outb(GTXFIFO, (ioaddr + XP_ADDR));
4471                 outsb((ioaddr + XP_DATA), tail, stlen);
4472                 len -= stlen;
4473                 tail += stlen;
4474                 if (tail >= (portp->tx.buf + STL_TXBUFSIZE))
4475                         tail = portp->tx.buf;
4476                 if (len > 0) {
4477                         outsb((ioaddr + XP_DATA), tail, len);
4478                         tail += len;
4479                 }
4480                 portp->tx.tail = tail;
4481         }
4482 }
4483
4484 /*****************************************************************************/
4485
4486 /*
4487  *      Receive character interrupt handler. Determine if we have good chars
4488  *      or bad chars and then process appropriately. Good chars are easy
4489  *      just shove the lot into the RX buffer and set all status byte to 0.
4490  *      If a bad RX char then process as required. This routine needs to be
4491  *      fast!  In practice it is possible that we get an interrupt on a port
4492  *      that is closed. This can happen on hangups - since they completely
4493  *      shutdown a port not in user context. Need to handle this case.
4494  */
4495
4496 static void stl_sc26198rxisr(struct stlport *portp, unsigned int iack)
4497 {
4498         struct tty_struct       *tty;
4499         unsigned int            len, buflen, ioaddr;
4500
4501         pr_debug("stl_sc26198rxisr(portp=%p,iack=%x)\n", portp, iack);
4502
4503         tty = portp->tty;
4504         ioaddr = portp->ioaddr;
4505         outb(GIBCR, (ioaddr + XP_ADDR));
4506         len = inb(ioaddr + XP_DATA) + 1;
4507
4508         if ((iack & IVR_TYPEMASK) == IVR_RXDATA) {
4509                 if (tty == NULL || (buflen = tty_buffer_request_room(tty, len)) == 0) {
4510                         len = min(len, sizeof(stl_unwanted));
4511                         outb(GRXFIFO, (ioaddr + XP_ADDR));
4512                         insb((ioaddr + XP_DATA), &stl_unwanted[0], len);
4513                         portp->stats.rxlost += len;
4514                         portp->stats.rxtotal += len;
4515                 } else {
4516                         len = min(len, buflen);
4517                         if (len > 0) {
4518                                 unsigned char *ptr;
4519                                 outb(GRXFIFO, (ioaddr + XP_ADDR));
4520                                 tty_prepare_flip_string(tty, &ptr, len);
4521                                 insb((ioaddr + XP_DATA), ptr, len);
4522                                 tty_schedule_flip(tty);
4523                                 portp->stats.rxtotal += len;
4524                         }
4525                 }
4526         } else {
4527                 stl_sc26198rxbadchars(portp);
4528         }
4529
4530 /*
4531  *      If we are TX flow controlled and in IXANY mode then we may need
4532  *      to unflow control here. We gotta do this because of the automatic
4533  *      flow control modes of the sc26198.
4534  */
4535         if (test_bit(ASYI_TXFLOWED, &portp->istate)) {
4536                 if ((tty != NULL) &&
4537                     (tty->termios != NULL) &&
4538                     (tty->termios->c_iflag & IXANY)) {
4539                         stl_sc26198txunflow(portp, tty);
4540                 }
4541         }
4542 }
4543
4544 /*****************************************************************************/
4545
4546 /*
4547  *      Process an RX bad character.
4548  */
4549
4550 static void stl_sc26198rxbadch(struct stlport *portp, unsigned char status, char ch)
4551 {
4552         struct tty_struct       *tty;
4553         unsigned int            ioaddr;
4554
4555         tty = portp->tty;
4556         ioaddr = portp->ioaddr;
4557
4558         if (status & SR_RXPARITY)
4559                 portp->stats.rxparity++;
4560         if (status & SR_RXFRAMING)
4561                 portp->stats.rxframing++;
4562         if (status & SR_RXOVERRUN)
4563                 portp->stats.rxoverrun++;
4564         if (status & SR_RXBREAK)
4565                 portp->stats.rxbreaks++;
4566
4567         if ((tty != NULL) &&
4568             ((portp->rxignoremsk & status) == 0)) {
4569                 if (portp->rxmarkmsk & status) {
4570                         if (status & SR_RXBREAK) {
4571                                 status = TTY_BREAK;
4572                                 if (portp->flags & ASYNC_SAK) {
4573                                         do_SAK(tty);
4574                                         BRDENABLE(portp->brdnr, portp->pagenr);
4575                                 }
4576                         } else if (status & SR_RXPARITY)
4577                                 status = TTY_PARITY;
4578                         else if (status & SR_RXFRAMING)
4579                                 status = TTY_FRAME;
4580                         else if(status & SR_RXOVERRUN)
4581                                 status = TTY_OVERRUN;
4582                         else
4583                                 status = 0;
4584                 } else
4585                         status = 0;
4586
4587                 tty_insert_flip_char(tty, ch, status);
4588                 tty_schedule_flip(tty);
4589
4590                 if (status == 0)
4591                         portp->stats.rxtotal++;
4592         }
4593 }
4594
4595 /*****************************************************************************/
4596
4597 /*
4598  *      Process all characters in the RX FIFO of the UART. Check all char
4599  *      status bytes as well, and process as required. We need to check
4600  *      all bytes in the FIFO, in case some more enter the FIFO while we
4601  *      are here. To get the exact character error type we need to switch
4602  *      into CHAR error mode (that is why we need to make sure we empty
4603  *      the FIFO).
4604  */
4605
4606 static void stl_sc26198rxbadchars(struct stlport *portp)
4607 {
4608         unsigned char   status, mr1;
4609         char            ch;
4610
4611 /*
4612  *      To get the precise error type for each character we must switch
4613  *      back into CHAR error mode.
4614  */
4615         mr1 = stl_sc26198getreg(portp, MR1);
4616         stl_sc26198setreg(portp, MR1, (mr1 & ~MR1_ERRBLOCK));
4617
4618         while ((status = stl_sc26198getreg(portp, SR)) & SR_RXRDY) {
4619                 stl_sc26198setreg(portp, SCCR, CR_CLEARRXERR);
4620                 ch = stl_sc26198getreg(portp, RXFIFO);
4621                 stl_sc26198rxbadch(portp, status, ch);
4622         }
4623
4624 /*
4625  *      To get correct interrupt class we must switch back into BLOCK
4626  *      error mode.
4627  */
4628         stl_sc26198setreg(portp, MR1, mr1);
4629 }
4630
4631 /*****************************************************************************/
4632
4633 /*
4634  *      Other interrupt handler. This includes modem signals, flow
4635  *      control actions, etc. Most stuff is left to off-level interrupt
4636  *      processing time.
4637  */
4638
4639 static void stl_sc26198otherisr(struct stlport *portp, unsigned int iack)
4640 {
4641         unsigned char   cir, ipr, xisr;
4642
4643         pr_debug("stl_sc26198otherisr(portp=%p,iack=%x)\n", portp, iack);
4644
4645         cir = stl_sc26198getglobreg(portp, CIR);
4646
4647         switch (cir & CIR_SUBTYPEMASK) {
4648         case CIR_SUBCOS:
4649                 ipr = stl_sc26198getreg(portp, IPR);
4650                 if (ipr & IPR_DCDCHANGE) {
4651                         set_bit(ASYI_DCDCHANGE, &portp->istate);
4652                         schedule_work(&portp->tqueue);
4653                         portp->stats.modem++;
4654                 }
4655                 break;
4656         case CIR_SUBXONXOFF:
4657                 xisr = stl_sc26198getreg(portp, XISR);
4658                 if (xisr & XISR_RXXONGOT) {
4659                         set_bit(ASYI_TXFLOWED, &portp->istate);
4660                         portp->stats.txxoff++;
4661                 }
4662                 if (xisr & XISR_RXXOFFGOT) {
4663                         clear_bit(ASYI_TXFLOWED, &portp->istate);
4664                         portp->stats.txxon++;
4665                 }
4666                 break;
4667         case CIR_SUBBREAK:
4668                 stl_sc26198setreg(portp, SCCR, CR_BREAKRESET);
4669                 stl_sc26198rxbadchars(portp);
4670                 break;
4671         default:
4672                 break;
4673         }
4674 }
4675
4676 static void stl_free_isabrds(void)
4677 {
4678         struct stlbrd *brdp;
4679         unsigned int i;
4680
4681         for (i = 0; i < stl_nrbrds; i++) {
4682                 if ((brdp = stl_brds[i]) == NULL || (brdp->state & STL_PROBED))
4683                         continue;
4684
4685                 free_irq(brdp->irq, brdp);
4686
4687                 stl_cleanup_panels(brdp);
4688
4689                 release_region(brdp->ioaddr1, brdp->iosize1);
4690                 if (brdp->iosize2 > 0)
4691                         release_region(brdp->ioaddr2, brdp->iosize2);
4692
4693                 kfree(brdp);
4694                 stl_brds[i] = NULL;
4695         }
4696 }
4697
4698 /*
4699  *      Loadable module initialization stuff.
4700  */
4701 static int __init stallion_module_init(void)
4702 {
4703         struct stlbrd   *brdp;
4704         struct stlconf  conf;
4705         unsigned int i, j;
4706         int retval;
4707
4708         printk(KERN_INFO "%s: version %s\n", stl_drvtitle, stl_drvversion);
4709
4710         spin_lock_init(&stallion_lock);
4711         spin_lock_init(&brd_lock);
4712
4713 /*
4714  *      Find any dynamically supported boards. That is via module load
4715  *      line options.
4716  */
4717         for (i = stl_nrbrds; i < stl_nargs; i++) {
4718                 memset(&conf, 0, sizeof(conf));
4719                 if (stl_parsebrd(&conf, stl_brdsp[i]) == 0)
4720                         continue;
4721                 if ((brdp = stl_allocbrd()) == NULL)
4722                         continue;
4723                 brdp->brdnr = i;
4724                 brdp->brdtype = conf.brdtype;
4725                 brdp->ioaddr1 = conf.ioaddr1;
4726                 brdp->ioaddr2 = conf.ioaddr2;
4727                 brdp->irq = conf.irq;
4728                 brdp->irqtype = conf.irqtype;
4729                 if (stl_brdinit(brdp))
4730                         kfree(brdp);
4731                 else {
4732                         for (j = 0; j < brdp->nrports; j++)
4733                                 tty_register_device(stl_serial,
4734                                         brdp->brdnr * STL_MAXPORTS + j, NULL);
4735                         stl_brds[brdp->brdnr] = brdp;
4736                         stl_nrbrds = i + 1;
4737                 }
4738         }
4739
4740         /* this has to be _after_ isa finding because of locking */
4741         retval = pci_register_driver(&stl_pcidriver);
4742         if (retval && stl_nrbrds == 0)
4743                 goto err;
4744
4745         stl_serial = alloc_tty_driver(STL_MAXBRDS * STL_MAXPORTS);
4746         if (!stl_serial) {
4747                 retval = -ENOMEM;
4748                 goto err_pcidr;
4749         }
4750
4751 /*
4752  *      Set up a character driver for per board stuff. This is mainly used
4753  *      to do stats ioctls on the ports.
4754  */
4755         if (register_chrdev(STL_SIOMEMMAJOR, "staliomem", &stl_fsiomem))
4756                 printk("STALLION: failed to register serial board device\n");
4757
4758         stallion_class = class_create(THIS_MODULE, "staliomem");
4759         if (IS_ERR(stallion_class)) {
4760                 retval = PTR_ERR(stallion_class);
4761                 goto err_reg;
4762         }
4763         for (i = 0; i < 4; i++)
4764                 class_device_create(stallion_class, NULL,
4765                                     MKDEV(STL_SIOMEMMAJOR, i), NULL,
4766                                     "staliomem%d", i);
4767
4768         stl_serial->owner = THIS_MODULE;
4769         stl_serial->driver_name = stl_drvname;
4770         stl_serial->name = "ttyE";
4771         stl_serial->major = STL_SERIALMAJOR;
4772         stl_serial->minor_start = 0;
4773         stl_serial->type = TTY_DRIVER_TYPE_SERIAL;
4774         stl_serial->subtype = SERIAL_TYPE_NORMAL;
4775         stl_serial->init_termios = stl_deftermios;
4776         stl_serial->flags = TTY_DRIVER_REAL_RAW | TTY_DRIVER_DYNAMIC_DEV;
4777         tty_set_operations(stl_serial, &stl_ops);
4778
4779         retval = tty_register_driver(stl_serial);
4780         if (retval) {
4781                 printk("STALLION: failed to register serial driver\n");
4782                 goto err_clsdev;
4783         }
4784
4785         return 0;
4786 err_clsdev:
4787         for (i = 0; i < 4; i++)
4788                 class_device_destroy(stallion_class, MKDEV(STL_SIOMEMMAJOR, i));
4789         class_destroy(stallion_class);
4790 err_reg:
4791         unregister_chrdev(STL_SIOMEMMAJOR, "staliomem");
4792         put_tty_driver(stl_serial);
4793 err_pcidr:
4794         pci_unregister_driver(&stl_pcidriver);
4795         stl_free_isabrds();
4796 err:
4797         return retval;
4798 }
4799
4800 static void __exit stallion_module_exit(void)
4801 {
4802         struct stlbrd *brdp;
4803         unsigned int i, j;
4804         int retval;
4805
4806         pr_debug("cleanup_module()\n");
4807
4808         printk(KERN_INFO "Unloading %s: version %s\n", stl_drvtitle,
4809                 stl_drvversion);
4810
4811 /*
4812  *      Free up all allocated resources used by the ports. This includes
4813  *      memory and interrupts. As part of this process we will also do
4814  *      a hangup on every open port - to try to flush out any processes
4815  *      hanging onto ports.
4816  */
4817         for (i = 0; i < stl_nrbrds; i++) {
4818                 if ((brdp = stl_brds[i]) == NULL || (brdp->state & STL_PROBED))
4819                         continue;
4820                 for (j = 0; j < brdp->nrports; j++)
4821                         tty_unregister_device(stl_serial,
4822                                 brdp->brdnr * STL_MAXPORTS + j);
4823         }
4824         tty_unregister_driver(stl_serial);
4825         put_tty_driver(stl_serial);
4826
4827         for (i = 0; i < 4; i++)
4828                 class_device_destroy(stallion_class, MKDEV(STL_SIOMEMMAJOR, i));
4829         if ((retval = unregister_chrdev(STL_SIOMEMMAJOR, "staliomem")))
4830                 printk("STALLION: failed to un-register serial memory device, "
4831                         "errno=%d\n", -retval);
4832         class_destroy(stallion_class);
4833
4834         pci_unregister_driver(&stl_pcidriver);
4835
4836         stl_free_isabrds();
4837 }
4838
4839 module_init(stallion_module_init);
4840 module_exit(stallion_module_exit);
4841
4842 MODULE_AUTHOR("Greg Ungerer");
4843 MODULE_DESCRIPTION("Stallion Multiport Serial Driver");
4844 MODULE_LICENSE("GPL");