drivers/media/dvb/ddbridge/ddbridge-core.c

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