Home | History | Annotate | Line # | Download | only in tx
tx39io.c revision 1.9.2.3
      1 /*	$NetBSD: tx39io.c,v 1.9.2.3 2002/10/10 18:32:59 jdolecek 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  * 3. All advertising materials mentioning features or use of this software
     19  *    must display the following acknowledgement:
     20  *        This product includes software developed by the NetBSD
     21  *        Foundation, Inc. and its contributors.
     22  * 4. Neither the name of The NetBSD Foundation nor the names of its
     23  *    contributors may be used to endorse or promote products derived
     24  *    from this software without specific prior written permission.
     25  *
     26  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     27  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     28  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     29  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     30  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     31  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     32  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     33  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     34  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     35  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     36  * POSSIBILITY OF SUCH DAMAGE.
     37  */
     38 
     39 #include <sys/param.h>
     40 #include <sys/systm.h>
     41 #include <sys/device.h>
     42 
     43 #include <machine/bus.h>
     44 
     45 #include <hpcmips/tx/tx39var.h>
     46 #include <hpcmips/tx/tx39icureg.h>
     47 #define __TX39IO_PRIVATE
     48 #include <hpcmips/tx/tx39iovar.h>
     49 #include <hpcmips/tx/tx39ioreg.h>
     50 
     51 #ifdef	TX39IO_DEBUG
     52 #define DPRINTF_ENABLE
     53 #define DPRINTF_DEBUG	tx39io_debug
     54 #endif
     55 #include <machine/debug.h>
     56 
     57 #define ISSET(x, s)	((x) & (1 << (s)))
     58 
     59 int	tx39io_match(struct device *, struct cfdata *, void *);
     60 void	tx39io_attach(struct device *, struct device *, void *);
     61 
     62 CFATTACH_DECL(tx39io, sizeof(struct tx39io_softc),
     63     tx39io_match, tx39io_attach, NULL, NULL);
     64 
     65 /* IO/MFIO common */
     66 static void port_intr_disestablish(hpcio_chip_t, hpcio_intr_handle_t);
     67 static void port_intr_clear(hpcio_chip_t, hpcio_intr_handle_t);
     68 /* MFIO */
     69 static void *mfio_intr_establish(hpcio_chip_t, int, int, int (*)(void *),
     70     void *);
     71 static int mfio_in(hpcio_chip_t, int);
     72 static void mfio_out(hpcio_chip_t, int, int);
     73 static int mfio_intr_map(int *, int, int);
     74 static void mfio_dump(hpcio_chip_t);
     75 static void mfio_update(hpcio_chip_t);
     76 /* IO */
     77 static void *io_intr_establish(hpcio_chip_t, int, int, int (*)(void *),
     78     void *);
     79 #ifdef TX391X
     80 static int tx391x_io_in(hpcio_chip_t, int);
     81 static void tx391x_io_out(hpcio_chip_t, int, int);
     82 static void tx391x_io_update(hpcio_chip_t);
     83 static int tx391x_io_intr_map(int *, int, int);
     84 #endif
     85 #ifdef TX392X
     86 static int tx392x_io_in(hpcio_chip_t, int);
     87 static void tx392x_io_out(hpcio_chip_t, int, int);
     88 static void tx392x_io_update(hpcio_chip_t);
     89 static int tx392x_io_intr_map(int *, int, int);
     90 #endif
     91 #if defined TX391X && defined TX392X
     92 #define tx39_io_intr_map(t, s, p, m)					\
     93 	(IS_TX391X(t)
     94 	    ? tx391x_io_intr_map(s, p, m) : tx392x_io_intr_map(s, p, m))
     95 #elif defined TX391X
     96 #define tx39io_intr_map(t, s, p, m)	tx391x_io_intr_map(s, p, m)
     97 #elif defined TX392X
     98 #define tx39io_intr_map(t, s, p, m)	tx392x_io_intr_map(s, p, m)
     99 #endif
    100 static void io_dump(hpcio_chip_t);
    101 
    102 static void __print_port_status(struct tx39io_port_status *, int);
    103 
    104 int
    105 tx39io_match(struct device *parent, struct cfdata *cf, void *aux)
    106 {
    107 	return (ATTACH_FIRST); /* 1st attach group of txsim */
    108 }
    109 
    110 void
    111 tx39io_attach(struct device *parent, struct device *self, void *aux)
    112 {
    113 	struct txsim_attach_args *ta = aux;
    114 	struct tx39io_softc *sc = (void *)self;
    115 	tx_chipset_tag_t tc;
    116 	struct hpcio_chip *io_hc = &sc->sc_io_ops;
    117 	struct hpcio_chip *mfio_hc = &sc->sc_mfio_ops;
    118 
    119 	tc = sc->sc_tc = ta->ta_tc;
    120 
    121 	printf("\n");
    122 	sc->sc_stat_io_mask = ~(1 << 5); /* exclude Plum2 INT */
    123 	sc->sc_stat_mfio_mask = ~(0x3|(0x3 << 23));
    124 
    125 	/* IO */
    126 	io_hc->hc_chipid		= IO;
    127 	io_hc->hc_name			= "IO";
    128 	io_hc->hc_sc			= sc;
    129 	io_hc->hc_intr_establish	= io_intr_establish;
    130 	io_hc->hc_intr_disestablish	= port_intr_disestablish;
    131 	io_hc->hc_intr_clear		= port_intr_clear;
    132 	io_hc->hc_dump			= io_dump;
    133 	if (IS_TX391X(tc)) {
    134 #ifdef TX391X
    135 		io_hc->hc_portread	= tx391x_io_in;
    136 		io_hc->hc_portwrite	= tx391x_io_out;
    137 		io_hc->hc_update	= tx391x_io_update;
    138 #endif
    139 	} else if (IS_TX392X(tc)) {
    140 #ifdef TX392X
    141 		io_hc->hc_portread	= tx392x_io_in;
    142 		io_hc->hc_portwrite	= tx392x_io_out;
    143 		io_hc->hc_update	= tx392x_io_update;
    144 #endif
    145 	}
    146 	tx_conf_register_ioman(tc, io_hc);
    147 
    148 	/* MFIO */
    149 	mfio_hc->hc_chipid		= MFIO;
    150 	mfio_hc->hc_name		= "MFIO";
    151 	mfio_hc->hc_sc			= sc;
    152 	mfio_hc->hc_portread		= mfio_in;
    153 	mfio_hc->hc_portwrite		= mfio_out;
    154 	mfio_hc->hc_intr_establish	= mfio_intr_establish;
    155 	mfio_hc->hc_intr_disestablish	= port_intr_disestablish;
    156 	mfio_hc->hc_update		= mfio_update;
    157 	mfio_hc->hc_dump		= mfio_dump;
    158 
    159 	tx_conf_register_ioman(tc, mfio_hc);
    160 
    161 	hpcio_update(io_hc);
    162 	hpcio_update(mfio_hc);
    163 
    164 #ifdef TX39IO_DEBUG
    165 	hpcio_dump(io_hc);
    166 	hpcio_dump(mfio_hc);
    167 	printf("IO i0x%08x o0x%08x MFIO i0x%08x o0x%08x\n",
    168 	       sc->sc_stat_io.in, sc->sc_stat_io.out,
    169 	       sc->sc_stat_mfio.in, sc->sc_stat_mfio.out);
    170 #endif /* TX39IO_DEBUG */
    171 }
    172 
    173 /*
    174  * TX391X, TX392X common
    175  */
    176 static void *
    177 io_intr_establish(hpcio_chip_t arg, int port, int mode, int (*func)(void *),
    178     void *func_arg)
    179 {
    180 	struct tx39io_softc *sc = arg->hc_sc;
    181 	int src;
    182 
    183 	if (tx39io_intr_map(sc->sc_tc, &src, port, mode) != 0)
    184 		return (0);
    185 
    186 	return (tx_intr_establish(sc->sc_tc, src, IST_EDGE, IPL_CLOCK, func,
    187 	    func_arg));
    188 }
    189 
    190 static void *
    191 mfio_intr_establish(hpcio_chip_t arg, int port, int mode, int (*func)(void *),
    192     void *func_arg)
    193 {
    194 	struct tx39io_softc *sc = arg->hc_sc;
    195 	int src;
    196 
    197 	if (mfio_intr_map(&src, port, mode) != 0)
    198 		return (0);
    199 
    200 	return (tx_intr_establish(sc->sc_tc, src, IST_EDGE, IPL_CLOCK, func,
    201 	    func_arg));
    202 }
    203 
    204 static void
    205 port_intr_disestablish(hpcio_chip_t arg, void *ih)
    206 {
    207 	struct tx39io_softc *sc = arg->hc_sc;
    208 	tx_intr_disestablish(sc->sc_tc, ih);
    209 }
    210 
    211 static void
    212 port_intr_clear(hpcio_chip_t arg, void *ih)
    213 {
    214 }
    215 
    216 static void
    217 mfio_out(hpcio_chip_t arg, int port, int onoff)
    218 {
    219 	struct tx39io_softc *sc = arg->hc_sc;
    220 	tx_chipset_tag_t tc;
    221 	txreg_t reg, pos;
    222 
    223 	DPRINTF("port #%d\n", port);
    224 	tc = sc->sc_tc;
    225 	/* MFIO */
    226 	pos = 1 << port;
    227 #ifdef DIAGNOSTIC
    228 	if (!(sc->sc_stat_mfio.dir & pos)) {
    229 		panic("%s: MFIO%d is not output port.",
    230 		      sc->sc_dev.dv_xname, port);
    231 	}
    232 #endif
    233 	reg = tx_conf_read(tc, TX39_IOMFIODATAOUT_REG);
    234 	if (onoff)
    235 		reg |= pos;
    236 	else
    237 		reg &= ~pos;
    238 	tx_conf_write(tc, TX39_IOMFIODATAOUT_REG, reg);
    239 }
    240 
    241 static int
    242 mfio_in(hpcio_chip_t arg, int port)
    243 {
    244 	struct tx39io_softc *sc __attribute__((__unused__)) = arg->hc_sc ;
    245 
    246 	DPRINTF("port #%d\n", port);
    247 	return (tx_conf_read(sc->sc_tc, TX39_IOMFIODATAIN_REG) & (1 << port));
    248 }
    249 
    250 static int
    251 mfio_intr_map(int *src, int port, int mode)
    252 {
    253 
    254 	if (mode & HPCIO_INTR_POSEDGE) {
    255 		*src = MAKEINTR(3, (1 << port));
    256 		return (0);
    257 	} else if (mode & HPCIO_INTR_NEGEDGE) {
    258 		*src = MAKEINTR(4, (1 << port));
    259 		return (0);
    260 	}
    261 
    262 	DPRINTF("invalid interrupt mode.\n");
    263 
    264 	return (1);
    265 }
    266 
    267 static void
    268 mfio_update(hpcio_chip_t arg)
    269 {
    270 	struct tx39io_softc *sc = arg->hc_sc;
    271 	tx_chipset_tag_t tc = sc->sc_tc;
    272 	struct tx39io_port_status *stat_mfio = &sc->sc_stat_mfio;
    273 
    274 	sc->sc_ostat_mfio = *stat_mfio; /* save old status */
    275 	stat_mfio->dir		= tx_conf_read(tc, TX39_IOMFIODATADIR_REG);
    276 	stat_mfio->in		= tx_conf_read(tc, TX39_IOMFIODATAIN_REG);
    277 	stat_mfio->out		= tx_conf_read(tc, TX39_IOMFIODATAOUT_REG);
    278 	stat_mfio->power	= tx_conf_read(tc, TX39_IOMFIOPOWERDWN_REG);
    279 	stat_mfio->u.select	= tx_conf_read(tc, TX39_IOMFIODATASEL_REG);
    280 }
    281 
    282 #ifdef TX391X
    283 /*
    284  * TMPR3912 specific
    285  */
    286 int
    287 tx391x_io_in(hpcio_chip_t arg, int port)
    288 {
    289 	struct tx39io_softc *sc __attribute__((__unused__)) = arg->hc_sc;
    290 	txreg_t reg = tx_conf_read(sc->sc_tc, TX39_IOCTRL_REG);
    291 
    292 	DPRINTF("port #%d\n", port);
    293 	return  (TX391X_IOCTRL_IODIN(reg) & (1 << port));
    294 }
    295 
    296 void
    297 tx391x_io_out(hpcio_chip_t arg, int port, int onoff)
    298 {
    299 	struct tx39io_softc *sc = arg->hc_sc;
    300 	tx_chipset_tag_t tc;
    301 	txreg_t reg, pos, iostat;
    302 
    303 	KASSERT(sc);
    304 	DPRINTF("port #%d\n", port);
    305 
    306 	tc = sc->sc_tc;
    307 
    308 	/* IO [0:6] */
    309 	pos = 1 << port;
    310 #ifdef DIAGNOSTIC
    311 	if (!(sc->sc_stat_io.dir & pos))
    312 		panic("%s: IO%d is not output port.", sc->sc_dev.dv_xname,
    313 		      port);
    314 #endif
    315 	reg = tx_conf_read(tc, TX39_IOCTRL_REG);
    316 	iostat = TX391X_IOCTRL_IODOUT(reg);
    317 	if (onoff)
    318 		iostat |= pos;
    319 	else
    320 		iostat &= ~pos;
    321 	TX391X_IOCTRL_IODOUT_CLR(reg);
    322 	reg = TX391X_IOCTRL_IODOUT_SET(reg, iostat);
    323 	tx_conf_write(tc, TX39_IOCTRL_REG, reg);
    324 }
    325 
    326 void
    327 tx391x_io_update(hpcio_chip_t arg)
    328 {
    329 	struct tx39io_softc *sc = arg->hc_sc;
    330 	struct tx39io_port_status *stat_io = &sc->sc_stat_io;
    331 	tx_chipset_tag_t tc = sc->sc_tc;
    332 	txreg_t reg;
    333 
    334 	/* IO [0:6] */
    335 	sc->sc_ostat_io = *stat_io; /* save old status */
    336 	reg = tx_conf_read(tc, TX39_IOCTRL_REG);
    337 	stat_io->dir		= TX391X_IOCTRL_IODIREC(reg);
    338 	stat_io->in		= TX391X_IOCTRL_IODIN(reg);
    339 	stat_io->out		= TX391X_IOCTRL_IODOUT(reg);
    340 	stat_io->u.debounce	= TX391X_IOCTRL_IODEBSEL(reg);
    341 	reg = tx_conf_read(tc, TX39_IOIOPOWERDWN_REG);
    342 	stat_io->power = TX391X_IOIOPOWERDWN_IOPD(reg);
    343 }
    344 
    345 int
    346 tx391x_io_intr_map(int *src, int port, int mode)
    347 {
    348 
    349 	if (mode & HPCIO_INTR_POSEDGE) {
    350 		*src = MAKEINTR(5, (1 << (port + 7)));
    351 		return (0);
    352 	} else if (mode & HPCIO_INTR_NEGEDGE) {
    353 		*src = MAKEINTR(5, (1 << port));
    354 		return (0);
    355 	}
    356 
    357 	DPRINTF("invalid interrupt mode.\n");
    358 
    359 	return (1);
    360 }
    361 #endif /* TX391X */
    362 
    363 #ifdef TX392X
    364 /*
    365  * TMPR3922 specific
    366  */
    367 int
    368 tx392x_io_in(hpcio_chip_t arg, int port)
    369 {
    370 	struct tx39io_softc *sc __attribute__((__unused__)) = arg->hc_sc;
    371 	txreg_t reg = tx_conf_read(sc->sc_tc, TX392X_IODATAINOUT_REG);
    372 
    373 	DPRINTF("port #%d\n", port);
    374 
    375 	return (TX392X_IODATAINOUT_DIN(reg) & (1 << port));
    376 }
    377 
    378 void
    379 tx392x_io_out(hpcio_chip_t arg, int port, int onoff)
    380 {
    381 	struct tx39io_softc *sc = arg->hc_sc;
    382 #ifdef DIAGNOSTIC
    383 	const char *devname =  sc->sc_dev.dv_xname;
    384 #endif
    385 	tx_chipset_tag_t tc = sc->sc_tc;
    386 	txreg_t reg, pos, iostat;
    387 
    388 	DPRINTF("port #%d\n", port);
    389 	/* IO [0:15] */
    390 	pos = 1 << port;
    391 #ifdef DIAGNOSTIC
    392 	if (!(sc->sc_stat_io.dir & pos))
    393 		panic("%s: IO%d is not output port.", devname, port);
    394 #endif
    395 	reg = tx_conf_read(tc, TX392X_IODATAINOUT_REG);
    396 	iostat = TX392X_IODATAINOUT_DOUT(reg);
    397 	if (onoff)
    398 		iostat |= pos;
    399 	else
    400 		iostat &= ~pos;
    401 	TX392X_IODATAINOUT_DOUT_CLR(reg);
    402 	reg = TX392X_IODATAINOUT_DOUT_SET(reg, iostat);
    403 	tx_conf_write(tc, TX392X_IODATAINOUT_REG, reg);
    404 }
    405 
    406 int
    407 tx392x_io_intr_map(int *src, int port, int mode)
    408 {
    409 
    410 	if (mode & HPCIO_INTR_POSEDGE) {
    411 		*src = MAKEINTR(8, (1 << (port + 16)));
    412 		return (0);
    413 	} else if (mode & HPCIO_INTR_NEGEDGE) {
    414 		*src = MAKEINTR(8, (1 << port));
    415 		return (0);
    416 	}
    417 
    418 	DPRINTF("invalid interrupt mode.\n");
    419 
    420 	return (1);
    421 }
    422 
    423 void
    424 tx392x_io_update(hpcio_chip_t arg)
    425 {
    426 	struct tx39io_softc *sc = arg->hc_sc;
    427 	struct tx39io_port_status *stat_io = &sc->sc_stat_io;
    428 	tx_chipset_tag_t tc = sc->sc_tc;
    429 	txreg_t reg;
    430 
    431 	sc->sc_ostat_io = *stat_io; /* save old status */
    432 	/* IO [0:15] */
    433 	reg = tx_conf_read(tc, TX39_IOCTRL_REG);
    434 	stat_io->dir		= TX392X_IOCTRL_IODIREC(reg);
    435 	stat_io->u.debounce	= TX392X_IOCTRL_IODEBSEL(reg);
    436 	reg = tx_conf_read(tc, TX392X_IODATAINOUT_REG);
    437 	stat_io->in		= TX392X_IODATAINOUT_DIN(reg);
    438 	stat_io->out		= TX392X_IODATAINOUT_DOUT(reg);
    439 	reg = tx_conf_read(tc, TX39_IOIOPOWERDWN_REG);
    440 	stat_io->power = TX392X_IOIOPOWERDWN_IOPD(reg);
    441 }
    442 
    443 #endif /* TX392X */
    444 
    445 static const char *line = "--------------------------------------------------"
    446 "------------\n";
    447 static void
    448 mfio_dump(hpcio_chip_t arg)
    449 {
    450 	struct tx39io_softc *sc = arg->hc_sc;
    451 	const struct tx39io_mfio_map *map = tx39io_get_mfio_map(tc);
    452 	struct tx39io_port_status *stat;
    453 	int i;
    454 
    455 	printf("%s", line);
    456 	stat = &sc->sc_stat_mfio;
    457 	for (i = TX39_IO_MFIO_MAX - 1; i >= 0 ; i--) {
    458 		/* MFIO port has power down state */
    459 		printf("MFIO %2d:     -       ", i);
    460 		__print_port_status(stat, i);
    461 		printf(ISSET(stat->u.select, i) ? "  MFIO(%s)\n" : "  %s\n",
    462 		       map[i].std_pin_name);
    463 	}
    464 	printf("%s", line);
    465 }
    466 
    467 static void
    468 io_dump(hpcio_chip_t arg)
    469 {
    470 	struct tx39io_softc *sc = arg->hc_sc;
    471 	struct tx39io_port_status *stat;
    472 	int i;
    473 
    474 	printf("%s	 Debounce Direction DataOut DataIn PowerDown Select"
    475 	       "\n%s", line, line);
    476 	stat = &sc->sc_stat_io;
    477 	for (i = tx39io_get_io_max(tc) - 1; i >= 0 ; i--) {
    478 		/* IO port has debouncer */
    479 		printf("IO   %2d:    %s      ", i,
    480 		       ISSET(stat->u.debounce, i) ? "On " : "Off");
    481 		__print_port_status(stat, i);
    482 		printf("    -\n");
    483 	}
    484 }
    485 
    486 static void
    487 __print_port_status(struct tx39io_port_status *stat, int i)
    488 {
    489 	printf("%s       %d       %d     %s",
    490 	       ISSET(stat->dir, i) ? "Out" : "In ",
    491 	       ISSET(stat->out, i) ? 1 : 0,
    492 	       ISSET(stat->in, i) ? 1 : 0,
    493 	       ISSET(stat->power, i) ? "Down  ": "Active");
    494 }
    495