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