1/*	$NetBSD: zs_pcc.c,v 1.20 2008/03/29 19:15:35 tsutsui Exp $	*/
2
3/*-
4 * Copyright (c) 1996 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Gordon W. Ross and Jason R. Thorpe.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 *    notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 *    notice, this list of conditions and the following disclaimer in the
17 *    documentation and/or other materials provided with the distribution.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 * POSSIBILITY OF SUCH DAMAGE.
30 */
31
32/*
33 * Zilog Z8530 Dual UART driver (machine-dependent part)
34 *
35 * Runs two serial lines per chip using slave drivers.
36 * Plain tty/async lines use the zs_async slave.
37 *
38 * Modified for NetBSD/mvme68k by Jason R. Thorpe <thorpej@NetBSD.org>
39 */
40
41#include <sys/cdefs.h>
42__KERNEL_RCSID(0, "$NetBSD: zs_pcc.c,v 1.20 2008/03/29 19:15:35 tsutsui Exp $");
43
44#include <sys/param.h>
45#include <sys/systm.h>
46#include <sys/proc.h>
47#include <sys/device.h>
48#include <sys/conf.h>
49#include <sys/file.h>
50#include <sys/ioctl.h>
51#include <sys/tty.h>
52#include <sys/time.h>
53#include <sys/kernel.h>
54#include <sys/syslog.h>
55
56#include <dev/cons.h>
57#include <dev/ic/z8530reg.h>
58#include <machine/z8530var.h>
59
60#include <machine/cpu.h>
61#include <machine/bus.h>
62
63#include <mvme68k/dev/mainbus.h>
64#include <mvme68k/dev/pccreg.h>
65#include <mvme68k/dev/pccvar.h>
66#include <mvme68k/dev/zsvar.h>
67
68#include "ioconf.h"
69
70/* Definition of the driver for autoconfig. */
71static int	zsc_pcc_match(device_t, cfdata_t, void *);
72static void	zsc_pcc_attach(device_t, device_t, void *);
73
74CFATTACH_DECL_NEW(zsc_pcc, sizeof(struct zsc_softc),
75    zsc_pcc_match, zsc_pcc_attach, NULL, NULL);
76
77cons_decl(zsc_pcc);
78
79
80/*
81 * Is the zs chip present?
82 */
83static int
84zsc_pcc_match(device_t parent, cfdata_t cf, void *aux)
85{
86	struct pcc_attach_args *pa = aux;
87
88	if (strcmp(pa->pa_name, zsc_cd.cd_name))
89		return 0;
90
91	pa->pa_ipl = cf->pcccf_ipl;
92	if (pa->pa_ipl == -1)
93		pa->pa_ipl = ZSHARD_PRI;
94	return 1;
95}
96
97/*
98 * Attach a found zs.
99 *
100 * Match slave number to zs unit number, so that misconfiguration will
101 * not set up the keyboard as ttya, etc.
102 */
103static void
104zsc_pcc_attach(device_t parent, device_t self, void *aux)
105{
106	struct zsc_softc *zsc = device_private(self);
107	struct pcc_attach_args *pa = aux;
108	struct zsdevice zs;
109	bus_space_handle_t bush;
110	int zs_level, ir;
111	static int didintr;
112
113	zsc->zsc_dev = self;
114
115	/* Map the device's registers */
116	bus_space_map(pa->pa_bust, pa->pa_offset, 4, 0, &bush);
117
118	zs_level = pa->pa_ipl;
119
120	/* XXX: This is a gross hack. I need to bus-space zs.c ... */
121	zs.zs_chan_b.zc_csr = (volatile uint8_t *)bush;
122	zs.zs_chan_b.zc_data = (volatile uint8_t *)bush + 1;
123	zs.zs_chan_a.zc_csr = (volatile uint8_t *)bush + 2;
124	zs.zs_chan_a.zc_data = (volatile uint8_t *)bush + 3;
125
126	/*
127	 * Do common parts of SCC configuration.
128	 * Note that the vector is not actually used by the ZS chip on
129	 * MVME-147. We set up the PCC so that it provides the vector.
130	 * This is just here so the real vector is printed at config time.
131	 */
132	zs_config(zsc, &zs, PCC_VECBASE + PCCV_ZS, PCLK_147);
133
134	evcnt_attach_dynamic(&zsc->zsc_evcnt, EVCNT_TYPE_INTR,
135	    pccintr_evcnt(zs_level), "rs232", device_xname(zsc->zsc_dev));
136
137	/*
138	 * Now safe to install interrupt handlers.  Note the arguments
139	 * to the interrupt handlers aren't used.  Note, we only do this
140	 * once since both SCCs interrupt at the same level and vector.
141	 */
142	if (didintr == 0) {
143		didintr = 1;
144		pccintr_establish(PCCV_ZS, zshard_shared, zs_level, zsc, NULL);
145	}
146
147	/* Sanity check the interrupt levels. */
148	ir = pcc_reg_read(sys_pcc, PCCREG_SERIAL_INTR_CTRL);
149	if (((ir & PCC_IMASK) != 0) &&
150	    ((ir & PCC_IMASK) != zs_level))
151		panic("%s: zs configured at different IPLs", __func__);
152
153	/*
154	 * Set master interrupt enable. Vector is supplied by the PCC.
155	 */
156	pcc_reg_write(sys_pcc, PCCREG_SERIAL_INTR_CTRL,
157	    zs_level | PCC_IENABLE | PCC_ZSEXTERN);
158	zs_write_reg(zsc->zsc_cs[0], 2, PCC_VECBASE + PCCV_ZS);
159	zs_write_reg(zsc->zsc_cs[0], 9, zs_init_reg[9]);
160}
161
162/****************************************************************
163 * Console support functions (MVME PCC specific!)
164 ****************************************************************/
165
166/*
167 * Check for SCC console.  The MVME-147 always uses unit 0 chan 0.
168 */
169void
170zsc_pcccnprobe(struct consdev *cp)
171{
172	extern const struct cdevsw zstty_cdevsw;
173
174	if (machineid != MVME_147) {
175		cp->cn_pri = CN_DEAD;
176		return;
177	}
178
179	/* Initialize required fields. */
180	cp->cn_dev = makedev(cdevsw_lookup_major(&zstty_cdevsw), 0);
181	cp->cn_pri = CN_NORMAL;
182}
183
184void
185zsc_pcccninit(struct consdev *cp)
186{
187	bus_space_handle_t bush;
188	struct zsdevice zs;
189
190	bus_space_map(&_mainbus_space_tag,
191	    intiobase_phys + MAINBUS_PCC_OFFSET + PCC_ZS0_OFF, 4, 0, &bush);
192
193	/* XXX: This is a gross hack. I need to bus-space zs.c ... */
194	zs.zs_chan_b.zc_csr = (volatile uint8_t *)bush;
195	zs.zs_chan_b.zc_data = (volatile uint8_t *)bush + 1;
196	zs.zs_chan_a.zc_csr = (volatile uint8_t *)bush + 2;
197	zs.zs_chan_a.zc_data = (volatile uint8_t *)bush + 3;
198
199	/* Do common parts of console init. */
200	zs_cnconfig(0, 0, &zs, PCLK_147);
201}
202