cd354f1ae7
After Al Viro (finally) succeeded in removing the sched.h #include in module.h recently, it makes sense again to remove other superfluous sched.h includes. There are quite a lot of files which include it but don't actually need anything defined in there. Presumably these includes were once needed for macros that used to live in sched.h, but moved to other header files in the course of cleaning it up. To ease the pain, this time I did not fiddle with any header files and only removed #includes from .c-files, which tend to cause less trouble. Compile tested against 2.6.20-rc2 and 2.6.20-rc2-mm2 (with offsets) on alpha, arm, i386, ia64, mips, powerpc, and x86_64 with allnoconfig, defconfig, allmodconfig, and allyesconfig as well as a few randconfigs on x86_64 and all configs in arch/arm/configs on arm. I also checked that no new warnings were introduced by the patch (actually, some warnings are removed that were emitted by unnecessarily included header files). Signed-off-by: Tim Schmielau <tim@physik3.uni-rostock.de> Acked-by: Russell King <rmk+kernel@arm.linux.org.uk> Signed-off-by: Andrew Morton <akpm@linux-foundation.org> Signed-off-by: Linus Torvalds <torvalds@linux-foundation.org>
805 lines
21 KiB
C
805 lines
21 KiB
C
/*
|
|
* drivers/s390/char/sclp_tty.c
|
|
* SCLP line mode terminal driver.
|
|
*
|
|
* S390 version
|
|
* Copyright (C) 1999 IBM Deutschland Entwicklung GmbH, IBM Corporation
|
|
* Author(s): Martin Peschke <mpeschke@de.ibm.com>
|
|
* Martin Schwidefsky <schwidefsky@de.ibm.com>
|
|
*/
|
|
|
|
#include <linux/module.h>
|
|
#include <linux/kmod.h>
|
|
#include <linux/tty.h>
|
|
#include <linux/tty_driver.h>
|
|
#include <linux/tty_flip.h>
|
|
#include <linux/wait.h>
|
|
#include <linux/slab.h>
|
|
#include <linux/err.h>
|
|
#include <linux/init.h>
|
|
#include <linux/interrupt.h>
|
|
#include <asm/uaccess.h>
|
|
|
|
#include "ctrlchar.h"
|
|
#include "sclp.h"
|
|
#include "sclp_rw.h"
|
|
#include "sclp_tty.h"
|
|
|
|
#define SCLP_TTY_PRINT_HEADER "sclp tty driver: "
|
|
|
|
/*
|
|
* size of a buffer that collects single characters coming in
|
|
* via sclp_tty_put_char()
|
|
*/
|
|
#define SCLP_TTY_BUF_SIZE 512
|
|
|
|
/*
|
|
* There is exactly one SCLP terminal, so we can keep things simple
|
|
* and allocate all variables statically.
|
|
*/
|
|
|
|
/* Lock to guard over changes to global variables. */
|
|
static spinlock_t sclp_tty_lock;
|
|
/* List of free pages that can be used for console output buffering. */
|
|
static struct list_head sclp_tty_pages;
|
|
/* List of full struct sclp_buffer structures ready for output. */
|
|
static struct list_head sclp_tty_outqueue;
|
|
/* Counter how many buffers are emitted. */
|
|
static int sclp_tty_buffer_count;
|
|
/* Pointer to current console buffer. */
|
|
static struct sclp_buffer *sclp_ttybuf;
|
|
/* Timer for delayed output of console messages. */
|
|
static struct timer_list sclp_tty_timer;
|
|
/* Waitqueue to wait for buffers to get empty. */
|
|
static wait_queue_head_t sclp_tty_waitq;
|
|
|
|
static struct tty_struct *sclp_tty;
|
|
static unsigned char sclp_tty_chars[SCLP_TTY_BUF_SIZE];
|
|
static unsigned short int sclp_tty_chars_count;
|
|
|
|
struct tty_driver *sclp_tty_driver;
|
|
|
|
static struct sclp_ioctls sclp_ioctls;
|
|
static struct sclp_ioctls sclp_ioctls_init =
|
|
{
|
|
8, /* 1 hor. tab. = 8 spaces */
|
|
0, /* no echo of input by this driver */
|
|
80, /* 80 characters/line */
|
|
1, /* write after 1/10 s without final new line */
|
|
MAX_KMEM_PAGES, /* quick fix: avoid __alloc_pages */
|
|
MAX_KMEM_PAGES, /* take 32/64 pages from kernel memory, */
|
|
0, /* do not convert to lower case */
|
|
0x6c /* to seprate upper and lower case */
|
|
/* ('%' in EBCDIC) */
|
|
};
|
|
|
|
/* This routine is called whenever we try to open a SCLP terminal. */
|
|
static int
|
|
sclp_tty_open(struct tty_struct *tty, struct file *filp)
|
|
{
|
|
sclp_tty = tty;
|
|
tty->driver_data = NULL;
|
|
tty->low_latency = 0;
|
|
return 0;
|
|
}
|
|
|
|
/* This routine is called when the SCLP terminal is closed. */
|
|
static void
|
|
sclp_tty_close(struct tty_struct *tty, struct file *filp)
|
|
{
|
|
if (tty->count > 1)
|
|
return;
|
|
sclp_tty = NULL;
|
|
}
|
|
|
|
/* execute commands to control the i/o behaviour of the SCLP tty at runtime */
|
|
static int
|
|
sclp_tty_ioctl(struct tty_struct *tty, struct file * file,
|
|
unsigned int cmd, unsigned long arg)
|
|
{
|
|
unsigned long flags;
|
|
unsigned int obuf;
|
|
int check;
|
|
int rc;
|
|
|
|
if (tty->flags & (1 << TTY_IO_ERROR))
|
|
return -EIO;
|
|
rc = 0;
|
|
check = 0;
|
|
switch (cmd) {
|
|
case TIOCSCLPSHTAB:
|
|
/* set width of horizontal tab */
|
|
if (get_user(sclp_ioctls.htab, (unsigned short __user *) arg))
|
|
rc = -EFAULT;
|
|
else
|
|
check = 1;
|
|
break;
|
|
case TIOCSCLPGHTAB:
|
|
/* get width of horizontal tab */
|
|
if (put_user(sclp_ioctls.htab, (unsigned short __user *) arg))
|
|
rc = -EFAULT;
|
|
break;
|
|
case TIOCSCLPSECHO:
|
|
/* enable/disable echo of input */
|
|
if (get_user(sclp_ioctls.echo, (unsigned char __user *) arg))
|
|
rc = -EFAULT;
|
|
break;
|
|
case TIOCSCLPGECHO:
|
|
/* Is echo of input enabled ? */
|
|
if (put_user(sclp_ioctls.echo, (unsigned char __user *) arg))
|
|
rc = -EFAULT;
|
|
break;
|
|
case TIOCSCLPSCOLS:
|
|
/* set number of columns for output */
|
|
if (get_user(sclp_ioctls.columns, (unsigned short __user *) arg))
|
|
rc = -EFAULT;
|
|
else
|
|
check = 1;
|
|
break;
|
|
case TIOCSCLPGCOLS:
|
|
/* get number of columns for output */
|
|
if (put_user(sclp_ioctls.columns, (unsigned short __user *) arg))
|
|
rc = -EFAULT;
|
|
break;
|
|
case TIOCSCLPSNL:
|
|
/* enable/disable writing without final new line character */
|
|
if (get_user(sclp_ioctls.final_nl, (signed char __user *) arg))
|
|
rc = -EFAULT;
|
|
break;
|
|
case TIOCSCLPGNL:
|
|
/* Is writing without final new line character enabled ? */
|
|
if (put_user(sclp_ioctls.final_nl, (signed char __user *) arg))
|
|
rc = -EFAULT;
|
|
break;
|
|
case TIOCSCLPSOBUF:
|
|
/*
|
|
* set the maximum buffers size for output, will be rounded
|
|
* up to next 4kB boundary and stored as number of SCCBs
|
|
* (4kB Buffers) limitation: 256 x 4kB
|
|
*/
|
|
if (get_user(obuf, (unsigned int __user *) arg) == 0) {
|
|
if (obuf & 0xFFF)
|
|
sclp_ioctls.max_sccb = (obuf >> 12) + 1;
|
|
else
|
|
sclp_ioctls.max_sccb = (obuf >> 12);
|
|
} else
|
|
rc = -EFAULT;
|
|
break;
|
|
case TIOCSCLPGOBUF:
|
|
/* get the maximum buffers size for output */
|
|
obuf = sclp_ioctls.max_sccb << 12;
|
|
if (put_user(obuf, (unsigned int __user *) arg))
|
|
rc = -EFAULT;
|
|
break;
|
|
case TIOCSCLPGKBUF:
|
|
/* get the number of buffers got from kernel at startup */
|
|
if (put_user(sclp_ioctls.kmem_sccb, (unsigned short __user *) arg))
|
|
rc = -EFAULT;
|
|
break;
|
|
case TIOCSCLPSCASE:
|
|
/* enable/disable conversion from upper to lower case */
|
|
if (get_user(sclp_ioctls.tolower, (unsigned char __user *) arg))
|
|
rc = -EFAULT;
|
|
break;
|
|
case TIOCSCLPGCASE:
|
|
/* Is conversion from upper to lower case of input enabled? */
|
|
if (put_user(sclp_ioctls.tolower, (unsigned char __user *) arg))
|
|
rc = -EFAULT;
|
|
break;
|
|
case TIOCSCLPSDELIM:
|
|
/*
|
|
* set special character used for separating upper and
|
|
* lower case, 0x00 disables this feature
|
|
*/
|
|
if (get_user(sclp_ioctls.delim, (unsigned char __user *) arg))
|
|
rc = -EFAULT;
|
|
break;
|
|
case TIOCSCLPGDELIM:
|
|
/*
|
|
* get special character used for separating upper and
|
|
* lower case, 0x00 disables this feature
|
|
*/
|
|
if (put_user(sclp_ioctls.delim, (unsigned char __user *) arg))
|
|
rc = -EFAULT;
|
|
break;
|
|
case TIOCSCLPSINIT:
|
|
/* set initial (default) sclp ioctls */
|
|
sclp_ioctls = sclp_ioctls_init;
|
|
check = 1;
|
|
break;
|
|
default:
|
|
rc = -ENOIOCTLCMD;
|
|
break;
|
|
}
|
|
if (check) {
|
|
spin_lock_irqsave(&sclp_tty_lock, flags);
|
|
if (sclp_ttybuf != NULL) {
|
|
sclp_set_htab(sclp_ttybuf, sclp_ioctls.htab);
|
|
sclp_set_columns(sclp_ttybuf, sclp_ioctls.columns);
|
|
}
|
|
spin_unlock_irqrestore(&sclp_tty_lock, flags);
|
|
}
|
|
return rc;
|
|
}
|
|
|
|
/*
|
|
* This routine returns the numbers of characters the tty driver
|
|
* will accept for queuing to be written. This number is subject
|
|
* to change as output buffers get emptied, or if the output flow
|
|
* control is acted. This is not an exact number because not every
|
|
* character needs the same space in the sccb. The worst case is
|
|
* a string of newlines. Every newlines creates a new mto which
|
|
* needs 8 bytes.
|
|
*/
|
|
static int
|
|
sclp_tty_write_room (struct tty_struct *tty)
|
|
{
|
|
unsigned long flags;
|
|
struct list_head *l;
|
|
int count;
|
|
|
|
spin_lock_irqsave(&sclp_tty_lock, flags);
|
|
count = 0;
|
|
if (sclp_ttybuf != NULL)
|
|
count = sclp_buffer_space(sclp_ttybuf) / sizeof(struct mto);
|
|
list_for_each(l, &sclp_tty_pages)
|
|
count += NR_EMPTY_MTO_PER_SCCB;
|
|
spin_unlock_irqrestore(&sclp_tty_lock, flags);
|
|
return count;
|
|
}
|
|
|
|
static void
|
|
sclp_ttybuf_callback(struct sclp_buffer *buffer, int rc)
|
|
{
|
|
unsigned long flags;
|
|
void *page;
|
|
|
|
do {
|
|
page = sclp_unmake_buffer(buffer);
|
|
spin_lock_irqsave(&sclp_tty_lock, flags);
|
|
/* Remove buffer from outqueue */
|
|
list_del(&buffer->list);
|
|
sclp_tty_buffer_count--;
|
|
list_add_tail((struct list_head *) page, &sclp_tty_pages);
|
|
/* Check if there is a pending buffer on the out queue. */
|
|
buffer = NULL;
|
|
if (!list_empty(&sclp_tty_outqueue))
|
|
buffer = list_entry(sclp_tty_outqueue.next,
|
|
struct sclp_buffer, list);
|
|
spin_unlock_irqrestore(&sclp_tty_lock, flags);
|
|
} while (buffer && sclp_emit_buffer(buffer, sclp_ttybuf_callback));
|
|
wake_up(&sclp_tty_waitq);
|
|
/* check if the tty needs a wake up call */
|
|
if (sclp_tty != NULL) {
|
|
tty_wakeup(sclp_tty);
|
|
}
|
|
}
|
|
|
|
static inline void
|
|
__sclp_ttybuf_emit(struct sclp_buffer *buffer)
|
|
{
|
|
unsigned long flags;
|
|
int count;
|
|
int rc;
|
|
|
|
spin_lock_irqsave(&sclp_tty_lock, flags);
|
|
list_add_tail(&buffer->list, &sclp_tty_outqueue);
|
|
count = sclp_tty_buffer_count++;
|
|
spin_unlock_irqrestore(&sclp_tty_lock, flags);
|
|
if (count)
|
|
return;
|
|
rc = sclp_emit_buffer(buffer, sclp_ttybuf_callback);
|
|
if (rc)
|
|
sclp_ttybuf_callback(buffer, rc);
|
|
}
|
|
|
|
/*
|
|
* When this routine is called from the timer then we flush the
|
|
* temporary write buffer.
|
|
*/
|
|
static void
|
|
sclp_tty_timeout(unsigned long data)
|
|
{
|
|
unsigned long flags;
|
|
struct sclp_buffer *buf;
|
|
|
|
spin_lock_irqsave(&sclp_tty_lock, flags);
|
|
buf = sclp_ttybuf;
|
|
sclp_ttybuf = NULL;
|
|
spin_unlock_irqrestore(&sclp_tty_lock, flags);
|
|
|
|
if (buf != NULL) {
|
|
__sclp_ttybuf_emit(buf);
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Write a string to the sclp tty.
|
|
*/
|
|
static void
|
|
sclp_tty_write_string(const unsigned char *str, int count)
|
|
{
|
|
unsigned long flags;
|
|
void *page;
|
|
int written;
|
|
struct sclp_buffer *buf;
|
|
|
|
if (count <= 0)
|
|
return;
|
|
spin_lock_irqsave(&sclp_tty_lock, flags);
|
|
do {
|
|
/* Create a sclp output buffer if none exists yet */
|
|
if (sclp_ttybuf == NULL) {
|
|
while (list_empty(&sclp_tty_pages)) {
|
|
spin_unlock_irqrestore(&sclp_tty_lock, flags);
|
|
if (in_interrupt())
|
|
sclp_sync_wait();
|
|
else
|
|
wait_event(sclp_tty_waitq,
|
|
!list_empty(&sclp_tty_pages));
|
|
spin_lock_irqsave(&sclp_tty_lock, flags);
|
|
}
|
|
page = sclp_tty_pages.next;
|
|
list_del((struct list_head *) page);
|
|
sclp_ttybuf = sclp_make_buffer(page,
|
|
sclp_ioctls.columns,
|
|
sclp_ioctls.htab);
|
|
}
|
|
/* try to write the string to the current output buffer */
|
|
written = sclp_write(sclp_ttybuf, str, count);
|
|
if (written == count)
|
|
break;
|
|
/*
|
|
* Not all characters could be written to the current
|
|
* output buffer. Emit the buffer, create a new buffer
|
|
* and then output the rest of the string.
|
|
*/
|
|
buf = sclp_ttybuf;
|
|
sclp_ttybuf = NULL;
|
|
spin_unlock_irqrestore(&sclp_tty_lock, flags);
|
|
__sclp_ttybuf_emit(buf);
|
|
spin_lock_irqsave(&sclp_tty_lock, flags);
|
|
str += written;
|
|
count -= written;
|
|
} while (count > 0);
|
|
/* Setup timer to output current console buffer after 1/10 second */
|
|
if (sclp_ioctls.final_nl) {
|
|
if (sclp_ttybuf != NULL &&
|
|
sclp_chars_in_buffer(sclp_ttybuf) != 0 &&
|
|
!timer_pending(&sclp_tty_timer)) {
|
|
init_timer(&sclp_tty_timer);
|
|
sclp_tty_timer.function = sclp_tty_timeout;
|
|
sclp_tty_timer.data = 0UL;
|
|
sclp_tty_timer.expires = jiffies + HZ/10;
|
|
add_timer(&sclp_tty_timer);
|
|
}
|
|
} else {
|
|
if (sclp_ttybuf != NULL &&
|
|
sclp_chars_in_buffer(sclp_ttybuf) != 0) {
|
|
buf = sclp_ttybuf;
|
|
sclp_ttybuf = NULL;
|
|
spin_unlock_irqrestore(&sclp_tty_lock, flags);
|
|
__sclp_ttybuf_emit(buf);
|
|
spin_lock_irqsave(&sclp_tty_lock, flags);
|
|
}
|
|
}
|
|
spin_unlock_irqrestore(&sclp_tty_lock, flags);
|
|
}
|
|
|
|
/*
|
|
* This routine is called by the kernel to write a series of characters to the
|
|
* tty device. The characters may come from user space or kernel space. This
|
|
* routine will return the number of characters actually accepted for writing.
|
|
*/
|
|
static int
|
|
sclp_tty_write(struct tty_struct *tty, const unsigned char *buf, int count)
|
|
{
|
|
if (sclp_tty_chars_count > 0) {
|
|
sclp_tty_write_string(sclp_tty_chars, sclp_tty_chars_count);
|
|
sclp_tty_chars_count = 0;
|
|
}
|
|
sclp_tty_write_string(buf, count);
|
|
return count;
|
|
}
|
|
|
|
/*
|
|
* This routine is called by the kernel to write a single character to the tty
|
|
* device. If the kernel uses this routine, it must call the flush_chars()
|
|
* routine (if defined) when it is done stuffing characters into the driver.
|
|
*
|
|
* Characters provided to sclp_tty_put_char() are buffered by the SCLP driver.
|
|
* If the given character is a '\n' the contents of the SCLP write buffer
|
|
* - including previous characters from sclp_tty_put_char() and strings from
|
|
* sclp_write() without final '\n' - will be written.
|
|
*/
|
|
static void
|
|
sclp_tty_put_char(struct tty_struct *tty, unsigned char ch)
|
|
{
|
|
sclp_tty_chars[sclp_tty_chars_count++] = ch;
|
|
if (ch == '\n' || sclp_tty_chars_count >= SCLP_TTY_BUF_SIZE) {
|
|
sclp_tty_write_string(sclp_tty_chars, sclp_tty_chars_count);
|
|
sclp_tty_chars_count = 0;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* This routine is called by the kernel after it has written a series of
|
|
* characters to the tty device using put_char().
|
|
*/
|
|
static void
|
|
sclp_tty_flush_chars(struct tty_struct *tty)
|
|
{
|
|
if (sclp_tty_chars_count > 0) {
|
|
sclp_tty_write_string(sclp_tty_chars, sclp_tty_chars_count);
|
|
sclp_tty_chars_count = 0;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* This routine returns the number of characters in the write buffer of the
|
|
* SCLP driver. The provided number includes all characters that are stored
|
|
* in the SCCB (will be written next time the SCLP is not busy) as well as
|
|
* characters in the write buffer (will not be written as long as there is a
|
|
* final line feed missing).
|
|
*/
|
|
static int
|
|
sclp_tty_chars_in_buffer(struct tty_struct *tty)
|
|
{
|
|
unsigned long flags;
|
|
struct list_head *l;
|
|
struct sclp_buffer *t;
|
|
int count;
|
|
|
|
spin_lock_irqsave(&sclp_tty_lock, flags);
|
|
count = 0;
|
|
if (sclp_ttybuf != NULL)
|
|
count = sclp_chars_in_buffer(sclp_ttybuf);
|
|
list_for_each(l, &sclp_tty_outqueue) {
|
|
t = list_entry(l, struct sclp_buffer, list);
|
|
count += sclp_chars_in_buffer(t);
|
|
}
|
|
spin_unlock_irqrestore(&sclp_tty_lock, flags);
|
|
return count;
|
|
}
|
|
|
|
/*
|
|
* removes all content from buffers of low level driver
|
|
*/
|
|
static void
|
|
sclp_tty_flush_buffer(struct tty_struct *tty)
|
|
{
|
|
if (sclp_tty_chars_count > 0) {
|
|
sclp_tty_write_string(sclp_tty_chars, sclp_tty_chars_count);
|
|
sclp_tty_chars_count = 0;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* push input to tty
|
|
*/
|
|
static void
|
|
sclp_tty_input(unsigned char* buf, unsigned int count)
|
|
{
|
|
unsigned int cchar;
|
|
|
|
/*
|
|
* If this tty driver is currently closed
|
|
* then throw the received input away.
|
|
*/
|
|
if (sclp_tty == NULL)
|
|
return;
|
|
cchar = ctrlchar_handle(buf, count, sclp_tty);
|
|
switch (cchar & CTRLCHAR_MASK) {
|
|
case CTRLCHAR_SYSRQ:
|
|
break;
|
|
case CTRLCHAR_CTRL:
|
|
tty_insert_flip_char(sclp_tty, cchar, TTY_NORMAL);
|
|
tty_flip_buffer_push(sclp_tty);
|
|
break;
|
|
case CTRLCHAR_NONE:
|
|
/* send (normal) input to line discipline */
|
|
if (count < 2 ||
|
|
(strncmp((const char *) buf + count - 2, "^n", 2) &&
|
|
strncmp((const char *) buf + count - 2, "\252n", 2))) {
|
|
/* add the auto \n */
|
|
tty_insert_flip_string(sclp_tty, buf, count);
|
|
tty_insert_flip_char(sclp_tty, '\n', TTY_NORMAL);
|
|
} else
|
|
tty_insert_flip_string(sclp_tty, buf, count - 2);
|
|
tty_flip_buffer_push(sclp_tty);
|
|
break;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* get a EBCDIC string in upper/lower case,
|
|
* find out characters in lower/upper case separated by a special character,
|
|
* modifiy original string,
|
|
* returns length of resulting string
|
|
*/
|
|
static int
|
|
sclp_switch_cases(unsigned char *buf, int count,
|
|
unsigned char delim, int tolower)
|
|
{
|
|
unsigned char *ip, *op;
|
|
int toggle;
|
|
|
|
/* initially changing case is off */
|
|
toggle = 0;
|
|
ip = op = buf;
|
|
while (count-- > 0) {
|
|
/* compare with special character */
|
|
if (*ip == delim) {
|
|
/* followed by another special character? */
|
|
if (count && ip[1] == delim) {
|
|
/*
|
|
* ... then put a single copy of the special
|
|
* character to the output string
|
|
*/
|
|
*op++ = *ip++;
|
|
count--;
|
|
} else
|
|
/*
|
|
* ... special character follower by a normal
|
|
* character toggles the case change behaviour
|
|
*/
|
|
toggle = ~toggle;
|
|
/* skip special character */
|
|
ip++;
|
|
} else
|
|
/* not the special character */
|
|
if (toggle)
|
|
/* but case switching is on */
|
|
if (tolower)
|
|
/* switch to uppercase */
|
|
*op++ = _ebc_toupper[(int) *ip++];
|
|
else
|
|
/* switch to lowercase */
|
|
*op++ = _ebc_tolower[(int) *ip++];
|
|
else
|
|
/* no case switching, copy the character */
|
|
*op++ = *ip++;
|
|
}
|
|
/* return length of reformatted string. */
|
|
return op - buf;
|
|
}
|
|
|
|
static void
|
|
sclp_get_input(unsigned char *start, unsigned char *end)
|
|
{
|
|
int count;
|
|
|
|
count = end - start;
|
|
/*
|
|
* if set in ioctl convert EBCDIC to lower case
|
|
* (modify original input in SCCB)
|
|
*/
|
|
if (sclp_ioctls.tolower)
|
|
EBC_TOLOWER(start, count);
|
|
|
|
/*
|
|
* if set in ioctl find out characters in lower or upper case
|
|
* (depends on current case) separated by a special character,
|
|
* works on EBCDIC
|
|
*/
|
|
if (sclp_ioctls.delim)
|
|
count = sclp_switch_cases(start, count,
|
|
sclp_ioctls.delim,
|
|
sclp_ioctls.tolower);
|
|
|
|
/* convert EBCDIC to ASCII (modify original input in SCCB) */
|
|
sclp_ebcasc_str(start, count);
|
|
|
|
/* if set in ioctl write operators input to console */
|
|
if (sclp_ioctls.echo)
|
|
sclp_tty_write(sclp_tty, start, count);
|
|
|
|
/* transfer input to high level driver */
|
|
sclp_tty_input(start, count);
|
|
}
|
|
|
|
static inline struct gds_vector *
|
|
find_gds_vector(struct gds_vector *start, struct gds_vector *end, u16 id)
|
|
{
|
|
struct gds_vector *vec;
|
|
|
|
for (vec = start; vec < end; vec = (void *) vec + vec->length)
|
|
if (vec->gds_id == id)
|
|
return vec;
|
|
return NULL;
|
|
}
|
|
|
|
static inline struct gds_subvector *
|
|
find_gds_subvector(struct gds_subvector *start,
|
|
struct gds_subvector *end, u8 key)
|
|
{
|
|
struct gds_subvector *subvec;
|
|
|
|
for (subvec = start; subvec < end;
|
|
subvec = (void *) subvec + subvec->length)
|
|
if (subvec->key == key)
|
|
return subvec;
|
|
return NULL;
|
|
}
|
|
|
|
static inline void
|
|
sclp_eval_selfdeftextmsg(struct gds_subvector *start,
|
|
struct gds_subvector *end)
|
|
{
|
|
struct gds_subvector *subvec;
|
|
|
|
subvec = start;
|
|
while (subvec < end) {
|
|
subvec = find_gds_subvector(subvec, end, 0x30);
|
|
if (!subvec)
|
|
break;
|
|
sclp_get_input((unsigned char *)(subvec + 1),
|
|
(unsigned char *) subvec + subvec->length);
|
|
subvec = (void *) subvec + subvec->length;
|
|
}
|
|
}
|
|
|
|
static inline void
|
|
sclp_eval_textcmd(struct gds_subvector *start,
|
|
struct gds_subvector *end)
|
|
{
|
|
struct gds_subvector *subvec;
|
|
|
|
subvec = start;
|
|
while (subvec < end) {
|
|
subvec = find_gds_subvector(subvec, end,
|
|
GDS_KEY_SelfDefTextMsg);
|
|
if (!subvec)
|
|
break;
|
|
sclp_eval_selfdeftextmsg((struct gds_subvector *)(subvec + 1),
|
|
(void *)subvec + subvec->length);
|
|
subvec = (void *) subvec + subvec->length;
|
|
}
|
|
}
|
|
|
|
static inline void
|
|
sclp_eval_cpmsu(struct gds_vector *start, struct gds_vector *end)
|
|
{
|
|
struct gds_vector *vec;
|
|
|
|
vec = start;
|
|
while (vec < end) {
|
|
vec = find_gds_vector(vec, end, GDS_ID_TextCmd);
|
|
if (!vec)
|
|
break;
|
|
sclp_eval_textcmd((struct gds_subvector *)(vec + 1),
|
|
(void *) vec + vec->length);
|
|
vec = (void *) vec + vec->length;
|
|
}
|
|
}
|
|
|
|
|
|
static inline void
|
|
sclp_eval_mdsmu(struct gds_vector *start, void *end)
|
|
{
|
|
struct gds_vector *vec;
|
|
|
|
vec = find_gds_vector(start, end, GDS_ID_CPMSU);
|
|
if (vec)
|
|
sclp_eval_cpmsu(vec + 1, (void *) vec + vec->length);
|
|
}
|
|
|
|
static void
|
|
sclp_tty_receiver(struct evbuf_header *evbuf)
|
|
{
|
|
struct gds_vector *start, *end, *vec;
|
|
|
|
start = (struct gds_vector *)(evbuf + 1);
|
|
end = (void *) evbuf + evbuf->length;
|
|
vec = find_gds_vector(start, end, GDS_ID_MDSMU);
|
|
if (vec)
|
|
sclp_eval_mdsmu(vec + 1, (void *) vec + vec->length);
|
|
}
|
|
|
|
static void
|
|
sclp_tty_state_change(struct sclp_register *reg)
|
|
{
|
|
}
|
|
|
|
static struct sclp_register sclp_input_event =
|
|
{
|
|
.receive_mask = EvTyp_OpCmd_Mask | EvTyp_PMsgCmd_Mask,
|
|
.state_change_fn = sclp_tty_state_change,
|
|
.receiver_fn = sclp_tty_receiver
|
|
};
|
|
|
|
static const struct tty_operations sclp_ops = {
|
|
.open = sclp_tty_open,
|
|
.close = sclp_tty_close,
|
|
.write = sclp_tty_write,
|
|
.put_char = sclp_tty_put_char,
|
|
.flush_chars = sclp_tty_flush_chars,
|
|
.write_room = sclp_tty_write_room,
|
|
.chars_in_buffer = sclp_tty_chars_in_buffer,
|
|
.flush_buffer = sclp_tty_flush_buffer,
|
|
.ioctl = sclp_tty_ioctl,
|
|
};
|
|
|
|
static int __init
|
|
sclp_tty_init(void)
|
|
{
|
|
struct tty_driver *driver;
|
|
void *page;
|
|
int i;
|
|
int rc;
|
|
|
|
if (!CONSOLE_IS_SCLP)
|
|
return 0;
|
|
driver = alloc_tty_driver(1);
|
|
if (!driver)
|
|
return -ENOMEM;
|
|
|
|
rc = sclp_rw_init();
|
|
if (rc) {
|
|
printk(KERN_ERR SCLP_TTY_PRINT_HEADER
|
|
"could not register tty - "
|
|
"sclp_rw_init returned %d\n", rc);
|
|
put_tty_driver(driver);
|
|
return rc;
|
|
}
|
|
/* Allocate pages for output buffering */
|
|
INIT_LIST_HEAD(&sclp_tty_pages);
|
|
for (i = 0; i < MAX_KMEM_PAGES; i++) {
|
|
page = (void *) get_zeroed_page(GFP_KERNEL | GFP_DMA);
|
|
if (page == NULL) {
|
|
put_tty_driver(driver);
|
|
return -ENOMEM;
|
|
}
|
|
list_add_tail((struct list_head *) page, &sclp_tty_pages);
|
|
}
|
|
INIT_LIST_HEAD(&sclp_tty_outqueue);
|
|
spin_lock_init(&sclp_tty_lock);
|
|
init_waitqueue_head(&sclp_tty_waitq);
|
|
init_timer(&sclp_tty_timer);
|
|
sclp_ttybuf = NULL;
|
|
sclp_tty_buffer_count = 0;
|
|
if (MACHINE_IS_VM) {
|
|
/*
|
|
* save 4 characters for the CPU number
|
|
* written at start of each line by VM/CP
|
|
*/
|
|
sclp_ioctls_init.columns = 76;
|
|
/* case input lines to lowercase */
|
|
sclp_ioctls_init.tolower = 1;
|
|
}
|
|
sclp_ioctls = sclp_ioctls_init;
|
|
sclp_tty_chars_count = 0;
|
|
sclp_tty = NULL;
|
|
|
|
rc = sclp_register(&sclp_input_event);
|
|
if (rc) {
|
|
put_tty_driver(driver);
|
|
return rc;
|
|
}
|
|
|
|
driver->owner = THIS_MODULE;
|
|
driver->driver_name = "sclp_line";
|
|
driver->name = "sclp_line";
|
|
driver->major = TTY_MAJOR;
|
|
driver->minor_start = 64;
|
|
driver->type = TTY_DRIVER_TYPE_SYSTEM;
|
|
driver->subtype = SYSTEM_TYPE_TTY;
|
|
driver->init_termios = tty_std_termios;
|
|
driver->init_termios.c_iflag = IGNBRK | IGNPAR;
|
|
driver->init_termios.c_oflag = ONLCR | XTABS;
|
|
driver->init_termios.c_lflag = ISIG | ECHO;
|
|
driver->flags = TTY_DRIVER_REAL_RAW;
|
|
tty_set_operations(driver, &sclp_ops);
|
|
rc = tty_register_driver(driver);
|
|
if (rc) {
|
|
printk(KERN_ERR SCLP_TTY_PRINT_HEADER
|
|
"could not register tty - "
|
|
"tty_register_driver returned %d\n", rc);
|
|
put_tty_driver(driver);
|
|
return rc;
|
|
}
|
|
sclp_tty_driver = driver;
|
|
return 0;
|
|
}
|
|
module_init(sclp_tty_init);
|