linux/drivers/media/pci/ddbridge/ddbridge-core.c
<<
>>
Prefs
   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
  47DVB_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
  54static 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
  61static 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  = &reg, .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
  70static 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
  81static int ddb_i2c_cmd(struct ddb_i2c *i2c, u32 adr, u32 cmd)
  82{
  83        struct ddb *dev = i2c->dev;
  84        long 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
 105static 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
 147static u32 ddb_i2c_functionality(struct i2c_adapter *adap)
 148{
 149        return I2C_FUNC_SMBUS_EMUL;
 150}
 151
 152static struct i2c_algorithm ddb_i2c_algo = {
 153        .master_xfer   = ddb_i2c_master_xfer,
 154        .functionality = ddb_i2c_functionality,
 155};
 156
 157static 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
 170static 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
 220static 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
 235static 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
 261static 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] = NULL;
 270                }
 271        }
 272}
 273
 274static 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
 287static 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
 327static 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
 349static 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
 375static 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
 386static 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
 411static 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
 422static 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
 442static ssize_t ddb_output_write(struct ddb_output *output,
 443                                const __user 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
 490static 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
 509static ssize_t ddb_input_read(struct ddb_input *input, __user 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
 545static 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
 557static 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
 573static 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
 595static 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
 616static 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
 635static 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
 654static struct stv6110x_config stv6110a = {
 655        .addr    = 0x60,
 656        .refclk  = 27000000,
 657        .clk_div = 1,
 658};
 659
 660static struct stv6110x_config stv6110b = {
 661        .addr    = 0x63,
 662        .refclk  = 27000000,
 663        .clk_div = 1,
 664};
 665
 666static 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
 687static 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        const 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
 718static 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
 736static 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
 758static 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
 769static 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
 782static 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
 816static 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 = NULL;
 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
 898static ssize_t ts_write(struct file *file, const __user 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
 923static ssize_t ts_read(struct file *file, __user 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
 950static 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
 971static 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};
 979
 980static struct dvb_device dvbdev_ci = {
 981        .readers = -1,
 982        .writers = -1,
 983        .users   = -1,
 984        .fops    = &ci_fops,
 985};
 986
 987/****************************************************************************/
 988/****************************************************************************/
 989/****************************************************************************/
 990
 991static void input_tasklet(unsigned long data)
 992{
 993        struct ddb_input *input = (struct ddb_input *) data;
 994        struct ddb *dev = input->port->dev;
 995
 996        spin_lock(&input->lock);
 997        if (!input->running) {
 998                spin_unlock(&input->lock);
 999                return;
1000        }
1001        input->stat = ddbreadl(DMA_BUFFER_CURRENT(input->nr));
1002
1003        if (input->port->class == DDB_PORT_TUNER) {
1004                if (4&ddbreadl(DMA_BUFFER_CONTROL(input->nr)))
1005                        printk(KERN_ERR "Overflow input %d\n", input->nr);
1006                while (input->cbuf != ((input->stat >> 11) & 0x1f)
1007                       || (4&ddbreadl(DMA_BUFFER_CONTROL(input->nr)))) {
1008                        dvb_dmx_swfilter_packets(&input->demux,
1009                                                 input->vbuf[input->cbuf],
1010                                                 input->dma_buf_size / 188);
1011
1012                        input->cbuf = (input->cbuf + 1) % input->dma_buf_num;
1013                        ddbwritel((input->cbuf << 11),
1014                                  DMA_BUFFER_ACK(input->nr));
1015                        input->stat = ddbreadl(DMA_BUFFER_CURRENT(input->nr));
1016                       }
1017        }
1018        if (input->port->class == DDB_PORT_CI)
1019                wake_up(&input->wq);
1020        spin_unlock(&input->lock);
1021}
1022
1023static void output_tasklet(unsigned long data)
1024{
1025        struct ddb_output *output = (struct ddb_output *) data;
1026        struct ddb *dev = output->port->dev;
1027
1028        spin_lock(&output->lock);
1029        if (!output->running) {
1030                spin_unlock(&output->lock);
1031                return;
1032        }
1033        output->stat = ddbreadl(DMA_BUFFER_CURRENT(output->nr + 8));
1034        wake_up(&output->wq);
1035        spin_unlock(&output->lock);
1036}
1037
1038
1039static struct cxd2099_cfg cxd_cfg = {
1040        .bitrate =  62000,
1041        .adr     =  0x40,
1042        .polarity = 1,
1043        .clock_mode = 1,
1044};
1045
1046static int ddb_ci_attach(struct ddb_port *port)
1047{
1048        int ret;
1049
1050        ret = dvb_register_adapter(&port->output->adap,
1051                                   "DDBridge",
1052                                   THIS_MODULE,
1053                                   &port->dev->pdev->dev,
1054                                   adapter_nr);
1055        if (ret < 0)
1056                return ret;
1057        port->en = cxd2099_attach(&cxd_cfg, port, &port->i2c->adap);
1058        if (!port->en) {
1059                dvb_unregister_adapter(&port->output->adap);
1060                return -ENODEV;
1061        }
1062        ddb_input_start(port->input[0]);
1063        ddb_output_start(port->output);
1064        dvb_ca_en50221_init(&port->output->adap,
1065                            port->en, 0, 1);
1066        ret = dvb_register_device(&port->output->adap, &port->output->dev,
1067                                  &dvbdev_ci, (void *) port->output,
1068                                  DVB_DEVICE_SEC, 0);
1069        return ret;
1070}
1071
1072static int ddb_port_attach(struct ddb_port *port)
1073{
1074        int ret = 0;
1075
1076        switch (port->class) {
1077        case DDB_PORT_TUNER:
1078                ret = dvb_input_attach(port->input[0]);
1079                if (ret < 0)
1080                        break;
1081                ret = dvb_input_attach(port->input[1]);
1082                break;
1083        case DDB_PORT_CI:
1084                ret = ddb_ci_attach(port);
1085                break;
1086        default:
1087                break;
1088        }
1089        if (ret < 0)
1090                printk(KERN_ERR "port_attach on port %d failed\n", port->nr);
1091        return ret;
1092}
1093
1094static int ddb_ports_attach(struct ddb *dev)
1095{
1096        int i, ret = 0;
1097        struct ddb_port *port;
1098
1099        for (i = 0; i < dev->info->port_num; i++) {
1100                port = &dev->port[i];
1101                ret = ddb_port_attach(port);
1102                if (ret < 0)
1103                        break;
1104        }
1105        return ret;
1106}
1107
1108static void ddb_ports_detach(struct ddb *dev)
1109{
1110        int i;
1111        struct ddb_port *port;
1112
1113        for (i = 0; i < dev->info->port_num; i++) {
1114                port = &dev->port[i];
1115                switch (port->class) {
1116                case DDB_PORT_TUNER:
1117                        dvb_input_detach(port->input[0]);
1118                        dvb_input_detach(port->input[1]);
1119                        break;
1120                case DDB_PORT_CI:
1121                        dvb_unregister_device(port->output->dev);
1122                        if (port->en) {
1123                                ddb_input_stop(port->input[0]);
1124                                ddb_output_stop(port->output);
1125                                dvb_ca_en50221_release(port->en);
1126                                kfree(port->en);
1127                                port->en = NULL;
1128                                dvb_unregister_adapter(&port->output->adap);
1129                        }
1130                        break;
1131                }
1132        }
1133}
1134
1135/****************************************************************************/
1136/****************************************************************************/
1137
1138static int port_has_ci(struct ddb_port *port)
1139{
1140        u8 val;
1141        return i2c_read_reg(&port->i2c->adap, 0x40, 0, &val) ? 0 : 1;
1142}
1143
1144static int port_has_stv0900(struct ddb_port *port)
1145{
1146        u8 val;
1147        if (i2c_read_reg16(&port->i2c->adap, 0x69, 0xf100, &val) < 0)
1148                return 0;
1149        return 1;
1150}
1151
1152static int port_has_stv0900_aa(struct ddb_port *port)
1153{
1154        u8 val;
1155        if (i2c_read_reg16(&port->i2c->adap, 0x68, 0xf100, &val) < 0)
1156                return 0;
1157        return 1;
1158}
1159
1160static int port_has_drxks(struct ddb_port *port)
1161{
1162        u8 val;
1163        if (i2c_read(&port->i2c->adap, 0x29, &val) < 0)
1164                return 0;
1165        if (i2c_read(&port->i2c->adap, 0x2a, &val) < 0)
1166                return 0;
1167        return 1;
1168}
1169
1170static void ddb_port_probe(struct ddb_port *port)
1171{
1172        struct ddb *dev = port->dev;
1173        char *modname = "NO MODULE";
1174
1175        port->class = DDB_PORT_NONE;
1176
1177        if (port_has_ci(port)) {
1178                modname = "CI";
1179                port->class = DDB_PORT_CI;
1180                ddbwritel(I2C_SPEED_400, port->i2c->regs + I2C_TIMING);
1181        } else if (port_has_stv0900(port)) {
1182                modname = "DUAL DVB-S2";
1183                port->class = DDB_PORT_TUNER;
1184                port->type = DDB_TUNER_DVBS_ST;
1185                ddbwritel(I2C_SPEED_100, port->i2c->regs + I2C_TIMING);
1186        } else if (port_has_stv0900_aa(port)) {
1187                modname = "DUAL DVB-S2";
1188                port->class = DDB_PORT_TUNER;
1189                port->type = DDB_TUNER_DVBS_ST_AA;
1190                ddbwritel(I2C_SPEED_100, port->i2c->regs + I2C_TIMING);
1191        } else if (port_has_drxks(port)) {
1192                modname = "DUAL DVB-C/T";
1193                port->class = DDB_PORT_TUNER;
1194                port->type = DDB_TUNER_DVBCT_TR;
1195                ddbwritel(I2C_SPEED_400, port->i2c->regs + I2C_TIMING);
1196        }
1197        printk(KERN_INFO "Port %d (TAB %d): %s\n",
1198                         port->nr, port->nr+1, modname);
1199}
1200
1201static void ddb_input_init(struct ddb_port *port, int nr)
1202{
1203        struct ddb *dev = port->dev;
1204        struct ddb_input *input = &dev->input[nr];
1205
1206        input->nr = nr;
1207        input->port = port;
1208        input->dma_buf_num = INPUT_DMA_BUFS;
1209        input->dma_buf_size = INPUT_DMA_SIZE;
1210        ddbwritel(0, TS_INPUT_CONTROL(nr));
1211        ddbwritel(2, TS_INPUT_CONTROL(nr));
1212        ddbwritel(0, TS_INPUT_CONTROL(nr));
1213        ddbwritel(0, DMA_BUFFER_ACK(nr));
1214        tasklet_init(&input->tasklet, input_tasklet, (unsigned long) input);
1215        spin_lock_init(&input->lock);
1216        init_waitqueue_head(&input->wq);
1217}
1218
1219static void ddb_output_init(struct ddb_port *port, int nr)
1220{
1221        struct ddb *dev = port->dev;
1222        struct ddb_output *output = &dev->output[nr];
1223        output->nr = nr;
1224        output->port = port;
1225        output->dma_buf_num = OUTPUT_DMA_BUFS;
1226        output->dma_buf_size = OUTPUT_DMA_SIZE;
1227
1228        ddbwritel(0, TS_OUTPUT_CONTROL(nr));
1229        ddbwritel(2, TS_OUTPUT_CONTROL(nr));
1230        ddbwritel(0, TS_OUTPUT_CONTROL(nr));
1231        tasklet_init(&output->tasklet, output_tasklet, (unsigned long) output);
1232        init_waitqueue_head(&output->wq);
1233}
1234
1235static void ddb_ports_init(struct ddb *dev)
1236{
1237        int i;
1238        struct ddb_port *port;
1239
1240        for (i = 0; i < dev->info->port_num; i++) {
1241                port = &dev->port[i];
1242                port->dev = dev;
1243                port->nr = i;
1244                port->i2c = &dev->i2c[i];
1245                port->input[0] = &dev->input[2 * i];
1246                port->input[1] = &dev->input[2 * i + 1];
1247                port->output = &dev->output[i];
1248
1249                mutex_init(&port->i2c_gate_lock);
1250                ddb_port_probe(port);
1251                ddb_input_init(port, 2 * i);
1252                ddb_input_init(port, 2 * i + 1);
1253                ddb_output_init(port, i);
1254        }
1255}
1256
1257static void ddb_ports_release(struct ddb *dev)
1258{
1259        int i;
1260        struct ddb_port *port;
1261
1262        for (i = 0; i < dev->info->port_num; i++) {
1263                port = &dev->port[i];
1264                port->dev = dev;
1265                tasklet_kill(&port->input[0]->tasklet);
1266                tasklet_kill(&port->input[1]->tasklet);
1267                tasklet_kill(&port->output->tasklet);
1268        }
1269}
1270
1271/****************************************************************************/
1272/****************************************************************************/
1273/****************************************************************************/
1274
1275static void irq_handle_i2c(struct ddb *dev, int n)
1276{
1277        struct ddb_i2c *i2c = &dev->i2c[n];
1278
1279        i2c->done = 1;
1280        wake_up(&i2c->wq);
1281}
1282
1283static irqreturn_t irq_handler(int irq, void *dev_id)
1284{
1285        struct ddb *dev = (struct ddb *) dev_id;
1286        u32 s = ddbreadl(INTERRUPT_STATUS);
1287
1288        if (!s)
1289                return IRQ_NONE;
1290
1291        do {
1292                ddbwritel(s, INTERRUPT_ACK);
1293
1294                if (s & 0x00000001)
1295                        irq_handle_i2c(dev, 0);
1296                if (s & 0x00000002)
1297                        irq_handle_i2c(dev, 1);
1298                if (s & 0x00000004)
1299                        irq_handle_i2c(dev, 2);
1300                if (s & 0x00000008)
1301                        irq_handle_i2c(dev, 3);
1302
1303                if (s & 0x00000100)
1304                        tasklet_schedule(&dev->input[0].tasklet);
1305                if (s & 0x00000200)
1306                        tasklet_schedule(&dev->input[1].tasklet);
1307                if (s & 0x00000400)
1308                        tasklet_schedule(&dev->input[2].tasklet);
1309                if (s & 0x00000800)
1310                        tasklet_schedule(&dev->input[3].tasklet);
1311                if (s & 0x00001000)
1312                        tasklet_schedule(&dev->input[4].tasklet);
1313                if (s & 0x00002000)
1314                        tasklet_schedule(&dev->input[5].tasklet);
1315                if (s & 0x00004000)
1316                        tasklet_schedule(&dev->input[6].tasklet);
1317                if (s & 0x00008000)
1318                        tasklet_schedule(&dev->input[7].tasklet);
1319
1320                if (s & 0x00010000)
1321                        tasklet_schedule(&dev->output[0].tasklet);
1322                if (s & 0x00020000)
1323                        tasklet_schedule(&dev->output[1].tasklet);
1324                if (s & 0x00040000)
1325                        tasklet_schedule(&dev->output[2].tasklet);
1326                if (s & 0x00080000)
1327                        tasklet_schedule(&dev->output[3].tasklet);
1328
1329                /* if (s & 0x000f0000)  printk(KERN_DEBUG "%08x\n", istat); */
1330        } while ((s = ddbreadl(INTERRUPT_STATUS)));
1331
1332        return IRQ_HANDLED;
1333}
1334
1335/******************************************************************************/
1336/******************************************************************************/
1337/******************************************************************************/
1338
1339static int flashio(struct ddb *dev, u8 *wbuf, u32 wlen, u8 *rbuf, u32 rlen)
1340{
1341        u32 data, shift;
1342
1343        if (wlen > 4)
1344                ddbwritel(1, SPI_CONTROL);
1345        while (wlen > 4) {
1346                /* FIXME: check for big-endian */
1347                data = swab32(*(u32 *)wbuf);
1348                wbuf += 4;
1349                wlen -= 4;
1350                ddbwritel(data, SPI_DATA);
1351                while (ddbreadl(SPI_CONTROL) & 0x0004)
1352                        ;
1353        }
1354
1355        if (rlen)
1356                ddbwritel(0x0001 | ((wlen << (8 + 3)) & 0x1f00), SPI_CONTROL);
1357        else
1358                ddbwritel(0x0003 | ((wlen << (8 + 3)) & 0x1f00), SPI_CONTROL);
1359
1360        data = 0;
1361        shift = ((4 - wlen) * 8);
1362        while (wlen) {
1363                data <<= 8;
1364                data |= *wbuf;
1365                wlen--;
1366                wbuf++;
1367        }
1368        if (shift)
1369                data <<= shift;
1370        ddbwritel(data, SPI_DATA);
1371        while (ddbreadl(SPI_CONTROL) & 0x0004)
1372                ;
1373
1374        if (!rlen) {
1375                ddbwritel(0, SPI_CONTROL);
1376                return 0;
1377        }
1378        if (rlen > 4)
1379                ddbwritel(1, SPI_CONTROL);
1380
1381        while (rlen > 4) {
1382                ddbwritel(0xffffffff, SPI_DATA);
1383                while (ddbreadl(SPI_CONTROL) & 0x0004)
1384                        ;
1385                data = ddbreadl(SPI_DATA);
1386                *(u32 *) rbuf = swab32(data);
1387                rbuf += 4;
1388                rlen -= 4;
1389        }
1390        ddbwritel(0x0003 | ((rlen << (8 + 3)) & 0x1F00), SPI_CONTROL);
1391        ddbwritel(0xffffffff, SPI_DATA);
1392        while (ddbreadl(SPI_CONTROL) & 0x0004)
1393                ;
1394
1395        data = ddbreadl(SPI_DATA);
1396        ddbwritel(0, SPI_CONTROL);
1397
1398        if (rlen < 4)
1399                data <<= ((4 - rlen) * 8);
1400
1401        while (rlen > 0) {
1402                *rbuf = ((data >> 24) & 0xff);
1403                data <<= 8;
1404                rbuf++;
1405                rlen--;
1406        }
1407        return 0;
1408}
1409
1410#define DDB_MAGIC 'd'
1411
1412struct ddb_flashio {
1413        __user __u8 *write_buf;
1414        __u32 write_len;
1415        __user __u8 *read_buf;
1416        __u32 read_len;
1417};
1418
1419#define IOCTL_DDB_FLASHIO  _IOWR(DDB_MAGIC, 0x00, struct ddb_flashio)
1420
1421#define DDB_NAME "ddbridge"
1422
1423static u32 ddb_num;
1424static struct ddb *ddbs[32];
1425static struct class *ddb_class;
1426static int ddb_major;
1427
1428static int ddb_open(struct inode *inode, struct file *file)
1429{
1430        struct ddb *dev = ddbs[iminor(inode)];
1431
1432        file->private_data = dev;
1433        return 0;
1434}
1435
1436static long ddb_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
1437{
1438        struct ddb *dev = file->private_data;
1439        __user void *parg = (__user void *)arg;
1440        int res;
1441
1442        switch (cmd) {
1443        case IOCTL_DDB_FLASHIO:
1444        {
1445                struct ddb_flashio fio;
1446                u8 *rbuf, *wbuf;
1447
1448                if (copy_from_user(&fio, parg, sizeof(fio)))
1449                        return -EFAULT;
1450
1451                if (fio.write_len > 1028 || fio.read_len > 1028)
1452                        return -EINVAL;
1453                if (fio.write_len + fio.read_len > 1028)
1454                        return -EINVAL;
1455
1456                wbuf = &dev->iobuf[0];
1457                rbuf = wbuf + fio.write_len;
1458
1459                if (copy_from_user(wbuf, fio.write_buf, fio.write_len))
1460                        return -EFAULT;
1461                res = flashio(dev, wbuf, fio.write_len, rbuf, fio.read_len);
1462                if (res)
1463                        return res;
1464                if (copy_to_user(fio.read_buf, rbuf, fio.read_len))
1465                        return -EFAULT;
1466                break;
1467        }
1468        default:
1469                return -ENOTTY;
1470        }
1471        return 0;
1472}
1473
1474static const struct file_operations ddb_fops = {
1475        .unlocked_ioctl = ddb_ioctl,
1476        .open           = ddb_open,
1477};
1478
1479static char *ddb_devnode(struct device *device, umode_t *mode)
1480{
1481        struct ddb *dev = dev_get_drvdata(device);
1482
1483        return kasprintf(GFP_KERNEL, "ddbridge/card%d", dev->nr);
1484}
1485
1486static int ddb_class_create(void)
1487{
1488        ddb_major = register_chrdev(0, DDB_NAME, &ddb_fops);
1489        if (ddb_major < 0)
1490                return ddb_major;
1491
1492        ddb_class = class_create(THIS_MODULE, DDB_NAME);
1493        if (IS_ERR(ddb_class)) {
1494                unregister_chrdev(ddb_major, DDB_NAME);
1495                return PTR_ERR(ddb_class);
1496        }
1497        ddb_class->devnode = ddb_devnode;
1498        return 0;
1499}
1500
1501static void ddb_class_destroy(void)
1502{
1503        class_destroy(ddb_class);
1504        unregister_chrdev(ddb_major, DDB_NAME);
1505}
1506
1507static int ddb_device_create(struct ddb *dev)
1508{
1509        dev->nr = ddb_num++;
1510        dev->ddb_dev = device_create(ddb_class, NULL,
1511                                     MKDEV(ddb_major, dev->nr),
1512                                     dev, "ddbridge%d", dev->nr);
1513        ddbs[dev->nr] = dev;
1514        if (IS_ERR(dev->ddb_dev))
1515                return -1;
1516        return 0;
1517}
1518
1519static void ddb_device_destroy(struct ddb *dev)
1520{
1521        ddb_num--;
1522        if (IS_ERR(dev->ddb_dev))
1523                return;
1524        device_destroy(ddb_class, MKDEV(ddb_major, 0));
1525}
1526
1527
1528/****************************************************************************/
1529/****************************************************************************/
1530/****************************************************************************/
1531
1532static void ddb_unmap(struct ddb *dev)
1533{
1534        if (dev->regs)
1535                iounmap(dev->regs);
1536        vfree(dev);
1537}
1538
1539
1540static void ddb_remove(struct pci_dev *pdev)
1541{
1542        struct ddb *dev = pci_get_drvdata(pdev);
1543
1544        ddb_ports_detach(dev);
1545        ddb_i2c_release(dev);
1546
1547        ddbwritel(0, INTERRUPT_ENABLE);
1548        free_irq(dev->pdev->irq, dev);
1549#ifdef CONFIG_PCI_MSI
1550        if (dev->msi)
1551                pci_disable_msi(dev->pdev);
1552#endif
1553        ddb_ports_release(dev);
1554        ddb_buffers_free(dev);
1555        ddb_device_destroy(dev);
1556
1557        ddb_unmap(dev);
1558        pci_set_drvdata(pdev, NULL);
1559        pci_disable_device(pdev);
1560}
1561
1562
1563static int ddb_probe(struct pci_dev *pdev, 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
1622fail3:
1623        ddb_ports_detach(dev);
1624        printk(KERN_ERR "fail3\n");
1625        ddb_ports_release(dev);
1626fail2:
1627        printk(KERN_ERR "fail2\n");
1628        ddb_buffers_free(dev);
1629fail1:
1630        printk(KERN_ERR "fail1\n");
1631        if (dev->msi)
1632                pci_disable_msi(dev->pdev);
1633        if (stat == 0)
1634                free_irq(dev->pdev->irq, dev);
1635fail:
1636        printk(KERN_ERR "fail\n");
1637        ddb_unmap(dev);
1638        pci_set_drvdata(pdev, NULL);
1639        pci_disable_device(pdev);
1640        return -1;
1641}
1642
1643/******************************************************************************/
1644/******************************************************************************/
1645/******************************************************************************/
1646
1647static struct ddb_info ddb_none = {
1648        .type     = DDB_NONE,
1649        .name     = "Digital Devices PCIe bridge",
1650};
1651
1652static struct ddb_info ddb_octopus = {
1653        .type     = DDB_OCTOPUS,
1654        .name     = "Digital Devices Octopus DVB adapter",
1655        .port_num = 4,
1656};
1657
1658static struct ddb_info ddb_octopus_le = {
1659        .type     = DDB_OCTOPUS,
1660        .name     = "Digital Devices Octopus LE DVB adapter",
1661        .port_num = 2,
1662};
1663
1664static struct ddb_info ddb_octopus_mini = {
1665        .type     = DDB_OCTOPUS,
1666        .name     = "Digital Devices Octopus Mini",
1667        .port_num = 4,
1668};
1669
1670static struct ddb_info ddb_v6 = {
1671        .type     = DDB_OCTOPUS,
1672        .name     = "Digital Devices Cine S2 V6 DVB adapter",
1673        .port_num = 3,
1674};
1675static struct ddb_info ddb_v6_5 = {
1676        .type     = DDB_OCTOPUS,
1677        .name     = "Digital Devices Cine S2 V6.5 DVB adapter",
1678        .port_num = 4,
1679};
1680
1681static struct ddb_info ddb_dvbct = {
1682        .type     = DDB_OCTOPUS,
1683        .name     = "Digital Devices DVBCT V6.1 DVB adapter",
1684        .port_num = 3,
1685};
1686
1687static struct ddb_info ddb_satixS2v3 = {
1688        .type     = DDB_OCTOPUS,
1689        .name     = "Mystique SaTiX-S2 V3 DVB adapter",
1690        .port_num = 3,
1691};
1692
1693static struct ddb_info ddb_octopusv3 = {
1694        .type     = DDB_OCTOPUS,
1695        .name     = "Digital Devices Octopus V3 DVB adapter",
1696        .port_num = 4,
1697};
1698
1699#define DDVID 0xdd01 /* Digital Devices Vendor ID */
1700
1701#define DDB_ID(_vend, _dev, _subvend, _subdev, _driverdata) {   \
1702        .vendor      = _vend,    .device    = _dev, \
1703        .subvendor   = _subvend, .subdevice = _subdev, \
1704        .driver_data = (unsigned long)&_driverdata }
1705
1706static const struct pci_device_id ddb_id_tbl[] = {
1707        DDB_ID(DDVID, 0x0002, DDVID, 0x0001, ddb_octopus),
1708        DDB_ID(DDVID, 0x0003, DDVID, 0x0001, ddb_octopus),
1709        DDB_ID(DDVID, 0x0003, DDVID, 0x0002, ddb_octopus_le),
1710        DDB_ID(DDVID, 0x0003, DDVID, 0x0010, ddb_octopus_mini),
1711        DDB_ID(DDVID, 0x0003, DDVID, 0x0020, ddb_v6),
1712        DDB_ID(DDVID, 0x0003, DDVID, 0x0021, ddb_v6_5),
1713        DDB_ID(DDVID, 0x0003, DDVID, 0x0030, ddb_dvbct),
1714        DDB_ID(DDVID, 0x0003, DDVID, 0xdb03, ddb_satixS2v3),
1715        DDB_ID(DDVID, 0x0005, DDVID, 0x0004, ddb_octopusv3),
1716        /* in case sub-ids got deleted in flash */
1717        DDB_ID(DDVID, 0x0003, PCI_ANY_ID, PCI_ANY_ID, ddb_none),
1718        {0}
1719};
1720MODULE_DEVICE_TABLE(pci, ddb_id_tbl);
1721
1722
1723static struct pci_driver ddb_pci_driver = {
1724        .name        = "DDBridge",
1725        .id_table    = ddb_id_tbl,
1726        .probe       = ddb_probe,
1727        .remove      = ddb_remove,
1728};
1729
1730static __init int module_init_ddbridge(void)
1731{
1732        int ret;
1733
1734        printk(KERN_INFO "Digital Devices PCIE bridge driver, "
1735               "Copyright (C) 2010-11 Digital Devices GmbH\n");
1736
1737        ret = ddb_class_create();
1738        if (ret < 0)
1739                return ret;
1740        ret = pci_register_driver(&ddb_pci_driver);
1741        if (ret < 0)
1742                ddb_class_destroy();
1743        return ret;
1744}
1745
1746static __exit void module_exit_ddbridge(void)
1747{
1748        pci_unregister_driver(&ddb_pci_driver);
1749        ddb_class_destroy();
1750}
1751
1752module_init(module_init_ddbridge);
1753module_exit(module_exit_ddbridge);
1754
1755MODULE_DESCRIPTION("Digital Devices PCIe Bridge");
1756MODULE_AUTHOR("Ralph Metzler");
1757MODULE_LICENSE("GPL");
1758MODULE_VERSION("0.5");
1759