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