err.no Git - linux-2.6/blob - drivers/char/rio/riotty.c

   1 /*
   2 ** -----------------------------------------------------------------------------
   3 **
   4 **  Perle Specialix driver for Linux
   5 **  Ported from existing RIO Driver for SCO sources.
   6  *
   7  *  (C) 1990 - 2000 Specialix International Ltd., Byfleet, Surrey, UK.
   8  *
   9  *      This program is free software; you can redistribute it and/or modify
  10  *      it under the terms of the GNU General Public License as published by
  11  *      the Free Software Foundation; either version 2 of the License, or
  12  *      (at your option) any later version.
  13  *
  14  *      This program is distributed in the hope that it will be useful,
  15  *      but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  *      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  *      GNU General Public License for more details.
  18  *
  19  *      You should have received a copy of the GNU General Public License
  20  *      along with this program; if not, write to the Free Software
  21  *      Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  22 **
  23 **      Module          : riotty.c
  24 **      SID             : 1.3
  25 **      Last Modified   : 11/6/98 10:33:47
  26 **      Retrieved       : 11/6/98 10:33:50
  27 **
  28 **  ident @(#)riotty.c  1.3
  29 **
  30 ** -----------------------------------------------------------------------------
  31 */
  32 #ifdef SCCS_LABELS
  33 static char *_riotty_c_sccs_ = "@(#)riotty.c    1.3";
  34 #endif
  35
  36
  37 #define __EXPLICIT_DEF_H__
  38
  39 #include <linux/module.h>
  40 #include <linux/slab.h>
  41 #include <linux/errno.h>
  42 #include <linux/tty.h>
  43 #include <linux/string.h>
  44 #include <asm/io.h>
  45 #include <asm/system.h>
  46 #include <asm/string.h>
  47 #include <asm/semaphore.h>
  48 #include <asm/uaccess.h>
  49
  50 #include <linux/termios.h>
  51
  52 #include <linux/serial.h>
  53
  54 #include <linux/generic_serial.h>
  55
  56
  57 #include "linux_compat.h"
  58 #include "rio_linux.h"
  59 #include "typdef.h"
  60 #include "pkt.h"
  61 #include "daemon.h"
  62 #include "rio.h"
  63 #include "riospace.h"
  64 #include "top.h"
  65 #include "cmdpkt.h"
  66 #include "map.h"
  67 #include "riotypes.h"
  68 #include "rup.h"
  69 #include "port.h"
  70 #include "riodrvr.h"
  71 #include "rioinfo.h"
  72 #include "func.h"
  73 #include "errors.h"
  74 #include "pci.h"
  75
  76 #include "parmmap.h"
  77 #include "unixrup.h"
  78 #include "board.h"
  79 #include "host.h"
  80 #include "error.h"
  81 #include "phb.h"
  82 #include "link.h"
  83 #include "cmdblk.h"
  84 #include "route.h"
  85 #include "control.h"
  86 #include "cirrus.h"
  87 #include "rioioctl.h"
  88 #include "param.h"
  89 #include "list.h"
  90 #include "sam.h"
  91
  92 static void RIOClearUp(struct Port *PortP);
  93 int RIOShortCommand(struct rio_info *p, struct Port *PortP, int command, int len, int arg);
  94
  95
  96 extern int conv_vb[];           /* now defined in ttymgr.c */
  97 extern int conv_bv[];           /* now defined in ttymgr.c */
  98
  99 /*
 100 ** 16.09.1998 ARG - Fix to build riotty.k.o for Modular Kernel Support
 101 **
 102 ** ep.def.h is necessary for Modular Kernel Support
 103 ** DO NOT place any kernel 'extern's after this line
 104 ** or this source file will not build riotty.k.o
 105 */
 106 #ifdef uLYNX
 107 #include <ep.def.h>
 108 #endif
 109
 110 #ifdef NEED_THIS2
 111 static struct old_sgttyb default_sg = {
 112         B19200, B19200,         /* input and output speed */
 113         'H' - '@',              /* erase char */
 114         -1,                     /* 2nd erase char */
 115         'U' - '@',              /* kill char */
 116         ECHO | CRMOD,           /* mode */
 117         'C' - '@',              /* interrupt character */
 118         '\\' - '@',             /* quit char */
 119         'Q' - '@',              /* start char */
 120         'S' - '@',              /* stop char */
 121         'D' - '@',              /* EOF */
 122         -1,                     /* brk */
 123         (LCRTBS | LCRTERA | LCRTKIL | LCTLECH), /* local mode word */
 124         'Z' - '@',              /* process stop */
 125         'Y' - '@',              /* delayed stop */
 126         'R' - '@',              /* reprint line */
 127         'O' - '@',              /* flush output */
 128         'W' - '@',              /* word erase */
 129         'V' - '@'               /* literal next char */
 130 };
 131 #endif
 132
 133
 134 extern struct rio_info *p;
 135
 136
 137 int riotopen(struct tty_struct *tty, struct file *filp)
 138 {
 139         unsigned int SysPort;
 140         int Modem;
 141         int repeat_this = 250;
 142         struct Port *PortP;     /* pointer to the port structure */
 143         unsigned long flags;
 144         int retval = 0;
 145
 146         func_enter();
 147
 148         /* Make sure driver_data is NULL in case the rio isn't booted jet. Else gs_close
 149            is going to oops.
 150          */
 151         tty->driver_data = NULL;
 152
 153         SysPort = rio_minor(tty);
 154         Modem = rio_ismodem(tty);
 155
 156         if (p->RIOFailed) {
 157                 rio_dprintk(RIO_DEBUG_TTY, "System initialisation failed\n");
 158                 func_exit();
 159                 return -ENXIO;
 160         }
 161
 162         rio_dprintk(RIO_DEBUG_TTY, "port open SysPort %d (%s) (mapped:%d)\n", SysPort, Modem ? "Modem" : "tty", p->RIOPortp[SysPort]->Mapped);
 163
 164         /*
 165          ** Validate that we have received a legitimate request.
 166          ** Currently, just check that we are opening a port on
 167          ** a host card that actually exists, and that the port
 168          ** has been mapped onto a host.
 169          */
 170         if (SysPort >= RIO_PORTS) {     /* out of range ? */
 171                 rio_dprintk(RIO_DEBUG_TTY, "Illegal port number %d\n", SysPort);
 172                 func_exit();
 173                 return -ENXIO;
 174         }
 175
 176         /*
 177          ** Grab pointer to the port stucture
 178          */
 179         PortP = p->RIOPortp[SysPort];   /* Get control struc */
 180         rio_dprintk(RIO_DEBUG_TTY, "PortP: %p\n", PortP);
 181         if (!PortP->Mapped) {   /* we aren't mapped yet! */
 182                 /*
 183                  ** The system doesn't know which RTA this port
 184                  ** corresponds to.
 185                  */
 186                 rio_dprintk(RIO_DEBUG_TTY, "port not mapped into system\n");
 187                 func_exit();
 188                 return -ENXIO;
 189         }
 190
 191         tty->driver_data = PortP;
 192
 193         PortP->gs.tty = tty;
 194         PortP->gs.count++;
 195
 196         rio_dprintk(RIO_DEBUG_TTY, "%d bytes in tx buffer\n", PortP->gs.xmit_cnt);
 197
 198         retval = gs_init_port(&PortP->gs);
 199         if (retval) {
 200                 PortP->gs.count--;
 201                 return -ENXIO;
 202         }
 203         /*
 204          ** If the host hasn't been booted yet, then
 205          ** fail
 206          */
 207         if ((PortP->HostP->Flags & RUN_STATE) != RC_RUNNING) {
 208                 rio_dprintk(RIO_DEBUG_TTY, "Host not running\n");
 209                 func_exit();
 210                 return -ENXIO;
 211         }
 212
 213         /*
 214          ** If the RTA has not booted yet and the user has choosen to block
 215          ** until the RTA is present then we must spin here waiting for
 216          ** the RTA to boot.
 217          */
 218         /* I find the above code a bit hairy. I find the below code
 219            easier to read and shorter. Now, if it works too that would
 220            be great... -- REW
 221          */
 222         rio_dprintk(RIO_DEBUG_TTY, "Checking if RTA has booted... \n");
 223         while (!(PortP->HostP->Mapping[PortP->RupNum].Flags & RTA_BOOTED)) {
 224                 if (!PortP->WaitUntilBooted) {
 225                         rio_dprintk(RIO_DEBUG_TTY, "RTA never booted\n");
 226                         func_exit();
 227                         return -ENXIO;
 228                 }
 229
 230                 /* Under Linux you'd normally use a wait instead of this
 231                    busy-waiting. I'll stick with the old implementation for
 232                    now. --REW
 233                  */
 234                 if (RIODelay(PortP, HUNDRED_MS) == RIO_FAIL) {
 235                         rio_dprintk(RIO_DEBUG_TTY, "RTA_wait_for_boot: EINTR in delay \n");
 236                         func_exit();
 237                         return -EINTR;
 238                 }
 239                 if (repeat_this-- <= 0) {
 240                         rio_dprintk(RIO_DEBUG_TTY, "Waiting for RTA to boot timeout\n");
 241                         func_exit();
 242                         return -EIO;
 243                 }
 244         }
 245         rio_dprintk(RIO_DEBUG_TTY, "RTA has been booted\n");
 246         rio_spin_lock_irqsave(&PortP->portSem, flags);
 247         if (p->RIOHalted) {
 248                 goto bombout;
 249         }
 250
 251         /*
 252          ** If the port is in the final throws of being closed,
 253          ** we should wait here (politely), waiting
 254          ** for it to finish, so that it doesn't close us!
 255          */
 256         while ((PortP->State & RIO_CLOSING) && !p->RIOHalted) {
 257                 rio_dprintk(RIO_DEBUG_TTY, "Waiting for RIO_CLOSING to go away\n");
 258                 if (repeat_this-- <= 0) {
 259                         rio_dprintk(RIO_DEBUG_TTY, "Waiting for not idle closed broken by signal\n");
 260                         RIOPreemptiveCmd(p, PortP, FCLOSE);
 261                         retval = -EINTR;
 262                         goto bombout;
 263                 }
 264                 rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 265                 if (RIODelay(PortP, HUNDRED_MS) == RIO_FAIL) {
 266                         rio_spin_lock_irqsave(&PortP->portSem, flags);
 267                         retval = -EINTR;
 268                         goto bombout;
 269                 }
 270                 rio_spin_lock_irqsave(&PortP->portSem, flags);
 271         }
 272
 273         if (!PortP->Mapped) {
 274                 rio_dprintk(RIO_DEBUG_TTY, "Port unmapped while closing!\n");
 275                 rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 276                 retval = -ENXIO;
 277                 func_exit();
 278                 return retval;
 279         }
 280
 281         if (p->RIOHalted) {
 282                 goto bombout;
 283         }
 284
 285 /*
 286 ** 15.10.1998 ARG - ESIL 0761 part fix
 287 ** RIO has it's own CTSFLOW and RTSFLOW flags in 'Config' in the port structure,
 288 ** we need to make sure that the flags are clear when the port is opened.
 289 */
 290         /* Uh? Suppose I turn these on and then another process opens
 291            the port again? The flags get cleared! Not good. -- REW */
 292         if (!(PortP->State & (RIO_LOPEN | RIO_MOPEN))) {
 293                 PortP->Config &= ~(RIO_CTSFLOW | RIO_RTSFLOW);
 294         }
 295
 296         if (!(PortP->firstOpen)) {      /* First time ? */
 297                 rio_dprintk(RIO_DEBUG_TTY, "First open for this port\n");
 298
 299
 300                 PortP->firstOpen++;
 301                 PortP->CookMode = 0;    /* XXX RIOCookMode(tp); */
 302                 PortP->InUse = NOT_INUSE;
 303
 304                 /* Tentative fix for bug PR27. Didn't work. */
 305                 /* PortP->gs.xmit_cnt = 0; */
 306
 307                 rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 308 #ifdef NEED_THIS
 309                 ttyseth(PortP, tp, (struct old_sgttyb *) &default_sg);
 310 #endif
 311
 312                 /* Someone explain to me why this delay/config is
 313                    here. If I read the docs correctly the "open"
 314                    command piggybacks the parameters immediately.
 315                    -- REW */
 316                 RIOParam(PortP, OPEN, Modem, OK_TO_SLEEP);      /* Open the port */
 317                 rio_spin_lock_irqsave(&PortP->portSem, flags);
 318
 319                 /*
 320                  ** wait for the port to be not closed.
 321                  */
 322                 while (!(PortP->PortState & PORT_ISOPEN) && !p->RIOHalted) {
 323                         rio_dprintk(RIO_DEBUG_TTY, "Waiting for PORT_ISOPEN-currently %x\n", PortP->PortState);
 324 /*
 325 ** 15.10.1998 ARG - ESIL 0759
 326 ** (Part) fix for port being trashed when opened whilst RTA "disconnected"
 327 ** Take out the limited wait - now wait for ever or until user
 328 ** bangs us out.
 329 **
 330                         if (repeat_this -- <= 0) {
 331                                 rio_dprint(RIO_DEBUG_TTY, ("Waiting for open to finish timed out.\n"));
 332                                 RIOPreemptiveCmd(p, PortP, FCLOSE );
 333                                 rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 334                                 return -EINTR;
 335                         }
 336 **
 337 */
 338                         rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 339                         if (RIODelay(PortP, HUNDRED_MS) == RIO_FAIL) {
 340                                 rio_dprintk(RIO_DEBUG_TTY, "Waiting for open to finish broken by signal\n");
 341                                 RIOPreemptiveCmd(p, PortP, FCLOSE);
 342                                 func_exit();
 343                                 return -EINTR;
 344                         }
 345                         rio_spin_lock_irqsave(&PortP->portSem, flags);
 346                 }
 347
 348                 if (p->RIOHalted) {
 349                         retval = -EIO;
 350                       bombout:
 351                         /*                    RIOClearUp( PortP ); */
 352                         rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 353                         return retval;
 354                 }
 355                 rio_dprintk(RIO_DEBUG_TTY, "PORT_ISOPEN found\n");
 356         }
 357 #ifdef MODEM_SUPPORT
 358         if (Modem) {
 359                 rio_dprintk(RIO_DEBUG_TTY, "Modem - test for carrier\n");
 360                 /*
 361                  ** ACTION
 362                  ** insert test for carrier here. -- ???
 363                  ** I already see that test here. What's the deal? -- REW
 364                  */
 365                 if ((PortP->gs.tty->termios->c_cflag & CLOCAL) || (PortP->ModemState & MSVR1_CD)) {
 366                         rio_dprintk(RIO_DEBUG_TTY, "open(%d) Modem carr on\n", SysPort);
 367                         /*
 368                            tp->tm.c_state |= CARR_ON;
 369                            wakeup((caddr_t) &tp->tm.c_canq);
 370                          */
 371                         PortP->State |= RIO_CARR_ON;
 372                         wake_up_interruptible(&PortP->gs.open_wait);
 373                 } else {        /* no carrier - wait for DCD */
 374
 375                         /*
 376                            while (!(PortP->gs.tty->termios->c_state & CARR_ON) &&
 377                            !(filp->f_flags & O_NONBLOCK) && !p->RIOHalted )
 378                          */
 379                         while (!(PortP->State & RIO_CARR_ON) && !(filp->f_flags & O_NONBLOCK) && !p->RIOHalted) {
 380
 381                                 rio_dprintk(RIO_DEBUG_TTY, "open(%d) sleeping for carr on\n", SysPort);
 382                                 /*
 383                                    PortP->gs.tty->termios->c_state |= WOPEN;
 384                                  */
 385                                 PortP->State |= RIO_WOPEN;
 386                                 rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 387                                 if (RIODelay(PortP, HUNDRED_MS) == RIO_FAIL)
 388                                         {
 389                                                 /*
 390                                                  ** ACTION: verify that this is a good thing
 391                                                  ** to do here. -- ???
 392                                                  ** I think it's OK. -- REW
 393                                                  */
 394                                                 rio_dprintk(RIO_DEBUG_TTY, "open(%d) sleeping for carr broken by signal\n", SysPort);
 395                                                 RIOPreemptiveCmd(p, PortP, FCLOSE);
 396                                                 /*
 397                                                    tp->tm.c_state &= ~WOPEN;
 398                                                  */
 399                                                 PortP->State &= ~RIO_WOPEN;
 400                                                 rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 401                                                 func_exit();
 402                                                 return -EINTR;
 403                                         }
 404                         }
 405                         PortP->State &= ~RIO_WOPEN;
 406                 }
 407                 if (p->RIOHalted)
 408                         goto bombout;
 409                 rio_dprintk(RIO_DEBUG_TTY, "Setting RIO_MOPEN\n");
 410                 PortP->State |= RIO_MOPEN;
 411         } else
 412 #endif
 413         {
 414                 /*
 415                  ** ACTION
 416                  ** Direct line open - force carrier (will probably mean
 417                  ** that sleeping Modem line fubar)
 418                  */
 419                 PortP->State |= RIO_LOPEN;
 420         }
 421
 422         if (p->RIOHalted) {
 423                 goto bombout;
 424         }
 425
 426         rio_dprintk(RIO_DEBUG_TTY, "high level open done\n");
 427
 428         /*
 429          ** Count opens for port statistics reporting
 430          */
 431         if (PortP->statsGather)
 432                 PortP->opens++;
 433
 434         rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 435         rio_dprintk(RIO_DEBUG_TTY, "Returning from open\n");
 436         func_exit();
 437         return 0;
 438 }
 439
 440 /*
 441 ** RIOClose the port.
 442 ** The operating system thinks that this is last close for the device.
 443 ** As there are two interfaces to the port (Modem and tty), we need to
 444 ** check that both are closed before we close the device.
 445 */
 446 int riotclose(void *ptr)
 447 {
 448         struct Port *PortP = ptr;       /* pointer to the port structure */
 449         int deleted = 0;
 450         int try = -1;           /* Disable the timeouts by setting them to -1 */
 451         int repeat_this = -1;   /* Congrats to those having 15 years of
 452                                    uptime! (You get to break the driver.) */
 453         unsigned long end_time;
 454         struct tty_struct *tty;
 455         unsigned long flags;
 456         int Modem;
 457         int rv = 0;
 458
 459         rio_dprintk(RIO_DEBUG_TTY, "port close SysPort %d\n", PortP->PortNum);
 460
 461         /* PortP = p->RIOPortp[SysPort]; */
 462         rio_dprintk(RIO_DEBUG_TTY, "Port is at address 0x%p\n", PortP);
 463         /* tp = PortP->TtyP; *//* Get tty */
 464         tty = PortP->gs.tty;
 465         rio_dprintk(RIO_DEBUG_TTY, "TTY is at address 0x%p\n", tty);
 466
 467         if (PortP->gs.closing_wait)
 468                 end_time = jiffies + PortP->gs.closing_wait;
 469         else
 470                 end_time = jiffies + MAX_SCHEDULE_TIMEOUT;
 471
 472         Modem = rio_ismodem(tty);
 473         rio_spin_lock_irqsave(&PortP->portSem, flags);
 474
 475         /*
 476          ** Setting this flag will make any process trying to open
 477          ** this port block until we are complete closing it.
 478          */
 479         PortP->State |= RIO_CLOSING;
 480
 481         if ((PortP->State & RIO_DELETED)) {
 482                 rio_dprintk(RIO_DEBUG_TTY, "Close on deleted RTA\n");
 483                 deleted = 1;
 484         }
 485
 486         if (p->RIOHalted) {
 487                 RIOClearUp(PortP);
 488                 rv = -EIO;
 489                 goto close_end;
 490         }
 491
 492         rio_dprintk(RIO_DEBUG_TTY, "Clear bits\n");
 493         /*
 494          ** clear the open bits for this device
 495          */
 496         PortP->State &= (Modem ? ~RIO_MOPEN : ~RIO_LOPEN);
 497         PortP->State &= ~RIO_CARR_ON;
 498         PortP->ModemState &= ~MSVR1_CD;
 499         /*
 500          ** If the device was open as both a Modem and a tty line
 501          ** then we need to wimp out here, as the port has not really
 502          ** been finally closed (gee, whizz!) The test here uses the
 503          ** bit for the OTHER mode of operation, to see if THAT is
 504          ** still active!
 505          */
 506         if ((PortP->State & (RIO_LOPEN | RIO_MOPEN))) {
 507                 /*
 508                  ** The port is still open for the other task -
 509                  ** return, pretending that we are still active.
 510                  */
 511                 rio_dprintk(RIO_DEBUG_TTY, "Channel %d still open !\n", PortP->PortNum);
 512                 PortP->State &= ~RIO_CLOSING;
 513                 if (PortP->firstOpen)
 514                         PortP->firstOpen--;
 515                 rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 516                 return -EIO;
 517         }
 518
 519         rio_dprintk(RIO_DEBUG_TTY, "Closing down - everything must go!\n");
 520
 521         PortP->State &= ~RIO_DYNOROD;
 522
 523         /*
 524          ** This is where we wait for the port
 525          ** to drain down before closing. Bye-bye....
 526          ** (We never meant to do this)
 527          */
 528         rio_dprintk(RIO_DEBUG_TTY, "Timeout 1 starts\n");
 529
 530         if (!deleted)
 531                 while ((PortP->InUse != NOT_INUSE) && !p->RIOHalted && (PortP->TxBufferIn != PortP->TxBufferOut)) {
 532                         if (repeat_this-- <= 0) {
 533                                 rv = -EINTR;
 534                                 rio_dprintk(RIO_DEBUG_TTY, "Waiting for not idle closed broken by signal\n");
 535                                 RIOPreemptiveCmd(p, PortP, FCLOSE);
 536                                 goto close_end;
 537                         }
 538                         rio_dprintk(RIO_DEBUG_TTY, "Calling timeout to flush in closing\n");
 539                         rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 540                         if (RIODelay_ni(PortP, HUNDRED_MS * 10) == RIO_FAIL) {
 541                                 rio_dprintk(RIO_DEBUG_TTY, "RTA EINTR in delay \n");
 542                                 rv = -EINTR;
 543                                 rio_spin_lock_irqsave(&PortP->portSem, flags);
 544                                 goto close_end;
 545                         }
 546                         rio_spin_lock_irqsave(&PortP->portSem, flags);
 547                 }
 548
 549         PortP->TxBufferIn = PortP->TxBufferOut = 0;
 550         repeat_this = 0xff;
 551
 552         PortP->InUse = 0;
 553         if ((PortP->State & (RIO_LOPEN | RIO_MOPEN))) {
 554                 /*
 555                  ** The port has been re-opened for the other task -
 556                  ** return, pretending that we are still active.
 557                  */
 558                 rio_dprintk(RIO_DEBUG_TTY, "Channel %d re-open!\n", PortP->PortNum);
 559                 PortP->State &= ~RIO_CLOSING;
 560                 rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 561                 if (PortP->firstOpen)
 562                         PortP->firstOpen--;
 563                 return -EIO;
 564         }
 565
 566         if (p->RIOHalted) {
 567                 RIOClearUp(PortP);
 568                 goto close_end;
 569         }
 570
 571         /* Can't call RIOShortCommand with the port locked. */
 572         rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 573
 574         if (RIOShortCommand(p, PortP, CLOSE, 1, 0) == RIO_FAIL) {
 575                 RIOPreemptiveCmd(p, PortP, FCLOSE);
 576                 goto close_end;
 577         }
 578
 579         if (!deleted)
 580                 while (try && (PortP->PortState & PORT_ISOPEN)) {
 581                         try--;
 582                         if (time_after(jiffies, end_time)) {
 583                                 rio_dprintk(RIO_DEBUG_TTY, "Run out of tries - force the bugger shut!\n");
 584                                 RIOPreemptiveCmd(p, PortP, FCLOSE);
 585                                 break;
 586                         }
 587                         rio_dprintk(RIO_DEBUG_TTY, "Close: PortState:ISOPEN is %d\n", PortP->PortState & PORT_ISOPEN);
 588
 589                         if (p->RIOHalted) {
 590                                 RIOClearUp(PortP);
 591                                 goto close_end;
 592                         }
 593                         if (RIODelay(PortP, HUNDRED_MS) == RIO_FAIL) {
 594                                 rio_dprintk(RIO_DEBUG_TTY, "RTA EINTR in delay \n");
 595                                 RIOPreemptiveCmd(p, PortP, FCLOSE);
 596                                 break;
 597                         }
 598                 }
 599         rio_spin_lock_irqsave(&PortP->portSem, flags);
 600         rio_dprintk(RIO_DEBUG_TTY, "Close: try was %d on completion\n", try);
 601
 602         /* RIOPreemptiveCmd(p, PortP, FCLOSE); */
 603
 604 /*
 605 ** 15.10.1998 ARG - ESIL 0761 part fix
 606 ** RIO has it's own CTSFLOW and RTSFLOW flags in 'Config' in the port structure,** we need to make sure that the flags are clear when the port is opened.
 607 */
 608         PortP->Config &= ~(RIO_CTSFLOW | RIO_RTSFLOW);
 609
 610         /*
 611          ** Count opens for port statistics reporting
 612          */
 613         if (PortP->statsGather)
 614                 PortP->closes++;
 615
 616       close_end:
 617         /* XXX: Why would a "DELETED" flag be reset here? I'd have
 618            thought that a "deleted" flag means that the port was
 619            permanently gone, but here we can make it reappear by it
 620            being in close during the "deletion".
 621          */
 622         PortP->State &= ~(RIO_CLOSING | RIO_DELETED);
 623         if (PortP->firstOpen)
 624                 PortP->firstOpen--;
 625         rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 626         rio_dprintk(RIO_DEBUG_TTY, "Return from close\n");
 627         return rv;
 628 }
 629
 630
 631
 632 static void RIOClearUp(PortP)
 633 struct Port *PortP;
 634 {
 635         rio_dprintk(RIO_DEBUG_TTY, "RIOHalted set\n");
 636         PortP->Config = 0;      /* Direct semaphore */
 637         PortP->PortState = 0;
 638         PortP->firstOpen = 0;
 639         PortP->FlushCmdBodge = 0;
 640         PortP->ModemState = PortP->CookMode = 0;
 641         PortP->Mapped = 0;
 642         PortP->WflushFlag = 0;
 643         PortP->MagicFlags = 0;
 644         PortP->RxDataStart = 0;
 645         PortP->TxBufferIn = 0;
 646         PortP->TxBufferOut = 0;
 647 }
 648
 649 /*
 650 ** Put a command onto a port.
 651 ** The PortPointer, command, length and arg are passed.
 652 ** The len is the length *inclusive* of the command byte,
 653 ** and so for a command that takes no data, len==1.
 654 ** The arg is a single byte, and is only used if len==2.
 655 ** Other values of len aren't allowed, and will cause
 656 ** a panic.
 657 */
 658 int RIOShortCommand(struct rio_info *p, struct Port *PortP, int command, int len, int arg)
 659 {
 660         PKT *PacketP;
 661         int retries = 20;       /* at 10 per second -> 2 seconds */
 662         unsigned long flags;
 663
 664         rio_dprintk(RIO_DEBUG_TTY, "entering shortcommand.\n");
 665
 666         if (PortP->State & RIO_DELETED) {
 667                 rio_dprintk(RIO_DEBUG_TTY, "Short command to deleted RTA ignored\n");
 668                 return RIO_FAIL;
 669         }
 670         rio_spin_lock_irqsave(&PortP->portSem, flags);
 671
 672         /*
 673          ** If the port is in use for pre-emptive command, then wait for it to
 674          ** be free again.
 675          */
 676         while ((PortP->InUse != NOT_INUSE) && !p->RIOHalted) {
 677                 rio_dprintk(RIO_DEBUG_TTY, "Waiting for not in use (%d)\n", retries);
 678                 rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 679                 if (retries-- <= 0) {
 680                         return RIO_FAIL;
 681                 }
 682                 if (RIODelay_ni(PortP, HUNDRED_MS) == RIO_FAIL) {
 683                         return RIO_FAIL;
 684                 }
 685                 rio_spin_lock_irqsave(&PortP->portSem, flags);
 686         }
 687         if (PortP->State & RIO_DELETED) {
 688                 rio_dprintk(RIO_DEBUG_TTY, "Short command to deleted RTA ignored\n");
 689                 rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 690                 return RIO_FAIL;
 691         }
 692
 693         while (!can_add_transmit(&PacketP, PortP) && !p->RIOHalted) {
 694                 rio_dprintk(RIO_DEBUG_TTY, "Waiting to add short command to queue (%d)\n", retries);
 695                 rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 696                 if (retries-- <= 0) {
 697                         rio_dprintk(RIO_DEBUG_TTY, "out of tries. Failing\n");
 698                         return RIO_FAIL;
 699                 }
 700                 if (RIODelay_ni(PortP, HUNDRED_MS) == RIO_FAIL) {
 701                         return RIO_FAIL;
 702                 }
 703                 rio_spin_lock_irqsave(&PortP->portSem, flags);
 704         }
 705
 706         if (p->RIOHalted) {
 707                 rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 708                 return RIO_FAIL;
 709         }
 710
 711         /*
 712          ** set the command byte and the argument byte
 713          */
 714         writeb(command, &PacketP->data[0]);
 715
 716         if (len == 2)
 717                 writeb(arg, &PacketP->data[1]);
 718
 719         /*
 720          ** set the length of the packet and set the command bit.
 721          */
 722         writeb(PKT_CMD_BIT | len, &PacketP->len);
 723
 724         add_transmit(PortP);
 725         /*
 726          ** Count characters transmitted for port statistics reporting
 727          */
 728         if (PortP->statsGather)
 729                 PortP->txchars += len;
 730
 731         rio_spin_unlock_irqrestore(&PortP->portSem, flags);
 732         return p->RIOHalted ? RIO_FAIL : ~RIO_FAIL;
 733 }
 734
 735