1 /* 2 * ddbridge.c: Digital Devices PCIe bridge driver 3 * 4 * Copyright (C) 2010-2011 Digital Devices GmbH 5 * 6 * This program is free software; you can redistribute it and/or 7 * modify it under the terms of the GNU General Public License 8 * version 2 only, as published by the Free Software Foundation. 9 * 10 * 11 * This program is distributed in the hope that it will be useful, 12 * but WITHOUT ANY WARRANTY; without even the implied warranty of 13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 14 * GNU General Public License for more details. 15 * 16 * 17 * You should have received a copy of the GNU General Public License 18 * along with this program; if not, write to the Free Software 19 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 20 * 02110-1301, USA 21 * Or, point your browser to http://www.gnu.org/copyleft/gpl.html 22 */ 23 24 #include <linux/module.h> 25 #include <linux/init.h> 26 #include <linux/interrupt.h> 27 #include <linux/delay.h> 28 #include <linux/slab.h> 29 #include <linux/poll.h> 30 #include <linux/io.h> 31 #include <linux/pci.h> 32 #include <linux/pci_ids.h> 33 #include <linux/timer.h> 34 #include <linux/i2c.h> 35 #include <linux/swab.h> 36 #include <linux/vmalloc.h> 37 #include "ddbridge.h" 38 39 #include "ddbridge-regs.h" 40 41 #include "tda18271c2dd.h" 42 #include "stv6110x.h" 43 #include "stv090x.h" 44 #include "lnbh24.h" 45 #include "drxk.h" 46 47 DVB_DEFINE_MOD_OPT_ADAPTER_NR(adapter_nr); 48 49 /* MSI had problems with lost interrupts, fixed but needs testing */ 50 #undef CONFIG_PCI_MSI 51 52 /******************************************************************************/ 53 54 static int i2c_read(struct i2c_adapter *adapter, u8 adr, u8 *val) 55 { 56 struct i2c_msg msgs[1] = {{.addr = adr, .flags = I2C_M_RD, 57 .buf = val, .len = 1 } }; 58 return (i2c_transfer(adapter, msgs, 1) == 1) ? 0 : -1; 59 } 60 61 static int i2c_read_reg(struct i2c_adapter *adapter, u8 adr, u8 reg, u8 *val) 62 { 63 struct i2c_msg msgs[2] = {{.addr = adr, .flags = 0, 64 .buf = ®, .len = 1 }, 65 {.addr = adr, .flags = I2C_M_RD, 66 .buf = val, .len = 1 } }; 67 return (i2c_transfer(adapter, msgs, 2) == 2) ? 0 : -1; 68 } 69 70 static int i2c_read_reg16(struct i2c_adapter *adapter, u8 adr, 71 u16 reg, u8 *val) 72 { 73 u8 msg[2] = {reg>>8, reg&0xff}; 74 struct i2c_msg msgs[2] = {{.addr = adr, .flags = 0, 75 .buf = msg, .len = 2}, 76 {.addr = adr, .flags = I2C_M_RD, 77 .buf = val, .len = 1} }; 78 return (i2c_transfer(adapter, msgs, 2) == 2) ? 0 : -1; 79 } 80 81 static int ddb_i2c_cmd(struct ddb_i2c *i2c, u32 adr, u32 cmd) 82 { 83 struct ddb *dev = i2c->dev; 84 int stat; 85 u32 val; 86 87 i2c->done = 0; 88 ddbwritel((adr << 9) | cmd, i2c->regs + I2C_COMMAND); 89 stat = wait_event_timeout(i2c->wq, i2c->done == 1, HZ); 90 if (stat <= 0) { 91 printk(KERN_ERR "I2C timeout\n"); 92 { /* MSI debugging*/ 93 u32 istat = ddbreadl(INTERRUPT_STATUS); 94 printk(KERN_ERR "IRS %08x\n", istat); 95 ddbwritel(istat, INTERRUPT_ACK); 96 } 97 return -EIO; 98 } 99 val = ddbreadl(i2c->regs+I2C_COMMAND); 100 if (val & 0x70000) 101 return -EIO; 102 return 0; 103 } 104 105 static int ddb_i2c_master_xfer(struct i2c_adapter *adapter, 106 struct i2c_msg msg[], int num) 107 { 108 struct ddb_i2c *i2c = (struct ddb_i2c *)i2c_get_adapdata(adapter); 109 struct ddb *dev = i2c->dev; 110 u8 addr = 0; 111 112 if (num) 113 addr = msg[0].addr; 114 115 if (num == 2 && msg[1].flags & I2C_M_RD && 116 !(msg[0].flags & I2C_M_RD)) { 117 memcpy_toio(dev->regs + I2C_TASKMEM_BASE + i2c->wbuf, 118 msg[0].buf, msg[0].len); 119 ddbwritel(msg[0].len|(msg[1].len << 16), 120 i2c->regs+I2C_TASKLENGTH); 121 if (!ddb_i2c_cmd(i2c, addr, 1)) { 122 memcpy_fromio(msg[1].buf, 123 dev->regs + I2C_TASKMEM_BASE + i2c->rbuf, 124 msg[1].len); 125 return num; 126 } 127 } 128 129 if (num == 1 && !(msg[0].flags & I2C_M_RD)) { 130 ddbcpyto(I2C_TASKMEM_BASE + i2c->wbuf, msg[0].buf, msg[0].len); 131 ddbwritel(msg[0].len, i2c->regs + I2C_TASKLENGTH); 132 if (!ddb_i2c_cmd(i2c, addr, 2)) 133 return num; 134 } 135 if (num == 1 && (msg[0].flags & I2C_M_RD)) { 136 ddbwritel(msg[0].len << 16, i2c->regs + I2C_TASKLENGTH); 137 if (!ddb_i2c_cmd(i2c, addr, 3)) { 138 ddbcpyfrom(msg[0].buf, 139 I2C_TASKMEM_BASE + i2c->rbuf, msg[0].len); 140 return num; 141 } 142 } 143 return -EIO; 144 } 145 146 147 static u32 ddb_i2c_functionality(struct i2c_adapter *adap) 148 { 149 return I2C_FUNC_SMBUS_EMUL; 150 } 151 152 struct i2c_algorithm ddb_i2c_algo = { 153 .master_xfer = ddb_i2c_master_xfer, 154 .functionality = ddb_i2c_functionality, 155 }; 156 157 static void ddb_i2c_release(struct ddb *dev) 158 { 159 int i; 160 struct ddb_i2c *i2c; 161 struct i2c_adapter *adap; 162 163 for (i = 0; i < dev->info->port_num; i++) { 164 i2c = &dev->i2c[i]; 165 adap = &i2c->adap; 166 i2c_del_adapter(adap); 167 } 168 } 169 170 static int ddb_i2c_init(struct ddb *dev) 171 { 172 int i, j, stat = 0; 173 struct ddb_i2c *i2c; 174 struct i2c_adapter *adap; 175 176 for (i = 0; i < dev->info->port_num; i++) { 177 i2c = &dev->i2c[i]; 178 i2c->dev = dev; 179 i2c->nr = i; 180 i2c->wbuf = i * (I2C_TASKMEM_SIZE / 4); 181 i2c->rbuf = i2c->wbuf + (I2C_TASKMEM_SIZE / 8); 182 i2c->regs = 0x80 + i * 0x20; 183 ddbwritel(I2C_SPEED_100, i2c->regs + I2C_TIMING); 184 ddbwritel((i2c->rbuf << 16) | i2c->wbuf, 185 i2c->regs + I2C_TASKADDRESS); 186 init_waitqueue_head(&i2c->wq); 187 188 adap = &i2c->adap; 189 i2c_set_adapdata(adap, i2c); 190 #ifdef I2C_ADAP_CLASS_TV_DIGITAL 191 adap->class = I2C_ADAP_CLASS_TV_DIGITAL|I2C_CLASS_TV_ANALOG; 192 #else 193 #ifdef I2C_CLASS_TV_ANALOG 194 adap->class = I2C_CLASS_TV_ANALOG; 195 #endif 196 #endif 197 strcpy(adap->name, "ddbridge"); 198 adap->algo = &ddb_i2c_algo; 199 adap->algo_data = (void *)i2c; 200 adap->dev.parent = &dev->pdev->dev; 201 stat = i2c_add_adapter(adap); 202 if (stat) 203 break; 204 } 205 if (stat) 206 for (j = 0; j < i; j++) { 207 i2c = &dev->i2c[j]; 208 adap = &i2c->adap; 209 i2c_del_adapter(adap); 210 } 211 return stat; 212 } 213 214 215 /******************************************************************************/ 216 /******************************************************************************/ 217 /******************************************************************************/ 218 219 #if 0 220 static void set_table(struct ddb *dev, u32 off, 221 dma_addr_t *pbuf, u32 num) 222 { 223 u32 i, base; 224 u64 mem; 225 226 base = DMA_BASE_ADDRESS_TABLE + off; 227 for (i = 0; i < num; i++) { 228 mem = pbuf[i]; 229 ddbwritel(mem & 0xffffffff, base + i * 8); 230 ddbwritel(mem >> 32, base + i * 8 + 4); 231 } 232 } 233 #endif 234 235 static void ddb_address_table(struct ddb *dev) 236 { 237 u32 i, j, base; 238 u64 mem; 239 dma_addr_t *pbuf; 240 241 for (i = 0; i < dev->info->port_num * 2; i++) { 242 base = DMA_BASE_ADDRESS_TABLE + i * 0x100; 243 pbuf = dev->input[i].pbuf; 244 for (j = 0; j < dev->input[i].dma_buf_num; j++) { 245 mem = pbuf[j]; 246 ddbwritel(mem & 0xffffffff, base + j * 8); 247 ddbwritel(mem >> 32, base + j * 8 + 4); 248 } 249 } 250 for (i = 0; i < dev->info->port_num; i++) { 251 base = DMA_BASE_ADDRESS_TABLE + 0x800 + i * 0x100; 252 pbuf = dev->output[i].pbuf; 253 for (j = 0; j < dev->output[i].dma_buf_num; j++) { 254 mem = pbuf[j]; 255 ddbwritel(mem & 0xffffffff, base + j * 8); 256 ddbwritel(mem >> 32, base + j * 8 + 4); 257 } 258 } 259 } 260 261 static void io_free(struct pci_dev *pdev, u8 **vbuf, 262 dma_addr_t *pbuf, u32 size, int num) 263 { 264 int i; 265 266 for (i = 0; i < num; i++) { 267 if (vbuf[i]) { 268 pci_free_consistent(pdev, size, vbuf[i], pbuf[i]); 269 vbuf[i] = 0; 270 } 271 } 272 } 273 274 static int io_alloc(struct pci_dev *pdev, u8 **vbuf, 275 dma_addr_t *pbuf, u32 size, int num) 276 { 277 int i; 278 279 for (i = 0; i < num; i++) { 280 vbuf[i] = pci_alloc_consistent(pdev, size, &pbuf[i]); 281 if (!vbuf[i]) 282 return -ENOMEM; 283 } 284 return 0; 285 } 286 287 static int ddb_buffers_alloc(struct ddb *dev) 288 { 289 int i; 290 struct ddb_port *port; 291 292 for (i = 0; i < dev->info->port_num; i++) { 293 port = &dev->port[i]; 294 switch (port->class) { 295 case DDB_PORT_TUNER: 296 if (io_alloc(dev->pdev, port->input[0]->vbuf, 297 port->input[0]->pbuf, 298 port->input[0]->dma_buf_size, 299 port->input[0]->dma_buf_num) < 0) 300 return -1; 301 if (io_alloc(dev->pdev, port->input[1]->vbuf, 302 port->input[1]->pbuf, 303 port->input[1]->dma_buf_size, 304 port->input[1]->dma_buf_num) < 0) 305 return -1; 306 break; 307 case DDB_PORT_CI: 308 if (io_alloc(dev->pdev, port->input[0]->vbuf, 309 port->input[0]->pbuf, 310 port->input[0]->dma_buf_size, 311 port->input[0]->dma_buf_num) < 0) 312 return -1; 313 if (io_alloc(dev->pdev, port->output->vbuf, 314 port->output->pbuf, 315 port->output->dma_buf_size, 316 port->output->dma_buf_num) < 0) 317 return -1; 318 break; 319 default: 320 break; 321 } 322 } 323 ddb_address_table(dev); 324 return 0; 325 } 326 327 static void ddb_buffers_free(struct ddb *dev) 328 { 329 int i; 330 struct ddb_port *port; 331 332 for (i = 0; i < dev->info->port_num; i++) { 333 port = &dev->port[i]; 334 io_free(dev->pdev, port->input[0]->vbuf, 335 port->input[0]->pbuf, 336 port->input[0]->dma_buf_size, 337 port->input[0]->dma_buf_num); 338 io_free(dev->pdev, port->input[1]->vbuf, 339 port->input[1]->pbuf, 340 port->input[1]->dma_buf_size, 341 port->input[1]->dma_buf_num); 342 io_free(dev->pdev, port->output->vbuf, 343 port->output->pbuf, 344 port->output->dma_buf_size, 345 port->output->dma_buf_num); 346 } 347 } 348 349 static void ddb_input_start(struct ddb_input *input) 350 { 351 struct ddb *dev = input->port->dev; 352 353 spin_lock_irq(&input->lock); 354 input->cbuf = 0; 355 input->coff = 0; 356 357 /* reset */ 358 ddbwritel(0, TS_INPUT_CONTROL(input->nr)); 359 ddbwritel(2, TS_INPUT_CONTROL(input->nr)); 360 ddbwritel(0, TS_INPUT_CONTROL(input->nr)); 361 362 ddbwritel((1 << 16) | 363 (input->dma_buf_num << 11) | 364 (input->dma_buf_size >> 7), 365 DMA_BUFFER_SIZE(input->nr)); 366 ddbwritel(0, DMA_BUFFER_ACK(input->nr)); 367 368 ddbwritel(1, DMA_BASE_WRITE); 369 ddbwritel(3, DMA_BUFFER_CONTROL(input->nr)); 370 ddbwritel(9, TS_INPUT_CONTROL(input->nr)); 371 input->running = 1; 372 spin_unlock_irq(&input->lock); 373 } 374 375 static void ddb_input_stop(struct ddb_input *input) 376 { 377 struct ddb *dev = input->port->dev; 378 379 spin_lock_irq(&input->lock); 380 ddbwritel(0, TS_INPUT_CONTROL(input->nr)); 381 ddbwritel(0, DMA_BUFFER_CONTROL(input->nr)); 382 input->running = 0; 383 spin_unlock_irq(&input->lock); 384 } 385 386 static void ddb_output_start(struct ddb_output *output) 387 { 388 struct ddb *dev = output->port->dev; 389 390 spin_lock_irq(&output->lock); 391 output->cbuf = 0; 392 output->coff = 0; 393 ddbwritel(0, TS_OUTPUT_CONTROL(output->nr)); 394 ddbwritel(2, TS_OUTPUT_CONTROL(output->nr)); 395 ddbwritel(0, TS_OUTPUT_CONTROL(output->nr)); 396 ddbwritel(0x3c, TS_OUTPUT_CONTROL(output->nr)); 397 ddbwritel((1 << 16) | 398 (output->dma_buf_num << 11) | 399 (output->dma_buf_size >> 7), 400 DMA_BUFFER_SIZE(output->nr + 8)); 401 ddbwritel(0, DMA_BUFFER_ACK(output->nr + 8)); 402 403 ddbwritel(1, DMA_BASE_READ); 404 ddbwritel(3, DMA_BUFFER_CONTROL(output->nr + 8)); 405 /* ddbwritel(0xbd, TS_OUTPUT_CONTROL(output->nr)); */ 406 ddbwritel(0x1d, TS_OUTPUT_CONTROL(output->nr)); 407 output->running = 1; 408 spin_unlock_irq(&output->lock); 409 } 410 411 static void ddb_output_stop(struct ddb_output *output) 412 { 413 struct ddb *dev = output->port->dev; 414 415 spin_lock_irq(&output->lock); 416 ddbwritel(0, TS_OUTPUT_CONTROL(output->nr)); 417 ddbwritel(0, DMA_BUFFER_CONTROL(output->nr + 8)); 418 output->running = 0; 419 spin_unlock_irq(&output->lock); 420 } 421 422 static u32 ddb_output_free(struct ddb_output *output) 423 { 424 u32 idx, off, stat = output->stat; 425 s32 diff; 426 427 idx = (stat >> 11) & 0x1f; 428 off = (stat & 0x7ff) << 7; 429 430 if (output->cbuf != idx) { 431 if ((((output->cbuf + 1) % output->dma_buf_num) == idx) && 432 (output->dma_buf_size - output->coff <= 188)) 433 return 0; 434 return 188; 435 } 436 diff = off - output->coff; 437 if (diff <= 0 || diff > 188) 438 return 188; 439 return 0; 440 } 441 442 static ssize_t ddb_output_write(struct ddb_output *output, 443 const u8 *buf, size_t count) 444 { 445 struct ddb *dev = output->port->dev; 446 u32 idx, off, stat = output->stat; 447 u32 left = count, len; 448 449 idx = (stat >> 11) & 0x1f; 450 off = (stat & 0x7ff) << 7; 451 452 while (left) { 453 len = output->dma_buf_size - output->coff; 454 if ((((output->cbuf + 1) % output->dma_buf_num) == idx) && 455 (off == 0)) { 456 if (len <= 188) 457 break; 458 len -= 188; 459 } 460 if (output->cbuf == idx) { 461 if (off > output->coff) { 462 #if 1 463 len = off - output->coff; 464 len -= (len % 188); 465 if (len <= 188) 466 467 #endif 468 break; 469 len -= 188; 470 } 471 } 472 if (len > left) 473 len = left; 474 if (copy_from_user(output->vbuf[output->cbuf] + output->coff, 475 buf, len)) 476 return -EIO; 477 left -= len; 478 buf += len; 479 output->coff += len; 480 if (output->coff == output->dma_buf_size) { 481 output->coff = 0; 482 output->cbuf = ((output->cbuf + 1) % output->dma_buf_num); 483 } 484 ddbwritel((output->cbuf << 11) | (output->coff >> 7), 485 DMA_BUFFER_ACK(output->nr + 8)); 486 } 487 return count - left; 488 } 489 490 static u32 ddb_input_avail(struct ddb_input *input) 491 { 492 struct ddb *dev = input->port->dev; 493 u32 idx, off, stat = input->stat; 494 u32 ctrl = ddbreadl(DMA_BUFFER_CONTROL(input->nr)); 495 496 idx = (stat >> 11) & 0x1f; 497 off = (stat & 0x7ff) << 7; 498 499 if (ctrl & 4) { 500 printk(KERN_ERR "IA %d %d %08x\n", idx, off, ctrl); 501 ddbwritel(input->stat, DMA_BUFFER_ACK(input->nr)); 502 return 0; 503 } 504 if (input->cbuf != idx) 505 return 188; 506 return 0; 507 } 508 509 static ssize_t ddb_input_read(struct ddb_input *input, u8 *buf, size_t count) 510 { 511 struct ddb *dev = input->port->dev; 512 u32 left = count; 513 u32 idx, free, stat = input->stat; 514 int ret; 515 516 idx = (stat >> 11) & 0x1f; 517 518 while (left) { 519 if (input->cbuf == idx) 520 return count - left; 521 free = input->dma_buf_size - input->coff; 522 if (free > left) 523 free = left; 524 ret = copy_to_user(buf, input->vbuf[input->cbuf] + 525 input->coff, free); 526 if (ret) 527 return -EFAULT; 528 input->coff += free; 529 if (input->coff == input->dma_buf_size) { 530 input->coff = 0; 531 input->cbuf = (input->cbuf+1) % input->dma_buf_num; 532 } 533 left -= free; 534 ddbwritel((input->cbuf << 11) | (input->coff >> 7), 535 DMA_BUFFER_ACK(input->nr)); 536 } 537 return count; 538 } 539 540 /******************************************************************************/ 541 /******************************************************************************/ 542 /******************************************************************************/ 543 544 #if 0 545 static struct ddb_input *fe2input(struct ddb *dev, struct dvb_frontend *fe) 546 { 547 int i; 548 549 for (i = 0; i < dev->info->port_num * 2; i++) { 550 if (dev->input[i].fe == fe) 551 return &dev->input[i]; 552 } 553 return NULL; 554 } 555 #endif 556 557 static int drxk_gate_ctrl(struct dvb_frontend *fe, int enable) 558 { 559 struct ddb_input *input = fe->sec_priv; 560 struct ddb_port *port = input->port; 561 int status; 562 563 if (enable) { 564 mutex_lock(&port->i2c_gate_lock); 565 status = input->gate_ctrl(fe, 1); 566 } else { 567 status = input->gate_ctrl(fe, 0); 568 mutex_unlock(&port->i2c_gate_lock); 569 } 570 return status; 571 } 572 573 static int demod_attach_drxk(struct ddb_input *input) 574 { 575 struct i2c_adapter *i2c = &input->port->i2c->adap; 576 struct dvb_frontend *fe; 577 struct drxk_config config; 578 579 memset(&config, 0, sizeof(config)); 580 config.microcode_name = "drxk_a3.mc"; 581 config.qam_demod_parameter_count = 4; 582 config.adr = 0x29 + (input->nr & 1); 583 584 fe = input->fe = dvb_attach(drxk_attach, &config, i2c); 585 if (!input->fe) { 586 printk(KERN_ERR "No DRXK found!\n"); 587 return -ENODEV; 588 } 589 fe->sec_priv = input; 590 input->gate_ctrl = fe->ops.i2c_gate_ctrl; 591 fe->ops.i2c_gate_ctrl = drxk_gate_ctrl; 592 return 0; 593 } 594 595 static int tuner_attach_tda18271(struct ddb_input *input) 596 { 597 struct i2c_adapter *i2c = &input->port->i2c->adap; 598 struct dvb_frontend *fe; 599 600 if (input->fe->ops.i2c_gate_ctrl) 601 input->fe->ops.i2c_gate_ctrl(input->fe, 1); 602 fe = dvb_attach(tda18271c2dd_attach, input->fe, i2c, 0x60); 603 if (!fe) { 604 printk(KERN_ERR "No TDA18271 found!\n"); 605 return -ENODEV; 606 } 607 if (input->fe->ops.i2c_gate_ctrl) 608 input->fe->ops.i2c_gate_ctrl(input->fe, 0); 609 return 0; 610 } 611 612 /******************************************************************************/ 613 /******************************************************************************/ 614 /******************************************************************************/ 615 616 static struct stv090x_config stv0900 = { 617 .device = STV0900, 618 .demod_mode = STV090x_DUAL, 619 .clk_mode = STV090x_CLK_EXT, 620 621 .xtal = 27000000, 622 .address = 0x69, 623 624 .ts1_mode = STV090x_TSMODE_SERIAL_PUNCTURED, 625 .ts2_mode = STV090x_TSMODE_SERIAL_PUNCTURED, 626 627 .repeater_level = STV090x_RPTLEVEL_16, 628 629 .adc1_range = STV090x_ADC_1Vpp, 630 .adc2_range = STV090x_ADC_1Vpp, 631 632 .diseqc_envelope_mode = true, 633 }; 634 635 static struct stv090x_config stv0900_aa = { 636 .device = STV0900, 637 .demod_mode = STV090x_DUAL, 638 .clk_mode = STV090x_CLK_EXT, 639 640 .xtal = 27000000, 641 .address = 0x68, 642 643 .ts1_mode = STV090x_TSMODE_SERIAL_PUNCTURED, 644 .ts2_mode = STV090x_TSMODE_SERIAL_PUNCTURED, 645 646 .repeater_level = STV090x_RPTLEVEL_16, 647 648 .adc1_range = STV090x_ADC_1Vpp, 649 .adc2_range = STV090x_ADC_1Vpp, 650 651 .diseqc_envelope_mode = true, 652 }; 653 654 static struct stv6110x_config stv6110a = { 655 .addr = 0x60, 656 .refclk = 27000000, 657 .clk_div = 1, 658 }; 659 660 static struct stv6110x_config stv6110b = { 661 .addr = 0x63, 662 .refclk = 27000000, 663 .clk_div = 1, 664 }; 665 666 static int demod_attach_stv0900(struct ddb_input *input, int type) 667 { 668 struct i2c_adapter *i2c = &input->port->i2c->adap; 669 struct stv090x_config *feconf = type ? &stv0900_aa : &stv0900; 670 671 input->fe = dvb_attach(stv090x_attach, feconf, i2c, 672 (input->nr & 1) ? STV090x_DEMODULATOR_1 673 : STV090x_DEMODULATOR_0); 674 if (!input->fe) { 675 printk(KERN_ERR "No STV0900 found!\n"); 676 return -ENODEV; 677 } 678 if (!dvb_attach(lnbh24_attach, input->fe, i2c, 0, 679 0, (input->nr & 1) ? 680 (0x09 - type) : (0x0b - type))) { 681 printk(KERN_ERR "No LNBH24 found!\n"); 682 return -ENODEV; 683 } 684 return 0; 685 } 686 687 static int tuner_attach_stv6110(struct ddb_input *input, int type) 688 { 689 struct i2c_adapter *i2c = &input->port->i2c->adap; 690 struct stv090x_config *feconf = type ? &stv0900_aa : &stv0900; 691 struct stv6110x_config *tunerconf = (input->nr & 1) ? 692 &stv6110b : &stv6110a; 693 struct stv6110x_devctl *ctl; 694 695 ctl = dvb_attach(stv6110x_attach, input->fe, tunerconf, i2c); 696 if (!ctl) { 697 printk(KERN_ERR "No STV6110X found!\n"); 698 return -ENODEV; 699 } 700 printk(KERN_INFO "attach tuner input %d adr %02x\n", 701 input->nr, tunerconf->addr); 702 703 feconf->tuner_init = ctl->tuner_init; 704 feconf->tuner_sleep = ctl->tuner_sleep; 705 feconf->tuner_set_mode = ctl->tuner_set_mode; 706 feconf->tuner_set_frequency = ctl->tuner_set_frequency; 707 feconf->tuner_get_frequency = ctl->tuner_get_frequency; 708 feconf->tuner_set_bandwidth = ctl->tuner_set_bandwidth; 709 feconf->tuner_get_bandwidth = ctl->tuner_get_bandwidth; 710 feconf->tuner_set_bbgain = ctl->tuner_set_bbgain; 711 feconf->tuner_get_bbgain = ctl->tuner_get_bbgain; 712 feconf->tuner_set_refclk = ctl->tuner_set_refclk; 713 feconf->tuner_get_status = ctl->tuner_get_status; 714 715 return 0; 716 } 717 718 static int my_dvb_dmx_ts_card_init(struct dvb_demux *dvbdemux, char *id, 719 int (*start_feed)(struct dvb_demux_feed *), 720 int (*stop_feed)(struct dvb_demux_feed *), 721 void *priv) 722 { 723 dvbdemux->priv = priv; 724 725 dvbdemux->filternum = 256; 726 dvbdemux->feednum = 256; 727 dvbdemux->start_feed = start_feed; 728 dvbdemux->stop_feed = stop_feed; 729 dvbdemux->write_to_decoder = NULL; 730 dvbdemux->dmx.capabilities = (DMX_TS_FILTERING | 731 DMX_SECTION_FILTERING | 732 DMX_MEMORY_BASED_FILTERING); 733 return dvb_dmx_init(dvbdemux); 734 } 735 736 static int my_dvb_dmxdev_ts_card_init(struct dmxdev *dmxdev, 737 struct dvb_demux *dvbdemux, 738 struct dmx_frontend *hw_frontend, 739 struct dmx_frontend *mem_frontend, 740 struct dvb_adapter *dvb_adapter) 741 { 742 int ret; 743 744 dmxdev->filternum = 256; 745 dmxdev->demux = &dvbdemux->dmx; 746 dmxdev->capabilities = 0; 747 ret = dvb_dmxdev_init(dmxdev, dvb_adapter); 748 if (ret < 0) 749 return ret; 750 751 hw_frontend->source = DMX_FRONTEND_0; 752 dvbdemux->dmx.add_frontend(&dvbdemux->dmx, hw_frontend); 753 mem_frontend->source = DMX_MEMORY_FE; 754 dvbdemux->dmx.add_frontend(&dvbdemux->dmx, mem_frontend); 755 return dvbdemux->dmx.connect_frontend(&dvbdemux->dmx, hw_frontend); 756 } 757 758 static int start_feed(struct dvb_demux_feed *dvbdmxfeed) 759 { 760 struct dvb_demux *dvbdmx = dvbdmxfeed->demux; 761 struct ddb_input *input = dvbdmx->priv; 762 763 if (!input->users) 764 ddb_input_start(input); 765 766 return ++input->users; 767 } 768 769 static int stop_feed(struct dvb_demux_feed *dvbdmxfeed) 770 { 771 struct dvb_demux *dvbdmx = dvbdmxfeed->demux; 772 struct ddb_input *input = dvbdmx->priv; 773 774 if (--input->users) 775 return input->users; 776 777 ddb_input_stop(input); 778 return 0; 779 } 780 781 782 static void dvb_input_detach(struct ddb_input *input) 783 { 784 struct dvb_adapter *adap = &input->adap; 785 struct dvb_demux *dvbdemux = &input->demux; 786 787 switch (input->attached) { 788 case 5: 789 if (input->fe2) 790 dvb_unregister_frontend(input->fe2); 791 if (input->fe) { 792 dvb_unregister_frontend(input->fe); 793 dvb_frontend_detach(input->fe); 794 input->fe = NULL; 795 } 796 case 4: 797 dvb_net_release(&input->dvbnet); 798 799 case 3: 800 dvbdemux->dmx.close(&dvbdemux->dmx); 801 dvbdemux->dmx.remove_frontend(&dvbdemux->dmx, 802 &input->hw_frontend); 803 dvbdemux->dmx.remove_frontend(&dvbdemux->dmx, 804 &input->mem_frontend); 805 dvb_dmxdev_release(&input->dmxdev); 806 807 case 2: 808 dvb_dmx_release(&input->demux); 809 810 case 1: 811 dvb_unregister_adapter(adap); 812 } 813 input->attached = 0; 814 } 815 816 static int dvb_input_attach(struct ddb_input *input) 817 { 818 int ret; 819 struct ddb_port *port = input->port; 820 struct dvb_adapter *adap = &input->adap; 821 struct dvb_demux *dvbdemux = &input->demux; 822 823 ret = dvb_register_adapter(adap, "DDBridge", THIS_MODULE, 824 &input->port->dev->pdev->dev, 825 adapter_nr); 826 if (ret < 0) { 827 printk(KERN_ERR "ddbridge: Could not register adapter." 828 "Check if you enabled enough adapters in dvb-core!\n"); 829 return ret; 830 } 831 input->attached = 1; 832 833 ret = my_dvb_dmx_ts_card_init(dvbdemux, "SW demux", 834 start_feed, 835 stop_feed, input); 836 if (ret < 0) 837 return ret; 838 input->attached = 2; 839 840 ret = my_dvb_dmxdev_ts_card_init(&input->dmxdev, &input->demux, 841 &input->hw_frontend, 842 &input->mem_frontend, adap); 843 if (ret < 0) 844 return ret; 845 input->attached = 3; 846 847 ret = dvb_net_init(adap, &input->dvbnet, input->dmxdev.demux); 848 if (ret < 0) 849 return ret; 850 input->attached = 4; 851 852 input->fe = 0; 853 switch (port->type) { 854 case DDB_TUNER_DVBS_ST: 855 if (demod_attach_stv0900(input, 0) < 0) 856 return -ENODEV; 857 if (tuner_attach_stv6110(input, 0) < 0) 858 return -ENODEV; 859 if (input->fe) { 860 if (dvb_register_frontend(adap, input->fe) < 0) 861 return -ENODEV; 862 } 863 break; 864 case DDB_TUNER_DVBS_ST_AA: 865 if (demod_attach_stv0900(input, 1) < 0) 866 return -ENODEV; 867 if (tuner_attach_stv6110(input, 1) < 0) 868 return -ENODEV; 869 if (input->fe) { 870 if (dvb_register_frontend(adap, input->fe) < 0) 871 return -ENODEV; 872 } 873 break; 874 case DDB_TUNER_DVBCT_TR: 875 if (demod_attach_drxk(input) < 0) 876 return -ENODEV; 877 if (tuner_attach_tda18271(input) < 0) 878 return -ENODEV; 879 if (dvb_register_frontend(adap, input->fe) < 0) 880 return -ENODEV; 881 if (input->fe2) { 882 if (dvb_register_frontend(adap, input->fe2) < 0) 883 return -ENODEV; 884 input->fe2->tuner_priv = input->fe->tuner_priv; 885 memcpy(&input->fe2->ops.tuner_ops, 886 &input->fe->ops.tuner_ops, 887 sizeof(struct dvb_tuner_ops)); 888 } 889 break; 890 } 891 input->attached = 5; 892 return 0; 893 } 894 895 /****************************************************************************/ 896 /****************************************************************************/ 897 898 static ssize_t ts_write(struct file *file, const char *buf, 899 size_t count, loff_t *ppos) 900 { 901 struct dvb_device *dvbdev = file->private_data; 902 struct ddb_output *output = dvbdev->priv; 903 size_t left = count; 904 int stat; 905 906 while (left) { 907 if (ddb_output_free(output) < 188) { 908 if (file->f_flags & O_NONBLOCK) 909 break; 910 if (wait_event_interruptible( 911 output->wq, ddb_output_free(output) >= 188) < 0) 912 break; 913 } 914 stat = ddb_output_write(output, buf, left); 915 if (stat < 0) 916 break; 917 buf += stat; 918 left -= stat; 919 } 920 return (left == count) ? -EAGAIN : (count - left); 921 } 922 923 static ssize_t ts_read(struct file *file, char *buf, 924 size_t count, loff_t *ppos) 925 { 926 struct dvb_device *dvbdev = file->private_data; 927 struct ddb_output *output = dvbdev->priv; 928 struct ddb_input *input = output->port->input[0]; 929 int left, read; 930 931 count -= count % 188; 932 left = count; 933 while (left) { 934 if (ddb_input_avail(input) < 188) { 935 if (file->f_flags & O_NONBLOCK) 936 break; 937 if (wait_event_interruptible( 938 input->wq, ddb_input_avail(input) >= 188) < 0) 939 break; 940 } 941 read = ddb_input_read(input, buf, left); 942 if (read < 0) 943 return read; 944 left -= read; 945 buf += read; 946 } 947 return (left == count) ? -EAGAIN : (count - left); 948 } 949 950 static unsigned int ts_poll(struct file *file, poll_table *wait) 951 { 952 /* 953 struct dvb_device *dvbdev = file->private_data; 954 struct ddb_output *output = dvbdev->priv; 955 struct ddb_input *input = output->port->input[0]; 956 */ 957 unsigned int mask = 0; 958 959 #if 0 960 if (data_avail_to_read) 961 mask |= POLLIN | POLLRDNORM; 962 if (data_avail_to_write) 963 mask |= POLLOUT | POLLWRNORM; 964 965 poll_wait(file, &read_queue, wait); 966 poll_wait(file, &write_queue, wait); 967 #endif 968 return mask; 969 } 970 971 static const struct file_operations ci_fops = { 972 .owner = THIS_MODULE, 973 .read = ts_read, 974 .write = ts_write, 975 .open = dvb_generic_open, 976 .release = dvb_generic_release, 977 .poll = ts_poll, 978 .mmap = 0, 979 }; 980 981 static struct dvb_device dvbdev_ci = { 982 .priv = 0, 983 .readers = -1, 984 .writers = -1, 985 .users = -1, 986 .fops = &ci_fops, 987 }; 988 989 /****************************************************************************/ 990 /****************************************************************************/ 991 /****************************************************************************/ 992 993 static void input_tasklet(unsigned long data) 994 { 995 struct ddb_input *input = (struct ddb_input *) data; 996 struct ddb *dev = input->port->dev; 997 998 spin_lock(&input->lock); 999 if (!input->running) { 1000 spin_unlock(&input->lock); 1001 return; 1002 } 1003 input->stat = ddbreadl(DMA_BUFFER_CURRENT(input->nr)); 1004 1005 if (input->port->class == DDB_PORT_TUNER) { 1006 if (4&ddbreadl(DMA_BUFFER_CONTROL(input->nr))) 1007 printk(KERN_ERR "Overflow input %d\n", input->nr); 1008 while (input->cbuf != ((input->stat >> 11) & 0x1f) 1009 || (4&ddbreadl(DMA_BUFFER_CONTROL(input->nr)))) { 1010 dvb_dmx_swfilter_packets(&input->demux, 1011 input->vbuf[input->cbuf], 1012 input->dma_buf_size / 188); 1013 1014 input->cbuf = (input->cbuf + 1) % input->dma_buf_num; 1015 ddbwritel((input->cbuf << 11), 1016 DMA_BUFFER_ACK(input->nr)); 1017 input->stat = ddbreadl(DMA_BUFFER_CURRENT(input->nr)); 1018 } 1019 } 1020 if (input->port->class == DDB_PORT_CI) 1021 wake_up(&input->wq); 1022 spin_unlock(&input->lock); 1023 } 1024 1025 static void output_tasklet(unsigned long data) 1026 { 1027 struct ddb_output *output = (struct ddb_output *) data; 1028 struct ddb *dev = output->port->dev; 1029 1030 spin_lock(&output->lock); 1031 if (!output->running) { 1032 spin_unlock(&output->lock); 1033 return; 1034 } 1035 output->stat = ddbreadl(DMA_BUFFER_CURRENT(output->nr + 8)); 1036 wake_up(&output->wq); 1037 spin_unlock(&output->lock); 1038 } 1039 1040 1041 struct cxd2099_cfg cxd_cfg = { 1042 .bitrate = 62000, 1043 .adr = 0x40, 1044 .polarity = 1, 1045 .clock_mode = 1, 1046 }; 1047 1048 static int ddb_ci_attach(struct ddb_port *port) 1049 { 1050 int ret; 1051 1052 ret = dvb_register_adapter(&port->output->adap, 1053 "DDBridge", 1054 THIS_MODULE, 1055 &port->dev->pdev->dev, 1056 adapter_nr); 1057 if (ret < 0) 1058 return ret; 1059 port->en = cxd2099_attach(&cxd_cfg, port, &port->i2c->adap); 1060 if (!port->en) { 1061 dvb_unregister_adapter(&port->output->adap); 1062 return -ENODEV; 1063 } 1064 ddb_input_start(port->input[0]); 1065 ddb_output_start(port->output); 1066 dvb_ca_en50221_init(&port->output->adap, 1067 port->en, 0, 1); 1068 ret = dvb_register_device(&port->output->adap, &port->output->dev, 1069 &dvbdev_ci, (void *) port->output, 1070 DVB_DEVICE_SEC); 1071 return ret; 1072 } 1073 1074 static int ddb_port_attach(struct ddb_port *port) 1075 { 1076 int ret = 0; 1077 1078 switch (port->class) { 1079 case DDB_PORT_TUNER: 1080 ret = dvb_input_attach(port->input[0]); 1081 if (ret < 0) 1082 break; 1083 ret = dvb_input_attach(port->input[1]); 1084 break; 1085 case DDB_PORT_CI: 1086 ret = ddb_ci_attach(port); 1087 break; 1088 default: 1089 break; 1090 } 1091 if (ret < 0) 1092 printk(KERN_ERR "port_attach on port %d failed\n", port->nr); 1093 return ret; 1094 } 1095 1096 static int ddb_ports_attach(struct ddb *dev) 1097 { 1098 int i, ret = 0; 1099 struct ddb_port *port; 1100 1101 for (i = 0; i < dev->info->port_num; i++) { 1102 port = &dev->port[i]; 1103 ret = ddb_port_attach(port); 1104 if (ret < 0) 1105 break; 1106 } 1107 return ret; 1108 } 1109 1110 static void ddb_ports_detach(struct ddb *dev) 1111 { 1112 int i; 1113 struct ddb_port *port; 1114 1115 for (i = 0; i < dev->info->port_num; i++) { 1116 port = &dev->port[i]; 1117 switch (port->class) { 1118 case DDB_PORT_TUNER: 1119 dvb_input_detach(port->input[0]); 1120 dvb_input_detach(port->input[1]); 1121 break; 1122 case DDB_PORT_CI: 1123 if (port->output->dev) 1124 dvb_unregister_device(port->output->dev); 1125 if (port->en) { 1126 ddb_input_stop(port->input[0]); 1127 ddb_output_stop(port->output); 1128 dvb_ca_en50221_release(port->en); 1129 kfree(port->en); 1130 port->en = 0; 1131 dvb_unregister_adapter(&port->output->adap); 1132 } 1133 break; 1134 } 1135 } 1136 } 1137 1138 /****************************************************************************/ 1139 /****************************************************************************/ 1140 1141 static int port_has_ci(struct ddb_port *port) 1142 { 1143 u8 val; 1144 return i2c_read_reg(&port->i2c->adap, 0x40, 0, &val) ? 0 : 1; 1145 } 1146 1147 static int port_has_stv0900(struct ddb_port *port) 1148 { 1149 u8 val; 1150 if (i2c_read_reg16(&port->i2c->adap, 0x69, 0xf100, &val) < 0) 1151 return 0; 1152 return 1; 1153 } 1154 1155 static int port_has_stv0900_aa(struct ddb_port *port) 1156 { 1157 u8 val; 1158 if (i2c_read_reg16(&port->i2c->adap, 0x68, 0xf100, &val) < 0) 1159 return 0; 1160 return 1; 1161 } 1162 1163 static int port_has_drxks(struct ddb_port *port) 1164 { 1165 u8 val; 1166 if (i2c_read(&port->i2c->adap, 0x29, &val) < 0) 1167 return 0; 1168 if (i2c_read(&port->i2c->adap, 0x2a, &val) < 0) 1169 return 0; 1170 return 1; 1171 } 1172 1173 static void ddb_port_probe(struct ddb_port *port) 1174 { 1175 struct ddb *dev = port->dev; 1176 char *modname = "NO MODULE"; 1177 1178 port->class = DDB_PORT_NONE; 1179 1180 if (port_has_ci(port)) { 1181 modname = "CI"; 1182 port->class = DDB_PORT_CI; 1183 ddbwritel(I2C_SPEED_400, port->i2c->regs + I2C_TIMING); 1184 } else if (port_has_stv0900(port)) { 1185 modname = "DUAL DVB-S2"; 1186 port->class = DDB_PORT_TUNER; 1187 port->type = DDB_TUNER_DVBS_ST; 1188 ddbwritel(I2C_SPEED_100, port->i2c->regs + I2C_TIMING); 1189 } else if (port_has_stv0900_aa(port)) { 1190 modname = "DUAL DVB-S2"; 1191 port->class = DDB_PORT_TUNER; 1192 port->type = DDB_TUNER_DVBS_ST_AA; 1193 ddbwritel(I2C_SPEED_100, port->i2c->regs + I2C_TIMING); 1194 } else if (port_has_drxks(port)) { 1195 modname = "DUAL DVB-C/T"; 1196 port->class = DDB_PORT_TUNER; 1197 port->type = DDB_TUNER_DVBCT_TR; 1198 ddbwritel(I2C_SPEED_400, port->i2c->regs + I2C_TIMING); 1199 } 1200 printk(KERN_INFO "Port %d (TAB %d): %s\n", 1201 port->nr, port->nr+1, modname); 1202 } 1203 1204 static void ddb_input_init(struct ddb_port *port, int nr) 1205 { 1206 struct ddb *dev = port->dev; 1207 struct ddb_input *input = &dev->input[nr]; 1208 1209 input->nr = nr; 1210 input->port = port; 1211 input->dma_buf_num = INPUT_DMA_BUFS; 1212 input->dma_buf_size = INPUT_DMA_SIZE; 1213 ddbwritel(0, TS_INPUT_CONTROL(nr)); 1214 ddbwritel(2, TS_INPUT_CONTROL(nr)); 1215 ddbwritel(0, TS_INPUT_CONTROL(nr)); 1216 ddbwritel(0, DMA_BUFFER_ACK(nr)); 1217 tasklet_init(&input->tasklet, input_tasklet, (unsigned long) input); 1218 spin_lock_init(&input->lock); 1219 init_waitqueue_head(&input->wq); 1220 } 1221 1222 static void ddb_output_init(struct ddb_port *port, int nr) 1223 { 1224 struct ddb *dev = port->dev; 1225 struct ddb_output *output = &dev->output[nr]; 1226 output->nr = nr; 1227 output->port = port; 1228 output->dma_buf_num = OUTPUT_DMA_BUFS; 1229 output->dma_buf_size = OUTPUT_DMA_SIZE; 1230 1231 ddbwritel(0, TS_OUTPUT_CONTROL(nr)); 1232 ddbwritel(2, TS_OUTPUT_CONTROL(nr)); 1233 ddbwritel(0, TS_OUTPUT_CONTROL(nr)); 1234 tasklet_init(&output->tasklet, output_tasklet, (unsigned long) output); 1235 init_waitqueue_head(&output->wq); 1236 } 1237 1238 static void ddb_ports_init(struct ddb *dev) 1239 { 1240 int i; 1241 struct ddb_port *port; 1242 1243 for (i = 0; i < dev->info->port_num; i++) { 1244 port = &dev->port[i]; 1245 port->dev = dev; 1246 port->nr = i; 1247 port->i2c = &dev->i2c[i]; 1248 port->input[0] = &dev->input[2 * i]; 1249 port->input[1] = &dev->input[2 * i + 1]; 1250 port->output = &dev->output[i]; 1251 1252 mutex_init(&port->i2c_gate_lock); 1253 ddb_port_probe(port); 1254 ddb_input_init(port, 2 * i); 1255 ddb_input_init(port, 2 * i + 1); 1256 ddb_output_init(port, i); 1257 } 1258 } 1259 1260 static void ddb_ports_release(struct ddb *dev) 1261 { 1262 int i; 1263 struct ddb_port *port; 1264 1265 for (i = 0; i < dev->info->port_num; i++) { 1266 port = &dev->port[i]; 1267 port->dev = dev; 1268 tasklet_kill(&port->input[0]->tasklet); 1269 tasklet_kill(&port->input[1]->tasklet); 1270 tasklet_kill(&port->output->tasklet); 1271 } 1272 } 1273 1274 /****************************************************************************/ 1275 /****************************************************************************/ 1276 /****************************************************************************/ 1277 1278 static void irq_handle_i2c(struct ddb *dev, int n) 1279 { 1280 struct ddb_i2c *i2c = &dev->i2c[n]; 1281 1282 i2c->done = 1; 1283 wake_up(&i2c->wq); 1284 } 1285 1286 static irqreturn_t irq_handler(int irq, void *dev_id) 1287 { 1288 struct ddb *dev = (struct ddb *) dev_id; 1289 u32 s = ddbreadl(INTERRUPT_STATUS); 1290 1291 if (!s) 1292 return IRQ_NONE; 1293 1294 do { 1295 ddbwritel(s, INTERRUPT_ACK); 1296 1297 if (s & 0x00000001) 1298 irq_handle_i2c(dev, 0); 1299 if (s & 0x00000002) 1300 irq_handle_i2c(dev, 1); 1301 if (s & 0x00000004) 1302 irq_handle_i2c(dev, 2); 1303 if (s & 0x00000008) 1304 irq_handle_i2c(dev, 3); 1305 1306 if (s & 0x00000100) 1307 tasklet_schedule(&dev->input[0].tasklet); 1308 if (s & 0x00000200) 1309 tasklet_schedule(&dev->input[1].tasklet); 1310 if (s & 0x00000400) 1311 tasklet_schedule(&dev->input[2].tasklet); 1312 if (s & 0x00000800) 1313 tasklet_schedule(&dev->input[3].tasklet); 1314 if (s & 0x00001000) 1315 tasklet_schedule(&dev->input[4].tasklet); 1316 if (s & 0x00002000) 1317 tasklet_schedule(&dev->input[5].tasklet); 1318 if (s & 0x00004000) 1319 tasklet_schedule(&dev->input[6].tasklet); 1320 if (s & 0x00008000) 1321 tasklet_schedule(&dev->input[7].tasklet); 1322 1323 if (s & 0x00010000) 1324 tasklet_schedule(&dev->output[0].tasklet); 1325 if (s & 0x00020000) 1326 tasklet_schedule(&dev->output[1].tasklet); 1327 if (s & 0x00040000) 1328 tasklet_schedule(&dev->output[2].tasklet); 1329 if (s & 0x00080000) 1330 tasklet_schedule(&dev->output[3].tasklet); 1331 1332 /* if (s & 0x000f0000) printk(KERN_DEBUG "%08x\n", istat); */ 1333 } while ((s = ddbreadl(INTERRUPT_STATUS))); 1334 1335 return IRQ_HANDLED; 1336 } 1337 1338 /******************************************************************************/ 1339 /******************************************************************************/ 1340 /******************************************************************************/ 1341 1342 static int flashio(struct ddb *dev, u8 *wbuf, u32 wlen, u8 *rbuf, u32 rlen) 1343 { 1344 u32 data, shift; 1345 1346 if (wlen > 4) 1347 ddbwritel(1, SPI_CONTROL); 1348 while (wlen > 4) { 1349 /* FIXME: check for big-endian */ 1350 data = swab32(*(u32 *)wbuf); 1351 wbuf += 4; 1352 wlen -= 4; 1353 ddbwritel(data, SPI_DATA); 1354 while (ddbreadl(SPI_CONTROL) & 0x0004) 1355 ; 1356 } 1357 1358 if (rlen) 1359 ddbwritel(0x0001 | ((wlen << (8 + 3)) & 0x1f00), SPI_CONTROL); 1360 else 1361 ddbwritel(0x0003 | ((wlen << (8 + 3)) & 0x1f00), SPI_CONTROL); 1362 1363 data = 0; 1364 shift = ((4 - wlen) * 8); 1365 while (wlen) { 1366 data <<= 8; 1367 data |= *wbuf; 1368 wlen--; 1369 wbuf++; 1370 } 1371 if (shift) 1372 data <<= shift; 1373 ddbwritel(data, SPI_DATA); 1374 while (ddbreadl(SPI_CONTROL) & 0x0004) 1375 ; 1376 1377 if (!rlen) { 1378 ddbwritel(0, SPI_CONTROL); 1379 return 0; 1380 } 1381 if (rlen > 4) 1382 ddbwritel(1, SPI_CONTROL); 1383 1384 while (rlen > 4) { 1385 ddbwritel(0xffffffff, SPI_DATA); 1386 while (ddbreadl(SPI_CONTROL) & 0x0004) 1387 ; 1388 data = ddbreadl(SPI_DATA); 1389 *(u32 *) rbuf = swab32(data); 1390 rbuf += 4; 1391 rlen -= 4; 1392 } 1393 ddbwritel(0x0003 | ((rlen << (8 + 3)) & 0x1F00), SPI_CONTROL); 1394 ddbwritel(0xffffffff, SPI_DATA); 1395 while (ddbreadl(SPI_CONTROL) & 0x0004) 1396 ; 1397 1398 data = ddbreadl(SPI_DATA); 1399 ddbwritel(0, SPI_CONTROL); 1400 1401 if (rlen < 4) 1402 data <<= ((4 - rlen) * 8); 1403 1404 while (rlen > 0) { 1405 *rbuf = ((data >> 24) & 0xff); 1406 data <<= 8; 1407 rbuf++; 1408 rlen--; 1409 } 1410 return 0; 1411 } 1412 1413 #define DDB_MAGIC 'd' 1414 1415 struct ddb_flashio { 1416 __u8 *write_buf; 1417 __u32 write_len; 1418 __u8 *read_buf; 1419 __u32 read_len; 1420 }; 1421 1422 #define IOCTL_DDB_FLASHIO _IOWR(DDB_MAGIC, 0x00, struct ddb_flashio) 1423 1424 #define DDB_NAME "ddbridge" 1425 1426 static u32 ddb_num; 1427 static struct ddb *ddbs[32]; 1428 static struct class *ddb_class; 1429 static int ddb_major; 1430 1431 static int ddb_open(struct inode *inode, struct file *file) 1432 { 1433 struct ddb *dev = ddbs[iminor(inode)]; 1434 1435 file->private_data = dev; 1436 return 0; 1437 } 1438 1439 static long ddb_ioctl(struct file *file, unsigned int cmd, unsigned long arg) 1440 { 1441 struct ddb *dev = file->private_data; 1442 void *parg = (void *)arg; 1443 int res; 1444 1445 switch (cmd) { 1446 case IOCTL_DDB_FLASHIO: 1447 { 1448 struct ddb_flashio fio; 1449 u8 *rbuf, *wbuf; 1450 1451 if (copy_from_user(&fio, parg, sizeof(fio))) 1452 return -EFAULT; 1453 1454 if (fio.write_len > 1028 || fio.read_len > 1028) 1455 return -EINVAL; 1456 if (fio.write_len + fio.read_len > 1028) 1457 return -EINVAL; 1458 1459 wbuf = &dev->iobuf[0]; 1460 rbuf = wbuf + fio.write_len; 1461 1462 if (copy_from_user(wbuf, fio.write_buf, fio.write_len)) 1463 return -EFAULT; 1464 res = flashio(dev, wbuf, fio.write_len, rbuf, fio.read_len); 1465 if (res) 1466 return res; 1467 if (copy_to_user(fio.read_buf, rbuf, fio.read_len)) 1468 return -EFAULT; 1469 break; 1470 } 1471 default: 1472 return -ENOTTY; 1473 } 1474 return 0; 1475 } 1476 1477 static const struct file_operations ddb_fops = { 1478 .unlocked_ioctl = ddb_ioctl, 1479 .open = ddb_open, 1480 }; 1481 1482 static char *ddb_devnode(struct device *device, umode_t *mode) 1483 { 1484 struct ddb *dev = dev_get_drvdata(device); 1485 1486 return kasprintf(GFP_KERNEL, "ddbridge/card%d", dev->nr); 1487 } 1488 1489 static int ddb_class_create(void) 1490 { 1491 ddb_major = register_chrdev(0, DDB_NAME, &ddb_fops); 1492 if (ddb_major < 0) 1493 return ddb_major; 1494 1495 ddb_class = class_create(THIS_MODULE, DDB_NAME); 1496 if (IS_ERR(ddb_class)) { 1497 unregister_chrdev(ddb_major, DDB_NAME); 1498 return PTR_ERR(ddb_class); 1499 } 1500 ddb_class->devnode = ddb_devnode; 1501 return 0; 1502 } 1503 1504 static void ddb_class_destroy(void) 1505 { 1506 class_destroy(ddb_class); 1507 unregister_chrdev(ddb_major, DDB_NAME); 1508 } 1509 1510 static int ddb_device_create(struct ddb *dev) 1511 { 1512 dev->nr = ddb_num++; 1513 dev->ddb_dev = device_create(ddb_class, NULL, 1514 MKDEV(ddb_major, dev->nr), 1515 dev, "ddbridge%d", dev->nr); 1516 ddbs[dev->nr] = dev; 1517 if (IS_ERR(dev->ddb_dev)) 1518 return -1; 1519 return 0; 1520 } 1521 1522 static void ddb_device_destroy(struct ddb *dev) 1523 { 1524 ddb_num--; 1525 if (IS_ERR(dev->ddb_dev)) 1526 return; 1527 device_destroy(ddb_class, MKDEV(ddb_major, 0)); 1528 } 1529 1530 1531 /****************************************************************************/ 1532 /****************************************************************************/ 1533 /****************************************************************************/ 1534 1535 static void ddb_unmap(struct ddb *dev) 1536 { 1537 if (dev->regs) 1538 iounmap(dev->regs); 1539 vfree(dev); 1540 } 1541 1542 1543 static void ddb_remove(struct pci_dev *pdev) 1544 { 1545 struct ddb *dev = pci_get_drvdata(pdev); 1546 1547 ddb_ports_detach(dev); 1548 ddb_i2c_release(dev); 1549 1550 ddbwritel(0, INTERRUPT_ENABLE); 1551 free_irq(dev->pdev->irq, dev); 1552 #ifdef CONFIG_PCI_MSI 1553 if (dev->msi) 1554 pci_disable_msi(dev->pdev); 1555 #endif 1556 ddb_ports_release(dev); 1557 ddb_buffers_free(dev); 1558 ddb_device_destroy(dev); 1559 1560 ddb_unmap(dev); 1561 pci_set_drvdata(pdev, 0); 1562 pci_disable_device(pdev); 1563 } 1564 1565 1566 static int ddb_probe(struct pci_dev *pdev, const struct pci_device_id *id) 1567 { 1568 struct ddb *dev; 1569 int stat = 0; 1570 int irq_flag = IRQF_SHARED; 1571 1572 if (pci_enable_device(pdev) < 0) 1573 return -ENODEV; 1574 1575 dev = vmalloc(sizeof(struct ddb)); 1576 if (dev == NULL) 1577 return -ENOMEM; 1578 memset(dev, 0, sizeof(struct ddb)); 1579 1580 dev->pdev = pdev; 1581 pci_set_drvdata(pdev, dev); 1582 dev->info = (struct ddb_info *) id->driver_data; 1583 printk(KERN_INFO "DDBridge driver detected: %s\n", dev->info->name); 1584 1585 dev->regs = ioremap(pci_resource_start(dev->pdev, 0), 1586 pci_resource_len(dev->pdev, 0)); 1587 if (!dev->regs) { 1588 stat = -ENOMEM; 1589 goto fail; 1590 } 1591 printk(KERN_INFO "HW %08x FW %08x\n", ddbreadl(0), ddbreadl(4)); 1592 1593 #ifdef CONFIG_PCI_MSI 1594 if (pci_msi_enabled()) 1595 stat = pci_enable_msi(dev->pdev); 1596 if (stat) { 1597 printk(KERN_INFO ": MSI not available.\n"); 1598 } else { 1599 irq_flag = 0; 1600 dev->msi = 1; 1601 } 1602 #endif 1603 stat = request_irq(dev->pdev->irq, irq_handler, 1604 irq_flag, "DDBridge", (void *) dev); 1605 if (stat < 0) 1606 goto fail1; 1607 ddbwritel(0, DMA_BASE_WRITE); 1608 ddbwritel(0, DMA_BASE_READ); 1609 ddbwritel(0xffffffff, INTERRUPT_ACK); 1610 ddbwritel(0xfff0f, INTERRUPT_ENABLE); 1611 ddbwritel(0, MSI1_ENABLE); 1612 1613 if (ddb_i2c_init(dev) < 0) 1614 goto fail1; 1615 ddb_ports_init(dev); 1616 if (ddb_buffers_alloc(dev) < 0) { 1617 printk(KERN_INFO ": Could not allocate buffer memory\n"); 1618 goto fail2; 1619 } 1620 if (ddb_ports_attach(dev) < 0) 1621 goto fail3; 1622 ddb_device_create(dev); 1623 return 0; 1624 1625 fail3: 1626 ddb_ports_detach(dev); 1627 printk(KERN_ERR "fail3\n"); 1628 ddb_ports_release(dev); 1629 fail2: 1630 printk(KERN_ERR "fail2\n"); 1631 ddb_buffers_free(dev); 1632 fail1: 1633 printk(KERN_ERR "fail1\n"); 1634 if (dev->msi) 1635 pci_disable_msi(dev->pdev); 1636 free_irq(dev->pdev->irq, dev); 1637 fail: 1638 printk(KERN_ERR "fail\n"); 1639 ddb_unmap(dev); 1640 pci_set_drvdata(pdev, 0); 1641 pci_disable_device(pdev); 1642 return -1; 1643 } 1644 1645 /******************************************************************************/ 1646 /******************************************************************************/ 1647 /******************************************************************************/ 1648 1649 static struct ddb_info ddb_none = { 1650 .type = DDB_NONE, 1651 .name = "Digital Devices PCIe bridge", 1652 }; 1653 1654 static struct ddb_info ddb_octopus = { 1655 .type = DDB_OCTOPUS, 1656 .name = "Digital Devices Octopus DVB adapter", 1657 .port_num = 4, 1658 }; 1659 1660 static struct ddb_info ddb_octopus_le = { 1661 .type = DDB_OCTOPUS, 1662 .name = "Digital Devices Octopus LE DVB adapter", 1663 .port_num = 2, 1664 }; 1665 1666 static struct ddb_info ddb_octopus_mini = { 1667 .type = DDB_OCTOPUS, 1668 .name = "Digital Devices Octopus Mini", 1669 .port_num = 4, 1670 }; 1671 1672 static struct ddb_info ddb_v6 = { 1673 .type = DDB_OCTOPUS, 1674 .name = "Digital Devices Cine S2 V6 DVB adapter", 1675 .port_num = 3, 1676 }; 1677 static struct ddb_info ddb_v6_5 = { 1678 .type = DDB_OCTOPUS, 1679 .name = "Digital Devices Cine S2 V6.5 DVB adapter", 1680 .port_num = 4, 1681 }; 1682 1683 static struct ddb_info ddb_dvbct = { 1684 .type = DDB_OCTOPUS, 1685 .name = "Digital Devices DVBCT V6.1 DVB adapter", 1686 .port_num = 3, 1687 }; 1688 1689 static struct ddb_info ddb_satixS2v3 = { 1690 .type = DDB_OCTOPUS, 1691 .name = "Mystique SaTiX-S2 V3 DVB adapter", 1692 .port_num = 3, 1693 }; 1694 1695 static struct ddb_info ddb_octopusv3 = { 1696 .type = DDB_OCTOPUS, 1697 .name = "Digital Devices Octopus V3 DVB adapter", 1698 .port_num = 4, 1699 }; 1700 1701 #define DDVID 0xdd01 /* Digital Devices Vendor ID */ 1702 1703 #define DDB_ID(_vend, _dev, _subvend, _subdev, _driverdata) { \ 1704 .vendor = _vend, .device = _dev, \ 1705 .subvendor = _subvend, .subdevice = _subdev, \ 1706 .driver_data = (unsigned long)&_driverdata } 1707 1708 static const struct pci_device_id ddb_id_tbl[] = { 1709 DDB_ID(DDVID, 0x0002, DDVID, 0x0001, ddb_octopus), 1710 DDB_ID(DDVID, 0x0003, DDVID, 0x0001, ddb_octopus), 1711 DDB_ID(DDVID, 0x0003, DDVID, 0x0002, ddb_octopus_le), 1712 DDB_ID(DDVID, 0x0003, DDVID, 0x0010, ddb_octopus_mini), 1713 DDB_ID(DDVID, 0x0003, DDVID, 0x0020, ddb_v6), 1714 DDB_ID(DDVID, 0x0003, DDVID, 0x0021, ddb_v6_5), 1715 DDB_ID(DDVID, 0x0003, DDVID, 0x0030, ddb_dvbct), 1716 DDB_ID(DDVID, 0x0003, DDVID, 0xdb03, ddb_satixS2v3), 1717 DDB_ID(DDVID, 0x0005, DDVID, 0x0004, ddb_octopusv3), 1718 /* in case sub-ids got deleted in flash */ 1719 DDB_ID(DDVID, 0x0003, PCI_ANY_ID, PCI_ANY_ID, ddb_none), 1720 {0} 1721 }; 1722 MODULE_DEVICE_TABLE(pci, ddb_id_tbl); 1723 1724 1725 static struct pci_driver ddb_pci_driver = { 1726 .name = "DDBridge", 1727 .id_table = ddb_id_tbl, 1728 .probe = ddb_probe, 1729 .remove = ddb_remove, 1730 }; 1731 1732 static __init int module_init_ddbridge(void) 1733 { 1734 int ret; 1735 1736 printk(KERN_INFO "Digital Devices PCIE bridge driver, " 1737 "Copyright (C) 2010-11 Digital Devices GmbH\n"); 1738 1739 ret = ddb_class_create(); 1740 if (ret < 0) 1741 return ret; 1742 ret = pci_register_driver(&ddb_pci_driver); 1743 if (ret < 0) 1744 ddb_class_destroy(); 1745 return ret; 1746 } 1747 1748 static __exit void module_exit_ddbridge(void) 1749 { 1750 pci_unregister_driver(&ddb_pci_driver); 1751 ddb_class_destroy(); 1752 } 1753 1754 module_init(module_init_ddbridge); 1755 module_exit(module_exit_ddbridge); 1756 1757 MODULE_DESCRIPTION("Digital Devices PCIe Bridge"); 1758 MODULE_AUTHOR("Ralph Metzler"); 1759 MODULE_LICENSE("GPL"); 1760 MODULE_VERSION("0.5"); 1761