1da177e4c3
Initial git repository build. I'm not bothering with the full history, even though we have it. We can create a separate "historical" git archive of that later if we want to, and in the meantime it's about 3.2GB when imported into git - space that would just make the early git days unnecessarily complicated, when we don't have a lot of good infrastructure for it. Let it rip!
1376 lines
37 KiB
C
1376 lines
37 KiB
C
/*
|
|
** -----------------------------------------------------------------------------
|
|
**
|
|
** Perle Specialix driver for Linux
|
|
** Ported from existing RIO Driver for SCO sources.
|
|
*
|
|
* (C) 1990 - 2000 Specialix International Ltd., Byfleet, Surrey, UK.
|
|
*
|
|
* This program is free software; you can redistribute it and/or modify
|
|
* it under the terms of the GNU General Public License as published by
|
|
* the Free Software Foundation; either version 2 of the License, or
|
|
* (at your option) any later version.
|
|
*
|
|
* This program is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
* GNU General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU General Public License
|
|
* along with this program; if not, write to the Free Software
|
|
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
**
|
|
** Module : riotty.c
|
|
** SID : 1.3
|
|
** Last Modified : 11/6/98 10:33:47
|
|
** Retrieved : 11/6/98 10:33:50
|
|
**
|
|
** ident @(#)riotty.c 1.3
|
|
**
|
|
** -----------------------------------------------------------------------------
|
|
*/
|
|
#ifdef SCCS_LABELS
|
|
static char *_riotty_c_sccs_ = "@(#)riotty.c 1.3";
|
|
#endif
|
|
|
|
|
|
#define __EXPLICIT_DEF_H__
|
|
|
|
#include <linux/module.h>
|
|
#include <linux/slab.h>
|
|
#include <linux/errno.h>
|
|
#include <linux/tty.h>
|
|
#include <linux/string.h>
|
|
#include <asm/io.h>
|
|
#include <asm/system.h>
|
|
#include <asm/string.h>
|
|
#include <asm/semaphore.h>
|
|
#include <asm/uaccess.h>
|
|
|
|
#include <linux/termios.h>
|
|
|
|
#include <linux/serial.h>
|
|
|
|
#include <linux/generic_serial.h>
|
|
|
|
|
|
#include "linux_compat.h"
|
|
#include "rio_linux.h"
|
|
#include "typdef.h"
|
|
#include "pkt.h"
|
|
#include "daemon.h"
|
|
#include "rio.h"
|
|
#include "riospace.h"
|
|
#include "top.h"
|
|
#include "cmdpkt.h"
|
|
#include "map.h"
|
|
#include "riotypes.h"
|
|
#include "rup.h"
|
|
#include "port.h"
|
|
#include "riodrvr.h"
|
|
#include "rioinfo.h"
|
|
#include "func.h"
|
|
#include "errors.h"
|
|
#include "pci.h"
|
|
|
|
#include "parmmap.h"
|
|
#include "unixrup.h"
|
|
#include "board.h"
|
|
#include "host.h"
|
|
#include "error.h"
|
|
#include "phb.h"
|
|
#include "link.h"
|
|
#include "cmdblk.h"
|
|
#include "route.h"
|
|
#include "control.h"
|
|
#include "cirrus.h"
|
|
#include "rioioctl.h"
|
|
#include "param.h"
|
|
#include "list.h"
|
|
#include "sam.h"
|
|
|
|
#if 0
|
|
static void ttyseth_pv(struct Port *, struct ttystatics *,
|
|
struct termios *sg, int);
|
|
#endif
|
|
|
|
static void RIOClearUp(struct Port *PortP);
|
|
int RIOShortCommand(struct rio_info *p, struct Port *PortP,
|
|
int command, int len, int arg);
|
|
|
|
#if 0
|
|
static int RIOCookMode(struct ttystatics *);
|
|
#endif
|
|
|
|
extern int conv_vb[]; /* now defined in ttymgr.c */
|
|
extern int conv_bv[]; /* now defined in ttymgr.c */
|
|
|
|
/*
|
|
** 16.09.1998 ARG - Fix to build riotty.k.o for Modular Kernel Support
|
|
**
|
|
** ep.def.h is necessary for Modular Kernel Support
|
|
** DO NOT place any kernel 'extern's after this line
|
|
** or this source file will not build riotty.k.o
|
|
*/
|
|
#ifdef uLYNX
|
|
#include <ep.def.h>
|
|
#endif
|
|
|
|
#ifdef NEED_THIS2
|
|
static struct old_sgttyb
|
|
default_sg =
|
|
{
|
|
B19200, B19200, /* input and output speed */
|
|
'H' - '@', /* erase char */
|
|
-1, /* 2nd erase char */
|
|
'U' - '@', /* kill char */
|
|
ECHO | CRMOD, /* mode */
|
|
'C' - '@', /* interrupt character */
|
|
'\\' - '@', /* quit char */
|
|
'Q' - '@', /* start char */
|
|
'S' - '@', /* stop char */
|
|
'D' - '@', /* EOF */
|
|
-1, /* brk */
|
|
(LCRTBS | LCRTERA | LCRTKIL | LCTLECH), /* local mode word */
|
|
'Z' - '@', /* process stop */
|
|
'Y' - '@', /* delayed stop */
|
|
'R' - '@', /* reprint line */
|
|
'O' - '@', /* flush output */
|
|
'W' - '@', /* word erase */
|
|
'V' - '@' /* literal next char */
|
|
};
|
|
#endif
|
|
|
|
|
|
extern struct rio_info *p;
|
|
|
|
|
|
int
|
|
riotopen(struct tty_struct * tty, struct file * filp)
|
|
{
|
|
register uint SysPort;
|
|
int Modem;
|
|
int repeat_this = 250;
|
|
struct Port *PortP; /* pointer to the port structure */
|
|
unsigned long flags;
|
|
int retval = 0;
|
|
|
|
func_enter ();
|
|
|
|
/* Make sure driver_data is NULL in case the rio isn't booted jet. Else gs_close
|
|
is going to oops.
|
|
*/
|
|
tty->driver_data = NULL;
|
|
|
|
SysPort = rio_minor(tty);
|
|
Modem = rio_ismodem(tty);
|
|
|
|
if ( p->RIOFailed ) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "System initialisation failed\n");
|
|
pseterr(ENXIO);
|
|
func_exit ();
|
|
return -ENXIO;
|
|
}
|
|
|
|
rio_dprintk (RIO_DEBUG_TTY, "port open SysPort %d (%s) (mapped:%d)\n",
|
|
SysPort, Modem ? "Modem" : "tty",
|
|
p->RIOPortp[SysPort]->Mapped);
|
|
|
|
/*
|
|
** Validate that we have received a legitimate request.
|
|
** Currently, just check that we are opening a port on
|
|
** a host card that actually exists, and that the port
|
|
** has been mapped onto a host.
|
|
*/
|
|
if (SysPort >= RIO_PORTS) { /* out of range ? */
|
|
rio_dprintk (RIO_DEBUG_TTY, "Illegal port number %d\n",SysPort);
|
|
pseterr(ENXIO);
|
|
func_exit();
|
|
return -ENXIO;
|
|
}
|
|
|
|
/*
|
|
** Grab pointer to the port stucture
|
|
*/
|
|
PortP = p->RIOPortp[SysPort]; /* Get control struc */
|
|
rio_dprintk (RIO_DEBUG_TTY, "PortP: %p\n", PortP);
|
|
if ( !PortP->Mapped ) { /* we aren't mapped yet! */
|
|
/*
|
|
** The system doesn't know which RTA this port
|
|
** corresponds to.
|
|
*/
|
|
rio_dprintk (RIO_DEBUG_TTY, "port not mapped into system\n");
|
|
func_exit ();
|
|
pseterr(ENXIO);
|
|
return -ENXIO;
|
|
}
|
|
|
|
tty->driver_data = PortP;
|
|
|
|
PortP->gs.tty = tty;
|
|
PortP->gs.count++;
|
|
|
|
rio_dprintk (RIO_DEBUG_TTY, "%d bytes in tx buffer\n",
|
|
PortP->gs.xmit_cnt);
|
|
|
|
retval = gs_init_port (&PortP->gs);
|
|
if (retval) {
|
|
PortP->gs.count--;
|
|
return -ENXIO;
|
|
}
|
|
/*
|
|
** If the host hasn't been booted yet, then
|
|
** fail
|
|
*/
|
|
if ( (PortP->HostP->Flags & RUN_STATE) != RC_RUNNING ) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Host not running\n");
|
|
pseterr(ENXIO);
|
|
func_exit ();
|
|
return -ENXIO;
|
|
}
|
|
|
|
/*
|
|
** If the RTA has not booted yet and the user has choosen to block
|
|
** until the RTA is present then we must spin here waiting for
|
|
** the RTA to boot.
|
|
*/
|
|
#if 0
|
|
if (!(PortP->HostP->Mapping[PortP->RupNum].Flags & RTA_BOOTED)) {
|
|
if (PortP->WaitUntilBooted) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Waiting for RTA to boot\n");
|
|
do {
|
|
if (RIODelay(PortP, HUNDRED_MS) == RIO_FAIL) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "RTA EINTR in delay \n");
|
|
func_exit ();
|
|
return -EINTR;
|
|
}
|
|
if (repeat_this -- <= 0) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Waiting for RTA to boot timeout\n");
|
|
RIOPreemptiveCmd(p, PortP, FCLOSE );
|
|
pseterr(EINTR);
|
|
func_exit ();
|
|
return -EIO;
|
|
}
|
|
} while(!(PortP->HostP->Mapping[PortP->RupNum].Flags & RTA_BOOTED));
|
|
rio_dprintk (RIO_DEBUG_TTY, "RTA has been booted\n");
|
|
} else {
|
|
rio_dprintk (RIO_DEBUG_TTY, "RTA never booted\n");
|
|
pseterr(ENXIO);
|
|
func_exit ();
|
|
return 0;
|
|
}
|
|
}
|
|
#else
|
|
/* I find the above code a bit hairy. I find the below code
|
|
easier to read and shorter. Now, if it works too that would
|
|
be great... -- REW
|
|
*/
|
|
rio_dprintk (RIO_DEBUG_TTY, "Checking if RTA has booted... \n");
|
|
while (!(PortP->HostP->Mapping[PortP->RupNum].Flags & RTA_BOOTED)) {
|
|
if (!PortP->WaitUntilBooted) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "RTA never booted\n");
|
|
func_exit ();
|
|
return -ENXIO;
|
|
}
|
|
|
|
/* Under Linux you'd normally use a wait instead of this
|
|
busy-waiting. I'll stick with the old implementation for
|
|
now. --REW
|
|
*/
|
|
if (RIODelay(PortP, HUNDRED_MS) == RIO_FAIL) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "RTA_wait_for_boot: EINTR in delay \n");
|
|
func_exit ();
|
|
return -EINTR;
|
|
}
|
|
if (repeat_this -- <= 0) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Waiting for RTA to boot timeout\n");
|
|
func_exit ();
|
|
return -EIO;
|
|
}
|
|
}
|
|
rio_dprintk (RIO_DEBUG_TTY, "RTA has been booted\n");
|
|
#endif
|
|
#if 0
|
|
tp = PortP->TtyP; /* get tty struct */
|
|
#endif
|
|
rio_spin_lock_irqsave(&PortP->portSem, flags);
|
|
if ( p->RIOHalted ) {
|
|
goto bombout;
|
|
}
|
|
#if 0
|
|
retval = gs_init_port(&PortP->gs);
|
|
if (retval){
|
|
func_exit ();
|
|
return retval;
|
|
}
|
|
#endif
|
|
|
|
/*
|
|
** If the port is in the final throws of being closed,
|
|
** we should wait here (politely), waiting
|
|
** for it to finish, so that it doesn't close us!
|
|
*/
|
|
while ( (PortP->State & RIO_CLOSING) && !p->RIOHalted ) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Waiting for RIO_CLOSING to go away\n");
|
|
if (repeat_this -- <= 0) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Waiting for not idle closed broken by signal\n");
|
|
RIOPreemptiveCmd(p, PortP, FCLOSE );
|
|
retval = -EINTR;
|
|
goto bombout;
|
|
}
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
if (RIODelay(PortP, HUNDRED_MS) == RIO_FAIL) {
|
|
rio_spin_lock_irqsave(&PortP->portSem, flags);
|
|
retval = -EINTR;
|
|
goto bombout;
|
|
}
|
|
rio_spin_lock_irqsave(&PortP->portSem, flags);
|
|
}
|
|
|
|
if ( !PortP->Mapped ) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Port unmapped while closing!\n");
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
retval = -ENXIO;
|
|
func_exit ();
|
|
return retval;
|
|
}
|
|
|
|
if ( p->RIOHalted ) {
|
|
goto bombout;
|
|
}
|
|
|
|
/*
|
|
** 15.10.1998 ARG - ESIL 0761 part fix
|
|
** 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.
|
|
*/
|
|
/* Uh? Suppose I turn these on and then another process opens
|
|
the port again? The flags get cleared! Not good. -- REW */
|
|
if ( !(PortP->State & (RIO_LOPEN | RIO_MOPEN)) ) {
|
|
PortP->Config &= ~(RIO_CTSFLOW|RIO_RTSFLOW);
|
|
}
|
|
|
|
if (!(PortP->firstOpen)) { /* First time ? */
|
|
rio_dprintk (RIO_DEBUG_TTY, "First open for this port\n");
|
|
|
|
|
|
PortP->firstOpen++;
|
|
PortP->CookMode = 0; /* XXX RIOCookMode(tp); */
|
|
PortP->InUse = NOT_INUSE;
|
|
|
|
/* Tentative fix for bug PR27. Didn't work. */
|
|
/* PortP->gs.xmit_cnt = 0; */
|
|
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
#ifdef NEED_THIS
|
|
ttyseth(PortP, tp, (struct old_sgttyb *)&default_sg);
|
|
#endif
|
|
|
|
/* Someone explain to me why this delay/config is
|
|
here. If I read the docs correctly the "open"
|
|
command piggybacks the parameters immediately.
|
|
-- REW */
|
|
RIOParam(PortP,OPEN,Modem,OK_TO_SLEEP); /* Open the port */
|
|
#if 0
|
|
/* This delay of 1 second was annoying. I removed it. -- REW */
|
|
RIODelay(PortP, HUNDRED_MS*10);
|
|
RIOParam(PortP,CONFIG,Modem,OK_TO_SLEEP); /* Config the port */
|
|
#endif
|
|
rio_spin_lock_irqsave(&PortP->portSem, flags);
|
|
|
|
/*
|
|
** wait for the port to be not closed.
|
|
*/
|
|
while ( !(PortP->PortState & PORT_ISOPEN) && !p->RIOHalted ) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Waiting for PORT_ISOPEN-currently %x\n",PortP->PortState);
|
|
/*
|
|
** 15.10.1998 ARG - ESIL 0759
|
|
** (Part) fix for port being trashed when opened whilst RTA "disconnected"
|
|
** Take out the limited wait - now wait for ever or until user
|
|
** bangs us out.
|
|
**
|
|
if (repeat_this -- <= 0) {
|
|
rio_dprint(RIO_DEBUG_TTY, ("Waiting for open to finish timed out.\n"));
|
|
RIOPreemptiveCmd(p, PortP, FCLOSE );
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return -EINTR;
|
|
}
|
|
**
|
|
*/
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
if (RIODelay(PortP, HUNDRED_MS) == RIO_FAIL) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Waiting for open to finish broken by signal\n");
|
|
RIOPreemptiveCmd(p, PortP, FCLOSE );
|
|
func_exit ();
|
|
return -EINTR;
|
|
}
|
|
rio_spin_lock_irqsave(&PortP->portSem, flags);
|
|
}
|
|
|
|
if ( p->RIOHalted ) {
|
|
retval = -EIO;
|
|
bombout:
|
|
/* RIOClearUp( PortP ); */
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return retval;
|
|
}
|
|
rio_dprintk (RIO_DEBUG_TTY, "PORT_ISOPEN found\n");
|
|
}
|
|
|
|
#ifdef MODEM_SUPPORT
|
|
if (Modem) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Modem - test for carrier\n");
|
|
/*
|
|
** ACTION
|
|
** insert test for carrier here. -- ???
|
|
** I already see that test here. What's the deal? -- REW
|
|
*/
|
|
if ((PortP->gs.tty->termios->c_cflag & CLOCAL) || (PortP->ModemState & MSVR1_CD))
|
|
{
|
|
rio_dprintk (RIO_DEBUG_TTY, "open(%d) Modem carr on\n", SysPort);
|
|
/*
|
|
tp->tm.c_state |= CARR_ON;
|
|
wakeup((caddr_t) &tp->tm.c_canq);
|
|
*/
|
|
PortP->State |= RIO_CARR_ON;
|
|
wake_up_interruptible (&PortP->gs.open_wait);
|
|
}
|
|
else /* no carrier - wait for DCD */
|
|
{
|
|
/*
|
|
while (!(PortP->gs.tty->termios->c_state & CARR_ON) &&
|
|
!(filp->f_flags & O_NONBLOCK) && !p->RIOHalted )
|
|
*/
|
|
while (!(PortP->State & RIO_CARR_ON) &&
|
|
!(filp->f_flags & O_NONBLOCK) && !p->RIOHalted ) {
|
|
|
|
rio_dprintk (RIO_DEBUG_TTY, "open(%d) sleeping for carr on\n",SysPort);
|
|
/*
|
|
PortP->gs.tty->termios->c_state |= WOPEN;
|
|
*/
|
|
PortP->State |= RIO_WOPEN;
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
if (RIODelay (PortP, HUNDRED_MS) == RIO_FAIL)
|
|
#if 0
|
|
if ( sleep((caddr_t)&tp->tm.c_canqo, TTIPRI|PCATCH))
|
|
#endif
|
|
{
|
|
/*
|
|
** ACTION: verify that this is a good thing
|
|
** to do here. -- ???
|
|
** I think it's OK. -- REW
|
|
*/
|
|
rio_dprintk (RIO_DEBUG_TTY, "open(%d) sleeping for carr broken by signal\n",
|
|
SysPort);
|
|
RIOPreemptiveCmd( p, PortP, FCLOSE );
|
|
/*
|
|
tp->tm.c_state &= ~WOPEN;
|
|
*/
|
|
PortP->State &= ~RIO_WOPEN;
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
func_exit ();
|
|
return -EINTR;
|
|
}
|
|
}
|
|
PortP->State &= ~RIO_WOPEN;
|
|
}
|
|
if ( p->RIOHalted )
|
|
goto bombout;
|
|
rio_dprintk (RIO_DEBUG_TTY, "Setting RIO_MOPEN\n");
|
|
PortP->State |= RIO_MOPEN;
|
|
}
|
|
else
|
|
#endif
|
|
{
|
|
/*
|
|
** ACTION
|
|
** Direct line open - force carrier (will probably mean
|
|
** that sleeping Modem line fubar)
|
|
*/
|
|
PortP->State |= RIO_LOPEN;
|
|
}
|
|
|
|
if ( p->RIOHalted ) {
|
|
goto bombout;
|
|
}
|
|
|
|
rio_dprintk (RIO_DEBUG_TTY, "high level open done\n");
|
|
|
|
#ifdef STATS
|
|
PortP->Stat.OpenCnt++;
|
|
#endif
|
|
/*
|
|
** Count opens for port statistics reporting
|
|
*/
|
|
if (PortP->statsGather)
|
|
PortP->opens++;
|
|
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
rio_dprintk (RIO_DEBUG_TTY, "Returning from open\n");
|
|
func_exit ();
|
|
return 0;
|
|
}
|
|
|
|
/*
|
|
** RIOClose the port.
|
|
** The operating system thinks that this is last close for the device.
|
|
** As there are two interfaces to the port (Modem and tty), we need to
|
|
** check that both are closed before we close the device.
|
|
*/
|
|
int
|
|
riotclose(void *ptr)
|
|
{
|
|
#if 0
|
|
register uint SysPort = dev;
|
|
struct ttystatics *tp; /* pointer to our ttystruct */
|
|
#endif
|
|
struct Port *PortP =ptr; /* pointer to the port structure */
|
|
int deleted = 0;
|
|
int try = -1; /* Disable the timeouts by setting them to -1 */
|
|
int repeat_this = -1; /* Congrats to those having 15 years of
|
|
uptime! (You get to break the driver.) */
|
|
long end_time;
|
|
struct tty_struct * tty;
|
|
unsigned long flags;
|
|
int Modem;
|
|
int rv =0;
|
|
|
|
rio_dprintk (RIO_DEBUG_TTY, "port close SysPort %d\n",PortP->PortNum);
|
|
|
|
/* PortP = p->RIOPortp[SysPort]; */
|
|
rio_dprintk (RIO_DEBUG_TTY, "Port is at address 0x%x\n",(int)PortP);
|
|
/* tp = PortP->TtyP;*/ /* Get tty */
|
|
tty = PortP->gs.tty;
|
|
rio_dprintk (RIO_DEBUG_TTY, "TTY is at address 0x%x\n",(int)tty);
|
|
|
|
if (PortP->gs.closing_wait)
|
|
end_time = jiffies + PortP->gs.closing_wait;
|
|
else
|
|
end_time = jiffies + MAX_SCHEDULE_TIMEOUT;
|
|
|
|
Modem = rio_ismodem(tty);
|
|
#if 0
|
|
/* What F.CKING cache? Even then, a higly idle multiprocessor,
|
|
system with large caches this won't work . Better find out when
|
|
this doesn't work asap, and fix the cause. -- REW */
|
|
|
|
RIODelay(PortP, HUNDRED_MS*10); /* To flush the cache */
|
|
#endif
|
|
rio_spin_lock_irqsave(&PortP->portSem, flags);
|
|
|
|
/*
|
|
** Setting this flag will make any process trying to open
|
|
** this port block until we are complete closing it.
|
|
*/
|
|
PortP->State |= RIO_CLOSING;
|
|
|
|
if ( (PortP->State & RIO_DELETED) ) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Close on deleted RTA\n");
|
|
deleted = 1;
|
|
}
|
|
|
|
if ( p->RIOHalted ) {
|
|
RIOClearUp( PortP );
|
|
rv = -EIO;
|
|
goto close_end;
|
|
}
|
|
|
|
rio_dprintk (RIO_DEBUG_TTY, "Clear bits\n");
|
|
/*
|
|
** clear the open bits for this device
|
|
*/
|
|
PortP->State &= (Modem ? ~RIO_MOPEN : ~RIO_LOPEN);
|
|
PortP->State &= ~RIO_CARR_ON;
|
|
PortP->ModemState &= ~MSVR1_CD;
|
|
/*
|
|
** If the device was open as both a Modem and a tty line
|
|
** then we need to wimp out here, as the port has not really
|
|
** been finally closed (gee, whizz!) The test here uses the
|
|
** bit for the OTHER mode of operation, to see if THAT is
|
|
** still active!
|
|
*/
|
|
if ( (PortP->State & (RIO_LOPEN|RIO_MOPEN)) ) {
|
|
/*
|
|
** The port is still open for the other task -
|
|
** return, pretending that we are still active.
|
|
*/
|
|
rio_dprintk (RIO_DEBUG_TTY, "Channel %d still open !\n",PortP->PortNum);
|
|
PortP->State &= ~RIO_CLOSING;
|
|
if (PortP->firstOpen)
|
|
PortP->firstOpen--;
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return -EIO;
|
|
}
|
|
|
|
rio_dprintk (RIO_DEBUG_TTY, "Closing down - everything must go!\n");
|
|
|
|
PortP->State &= ~RIO_DYNOROD;
|
|
|
|
/*
|
|
** This is where we wait for the port
|
|
** to drain down before closing. Bye-bye....
|
|
** (We never meant to do this)
|
|
*/
|
|
rio_dprintk (RIO_DEBUG_TTY, "Timeout 1 starts\n");
|
|
|
|
if (!deleted)
|
|
while ( (PortP->InUse != NOT_INUSE) && !p->RIOHalted &&
|
|
(PortP->TxBufferIn != PortP->TxBufferOut) ) {
|
|
cprintf("Need to flush the ttyport\n");
|
|
if (repeat_this -- <= 0) {
|
|
rv = -EINTR;
|
|
rio_dprintk (RIO_DEBUG_TTY, "Waiting for not idle closed broken by signal\n");
|
|
RIOPreemptiveCmd(p, PortP, FCLOSE );
|
|
goto close_end;
|
|
}
|
|
rio_dprintk (RIO_DEBUG_TTY, "Calling timeout to flush in closing\n");
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
if (RIODelay_ni(PortP, HUNDRED_MS*10) == RIO_FAIL) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "RTA EINTR in delay \n");
|
|
rv = -EINTR;
|
|
rio_spin_lock_irqsave(&PortP->portSem, flags);
|
|
goto close_end;
|
|
}
|
|
rio_spin_lock_irqsave(&PortP->portSem, flags);
|
|
}
|
|
|
|
PortP->TxBufferIn = PortP->TxBufferOut = 0;
|
|
repeat_this = 0xff;
|
|
|
|
PortP->InUse = 0;
|
|
if ( (PortP->State & (RIO_LOPEN|RIO_MOPEN)) ) {
|
|
/*
|
|
** The port has been re-opened for the other task -
|
|
** return, pretending that we are still active.
|
|
*/
|
|
rio_dprintk (RIO_DEBUG_TTY, "Channel %d re-open!\n", PortP->PortNum);
|
|
PortP->State &= ~RIO_CLOSING;
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
if (PortP->firstOpen)
|
|
PortP->firstOpen--;
|
|
return -EIO;
|
|
}
|
|
|
|
if ( p->RIOHalted ) {
|
|
RIOClearUp( PortP );
|
|
goto close_end;
|
|
}
|
|
|
|
|
|
|
|
/* Can't call RIOShortCommand with the port locked. */
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
|
|
if (RIOShortCommand(p, PortP, CLOSE, 1, 0) == RIO_FAIL) {
|
|
RIOPreemptiveCmd(p, PortP,FCLOSE);
|
|
goto close_end;
|
|
}
|
|
|
|
if (!deleted)
|
|
while (try && (PortP->PortState & PORT_ISOPEN)) {
|
|
try--;
|
|
if (time_after (jiffies, end_time)) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Run out of tries - force the bugger shut!\n" );
|
|
RIOPreemptiveCmd(p, PortP,FCLOSE);
|
|
break;
|
|
}
|
|
rio_dprintk (RIO_DEBUG_TTY, "Close: PortState:ISOPEN is %d\n",
|
|
PortP->PortState & PORT_ISOPEN);
|
|
|
|
if ( p->RIOHalted ) {
|
|
RIOClearUp( PortP );
|
|
goto close_end;
|
|
}
|
|
if (RIODelay(PortP, HUNDRED_MS) == RIO_FAIL) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "RTA EINTR in delay \n");
|
|
RIOPreemptiveCmd(p, PortP,FCLOSE);
|
|
break;
|
|
}
|
|
}
|
|
rio_spin_lock_irqsave(&PortP->portSem, flags);
|
|
rio_dprintk (RIO_DEBUG_TTY, "Close: try was %d on completion\n", try );
|
|
|
|
/* RIOPreemptiveCmd(p, PortP, FCLOSE); */
|
|
|
|
/*
|
|
** 15.10.1998 ARG - ESIL 0761 part fix
|
|
** 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.
|
|
*/
|
|
PortP->Config &= ~(RIO_CTSFLOW|RIO_RTSFLOW);
|
|
|
|
|
|
#ifdef STATS
|
|
PortP->Stat.CloseCnt++;
|
|
#endif
|
|
/*
|
|
** Count opens for port statistics reporting
|
|
*/
|
|
if (PortP->statsGather)
|
|
PortP->closes++;
|
|
|
|
close_end:
|
|
/* XXX: Why would a "DELETED" flag be reset here? I'd have
|
|
thought that a "deleted" flag means that the port was
|
|
permanently gone, but here we can make it reappear by it
|
|
being in close during the "deletion".
|
|
*/
|
|
PortP->State &= ~(RIO_CLOSING|RIO_DELETED);
|
|
if (PortP->firstOpen)
|
|
PortP->firstOpen--;
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
rio_dprintk (RIO_DEBUG_TTY, "Return from close\n");
|
|
return rv;
|
|
}
|
|
|
|
|
|
/*
|
|
** decide if we need to use the line discipline.
|
|
** This routine can return one of three values:
|
|
** COOK_RAW if no processing has to be done by the line discipline or the card
|
|
** COOK_WELL if the line discipline must be used to do the processing
|
|
** COOK_MEDIUM if the card can do all the processing necessary.
|
|
*/
|
|
#if 0
|
|
static int
|
|
RIOCookMode(struct ttystatics *tp)
|
|
{
|
|
/*
|
|
** We can't handle tm.c_mstate != 0 on SCO
|
|
** We can't handle mapping
|
|
** We can't handle non-ttwrite line disc.
|
|
** We can't handle lflag XCASE
|
|
** We can handle oflag OPOST & (OCRNL, ONLCR, TAB3)
|
|
*/
|
|
|
|
#ifdef CHECK
|
|
CheckTtyP( tp );
|
|
#endif
|
|
if (!(tp->tm.c_oflag & OPOST)) /* No post processing */
|
|
return COOK_RAW; /* Raw mode o/p */
|
|
|
|
if ( tp->tm.c_lflag & XCASE )
|
|
return COOK_WELL; /* Use line disc */
|
|
|
|
if (tp->tm.c_oflag & ~(OPOST | ONLCR | OCRNL | TAB3 ) )
|
|
return COOK_WELL; /* Use line disc for strange modes */
|
|
|
|
if ( tp->tm.c_oflag == OPOST ) /* If only OPOST is set, do RAW */
|
|
return COOK_RAW;
|
|
|
|
/*
|
|
** So, we need to output process!
|
|
*/
|
|
return COOK_MEDIUM;
|
|
}
|
|
#endif
|
|
|
|
static void
|
|
RIOClearUp(PortP)
|
|
struct Port *PortP;
|
|
{
|
|
rio_dprintk (RIO_DEBUG_TTY, "RIOHalted set\n");
|
|
PortP->Config = 0; /* Direct semaphore */
|
|
PortP->PortState = 0;
|
|
PortP->firstOpen = 0;
|
|
PortP->FlushCmdBodge = 0;
|
|
PortP->ModemState = PortP->CookMode = 0;
|
|
PortP->Mapped = 0;
|
|
PortP->WflushFlag = 0;
|
|
PortP->MagicFlags = 0;
|
|
PortP->RxDataStart = 0;
|
|
PortP->TxBufferIn = 0;
|
|
PortP->TxBufferOut = 0;
|
|
}
|
|
|
|
/*
|
|
** Put a command onto a port.
|
|
** The PortPointer, command, length and arg are passed.
|
|
** The len is the length *inclusive* of the command byte,
|
|
** and so for a command that takes no data, len==1.
|
|
** The arg is a single byte, and is only used if len==2.
|
|
** Other values of len aren't allowed, and will cause
|
|
** a panic.
|
|
*/
|
|
int RIOShortCommand(struct rio_info *p, struct Port *PortP,
|
|
int command, int len, int arg)
|
|
{
|
|
PKT *PacketP;
|
|
int retries = 20; /* at 10 per second -> 2 seconds */
|
|
unsigned long flags;
|
|
|
|
rio_dprintk (RIO_DEBUG_TTY, "entering shortcommand.\n");
|
|
#ifdef CHECK
|
|
CheckPortP( PortP );
|
|
if ( len < 1 || len > 2 )
|
|
cprintf(("STUPID LENGTH %d\n",len));
|
|
#endif
|
|
|
|
if ( PortP->State & RIO_DELETED ) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Short command to deleted RTA ignored\n");
|
|
return RIO_FAIL;
|
|
}
|
|
rio_spin_lock_irqsave(&PortP->portSem, flags);
|
|
|
|
/*
|
|
** If the port is in use for pre-emptive command, then wait for it to
|
|
** be free again.
|
|
*/
|
|
while ( (PortP->InUse != NOT_INUSE) && !p->RIOHalted ) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Waiting for not in use (%d)\n",
|
|
retries);
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
if (retries-- <= 0) {
|
|
return RIO_FAIL;
|
|
}
|
|
if (RIODelay_ni(PortP, HUNDRED_MS) == RIO_FAIL) {
|
|
return RIO_FAIL;
|
|
}
|
|
rio_spin_lock_irqsave(&PortP->portSem, flags);
|
|
}
|
|
if ( PortP->State & RIO_DELETED ) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Short command to deleted RTA ignored\n");
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return RIO_FAIL;
|
|
}
|
|
|
|
while ( !can_add_transmit(&PacketP,PortP) && !p->RIOHalted ) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Waiting to add short command to queue (%d)\n", retries);
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
if (retries-- <= 0) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "out of tries. Failing\n");
|
|
return RIO_FAIL;
|
|
}
|
|
if ( RIODelay_ni(PortP, HUNDRED_MS)==RIO_FAIL ) {
|
|
return RIO_FAIL;
|
|
}
|
|
rio_spin_lock_irqsave(&PortP->portSem, flags);
|
|
}
|
|
|
|
if ( p->RIOHalted ) {
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return RIO_FAIL;
|
|
}
|
|
|
|
/*
|
|
** set the command byte and the argument byte
|
|
*/
|
|
WBYTE(PacketP->data[0] , command);
|
|
|
|
if ( len==2 )
|
|
WBYTE(PacketP->data[1] , arg);
|
|
|
|
/*
|
|
** set the length of the packet and set the command bit.
|
|
*/
|
|
WBYTE(PacketP->len , PKT_CMD_BIT | len);
|
|
|
|
add_transmit(PortP);
|
|
/*
|
|
** Count characters transmitted for port statistics reporting
|
|
*/
|
|
if (PortP->statsGather)
|
|
PortP->txchars += len;
|
|
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return p->RIOHalted ? RIO_FAIL : ~RIO_FAIL;
|
|
}
|
|
|
|
|
|
#if 0
|
|
/*
|
|
** This is an ioctl interface. This is the twentieth century. You know what
|
|
** its all about.
|
|
*/
|
|
int
|
|
riotioctl(struct rio_info *p, struct tty_struct *tty, int cmd, caddr_t arg)
|
|
{
|
|
register struct Port *PortP;
|
|
register struct ttystatics *tp;
|
|
int current;
|
|
int ParamSemIncremented = 0;
|
|
int old_oflag, old_cflag, old_iflag, changed, oldcook;
|
|
int i;
|
|
unsigned char sio_regs[5]; /* Here be magic */
|
|
short vpix_cflag;
|
|
short divisor;
|
|
int baud;
|
|
uint SysPort = rio_minor(tty);
|
|
int Modem = rio_ismodem(tty);
|
|
int ioctl_processed;
|
|
|
|
rio_dprintk (RIO_DEBUG_TTY, "port ioctl SysPort %d command 0x%x argument 0x%x %s\n",
|
|
SysPort, cmd, arg, Modem?"Modem":"tty") ;
|
|
|
|
if ( SysPort >= RIO_PORTS ) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Bad port number %d\n", SysPort);
|
|
return -ENXIO;
|
|
}
|
|
|
|
PortP = p->RIOPortp[SysPort];
|
|
tp = PortP->TtyP;
|
|
|
|
rio_spin_lock_irqsave(&PortP->portSem, flags);
|
|
|
|
#ifdef STATS
|
|
PortP->Stat.IoctlCnt++;
|
|
#endif
|
|
|
|
if ( PortP->State & RIO_DELETED ) {
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return -EIO;
|
|
}
|
|
|
|
|
|
if ( p->RIOHalted ) {
|
|
RIOClearUp( PortP );
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return -EIO;
|
|
}
|
|
|
|
/*
|
|
** Count ioctls for port statistics reporting
|
|
*/
|
|
if (PortP->statsGather)
|
|
PortP->ioctls++;
|
|
|
|
/*
|
|
** Specialix RIO Ioctl calls
|
|
*/
|
|
switch (cmd) {
|
|
|
|
case TCRIOTRIAD:
|
|
if ( arg )
|
|
PortP->State |= RIO_TRIAD_MODE;
|
|
else
|
|
PortP->State &= ~RIO_TRIAD_MODE;
|
|
/*
|
|
** Normally, when istrip is set on a port, a config is
|
|
** sent to the RTA instructing the CD1400 to do the
|
|
** stripping. In TRIAD mode, the interrupt receive routine
|
|
** must do the stripping instead, since it has to detect
|
|
** an 8 bit function key sequence. If istrip is set with
|
|
** TRIAD mode on(off), and 8 bit data is being read by
|
|
** the port, the user then turns TRIAD mode off(on), the RTA
|
|
** must be reconfigured (not) to do the stripping.
|
|
** Hence we call RIOParam here.
|
|
*/
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
RIOParam(PortP,CONFIG,Modem,OK_TO_SLEEP);
|
|
return 0;
|
|
|
|
case TCRIOTSTATE:
|
|
rio_dprintk (RIO_DEBUG_TTY, "tbusy/tstop monitoring %sabled\n",
|
|
arg ? "en" : "dis");
|
|
/* MonitorTstate = 0 ;*/
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
RIOParam(PortP, CONFIG, Modem, OK_TO_SLEEP);
|
|
return 0;
|
|
|
|
case TCRIOSTATE: /* current state of Modem input pins */
|
|
rio_dprintk (RIO_DEBUG_TTY, "TCRIOSTATE\n");
|
|
if (RIOPreemptiveCmd(p, PortP, MGET) == RIO_FAIL)
|
|
rio_dprintk (RIO_DEBUG_TTY, "TCRIOSTATE command failed\n");
|
|
PortP->State |= RIO_BUSY;
|
|
current = PortP->ModemState;
|
|
if ( copyout((caddr_t)¤t, (int)arg,
|
|
sizeof(current))==COPYFAIL ) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Copyout failed\n");
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
pseterr(EFAULT);
|
|
}
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return 0;
|
|
|
|
case TCRIOMBIS: /* Set modem lines */
|
|
case TCRIOMBIC: /* Clear modem lines */
|
|
rio_dprintk (RIO_DEBUG_TTY, "TCRIOMBIS/TCRIOMBIC\n");
|
|
if (cmd == TCRIOMBIS) {
|
|
uint state;
|
|
state = (uint)arg;
|
|
PortP->ModemState |= (ushort)state;
|
|
PortP->ModemLines = (ulong) arg;
|
|
if (RIOPreemptiveCmd(p, PortP, MBIS) == RIO_FAIL)
|
|
rio_dprintk (RIO_DEBUG_TTY,
|
|
"TCRIOMBIS command failed\n");
|
|
}
|
|
else {
|
|
uint state;
|
|
|
|
state = (uint)arg;
|
|
PortP->ModemState &= ~(ushort)state;
|
|
PortP->ModemLines = (ulong) arg;
|
|
if (RIOPreemptiveCmd(p, PortP, MBIC) == RIO_FAIL)
|
|
rio_dprintk (RIO_DEBUG_TTY, "TCRIOMBIC command failed\n");
|
|
}
|
|
PortP->State |= RIO_BUSY;
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return 0;
|
|
|
|
case TCRIOXPON: /* set Xprint ON string */
|
|
rio_dprintk (RIO_DEBUG_TTY, "TCRIOXPON\n");
|
|
if ( copyin((int)arg, (caddr_t)PortP->Xprint.XpOn,
|
|
MAX_XP_CTRL_LEN)==COPYFAIL ) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Copyin failed\n");
|
|
PortP->Xprint.XpOn[0] = '\0';
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
pseterr(EFAULT);
|
|
}
|
|
PortP->Xprint.XpOn[MAX_XP_CTRL_LEN-1] = '\0';
|
|
PortP->Xprint.XpLen = strlen(PortP->Xprint.XpOn)+
|
|
strlen(PortP->Xprint.XpOff);
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return 0;
|
|
|
|
case TCRIOXPOFF: /* set Xprint OFF string */
|
|
rio_dprintk (RIO_DEBUG_TTY, "TCRIOXPOFF\n");
|
|
if ( copyin( (int)arg, (caddr_t)PortP->Xprint.XpOff,
|
|
MAX_XP_CTRL_LEN)==COPYFAIL ) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "Copyin failed\n");
|
|
PortP->Xprint.XpOff[0] = '\0';
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
pseterr(EFAULT);
|
|
}
|
|
PortP->Xprint.XpOff[MAX_XP_CTRL_LEN-1] = '\0';
|
|
PortP->Xprint.XpLen = strlen(PortP->Xprint.XpOn)+
|
|
strlen(PortP->Xprint.XpOff);
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return 0;
|
|
|
|
case TCRIOXPCPS: /* set Xprint CPS string */
|
|
rio_dprintk (RIO_DEBUG_TTY, "TCRIOXPCPS\n");
|
|
if ( (uint)arg > p->RIOConf.MaxXpCps ||
|
|
(uint)arg < p->RIOConf.MinXpCps ) {
|
|
rio_dprintk (RIO_DEBUG_TTY, "%d CPS out of range\n",arg);
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
pseterr(EINVAL);
|
|
return 0;
|
|
}
|
|
PortP->Xprint.XpCps = (uint)arg;
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return 0;
|
|
|
|
case TCRIOXPRINT:
|
|
rio_dprintk (RIO_DEBUG_TTY, "TCRIOXPRINT\n");
|
|
if ( copyout((caddr_t)&PortP->Xprint, (int)arg,
|
|
sizeof(struct Xprint))==COPYFAIL ) {
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
pseterr(EFAULT);
|
|
}
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return 0;
|
|
|
|
case TCRIOIXANYON:
|
|
rio_dprintk (RIO_DEBUG_TTY, "TCRIOIXANYON\n");
|
|
PortP->Config |= RIO_IXANY;
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return 0;
|
|
|
|
case TCRIOIXANYOFF:
|
|
rio_dprintk (RIO_DEBUG_TTY, "TCRIOIXANYOFF\n");
|
|
PortP->Config &= ~RIO_IXANY;
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return 0;
|
|
|
|
case TCRIOIXONON:
|
|
rio_dprintk (RIO_DEBUG_TTY, "TCRIOIXONON\n");
|
|
PortP->Config |= RIO_IXON;
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return 0;
|
|
|
|
case TCRIOIXONOFF:
|
|
rio_dprintk (RIO_DEBUG_TTY, "TCRIOIXONOFF\n");
|
|
PortP->Config &= ~RIO_IXON;
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return 0;
|
|
|
|
/*
|
|
** 15.10.1998 ARG - ESIL 0761 part fix
|
|
** Added support for CTS and RTS flow control ioctls :
|
|
*/
|
|
case TCRIOCTSFLOWEN:
|
|
rio_dprintk (RIO_DEBUG_TTY, "TCRIOCTSFLOWEN\n");
|
|
PortP->Config |= RIO_CTSFLOW;
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
RIOParam(PortP,CONFIG,Modem,OK_TO_SLEEP);
|
|
return 0;
|
|
|
|
case TCRIOCTSFLOWDIS:
|
|
rio_dprintk (RIO_DEBUG_TTY, "TCRIOCTSFLOWDIS\n");
|
|
PortP->Config &= ~RIO_CTSFLOW;
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
RIOParam(PortP,CONFIG,Modem,OK_TO_SLEEP);
|
|
return 0;
|
|
|
|
case TCRIORTSFLOWEN:
|
|
rio_dprintk (RIO_DEBUG_TTY, "TCRIORTSFLOWEN\n");
|
|
PortP->Config |= RIO_RTSFLOW;
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
RIOParam(PortP,CONFIG,Modem,OK_TO_SLEEP);
|
|
return 0;
|
|
|
|
case TCRIORTSFLOWDIS:
|
|
rio_dprintk (RIO_DEBUG_TTY, "TCRIORTSFLOWDIS\n");
|
|
PortP->Config &= ~RIO_RTSFLOW;
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
RIOParam(PortP,CONFIG,Modem,OK_TO_SLEEP);
|
|
return 0;
|
|
|
|
/* end ESIL 0761 part fix */
|
|
|
|
}
|
|
|
|
|
|
/* Lynx IOCTLS */
|
|
switch (cmd) {
|
|
case TIOCSETP:
|
|
case TIOCSETN:
|
|
case OTIOCSETP:
|
|
case OTIOCSETN:
|
|
ioctl_processed++;
|
|
ttyseth(PortP, tp, (struct old_sgttyb *)arg);
|
|
break;
|
|
case TCSETA:
|
|
case TCSETAW:
|
|
case TCSETAF:
|
|
ioctl_processed++;
|
|
rio_dprintk (RIO_DEBUG_TTY, "NON POSIX ioctl\n");
|
|
ttyseth_pv(PortP, tp, (struct termios *)arg, 0);
|
|
break;
|
|
case TCSETAP: /* posix tcsetattr() */
|
|
case TCSETAWP: /* posix tcsetattr() */
|
|
case TCSETAFP: /* posix tcsetattr() */
|
|
rio_dprintk (RIO_DEBUG_TTY, "NON POSIX SYSV ioctl\n");
|
|
ttyseth_pv(PortP, tp, (struct termios *)arg, 1);
|
|
ioctl_processed++;
|
|
break;
|
|
}
|
|
|
|
/*
|
|
** If its any of the commands that require the port to be in the
|
|
** non-busy state wait until all output has drained
|
|
*/
|
|
if (!ioctl_processed)
|
|
switch(cmd) {
|
|
case TCSETAW:
|
|
case TCSETAF:
|
|
case TCSETA:
|
|
case TCSBRK:
|
|
#define OLD_POSIX ('x' << 8)
|
|
#define OLD_POSIX_SETA (OLD_POSIX | 2)
|
|
#define OLD_POSIX_SETAW (OLD_POSIX | 3)
|
|
#define OLD_POSIX_SETAF (OLD_POSIX | 4)
|
|
#define NEW_POSIX (('i' << 24) | ('X' << 16))
|
|
#define NEW_POSIX_SETA (NEW_POSIX | 2)
|
|
#define NEW_POSIX_SETAW (NEW_POSIX | 3)
|
|
#define NEW_POSIX_SETAF (NEW_POSIX | 4)
|
|
case OLD_POSIX_SETA:
|
|
case OLD_POSIX_SETAW:
|
|
case OLD_POSIX_SETAF:
|
|
case NEW_POSIX_SETA:
|
|
case NEW_POSIX_SETAW:
|
|
case NEW_POSIX_SETAF:
|
|
#ifdef TIOCSETP
|
|
case TIOCSETP:
|
|
#endif
|
|
case TIOCSETD:
|
|
case TIOCSETN:
|
|
rio_dprintk (RIO_DEBUG_TTY, "wait for non-BUSY, semaphore set\n");
|
|
/*
|
|
** Wait for drain here, at least as far as the double buffer
|
|
** being empty.
|
|
*/
|
|
/* XXX Does the above comment mean that this has
|
|
still to be implemented? -- REW */
|
|
/* XXX Is the locking OK together with locking
|
|
in txenable? (Deadlock?) -- REW */
|
|
|
|
RIOTxEnable((char *)PortP);
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
|
|
old_cflag = tp->tm.c_cflag;
|
|
old_iflag = tp->tm.c_iflag;
|
|
old_oflag = tp->tm.c_oflag;
|
|
oldcook = PortP->CookMode;
|
|
|
|
if ( p->RIOHalted ) {
|
|
RIOClearUp( PortP );
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
pseterr(EIO);
|
|
return 0;
|
|
}
|
|
|
|
PortP->FlushCmdBodge = 0;
|
|
|
|
/*
|
|
** If the port is locked, and it is reconfigured, we want
|
|
** to restore the state of the tty structure so the change is NOT
|
|
** made.
|
|
*/
|
|
if (PortP->Lock) {
|
|
tp->tm.c_iflag = PortP->StoredTty.iflag;
|
|
tp->tm.c_oflag = PortP->StoredTty.oflag;
|
|
tp->tm.c_cflag = PortP->StoredTty.cflag;
|
|
tp->tm.c_lflag = PortP->StoredTty.lflag;
|
|
tp->tm.c_line = PortP->StoredTty.line;
|
|
for (i = 0; i < NCC + 1; i++)
|
|
tp->tm.c_cc[i] = PortP->StoredTty.cc[i];
|
|
}
|
|
else {
|
|
/*
|
|
** If the port is set to store the parameters, and it is
|
|
** reconfigured, we want to save the current tty struct so it
|
|
** may be restored on the next open.
|
|
*/
|
|
if (PortP->Store) {
|
|
PortP->StoredTty.iflag = tp->tm.c_iflag;
|
|
PortP->StoredTty.oflag = tp->tm.c_oflag;
|
|
PortP->StoredTty.cflag = tp->tm.c_cflag;
|
|
PortP->StoredTty.lflag = tp->tm.c_lflag;
|
|
PortP->StoredTty.line = tp->tm.c_line;
|
|
for (i = 0; i < NCC + 1; i++)
|
|
PortP->StoredTty.cc[i] = tp->tm.c_cc[i];
|
|
}
|
|
}
|
|
|
|
changed = (tp->tm.c_cflag != old_cflag) ||
|
|
(tp->tm.c_iflag != old_iflag) ||
|
|
(tp->tm.c_oflag != old_oflag);
|
|
|
|
PortP->CookMode = RIOCookMode(tp); /* Set new cooking mode */
|
|
|
|
rio_dprintk (RIO_DEBUG_TTY, "RIOIoctl changed %d newcook %d oldcook %d\n",
|
|
changed,PortP->CookMode,oldcook);
|
|
|
|
#ifdef MODEM_SUPPORT
|
|
/*
|
|
** kludge to force CARR_ON if CLOCAL set
|
|
*/
|
|
if ((tp->tm.c_cflag & CLOCAL) || (PortP->ModemState & MSVR1_CD)) {
|
|
tp->tm.c_state |= CARR_ON;
|
|
wakeup ((caddr_t)&tp->tm.c_canq);
|
|
}
|
|
#endif
|
|
|
|
if ( p->RIOHalted ) {
|
|
RIOClearUp( PortP );
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
pseterr(EIO);
|
|
return 0;
|
|
}
|
|
/*
|
|
** Re-configure if modes or cooking have changed
|
|
*/
|
|
if (changed || oldcook != PortP->CookMode || (ioctl_processed)) {
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
rio_dprintk (RIO_DEBUG_TTY, "Ioctl changing the PORT settings\n");
|
|
RIOParam(PortP,CONFIG,Modem,OK_TO_SLEEP);
|
|
rio_spin_lock_irqsave(&PortP->portSem, flags);
|
|
}
|
|
|
|
if (p->RIOHalted) {
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
RIOClearUp( PortP );
|
|
pseterr(EIO);
|
|
return 0;
|
|
}
|
|
rio_spin_unlock_irqrestore(&PortP->portSem, flags);
|
|
return 0;
|
|
}
|
|
|
|
/*
|
|
ttyseth -- set hardware dependent tty settings
|
|
*/
|
|
void
|
|
ttyseth(PortP, s, sg)
|
|
struct Port * PortP;
|
|
struct ttystatics * s;
|
|
struct old_sgttyb *sg;
|
|
{
|
|
struct old_sgttyb * tsg;
|
|
struct termios *tp = &s->tm;
|
|
|
|
tsg = &s->sg;
|
|
|
|
if (sg->sg_flags & (EVENP|ODDP)) {
|
|
tp->c_cflag &= PARENB;
|
|
if (sg->sg_flags & EVENP) {
|
|
if (sg->sg_flags & ODDP) {
|
|
tp->c_cflag &= V_CS7;
|
|
tp->c_cflag &= ~PARENB;
|
|
}
|
|
else {
|
|
tp->c_cflag &= V_CS7;
|
|
tp->c_cflag &= PARENB;
|
|
tp->c_cflag &= PARODD;
|
|
}
|
|
}
|
|
else if (sg->sg_flags & ODDP) {
|
|
tp->c_cflag &= V_CS7;
|
|
tp->c_cflag &= PARENB;
|
|
tp->c_cflag &= PARODD;
|
|
}
|
|
else {
|
|
tp->c_cflag &= V_CS7;
|
|
tp->c_cflag &= PARENB;
|
|
}
|
|
}
|
|
/*
|
|
* Use ispeed as the desired speed. Most implementations don't handle
|
|
* separate input and output speeds very well. If the RIO handles this,
|
|
* I will have to use separate sets of flags to store them in the
|
|
* Port structure.
|
|
*/
|
|
if ( !sg->sg_ospeed )
|
|
sg->sg_ospeed = sg->sg_ispeed;
|
|
else
|
|
sg->sg_ispeed = sg->sg_ospeed;
|
|
if (sg->sg_ispeed > V_EXTB )
|
|
sg->sg_ispeed = V_EXTB;
|
|
if (sg->sg_ispeed < V_B0)
|
|
sg->sg_ispeed = V_B0;
|
|
*tsg = *sg;
|
|
tp->c_cflag = (tp->c_cflag & ~V_CBAUD) | conv_bv[(int)sg->sg_ispeed];
|
|
}
|
|
|
|
/*
|
|
ttyseth_pv -- set hardware dependent tty settings using either the
|
|
POSIX termios structure or the System V termio structure.
|
|
sysv = 0 => (POSIX): struct termios *sg
|
|
sysv != 0 => (System V): struct termio *sg
|
|
*/
|
|
static void
|
|
ttyseth_pv(PortP, s, sg, sysv)
|
|
struct Port *PortP;
|
|
struct ttystatics *s;
|
|
struct termios *sg;
|
|
int sysv;
|
|
{
|
|
int speed;
|
|
unsigned char csize;
|
|
unsigned char cread;
|
|
unsigned int lcr_flags;
|
|
int ps;
|
|
|
|
if (sysv) {
|
|
/* sg points to a System V termio structure */
|
|
csize = ((struct termio *)sg)->c_cflag & CSIZE;
|
|
cread = ((struct termio *)sg)->c_cflag & CREAD;
|
|
speed = conv_vb[((struct termio *)sg)->c_cflag & V_CBAUD];
|
|
}
|
|
else {
|
|
/* sg points to a POSIX termios structure */
|
|
csize = sg->c_cflag & CSIZE;
|
|
cread = sg->c_cflag & CREAD;
|
|
speed = conv_vb[sg->c_cflag & V_CBAUD];
|
|
}
|
|
if (s->sg.sg_ispeed != speed || s->sg.sg_ospeed != speed) {
|
|
s->sg.sg_ispeed = speed;
|
|
s->sg.sg_ospeed = speed;
|
|
s->tm.c_cflag = (s->tm.c_cflag & ~V_CBAUD) |
|
|
conv_bv[(int)s->sg.sg_ispeed];
|
|
}
|
|
}
|
|
#endif
|