[mirror_ubuntu-hirsute-kernel.git] / arch / parisc / kernel / pdc_cons.c

// SPDX-License-Identifier: GPL-2.0-or-later
/* 
 *    PDC Console support - ie use firmware to dump text via boot console
 *
 *    Copyright (C) 1999-2003 Matthew Wilcox <willy at parisc-linux.org>
 *    Copyright (C) 2000 Martin K Petersen <mkp at mkp.net>
 *    Copyright (C) 2000 John Marvin <jsm at parisc-linux.org>
 *    Copyright (C) 2000-2003 Paul Bame <bame at parisc-linux.org>
 *    Copyright (C) 2000 Philipp Rumpf <prumpf with tux.org>
 *    Copyright (C) 2000 Michael Ang <mang with subcarrier.org>
 *    Copyright (C) 2000 Grant Grundler <grundler with parisc-linux.org>
 *    Copyright (C) 2001-2002 Ryan Bradetich <rbrad at parisc-linux.org>
 *    Copyright (C) 2001 Helge Deller <deller at parisc-linux.org>
 *    Copyright (C) 2001 Thomas Bogendoerfer <tsbogend at parisc-linux.org>
 *    Copyright (C) 2002 Randolph Chung <tausq with parisc-linux.org>
 *    Copyright (C) 2010 Guy Martin <gmsoft at tuxicoman.be>
 */

/*
 *  The PDC console is a simple console, which can be used for debugging 
 *  boot related problems on HP PA-RISC machines. It is also useful when no
 *  other console works.
 *
 *  This code uses the ROM (=PDC) based functions to read and write characters
 *  from and to PDC's boot path.
 */

/* Define EARLY_BOOTUP_DEBUG to debug kernel related boot problems. 
 * On production kernels EARLY_BOOTUP_DEBUG should be undefined. */
#define EARLY_BOOTUP_DEBUG


#include <linux/kernel.h>
#include <linux/console.h>
#include <linux/string.h>
#include <linux/init.h>
#include <linux/major.h>
#include <linux/tty.h>
#include <asm/page.h>		/* for PAGE0 */
#include <asm/pdc.h>		/* for iodc_call() proto and friends */

static DEFINE_SPINLOCK(pdc_console_lock);
static struct console pdc_cons;

static void pdc_console_write(struct console *co, const char *s, unsigned count)
{
	int i = 0;
	unsigned long flags;

	spin_lock_irqsave(&pdc_console_lock, flags);
	do {
		i += pdc_iodc_print(s + i, count - i);
	} while (i < count);
	spin_unlock_irqrestore(&pdc_console_lock, flags);
}

int pdc_console_poll_key(struct console *co)
{
	int c;
	unsigned long flags;

	spin_lock_irqsave(&pdc_console_lock, flags);
	c = pdc_iodc_getc();
	spin_unlock_irqrestore(&pdc_console_lock, flags);

	return c;
}

static int pdc_console_setup(struct console *co, char *options)
{
	return 0;
}

#if defined(CONFIG_PDC_CONSOLE)
#include <linux/vt_kern.h>
#include <linux/tty_flip.h>

#define PDC_CONS_POLL_DELAY (30 * HZ / 1000)

static void pdc_console_poll(struct timer_list *unused);
static DEFINE_TIMER(pdc_console_timer, pdc_console_poll);
static struct tty_port tty_port;

static int pdc_console_tty_open(struct tty_struct *tty, struct file *filp)
{
	tty_port_tty_set(&tty_port, tty);
	mod_timer(&pdc_console_timer, jiffies + PDC_CONS_POLL_DELAY);

	return 0;
}

static void pdc_console_tty_close(struct tty_struct *tty, struct file *filp)
{
	if (tty->count == 1) {
		del_timer_sync(&pdc_console_timer);
		tty_port_tty_set(&tty_port, NULL);
	}
}

static int pdc_console_tty_write(struct tty_struct *tty, const unsigned char *buf, int count)
{
	pdc_console_write(NULL, buf, count);
	return count;
}

static int pdc_console_tty_write_room(struct tty_struct *tty)
{
	return 32768; /* no limit, no buffer used */
}

static int pdc_console_tty_chars_in_buffer(struct tty_struct *tty)
{
	return 0; /* no buffer */
}

static const struct tty_operations pdc_console_tty_ops = {
	.open = pdc_console_tty_open,
	.close = pdc_console_tty_close,
	.write = pdc_console_tty_write,
	.write_room = pdc_console_tty_write_room,
	.chars_in_buffer = pdc_console_tty_chars_in_buffer,
};

static void pdc_console_poll(struct timer_list *unused)
{
	int data, count = 0;

	while (1) {
		data = pdc_console_poll_key(NULL);
		if (data == -1)
			break;
		tty_insert_flip_char(&tty_port, data & 0xFF, TTY_NORMAL);
		count ++;
	}

	if (count)
		tty_flip_buffer_push(&tty_port);

	if (pdc_cons.flags & CON_ENABLED)
		mod_timer(&pdc_console_timer, jiffies + PDC_CONS_POLL_DELAY);
}

static struct tty_driver *pdc_console_tty_driver;

static int __init pdc_console_tty_driver_init(void)
{
	int err;

	/* Check if the console driver is still registered.
	 * It is unregistered if the pdc console was not selected as the
	 * primary console. */

	struct console *tmp;

	console_lock();
	for_each_console(tmp)
		if (tmp == &pdc_cons)
			break;
	console_unlock();

	if (!tmp) {
		printk(KERN_INFO "PDC console driver not registered anymore, not creating %s\n", pdc_cons.name);
		return -ENODEV;
	}

	printk(KERN_INFO "The PDC console driver is still registered, removing CON_BOOT flag\n");
	pdc_cons.flags &= ~CON_BOOT;

	pdc_console_tty_driver = alloc_tty_driver(1);

	if (!pdc_console_tty_driver)
		return -ENOMEM;

	tty_port_init(&tty_port);

	pdc_console_tty_driver->driver_name = "pdc_cons";
	pdc_console_tty_driver->name = "ttyB";
	pdc_console_tty_driver->major = MUX_MAJOR;
	pdc_console_tty_driver->minor_start = 0;
	pdc_console_tty_driver->type = TTY_DRIVER_TYPE_SYSTEM;
	pdc_console_tty_driver->init_termios = tty_std_termios;
	pdc_console_tty_driver->flags = TTY_DRIVER_REAL_RAW |
		TTY_DRIVER_RESET_TERMIOS;
	tty_set_operations(pdc_console_tty_driver, &pdc_console_tty_ops);
	tty_port_link_device(&tty_port, pdc_console_tty_driver, 0);

	err = tty_register_driver(pdc_console_tty_driver);
	if (err) {
		printk(KERN_ERR "Unable to register the PDC console TTY driver\n");
		tty_port_destroy(&tty_port);
		return err;
	}

	return 0;
}
device_initcall(pdc_console_tty_driver_init);

static struct tty_driver * pdc_console_device (struct console *c, int *index)
{
	*index = c->index;
	return pdc_console_tty_driver;
}
#else
#define pdc_console_device NULL
#endif

static struct console pdc_cons = {
	.name =		"ttyB",
	.write =	pdc_console_write,
	.device =	pdc_console_device,
	.setup =	pdc_console_setup,
	.flags =	CON_BOOT | CON_PRINTBUFFER,
	.index =	-1,
};

static int pdc_console_initialized;

static void pdc_console_init_force(void)
{
	if (pdc_console_initialized)
		return;
	++pdc_console_initialized;
	
	/* If the console is duplex then copy the COUT parameters to CIN. */
	if (PAGE0->mem_cons.cl_class == CL_DUPLEX)
		memcpy(&PAGE0->mem_kbd, &PAGE0->mem_cons, sizeof(PAGE0->mem_cons));

	/* register the pdc console */
	register_console(&pdc_cons);
}

void __init pdc_console_init(void)
{
#if defined(EARLY_BOOTUP_DEBUG) || defined(CONFIG_PDC_CONSOLE)
	pdc_console_init_force();
#endif
#ifdef EARLY_BOOTUP_DEBUG
	printk(KERN_INFO "Initialized PDC Console for debugging.\n");
#endif
}


/*
 * Used for emergencies. Currently only used if an HPMC occurs. If an
 * HPMC occurs, it is possible that the current console may not be
 * properly initialised after the PDC IO reset. This routine unregisters
 * all of the current consoles, reinitializes the pdc console and
 * registers it.
 */

void pdc_console_restart(void)
{
	struct console *console;

	if (pdc_console_initialized)
		return;

	/* If we've already seen the output, don't bother to print it again */
	if (console_drivers != NULL)
		pdc_cons.flags &= ~CON_PRINTBUFFER;

	while ((console = console_drivers) != NULL)
		unregister_console(console_drivers);

	/* force registering the pdc console */
	pdc_console_init_force();
}
Commit	Line	Data
1a59d1b8	1	// SPDX-License-Identifier: GPL-2.0-or-later
1da177e4 LT	2	/*
	3	* PDC Console support - ie use firmware to dump text via boot console
	4	*
	5	* Copyright (C) 1999-2003 Matthew Wilcox <willy at parisc-linux.org>
	6	* Copyright (C) 2000 Martin K Petersen <mkp at mkp.net>
	7	* Copyright (C) 2000 John Marvin <jsm at parisc-linux.org>
	8	* Copyright (C) 2000-2003 Paul Bame <bame at parisc-linux.org>
	9	* Copyright (C) 2000 Philipp Rumpf <prumpf with tux.org>
	10	* Copyright (C) 2000 Michael Ang <mang with subcarrier.org>
	11	* Copyright (C) 2000 Grant Grundler <grundler with parisc-linux.org>
	12	* Copyright (C) 2001-2002 Ryan Bradetich <rbrad at parisc-linux.org>
	13	* Copyright (C) 2001 Helge Deller <deller at parisc-linux.org>
	14	* Copyright (C) 2001 Thomas Bogendoerfer <tsbogend at parisc-linux.org>
	15	* Copyright (C) 2002 Randolph Chung <tausq with parisc-linux.org>
650a35f8	16	* Copyright (C) 2010 Guy Martin <gmsoft at tuxicoman.be>
1da177e4 LT	17	*/
	18
	19	/*
	20	* The PDC console is a simple console, which can be used for debugging
650a35f8 GM	21	* boot related problems on HP PA-RISC machines. It is also useful when no
650a35f8 GM	22	* other console works.
1da177e4 LT	23	*
	24	* This code uses the ROM (=PDC) based functions to read and write characters
	25	* from and to PDC's boot path.
1da177e4 LT	26	*/
	27
	28	/* Define EARLY_BOOTUP_DEBUG to debug kernel related boot problems.
	29	* On production kernels EARLY_BOOTUP_DEBUG should be undefined. */
7c92e972	30	#define EARLY_BOOTUP_DEBUG
1da177e4 LT	31
1da177e4 LT	32
1da177e4 LT	33	#include <linux/kernel.h>
	34	#include <linux/console.h>
	35	#include <linux/string.h>
	36	#include <linux/init.h>
1da177e4 LT	37	#include <linux/major.h>
1da177e4 LT	38	#include <linux/tty.h>
4a8a0788	39	#include <asm/page.h> /* for PAGE0 */
1da177e4 LT	40	#include <asm/pdc.h> /* for iodc_call() proto and friends */
1da177e4 LT	41
aefa8b6b	42	static DEFINE_SPINLOCK(pdc_console_lock);
650a35f8	43	static struct console pdc_cons;
1da177e4 LT	44
	45	static void pdc_console_write(struct console co, const char s, unsigned count)
	46	{
ef1afd4d KM	47	int i = 0;
	48	unsigned long flags;
	49
	50	spin_lock_irqsave(&pdc_console_lock, flags);
	51	do {
	52	i += pdc_iodc_print(s + i, count - i);
	53	} while (i < count);
	54	spin_unlock_irqrestore(&pdc_console_lock, flags);
1da177e4 LT	55	}
1da177e4 LT	56
1da177e4 LT	57	int pdc_console_poll_key(struct console *co)
1da177e4 LT	58	{
ef1afd4d KM	59	int c;
	60	unsigned long flags;
	61
	62	spin_lock_irqsave(&pdc_console_lock, flags);
	63	c = pdc_iodc_getc();
	64	spin_unlock_irqrestore(&pdc_console_lock, flags);
	65
	66	return c;
1da177e4 LT	67	}
	68
	69	static int pdc_console_setup(struct console co, char options)
	70	{
	71	return 0;
	72	}
	73
	74	#if defined(CONFIG_PDC_CONSOLE)
a8f340e3	75	#include <linux/vt_kern.h>
650a35f8 GM	76	#include <linux/tty_flip.h>
	77
	78	#define PDC_CONS_POLL_DELAY (30 * HZ / 1000)
	79
24ed960a	80	static void pdc_console_poll(struct timer_list *unused);
1d27e3e2	81	static DEFINE_TIMER(pdc_console_timer, pdc_console_poll);
5dd5bc40	82	static struct tty_port tty_port;
650a35f8	83
650a35f8 GM	84	static int pdc_console_tty_open(struct tty_struct tty, struct file filp)
650a35f8 GM	85	{
5dd5bc40	86	tty_port_tty_set(&tty_port, tty);
650a35f8 GM	87	mod_timer(&pdc_console_timer, jiffies + PDC_CONS_POLL_DELAY);
	88
	89	return 0;
	90	}
	91
	92	static void pdc_console_tty_close(struct tty_struct tty, struct file filp)
	93	{
49a5f3cf	94	if (tty->count == 1) {
e380a81e	95	del_timer_sync(&pdc_console_timer);
5dd5bc40 JS	96	tty_port_tty_set(&tty_port, NULL);
5dd5bc40 JS	97	}
650a35f8 GM	98	}
	99
	100	static int pdc_console_tty_write(struct tty_struct tty, const unsigned char buf, int count)
	101	{
	102	pdc_console_write(NULL, buf, count);
	103	return count;
	104	}
	105
	106	static int pdc_console_tty_write_room(struct tty_struct *tty)
	107	{
	108	return 32768; /* no limit, no buffer used */
	109	}
	110
	111	static int pdc_console_tty_chars_in_buffer(struct tty_struct *tty)
	112	{
	113	return 0; /* no buffer */
	114	}
	115
650a35f8 GM	116	static const struct tty_operations pdc_console_tty_ops = {
	117	.open = pdc_console_tty_open,
	118	.close = pdc_console_tty_close,
	119	.write = pdc_console_tty_write,
	120	.write_room = pdc_console_tty_write_room,
	121	.chars_in_buffer = pdc_console_tty_chars_in_buffer,
	122	};
	123
24ed960a	124	static void pdc_console_poll(struct timer_list *unused)
650a35f8	125	{
650a35f8	126	int data, count = 0;
650a35f8 GM	127
	128	while (1) {
	129	data = pdc_console_poll_key(NULL);
	130	if (data == -1)
	131	break;
92a19f9c	132	tty_insert_flip_char(&tty_port, data & 0xFF, TTY_NORMAL);
650a35f8 GM	133	count ++;
	134	}
	135
	136	if (count)
2e124b4a	137	tty_flip_buffer_push(&tty_port);
5dd5bc40	138
e380a81e	139	if (pdc_cons.flags & CON_ENABLED)
650a35f8 GM	140	mod_timer(&pdc_console_timer, jiffies + PDC_CONS_POLL_DELAY);
	141	}
	142
5dd5bc40 JS	143	static struct tty_driver *pdc_console_tty_driver;
5dd5bc40 JS	144
650a35f8 GM	145	static int __init pdc_console_tty_driver_init(void)
650a35f8 GM	146	{
650a35f8	147	int err;
650a35f8 GM	148
	149	/* Check if the console driver is still registered.
	150	* It is unregistered if the pdc console was not selected as the
	151	* primary console. */
	152
597c606f	153	struct console *tmp;
650a35f8	154
ac751efa	155	console_lock();
597c606f	156	for_each_console(tmp)
650a35f8 GM	157	if (tmp == &pdc_cons)
650a35f8 GM	158	break;
ac751efa	159	console_unlock();
650a35f8 GM	160
	161	if (!tmp) {
	162	printk(KERN_INFO "PDC console driver not registered anymore, not creating %s\n", pdc_cons.name);
	163	return -ENODEV;
	164	}
	165
	166	printk(KERN_INFO "The PDC console driver is still registered, removing CON_BOOT flag\n");
	167	pdc_cons.flags &= ~CON_BOOT;
	168
0b479d54	169	pdc_console_tty_driver = alloc_tty_driver(1);
650a35f8	170
0b479d54	171	if (!pdc_console_tty_driver)
650a35f8 GM	172	return -ENOMEM;
650a35f8 GM	173
191c5f10 JS	174	tty_port_init(&tty_port);
191c5f10 JS	175
0b479d54 JS	176	pdc_console_tty_driver->driver_name = "pdc_cons";
	177	pdc_console_tty_driver->name = "ttyB";
	178	pdc_console_tty_driver->major = MUX_MAJOR;
	179	pdc_console_tty_driver->minor_start = 0;
	180	pdc_console_tty_driver->type = TTY_DRIVER_TYPE_SYSTEM;
	181	pdc_console_tty_driver->init_termios = tty_std_termios;
	182	pdc_console_tty_driver->flags = TTY_DRIVER_REAL_RAW \|
	183	TTY_DRIVER_RESET_TERMIOS;
	184	tty_set_operations(pdc_console_tty_driver, &pdc_console_tty_ops);
b19e2ca7	185	tty_port_link_device(&tty_port, pdc_console_tty_driver, 0);
0b479d54 JS	186
0b479d54 JS	187	err = tty_register_driver(pdc_console_tty_driver);
650a35f8 GM	188	if (err) {
650a35f8 GM	189	printk(KERN_ERR "Unable to register the PDC console TTY driver\n");
191c5f10	190	tty_port_destroy(&tty_port);
650a35f8 GM	191	return err;
	192	}
	193
650a35f8 GM	194	return 0;
650a35f8 GM	195	}
aed6850a	196	device_initcall(pdc_console_tty_driver_init);
a8f340e3	197
1da177e4 LT	198	static struct tty_driver * pdc_console_device (struct console c, int index)
1da177e4 LT	199	{
650a35f8 GM	200	*index = c->index;
650a35f8 GM	201	return pdc_console_tty_driver;
1da177e4 LT	202	}
1da177e4 LT	203	#else
7c92e972	204	#define pdc_console_device NULL
1da177e4 LT	205	#endif
	206
	207	static struct console pdc_cons = {
	208	.name = "ttyB",
	209	.write = pdc_console_write,
7c92e972	210	.device = pdc_console_device,
1da177e4	211	.setup = pdc_console_setup,
650a35f8	212	.flags = CON_BOOT \| CON_PRINTBUFFER,
1da177e4 LT	213	.index = -1,
	214	};
	215
	216	static int pdc_console_initialized;
1da177e4 LT	217
	218	static void pdc_console_init_force(void)
	219	{
	220	if (pdc_console_initialized)
	221	return;
	222	++pdc_console_initialized;
	223
	224	/* If the console is duplex then copy the COUT parameters to CIN. */
	225	if (PAGE0->mem_cons.cl_class == CL_DUPLEX)
	226	memcpy(&PAGE0->mem_kbd, &PAGE0->mem_cons, sizeof(PAGE0->mem_cons));
	227
	228	/* register the pdc console */
	229	register_console(&pdc_cons);
	230	}
	231
	232	void __init pdc_console_init(void)
	233	{
	234	#if defined(EARLY_BOOTUP_DEBUG) \|\| defined(CONFIG_PDC_CONSOLE)
	235	pdc_console_init_force();
	236	#endif
	237	#ifdef EARLY_BOOTUP_DEBUG
	238	printk(KERN_INFO "Initialized PDC Console for debugging.\n");
	239	#endif
	240	}
	241
	242
1da177e4 LT	243	/*
	244	* Used for emergencies. Currently only used if an HPMC occurs. If an
	245	* HPMC occurs, it is possible that the current console may not be
7c92e972 MW	246	* properly initialised after the PDC IO reset. This routine unregisters
7c92e972 MW	247	* all of the current consoles, reinitializes the pdc console and
1da177e4 LT	248	* registers it.
	249	*/
	250
	251	void pdc_console_restart(void)
	252	{
	253	struct console *console;
	254
	255	if (pdc_console_initialized)
	256	return;
	257
7c92e972 MW	258	/* If we've already seen the output, don't bother to print it again */
	259	if (console_drivers != NULL)
	260	pdc_cons.flags &= ~CON_PRINTBUFFER;
	261
1da177e4 LT	262	while ((console = console_drivers) != NULL)
	263	unregister_console(console_drivers);
	264
1da177e4 LT	265	/* force registering the pdc console */
	266	pdc_console_init_force();
	267	}