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