Home | History | Annotate | Line # | Download | only in pci
coram.c revision 1.17
      1 /* $NetBSD: coram.c,v 1.17 2019/12/22 23:23:32 thorpej Exp $ */
      2 
      3 /*
      4  * Copyright (c) 2008, 2011 Jonathan A. Kollasch
      5  * All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  *
     16  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
     17  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     18  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     19  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE COPYRIGHT HOLDER OR
     20  * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
     21  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
     22  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
     23  * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
     24  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
     25  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
     26  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     27  */
     28 
     29 #include <sys/cdefs.h>
     30 __KERNEL_RCSID(0, "$NetBSD: coram.c,v 1.17 2019/12/22 23:23:32 thorpej Exp $");
     31 
     32 #include <sys/param.h>
     33 #include <sys/systm.h>
     34 #include <sys/device.h>
     35 #include <sys/kmem.h>
     36 #include <sys/mutex.h>
     37 #include <sys/module.h>
     38 #include <sys/bus.h>
     39 
     40 #include <dev/dtv/dtvif.h>
     41 
     42 #include <dev/pci/cx23885reg.h>
     43 #include <dev/pci/coramvar.h>
     44 
     45 #include <dev/pci/pcivar.h>
     46 #include <dev/pci/pcireg.h>
     47 #include <dev/pci/pcidevs.h>
     48 #include <dev/i2c/i2cvar.h>
     49 #include <dev/i2c/at24cxxvar.h>
     50 
     51 #include <dev/i2c/cx24227var.h>
     52 #include <dev/i2c/mt2131var.h>
     53 
     54 /* #define CORAM_DEBUG */
     55 /* #define CORAM_ATTACH_I2C */
     56 
     57 static const struct coram_board coram_boards[] = {
     58 	{ PCI_VENDOR_HAUPPAUGE, 0x7911, "Hauppauge HVR-1250" },
     59 };
     60 
     61 static int coram_match(device_t, cfdata_t, void *);
     62 static void coram_attach(device_t, device_t, void *);
     63 static int coram_detach(device_t, int);
     64 static int coram_rescan(device_t, const char *, const int *);
     65 static void coram_childdet(device_t, device_t);
     66 static bool coram_resume(device_t, const pmf_qual_t *);
     67 static int coram_intr(void *);
     68 static const struct coram_board * coram_board_lookup(uint16_t, uint16_t);
     69 
     70 static int coram_iic_exec(void *, i2c_op_t, i2c_addr_t,
     71     const void *, size_t, void *, size_t, int);
     72 static int coram_iic_read(struct coram_iic_softc *, i2c_op_t, i2c_addr_t,
     73     const void *, size_t, void *, size_t, int);
     74 static int coram_iic_write(struct coram_iic_softc *, i2c_op_t, i2c_addr_t,
     75     const void *, size_t, void *, size_t, int);
     76 
     77 static void coram_dtv_get_devinfo(void *, struct dvb_frontend_info *);
     78 static int coram_dtv_open(void *, int);
     79 static void coram_dtv_close(void *);
     80 static int coram_dtv_set_tuner(void *, const struct dvb_frontend_parameters *);
     81 static fe_status_t coram_dtv_get_status(void *);
     82 static uint16_t coram_dtv_get_signal_strength(void *);
     83 static uint16_t coram_dtv_get_snr(void *);
     84 static int coram_dtv_start_transfer(void *, void (*)(void *, const struct dtv_payload *), void *);
     85 static int coram_dtv_stop_transfer(void *);
     86 
     87 static int coram_mpeg_attach(struct coram_softc *);
     88 static int coram_mpeg_detach(struct coram_softc *, int);
     89 static int coram_mpeg_reset(struct coram_softc *);
     90 static void * coram_mpeg_malloc(struct coram_softc *, size_t);
     91 static int coram_allocmem(struct coram_softc *, size_t, size_t, struct coram_dma *);
     92 static void coram_mpeg_free(struct coram_softc *, void *);
     93 static int coram_mpeg_halt(struct coram_softc *);
     94 static int coram_freemem(struct coram_softc *, struct coram_dma *);
     95 static int coram_mpeg_trigger(struct coram_softc *, void *);
     96 static int coram_risc_buffer(struct coram_softc *, uint32_t, uint32_t);
     97 static int coram_risc_field(struct coram_softc *, uint32_t *, uint32_t);
     98 static int coram_sram_ch_setup(struct coram_softc *, struct coram_sram_ch *, uint32_t);
     99 static int coram_mpeg_intr(struct coram_softc *);
    100 
    101 CFATTACH_DECL2_NEW(coram, sizeof(struct coram_softc),
    102     coram_match, coram_attach, coram_detach, NULL,
    103     coram_rescan, coram_childdet);
    104 
    105 #define CORAM_SRAM_CH6 0
    106 
    107 #define CORAM_TS_PKTSIZE        (188 * 8)
    108 
    109 static struct coram_sram_ch coram_sram_chs[] = {
    110 	[CORAM_SRAM_CH6] = {
    111 		.csc_cmds= 0x10140,
    112 		.csc_iq	= 0x10500,
    113 		.csc_iqsz = 0x40,
    114 		.csc_cdt = 0x10600,
    115 		.csc_cdtsz = 0x10,
    116 		.csc_fifo = 0x6000,
    117 		.csc_fifosz = 0x1000,
    118 		.csc_risc = 0x10800,
    119 		.csc_riscsz = 0x800,
    120 		.csc_ptr1 = DMA5_PTR1,
    121 		.csc_ptr2 = DMA5_PTR2,
    122 		.csc_cnt1 = DMA5_CNT1,
    123 		.csc_cnt2 = DMA5_CNT2,
    124 	},
    125 };
    126 
    127 static const struct dtv_hw_if coram_dtv_if = {
    128 	.get_devinfo = coram_dtv_get_devinfo,
    129 	.open = coram_dtv_open,
    130 	.close = coram_dtv_close,
    131 	.set_tuner = coram_dtv_set_tuner,
    132 	.get_status = coram_dtv_get_status,
    133 	.get_signal_strength = coram_dtv_get_signal_strength,
    134 	.get_snr = coram_dtv_get_snr,
    135 	.start_transfer = coram_dtv_start_transfer,
    136 	.stop_transfer = coram_dtv_stop_transfer,
    137 };
    138 
    139 static int
    140 coram_match(device_t parent, cfdata_t match, void *v)
    141 {
    142 	const struct pci_attach_args *pa = v;
    143 	pcireg_t subid;
    144 
    145 	if (PCI_VENDOR(pa->pa_id) != PCI_VENDOR_CONEXANT)
    146 		return 0;
    147 	if (PCI_PRODUCT(pa->pa_id) != PCI_PRODUCT_CONEXANT_CX23885)
    148 		return 0;
    149 
    150 	subid = pci_conf_read(pa->pa_pc, pa->pa_tag, PCI_SUBSYS_ID_REG);
    151 	if (coram_board_lookup(PCI_VENDOR(subid), PCI_PRODUCT(subid)) == NULL)
    152 		return 0;
    153 
    154 	return 1;
    155 }
    156 
    157 static void
    158 coram_attach(device_t parent, device_t self, void *aux)
    159 {
    160 	struct coram_softc *sc = device_private(self);
    161 	const struct pci_attach_args *pa = aux;
    162 	pci_intr_handle_t ih;
    163 	pcireg_t reg;
    164 	const char *intrstr;
    165 	struct coram_iic_softc *cic;
    166 	uint32_t value;
    167 	int i;
    168 #ifdef CORAM_ATTACH_I2C
    169 	struct i2cbus_attach_args iba;
    170 #endif
    171 	char intrbuf[PCI_INTRSTR_LEN];
    172 
    173 	sc->sc_dev = self;
    174 
    175 	pci_aprint_devinfo(pa, NULL);
    176 
    177 	reg = pci_conf_read(pa->pa_pc, pa->pa_tag, PCI_SUBSYS_ID_REG);
    178 	sc->sc_board = coram_board_lookup(PCI_VENDOR(reg), PCI_PRODUCT(reg));
    179 	KASSERT(sc->sc_board != NULL);
    180 
    181 	if (pci_mapreg_map(pa, CX23885_MMBASE, PCI_MAPREG_TYPE_MEM, 0,
    182 			   &sc->sc_memt, &sc->sc_memh, NULL, &sc->sc_mems)) {
    183 		aprint_error_dev(self, "couldn't map memory space\n");
    184 		return;
    185 	}
    186 
    187 	sc->sc_dmat = pa->pa_dmat;
    188 	sc->sc_pc = pa->pa_pc;
    189 
    190 	if (pci_intr_map(pa, &ih)) {
    191 		aprint_error_dev(self, "couldn't map interrupt\n");
    192 		return;
    193 	}
    194 	intrstr = pci_intr_string(pa->pa_pc, ih, intrbuf, sizeof(intrbuf));
    195 	sc->sc_ih = pci_intr_establish_xname(pa->pa_pc, ih, IPL_VM, coram_intr,
    196 	    self, device_xname(self));
    197 	if (sc->sc_ih == NULL) {
    198 		aprint_error_dev(self, "couldn't establish interrupt");
    199 		if (intrstr != NULL)
    200 			aprint_error(" at %s", intrstr);
    201 		aprint_error("\n");
    202 		return;
    203 	}
    204 	aprint_normal_dev(self, "interrupting at %s\n", intrstr);
    205 
    206 	/* set master */
    207 	reg = pci_conf_read(pa->pa_pc, pa->pa_tag, PCI_COMMAND_STATUS_REG);
    208 	reg |= PCI_COMMAND_MASTER_ENABLE;
    209 	pci_conf_write(pa->pa_pc, pa->pa_tag, PCI_COMMAND_STATUS_REG, reg);
    210 
    211 	/* I2C */
    212 	for(i = 0; i < I2C_NUM; i++) {
    213 		cic = &sc->sc_iic[i];
    214 
    215 		cic->cic_sc = sc;
    216 		if (bus_space_subregion(sc->sc_memt, sc->sc_memh,
    217 		    I2C_BASE + (I2C_SIZE * i), I2C_SIZE, &cic->cic_regh))
    218 			panic("failed to subregion i2c");
    219 
    220 		iic_tag_init(&cic->cic_i2c);
    221 		cic->cic_i2c.ic_cookie = cic;
    222 		cic->cic_i2c.ic_exec = coram_iic_exec;
    223 
    224 #ifdef CORAM_ATTACH_I2C
    225 		/* attach iic(4) */
    226 		memset(&iba, 0, sizeof(iba));
    227 		iba.iba_tag = &cic->cic_i2c;
    228 		cic->cic_i2cdev = config_found_ia(self, "i2cbus", &iba,
    229 		    iicbus_print);
    230 #endif
    231 	}
    232 
    233 	/* HVR1250 GPIO */
    234 	value = bus_space_read_4(sc->sc_memt, sc->sc_memh, 0x110010);
    235 #if 1
    236 	value &= ~0x00010001;
    237 	bus_space_write_4(sc->sc_memt, sc->sc_memh, 0x110010, value);
    238 	delay(5000);
    239 #endif
    240 	value |= 0x00010001;
    241 	bus_space_write_4(sc->sc_memt, sc->sc_memh, 0x110010, value);
    242 
    243 #if 0
    244 	int i;
    245 	uint8_t foo[256];
    246 	uint8_t bar;
    247 	bar = 0;
    248 //	seeprom_bootstrap_read(&sc->sc_i2c, 0x50, 0, 256, foo, 256);
    249 
    250 	iic_acquire_bus(&sc->sc_i2c, I2C_F_POLL);
    251 	iic_exec(&sc->sc_i2c, I2C_OP_READ_WITH_STOP, 0x50, &bar, 1, foo, 256,
    252 	    I2C_F_POLL);
    253 	iic_release_bus(&sc->sc_i2c, I2C_F_POLL);
    254 
    255 	printf("\n");
    256 	for ( i = 0; i < 256; i++) {
    257 		if ( (i % 8) == 0 )
    258 			printf("%02x: ", i);
    259 
    260 		printf("%02x", foo[i]);
    261 
    262 		if ( (i % 8) == 7 )
    263 			printf("\n");
    264 		else
    265 			printf(" ");
    266 	}
    267 	printf("\n");
    268 #endif
    269 
    270 	sc->sc_demod = cx24227_open(sc->sc_dev, &sc->sc_iic[0].cic_i2c, 0x19);
    271 	if (sc->sc_demod == NULL)
    272 		aprint_error_dev(self, "couldn't open cx24227\n");
    273 	sc->sc_tuner = mt2131_open(sc->sc_dev, &sc->sc_iic[0].cic_i2c, 0x61);
    274 	if (sc->sc_tuner == NULL)
    275 		aprint_error_dev(self, "couldn't open mt2131\n");
    276 
    277 	coram_mpeg_attach(sc);
    278 
    279 	if (!pmf_device_register(self, NULL, coram_resume))
    280 		aprint_error_dev(self, "couldn't establish power handler\n");
    281 
    282 	return;
    283 }
    284 
    285 static int
    286 coram_detach(device_t self, int flags)
    287 {
    288 	struct coram_softc *sc = device_private(self);
    289 	struct coram_iic_softc *cic;
    290 	unsigned int i;
    291 	int error;
    292 
    293 	error = coram_mpeg_detach(sc, flags);
    294 	if (error)
    295 		return error;
    296 
    297 	if (sc->sc_tuner)
    298 		mt2131_close(sc->sc_tuner);
    299 	if (sc->sc_demod)
    300 		cx24227_close(sc->sc_demod);
    301 	for (i = 0; i < I2C_NUM; i++) {
    302 		cic = &sc->sc_iic[i];
    303 		if (cic->cic_i2cdev)
    304 			config_detach(cic->cic_i2cdev, flags);
    305 		iic_tag_fini(&cic->cic_i2c);
    306 	}
    307 	pmf_device_deregister(self);
    308 
    309 	if (sc->sc_mems)
    310 		bus_space_unmap(sc->sc_memt, sc->sc_memh, sc->sc_mems);
    311 	if (sc->sc_ih)
    312 		pci_intr_disestablish(sc->sc_pc, sc->sc_ih);
    313 
    314 	return 0;
    315 }
    316 
    317 static int
    318 coram_rescan(device_t self, const char *ifattr, const int *locs)
    319 {
    320 	struct coram_softc *sc = device_private(self);
    321 	struct dtv_attach_args daa;
    322 
    323 	daa.hw = &coram_dtv_if;
    324 	daa.priv = sc;
    325 
    326 	if (ifattr_match(ifattr, "dtvbus") && sc->sc_dtvdev == NULL)
    327 		sc->sc_dtvdev = config_found_ia(sc->sc_dev, "dtvbus",
    328 		    &daa, dtv_print);
    329 
    330 	return 0;
    331 }
    332 
    333 static void
    334 coram_childdet(device_t self, device_t child)
    335 {
    336 	struct coram_softc *sc = device_private(self);
    337 	struct coram_iic_softc *cic;
    338 	unsigned int i;
    339 
    340 	if (sc->sc_dtvdev == child)
    341 		sc->sc_dtvdev = NULL;
    342 
    343 	for (i = 0; i < I2C_NUM; i++) {
    344 		cic = &sc->sc_iic[i];
    345 		if (cic->cic_i2cdev == child)
    346 			cic->cic_i2cdev = NULL;
    347 	}
    348 }
    349 
    350 static int
    351 coram_intr(void *v)
    352 {
    353 	device_t self = v;
    354 	struct coram_softc *sc;
    355 	uint32_t val;
    356 
    357 	sc = device_private(self);
    358 
    359 	val = bus_space_read_4(sc->sc_memt, sc->sc_memh, PCI_INT_MSTAT );
    360 	if (val == 0)
    361 		return 0; /* not ours */
    362 
    363 	/* vid c */
    364 	if (val & __BIT(2))
    365 		coram_mpeg_intr(sc);
    366 
    367 	if (val & ~__BIT(2))
    368 		printf("%s %08x\n", __func__, val);
    369 
    370 	bus_space_write_4(sc->sc_memt, sc->sc_memh, PCI_INT_STAT, val);
    371 
    372 	return 1;
    373 }
    374 
    375 static const struct coram_board *
    376 coram_board_lookup(uint16_t vendor, uint16_t product)
    377 {
    378 	unsigned int i;
    379 
    380 	for (i = 0; i < __arraycount(coram_boards); i++) {
    381 		if (coram_boards[i].vendor == vendor &&
    382 		    coram_boards[i].product == product) {
    383 			return &coram_boards[i];
    384 		}
    385 	}
    386 
    387 	return NULL;
    388 }
    389 
    390 #define CXDTV_TS_RISCI2  (1 << 4)
    391 #define CXDTV_TS_RISCI1  (1 << 0)
    392 
    393 #define CXDTV_TS_RISCI (CXDTV_TS_RISCI1|CXDTV_TS_RISCI2)
    394 
    395 static int
    396 coram_mpeg_intr(struct coram_softc *sc)
    397 {
    398 	struct dtv_payload payload;
    399 	uint32_t s, m, v;
    400 	int i;
    401 
    402 	s = bus_space_read_4(sc->sc_memt, sc->sc_memh, VID_C_INT_STAT);
    403 	m = bus_space_read_4(sc->sc_memt, sc->sc_memh, VID_C_INT_MSK);
    404 
    405 	if ((s & m) == 0)
    406 		return 0;
    407 
    408 	if ( (s & ~CXDTV_TS_RISCI) != 0 ) {
    409 		printf("%s: unexpected TS IS %08x\n",
    410 		    device_xname(sc->sc_dev), s);
    411 
    412 		printf("cmds:\n");
    413 		for(i = 0; i < 20; i++)
    414 		{
    415 			v = bus_space_read_4(sc->sc_memt, sc->sc_memh, 0x10140 +(i*4));
    416 			printf("%06x %08x\n", 0x10140+(i*4), v);
    417 		}
    418 	}
    419 
    420 	if (sc->sc_dtvsubmitcb == NULL)
    421 		goto done;
    422 
    423 	if ((s & CXDTV_TS_RISCI1) == CXDTV_TS_RISCI1) {
    424 		bus_dmamap_sync(sc->sc_dmat, sc->sc_dma->map,
    425 		    0, CORAM_TS_PKTSIZE,
    426 		    BUS_DMASYNC_POSTREAD);
    427 		payload.data = KERNADDR(sc->sc_dma);
    428 		payload.size = CORAM_TS_PKTSIZE;
    429 		sc->sc_dtvsubmitcb(sc->sc_dtvsubmitarg, &payload);
    430 	}
    431 
    432 	if ((s & CXDTV_TS_RISCI2) == CXDTV_TS_RISCI2) {
    433 		bus_dmamap_sync(sc->sc_dmat, sc->sc_dma->map,
    434 		    CORAM_TS_PKTSIZE, CORAM_TS_PKTSIZE,
    435 		    BUS_DMASYNC_POSTREAD);
    436 		payload.data = (char *)(KERNADDR(sc->sc_dma)) + (uintptr_t)CORAM_TS_PKTSIZE;
    437 		payload.size = CORAM_TS_PKTSIZE;
    438 		sc->sc_dtvsubmitcb(sc->sc_dtvsubmitarg, &payload);
    439 	}
    440 
    441 done:
    442 	bus_space_write_4(sc->sc_memt, sc->sc_memh, VID_C_INT_STAT, s);
    443 
    444 	return 1;
    445 }
    446 
    447 static bool
    448 coram_resume(device_t dv, const pmf_qual_t *qual)
    449 {
    450 	return true;
    451 }
    452 
    453 /* I2C Bus */
    454 
    455 #define I2C_ADDR  0x0000
    456 #define I2C_WDATA 0x0004
    457 #define I2C_CTRL  0x0008
    458 #define I2C_RDATA 0x000c
    459 #define I2C_STAT  0x0010
    460 
    461 #define I2C_EXTEND  (1 << 3)
    462 #define I2C_NOSTOP  (1 << 4)
    463 
    464 static int
    465 coram_iic_exec(void *cookie, i2c_op_t op, i2c_addr_t addr,
    466     const void *cmdbuf, size_t cmdlen, void *buf, size_t len, int flags)
    467 {
    468 	struct coram_iic_softc *cic;
    469 	int ret;
    470 
    471 	cic = cookie;
    472 
    473 	if(cmdlen) {
    474 		ret = coram_iic_write(cic, op, addr, cmdbuf, cmdlen, buf, len, flags);
    475 	if(ret)
    476 		return ret;
    477 	}
    478 
    479 	if(len) {
    480 		ret = coram_iic_read(cic, op, addr, cmdbuf, cmdlen, buf, len, flags);
    481 	if(ret)
    482 		return ret;
    483 	}
    484 
    485 
    486 	return 0;
    487 
    488 }
    489 
    490 static int
    491 coram_iic_read(struct coram_iic_softc *cic, i2c_op_t op, i2c_addr_t addr,
    492     const void *cmdbuf, size_t cmdlen, void *buf, size_t len, int flags)
    493 {
    494 	uint8_t *rb;
    495 	uint32_t ctrl;
    496 	int bn;
    497 
    498 	rb = buf;
    499 
    500 	for ( bn = 0; bn < len; bn++) {
    501 		ctrl = (0x9d << 24) | (1 << 12) | (1 << 2) | 1;
    502 		if ( bn < len - 1 )
    503 			ctrl |= I2C_NOSTOP | I2C_EXTEND;
    504 
    505 		bus_space_write_4(cic->cic_sc->sc_memt, cic->cic_regh, I2C_ADDR, addr<<25);
    506 	        bus_space_write_4(cic->cic_sc->sc_memt, cic->cic_regh, I2C_CTRL, ctrl);
    507 
    508 		while((bus_space_read_4(cic->cic_sc->sc_memt, cic->cic_regh,
    509 		    I2C_STAT) & 0x02)) {
    510 			delay(25);
    511 		}
    512 		if((bus_space_read_4(cic->cic_sc->sc_memt, cic->cic_regh,
    513 		    I2C_STAT) & 0x01) == 0x00) {
    514 //			printf("%s %d no ack\n", __func__, bn);
    515 			return EIO;
    516 		}
    517 
    518 		rb[bn] = bus_space_read_4(cic->cic_sc->sc_memt, cic->cic_regh, I2C_RDATA);
    519 
    520 	}
    521 
    522 	return 0;
    523 }
    524 
    525 static int
    526 coram_iic_write(struct coram_iic_softc *cic, i2c_op_t op, i2c_addr_t addr,
    527     const void *cmdbuf, size_t cmdlen, void *buf, size_t len, int flags)
    528 {
    529 	const uint8_t *wb;
    530 	uint32_t wdata, addrreg, ctrl;
    531 	int bn;
    532 
    533 	wb = cmdbuf;
    534 
    535 	addrreg = (addr << 25) | wb[0];
    536 	wdata = wb[0];
    537 	ctrl = (0x9d << 24) | (1 << 12) | (1 << 2);
    538 
    539 	if ( cmdlen > 1 )
    540 		ctrl |= I2C_NOSTOP | I2C_EXTEND;
    541 	else if (len)
    542 		ctrl |= I2C_NOSTOP;
    543 
    544 	bus_space_write_4(cic->cic_sc->sc_memt, cic->cic_regh, I2C_ADDR, addrreg);
    545 	bus_space_write_4(cic->cic_sc->sc_memt, cic->cic_regh, I2C_WDATA, wdata);
    546 	bus_space_write_4(cic->cic_sc->sc_memt, cic->cic_regh, I2C_CTRL, ctrl);
    547 
    548 	while((bus_space_read_4(cic->cic_sc->sc_memt, cic->cic_regh, I2C_STAT) & 0x02)) {
    549 		delay(25); }
    550 
    551 	for ( bn = 1; bn < cmdlen; bn++) {
    552 		ctrl = (0x9d << 24) | (1 << 12) | (1 << 2);
    553 		wdata = wb[bn];
    554 
    555 		if ( bn < cmdlen - 1 )
    556 			ctrl |= I2C_NOSTOP | I2C_EXTEND;
    557 		else if (len)
    558 			ctrl |= I2C_NOSTOP;
    559 
    560 		bus_space_write_4(cic->cic_sc->sc_memt, cic->cic_regh, I2C_ADDR, addrreg);
    561 		bus_space_write_4(cic->cic_sc->sc_memt, cic->cic_regh, I2C_WDATA, wdata);
    562 		bus_space_write_4(cic->cic_sc->sc_memt, cic->cic_regh, I2C_CTRL, ctrl);
    563 
    564 		while((bus_space_read_4(cic->cic_sc->sc_memt, cic->cic_regh, I2C_STAT) & 0x02)) {
    565 			delay(25); }
    566 	}
    567 
    568 	return 0;
    569 }
    570 
    571 static int
    572 coram_mpeg_attach(struct coram_softc *sc)
    573 {
    574 	struct coram_sram_ch *ch;
    575 
    576 	ch = &coram_sram_chs[CORAM_SRAM_CH6];
    577 
    578 	sc->sc_riscbufsz = ch->csc_riscsz;
    579 	sc->sc_riscbuf = kmem_alloc(ch->csc_riscsz, KM_SLEEP);
    580 
    581 	coram_mpeg_reset(sc);
    582 
    583 	sc->sc_tsbuf = NULL;
    584 
    585 	coram_rescan(sc->sc_dev, NULL, NULL);
    586 
    587 	return (sc->sc_dtvdev != NULL);
    588 }
    589 
    590 static int
    591 coram_mpeg_detach(struct coram_softc *sc, int flags)
    592 {
    593 	struct coram_sram_ch *ch = &coram_sram_chs[CORAM_SRAM_CH6];
    594 	int error;
    595 
    596 	if (sc->sc_dtvdev) {
    597 		error = config_detach(sc->sc_dtvdev, flags);
    598 		if (error)
    599 			return error;
    600 	}
    601 	if (sc->sc_riscbuf) {
    602 		kmem_free(sc->sc_riscbuf, ch->csc_riscsz);
    603 	}
    604 
    605 	return 0;
    606 }
    607 
    608 static void
    609 coram_dtv_get_devinfo(void *cookie, struct dvb_frontend_info *info)
    610 {
    611 	struct coram_softc *sc = cookie;
    612 
    613 	memset(info, 0, sizeof(*info));
    614 	strlcpy(info->name, sc->sc_board->name, sizeof(info->name));
    615 	info->type = FE_ATSC;
    616 	info->frequency_min = 54000000;
    617 	info->frequency_max = 858000000;
    618 	info->frequency_stepsize = 62500;
    619 	info->caps = FE_CAN_QAM_64 | FE_CAN_QAM_256 | FE_CAN_8VSB;
    620 }
    621 
    622 static int
    623 coram_dtv_open(void *cookie, int flags)
    624 {
    625 	struct coram_softc *sc = cookie;
    626 
    627 #ifdef CORAM_DEBUG
    628 	device_printf(sc->sc_dev, "%s\n", __func__);
    629 #endif
    630 
    631 	//KASSERT(sc->sc_tsbuf == NULL);
    632 
    633 	if (sc->sc_tuner == NULL || sc->sc_demod == NULL)
    634 		return ENXIO;
    635 
    636 	coram_mpeg_reset(sc);
    637 
    638 	/* allocate two alternating DMA areas for MPEG TS packets */
    639 	sc->sc_tsbuf = coram_mpeg_malloc(sc, CORAM_TS_PKTSIZE * 2);
    640 
    641 	if (sc->sc_tsbuf == NULL)
    642 		return ENOMEM;
    643 
    644 	return 0;
    645 }
    646 
    647 static void
    648 coram_dtv_close(void *cookie)
    649 {
    650 	struct coram_softc *sc = cookie;
    651 
    652 #ifdef CORAM_DEBUG
    653 	device_printf(sc->sc_dev, "%s\n", __func__);
    654 #endif
    655 
    656 	coram_mpeg_halt(sc);
    657 
    658 	if (sc->sc_tsbuf != NULL) {
    659 		coram_mpeg_free(sc, sc->sc_tsbuf);
    660 		sc->sc_tsbuf = NULL;
    661 	}
    662 }
    663 
    664 static int
    665 coram_dtv_set_tuner(void *cookie, const struct dvb_frontend_parameters *params)
    666 {
    667 	struct coram_softc *sc = cookie;
    668 
    669 	KASSERT(sc->sc_tuner != NULL);
    670 	mt2131_tune_dtv(sc->sc_tuner, params);
    671 	KASSERT(sc->sc_demod != NULL);
    672 	return cx24227_set_modulation(sc->sc_demod, params->u.vsb.modulation);
    673 }
    674 
    675 static fe_status_t
    676 coram_dtv_get_status(void *cookie)
    677 {
    678 	struct coram_softc *sc = cookie;
    679 
    680 	if (sc->sc_demod == NULL)
    681 		return ENXIO;
    682 
    683 	return cx24227_get_dtv_status(sc->sc_demod);
    684 }
    685 
    686 static uint16_t
    687 coram_dtv_get_signal_strength(void *cookie)
    688 {
    689 	return 0;
    690 }
    691 
    692 static uint16_t
    693 coram_dtv_get_snr(void *cookie)
    694 {
    695 	return 0;
    696 }
    697 
    698 static int
    699 coram_dtv_start_transfer(void *cookie,
    700     void (*cb)(void *, const struct dtv_payload *), void *arg)
    701 {
    702 	struct coram_softc *sc = cookie;
    703 
    704 #ifdef CORAM_DEBUG
    705 	device_printf(sc->sc_dev, "%s\n", __func__);
    706 #endif
    707 
    708 	sc->sc_dtvsubmitcb = cb;
    709 	sc->sc_dtvsubmitarg = arg;
    710 
    711 	coram_mpeg_trigger(sc, sc->sc_tsbuf);
    712 
    713 	return 0;
    714 }
    715 
    716 static int
    717 coram_dtv_stop_transfer(void *cookie)
    718 {
    719 	struct coram_softc *sc = cookie;
    720 
    721 #ifdef CORAM_DEBUG
    722 	device_printf(sc->sc_dev, "%s\n", __func__);
    723 #endif
    724 
    725 	coram_mpeg_halt(sc);
    726 	bus_space_write_4(sc->sc_memt, sc->sc_memh, PCI_INT_MSK, 0);
    727 
    728 	sc->sc_dtvsubmitcb = NULL;
    729 	sc->sc_dtvsubmitarg = NULL;
    730 
    731 	return 0;
    732 }
    733 
    734 
    735 static int
    736 coram_mpeg_reset(struct coram_softc *sc)
    737 {
    738 	/* hold RISC in reset */
    739 	bus_space_write_4(sc->sc_memt, sc->sc_memh, DEV_CNTRL2, 0);
    740 
    741 	/* disable fifo + risc */
    742 	bus_space_write_4(sc->sc_memt, sc->sc_memh, VID_C_DMA_CTL, 0);
    743 
    744 	bus_space_write_4(sc->sc_memt, sc->sc_memh, PCI_INT_MSK, 0);
    745 	bus_space_write_4(sc->sc_memt, sc->sc_memh, VID_C_INT_MSK, 0);
    746 
    747 	bus_space_write_4(sc->sc_memt, sc->sc_memh, PCI_INT_STAT, 0);
    748 	bus_space_write_4(sc->sc_memt, sc->sc_memh, VID_C_INT_STAT, 0);
    749 
    750 	memset(sc->sc_riscbuf, 0, sc->sc_riscbufsz);
    751 
    752 	return 0;
    753 }
    754 
    755 static void *
    756 coram_mpeg_malloc(struct coram_softc *sc, size_t size)
    757 {
    758 	struct coram_dma *p;
    759 	int err;
    760 
    761 	p = kmem_alloc(sizeof(struct coram_dma), KM_SLEEP);
    762 	err = coram_allocmem(sc, size, 16, p);
    763 	if (err) {
    764 		kmem_free(p, sizeof(struct coram_dma));
    765 		return NULL;
    766 	}
    767 
    768 	p->next = sc->sc_dma;
    769 	sc->sc_dma = p;
    770 
    771 	return KERNADDR(p);
    772 }
    773 
    774 static int
    775 coram_allocmem(struct coram_softc *sc, size_t size, size_t align,
    776     struct coram_dma *p)
    777 {
    778 	int err;
    779 
    780 	p->size = size;
    781 	err = bus_dmamem_alloc(sc->sc_dmat, p->size, align, 0,
    782 	    p->segs, sizeof(p->segs) / sizeof(p->segs[0]),
    783 	    &p->nsegs, BUS_DMA_NOWAIT);
    784 	if (err)
    785 		return err;
    786 	err = bus_dmamem_map(sc->sc_dmat, p->segs, p->nsegs, p->size,
    787 	    &p->addr, BUS_DMA_NOWAIT|BUS_DMA_COHERENT);
    788 	if (err)
    789 		goto free;
    790 	err = bus_dmamap_create(sc->sc_dmat, p->size, 1, p->size, 0,
    791 	    BUS_DMA_NOWAIT, &p->map);
    792 	if (err)
    793 		goto unmap;
    794 	err = bus_dmamap_load(sc->sc_dmat, p->map, p->addr, p->size, NULL,
    795 	    BUS_DMA_NOWAIT);
    796 	if (err)
    797 		goto destroy;
    798 
    799 	return 0;
    800 destroy:
    801 	bus_dmamap_destroy(sc->sc_dmat, p->map);
    802 unmap:
    803 	bus_dmamem_unmap(sc->sc_dmat, p->addr, p->size);
    804 free:
    805 	bus_dmamem_free(sc->sc_dmat, p->segs, p->nsegs);
    806 
    807 	return err;
    808 }
    809 
    810 static int
    811 coram_mpeg_halt(struct coram_softc *sc)
    812 {
    813 	uint32_t v;
    814 
    815 #ifdef CORAM_DEBUG
    816 	device_printf(sc->sc_dev, "%s\n", __func__);
    817 #endif
    818 
    819 	bus_space_write_4(sc->sc_memt, sc->sc_memh, VID_C_DMA_CTL, 0);
    820 
    821 	v = bus_space_read_4(sc->sc_memt, sc->sc_memh, PCI_INT_MSK);
    822 	bus_space_write_4(sc->sc_memt, sc->sc_memh, PCI_INT_MSK,
    823 	    v & __BIT(2));
    824 
    825 	v = bus_space_read_4(sc->sc_memt, sc->sc_memh, VID_C_INT_MSK);
    826 	bus_space_write_4(sc->sc_memt, sc->sc_memh, VID_C_INT_MSK,
    827 	    v & 0);
    828 
    829 	return 0;
    830 }
    831 
    832 static void
    833 coram_mpeg_free(struct coram_softc *sc, void *addr)
    834 {
    835 	struct coram_dma *p;
    836 	struct coram_dma **pp;
    837 
    838 	for (pp = &sc->sc_dma; (p = *pp) != NULL; pp = &p->next)
    839 		if (KERNADDR(p) == addr) {
    840 			coram_freemem(sc, p);
    841 			*pp = p->next;
    842 			kmem_free(p, sizeof(struct coram_dma));
    843 			return;
    844 		}
    845 
    846 	printf("%s: %p is already free\n", device_xname(sc->sc_dev), addr);
    847 	return;
    848 }
    849 
    850 static int
    851 coram_freemem(struct coram_softc *sc, struct coram_dma *p)
    852 {
    853 	bus_dmamap_unload(sc->sc_dmat, p->map);
    854 	bus_dmamap_destroy(sc->sc_dmat, p->map);
    855 	bus_dmamem_unmap(sc->sc_dmat, p->addr, p->size);
    856 	bus_dmamem_free(sc->sc_dmat, p->segs, p->nsegs);
    857 
    858 	return 0;
    859 }
    860 
    861 static int
    862 coram_mpeg_trigger(struct coram_softc *sc, void *buf)
    863 {
    864 	struct coram_dma *p;
    865 	struct coram_sram_ch *ch;
    866 	uint32_t v;
    867 
    868 	ch = &coram_sram_chs[CORAM_SRAM_CH6];
    869 
    870 	for (p = sc->sc_dma; p && KERNADDR(p) != buf; p = p->next)
    871 		continue;
    872 	if (p == NULL) {
    873 		printf("%s: coram_mpeg_trigger: bad addr %p\n",
    874 		    device_xname(sc->sc_dev), buf);
    875 		return ENOENT;
    876 	}
    877 
    878 	/* disable fifo + risc */
    879 	bus_space_write_4(sc->sc_memt, sc->sc_memh, VID_C_DMA_CTL, 0);
    880 
    881 	coram_risc_buffer(sc, CORAM_TS_PKTSIZE, 1);
    882 	coram_sram_ch_setup(sc, ch, CORAM_TS_PKTSIZE);
    883 
    884 	/* let me hope this bit is the same as on the 2388[0-3] */
    885 	/* software reset */
    886 	bus_space_write_4(sc->sc_memt, sc->sc_memh, VID_C_GEN_CTL, 0x0040);
    887 	delay (100*1000);
    888 
    889 	bus_space_write_4(sc->sc_memt, sc->sc_memh, VID_C_LNGTH, CORAM_TS_PKTSIZE);
    890 	bus_space_write_4(sc->sc_memt, sc->sc_memh, VID_C_HW_SOP_CTL, 0x47 << 16 | 188 << 4);
    891 	bus_space_write_4(sc->sc_memt, sc->sc_memh, VID_C_TS_CLK_EN, 1);
    892 	bus_space_write_4(sc->sc_memt, sc->sc_memh, VID_C_VLD_MISC, 0);
    893 	bus_space_write_4(sc->sc_memt, sc->sc_memh, VID_C_GEN_CTL, 12);
    894 	delay (100*1000);
    895 
    896 	v = bus_space_read_4(sc->sc_memt, sc->sc_memh, PAD_CTRL);
    897 	v &= ~0x4; /* Clear TS2_SOP_OE */
    898 	bus_space_write_4(sc->sc_memt, sc->sc_memh, PAD_CTRL, v);
    899 
    900 	v = bus_space_read_4(sc->sc_memt, sc->sc_memh, VID_C_INT_MSK);
    901 	v |= 0x111111;
    902 	bus_space_write_4(sc->sc_memt, sc->sc_memh, VID_C_INT_MSK, v);
    903 
    904 	v = bus_space_read_4(sc->sc_memt, sc->sc_memh, VID_C_DMA_CTL);
    905 	v |= 0x11; /* Enable RISC controller and FIFO */
    906 	bus_space_write_4(sc->sc_memt, sc->sc_memh, VID_C_DMA_CTL, v);
    907 
    908 	v = bus_space_read_4(sc->sc_memt, sc->sc_memh, DEV_CNTRL2);
    909 	v |= __BIT(5); /* Enable RISC controller */
    910 	bus_space_write_4(sc->sc_memt, sc->sc_memh, DEV_CNTRL2, v);
    911 
    912 	v = bus_space_read_4(sc->sc_memt, sc->sc_memh, PCI_INT_MSK);
    913 	v |= 0x001f00;
    914 	v |= 0x04;
    915 	bus_space_write_4(sc->sc_memt, sc->sc_memh, PCI_INT_MSK, v);
    916 
    917 	v = bus_space_read_4(sc->sc_memt, sc->sc_memh, VID_C_GEN_CTL);
    918 #ifdef CORAM_DEBUG
    919 	printf("%s, %06x %08x\n", __func__, VID_C_GEN_CTL, v);
    920 #endif
    921 	v = bus_space_read_4(sc->sc_memt, sc->sc_memh, VID_C_SOP_STATUS);
    922 #ifdef CORAM_DEBUG
    923 	printf("%s, %06x %08x\n", __func__, VID_C_SOP_STATUS, v);
    924 #endif
    925 	delay(100*1000);
    926 	v = bus_space_read_4(sc->sc_memt, sc->sc_memh, VID_C_GEN_CTL);
    927 #ifdef CORAM_DEBUG
    928 	printf("%s, %06x %08x\n", __func__, VID_C_GEN_CTL, v);
    929 #endif
    930 	v = bus_space_read_4(sc->sc_memt, sc->sc_memh, VID_C_SOP_STATUS);
    931 #ifdef CORAM_DEBUG
    932 	printf("%s, %06x %08x\n", __func__, VID_C_SOP_STATUS, v);
    933 #endif
    934 
    935 	return 0;
    936 }
    937 
    938 static int
    939 coram_risc_buffer(struct coram_softc *sc, uint32_t bpl, uint32_t lines)
    940 {
    941 	uint32_t *rm;
    942 	uint32_t size;
    943 
    944 	size = 1 + (bpl * lines) / PAGE_SIZE + lines;
    945 	size += 2;
    946 
    947 	if (sc->sc_riscbuf == NULL) {
    948 		return ENOMEM;
    949 	}
    950 
    951 	rm = (uint32_t *)sc->sc_riscbuf;
    952 	coram_risc_field(sc, rm, bpl);
    953 
    954 	return 0;
    955 }
    956 
    957 static int
    958 coram_risc_field(struct coram_softc *sc, uint32_t *rm, uint32_t bpl)
    959 {
    960 	struct coram_dma *p;
    961 
    962 	for (p = sc->sc_dma; p && KERNADDR(p) != sc->sc_tsbuf; p = p->next)
    963 		continue;
    964 	if (p == NULL) {
    965 		printf("%s: coram_risc_field: bad addr %p\n",
    966 		    device_xname(sc->sc_dev), sc->sc_tsbuf);
    967 		return ENOENT;
    968 	}
    969 
    970 	memset(sc->sc_riscbuf, 0, sc->sc_riscbufsz);
    971 
    972 	rm = sc->sc_riscbuf;
    973 
    974 	/* htole32 will be done when program is copied to chip sram */
    975 
    976 	/* XXX */
    977 	*(rm++) = (CX_RISC_SYNC|0);
    978 
    979 	*(rm++) = (CX_RISC_WRITE|CX_RISC_SOL|CX_RISC_EOL|CX_RISC_IRQ1|bpl);
    980 	*(rm++) = (DMAADDR(p) + 0 * bpl);
    981 	*(rm++) = 0; /* high dword */
    982 
    983 	*(rm++) = (CX_RISC_WRITE|CX_RISC_SOL|CX_RISC_EOL|CX_RISC_IRQ2|bpl);
    984 	*(rm++) = (DMAADDR(p) + 1 * bpl);
    985 	*(rm++) = 0;
    986 
    987 	*(rm++) = (CX_RISC_JUMP|1);
    988 	*(rm++) = (coram_sram_chs[CORAM_SRAM_CH6].csc_risc + 4);
    989 	*(rm++) = 0;
    990 
    991 	return 0;
    992 }
    993 
    994 static int
    995 coram_sram_ch_setup(struct coram_softc *sc, struct coram_sram_ch *csc,
    996     uint32_t bpl)
    997 {
    998 	unsigned int i, lines;
    999 	uint32_t cdt;
   1000 
   1001 	/* XXX why round? */
   1002 	bpl = (bpl + 7) & ~7;
   1003 	cdt = csc->csc_cdt;
   1004 	lines = csc->csc_fifosz / bpl;
   1005 #ifdef CORAM_DEBUG
   1006 	printf("%s %d lines\n", __func__, lines);
   1007 #endif
   1008 
   1009 	/* fill in CDT */
   1010 	for (i = 0; i < lines; i++) {
   1011 #ifdef CORAM_DEBUG
   1012 		printf("CDT ent %08x, %08x\n", cdt + (16 * i),
   1013 		    csc->csc_fifo + (bpl * i));
   1014 #endif
   1015 		bus_space_write_4(sc->sc_memt, sc->sc_memh,
   1016 		    cdt + (16 * i), csc->csc_fifo + (bpl * i));
   1017 	}
   1018 
   1019 	/* copy program */
   1020 	/* converts program to little endian as it goes into sram */
   1021 	bus_space_write_region_4(sc->sc_memt, sc->sc_memh,
   1022 	    csc->csc_risc, (void *)sc->sc_riscbuf, sc->sc_riscbufsz >> 2);
   1023 
   1024 	/* fill in CMDS */
   1025 	bus_space_write_4(sc->sc_memt, sc->sc_memh,
   1026 	    csc->csc_cmds + CMDS_O_IRPC, csc->csc_risc);
   1027 	bus_space_write_4(sc->sc_memt, sc->sc_memh,
   1028 	    csc->csc_cmds + CMDS_O_IRPC + 4, 0);
   1029 
   1030 	bus_space_write_4(sc->sc_memt, sc->sc_memh,
   1031 	    csc->csc_cmds + CMDS_O_CDTB, csc->csc_cdt);
   1032 	bus_space_write_4(sc->sc_memt, sc->sc_memh,
   1033 	    csc->csc_cmds + CMDS_O_CDTS, (lines * 16) >> 3); /* XXX magic */
   1034 
   1035 	bus_space_write_4(sc->sc_memt, sc->sc_memh,
   1036 	    csc->csc_cmds + CMDS_O_IQB, csc->csc_iq);
   1037 	bus_space_write_4(sc->sc_memt, sc->sc_memh,
   1038 	    csc->csc_cmds + CMDS_O_IQS,
   1039 	    CMDS_IQS_ISRP | (csc->csc_iqsz >> 2) );
   1040 
   1041 	/* zero rest of CMDS */
   1042 	bus_space_set_region_4(sc->sc_memt, sc->sc_memh, 0x18, 0, 20);
   1043 
   1044 	bus_space_write_4(sc->sc_memt, sc->sc_memh,
   1045 	    csc->csc_ptr1, csc->csc_fifo);
   1046 	bus_space_write_4(sc->sc_memt, sc->sc_memh,
   1047 	    csc->csc_ptr2, cdt);
   1048 	bus_space_write_4(sc->sc_memt, sc->sc_memh,
   1049 	    csc->csc_cnt2, (lines * 16) >> 3);
   1050 	bus_space_write_4(sc->sc_memt, sc->sc_memh,
   1051 	    csc->csc_cnt1, (bpl >> 3) - 1);
   1052 
   1053 	return 0;
   1054 }
   1055 
   1056 MODULE(MODULE_CLASS_DRIVER, coram, "cx24227,mt2131,pci");
   1057 
   1058 #ifdef _MODULE
   1059 #include "ioconf.c"
   1060 #endif
   1061 
   1062 static int
   1063 coram_modcmd(modcmd_t cmd, void *v)
   1064 {
   1065 	int error = 0;
   1066 
   1067 	switch (cmd) {
   1068 	case MODULE_CMD_INIT:
   1069 #ifdef _MODULE
   1070 		error = config_init_component(cfdriver_ioconf_coram,
   1071 		    cfattach_ioconf_coram, cfdata_ioconf_coram);
   1072 #endif
   1073 		return error;
   1074 	case MODULE_CMD_FINI:
   1075 #ifdef _MODULE
   1076 		error = config_fini_component(cfdriver_ioconf_coram,
   1077 		    cfattach_ioconf_coram, cfdata_ioconf_coram);
   1078 #endif
   1079 		return error;
   1080 	default:
   1081 		return ENOTTY;
   1082 	}
   1083 }
   1084