/*	$NetBSD: com_vrip.c,v 1.1.1.1 1999/09/16 12:23:31 takemura Exp $	*/

/*-
 * Copyright (c) 1999 SASAKI Takesi. All rights reserved.
 * Copyright (c) 1999 PocketBSD Project. 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.
 * 3. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *	This product includes software developed by the PocketBSD project
 *	and its contributors.
 * 4. Neither the name of the project 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.
 *
 */

#include <sys/param.h>
#include <sys/systm.h>
#include <sys/ioctl.h>
#include <sys/termios.h>
#include <sys/select.h>
#include <sys/tty.h>
#include <sys/proc.h>
#include <sys/user.h>
#include <sys/conf.h>
#include <sys/file.h>
#include <sys/uio.h>
#include <sys/kernel.h>
#include <sys/syslog.h>
#include <sys/types.h>
#include <sys/device.h>
#include <sys/reboot.h>

#include <machine/intr.h>
#include <machine/bus.h>
/* For serial console */
#include <machine/platid.h>
#include <machine/platid_mask.h>

#include <hpcmips/vr/vr.h>
#include <hpcmips/vr/vripvar.h>
#include <hpcmips/vr/cmureg.h>
#include <hpcmips/vr/siureg.h>

#include <dev/ic/comvar.h>
#include <dev/ic/comreg.h>

#include <hpcmips/vr/com_vripvar.h>

#include "locators.h"

#ifdef COMVRIPDEBUG
int	com_vrip_debug = 0;
#define	DPRINTF(arg) if (com_vrip_debug) printf arg;
#else
#define	DPRINTF(arg)
#endif

struct com_vrip_softc {
	struct com_softc	sc_com;
};

static int com_vrip_probe __P((struct device *, struct cfdata *, void *));
static void com_vrip_attach __P((struct device *, struct device *, void *));
static int com_vrip_common_probe __P((bus_space_tag_t iot, int iobase));
int find_comenableport_from_cfdata __P((int *));

void vrcmu_init __P((void));
void vrcmu_supply __P((int));
void vrcmu_mask __P((int));

struct cfattach com_vrip_ca = {
	sizeof(struct com_vrip_softc), com_vrip_probe, com_vrip_attach
};

/* For serial console */
extern struct cfdata cfdata[];
int
find_comenableport_from_cfdata(int *port)
{
	platid_mask_t mask;
	struct cfdata *cf;
	printf ("COM enable port: ");
	for (cf = cfdata; cf->cf_driver; cf++) {
		if (strcmp(cf->cf_driver->cd_name, "gpbus"))
			continue;
		mask = PLATID_DEREF(cf->cf_loc[GPBUSIFCF_PLATFORM]);
		if (platid_match(&platid, &mask))
			goto found;
	}
	*port = -1;
	printf ("not found\n");
	return 1;
 found:
	*port = cf->cf_loc[GPBUSIFCF_COMCTRL];
	printf ("#%d\n", *port);

	return *port == GPBUSIFCF_COMCTRL_DEFAULT;
}

int
com_vrip_cnattach(iot, iobase, rate, frequency, cflag)
	bus_space_tag_t iot;
	int iobase;
	int rate, frequency;
	tcflag_t cflag;
{
	int port;
	/* Platform dependent setting */
	__vrcmu_supply(CMUMSKSSIU | CMUMSKSIU, 1);
	if (find_comenableport_from_cfdata(&port) == 0)
		__vrgiu_out(port, 1);	

	if (!com_vrip_common_probe(iot, iobase))
		return (EIO);	/* I can't find appropriate error number. */
	return (comcnattach(iot, iobase, rate, frequency, cflag));
}

static int
com_vrip_common_probe(iot, iobase)
	bus_space_tag_t iot;
	int iobase;
{
	bus_space_handle_t ioh;
	int rv;

	if (bus_space_map(iot, iobase, 1, 0, &ioh)) {
		printf(": can't map i/o space\n");
		return 0;
	}
	rv = comprobe1(iot, ioh);
	bus_space_unmap(iot, ioh, 1);
	return (rv);
}

static int
com_vrip_probe(parent, cf, aux)
	struct device *parent;
	struct cfdata *cf;
	void *aux;
{
	struct vrip_attach_args *va = aux;
	bus_space_tag_t iot = va->va_iot;
	int rv;
	
	DPRINTF(("==com_vrip_probe"));

	if (va->va_addr == VRIPCF_ADDR_DEFAULT ||
	    va->va_intr == VRIPCF_INTR_DEFAULT) {
		printf(": need addr and intr.\n");
		return (0);
	}

	if (!va->va_cf || !va->va_cf->cf_clock)
		return 0; /* not yet CMU attached. Try again later. */

	va->va_cf->cf_clock(va->va_cc, CMUMSKSSIU | CMUMSKSIU, 1);

	if (com_is_console(iot, va->va_addr, 0)) {
		/*
		 *  We have alredy probed.
		 */
		rv = 1;
	} else {
		rv = com_vrip_common_probe(iot, va->va_addr);
	}

	DPRINTF((rv ? ": found COM ports\n" : ": can't probe COM device\n"));

	if (rv) {
		va->va_size = COM_NPORTS;
	}
	return (rv);
}


static void
com_vrip_attach(parent, self, aux)
	struct device *parent, *self;
	void *aux;
{
	struct com_vrip_softc *vsc = (void *) self;
	struct com_softc *sc = &vsc->sc_com;
	struct vrip_attach_args *va = aux;

	bus_space_tag_t iot = va->va_iot;
	bus_space_handle_t ioh;

	DPRINTF(("==com_vrip_attach"));

	if (bus_space_map(iot, va->va_addr, 1, 0, &ioh)) {
		printf(": can't map bus space\n");
		return;
	}
	sc->sc_iobase = va->va_addr;
	sc->sc_iot = iot;
	sc->sc_ioh = ioh;

	sc->enable = NULL; /* XXX: CMU control */
	sc->disable = NULL;

	sc->sc_frequency = VRCOM_FREQ;
	/* Power management */
	va->va_cf->cf_clock(va->va_cc, CMUMSKSSIU | CMUMSKSIU, 1);
	va->va_gf->gf_portwrite_8(va->va_gc, GIUPORT_COM, 1);

	DPRINTF(("Try to attach com.\n"));
	com_attach_subr(sc);

	DPRINTF(("Establish intr"));
	vrip_intr_establish(va->va_vc, va->va_intr, IPL_TTY, comintr, self);

	DPRINTF((":return()"));
}