drivers/char/istallion.c

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