drivers/media/dvb/bt8xx/bt878.c

   1 /*
   2  * bt878.c: part of the driver for the Pinnacle PCTV Sat DVB PCI card
   3  *
   4  * Copyright (C) 2002 Peter Hettkamp <peter.hettkamp@t-online.de>
   5  *
   6  * large parts based on the bttv driver
   7  * Copyright (C) 1996,97,98 Ralph  Metzler (rjkm@thp.uni-koeln.de)
   8  *                        & Marcus Metzler (mocm@thp.uni-koeln.de)
   9  * (c) 1999,2000 Gerd Knorr <kraxel@goldbach.in-berlin.de>
  10  *
  11  * This program is free software; you can redistribute it and/or
  12  * modify it under the terms of the GNU General Public License
  13  * as published by the Free Software Foundation; either version 2
  14  * of the License, or (at your option) any later version.
  15  *
  16
  17  * This program is distributed in the hope that it will be useful,
  18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  20  * GNU General Public License for more details.
  21  *
  22
  23  * You should have received a copy of the GNU General Public License
  24  * along with this program; if not, write to the Free Software
  25  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  26  * Or, point your browser to http://www.gnu.org/copyleft/gpl.html
  27  *
  28  */
  29
  30 #include <linux/version.h>
  31 #include <linux/module.h>
  32 #include <linux/kernel.h>
  33 #include <linux/pci.h>
  34 #include <asm/io.h>
  35 #include <linux/ioport.h>
  36 #include <asm/pgtable.h>
  37 #include <asm/page.h>
  38 #include <linux/types.h>
  39 #include <linux/interrupt.h>
  40 #include <linux/kmod.h>
  41 #include <linux/vmalloc.h>
  42 #include <linux/init.h>
  43
  44 #include "dmxdev.h"
  45 #include "dvbdev.h"
  46 #include "bt878.h"
  47 #include "dst-bt878.h"
  48
  49 #include "dvb_functions.h"
  50
  51 /**************************************/
  52 /* Miscellaneous utility  definitions */
  53 /**************************************/
  54
  55 unsigned int bt878_verbose = 1;
  56 unsigned int bt878_debug = 0;
  57 MODULE_PARM(bt878_verbose, "i");
  58 MODULE_PARM_DESC(bt878_verbose,
  59                  "verbose startup messages, default is 1 (yes)");
  60 MODULE_PARM(bt878_debug, "i");
  61 MODULE_PARM_DESC(bt878_debug, "debug messages, default is 0 (no)");
  62 MODULE_LICENSE("GPL");
  63
  64 int bt878_num;
  65 struct bt878 bt878[BT878_MAX];
  66
  67 EXPORT_SYMBOL(bt878_debug);
  68 EXPORT_SYMBOL(bt878_verbose);
  69 EXPORT_SYMBOL(bt878_num);
  70 EXPORT_SYMBOL(bt878);
  71
  72 #define btwrite(dat,adr)    bmtwrite((dat), (bt->bt878_mem+(adr)))
  73 #define btread(adr)         bmtread(bt->bt878_mem+(adr))
  74
  75 #define btand(dat,adr)      btwrite((dat) & btread(adr), adr)
  76 #define btor(dat,adr)       btwrite((dat) | btread(adr), adr)
  77 #define btaor(dat,mask,adr) btwrite((dat) | ((mask) & btread(adr)), adr)
  78
  79 #if defined(dprintk)
  80 #undef dprintk
  81 #endif
  82 #define dprintk if(bt878_debug) printk
  83
  84 static void bt878_mem_free(struct bt878 *bt)
  85 {
  86         if (bt->buf_cpu) {
  87                 pci_free_consistent(bt->dev, bt->buf_size, bt->buf_cpu,
  88                                     bt->buf_dma);
  89                 bt->buf_cpu = NULL;
  90         }
  91
  92         if (bt->risc_cpu) {
  93                 pci_free_consistent(bt->dev, bt->risc_size, bt->risc_cpu,
  94                                     bt->risc_dma);
  95                 bt->risc_cpu = NULL;
  96         }
  97 }
  98
  99 static int bt878_mem_alloc(struct bt878 *bt)
 100 {
 101         if (!bt->buf_cpu) {
 102                 bt->buf_size = 128 * 1024;
 103
 104                 bt->buf_cpu =
 105                     pci_alloc_consistent(bt->dev, bt->buf_size,
 106                                          &bt->buf_dma);
 107
 108                 if (!bt->buf_cpu)
 109                         return -ENOMEM;
 110
 111                 memset(bt->buf_cpu, 0, bt->buf_size);
 112         }
 113
 114         if (!bt->risc_cpu) {
 115                 bt->risc_size = PAGE_SIZE;
 116                 bt->risc_cpu =
 117                     pci_alloc_consistent(bt->dev, bt->risc_size,
 118                                          &bt->risc_dma);
 119
 120                 if (!bt->risc_cpu) {
 121                         bt878_mem_free(bt);
 122                         return -ENOMEM;
 123                 }
 124
 125                 memset(bt->risc_cpu, 0, bt->risc_size);
 126         }
 127
 128         return 0;
 129 }
 130
 131 /* RISC instructions */
 132 #define RISC_WRITE              (0x01 << 28)
 133 #define RISC_JUMP               (0x07 << 28)
 134 #define RISC_SYNC               (0x08 << 28)
 135
 136 /* RISC bits */
 137 #define RISC_WR_SOL             (1 << 27)
 138 #define RISC_WR_EOL             (1 << 26)
 139 #define RISC_IRQ                (1 << 24)
 140 #define RISC_STATUS(status)     ((((~status) & 0x0F) << 20) | ((status & 0x0F) << 16))
 141 #define RISC_SYNC_RESYNC        (1 << 15)
 142 #define RISC_SYNC_FM1           0x06
 143 #define RISC_SYNC_VRO           0x0C
 144
 145 #define RISC_FLUSH()            bt->risc_pos = 0
 146 #define RISC_INSTR(instr)       bt->risc_cpu[bt->risc_pos++] = cpu_to_le32(instr)
 147
 148 static int bt878_make_risc(struct bt878 *bt)
 149 {
 150         bt->block_bytes = bt->buf_size >> 4;
 151         bt->block_count = 1 << 4;
 152         bt->line_bytes = bt->block_bytes;
 153         bt->line_count = bt->block_count;
 154
 155         while (bt->line_bytes > 4095) {
 156                 bt->line_bytes >>= 1;
 157                 bt->line_count <<= 1;
 158         }
 159
 160         if (bt->line_count > 255) {
 161                 printk("bt878: buffer size error!\n");
 162                 return -EINVAL;
 163         }
 164         return 0;
 165 }
 166
 167
 168 static void bt878_risc_program(struct bt878 *bt, u32 op_sync_orin)
 169 {
 170         u32 buf_pos = 0;
 171         u32 line;
 172
 173         RISC_FLUSH();
 174         RISC_INSTR(RISC_SYNC | RISC_SYNC_FM1 | op_sync_orin);
 175         RISC_INSTR(0);
 176
 177         dprintk("bt878: risc len lines %u, bytes per line %u\n",
 178                         bt->line_count, bt->line_bytes);
 179         for (line = 0; line < bt->line_count; line++) {
 180                 // At the beginning of every block we issue an IRQ with previous (finished) block number set
 181                 if (!(buf_pos % bt->block_bytes))
 182                         RISC_INSTR(RISC_WRITE | RISC_WR_SOL | RISC_WR_EOL |
 183                                    RISC_IRQ |
 184                                    RISC_STATUS(((buf_pos /
 185                                                  bt->block_bytes) +
 186                                                 (bt->block_count -
 187                                                  1)) %
 188                                                bt->block_count) | bt->
 189                                    line_bytes);
 190                 else
 191                         RISC_INSTR(RISC_WRITE | RISC_WR_SOL | RISC_WR_EOL |
 192                                    bt->line_bytes);
 193                 RISC_INSTR(bt->buf_dma + buf_pos);
 194                 buf_pos += bt->line_bytes;
 195         }
 196
 197         RISC_INSTR(RISC_SYNC | op_sync_orin | RISC_SYNC_VRO);
 198         RISC_INSTR(0);
 199
 200         RISC_INSTR(RISC_JUMP);
 201         RISC_INSTR(bt->risc_dma);
 202
 203         btwrite((bt->line_count << 16) | bt->line_bytes, BT878_APACK_LEN);
 204 }
 205
 206 /*****************************/
 207 /* Start/Stop grabbing funcs */
 208 /*****************************/
 209
 210 void bt878_start(struct bt878 *bt, u32 controlreg, u32 op_sync_orin,
 211                 u32 irq_err_ignore)
 212 {
 213         u32 int_mask;
 214
 215         dprintk("bt878 debug: bt878_start (ctl=%8.8x)\n", controlreg);
 216         /* complete the writing of the risc dma program now we have
 217          * the card specifics
 218          */
 219         bt878_risc_program(bt, op_sync_orin);
 220         controlreg &= ~0x1f;
 221         controlreg |= 0x1b;
 222
 223         btwrite(cpu_to_le32(bt->risc_dma), BT878_ARISC_START);
 224
 225         /* original int mask had :
 226          *    6    2    8    4    0
 227          * 1111 1111 1000 0000 0000
 228          * SCERR|OCERR|PABORT|RIPERR|FDSR|FTRGT|FBUS|RISCI
 229          * Hacked for DST to:
 230          * SCERR | OCERR | FDSR | FTRGT | FBUS | RISCI
 231          */
 232         int_mask = BT878_ASCERR | BT878_AOCERR | BT878_APABORT |
 233                 BT878_ARIPERR | BT878_APPERR | BT878_AFDSR | BT878_AFTRGT |
 234                 BT878_AFBUS | BT878_ARISCI;
 235
 236
 237         /* ignore pesky bits */
 238         int_mask &= ~irq_err_ignore;
 239
 240         btwrite(int_mask, BT878_AINT_MASK);
 241         btwrite(controlreg, BT878_AGPIO_DMA_CTL);
 242 }
 243
 244 void bt878_stop(struct bt878 *bt)
 245 {
 246         u32 stat;
 247         int i = 0;
 248
 249         dprintk("bt878 debug: bt878_stop\n");
 250
 251         btwrite(0, BT878_AINT_MASK);
 252         btand(~0x13, BT878_AGPIO_DMA_CTL);
 253
 254         do {
 255                 stat = btread(BT878_AINT_STAT);
 256                 if (!(stat & BT878_ARISC_EN))
 257                         break;
 258                 i++;
 259         } while (i < 500);
 260
 261         dprintk("bt878(%d) debug: bt878_stop, i=%d, stat=0x%8.8x\n",
 262                 bt->nr, i, stat);
 263 }
 264
 265 EXPORT_SYMBOL(bt878_start);
 266 EXPORT_SYMBOL(bt878_stop);
 267
 268 /*****************************/
 269 /* Interrupt service routine */
 270 /*****************************/
 271
 272 static irqreturn_t bt878_irq(int irq, void *dev_id, struct pt_regs *regs)
 273 {
 274         u32 stat, astat, mask;
 275         int count;
 276         struct bt878 *bt;
 277
 278         bt = (struct bt878 *) dev_id;
 279
 280         count = 0;
 281         while (1) {
 282                 stat = btread(BT878_AINT_STAT);
 283                 mask = btread(BT878_AINT_MASK);
 284                 if (!(astat = (stat & mask)))
 285                         return IRQ_NONE;        /* this interrupt is not for me */
 286 /*              dprintk("bt878(%d) debug: irq count %d, stat 0x%8.8x, mask 0x%8.8x\n",bt->nr,count,stat,mask); */
 287                 btwrite(astat, BT878_AINT_STAT);        /* try to clear interupt condition */
 288
 289
 290                 if (astat & (BT878_ASCERR | BT878_AOCERR)) {
 291                         if (bt878_verbose) {
 292                                 printk("bt878(%d): irq%s%s risc_pc=%08x\n",
 293                                        bt->nr,
 294                                        (astat & BT878_ASCERR) ? " SCERR" :
 295                                        "",
 296                                        (astat & BT878_AOCERR) ? " OCERR" :
 297                                        "", btread(BT878_ARISC_PC));
 298                         }
 299                 }
 300                 if (astat & (BT878_APABORT | BT878_ARIPERR | BT878_APPERR)) {
 301                         if (bt878_verbose) {
 302                                 printk
 303                                     ("bt878(%d): irq%s%s%s risc_pc=%08x\n",
 304                                      bt->nr,
 305                                      (astat & BT878_APABORT) ? " PABORT" :
 306                                      "",
 307                                      (astat & BT878_ARIPERR) ? " RIPERR" :
 308                                      "",
 309                                      (astat & BT878_APPERR) ? " PPERR" :
 310                                      "", btread(BT878_ARISC_PC));
 311                         }
 312                 }
 313                 if (astat & (BT878_AFDSR | BT878_AFTRGT | BT878_AFBUS)) {
 314                         if (bt878_verbose) {
 315                                 printk
 316                                     ("bt878(%d): irq%s%s%s risc_pc=%08x\n",
 317                                      bt->nr,
 318                                      (astat & BT878_AFDSR) ? " FDSR" : "",
 319                                      (astat & BT878_AFTRGT) ? " FTRGT" :
 320                                      "",
 321                                      (astat & BT878_AFBUS) ? " FBUS" : "",
 322                                      btread(BT878_ARISC_PC));
 323                         }
 324                 }
 325                 if (astat & BT878_ARISCI) {
 326                         bt->finished_block = (stat & BT878_ARISCS) >> 28;
 327                         tasklet_schedule(&bt->tasklet);
 328                         break;
 329                 }
 330                 count++;
 331                 if (count > 20) {
 332                         btwrite(0, BT878_AINT_MASK);
 333                         printk(KERN_ERR
 334                                "bt878(%d): IRQ lockup, cleared int mask\n",
 335                                bt->nr);
 336                         break;
 337                 }
 338         }
 339         return IRQ_HANDLED;
 340 }
 341
 342 extern int bttv_gpio_enable(unsigned int card, unsigned long mask, unsigned long data);
 343 extern int bttv_read_gpio(unsigned int card, unsigned long *data);
 344 extern int bttv_write_gpio(unsigned int card, unsigned long mask, unsigned long data);
 345
 346 int
 347 bt878_device_control(struct bt878 *bt, unsigned int cmd, union dst_gpio_packet *mp)
 348 {
 349         int retval;
 350
 351         retval = 0;
 352         if (down_interruptible (&bt->gpio_lock))
 353                 return -ERESTARTSYS;
 354         /* special gpio signal */
 355         switch (cmd) {
 356             case DST_IG_ENABLE:
 357                 // dprintk("dvb_bt8xx: dst enable mask 0x%02x enb 0x%02x \n", mp->dstg.enb.mask, mp->dstg.enb.enable);
 358                 retval = bttv_gpio_enable(bt->bttv_nr,
 359                                 mp->enb.mask,
 360                                 mp->enb.enable);
 361                 break;
 362             case DST_IG_WRITE:
 363                 // dprintk("dvb_bt8xx: dst write gpio mask 0x%02x out 0x%02x\n", mp->dstg.outp.mask, mp->dstg.outp.highvals);
 364                 retval = bttv_write_gpio(bt->bttv_nr,
 365                                 mp->outp.mask,
 366                                 mp->outp.highvals);
 367
 368                 break;
 369             case DST_IG_READ:
 370                 /* read */
 371                 retval =  bttv_read_gpio(bt->bttv_nr, &mp->rd.value);
 372                 // dprintk("dvb_bt8xx: dst read gpio 0x%02x\n", (unsigned)mp->dstg.rd.value);
 373                 break;
 374             case DST_IG_TS:
 375                 /* Set packet size */
 376                 bt->TS_Size = mp->psize;
 377                 break;
 378
 379             default:
 380                 retval = -EINVAL;
 381                 break;
 382         }
 383         up(&bt->gpio_lock);
 384         return retval;
 385 }
 386
 387 EXPORT_SYMBOL(bt878_device_control);
 388
 389 struct bt878 *bt878_find_by_dvb_adap(struct dvb_adapter *adap)
 390 {
 391         unsigned int card_nr;
 392
 393         printk("bt878 find by dvb adap: checking \"%s\"\n",adap->name);
 394         for (card_nr = 0; card_nr < bt878_num; card_nr++) {
 395                 if (bt878[card_nr].adap_ptr == adap)
 396                         return &bt878[card_nr];
 397         }
 398         printk("bt878 find by dvb adap: NOT found \"%s\"\n",adap->name);
 399         return NULL;
 400 }
 401
 402 EXPORT_SYMBOL(bt878_find_by_dvb_adap);
 403
 404 /***********************/
 405 /* PCI device handling */
 406 /***********************/
 407
 408 static int __devinit bt878_probe(struct pci_dev *dev,
 409                                  const struct pci_device_id *pci_id)
 410 {
 411         int result;
 412         unsigned char lat;
 413         struct bt878 *bt;
 414 #if defined(__powerpc__)
 415         unsigned int cmd;
 416 #endif
 417
 418         printk(KERN_INFO "bt878: Bt878 AUDIO function found (%d).\n",
 419                bt878_num);
 420
 421         bt = &bt878[bt878_num];
 422         bt->dev = dev;
 423         bt->nr = bt878_num;
 424         bt->shutdown = 0;
 425
 426         bt->id = dev->device;
 427         bt->irq = dev->irq;
 428         bt->bt878_adr = pci_resource_start(dev, 0);
 429         if (pci_enable_device(dev))
 430                 return -EIO;
 431         if (!request_mem_region(pci_resource_start(dev, 0),
 432                                 pci_resource_len(dev, 0), "bt878")) {
 433                 return -EBUSY;
 434         }
 435
 436         pci_read_config_byte(dev, PCI_CLASS_REVISION, &bt->revision);
 437         pci_read_config_byte(dev, PCI_LATENCY_TIMER, &lat);
 438         printk(KERN_INFO "bt878(%d): Bt%x (rev %d) at %02x:%02x.%x, ",
 439                bt878_num, bt->id, bt->revision, dev->bus->number,
 440                PCI_SLOT(dev->devfn), PCI_FUNC(dev->devfn));
 441         printk("irq: %d, latency: %d, memory: 0x%lx\n",
 442                bt->irq, lat, bt->bt878_adr);
 443
 444
 445 #if defined(__powerpc__)
 446         /* on OpenFirmware machines (PowerMac at least), PCI memory cycle */
 447         /* response on cards with no firmware is not enabled by OF */
 448         pci_read_config_dword(dev, PCI_COMMAND, &cmd);
 449         cmd = (cmd | PCI_COMMAND_MEMORY);
 450         pci_write_config_dword(dev, PCI_COMMAND, cmd);
 451 #endif
 452
 453 #ifdef __sparc__
 454         bt->bt878_mem = (unsigned char *) bt->bt878_adr;
 455 #else
 456         bt->bt878_mem = ioremap(bt->bt878_adr, 0x1000);
 457 #endif
 458
 459         /* clear interrupt mask */
 460         btwrite(0, BT848_INT_MASK);
 461
 462         result = request_irq(bt->irq, bt878_irq,
 463                              SA_SHIRQ | SA_INTERRUPT, "bt878",
 464                              (void *) bt);
 465         if (result == -EINVAL) {
 466                 printk(KERN_ERR "bt878(%d): Bad irq number or handler\n",
 467                        bt878_num);
 468                 goto fail1;
 469         }
 470         if (result == -EBUSY) {
 471                 printk(KERN_ERR
 472                        "bt878(%d): IRQ %d busy, change your PnP config in BIOS\n",
 473                        bt878_num, bt->irq);
 474                 goto fail1;
 475         }
 476         if (result < 0)
 477                 goto fail1;
 478
 479         pci_set_master(dev);
 480         pci_set_drvdata(dev, bt);
 481
 482 /*        if(init_bt878(btv) < 0) {
 483                 bt878_remove(dev);
 484                 return -EIO;
 485         }
 486 */
 487
 488         if ((result = bt878_mem_alloc(bt))) {
 489                 printk("bt878: failed to allocate memory!\n");
 490                 goto fail2;
 491         }
 492
 493         bt878_make_risc(bt);
 494         btwrite(0, BT878_AINT_MASK);
 495         bt878_num++;
 496
 497         return 0;
 498
 499       fail2:
 500         free_irq(bt->irq, bt);
 501       fail1:
 502         release_mem_region(pci_resource_start(bt->dev, 0),
 503                            pci_resource_len(bt->dev, 0));
 504         return result;
 505 }
 506
 507 static void __devexit bt878_remove(struct pci_dev *pci_dev)
 508 {
 509         u8 command;
 510         struct bt878 *bt = pci_get_drvdata(pci_dev);
 511
 512         if (bt878_verbose)
 513                 printk("bt878(%d): unloading\n", bt->nr);
 514
 515         /* turn off all capturing, DMA and IRQs */
 516         btand(~13, BT878_AGPIO_DMA_CTL);
 517
 518         /* first disable interrupts before unmapping the memory! */
 519         btwrite(0, BT878_AINT_MASK);
 520         btwrite(~0x0UL, BT878_AINT_STAT);
 521
 522         /* disable PCI bus-mastering */
 523         pci_read_config_byte(bt->dev, PCI_COMMAND, &command);
 524         /* Should this be &=~ ?? */
 525         command &= ~PCI_COMMAND_MASTER;
 526         pci_write_config_byte(bt->dev, PCI_COMMAND, command);
 527
 528         free_irq(bt->irq, bt);
 529         printk(KERN_DEBUG "bt878_mem: 0x%p.\n", bt->bt878_mem);
 530         if (bt->bt878_mem)
 531                 iounmap(bt->bt878_mem);
 532
 533         release_mem_region(pci_resource_start(bt->dev, 0),
 534                            pci_resource_len(bt->dev, 0));
 535         /* wake up any waiting processes
 536            because shutdown flag is set, no new processes (in this queue)
 537            are expected
 538          */
 539         bt->shutdown = 1;
 540         bt878_mem_free(bt);
 541
 542         pci_set_drvdata(pci_dev, NULL);
 543         return;
 544 }
 545
 546 static struct pci_device_id bt878_pci_tbl[] __devinitdata = {
 547         {PCI_VENDOR_ID_BROOKTREE, PCI_DEVICE_ID_BROOKTREE_878,
 548          PCI_ANY_ID, PCI_ANY_ID, 0, 0, 0},
 549         {0,}
 550 };
 551
 552 MODULE_DEVICE_TABLE(pci, bt878_pci_tbl);
 553
 554 static struct pci_driver bt878_pci_driver = {
 555       .name     = "bt878",
 556       .id_table = bt878_pci_tbl,
 557       .probe    = bt878_probe,
 558       .remove   = bt878_remove,
 559 };
 560
 561 static int bt878_pci_driver_registered = 0;
 562
 563 /* This will be used later by dvb-bt8xx to only use the audio
 564  * dma of certain cards */
 565 int bt878_find_audio_dma(void)
 566 {
 567         // pci_register_driver(&bt878_pci_driver);
 568         bt878_pci_driver_registered = 1;
 569         return 0;
 570 }
 571
 572 EXPORT_SYMBOL(bt878_find_audio_dma);
 573
 574 /*******************************/
 575 /* Module management functions */
 576 /*******************************/
 577
 578 int bt878_init_module(void)
 579 {
 580         bt878_num = 0;
 581         bt878_pci_driver_registered = 0;
 582
 583         printk(KERN_INFO "bt878: AUDIO driver version %d.%d.%d loaded\n",
 584                (BT878_VERSION_CODE >> 16) & 0xff,
 585                (BT878_VERSION_CODE >> 8) & 0xff,
 586                BT878_VERSION_CODE & 0xff);
 587 /*
 588         bt878_check_chipset();
 589 */
 590         /* later we register inside of bt878_find_audio_dma
 591          * because we may want to ignore certain cards */
 592         bt878_pci_driver_registered = 1;
 593         return pci_module_init(&bt878_pci_driver);
 594 }
 595
 596 void bt878_cleanup_module(void)
 597 {
 598         if (bt878_pci_driver_registered) {
 599                 bt878_pci_driver_registered = 0;
 600                 pci_unregister_driver(&bt878_pci_driver);
 601         }
 602         return;
 603 }
 604
 605 EXPORT_SYMBOL(bt878_init_module);
 606 EXPORT_SYMBOL(bt878_cleanup_module);
 607 module_init(bt878_init_module);
 608 module_exit(bt878_cleanup_module);
 609
 610 /*
 611  * Local variables:
 612  * c-basic-offset: 8
 613  * End:
 614  */