freebsd-nq/sys/dev/cfe/cfe_console.c
2014-05-30 15:46:10 +00:00

227 lines
4.6 KiB
C

/*-
* Copyright (c) 2007 Bruce M. Simpson.
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*/
#include <sys/cdefs.h>
__FBSDID("$FreeBSD$");
#include <sys/param.h>
#include <sys/kdb.h>
#include <sys/kernel.h>
#include <sys/priv.h>
#include <sys/systm.h>
#include <sys/types.h>
#include <sys/conf.h>
#include <sys/cons.h>
#include <sys/consio.h>
#include <sys/tty.h>
#include <dev/cfe/cfe_api.h>
#include <dev/cfe/cfe_error.h>
#include <ddb/ddb.h>
#ifndef CFECONS_POLL_HZ
#define CFECONS_POLL_HZ 4
#endif
#define CFEBURSTLEN 128 /* max number of bytes to write in one chunk */
static tsw_open_t cfe_tty_open;
static tsw_close_t cfe_tty_close;
static tsw_outwakeup_t cfe_tty_outwakeup;
static struct ttydevsw cfe_ttydevsw = {
.tsw_flags = TF_NOPREFIX,
.tsw_open = cfe_tty_open,
.tsw_close = cfe_tty_close,
.tsw_outwakeup = cfe_tty_outwakeup,
};
static int conhandle = -1;
/* XXX does cfe have to poll? */
static int polltime;
static struct callout cfe_timer;
#if defined(KDB)
static int alt_break_state;
#endif
static void cfe_timeout(void *);
static cn_probe_t cfe_cnprobe;
static cn_init_t cfe_cninit;
static cn_term_t cfe_cnterm;
static cn_getc_t cfe_cngetc;
static cn_putc_t cfe_cnputc;
static cn_grab_t cfe_cngrab;
static cn_ungrab_t cfe_cnungrab;
CONSOLE_DRIVER(cfe);
static void
cn_drvinit(void *unused)
{
struct tty *tp;
if (cfe_consdev.cn_pri != CN_DEAD &&
cfe_consdev.cn_name[0] != '\0') {
tp = tty_alloc(&cfe_ttydevsw, NULL);
callout_init_mtx(&cfe_timer, tty_getlock(tp), 0);
tty_makedev(tp, NULL, "cfecons");
}
}
static int
cfe_tty_open(struct tty *tp)
{
polltime = hz / CFECONS_POLL_HZ;
if (polltime < 1)
polltime = 1;
callout_reset(&cfe_timer, polltime, cfe_timeout, tp);
return (0);
}
static void
cfe_tty_close(struct tty *tp)
{
callout_stop(&cfe_timer);
}
static void
cfe_tty_outwakeup(struct tty *tp)
{
int len, written, rc;
u_char buf[CFEBURSTLEN];
for (;;) {
len = ttydisc_getc(tp, buf, sizeof buf);
if (len == 0)
break;
written = 0;
while (written < len) {
rc = cfe_write(conhandle, &buf[written], len - written);
if (rc < 0)
break;
written += rc;
}
}
}
static void
cfe_timeout(void *v)
{
struct tty *tp;
int c;
tp = (struct tty *)v;
tty_lock_assert(tp, MA_OWNED);
while ((c = cfe_cngetc(NULL)) != -1)
ttydisc_rint(tp, c, 0);
ttydisc_rint_done(tp);
callout_reset(&cfe_timer, polltime, cfe_timeout, tp);
}
static void
cfe_cnprobe(struct consdev *cp)
{
conhandle = cfe_getstdhandle(CFE_STDHANDLE_CONSOLE);
if (conhandle < 0) {
cp->cn_pri = CN_DEAD;
return;
}
/* XXX */
if (bootverbose) {
char *bootmsg = "Using CFE firmware console.\n";
int i;
for (i = 0; i < strlen(bootmsg); i++)
cfe_cnputc(cp, bootmsg[i]);
}
cp->cn_pri = CN_LOW;
}
static void
cfe_cninit(struct consdev *cp)
{
strcpy(cp->cn_name, "cfecons");
}
static void
cfe_cnterm(struct consdev *cp)
{
}
static void
cfe_cngrab(struct consdev *cp)
{
}
static void
cfe_cnungrab(struct consdev *cp)
{
}
static int
cfe_cngetc(struct consdev *cp)
{
unsigned char ch;
if (cfe_read(conhandle, &ch, 1) == 1) {
#if defined(KDB)
kdb_alt_break(ch, &alt_break_state);
#endif
return (ch);
}
return (-1);
}
static void
cfe_cnputc(struct consdev *cp, int c)
{
char cbuf;
if (c == '\n')
cfe_cnputc(cp, '\r');
cbuf = c;
while (cfe_write(conhandle, &cbuf, 1) == 0)
continue;
}
SYSINIT(cndev, SI_SUB_CONFIGURE, SI_ORDER_MIDDLE, cn_drvinit, NULL);