Home | History | Annotate | Line # | Download | only in dev
      1 /*	$NetBSD: tc5165buf.c,v 1.20 2021/08/07 16:18:54 thorpej Exp $ */
      2 
      3 /*-
      4  * Copyright (c) 1999-2001 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by UCHIYAMA Yasushi.
      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  * Device driver for TOSHIBA TC5165BFTS, PHILIPS 74ALVC16241/245
     34  * buffer chip
     35  */
     36 
     37 #include <sys/cdefs.h>
     38 __KERNEL_RCSID(0, "$NetBSD: tc5165buf.c,v 1.20 2021/08/07 16:18:54 thorpej Exp $");
     39 
     40 #include "opt_use_poll.h"
     41 
     42 #include <sys/param.h>
     43 #include <sys/bus.h>
     44 #include <sys/callout.h>
     45 #include <sys/device.h>
     46 #include <sys/intr.h>
     47 #include <sys/systm.h>
     48 
     49 #include <dev/hpc/hpckbdvar.h>
     50 
     51 #include <mips/cpuregs.h>
     52 
     53 #include <hpcmips/tx/tx39var.h>
     54 #include <hpcmips/tx/txcsbusvar.h>
     55 #include <hpcmips/dev/tc5165bufvar.h>
     56 
     57 #define TC5165_ROW_MAX		16
     58 #define TC5165_COLUMN_MAX	8
     59 
     60 #ifdef TC5165DEBUG
     61 #define	DPRINTF(arg) printf arg
     62 #else
     63 #define	DPRINTF(arg)
     64 #endif
     65 
     66 struct tc5165buf_chip {
     67 	bus_space_tag_t		scc_cst;
     68 	bus_space_handle_t	scc_csh;
     69 	u_int16_t		scc_buf[TC5165_COLUMN_MAX];
     70 	int			scc_enabled;
     71 	int			scc_queued;
     72 	struct callout		scc_soft_ch;
     73 	struct hpckbd_ic_if	scc_if;
     74 	struct hpckbd_if	*scc_hpckbd;
     75 };
     76 
     77 struct tc5165buf_softc {
     78 	struct tc5165buf_chip	*sc_chip;
     79 	tx_chipset_tag_t	sc_tc;
     80 	void			*sc_ih;
     81 };
     82 
     83 int	tc5165buf_match(device_t, cfdata_t, void *);
     84 void	tc5165buf_attach(device_t, device_t, void *);
     85 int	tc5165buf_intr(void *);
     86 int	tc5165buf_poll(void *);
     87 void	tc5165buf_soft(void *);
     88 void	tc5165buf_ifsetup(struct tc5165buf_chip *);
     89 
     90 int	tc5165buf_input_establish(void *, struct hpckbd_if *);
     91 
     92 struct tc5165buf_chip tc5165buf_chip;
     93 
     94 CFATTACH_DECL_NEW(tc5165buf, sizeof(struct tc5165buf_softc),
     95     tc5165buf_match, tc5165buf_attach, NULL, NULL);
     96 
     97 int
     98 tc5165buf_match(device_t parent, cfdata_t cf, void *aux)
     99 {
    100 
    101 	return (1);
    102 }
    103 
    104 void
    105 tc5165buf_attach(device_t parent, device_t self, void *aux)
    106 {
    107 	struct cs_attach_args *ca = aux;
    108 	struct tc5165buf_softc *sc = device_private(self);
    109 	struct hpckbd_attach_args haa;
    110 
    111 	printf(": ");
    112 	sc->sc_tc = ca->ca_tc;
    113 	sc->sc_chip = &tc5165buf_chip;
    114 
    115 	callout_init(&sc->sc_chip->scc_soft_ch, 0);
    116 
    117 	sc->sc_chip->scc_cst = ca->ca_csio.cstag;
    118 
    119 	if (bus_space_map(sc->sc_chip->scc_cst, ca->ca_csio.csbase,
    120 	    ca->ca_csio.cssize, 0, &sc->sc_chip->scc_csh)) {
    121 		printf("can't map i/o space\n");
    122 		return;
    123 	}
    124 
    125 	sc->sc_chip->scc_enabled = 0;
    126 
    127 	if (ca->ca_irq1 != -1) {
    128 		sc->sc_ih = tx_intr_establish(sc->sc_tc, ca->ca_irq1,
    129 		    IST_EDGE, IPL_TTY,
    130 		    tc5165buf_intr, sc);
    131 		printf("interrupt mode");
    132 	} else {
    133 		sc->sc_ih = tx39_poll_establish(sc->sc_tc, 1, IPL_TTY,
    134 		    tc5165buf_intr, sc);
    135 		printf("polling mode");
    136 	}
    137 
    138 	if (!sc->sc_ih) {
    139 		printf(" can't establish interrupt\n");
    140 		return;
    141 	}
    142 
    143 	printf("\n");
    144 
    145 	/* setup upper interface */
    146 	tc5165buf_ifsetup(sc->sc_chip);
    147 
    148 	haa.haa_ic = &sc->sc_chip->scc_if;
    149 
    150 	config_found(self, &haa, hpckbd_print, CFARGS_NONE);
    151 }
    152 
    153 void
    154 tc5165buf_ifsetup(struct tc5165buf_chip *scc)
    155 {
    156 
    157 	scc->scc_if.hii_ctx		= scc;
    158 	scc->scc_if.hii_establish	= tc5165buf_input_establish;
    159 	scc->scc_if.hii_poll		= tc5165buf_poll;
    160 }
    161 
    162 int
    163 tc5165buf_cnattach(paddr_t addr)
    164 {
    165 	struct tc5165buf_chip *scc = &tc5165buf_chip;
    166 
    167 	scc->scc_csh = MIPS_PHYS_TO_KSEG1(addr);
    168 
    169 	tc5165buf_ifsetup(scc);
    170 
    171 	hpckbd_cnattach(&scc->scc_if);
    172 
    173 	return (0);
    174 }
    175 
    176 int
    177 tc5165buf_input_establish(void *ic, struct hpckbd_if *kbdif)
    178 {
    179 	struct tc5165buf_chip *scc = ic;
    180 
    181 	/* save hpckbd interface */
    182 	scc->scc_hpckbd = kbdif;
    183 
    184 	scc->scc_enabled = 1;
    185 
    186 	return (0);
    187 }
    188 
    189 int
    190 tc5165buf_intr(void *arg)
    191 {
    192 	struct tc5165buf_softc *sc = arg;
    193 	struct tc5165buf_chip *scc = sc->sc_chip;
    194 
    195 	if (!scc->scc_enabled || scc->scc_queued)
    196 		return (0);
    197 
    198 	scc->scc_queued = 1;
    199 	callout_reset(&scc->scc_soft_ch, 1, tc5165buf_soft, scc);
    200 
    201 	return (0);
    202 }
    203 
    204 int
    205 tc5165buf_poll(void *arg)
    206 {
    207 	struct tc5165buf_chip *scc = arg;
    208 
    209 	if (!scc->scc_enabled)
    210 		return (POLL_CONT);
    211 
    212 	tc5165buf_soft(arg);
    213 
    214 	return (POLL_CONT);
    215 }
    216 
    217 void
    218 tc5165buf_soft(void *arg)
    219 {
    220 	struct tc5165buf_chip *scc = arg;
    221 	bus_space_tag_t t = scc->scc_cst;
    222 	bus_space_handle_t h = scc->scc_csh;
    223 	u_int16_t mask, rpat, edge;
    224 	int i, j, type, val;
    225 	int s;
    226 
    227 	hpckbd_input_hook(scc->scc_hpckbd);
    228 
    229 	/* clear scanlines */
    230 	(void)bus_space_read_2(t, h, 0);
    231 	delay(3);
    232 
    233 	for (i = 0; i < TC5165_COLUMN_MAX; i++) {
    234 		rpat = bus_space_read_2(t, h, 2 << i);
    235 		delay(3);
    236 		(void)bus_space_read_2(t, h, 0);
    237 		delay(3);
    238 		if ((edge = (rpat ^ scc->scc_buf[i]))) {
    239 			scc->scc_buf[i] = rpat;
    240 			for (j = 0, mask = 1; j < TC5165_ROW_MAX;
    241 			    j++, mask <<= 1) {
    242 				if (mask & edge) {
    243 					type = mask & rpat ? 1 : 0;
    244 					val = j * TC5165_COLUMN_MAX + i;
    245 					DPRINTF(("%d %d\n", j, i));
    246 					hpckbd_input(scc->scc_hpckbd,
    247 					    type, val);
    248 				}
    249 			}
    250 		}
    251 	}
    252 
    253 	s = spltty();
    254 	scc->scc_queued = 0;
    255 	splx(s);
    256 }
    257