SAFE public projects git trees. - safe/jmp/linux-2.6/blob - 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                         break;
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                         retval = -ENOMEM;
2181                         goto err_fr;
2182                 }
2183                 panelp->magic = STL_PANELMAGIC;
2184                 panelp->brdnr = brdp->brdnr;
2185                 panelp->panelnr = panelnr;
2186                 panelp->iobase = ioaddr;
2187                 panelp->pagenr = nxtid;
2188                 panelp->hwid = status;
2189                 brdp->bnk2panel[banknr] = panelp;
2190                 brdp->bnkpageaddr[banknr] = nxtid;
2191                 brdp->bnkstataddr[banknr++] = ioaddr + ECH_PNLSTATUS;
2192
2193                 if (status & ECH_PNLXPID) {
2194                         panelp->uartp = &stl_sc26198uart;
2195                         panelp->isr = stl_sc26198intr;
2196                         if (status & ECH_PNL16PORT) {
2197                                 panelp->nrports = 16;
2198                                 brdp->bnk2panel[banknr] = panelp;
2199                                 brdp->bnkpageaddr[banknr] = nxtid;
2200                                 brdp->bnkstataddr[banknr++] = ioaddr + 4 +
2201                                         ECH_PNLSTATUS;
2202                         } else
2203                                 panelp->nrports = 8;
2204                 } else {
2205                         panelp->uartp = &stl_cd1400uart;
2206                         panelp->isr = stl_cd1400echintr;
2207                         if (status & ECH_PNL16PORT) {
2208                                 panelp->nrports = 16;
2209                                 panelp->ackmask = 0x80;
2210                                 if (brdp->brdtype != BRD_ECHPCI)
2211                                         ioaddr += EREG_BANKSIZE;
2212                                 brdp->bnk2panel[banknr] = panelp;
2213                                 brdp->bnkpageaddr[banknr] = ++nxtid;
2214                                 brdp->bnkstataddr[banknr++] = ioaddr +
2215                                         ECH_PNLSTATUS;
2216                         } else {
2217                                 panelp->nrports = 8;
2218                                 panelp->ackmask = 0xc0;
2219                         }
2220                 }
2221
2222                 nxtid++;
2223                 ioaddr += EREG_BANKSIZE;
2224                 brdp->nrports += panelp->nrports;
2225                 brdp->panels[panelnr++] = panelp;
2226                 if ((brdp->brdtype != BRD_ECHPCI) &&
2227                     (ioaddr >= (brdp->ioaddr2 + brdp->iosize2))) {
2228                         retval = -EINVAL;
2229                         goto err_fr;
2230                 }
2231         }
2232
2233         brdp->nrpanels = panelnr;
2234         brdp->nrbnks = banknr;
2235         if (brdp->brdtype == BRD_ECH)
2236                 outb((brdp->ioctrlval | ECH_BRDDISABLE), brdp->ioctrl);
2237
2238         brdp->state |= BRD_FOUND;
2239         if (request_irq(brdp->irq, stl_intr, IRQF_SHARED, name, brdp) != 0) {
2240                 printk("STALLION: failed to register interrupt "
2241                     "routine for %s irq=%d\n", name, brdp->irq);
2242                 retval = -ENODEV;
2243                 goto err_fr;
2244         }
2245
2246         return 0;
2247 err_fr:
2248         stl_cleanup_panels(brdp);
2249         if (brdp->iosize2 > 0)
2250                 release_region(brdp->ioaddr2, brdp->iosize2);
2251 err_rel1:
2252         release_region(brdp->ioaddr1, brdp->iosize1);
2253 err:
2254         return retval;
2255 }
2256
2257 /*****************************************************************************/
2258
2259 /*
2260  *      Initialize and configure the specified board.
2261  *      Scan through all the boards in the configuration and see what we
2262  *      can find. Handle EIO and the ECH boards a little differently here
2263  *      since the initial search and setup is very different.
2264  */
2265
2266 static int __devinit stl_brdinit(struct stlbrd *brdp)
2267 {
2268         int i, retval;
2269
2270         pr_debug("stl_brdinit(brdp=%p)\n", brdp);
2271
2272         switch (brdp->brdtype) {
2273         case BRD_EASYIO:
2274         case BRD_EASYIOPCI:
2275                 retval = stl_initeio(brdp);
2276                 if (retval)
2277                         goto err;
2278                 break;
2279         case BRD_ECH:
2280         case BRD_ECHMC:
2281         case BRD_ECHPCI:
2282         case BRD_ECH64PCI:
2283                 retval = stl_initech(brdp);
2284                 if (retval)
2285                         goto err;
2286                 break;
2287         default:
2288                 printk("STALLION: board=%d is unknown board type=%d\n",
2289                         brdp->brdnr, brdp->brdtype);
2290                 retval = -ENODEV;
2291                 goto err;
2292         }
2293
2294         if ((brdp->state & BRD_FOUND) == 0) {
2295                 printk("STALLION: %s board not found, board=%d io=%x irq=%d\n",
2296                         stl_brdnames[brdp->brdtype], brdp->brdnr,
2297                         brdp->ioaddr1, brdp->irq);
2298                 goto err_free;
2299         }
2300
2301         for (i = 0; i < STL_MAXPANELS; i++)
2302                 if (brdp->panels[i] != NULL)
2303                         stl_initports(brdp, brdp->panels[i]);
2304
2305         printk("STALLION: %s found, board=%d io=%x irq=%d "
2306                 "nrpanels=%d nrports=%d\n", stl_brdnames[brdp->brdtype],
2307                 brdp->brdnr, brdp->ioaddr1, brdp->irq, brdp->nrpanels,
2308                 brdp->nrports);
2309
2310         return 0;
2311 err_free:
2312         free_irq(brdp->irq, brdp);
2313
2314         stl_cleanup_panels(brdp);
2315
2316         release_region(brdp->ioaddr1, brdp->iosize1);
2317         if (brdp->iosize2 > 0)
2318                 release_region(brdp->ioaddr2, brdp->iosize2);
2319 err:
2320         return retval;
2321 }
2322
2323 /*****************************************************************************/
2324
2325 /*
2326  *      Find the next available board number that is free.
2327  */
2328
2329 static int __devinit stl_getbrdnr(void)
2330 {
2331         unsigned int i;
2332
2333         for (i = 0; i < STL_MAXBRDS; i++)
2334                 if (stl_brds[i] == NULL) {
2335                         if (i >= stl_nrbrds)
2336                                 stl_nrbrds = i + 1;
2337                         return i;
2338                 }
2339
2340         return -1;
2341 }
2342
2343 /*****************************************************************************/
2344 /*
2345  *      We have a Stallion board. Allocate a board structure and
2346  *      initialize it. Read its IO and IRQ resources from PCI
2347  *      configuration space.
2348  */
2349
2350 static int __devinit stl_pciprobe(struct pci_dev *pdev,
2351                 const struct pci_device_id *ent)
2352 {
2353         struct stlbrd *brdp;
2354         unsigned int i, brdtype = ent->driver_data;
2355         int brdnr, retval = -ENODEV;
2356
2357         if ((pdev->class >> 8) == PCI_CLASS_STORAGE_IDE)
2358                 goto err;
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                 retval = -ENODEV;
2375                 goto err_fr;
2376         }
2377         brdp->brdnr = (unsigned int)brdnr;
2378         stl_brds[brdp->brdnr] = brdp;
2379         mutex_unlock(&stl_brdslock);
2380
2381         brdp->brdtype = brdtype;
2382         brdp->state |= STL_PROBED;
2383
2384 /*
2385  *      We have all resources from the board, so let's setup the actual
2386  *      board structure now.
2387  */
2388         switch (brdtype) {
2389         case BRD_ECHPCI:
2390                 brdp->ioaddr2 = pci_resource_start(pdev, 0);
2391                 brdp->ioaddr1 = pci_resource_start(pdev, 1);
2392                 break;
2393         case BRD_ECH64PCI:
2394                 brdp->ioaddr2 = pci_resource_start(pdev, 2);
2395                 brdp->ioaddr1 = pci_resource_start(pdev, 1);
2396                 break;
2397         case BRD_EASYIOPCI:
2398                 brdp->ioaddr1 = pci_resource_start(pdev, 2);
2399                 brdp->ioaddr2 = pci_resource_start(pdev, 1);
2400                 break;
2401         default:
2402                 dev_err(&pdev->dev, "unknown PCI board type=%u\n", brdtype);
2403                 break;
2404         }
2405
2406         brdp->irq = pdev->irq;
2407         retval = stl_brdinit(brdp);
2408         if (retval)
2409                 goto err_null;
2410
2411         pci_set_drvdata(pdev, brdp);
2412
2413         for (i = 0; i < brdp->nrports; i++)
2414                 tty_register_device(stl_serial,
2415                                 brdp->brdnr * STL_MAXPORTS + i, &pdev->dev);
2416
2417         return 0;
2418 err_null:
2419         stl_brds[brdp->brdnr] = NULL;
2420 err_fr:
2421         kfree(brdp);
2422 err:
2423         return retval;
2424 }
2425
2426 static void __devexit stl_pciremove(struct pci_dev *pdev)
2427 {
2428         struct stlbrd *brdp = pci_get_drvdata(pdev);
2429         unsigned int i;
2430
2431         free_irq(brdp->irq, brdp);
2432
2433         stl_cleanup_panels(brdp);
2434
2435         release_region(brdp->ioaddr1, brdp->iosize1);
2436         if (brdp->iosize2 > 0)
2437                 release_region(brdp->ioaddr2, brdp->iosize2);
2438
2439         for (i = 0; i < brdp->nrports; i++)
2440                 tty_unregister_device(stl_serial,
2441                                 brdp->brdnr * STL_MAXPORTS + i);
2442
2443         stl_brds[brdp->brdnr] = NULL;
2444         kfree(brdp);
2445 }
2446
2447 static struct pci_driver stl_pcidriver = {
2448         .name = "stallion",
2449         .id_table = stl_pcibrds,
2450         .probe = stl_pciprobe,
2451         .remove = __devexit_p(stl_pciremove)
2452 };
2453
2454 /*****************************************************************************/
2455
2456 /*
2457  *      Return the board stats structure to user app.
2458  */
2459
2460 static int stl_getbrdstats(combrd_t __user *bp)
2461 {
2462         combrd_t        stl_brdstats;
2463         struct stlbrd   *brdp;
2464         struct stlpanel *panelp;
2465         unsigned int i;
2466
2467         if (copy_from_user(&stl_brdstats, bp, sizeof(combrd_t)))
2468                 return -EFAULT;
2469         if (stl_brdstats.brd >= STL_MAXBRDS)
2470                 return -ENODEV;
2471         brdp = stl_brds[stl_brdstats.brd];
2472         if (brdp == NULL)
2473                 return -ENODEV;
2474
2475         memset(&stl_brdstats, 0, sizeof(combrd_t));
2476         stl_brdstats.brd = brdp->brdnr;
2477         stl_brdstats.type = brdp->brdtype;
2478         stl_brdstats.hwid = brdp->hwid;
2479         stl_brdstats.state = brdp->state;
2480         stl_brdstats.ioaddr = brdp->ioaddr1;
2481         stl_brdstats.ioaddr2 = brdp->ioaddr2;
2482         stl_brdstats.irq = brdp->irq;
2483         stl_brdstats.nrpanels = brdp->nrpanels;
2484         stl_brdstats.nrports = brdp->nrports;
2485         for (i = 0; i < brdp->nrpanels; i++) {
2486                 panelp = brdp->panels[i];
2487                 stl_brdstats.panels[i].panel = i;
2488                 stl_brdstats.panels[i].hwid = panelp->hwid;
2489                 stl_brdstats.panels[i].nrports = panelp->nrports;
2490         }
2491
2492         return copy_to_user(bp, &stl_brdstats, sizeof(combrd_t)) ? -EFAULT : 0;
2493 }
2494
2495 /*****************************************************************************/
2496
2497 /*
2498  *      Resolve the referenced port number into a port struct pointer.
2499  */
2500
2501 static struct stlport *stl_getport(int brdnr, int panelnr, int portnr)
2502 {
2503         struct stlbrd   *brdp;
2504         struct stlpanel *panelp;
2505
2506         if (brdnr < 0 || brdnr >= STL_MAXBRDS)
2507                 return NULL;
2508         brdp = stl_brds[brdnr];
2509         if (brdp == NULL)
2510                 return NULL;
2511         if (panelnr < 0 || (unsigned int)panelnr >= brdp->nrpanels)
2512                 return NULL;
2513         panelp = brdp->panels[panelnr];
2514         if (panelp == NULL)
2515                 return NULL;
2516         if (portnr < 0 || (unsigned int)portnr >= panelp->nrports)
2517                 return NULL;
2518         return panelp->ports[portnr];
2519 }
2520
2521 /*****************************************************************************/
2522
2523 /*
2524  *      Return the port stats structure to user app. A NULL port struct
2525  *      pointer passed in means that we need to find out from the app
2526  *      what port to get stats for (used through board control device).
2527  */
2528
2529 static int stl_getportstats(struct stlport *portp, comstats_t __user *cp)
2530 {
2531         comstats_t      stl_comstats;
2532         unsigned char   *head, *tail;
2533         unsigned long   flags;
2534
2535         if (!portp) {
2536                 if (copy_from_user(&stl_comstats, cp, sizeof(comstats_t)))
2537                         return -EFAULT;
2538                 portp = stl_getport(stl_comstats.brd, stl_comstats.panel,
2539                         stl_comstats.port);
2540                 if (portp == NULL)
2541                         return -ENODEV;
2542         }
2543
2544         portp->stats.state = portp->istate;
2545         portp->stats.flags = portp->flags;
2546         portp->stats.hwid = portp->hwid;
2547
2548         portp->stats.ttystate = 0;
2549         portp->stats.cflags = 0;
2550         portp->stats.iflags = 0;
2551         portp->stats.oflags = 0;
2552         portp->stats.lflags = 0;
2553         portp->stats.rxbuffered = 0;
2554
2555         spin_lock_irqsave(&stallion_lock, flags);
2556         if (portp->tty != NULL)
2557                 if (portp->tty->driver_data == portp) {
2558                         portp->stats.ttystate = portp->tty->flags;
2559                         /* No longer available as a statistic */
2560                         portp->stats.rxbuffered = 1; /*portp->tty->flip.count; */
2561                         if (portp->tty->termios != NULL) {
2562                                 portp->stats.cflags = portp->tty->termios->c_cflag;
2563                                 portp->stats.iflags = portp->tty->termios->c_iflag;
2564                                 portp->stats.oflags = portp->tty->termios->c_oflag;
2565                                 portp->stats.lflags = portp->tty->termios->c_lflag;
2566                         }
2567                 }
2568         spin_unlock_irqrestore(&stallion_lock, flags);
2569
2570         head = portp->tx.head;
2571         tail = portp->tx.tail;
2572         portp->stats.txbuffered = (head >= tail) ? (head - tail) :
2573                 (STL_TXBUFSIZE - (tail - head));
2574
2575         portp->stats.signals = (unsigned long) stl_getsignals(portp);
2576
2577         return copy_to_user(cp, &portp->stats,
2578                             sizeof(comstats_t)) ? -EFAULT : 0;
2579 }
2580
2581 /*****************************************************************************/
2582
2583 /*
2584  *      Clear the port stats structure. We also return it zeroed out...
2585  */
2586
2587 static int stl_clrportstats(struct stlport *portp, comstats_t __user *cp)
2588 {
2589         comstats_t      stl_comstats;
2590
2591         if (!portp) {
2592                 if (copy_from_user(&stl_comstats, cp, sizeof(comstats_t)))
2593                         return -EFAULT;
2594                 portp = stl_getport(stl_comstats.brd, stl_comstats.panel,
2595                         stl_comstats.port);
2596                 if (portp == NULL)
2597                         return -ENODEV;
2598         }
2599
2600         memset(&portp->stats, 0, sizeof(comstats_t));
2601         portp->stats.brd = portp->brdnr;
2602         portp->stats.panel = portp->panelnr;
2603         portp->stats.port = portp->portnr;
2604         return copy_to_user(cp, &portp->stats,
2605                             sizeof(comstats_t)) ? -EFAULT : 0;
2606 }
2607
2608 /*****************************************************************************/
2609
2610 /*
2611  *      Return the entire driver ports structure to a user app.
2612  */
2613
2614 static int stl_getportstruct(struct stlport __user *arg)
2615 {
2616         struct stlport  stl_dummyport;
2617         struct stlport  *portp;
2618
2619         if (copy_from_user(&stl_dummyport, arg, sizeof(struct stlport)))
2620                 return -EFAULT;
2621         portp = stl_getport(stl_dummyport.brdnr, stl_dummyport.panelnr,
2622                  stl_dummyport.portnr);
2623         if (!portp)
2624                 return -ENODEV;
2625         return copy_to_user(arg, portp, sizeof(struct stlport)) ? -EFAULT : 0;
2626 }
2627
2628 /*****************************************************************************/
2629
2630 /*
2631  *      Return the entire driver board structure to a user app.
2632  */
2633
2634 static int stl_getbrdstruct(struct stlbrd __user *arg)
2635 {
2636         struct stlbrd   stl_dummybrd;
2637         struct stlbrd   *brdp;
2638
2639         if (copy_from_user(&stl_dummybrd, arg, sizeof(struct stlbrd)))
2640                 return -EFAULT;
2641         if (stl_dummybrd.brdnr >= STL_MAXBRDS)
2642                 return -ENODEV;
2643         brdp = stl_brds[stl_dummybrd.brdnr];
2644         if (!brdp)
2645                 return -ENODEV;
2646         return copy_to_user(arg, brdp, sizeof(struct stlbrd)) ? -EFAULT : 0;
2647 }
2648
2649 /*****************************************************************************/
2650
2651 /*
2652  *      The "staliomem" device is also required to do some special operations
2653  *      on the board and/or ports. In this driver it is mostly used for stats
2654  *      collection.
2655  */
2656
2657 static int stl_memioctl(struct inode *ip, struct file *fp, unsigned int cmd, unsigned long arg)
2658 {
2659         int     brdnr, rc;
2660         void __user *argp = (void __user *)arg;
2661
2662         pr_debug("stl_memioctl(ip=%p,fp=%p,cmd=%x,arg=%lx)\n", ip, fp, cmd,arg);
2663
2664         brdnr = iminor(ip);
2665         if (brdnr >= STL_MAXBRDS)
2666                 return -ENODEV;
2667         rc = 0;
2668
2669         switch (cmd) {
2670         case COM_GETPORTSTATS:
2671                 rc = stl_getportstats(NULL, argp);
2672                 break;
2673         case COM_CLRPORTSTATS:
2674                 rc = stl_clrportstats(NULL, argp);
2675                 break;
2676         case COM_GETBRDSTATS:
2677                 rc = stl_getbrdstats(argp);
2678                 break;
2679         case COM_READPORT:
2680                 rc = stl_getportstruct(argp);
2681                 break;
2682         case COM_READBOARD:
2683                 rc = stl_getbrdstruct(argp);
2684                 break;
2685         default:
2686                 rc = -ENOIOCTLCMD;
2687                 break;
2688         }
2689
2690         return rc;
2691 }
2692
2693 static const struct tty_operations stl_ops = {
2694         .open = stl_open,
2695         .close = stl_close,
2696         .write = stl_write,
2697         .put_char = stl_putchar,
2698         .flush_chars = stl_flushchars,
2699         .write_room = stl_writeroom,
2700         .chars_in_buffer = stl_charsinbuffer,
2701         .ioctl = stl_ioctl,
2702         .set_termios = stl_settermios,
2703         .throttle = stl_throttle,
2704         .unthrottle = stl_unthrottle,
2705         .stop = stl_stop,
2706         .start = stl_start,
2707         .hangup = stl_hangup,
2708         .flush_buffer = stl_flushbuffer,
2709         .break_ctl = stl_breakctl,
2710         .wait_until_sent = stl_waituntilsent,
2711         .send_xchar = stl_sendxchar,
2712         .read_proc = stl_readproc,
2713         .tiocmget = stl_tiocmget,
2714         .tiocmset = stl_tiocmset,
2715 };
2716
2717 /*****************************************************************************/
2718 /*                       CD1400 HARDWARE FUNCTIONS                           */
2719 /*****************************************************************************/
2720
2721 /*
2722  *      These functions get/set/update the registers of the cd1400 UARTs.
2723  *      Access to the cd1400 registers is via an address/data io port pair.
2724  *      (Maybe should make this inline...)
2725  */
2726
2727 static int stl_cd1400getreg(struct stlport *portp, int regnr)
2728 {
2729         outb((regnr + portp->uartaddr), portp->ioaddr);
2730         return inb(portp->ioaddr + EREG_DATA);
2731 }
2732
2733 static void stl_cd1400setreg(struct stlport *portp, int regnr, int value)
2734 {
2735         outb(regnr + portp->uartaddr, portp->ioaddr);
2736         outb(value, portp->ioaddr + EREG_DATA);
2737 }
2738
2739 static int stl_cd1400updatereg(struct stlport *portp, int regnr, int value)
2740 {
2741         outb(regnr + portp->uartaddr, portp->ioaddr);
2742         if (inb(portp->ioaddr + EREG_DATA) != value) {
2743                 outb(value, portp->ioaddr + EREG_DATA);
2744                 return 1;
2745         }
2746         return 0;
2747 }
2748
2749 /*****************************************************************************/
2750
2751 /*
2752  *      Inbitialize the UARTs in a panel. We don't care what sort of board
2753  *      these ports are on - since the port io registers are almost
2754  *      identical when dealing with ports.
2755  */
2756
2757 static int stl_cd1400panelinit(struct stlbrd *brdp, struct stlpanel *panelp)
2758 {
2759         unsigned int    gfrcr;
2760         int             chipmask, i, j;
2761         int             nrchips, uartaddr, ioaddr;
2762         unsigned long   flags;
2763
2764         pr_debug("stl_panelinit(brdp=%p,panelp=%p)\n", brdp, panelp);
2765
2766         spin_lock_irqsave(&brd_lock, flags);
2767         BRDENABLE(panelp->brdnr, panelp->pagenr);
2768
2769 /*
2770  *      Check that each chip is present and started up OK.
2771  */
2772         chipmask = 0;
2773         nrchips = panelp->nrports / CD1400_PORTS;
2774         for (i = 0; i < nrchips; i++) {
2775                 if (brdp->brdtype == BRD_ECHPCI) {
2776                         outb((panelp->pagenr + (i >> 1)), brdp->ioctrl);
2777                         ioaddr = panelp->iobase;
2778                 } else
2779                         ioaddr = panelp->iobase + (EREG_BANKSIZE * (i >> 1));
2780                 uartaddr = (i & 0x01) ? 0x080 : 0;
2781                 outb((GFRCR + uartaddr), ioaddr);
2782                 outb(0, (ioaddr + EREG_DATA));
2783                 outb((CCR + uartaddr), ioaddr);
2784                 outb(CCR_RESETFULL, (ioaddr + EREG_DATA));
2785                 outb(CCR_RESETFULL, (ioaddr + EREG_DATA));
2786                 outb((GFRCR + uartaddr), ioaddr);
2787                 for (j = 0; j < CCR_MAXWAIT; j++)
2788                         if ((gfrcr = inb(ioaddr + EREG_DATA)) != 0)
2789                                 break;
2790
2791                 if ((j >= CCR_MAXWAIT) || (gfrcr < 0x40) || (gfrcr > 0x60)) {
2792                         printk("STALLION: cd1400 not responding, "
2793                                 "brd=%d panel=%d chip=%d\n",
2794                                 panelp->brdnr, panelp->panelnr, i);
2795                         continue;
2796                 }
2797                 chipmask |= (0x1 << i);
2798                 outb((PPR + uartaddr), ioaddr);
2799                 outb(PPR_SCALAR, (ioaddr + EREG_DATA));
2800         }
2801
2802         BRDDISABLE(panelp->brdnr);
2803         spin_unlock_irqrestore(&brd_lock, flags);
2804         return chipmask;
2805 }
2806
2807 /*****************************************************************************/
2808
2809 /*
2810  *      Initialize hardware specific port registers.
2811  */
2812
2813 static void stl_cd1400portinit(struct stlbrd *brdp, struct stlpanel *panelp, struct stlport *portp)
2814 {
2815         unsigned long flags;
2816         pr_debug("stl_cd1400portinit(brdp=%p,panelp=%p,portp=%p)\n", brdp,
2817                         panelp, portp);
2818
2819         if ((brdp == NULL) || (panelp == NULL) ||
2820             (portp == NULL))
2821                 return;
2822
2823         spin_lock_irqsave(&brd_lock, flags);
2824         portp->ioaddr = panelp->iobase + (((brdp->brdtype == BRD_ECHPCI) ||
2825                 (portp->portnr < 8)) ? 0 : EREG_BANKSIZE);
2826         portp->uartaddr = (portp->portnr & 0x04) << 5;
2827         portp->pagenr = panelp->pagenr + (portp->portnr >> 3);
2828
2829         BRDENABLE(portp->brdnr, portp->pagenr);
2830         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
2831         stl_cd1400setreg(portp, LIVR, (portp->portnr << 3));
2832         portp->hwid = stl_cd1400getreg(portp, GFRCR);
2833         BRDDISABLE(portp->brdnr);
2834         spin_unlock_irqrestore(&brd_lock, flags);
2835 }
2836
2837 /*****************************************************************************/
2838
2839 /*
2840  *      Wait for the command register to be ready. We will poll this,
2841  *      since it won't usually take too long to be ready.
2842  */
2843
2844 static void stl_cd1400ccrwait(struct stlport *portp)
2845 {
2846         int     i;
2847
2848         for (i = 0; i < CCR_MAXWAIT; i++)
2849                 if (stl_cd1400getreg(portp, CCR) == 0)
2850                         return;
2851
2852         printk("STALLION: cd1400 not responding, port=%d panel=%d brd=%d\n",
2853                 portp->portnr, portp->panelnr, portp->brdnr);
2854 }
2855
2856 /*****************************************************************************/
2857
2858 /*
2859  *      Set up the cd1400 registers for a port based on the termios port
2860  *      settings.
2861  */
2862
2863 static void stl_cd1400setport(struct stlport *portp, struct ktermios *tiosp)
2864 {
2865         struct stlbrd   *brdp;
2866         unsigned long   flags;
2867         unsigned int    clkdiv, baudrate;
2868         unsigned char   cor1, cor2, cor3;
2869         unsigned char   cor4, cor5, ccr;
2870         unsigned char   srer, sreron, sreroff;
2871         unsigned char   mcor1, mcor2, rtpr;
2872         unsigned char   clk, div;
2873
2874         cor1 = 0;
2875         cor2 = 0;
2876         cor3 = 0;
2877         cor4 = 0;
2878         cor5 = 0;
2879         ccr = 0;
2880         rtpr = 0;
2881         clk = 0;
2882         div = 0;
2883         mcor1 = 0;
2884         mcor2 = 0;
2885         sreron = 0;
2886         sreroff = 0;
2887
2888         brdp = stl_brds[portp->brdnr];
2889         if (brdp == NULL)
2890                 return;
2891
2892 /*
2893  *      Set up the RX char ignore mask with those RX error types we
2894  *      can ignore. We can get the cd1400 to help us out a little here,
2895  *      it will ignore parity errors and breaks for us.
2896  */
2897         portp->rxignoremsk = 0;
2898         if (tiosp->c_iflag & IGNPAR) {
2899                 portp->rxignoremsk |= (ST_PARITY | ST_FRAMING | ST_OVERRUN);
2900                 cor1 |= COR1_PARIGNORE;
2901         }
2902         if (tiosp->c_iflag & IGNBRK) {
2903                 portp->rxignoremsk |= ST_BREAK;
2904                 cor4 |= COR4_IGNBRK;
2905         }
2906
2907         portp->rxmarkmsk = ST_OVERRUN;
2908         if (tiosp->c_iflag & (INPCK | PARMRK))
2909                 portp->rxmarkmsk |= (ST_PARITY | ST_FRAMING);
2910         if (tiosp->c_iflag & BRKINT)
2911                 portp->rxmarkmsk |= ST_BREAK;
2912
2913 /*
2914  *      Go through the char size, parity and stop bits and set all the
2915  *      option register appropriately.
2916  */
2917         switch (tiosp->c_cflag & CSIZE) {
2918         case CS5:
2919                 cor1 |= COR1_CHL5;
2920                 break;
2921         case CS6:
2922                 cor1 |= COR1_CHL6;
2923                 break;
2924         case CS7:
2925                 cor1 |= COR1_CHL7;
2926                 break;
2927         default:
2928                 cor1 |= COR1_CHL8;
2929                 break;
2930         }
2931
2932         if (tiosp->c_cflag & CSTOPB)
2933                 cor1 |= COR1_STOP2;
2934         else
2935                 cor1 |= COR1_STOP1;
2936
2937         if (tiosp->c_cflag & PARENB) {
2938                 if (tiosp->c_cflag & PARODD)
2939                         cor1 |= (COR1_PARENB | COR1_PARODD);
2940                 else
2941                         cor1 |= (COR1_PARENB | COR1_PAREVEN);
2942         } else {
2943                 cor1 |= COR1_PARNONE;
2944         }
2945
2946 /*
2947  *      Set the RX FIFO threshold at 6 chars. This gives a bit of breathing
2948  *      space for hardware flow control and the like. This should be set to
2949  *      VMIN. Also here we will set the RX data timeout to 10ms - this should
2950  *      really be based on VTIME.
2951  */
2952         cor3 |= FIFO_RXTHRESHOLD;
2953         rtpr = 2;
2954
2955 /*
2956  *      Calculate the baud rate timers. For now we will just assume that
2957  *      the input and output baud are the same. Could have used a baud
2958  *      table here, but this way we can generate virtually any baud rate
2959  *      we like!
2960  */
2961         baudrate = tiosp->c_cflag & CBAUD;
2962         if (baudrate & CBAUDEX) {
2963                 baudrate &= ~CBAUDEX;
2964                 if ((baudrate < 1) || (baudrate > 4))
2965                         tiosp->c_cflag &= ~CBAUDEX;
2966                 else
2967                         baudrate += 15;
2968         }
2969         baudrate = stl_baudrates[baudrate];
2970         if ((tiosp->c_cflag & CBAUD) == B38400) {
2971                 if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_HI)
2972                         baudrate = 57600;
2973                 else if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_VHI)
2974                         baudrate = 115200;
2975                 else if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_SHI)
2976                         baudrate = 230400;
2977                 else if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_WARP)
2978                         baudrate = 460800;
2979                 else if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_CUST)
2980                         baudrate = (portp->baud_base / portp->custom_divisor);
2981         }
2982         if (baudrate > STL_CD1400MAXBAUD)
2983                 baudrate = STL_CD1400MAXBAUD;
2984
2985         if (baudrate > 0) {
2986                 for (clk = 0; clk < CD1400_NUMCLKS; clk++) {
2987                         clkdiv = (portp->clk / stl_cd1400clkdivs[clk]) / baudrate;
2988                         if (clkdiv < 0x100)
2989                                 break;
2990                 }
2991                 div = (unsigned char) clkdiv;
2992         }
2993
2994 /*
2995  *      Check what form of modem signaling is required and set it up.
2996  */
2997         if ((tiosp->c_cflag & CLOCAL) == 0) {
2998                 mcor1 |= MCOR1_DCD;
2999                 mcor2 |= MCOR2_DCD;
3000                 sreron |= SRER_MODEM;
3001                 portp->flags |= ASYNC_CHECK_CD;
3002         } else
3003                 portp->flags &= ~ASYNC_CHECK_CD;
3004
3005 /*
3006  *      Setup cd1400 enhanced modes if we can. In particular we want to
3007  *      handle as much of the flow control as possible automatically. As
3008  *      well as saving a few CPU cycles it will also greatly improve flow
3009  *      control reliability.
3010  */
3011         if (tiosp->c_iflag & IXON) {
3012                 cor2 |= COR2_TXIBE;
3013                 cor3 |= COR3_SCD12;
3014                 if (tiosp->c_iflag & IXANY)
3015                         cor2 |= COR2_IXM;
3016         }
3017
3018         if (tiosp->c_cflag & CRTSCTS) {
3019                 cor2 |= COR2_CTSAE;
3020                 mcor1 |= FIFO_RTSTHRESHOLD;
3021         }
3022
3023 /*
3024  *      All cd1400 register values calculated so go through and set
3025  *      them all up.
3026  */
3027
3028         pr_debug("SETPORT: portnr=%d panelnr=%d brdnr=%d\n",
3029                 portp->portnr, portp->panelnr, portp->brdnr);
3030         pr_debug("    cor1=%x cor2=%x cor3=%x cor4=%x cor5=%x\n",
3031                 cor1, cor2, cor3, cor4, cor5);
3032         pr_debug("    mcor1=%x mcor2=%x rtpr=%x sreron=%x sreroff=%x\n",
3033                 mcor1, mcor2, rtpr, sreron, sreroff);
3034         pr_debug("    tcor=%x tbpr=%x rcor=%x rbpr=%x\n", clk, div, clk, div);
3035         pr_debug("    schr1=%x schr2=%x schr3=%x schr4=%x\n",
3036                 tiosp->c_cc[VSTART], tiosp->c_cc[VSTOP],
3037                 tiosp->c_cc[VSTART], tiosp->c_cc[VSTOP]);
3038
3039         spin_lock_irqsave(&brd_lock, flags);
3040         BRDENABLE(portp->brdnr, portp->pagenr);
3041         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x3));
3042         srer = stl_cd1400getreg(portp, SRER);
3043         stl_cd1400setreg(portp, SRER, 0);
3044         if (stl_cd1400updatereg(portp, COR1, cor1))
3045                 ccr = 1;
3046         if (stl_cd1400updatereg(portp, COR2, cor2))
3047                 ccr = 1;
3048         if (stl_cd1400updatereg(portp, COR3, cor3))
3049                 ccr = 1;
3050         if (ccr) {
3051                 stl_cd1400ccrwait(portp);
3052                 stl_cd1400setreg(portp, CCR, CCR_CORCHANGE);
3053         }
3054         stl_cd1400setreg(portp, COR4, cor4);
3055         stl_cd1400setreg(portp, COR5, cor5);
3056         stl_cd1400setreg(portp, MCOR1, mcor1);
3057         stl_cd1400setreg(portp, MCOR2, mcor2);
3058         if (baudrate > 0) {
3059                 stl_cd1400setreg(portp, TCOR, clk);
3060                 stl_cd1400setreg(portp, TBPR, div);
3061                 stl_cd1400setreg(portp, RCOR, clk);
3062                 stl_cd1400setreg(portp, RBPR, div);
3063         }
3064         stl_cd1400setreg(portp, SCHR1, tiosp->c_cc[VSTART]);
3065         stl_cd1400setreg(portp, SCHR2, tiosp->c_cc[VSTOP]);
3066         stl_cd1400setreg(portp, SCHR3, tiosp->c_cc[VSTART]);
3067         stl_cd1400setreg(portp, SCHR4, tiosp->c_cc[VSTOP]);
3068         stl_cd1400setreg(portp, RTPR, rtpr);
3069         mcor1 = stl_cd1400getreg(portp, MSVR1);
3070         if (mcor1 & MSVR1_DCD)
3071                 portp->sigs |= TIOCM_CD;
3072         else
3073                 portp->sigs &= ~TIOCM_CD;
3074         stl_cd1400setreg(portp, SRER, ((srer & ~sreroff) | sreron));
3075         BRDDISABLE(portp->brdnr);
3076         spin_unlock_irqrestore(&brd_lock, flags);
3077 }
3078
3079 /*****************************************************************************/
3080
3081 /*
3082  *      Set the state of the DTR and RTS signals.
3083  */
3084
3085 static void stl_cd1400setsignals(struct stlport *portp, int dtr, int rts)
3086 {
3087         unsigned char   msvr1, msvr2;
3088         unsigned long   flags;
3089
3090         pr_debug("stl_cd1400setsignals(portp=%p,dtr=%d,rts=%d)\n",
3091                         portp, dtr, rts);
3092
3093         msvr1 = 0;
3094         msvr2 = 0;
3095         if (dtr > 0)
3096                 msvr1 = MSVR1_DTR;
3097         if (rts > 0)
3098                 msvr2 = MSVR2_RTS;
3099
3100         spin_lock_irqsave(&brd_lock, flags);
3101         BRDENABLE(portp->brdnr, portp->pagenr);
3102         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
3103         if (rts >= 0)
3104                 stl_cd1400setreg(portp, MSVR2, msvr2);
3105         if (dtr >= 0)
3106                 stl_cd1400setreg(portp, MSVR1, msvr1);
3107         BRDDISABLE(portp->brdnr);
3108         spin_unlock_irqrestore(&brd_lock, flags);
3109 }
3110
3111 /*****************************************************************************/
3112
3113 /*
3114  *      Return the state of the signals.
3115  */
3116
3117 static int stl_cd1400getsignals(struct stlport *portp)
3118 {
3119         unsigned char   msvr1, msvr2;
3120         unsigned long   flags;
3121         int             sigs;
3122
3123         pr_debug("stl_cd1400getsignals(portp=%p)\n", portp);
3124
3125         spin_lock_irqsave(&brd_lock, flags);
3126         BRDENABLE(portp->brdnr, portp->pagenr);
3127         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
3128         msvr1 = stl_cd1400getreg(portp, MSVR1);
3129         msvr2 = stl_cd1400getreg(portp, MSVR2);
3130         BRDDISABLE(portp->brdnr);
3131         spin_unlock_irqrestore(&brd_lock, flags);
3132
3133         sigs = 0;
3134         sigs |= (msvr1 & MSVR1_DCD) ? TIOCM_CD : 0;
3135         sigs |= (msvr1 & MSVR1_CTS) ? TIOCM_CTS : 0;
3136         sigs |= (msvr1 & MSVR1_DTR) ? TIOCM_DTR : 0;
3137         sigs |= (msvr2 & MSVR2_RTS) ? TIOCM_RTS : 0;
3138 #if 0
3139         sigs |= (msvr1 & MSVR1_RI) ? TIOCM_RI : 0;
3140         sigs |= (msvr1 & MSVR1_DSR) ? TIOCM_DSR : 0;
3141 #else
3142         sigs |= TIOCM_DSR;
3143 #endif
3144         return sigs;
3145 }
3146
3147 /*****************************************************************************/
3148
3149 /*
3150  *      Enable/Disable the Transmitter and/or Receiver.
3151  */
3152
3153 static void stl_cd1400enablerxtx(struct stlport *portp, int rx, int tx)
3154 {
3155         unsigned char   ccr;
3156         unsigned long   flags;
3157
3158         pr_debug("stl_cd1400enablerxtx(portp=%p,rx=%d,tx=%d)\n", portp, rx, tx);
3159
3160         ccr = 0;
3161
3162         if (tx == 0)
3163                 ccr |= CCR_TXDISABLE;
3164         else if (tx > 0)
3165                 ccr |= CCR_TXENABLE;
3166         if (rx == 0)
3167                 ccr |= CCR_RXDISABLE;
3168         else if (rx > 0)
3169                 ccr |= CCR_RXENABLE;
3170
3171         spin_lock_irqsave(&brd_lock, flags);
3172         BRDENABLE(portp->brdnr, portp->pagenr);
3173         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
3174         stl_cd1400ccrwait(portp);
3175         stl_cd1400setreg(portp, CCR, ccr);
3176         stl_cd1400ccrwait(portp);
3177         BRDDISABLE(portp->brdnr);
3178         spin_unlock_irqrestore(&brd_lock, flags);
3179 }
3180
3181 /*****************************************************************************/
3182
3183 /*
3184  *      Start/stop the Transmitter and/or Receiver.
3185  */
3186
3187 static void stl_cd1400startrxtx(struct stlport *portp, int rx, int tx)
3188 {
3189         unsigned char   sreron, sreroff;
3190         unsigned long   flags;
3191
3192         pr_debug("stl_cd1400startrxtx(portp=%p,rx=%d,tx=%d)\n", portp, rx, tx);
3193
3194         sreron = 0;
3195         sreroff = 0;
3196         if (tx == 0)
3197                 sreroff |= (SRER_TXDATA | SRER_TXEMPTY);
3198         else if (tx == 1)
3199                 sreron |= SRER_TXDATA;
3200         else if (tx >= 2)
3201                 sreron |= SRER_TXEMPTY;
3202         if (rx == 0)
3203                 sreroff |= SRER_RXDATA;
3204         else if (rx > 0)
3205                 sreron |= SRER_RXDATA;
3206
3207         spin_lock_irqsave(&brd_lock, flags);
3208         BRDENABLE(portp->brdnr, portp->pagenr);
3209         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
3210         stl_cd1400setreg(portp, SRER,
3211                 ((stl_cd1400getreg(portp, SRER) & ~sreroff) | sreron));
3212         BRDDISABLE(portp->brdnr);
3213         if (tx > 0)
3214                 set_bit(ASYI_TXBUSY, &portp->istate);
3215         spin_unlock_irqrestore(&brd_lock, flags);
3216 }
3217
3218 /*****************************************************************************/
3219
3220 /*
3221  *      Disable all interrupts from this port.
3222  */
3223
3224 static void stl_cd1400disableintrs(struct stlport *portp)
3225 {
3226         unsigned long   flags;
3227
3228         pr_debug("stl_cd1400disableintrs(portp=%p)\n", portp);
3229
3230         spin_lock_irqsave(&brd_lock, flags);
3231         BRDENABLE(portp->brdnr, portp->pagenr);
3232         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
3233         stl_cd1400setreg(portp, SRER, 0);
3234         BRDDISABLE(portp->brdnr);
3235         spin_unlock_irqrestore(&brd_lock, flags);
3236 }
3237
3238 /*****************************************************************************/
3239
3240 static void stl_cd1400sendbreak(struct stlport *portp, int len)
3241 {
3242         unsigned long   flags;
3243
3244         pr_debug("stl_cd1400sendbreak(portp=%p,len=%d)\n", portp, len);
3245
3246         spin_lock_irqsave(&brd_lock, flags);
3247         BRDENABLE(portp->brdnr, portp->pagenr);
3248         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
3249         stl_cd1400setreg(portp, SRER,
3250                 ((stl_cd1400getreg(portp, SRER) & ~SRER_TXDATA) |
3251                 SRER_TXEMPTY));
3252         BRDDISABLE(portp->brdnr);
3253         portp->brklen = len;
3254         if (len == 1)
3255                 portp->stats.txbreaks++;
3256         spin_unlock_irqrestore(&brd_lock, flags);
3257 }
3258
3259 /*****************************************************************************/
3260
3261 /*
3262  *      Take flow control actions...
3263  */
3264
3265 static void stl_cd1400flowctrl(struct stlport *portp, int state)
3266 {
3267         struct tty_struct       *tty;
3268         unsigned long           flags;
3269
3270         pr_debug("stl_cd1400flowctrl(portp=%p,state=%x)\n", portp, state);
3271
3272         if (portp == NULL)
3273                 return;
3274         tty = portp->tty;
3275         if (tty == NULL)
3276                 return;
3277
3278         spin_lock_irqsave(&brd_lock, flags);
3279         BRDENABLE(portp->brdnr, portp->pagenr);
3280         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
3281
3282         if (state) {
3283                 if (tty->termios->c_iflag & IXOFF) {
3284                         stl_cd1400ccrwait(portp);
3285                         stl_cd1400setreg(portp, CCR, CCR_SENDSCHR1);
3286                         portp->stats.rxxon++;
3287                         stl_cd1400ccrwait(portp);
3288                 }
3289 /*
3290  *              Question: should we return RTS to what it was before? It may
3291  *              have been set by an ioctl... Suppose not, since if you have
3292  *              hardware flow control set then it is pretty silly to go and
3293  *              set the RTS line by hand.
3294  */
3295                 if (tty->termios->c_cflag & CRTSCTS) {
3296                         stl_cd1400setreg(portp, MCOR1,
3297                                 (stl_cd1400getreg(portp, MCOR1) |
3298                                 FIFO_RTSTHRESHOLD));
3299                         stl_cd1400setreg(portp, MSVR2, MSVR2_RTS);
3300                         portp->stats.rxrtson++;
3301                 }
3302         } else {
3303                 if (tty->termios->c_iflag & IXOFF) {
3304                         stl_cd1400ccrwait(portp);
3305                         stl_cd1400setreg(portp, CCR, CCR_SENDSCHR2);
3306                         portp->stats.rxxoff++;
3307                         stl_cd1400ccrwait(portp);
3308                 }
3309                 if (tty->termios->c_cflag & CRTSCTS) {
3310                         stl_cd1400setreg(portp, MCOR1,
3311                                 (stl_cd1400getreg(portp, MCOR1) & 0xf0));
3312                         stl_cd1400setreg(portp, MSVR2, 0);
3313                         portp->stats.rxrtsoff++;
3314                 }
3315         }
3316
3317         BRDDISABLE(portp->brdnr);
3318         spin_unlock_irqrestore(&brd_lock, flags);
3319 }
3320
3321 /*****************************************************************************/
3322
3323 /*
3324  *      Send a flow control character...
3325  */
3326
3327 static void stl_cd1400sendflow(struct stlport *portp, int state)
3328 {
3329         struct tty_struct       *tty;
3330         unsigned long           flags;
3331
3332         pr_debug("stl_cd1400sendflow(portp=%p,state=%x)\n", portp, state);
3333
3334         if (portp == NULL)
3335                 return;
3336         tty = portp->tty;
3337         if (tty == NULL)
3338                 return;
3339
3340         spin_lock_irqsave(&brd_lock, flags);
3341         BRDENABLE(portp->brdnr, portp->pagenr);
3342         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
3343         if (state) {
3344                 stl_cd1400ccrwait(portp);
3345                 stl_cd1400setreg(portp, CCR, CCR_SENDSCHR1);
3346                 portp->stats.rxxon++;
3347                 stl_cd1400ccrwait(portp);
3348         } else {
3349                 stl_cd1400ccrwait(portp);
3350                 stl_cd1400setreg(portp, CCR, CCR_SENDSCHR2);
3351                 portp->stats.rxxoff++;
3352                 stl_cd1400ccrwait(portp);
3353         }
3354         BRDDISABLE(portp->brdnr);
3355         spin_unlock_irqrestore(&brd_lock, flags);
3356 }
3357
3358 /*****************************************************************************/
3359
3360 static void stl_cd1400flush(struct stlport *portp)
3361 {
3362         unsigned long   flags;
3363
3364         pr_debug("stl_cd1400flush(portp=%p)\n", portp);
3365
3366         if (portp == NULL)
3367                 return;
3368
3369         spin_lock_irqsave(&brd_lock, flags);
3370         BRDENABLE(portp->brdnr, portp->pagenr);
3371         stl_cd1400setreg(portp, CAR, (portp->portnr & 0x03));
3372         stl_cd1400ccrwait(portp);
3373         stl_cd1400setreg(portp, CCR, CCR_TXFLUSHFIFO);
3374         stl_cd1400ccrwait(portp);
3375         portp->tx.tail = portp->tx.head;
3376         BRDDISABLE(portp->brdnr);
3377         spin_unlock_irqrestore(&brd_lock, flags);
3378 }
3379
3380 /*****************************************************************************/
3381
3382 /*
3383  *      Return the current state of data flow on this port. This is only
3384  *      really interresting when determining if data has fully completed
3385  *      transmission or not... This is easy for the cd1400, it accurately
3386  *      maintains the busy port flag.
3387  */
3388
3389 static int stl_cd1400datastate(struct stlport *portp)
3390 {
3391         pr_debug("stl_cd1400datastate(portp=%p)\n", portp);
3392
3393         if (portp == NULL)
3394                 return 0;
3395
3396         return test_bit(ASYI_TXBUSY, &portp->istate) ? 1 : 0;
3397 }
3398
3399 /*****************************************************************************/
3400
3401 /*
3402  *      Interrupt service routine for cd1400 EasyIO boards.
3403  */
3404
3405 static void stl_cd1400eiointr(struct stlpanel *panelp, unsigned int iobase)
3406 {
3407         unsigned char   svrtype;
3408
3409         pr_debug("stl_cd1400eiointr(panelp=%p,iobase=%x)\n", panelp, iobase);
3410
3411         spin_lock(&brd_lock);
3412         outb(SVRR, iobase);
3413         svrtype = inb(iobase + EREG_DATA);
3414         if (panelp->nrports > 4) {
3415                 outb((SVRR + 0x80), iobase);
3416                 svrtype |= inb(iobase + EREG_DATA);
3417         }
3418
3419         if (svrtype & SVRR_RX)
3420                 stl_cd1400rxisr(panelp, iobase);
3421         else if (svrtype & SVRR_TX)
3422                 stl_cd1400txisr(panelp, iobase);
3423         else if (svrtype & SVRR_MDM)
3424                 stl_cd1400mdmisr(panelp, iobase);
3425
3426         spin_unlock(&brd_lock);
3427 }
3428
3429 /*****************************************************************************/
3430
3431 /*
3432  *      Interrupt service routine for cd1400 panels.
3433  */
3434
3435 static void stl_cd1400echintr(struct stlpanel *panelp, unsigned int iobase)
3436 {
3437         unsigned char   svrtype;
3438
3439         pr_debug("stl_cd1400echintr(panelp=%p,iobase=%x)\n", panelp, iobase);
3440
3441         outb(SVRR, iobase);
3442         svrtype = inb(iobase + EREG_DATA);
3443         outb((SVRR + 0x80), iobase);
3444         svrtype |= inb(iobase + EREG_DATA);
3445         if (svrtype & SVRR_RX)
3446                 stl_cd1400rxisr(panelp, iobase);
3447         else if (svrtype & SVRR_TX)
3448                 stl_cd1400txisr(panelp, iobase);
3449         else if (svrtype & SVRR_MDM)
3450                 stl_cd1400mdmisr(panelp, iobase);
3451 }
3452
3453
3454 /*****************************************************************************/
3455
3456 /*
3457  *      Unfortunately we need to handle breaks in the TX data stream, since
3458  *      this is the only way to generate them on the cd1400.
3459  */
3460
3461 static int stl_cd1400breakisr(struct stlport *portp, int ioaddr)
3462 {
3463         if (portp->brklen == 1) {
3464                 outb((COR2 + portp->uartaddr), ioaddr);
3465                 outb((inb(ioaddr + EREG_DATA) | COR2_ETC),
3466                         (ioaddr + EREG_DATA));
3467                 outb((TDR + portp->uartaddr), ioaddr);
3468                 outb(ETC_CMD, (ioaddr + EREG_DATA));
3469                 outb(ETC_STARTBREAK, (ioaddr + EREG_DATA));
3470                 outb((SRER + portp->uartaddr), ioaddr);
3471                 outb((inb(ioaddr + EREG_DATA) & ~(SRER_TXDATA | SRER_TXEMPTY)),
3472                         (ioaddr + EREG_DATA));
3473                 return 1;
3474         } else if (portp->brklen > 1) {
3475                 outb((TDR + portp->uartaddr), ioaddr);
3476                 outb(ETC_CMD, (ioaddr + EREG_DATA));
3477                 outb(ETC_STOPBREAK, (ioaddr + EREG_DATA));
3478                 portp->brklen = -1;
3479                 return 1;
3480         } else {
3481                 outb((COR2 + portp->uartaddr), ioaddr);
3482                 outb((inb(ioaddr + EREG_DATA) & ~COR2_ETC),
3483                         (ioaddr + EREG_DATA));
3484                 portp->brklen = 0;
3485         }
3486         return 0;
3487 }
3488
3489 /*****************************************************************************/
3490
3491 /*
3492  *      Transmit interrupt handler. This has gotta be fast!  Handling TX
3493  *      chars is pretty simple, stuff as many as possible from the TX buffer
3494  *      into the cd1400 FIFO. Must also handle TX breaks here, since they
3495  *      are embedded as commands in the data stream. Oh no, had to use a goto!
3496  *      This could be optimized more, will do when I get time...
3497  *      In practice it is possible that interrupts are enabled but that the
3498  *      port has been hung up. Need to handle not having any TX buffer here,
3499  *      this is done by using the side effect that head and tail will also
3500  *      be NULL if the buffer has been freed.
3501  */
3502
3503 static void stl_cd1400txisr(struct stlpanel *panelp, int ioaddr)
3504 {
3505         struct stlport  *portp;
3506         int             len, stlen;
3507         char            *head, *tail;
3508         unsigned char   ioack, srer;
3509
3510         pr_debug("stl_cd1400txisr(panelp=%p,ioaddr=%x)\n", panelp, ioaddr);
3511
3512         ioack = inb(ioaddr + EREG_TXACK);
3513         if (((ioack & panelp->ackmask) != 0) ||
3514             ((ioack & ACK_TYPMASK) != ACK_TYPTX)) {
3515                 printk("STALLION: bad TX interrupt ack value=%x\n", ioack);
3516                 return;
3517         }
3518         portp = panelp->ports[(ioack >> 3)];
3519
3520 /*
3521  *      Unfortunately we need to handle breaks in the data stream, since
3522  *      this is the only way to generate them on the cd1400. Do it now if
3523  *      a break is to be sent.
3524  */
3525         if (portp->brklen != 0)
3526                 if (stl_cd1400breakisr(portp, ioaddr))
3527                         goto stl_txalldone;
3528
3529         head = portp->tx.head;
3530         tail = portp->tx.tail;
3531         len = (head >= tail) ? (head - tail) : (STL_TXBUFSIZE - (tail - head));
3532         if ((len == 0) || ((len < STL_TXBUFLOW) &&
3533             (test_bit(ASYI_TXLOW, &portp->istate) == 0))) {
3534                 set_bit(ASYI_TXLOW, &portp->istate);
3535                 schedule_work(&portp->tqueue);
3536         }
3537
3538         if (len == 0) {
3539                 outb((SRER + portp->uartaddr), ioaddr);
3540                 srer = inb(ioaddr + EREG_DATA);
3541                 if (srer & SRER_TXDATA) {
3542                         srer = (srer & ~SRER_TXDATA) | SRER_TXEMPTY;
3543                 } else {
3544                         srer &= ~(SRER_TXDATA | SRER_TXEMPTY);
3545                         clear_bit(ASYI_TXBUSY, &portp->istate);
3546                 }
3547                 outb(srer, (ioaddr + EREG_DATA));
3548         } else {
3549                 len = min(len, CD1400_TXFIFOSIZE);
3550                 portp->stats.txtotal += len;
3551                 stlen = min(len, ((portp->tx.buf + STL_TXBUFSIZE) - tail));
3552                 outb((TDR + portp->uartaddr), ioaddr);
3553                 outsb((ioaddr + EREG_DATA), tail, stlen);
3554                 len -= stlen;
3555                 tail += stlen;
3556                 if (tail >= (portp->tx.buf + STL_TXBUFSIZE))
3557                         tail = portp->tx.buf;
3558                 if (len > 0) {
3559                         outsb((ioaddr + EREG_DATA), tail, len);
3560                         tail += len;
3561                 }
3562                 portp->tx.tail = tail;
3563         }
3564
3565 stl_txalldone:
3566         outb((EOSRR + portp->uartaddr), ioaddr);
3567         outb(0, (ioaddr + EREG_DATA));
3568 }
3569
3570 /*****************************************************************************/
3571
3572 /*
3573  *      Receive character interrupt handler. Determine if we have good chars
3574  *      or bad chars and then process appropriately. Good chars are easy
3575  *      just shove the lot into the RX buffer and set all status byte to 0.
3576  *      If a bad RX char then process as required. This routine needs to be
3577  *      fast!  In practice it is possible that we get an interrupt on a port
3578  *      that is closed. This can happen on hangups - since they completely
3579  *      shutdown a port not in user context. Need to handle this case.
3580  */
3581
3582 static void stl_cd1400rxisr(struct stlpanel *panelp, int ioaddr)
3583 {
3584         struct stlport          *portp;
3585         struct tty_struct       *tty;
3586         unsigned int            ioack, len, buflen;
3587         unsigned char           status;
3588         char                    ch;
3589
3590         pr_debug("stl_cd1400rxisr(panelp=%p,ioaddr=%x)\n", panelp, ioaddr);
3591
3592         ioack = inb(ioaddr + EREG_RXACK);
3593         if ((ioack & panelp->ackmask) != 0) {
3594                 printk("STALLION: bad RX interrupt ack value=%x\n", ioack);
3595                 return;
3596         }
3597         portp = panelp->ports[(ioack >> 3)];
3598         tty = portp->tty;
3599
3600         if ((ioack & ACK_TYPMASK) == ACK_TYPRXGOOD) {
3601                 outb((RDCR + portp->uartaddr), ioaddr);
3602                 len = inb(ioaddr + EREG_DATA);
3603                 if (tty == NULL || (buflen = tty_buffer_request_room(tty, len)) == 0) {
3604                         len = min(len, sizeof(stl_unwanted));
3605                         outb((RDSR + portp->uartaddr), ioaddr);
3606                         insb((ioaddr + EREG_DATA), &stl_unwanted[0], len);
3607                         portp->stats.rxlost += len;
3608                         portp->stats.rxtotal += len;
3609                 } else {
3610                         len = min(len, buflen);
3611                         if (len > 0) {
3612                                 unsigned char *ptr;
3613                                 outb((RDSR + portp->uartaddr), ioaddr);
3614                                 tty_prepare_flip_string(tty, &ptr, len);
3615                                 insb((ioaddr + EREG_DATA), ptr, len);
3616                                 tty_schedule_flip(tty);
3617                                 portp->stats.rxtotal += len;
3618                         }
3619                 }
3620         } else if ((ioack & ACK_TYPMASK) == ACK_TYPRXBAD) {
3621                 outb((RDSR + portp->uartaddr), ioaddr);
3622                 status = inb(ioaddr + EREG_DATA);
3623                 ch = inb(ioaddr + EREG_DATA);
3624                 if (status & ST_PARITY)
3625                         portp->stats.rxparity++;
3626                 if (status & ST_FRAMING)
3627                         portp->stats.rxframing++;
3628                 if (status & ST_OVERRUN)
3629                         portp->stats.rxoverrun++;
3630                 if (status & ST_BREAK)
3631                         portp->stats.rxbreaks++;
3632                 if (status & ST_SCHARMASK) {
3633                         if ((status & ST_SCHARMASK) == ST_SCHAR1)
3634                                 portp->stats.txxon++;
3635                         if ((status & ST_SCHARMASK) == ST_SCHAR2)
3636                                 portp->stats.txxoff++;
3637                         goto stl_rxalldone;
3638                 }
3639                 if (tty != NULL && (portp->rxignoremsk & status) == 0) {
3640                         if (portp->rxmarkmsk & status) {
3641                                 if (status & ST_BREAK) {
3642                                         status = TTY_BREAK;
3643                                         if (portp->flags & ASYNC_SAK) {
3644                                                 do_SAK(tty);
3645                                                 BRDENABLE(portp->brdnr, portp->pagenr);
3646                                         }
3647                                 } else if (status & ST_PARITY)
3648                                         status = TTY_PARITY;
3649                                 else if (status & ST_FRAMING)
3650                                         status = TTY_FRAME;
3651                                 else if(status & ST_OVERRUN)
3652                                         status = TTY_OVERRUN;
3653                                 else
3654                                         status = 0;
3655                         } else
3656                                 status = 0;
3657                         tty_insert_flip_char(tty, ch, status);
3658                         tty_schedule_flip(tty);
3659                 }
3660         } else {
3661                 printk("STALLION: bad RX interrupt ack value=%x\n", ioack);
3662                 return;
3663         }
3664
3665 stl_rxalldone:
3666         outb((EOSRR + portp->uartaddr), ioaddr);
3667         outb(0, (ioaddr + EREG_DATA));
3668 }
3669
3670 /*****************************************************************************/
3671
3672 /*
3673  *      Modem interrupt handler. The is called when the modem signal line
3674  *      (DCD) has changed state. Leave most of the work to the off-level
3675  *      processing routine.
3676  */
3677
3678 static void stl_cd1400mdmisr(struct stlpanel *panelp, int ioaddr)
3679 {
3680         struct stlport  *portp;
3681         unsigned int    ioack;
3682         unsigned char   misr;
3683
3684         pr_debug("stl_cd1400mdmisr(panelp=%p)\n", panelp);
3685
3686         ioack = inb(ioaddr + EREG_MDACK);
3687         if (((ioack & panelp->ackmask) != 0) ||
3688             ((ioack & ACK_TYPMASK) != ACK_TYPMDM)) {
3689                 printk("STALLION: bad MODEM interrupt ack value=%x\n", ioack);
3690                 return;
3691         }
3692         portp = panelp->ports[(ioack >> 3)];
3693
3694         outb((MISR + portp->uartaddr), ioaddr);
3695         misr = inb(ioaddr + EREG_DATA);
3696         if (misr & MISR_DCD) {
3697                 set_bit(ASYI_DCDCHANGE, &portp->istate);
3698                 schedule_work(&portp->tqueue);
3699                 portp->stats.modem++;
3700         }
3701
3702         outb((EOSRR + portp->uartaddr), ioaddr);
3703         outb(0, (ioaddr + EREG_DATA));
3704 }
3705
3706 /*****************************************************************************/
3707 /*                      SC26198 HARDWARE FUNCTIONS                           */
3708 /*****************************************************************************/
3709
3710 /*
3711  *      These functions get/set/update the registers of the sc26198 UARTs.
3712  *      Access to the sc26198 registers is via an address/data io port pair.
3713  *      (Maybe should make this inline...)
3714  */
3715
3716 static int stl_sc26198getreg(struct stlport *portp, int regnr)
3717 {
3718         outb((regnr | portp->uartaddr), (portp->ioaddr + XP_ADDR));
3719         return inb(portp->ioaddr + XP_DATA);
3720 }
3721
3722 static void stl_sc26198setreg(struct stlport *portp, int regnr, int value)
3723 {
3724         outb((regnr | portp->uartaddr), (portp->ioaddr + XP_ADDR));
3725         outb(value, (portp->ioaddr + XP_DATA));
3726 }
3727
3728 static int stl_sc26198updatereg(struct stlport *portp, int regnr, int value)
3729 {
3730         outb((regnr | portp->uartaddr), (portp->ioaddr + XP_ADDR));
3731         if (inb(portp->ioaddr + XP_DATA) != value) {
3732                 outb(value, (portp->ioaddr + XP_DATA));
3733                 return 1;
3734         }
3735         return 0;
3736 }
3737
3738 /*****************************************************************************/
3739
3740 /*
3741  *      Functions to get and set the sc26198 global registers.
3742  */
3743
3744 static int stl_sc26198getglobreg(struct stlport *portp, int regnr)
3745 {
3746         outb(regnr, (portp->ioaddr + XP_ADDR));
3747         return inb(portp->ioaddr + XP_DATA);
3748 }
3749
3750 #if 0
3751 static void stl_sc26198setglobreg(struct stlport *portp, int regnr, int value)
3752 {
3753         outb(regnr, (portp->ioaddr + XP_ADDR));
3754         outb(value, (portp->ioaddr + XP_DATA));
3755 }
3756 #endif
3757
3758 /*****************************************************************************/
3759
3760 /*
3761  *      Inbitialize the UARTs in a panel. We don't care what sort of board
3762  *      these ports are on - since the port io registers are almost
3763  *      identical when dealing with ports.
3764  */
3765
3766 static int stl_sc26198panelinit(struct stlbrd *brdp, struct stlpanel *panelp)
3767 {
3768         int     chipmask, i;
3769         int     nrchips, ioaddr;
3770
3771         pr_debug("stl_sc26198panelinit(brdp=%p,panelp=%p)\n", brdp, panelp);
3772
3773         BRDENABLE(panelp->brdnr, panelp->pagenr);
3774
3775 /*
3776  *      Check that each chip is present and started up OK.
3777  */
3778         chipmask = 0;
3779         nrchips = (panelp->nrports + 4) / SC26198_PORTS;
3780         if (brdp->brdtype == BRD_ECHPCI)
3781                 outb(panelp->pagenr, brdp->ioctrl);
3782
3783         for (i = 0; i < nrchips; i++) {
3784                 ioaddr = panelp->iobase + (i * 4);
3785                 outb(SCCR, (ioaddr + XP_ADDR));
3786                 outb(CR_RESETALL, (ioaddr + XP_DATA));
3787                 outb(TSTR, (ioaddr + XP_ADDR));
3788                 if (inb(ioaddr + XP_DATA) != 0) {
3789                         printk("STALLION: sc26198 not responding, "
3790                                 "brd=%d panel=%d chip=%d\n",
3791                                 panelp->brdnr, panelp->panelnr, i);
3792                         continue;
3793                 }
3794                 chipmask |= (0x1 << i);
3795                 outb(GCCR, (ioaddr + XP_ADDR));
3796                 outb(GCCR_IVRTYPCHANACK, (ioaddr + XP_DATA));
3797                 outb(WDTRCR, (ioaddr + XP_ADDR));
3798                 outb(0xff, (ioaddr + XP_DATA));
3799         }
3800
3801         BRDDISABLE(panelp->brdnr);
3802         return chipmask;
3803 }
3804
3805 /*****************************************************************************/
3806
3807 /*
3808  *      Initialize hardware specific port registers.
3809  */
3810
3811 static void stl_sc26198portinit(struct stlbrd *brdp, struct stlpanel *panelp, struct stlport *portp)
3812 {
3813         pr_debug("stl_sc26198portinit(brdp=%p,panelp=%p,portp=%p)\n", brdp,
3814                         panelp, portp);
3815
3816         if ((brdp == NULL) || (panelp == NULL) ||
3817             (portp == NULL))
3818                 return;
3819
3820         portp->ioaddr = panelp->iobase + ((portp->portnr < 8) ? 0 : 4);
3821         portp->uartaddr = (portp->portnr & 0x07) << 4;
3822         portp->pagenr = panelp->pagenr;
3823         portp->hwid = 0x1;
3824
3825         BRDENABLE(portp->brdnr, portp->pagenr);
3826         stl_sc26198setreg(portp, IOPCR, IOPCR_SETSIGS);
3827         BRDDISABLE(portp->brdnr);
3828 }
3829
3830 /*****************************************************************************/
3831
3832 /*
3833  *      Set up the sc26198 registers for a port based on the termios port
3834  *      settings.
3835  */
3836
3837 static void stl_sc26198setport(struct stlport *portp, struct ktermios *tiosp)
3838 {
3839         struct stlbrd   *brdp;
3840         unsigned long   flags;
3841         unsigned int    baudrate;
3842         unsigned char   mr0, mr1, mr2, clk;
3843         unsigned char   imron, imroff, iopr, ipr;
3844
3845         mr0 = 0;
3846         mr1 = 0;
3847         mr2 = 0;
3848         clk = 0;
3849         iopr = 0;
3850         imron = 0;
3851         imroff = 0;
3852
3853         brdp = stl_brds[portp->brdnr];
3854         if (brdp == NULL)
3855                 return;
3856
3857 /*
3858  *      Set up the RX char ignore mask with those RX error types we
3859  *      can ignore.
3860  */
3861         portp->rxignoremsk = 0;
3862         if (tiosp->c_iflag & IGNPAR)
3863                 portp->rxignoremsk |= (SR_RXPARITY | SR_RXFRAMING |
3864                         SR_RXOVERRUN);
3865         if (tiosp->c_iflag & IGNBRK)
3866                 portp->rxignoremsk |= SR_RXBREAK;
3867
3868         portp->rxmarkmsk = SR_RXOVERRUN;
3869         if (tiosp->c_iflag & (INPCK | PARMRK))
3870                 portp->rxmarkmsk |= (SR_RXPARITY | SR_RXFRAMING);
3871         if (tiosp->c_iflag & BRKINT)
3872                 portp->rxmarkmsk |= SR_RXBREAK;
3873
3874 /*
3875  *      Go through the char size, parity and stop bits and set all the
3876  *      option register appropriately.
3877  */
3878         switch (tiosp->c_cflag & CSIZE) {
3879         case CS5:
3880                 mr1 |= MR1_CS5;
3881                 break;
3882         case CS6:
3883                 mr1 |= MR1_CS6;
3884                 break;
3885         case CS7:
3886                 mr1 |= MR1_CS7;
3887                 break;
3888         default:
3889                 mr1 |= MR1_CS8;
3890                 break;
3891         }
3892
3893         if (tiosp->c_cflag & CSTOPB)
3894                 mr2 |= MR2_STOP2;
3895         else
3896                 mr2 |= MR2_STOP1;
3897
3898         if (tiosp->c_cflag & PARENB) {
3899                 if (tiosp->c_cflag & PARODD)
3900                         mr1 |= (MR1_PARENB | MR1_PARODD);
3901                 else
3902                         mr1 |= (MR1_PARENB | MR1_PAREVEN);
3903         } else
3904                 mr1 |= MR1_PARNONE;
3905
3906         mr1 |= MR1_ERRBLOCK;
3907
3908 /*
3909  *      Set the RX FIFO threshold at 8 chars. This gives a bit of breathing
3910  *      space for hardware flow control and the like. This should be set to
3911  *      VMIN.
3912  */
3913         mr2 |= MR2_RXFIFOHALF;
3914
3915 /*
3916  *      Calculate the baud rate timers. For now we will just assume that
3917  *      the input and output baud are the same. The sc26198 has a fixed
3918  *      baud rate table, so only discrete baud rates possible.
3919  */
3920         baudrate = tiosp->c_cflag & CBAUD;
3921         if (baudrate & CBAUDEX) {
3922                 baudrate &= ~CBAUDEX;
3923                 if ((baudrate < 1) || (baudrate > 4))
3924                         tiosp->c_cflag &= ~CBAUDEX;
3925                 else
3926                         baudrate += 15;
3927         }
3928         baudrate = stl_baudrates[baudrate];
3929         if ((tiosp->c_cflag & CBAUD) == B38400) {
3930                 if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_HI)
3931                         baudrate = 57600;
3932                 else if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_VHI)
3933                         baudrate = 115200;
3934                 else if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_SHI)
3935                         baudrate = 230400;
3936                 else if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_WARP)
3937                         baudrate = 460800;
3938                 else if ((portp->flags & ASYNC_SPD_MASK) == ASYNC_SPD_CUST)
3939                         baudrate = (portp->baud_base / portp->custom_divisor);
3940         }
3941         if (baudrate > STL_SC26198MAXBAUD)
3942                 baudrate = STL_SC26198MAXBAUD;
3943
3944         if (baudrate > 0)
3945                 for (clk = 0; clk < SC26198_NRBAUDS; clk++)
3946                         if (baudrate <= sc26198_baudtable[clk])
3947                                 break;
3948
3949 /*
3950  *      Check what form of modem signaling is required and set it up.
3951  */
3952         if (tiosp->c_cflag & CLOCAL) {
3953                 portp->flags &= ~ASYNC_CHECK_CD;
3954         } else {
3955                 iopr |= IOPR_DCDCOS;
3956                 imron |= IR_IOPORT;
3957                 portp->flags |= ASYNC_CHECK_CD;
3958         }
3959
3960 /*
3961  *      Setup sc26198 enhanced modes if we can. In particular we want to
3962  *      handle as much of the flow control as possible automatically. As
3963  *      well as saving a few CPU cycles it will also greatly improve flow
3964  *      control reliability.
3965  */
3966         if (tiosp->c_iflag & IXON) {
3967                 mr0 |= MR0_SWFTX | MR0_SWFT;
3968                 imron |= IR_XONXOFF;
3969         } else
3970                 imroff |= IR_XONXOFF;
3971
3972         if (tiosp->c_iflag & IXOFF)
3973                 mr0 |= MR0_SWFRX;
3974
3975         if (tiosp->c_cflag & CRTSCTS) {
3976                 mr2 |= MR2_AUTOCTS;
3977                 mr1 |= MR1_AUTORTS;
3978         }
3979
3980 /*
3981  *      All sc26198 register values calculated so go through and set
3982  *      them all up.
3983  */
3984
3985         pr_debug("SETPORT: portnr=%d panelnr=%d brdnr=%d\n",
3986                 portp->portnr, portp->panelnr, portp->brdnr);
3987         pr_debug("    mr0=%x mr1=%x mr2=%x clk=%x\n", mr0, mr1, mr2, clk);
3988         pr_debug("    iopr=%x imron=%x imroff=%x\n", iopr, imron, imroff);
3989         pr_debug("    schr1=%x schr2=%x schr3=%x schr4=%x\n",
3990                 tiosp->c_cc[VSTART], tiosp->c_cc[VSTOP],
3991                 tiosp->c_cc[VSTART], tiosp->c_cc[VSTOP]);
3992
3993         spin_lock_irqsave(&brd_lock, flags);
3994         BRDENABLE(portp->brdnr, portp->pagenr);
3995         stl_sc26198setreg(portp, IMR, 0);
3996         stl_sc26198updatereg(portp, MR0, mr0);
3997         stl_sc26198updatereg(portp, MR1, mr1);
3998         stl_sc26198setreg(portp, SCCR, CR_RXERRBLOCK);
3999         stl_sc26198updatereg(portp, MR2, mr2);
4000         stl_sc26198updatereg(portp, IOPIOR,
4001                 ((stl_sc26198getreg(portp, IOPIOR) & ~IPR_CHANGEMASK) | iopr));
4002
4003         if (baudrate > 0) {
4004                 stl_sc26198setreg(portp, TXCSR, clk);
4005                 stl_sc26198setreg(portp, RXCSR, clk);
4006         }
4007
4008         stl_sc26198setreg(portp, XONCR, tiosp->c_cc[VSTART]);
4009         stl_sc26198setreg(portp, XOFFCR, tiosp->c_cc[VSTOP]);
4010
4011         ipr = stl_sc26198getreg(portp, IPR);
4012         if (ipr & IPR_DCD)
4013                 portp->sigs &= ~TIOCM_CD;
4014         else
4015                 portp->sigs |= TIOCM_CD;
4016
4017         portp->imr = (portp->imr & ~imroff) | imron;
4018         stl_sc26198setreg(portp, IMR, portp->imr);
4019         BRDDISABLE(portp->brdnr);
4020         spin_unlock_irqrestore(&brd_lock, flags);
4021 }
4022
4023 /*****************************************************************************/
4024
4025 /*
4026  *      Set the state of the DTR and RTS signals.
4027  */
4028
4029 static void stl_sc26198setsignals(struct stlport *portp, int dtr, int rts)
4030 {
4031         unsigned char   iopioron, iopioroff;
4032         unsigned long   flags;
4033
4034         pr_debug("stl_sc26198setsignals(portp=%p,dtr=%d,rts=%d)\n", portp,
4035                         dtr, rts);
4036
4037         iopioron = 0;
4038         iopioroff = 0;
4039         if (dtr == 0)
4040                 iopioroff |= IPR_DTR;
4041         else if (dtr > 0)
4042                 iopioron |= IPR_DTR;
4043         if (rts == 0)
4044                 iopioroff |= IPR_RTS;
4045         else if (rts > 0)
4046                 iopioron |= IPR_RTS;
4047
4048         spin_lock_irqsave(&brd_lock, flags);
4049         BRDENABLE(portp->brdnr, portp->pagenr);
4050         stl_sc26198setreg(portp, IOPIOR,
4051                 ((stl_sc26198getreg(portp, IOPIOR) & ~iopioroff) | iopioron));
4052         BRDDISABLE(portp->brdnr);
4053         spin_unlock_irqrestore(&brd_lock, flags);
4054 }
4055
4056 /*****************************************************************************/
4057
4058 /*
4059  *      Return the state of the signals.
4060  */
4061
4062 static int stl_sc26198getsignals(struct stlport *portp)
4063 {
4064         unsigned char   ipr;
4065         unsigned long   flags;
4066         int             sigs;
4067
4068         pr_debug("stl_sc26198getsignals(portp=%p)\n", portp);
4069
4070         spin_lock_irqsave(&brd_lock, flags);
4071         BRDENABLE(portp->brdnr, portp->pagenr);
4072         ipr = stl_sc26198getreg(portp, IPR);
4073         BRDDISABLE(portp->brdnr);
4074         spin_unlock_irqrestore(&brd_lock, flags);
4075
4076         sigs = 0;
4077         sigs |= (ipr & IPR_DCD) ? 0 : TIOCM_CD;
4078         sigs |= (ipr & IPR_CTS) ? 0 : TIOCM_CTS;
4079         sigs |= (ipr & IPR_DTR) ? 0: TIOCM_DTR;
4080         sigs |= (ipr & IPR_RTS) ? 0: TIOCM_RTS;
4081         sigs |= TIOCM_DSR;
4082         return sigs;
4083 }
4084
4085 /*****************************************************************************/
4086
4087 /*
4088  *      Enable/Disable the Transmitter and/or Receiver.
4089  */
4090
4091 static void stl_sc26198enablerxtx(struct stlport *portp, int rx, int tx)
4092 {
4093         unsigned char   ccr;
4094         unsigned long   flags;
4095
4096         pr_debug("stl_sc26198enablerxtx(portp=%p,rx=%d,tx=%d)\n", portp, rx,tx);
4097
4098         ccr = portp->crenable;
4099         if (tx == 0)
4100                 ccr &= ~CR_TXENABLE;
4101         else if (tx > 0)
4102                 ccr |= CR_TXENABLE;
4103         if (rx == 0)
4104                 ccr &= ~CR_RXENABLE;
4105         else if (rx > 0)
4106                 ccr |= CR_RXENABLE;
4107
4108         spin_lock_irqsave(&brd_lock, flags);
4109         BRDENABLE(portp->brdnr, portp->pagenr);
4110         stl_sc26198setreg(portp, SCCR, ccr);
4111         BRDDISABLE(portp->brdnr);
4112         portp->crenable = ccr;
4113         spin_unlock_irqrestore(&brd_lock, flags);
4114 }
4115
4116 /*****************************************************************************/
4117
4118 /*
4119  *      Start/stop the Transmitter and/or Receiver.
4120  */
4121
4122 static void stl_sc26198startrxtx(struct stlport *portp, int rx, int tx)
4123 {
4124         unsigned char   imr;
4125         unsigned long   flags;
4126
4127         pr_debug("stl_sc26198startrxtx(portp=%p,rx=%d,tx=%d)\n", portp, rx, tx);
4128
4129         imr = portp->imr;
4130         if (tx == 0)
4131                 imr &= ~IR_TXRDY;
4132         else if (tx == 1)
4133                 imr |= IR_TXRDY;
4134         if (rx == 0)
4135                 imr &= ~(IR_RXRDY | IR_RXBREAK | IR_RXWATCHDOG);
4136         else if (rx > 0)
4137                 imr |= IR_RXRDY | IR_RXBREAK | IR_RXWATCHDOG;
4138
4139         spin_lock_irqsave(&brd_lock, flags);
4140         BRDENABLE(portp->brdnr, portp->pagenr);
4141         stl_sc26198setreg(portp, IMR, imr);
4142         BRDDISABLE(portp->brdnr);
4143         portp->imr = imr;
4144         if (tx > 0)
4145                 set_bit(ASYI_TXBUSY, &portp->istate);
4146         spin_unlock_irqrestore(&brd_lock, flags);
4147 }
4148
4149 /*****************************************************************************/
4150
4151 /*
4152  *      Disable all interrupts from this port.
4153  */
4154
4155 static void stl_sc26198disableintrs(struct stlport *portp)
4156 {
4157         unsigned long   flags;
4158
4159         pr_debug("stl_sc26198disableintrs(portp=%p)\n", portp);
4160
4161         spin_lock_irqsave(&brd_lock, flags);
4162         BRDENABLE(portp->brdnr, portp->pagenr);
4163         portp->imr = 0;
4164         stl_sc26198setreg(portp, IMR, 0);
4165         BRDDISABLE(portp->brdnr);
4166         spin_unlock_irqrestore(&brd_lock, flags);
4167 }
4168
4169 /*****************************************************************************/
4170
4171 static void stl_sc26198sendbreak(struct stlport *portp, int len)
4172 {
4173         unsigned long   flags;
4174
4175         pr_debug("stl_sc26198sendbreak(portp=%p,len=%d)\n", portp, len);
4176
4177         spin_lock_irqsave(&brd_lock, flags);
4178         BRDENABLE(portp->brdnr, portp->pagenr);
4179         if (len == 1) {
4180                 stl_sc26198setreg(portp, SCCR, CR_TXSTARTBREAK);
4181                 portp->stats.txbreaks++;
4182         } else
4183                 stl_sc26198setreg(portp, SCCR, CR_TXSTOPBREAK);
4184
4185         BRDDISABLE(portp->brdnr);
4186         spin_unlock_irqrestore(&brd_lock, flags);
4187 }
4188
4189 /*****************************************************************************/
4190
4191 /*
4192  *      Take flow control actions...
4193  */
4194
4195 static void stl_sc26198flowctrl(struct stlport *portp, int state)
4196 {
4197         struct tty_struct       *tty;
4198         unsigned long           flags;
4199         unsigned char           mr0;
4200
4201         pr_debug("stl_sc26198flowctrl(portp=%p,state=%x)\n", portp, state);
4202
4203         if (portp == NULL)
4204                 return;
4205         tty = portp->tty;
4206         if (tty == NULL)
4207                 return;
4208
4209         spin_lock_irqsave(&brd_lock, flags);
4210         BRDENABLE(portp->brdnr, portp->pagenr);
4211
4212         if (state) {
4213                 if (tty->termios->c_iflag & IXOFF) {
4214                         mr0 = stl_sc26198getreg(portp, MR0);
4215                         stl_sc26198setreg(portp, MR0, (mr0 & ~MR0_SWFRXTX));
4216                         stl_sc26198setreg(portp, SCCR, CR_TXSENDXON);
4217                         mr0 |= MR0_SWFRX;
4218                         portp->stats.rxxon++;
4219                         stl_sc26198wait(portp);
4220                         stl_sc26198setreg(portp, MR0, mr0);
4221                 }
4222 /*
4223  *              Question: should we return RTS to what it was before? It may
4224  *              have been set by an ioctl... Suppose not, since if you have
4225  *              hardware flow control set then it is pretty silly to go and
4226  *              set the RTS line by hand.
4227  */
4228                 if (tty->termios->c_cflag & CRTSCTS) {
4229                         stl_sc26198setreg(portp, MR1,
4230                                 (stl_sc26198getreg(portp, MR1) | MR1_AUTORTS));
4231                         stl_sc26198setreg(portp, IOPIOR,
4232                                 (stl_sc26198getreg(portp, IOPIOR) | IOPR_RTS));
4233                         portp->stats.rxrtson++;
4234                 }
4235         } else {
4236                 if (tty->termios->c_iflag & IXOFF) {
4237                         mr0 = stl_sc26198getreg(portp, MR0);
4238                         stl_sc26198setreg(portp, MR0, (mr0 & ~MR0_SWFRXTX));
4239                         stl_sc26198setreg(portp, SCCR, CR_TXSENDXOFF);
4240                         mr0 &= ~MR0_SWFRX;
4241                         portp->stats.rxxoff++;
4242                         stl_sc26198wait(portp);
4243                         stl_sc26198setreg(portp, MR0, mr0);
4244                 }
4245                 if (tty->termios->c_cflag & CRTSCTS) {
4246                         stl_sc26198setreg(portp, MR1,
4247                                 (stl_sc26198getreg(portp, MR1) & ~MR1_AUTORTS));
4248                         stl_sc26198setreg(portp, IOPIOR,
4249                                 (stl_sc26198getreg(portp, IOPIOR) & ~IOPR_RTS));
4250                         portp->stats.rxrtsoff++;
4251                 }
4252         }
4253
4254         BRDDISABLE(portp->brdnr);
4255         spin_unlock_irqrestore(&brd_lock, flags);
4256 }
4257
4258 /*****************************************************************************/
4259
4260 /*
4261  *      Send a flow control character.
4262  */
4263
4264 static void stl_sc26198sendflow(struct stlport *portp, int state)
4265 {
4266         struct tty_struct       *tty;
4267         unsigned long           flags;
4268         unsigned char           mr0;
4269
4270         pr_debug("stl_sc26198sendflow(portp=%p,state=%x)\n", portp, state);
4271
4272         if (portp == NULL)
4273                 return;
4274         tty = portp->tty;
4275         if (tty == NULL)
4276                 return;
4277
4278         spin_lock_irqsave(&brd_lock, flags);
4279         BRDENABLE(portp->brdnr, portp->pagenr);
4280         if (state) {
4281                 mr0 = stl_sc26198getreg(portp, MR0);
4282                 stl_sc26198setreg(portp, MR0, (mr0 & ~MR0_SWFRXTX));
4283                 stl_sc26198setreg(portp, SCCR, CR_TXSENDXON);
4284                 mr0 |= MR0_SWFRX;
4285                 portp->stats.rxxon++;
4286                 stl_sc26198wait(portp);
4287                 stl_sc26198setreg(portp, MR0, mr0);
4288         } else {
4289                 mr0 = stl_sc26198getreg(portp, MR0);
4290                 stl_sc26198setreg(portp, MR0, (mr0 & ~MR0_SWFRXTX));
4291                 stl_sc26198setreg(portp, SCCR, CR_TXSENDXOFF);
4292                 mr0 &= ~MR0_SWFRX;
4293                 portp->stats.rxxoff++;
4294                 stl_sc26198wait(portp);
4295                 stl_sc26198setreg(portp, MR0, mr0);
4296         }
4297         BRDDISABLE(portp->brdnr);
4298         spin_unlock_irqrestore(&brd_lock, flags);
4299 }
4300
4301 /*****************************************************************************/
4302
4303 static void stl_sc26198flush(struct stlport *portp)
4304 {
4305         unsigned long   flags;
4306
4307         pr_debug("stl_sc26198flush(portp=%p)\n", portp);
4308
4309         if (portp == NULL)
4310                 return;
4311
4312         spin_lock_irqsave(&brd_lock, flags);
4313         BRDENABLE(portp->brdnr, portp->pagenr);
4314         stl_sc26198setreg(portp, SCCR, CR_TXRESET);
4315         stl_sc26198setreg(portp, SCCR, portp->crenable);
4316         BRDDISABLE(portp->brdnr);
4317         portp->tx.tail = portp->tx.head;
4318         spin_unlock_irqrestore(&brd_lock, flags);
4319 }
4320
4321 /*****************************************************************************/
4322
4323 /*
4324  *      Return the current state of data flow on this port. This is only
4325  *      really interresting when determining if data has fully completed
4326  *      transmission or not... The sc26198 interrupt scheme cannot
4327  *      determine when all data has actually drained, so we need to
4328  *      check the port statusy register to be sure.
4329  */
4330
4331 static int stl_sc26198datastate(struct stlport *portp)
4332 {
4333         unsigned long   flags;
4334         unsigned char   sr;
4335
4336         pr_debug("stl_sc26198datastate(portp=%p)\n", portp);
4337
4338         if (portp == NULL)
4339                 return 0;
4340         if (test_bit(ASYI_TXBUSY, &portp->istate))
4341                 return 1;
4342
4343         spin_lock_irqsave(&brd_lock, flags);
4344         BRDENABLE(portp->brdnr, portp->pagenr);
4345         sr = stl_sc26198getreg(portp, SR);
4346         BRDDISABLE(portp->brdnr);
4347         spin_unlock_irqrestore(&brd_lock, flags);
4348
4349         return (sr & SR_TXEMPTY) ? 0 : 1;
4350 }
4351
4352 /*****************************************************************************/
4353
4354 /*
4355  *      Delay for a small amount of time, to give the sc26198 a chance
4356  *      to process a command...
4357  */
4358
4359 static void stl_sc26198wait(struct stlport *portp)
4360 {
4361         int     i;
4362
4363         pr_debug("stl_sc26198wait(portp=%p)\n", portp);
4364
4365         if (portp == NULL)
4366                 return;
4367
4368         for (i = 0; i < 20; i++)
4369                 stl_sc26198getglobreg(portp, TSTR);
4370 }
4371
4372 /*****************************************************************************/
4373
4374 /*
4375  *      If we are TX flow controlled and in IXANY mode then we may
4376  *      need to unflow control here. We gotta do this because of the
4377  *      automatic flow control modes of the sc26198.
4378  */
4379
4380 static void stl_sc26198txunflow(struct stlport *portp, struct tty_struct *tty)
4381 {
4382         unsigned char   mr0;
4383
4384         mr0 = stl_sc26198getreg(portp, MR0);
4385         stl_sc26198setreg(portp, MR0, (mr0 & ~MR0_SWFRXTX));
4386         stl_sc26198setreg(portp, SCCR, CR_HOSTXON);
4387         stl_sc26198wait(portp);
4388         stl_sc26198setreg(portp, MR0, mr0);
4389         clear_bit(ASYI_TXFLOWED, &portp->istate);
4390 }
4391
4392 /*****************************************************************************/
4393
4394 /*
4395  *      Interrupt service routine for sc26198 panels.
4396  */
4397
4398 static void stl_sc26198intr(struct stlpanel *panelp, unsigned int iobase)
4399 {
4400         struct stlport  *portp;
4401         unsigned int    iack;
4402
4403         spin_lock(&brd_lock);
4404
4405 /*
4406  *      Work around bug in sc26198 chip... Cannot have A6 address
4407  *      line of UART high, else iack will be returned as 0.
4408  */
4409         outb(0, (iobase + 1));
4410
4411         iack = inb(iobase + XP_IACK);
4412         portp = panelp->ports[(iack & IVR_CHANMASK) + ((iobase & 0x4) << 1)];
4413
4414         if (iack & IVR_RXDATA)
4415                 stl_sc26198rxisr(portp, iack);
4416         else if (iack & IVR_TXDATA)
4417                 stl_sc26198txisr(portp);
4418         else
4419                 stl_sc26198otherisr(portp, iack);
4420
4421         spin_unlock(&brd_lock);
4422 }
4423
4424 /*****************************************************************************/
4425
4426 /*
4427  *      Transmit interrupt handler. This has gotta be fast!  Handling TX
4428  *      chars is pretty simple, stuff as many as possible from the TX buffer
4429  *      into the sc26198 FIFO.
4430  *      In practice it is possible that interrupts are enabled but that the
4431  *      port has been hung up. Need to handle not having any TX buffer here,
4432  *      this is done by using the side effect that head and tail will also
4433  *      be NULL if the buffer has been freed.
4434  */
4435
4436 static void stl_sc26198txisr(struct stlport *portp)
4437 {
4438         unsigned int    ioaddr;
4439         unsigned char   mr0;
4440         int             len, stlen;
4441         char            *head, *tail;
4442
4443         pr_debug("stl_sc26198txisr(portp=%p)\n", portp);
4444
4445         ioaddr = portp->ioaddr;
4446         head = portp->tx.head;
4447         tail = portp->tx.tail;
4448         len = (head >= tail) ? (head - tail) : (STL_TXBUFSIZE - (tail - head));
4449         if ((len == 0) || ((len < STL_TXBUFLOW) &&
4450             (test_bit(ASYI_TXLOW, &portp->istate) == 0))) {
4451                 set_bit(ASYI_TXLOW, &portp->istate);
4452                 schedule_work(&portp->tqueue);
4453         }
4454
4455         if (len == 0) {
4456                 outb((MR0 | portp->uartaddr), (ioaddr + XP_ADDR));
4457                 mr0 = inb(ioaddr + XP_DATA);
4458                 if ((mr0 & MR0_TXMASK) == MR0_TXEMPTY) {
4459                         portp->imr &= ~IR_TXRDY;
4460                         outb((IMR | portp->uartaddr), (ioaddr + XP_ADDR));
4461                         outb(portp->imr, (ioaddr + XP_DATA));
4462                         clear_bit(ASYI_TXBUSY, &portp->istate);
4463                 } else {
4464                         mr0 |= ((mr0 & ~MR0_TXMASK) | MR0_TXEMPTY);
4465                         outb(mr0, (ioaddr + XP_DATA));
4466                 }
4467         } else {
4468                 len = min(len, SC26198_TXFIFOSIZE);
4469                 portp->stats.txtotal += len;
4470                 stlen = min(len, ((portp->tx.buf + STL_TXBUFSIZE) - tail));
4471                 outb(GTXFIFO, (ioaddr + XP_ADDR));
4472                 outsb((ioaddr + XP_DATA), tail, stlen);
4473                 len -= stlen;
4474                 tail += stlen;
4475                 if (tail >= (portp->tx.buf + STL_TXBUFSIZE))
4476                         tail = portp->tx.buf;
4477                 if (len > 0) {
4478                         outsb((ioaddr + XP_DATA), tail, len);
4479                         tail += len;
4480                 }
4481                 portp->tx.tail = tail;
4482         }
4483 }
4484
4485 /*****************************************************************************/
4486
4487 /*
4488  *      Receive character interrupt handler. Determine if we have good chars
4489  *      or bad chars and then process appropriately. Good chars are easy
4490  *      just shove the lot into the RX buffer and set all status byte to 0.
4491  *      If a bad RX char then process as required. This routine needs to be
4492  *      fast!  In practice it is possible that we get an interrupt on a port
4493  *      that is closed. This can happen on hangups - since they completely
4494  *      shutdown a port not in user context. Need to handle this case.
4495  */
4496
4497 static void stl_sc26198rxisr(struct stlport *portp, unsigned int iack)
4498 {
4499         struct tty_struct       *tty;
4500         unsigned int            len, buflen, ioaddr;
4501
4502         pr_debug("stl_sc26198rxisr(portp=%p,iack=%x)\n", portp, iack);
4503
4504         tty = portp->tty;
4505         ioaddr = portp->ioaddr;
4506         outb(GIBCR, (ioaddr + XP_ADDR));
4507         len = inb(ioaddr + XP_DATA) + 1;
4508
4509         if ((iack & IVR_TYPEMASK) == IVR_RXDATA) {
4510                 if (tty == NULL || (buflen = tty_buffer_request_room(tty, len)) == 0) {
4511                         len = min(len, sizeof(stl_unwanted));
4512                         outb(GRXFIFO, (ioaddr + XP_ADDR));
4513                         insb((ioaddr + XP_DATA), &stl_unwanted[0], len);
4514                         portp->stats.rxlost += len;
4515                         portp->stats.rxtotal += len;
4516                 } else {
4517                         len = min(len, buflen);
4518                         if (len > 0) {
4519                                 unsigned char *ptr;
4520                                 outb(GRXFIFO, (ioaddr + XP_ADDR));
4521                                 tty_prepare_flip_string(tty, &ptr, len);
4522                                 insb((ioaddr + XP_DATA), ptr, len);
4523                                 tty_schedule_flip(tty);
4524                                 portp->stats.rxtotal += len;
4525                         }
4526                 }
4527         } else {
4528                 stl_sc26198rxbadchars(portp);
4529         }
4530
4531 /*
4532  *      If we are TX flow controlled and in IXANY mode then we may need
4533  *      to unflow control here. We gotta do this because of the automatic
4534  *      flow control modes of the sc26198.
4535  */
4536         if (test_bit(ASYI_TXFLOWED, &portp->istate)) {
4537                 if ((tty != NULL) &&
4538                     (tty->termios != NULL) &&
4539                     (tty->termios->c_iflag & IXANY)) {
4540                         stl_sc26198txunflow(portp, tty);
4541                 }
4542         }
4543 }
4544
4545 /*****************************************************************************/
4546
4547 /*
4548  *      Process an RX bad character.
4549  */
4550
4551 static void stl_sc26198rxbadch(struct stlport *portp, unsigned char status, char ch)
4552 {
4553         struct tty_struct       *tty;
4554         unsigned int            ioaddr;
4555
4556         tty = portp->tty;
4557         ioaddr = portp->ioaddr;
4558
4559         if (status & SR_RXPARITY)
4560                 portp->stats.rxparity++;
4561         if (status & SR_RXFRAMING)
4562                 portp->stats.rxframing++;
4563         if (status & SR_RXOVERRUN)
4564                 portp->stats.rxoverrun++;
4565         if (status & SR_RXBREAK)
4566                 portp->stats.rxbreaks++;
4567
4568         if ((tty != NULL) &&
4569             ((portp->rxignoremsk & status) == 0)) {
4570                 if (portp->rxmarkmsk & status) {
4571                         if (status & SR_RXBREAK) {
4572                                 status = TTY_BREAK;
4573                                 if (portp->flags & ASYNC_SAK) {
4574                                         do_SAK(tty);
4575                                         BRDENABLE(portp->brdnr, portp->pagenr);
4576                                 }
4577                         } else if (status & SR_RXPARITY)
4578                                 status = TTY_PARITY;
4579                         else if (status & SR_RXFRAMING)
4580                                 status = TTY_FRAME;
4581                         else if(status & SR_RXOVERRUN)
4582                                 status = TTY_OVERRUN;
4583                         else
4584                                 status = 0;
4585                 } else
4586                         status = 0;
4587
4588                 tty_insert_flip_char(tty, ch, status);
4589                 tty_schedule_flip(tty);
4590
4591                 if (status == 0)
4592                         portp->stats.rxtotal++;
4593         }
4594 }
4595
4596 /*****************************************************************************/
4597
4598 /*
4599  *      Process all characters in the RX FIFO of the UART. Check all char
4600  *      status bytes as well, and process as required. We need to check
4601  *      all bytes in the FIFO, in case some more enter the FIFO while we
4602  *      are here. To get the exact character error type we need to switch
4603  *      into CHAR error mode (that is why we need to make sure we empty
4604  *      the FIFO).
4605  */
4606
4607 static void stl_sc26198rxbadchars(struct stlport *portp)
4608 {
4609         unsigned char   status, mr1;
4610         char            ch;
4611
4612 /*
4613  *      To get the precise error type for each character we must switch
4614  *      back into CHAR error mode.
4615  */
4616         mr1 = stl_sc26198getreg(portp, MR1);
4617         stl_sc26198setreg(portp, MR1, (mr1 & ~MR1_ERRBLOCK));
4618
4619         while ((status = stl_sc26198getreg(portp, SR)) & SR_RXRDY) {
4620                 stl_sc26198setreg(portp, SCCR, CR_CLEARRXERR);
4621                 ch = stl_sc26198getreg(portp, RXFIFO);
4622                 stl_sc26198rxbadch(portp, status, ch);
4623         }
4624
4625 /*
4626  *      To get correct interrupt class we must switch back into BLOCK
4627  *      error mode.
4628  */
4629         stl_sc26198setreg(portp, MR1, mr1);
4630 }
4631
4632 /*****************************************************************************/
4633
4634 /*
4635  *      Other interrupt handler. This includes modem signals, flow
4636  *      control actions, etc. Most stuff is left to off-level interrupt
4637  *      processing time.
4638  */
4639
4640 static void stl_sc26198otherisr(struct stlport *portp, unsigned int iack)
4641 {
4642         unsigned char   cir, ipr, xisr;
4643
4644         pr_debug("stl_sc26198otherisr(portp=%p,iack=%x)\n", portp, iack);
4645
4646         cir = stl_sc26198getglobreg(portp, CIR);
4647
4648         switch (cir & CIR_SUBTYPEMASK) {
4649         case CIR_SUBCOS:
4650                 ipr = stl_sc26198getreg(portp, IPR);
4651                 if (ipr & IPR_DCDCHANGE) {
4652                         set_bit(ASYI_DCDCHANGE, &portp->istate);
4653                         schedule_work(&portp->tqueue);
4654                         portp->stats.modem++;
4655                 }
4656                 break;
4657         case CIR_SUBXONXOFF:
4658                 xisr = stl_sc26198getreg(portp, XISR);
4659                 if (xisr & XISR_RXXONGOT) {
4660                         set_bit(ASYI_TXFLOWED, &portp->istate);
4661                         portp->stats.txxoff++;
4662                 }
4663                 if (xisr & XISR_RXXOFFGOT) {
4664                         clear_bit(ASYI_TXFLOWED, &portp->istate);
4665                         portp->stats.txxon++;
4666                 }
4667                 break;
4668         case CIR_SUBBREAK:
4669                 stl_sc26198setreg(portp, SCCR, CR_BREAKRESET);
4670                 stl_sc26198rxbadchars(portp);
4671                 break;
4672         default:
4673                 break;
4674         }
4675 }
4676
4677 static void stl_free_isabrds(void)
4678 {
4679         struct stlbrd *brdp;
4680         unsigned int i;
4681
4682         for (i = 0; i < stl_nrbrds; i++) {
4683                 if ((brdp = stl_brds[i]) == NULL || (brdp->state & STL_PROBED))
4684                         continue;
4685
4686                 free_irq(brdp->irq, brdp);
4687
4688                 stl_cleanup_panels(brdp);
4689
4690                 release_region(brdp->ioaddr1, brdp->iosize1);
4691                 if (brdp->iosize2 > 0)
4692                         release_region(brdp->ioaddr2, brdp->iosize2);
4693
4694                 kfree(brdp);
4695                 stl_brds[i] = NULL;
4696         }
4697 }
4698
4699 /*
4700  *      Loadable module initialization stuff.
4701  */
4702 static int __init stallion_module_init(void)
4703 {
4704         struct stlbrd   *brdp;
4705         struct stlconf  conf;
4706         unsigned int i, j;
4707         int retval;
4708
4709         printk(KERN_INFO "%s: version %s\n", stl_drvtitle, stl_drvversion);
4710
4711         spin_lock_init(&stallion_lock);
4712         spin_lock_init(&brd_lock);
4713
4714         stl_serial = alloc_tty_driver(STL_MAXBRDS * STL_MAXPORTS);
4715         if (!stl_serial) {
4716                 retval = -ENOMEM;
4717                 goto err;
4718         }
4719
4720         stl_serial->owner = THIS_MODULE;
4721         stl_serial->driver_name = stl_drvname;
4722         stl_serial->name = "ttyE";
4723         stl_serial->major = STL_SERIALMAJOR;
4724         stl_serial->minor_start = 0;
4725         stl_serial->type = TTY_DRIVER_TYPE_SERIAL;
4726         stl_serial->subtype = SERIAL_TYPE_NORMAL;
4727         stl_serial->init_termios = stl_deftermios;
4728         stl_serial->flags = TTY_DRIVER_REAL_RAW | TTY_DRIVER_DYNAMIC_DEV;
4729         tty_set_operations(stl_serial, &stl_ops);
4730
4731         retval = tty_register_driver(stl_serial);
4732         if (retval) {
4733                 printk("STALLION: failed to register serial driver\n");
4734                 goto err_frtty;
4735         }
4736
4737 /*
4738  *      Find any dynamically supported boards. That is via module load
4739  *      line options.
4740  */
4741         for (i = stl_nrbrds; i < stl_nargs; i++) {
4742                 memset(&conf, 0, sizeof(conf));
4743                 if (stl_parsebrd(&conf, stl_brdsp[i]) == 0)
4744                         continue;
4745                 if ((brdp = stl_allocbrd()) == NULL)
4746                         continue;
4747                 brdp->brdnr = i;
4748                 brdp->brdtype = conf.brdtype;
4749                 brdp->ioaddr1 = conf.ioaddr1;
4750                 brdp->ioaddr2 = conf.ioaddr2;
4751                 brdp->irq = conf.irq;
4752                 brdp->irqtype = conf.irqtype;
4753                 stl_brds[brdp->brdnr] = brdp;
4754                 if (stl_brdinit(brdp)) {
4755                         stl_brds[brdp->brdnr] = NULL;
4756                         kfree(brdp);
4757                 } else {
4758                         for (j = 0; j < brdp->nrports; j++)
4759                                 tty_register_device(stl_serial,
4760                                         brdp->brdnr * STL_MAXPORTS + j, NULL);
4761                         stl_nrbrds = i + 1;
4762                 }
4763         }
4764
4765         /* this has to be _after_ isa finding because of locking */
4766         retval = pci_register_driver(&stl_pcidriver);
4767         if (retval && stl_nrbrds == 0) {
4768                 printk(KERN_ERR "STALLION: can't register pci driver\n");
4769                 goto err_unrtty;
4770         }
4771
4772 /*
4773  *      Set up a character driver for per board stuff. This is mainly used
4774  *      to do stats ioctls on the ports.
4775  */
4776         if (register_chrdev(STL_SIOMEMMAJOR, "staliomem", &stl_fsiomem))
4777                 printk("STALLION: failed to register serial board device\n");
4778
4779         stallion_class = class_create(THIS_MODULE, "staliomem");
4780         if (IS_ERR(stallion_class))
4781                 printk("STALLION: failed to create class\n");
4782         for (i = 0; i < 4; i++)
4783                 class_device_create(stallion_class, NULL,
4784                                     MKDEV(STL_SIOMEMMAJOR, i), NULL,
4785                                     "staliomem%d", i);
4786
4787         return 0;
4788 err_unrtty:
4789         tty_unregister_driver(stl_serial);
4790 err_frtty:
4791         put_tty_driver(stl_serial);
4792 err:
4793         return retval;
4794 }
4795
4796 static void __exit stallion_module_exit(void)
4797 {
4798         struct stlbrd *brdp;
4799         unsigned int i, j;
4800         int retval;
4801
4802         pr_debug("cleanup_module()\n");
4803
4804         printk(KERN_INFO "Unloading %s: version %s\n", stl_drvtitle,
4805                 stl_drvversion);
4806
4807 /*
4808  *      Free up all allocated resources used by the ports. This includes
4809  *      memory and interrupts. As part of this process we will also do
4810  *      a hangup on every open port - to try to flush out any processes
4811  *      hanging onto ports.
4812  */
4813         for (i = 0; i < stl_nrbrds; i++) {
4814                 if ((brdp = stl_brds[i]) == NULL || (brdp->state & STL_PROBED))
4815                         continue;
4816                 for (j = 0; j < brdp->nrports; j++)
4817                         tty_unregister_device(stl_serial,
4818                                 brdp->brdnr * STL_MAXPORTS + j);
4819         }
4820
4821         for (i = 0; i < 4; i++)
4822                 class_device_destroy(stallion_class, MKDEV(STL_SIOMEMMAJOR, i));
4823         if ((retval = unregister_chrdev(STL_SIOMEMMAJOR, "staliomem")))
4824                 printk("STALLION: failed to un-register serial memory device, "
4825                         "errno=%d\n", -retval);
4826         class_destroy(stallion_class);
4827
4828         pci_unregister_driver(&stl_pcidriver);
4829
4830         stl_free_isabrds();
4831
4832         tty_unregister_driver(stl_serial);
4833         put_tty_driver(stl_serial);
4834 }
4835
4836 module_init(stallion_module_init);
4837 module_exit(stallion_module_exit);
4838
4839 MODULE_AUTHOR("Greg Ungerer");
4840 MODULE_DESCRIPTION("Stallion Multiport Serial Driver");
4841 MODULE_LICENSE("GPL");