/*      $NetBSD: cons.c,v 1.10 2011/02/08 20:20:11 rmind Exp $  */

/*
* Copyright (c) 1988 University of Utah.
* Copyright (c) 1990, 1993
*      The Regents of the University of California.  All rights reserved.
*
* This code is derived from software contributed to Berkeley by
* the Systems Programming Group of the University of Utah Computer
* Science Department.
*
* 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.
* 3. Neither the name of the University nor the names of its contributors
*    may be used to endorse or promote products derived from this software
*    without specific prior written permission.
*
* THIS SOFTWARE IS PROVIDED BY THE REGENTS 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 REGENTS 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.
*
* from: Utah Hdr: cons.c 1.7 92/02/28
*
*      @(#)cons.c      8.1 (Berkeley) 6/10/93
*/

#include <lib/libsa/stand.h>

#include <machine/cpu.h>

#include "boot.h"
#include "cons.h"

#ifdef CONS_SERIAL
void comcnprobe(struct consdev *);
void comcninit(struct consdev *);
void comcnputchar(void *, int);
int comcngetchar(void *);
int comcnscan(void *);
# include "ns16550.h"
# ifndef COMPORT
#  define COMPORT COM1
# endif
# ifndef COMSPEED
#  define COMSPEED 9600
# endif
#endif

#ifdef CONS_ZS
void zscnprobe(struct consdev *);
void zscninit(struct consdev *);
void zscnputchar(void *, int);
int zscngetchar(void *);
int zscnscan(void *);
#include "zs.h"
#ifndef ZSCHAN
#define ZSCHAN ZS_CHAN_A
#endif
#ifndef ZSSPEED
#define ZSSPEED 115200
#endif
#endif

struct consdev constab[] = {
#ifdef CONS_SERIAL
       { "com", COMPORT, COMSPEED,
           comcnprobe, comcninit, comcngetchar, comcnputchar, comcnscan },
#endif
#ifdef CONS_ZS
       { "zs", ZSCHAN, ZSSPEED,
           zscnprobe, zscninit, zscngetchar, zscnputchar, zscnscan },
#endif
       { 0 }
};

struct consdev *cn_tab;

char *
cninit(int *addr, int *speed)
{
       register struct consdev *cp;

       cn_tab = NULL;
       for (cp = constab; cp->cn_probe; cp++) {
               (*cp->cn_probe)(cp);
               if (cp->cn_pri > CN_DEAD &&
                   (cn_tab == NULL || cp->cn_pri > cn_tab->cn_pri))
                       cn_tab = cp;
       }
       if (cn_tab) {
               (*cn_tab->cn_init)(cn_tab);
               *addr = cn_tab->address;
               *speed = cn_tab->speed;
               return cn_tab->cn_name;
       }

       return NULL;
}

int
cngetc(void)
{

       if (cn_tab)
               return (*cn_tab->cn_getc)(cn_tab->cn_dev);
       return 0;
}

void
cnputc(int c)
{

       if (cn_tab)
               (*cn_tab->cn_putc)(cn_tab->cn_dev, c);
}

int
cnscan(void)
{

       if (cn_tab)
               return (*cn_tab->cn_scan)(cn_tab->cn_dev);
       return -1;
}

#ifdef CONS_SERIAL
/*
* serial console
*/
void
comcnprobe(struct consdev *cp)
{

       if (*((uint32_t *)COMPROBE) != 0 &&
           cobalt_id != COBALT_ID_QUBE2700)
               cp->cn_pri = CN_REMOTE;
}

void
comcninit(struct consdev *cp)
{

       cp->cn_dev = com_init(cp->address, cp->speed);
}

int
comcngetchar(void *dev)
{

       return com_getc(dev);
}

void
comcnputchar(void *dev, int c)
{

       if (c == '\n')
               com_putc(dev, '\r');
       com_putc(dev, c);
}

int
comcnscan(void *dev)
{

       return com_scankbd(dev);
}
#endif /* CONS_SERIAL */

#ifdef CONS_ZS
/*
* optional z85c30 serial console on Qube2700
*/
void
zscnprobe(struct consdev *cp)
{

       if (*((uint32_t *)ZSPROBE) != 0 &&
           cobalt_id == COBALT_ID_QUBE2700)
               cp->cn_pri = CN_REMOTE;
}

void
zscninit(struct consdev *cp)
{

       cp->cn_dev = zs_init(cp->address, cp->speed);
}

int
zscngetchar(void *dev)
{

       return zs_getc(dev);
}

void
zscnputchar(void *dev, int c)
{

       if (c == '\n')
               zs_putc(dev, '\r');
       zs_putc(dev, c);
}

int
zscnscan(void *dev)
{

       return zs_scan(dev);
}
#endif  /* CONS_ZS */