Linux kernel mirror (for testing) git.kernel.org/pub/scm/linux/kernel/git/torvalds/linux.git
kernel os linux
1
fork

Configure Feed

Select the types of activity you want to include in your feed.

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