drivers/media/common/saa7146_core.c

   1 /*
   2     saa7146.o - driver for generic saa7146-based hardware
   3
   4     Copyright (C) 1998-2003 Michael Hunold <michael@mihu.de>
   5
   6     This program is free software; you can redistribute it and/or modify
   7     it under the terms of the GNU General Public License as published by
   8     the Free Software Foundation; either version 2 of the License, or
   9     (at your option) any later version.
  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     You should have received a copy of the GNU General Public License
  17     along with this program; if not, write to the Free Software
  18     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  19 */
  20
  21 #include <media/saa7146.h>
  22
  23 LIST_HEAD(saa7146_devices);
  24 DEFINE_MUTEX(saa7146_devices_lock);
  25
  26 static int saa7146_num;
  27
  28 unsigned int saa7146_debug;
  29
  30 module_param(saa7146_debug, uint, 0644);
  31 MODULE_PARM_DESC(saa7146_debug, "debug level (default: 0)");
  32
  33 #if 0
  34 static void dump_registers(struct saa7146_dev* dev)
  35 {
  36         int i = 0;
  37
  38         INFO((" @ %li jiffies:\n",jiffies));
  39         for(i = 0; i <= 0x148; i+=4) {
  40                 printk("0x%03x: 0x%08x\n",i,saa7146_read(dev,i));
  41         }
  42 }
  43 #endif
  44
  45 /****************************************************************************
  46  * gpio and debi helper functions
  47  ****************************************************************************/
  48
  49 void saa7146_setgpio(struct saa7146_dev *dev, int port, u32 data)
  50 {
  51         u32 value = 0;
  52
  53         BUG_ON(port > 3);
  54
  55         value = saa7146_read(dev, GPIO_CTRL);
  56         value &= ~(0xff << (8*port));
  57         value |= (data << (8*port));
  58         saa7146_write(dev, GPIO_CTRL, value);
  59 }
  60
  61 /* This DEBI code is based on the saa7146 Stradis driver by Nathan Laredo */
  62 static inline int saa7146_wait_for_debi_done_sleep(struct saa7146_dev *dev,
  63                                 unsigned long us1, unsigned long us2)
  64 {
  65         unsigned long timeout;
  66         int err;
  67
  68         /* wait for registers to be programmed */
  69         timeout = jiffies + usecs_to_jiffies(us1);
  70         while (1) {
  71                 err = time_after(jiffies, timeout);
  72                 if (saa7146_read(dev, MC2) & 2)
  73                         break;
  74                 if (err) {
  75                         printk(KERN_ERR "%s: %s timed out while waiting for "
  76                                         "registers getting programmed\n",
  77                                         dev->name, __FUNCTION__);
  78                         return -ETIMEDOUT;
  79                 }
  80                 msleep(1);
  81         }
  82
  83         /* wait for transfer to complete */
  84         timeout = jiffies + usecs_to_jiffies(us2);
  85         while (1) {
  86                 err = time_after(jiffies, timeout);
  87                 if (!(saa7146_read(dev, PSR) & SPCI_DEBI_S))
  88                         break;
  89                 saa7146_read(dev, MC2);
  90                 if (err) {
  91                         DEB_S(("%s: %s timed out while waiting for transfer "
  92                                 "completion\n", dev->name, __FUNCTION__));
  93                         return -ETIMEDOUT;
  94                 }
  95                 msleep(1);
  96         }
  97
  98         return 0;
  99 }
 100
 101 static inline int saa7146_wait_for_debi_done_busyloop(struct saa7146_dev *dev,
 102                                 unsigned long us1, unsigned long us2)
 103 {
 104         unsigned long loops;
 105
 106         /* wait for registers to be programmed */
 107         loops = us1;
 108         while (1) {
 109                 if (saa7146_read(dev, MC2) & 2)
 110                         break;
 111                 if (!loops--) {
 112                         printk(KERN_ERR "%s: %s timed out while waiting for "
 113                                         "registers getting programmed\n",
 114                                         dev->name, __FUNCTION__);
 115                         return -ETIMEDOUT;
 116                 }
 117                 udelay(1);
 118         }
 119
 120         /* wait for transfer to complete */
 121         loops = us2 / 5;
 122         while (1) {
 123                 if (!(saa7146_read(dev, PSR) & SPCI_DEBI_S))
 124                         break;
 125                 saa7146_read(dev, MC2);
 126                 if (!loops--) {
 127                         DEB_S(("%s: %s timed out while waiting for transfer "
 128                                 "completion\n", dev->name, __FUNCTION__));
 129                         return -ETIMEDOUT;
 130                 }
 131                 udelay(5);
 132         }
 133
 134         return 0;
 135 }
 136
 137 int saa7146_wait_for_debi_done(struct saa7146_dev *dev, int nobusyloop)
 138 {
 139         if (nobusyloop)
 140                 return saa7146_wait_for_debi_done_sleep(dev, 50000, 250000);
 141         else
 142                 return saa7146_wait_for_debi_done_busyloop(dev, 50000, 250000);
 143 }
 144
 145 /****************************************************************************
 146  * general helper functions
 147  ****************************************************************************/
 148
 149 /* this is videobuf_vmalloc_to_sg() from videobuf-dma-sg.c
 150    make sure virt has been allocated with vmalloc_32(), otherwise the BUG()
 151    may be triggered on highmem machines */
 152 static struct scatterlist* vmalloc_to_sg(unsigned char *virt, int nr_pages)
 153 {
 154         struct scatterlist *sglist;
 155         struct page *pg;
 156         int i;
 157
 158         sglist = kcalloc(nr_pages, sizeof(struct scatterlist), GFP_KERNEL);
 159         if (NULL == sglist)
 160                 return NULL;
 161         sg_init_table(sglist, nr_pages);
 162         for (i = 0; i < nr_pages; i++, virt += PAGE_SIZE) {
 163                 pg = vmalloc_to_page(virt);
 164                 if (NULL == pg)
 165                         goto err;
 166                 BUG_ON(PageHighMem(pg));
 167                 sg_set_page(&sglist[i], pg, PAGE_SIZE, 0);
 168         }
 169         return sglist;
 170
 171  err:
 172         kfree(sglist);
 173         return NULL;
 174 }
 175
 176 /********************************************************************************/
 177 /* common page table functions */
 178
 179 void *saa7146_vmalloc_build_pgtable(struct pci_dev *pci, long length, struct saa7146_pgtable *pt)
 180 {
 181         int pages = (length+PAGE_SIZE-1)/PAGE_SIZE;
 182         void *mem = vmalloc_32(length);
 183         int slen = 0;
 184
 185         if (NULL == mem)
 186                 goto err_null;
 187
 188         if (!(pt->slist = vmalloc_to_sg(mem, pages)))
 189                 goto err_free_mem;
 190
 191         if (saa7146_pgtable_alloc(pci, pt))
 192                 goto err_free_slist;
 193
 194         pt->nents = pages;
 195         slen = pci_map_sg(pci,pt->slist,pt->nents,PCI_DMA_FROMDEVICE);
 196         if (0 == slen)
 197                 goto err_free_pgtable;
 198
 199         if (0 != saa7146_pgtable_build_single(pci, pt, pt->slist, slen))
 200                 goto err_unmap_sg;
 201
 202         return mem;
 203
 204 err_unmap_sg:
 205         pci_unmap_sg(pci, pt->slist, pt->nents, PCI_DMA_FROMDEVICE);
 206 err_free_pgtable:
 207         saa7146_pgtable_free(pci, pt);
 208 err_free_slist:
 209         kfree(pt->slist);
 210         pt->slist = NULL;
 211 err_free_mem:
 212         vfree(mem);
 213 err_null:
 214         return NULL;
 215 }
 216
 217 void saa7146_vfree_destroy_pgtable(struct pci_dev *pci, void *mem, struct saa7146_pgtable *pt)
 218 {
 219         pci_unmap_sg(pci, pt->slist, pt->nents, PCI_DMA_FROMDEVICE);
 220         saa7146_pgtable_free(pci, pt);
 221         kfree(pt->slist);
 222         pt->slist = NULL;
 223         vfree(mem);
 224 }
 225
 226 void saa7146_pgtable_free(struct pci_dev *pci, struct saa7146_pgtable *pt)
 227 {
 228         if (NULL == pt->cpu)
 229                 return;
 230         pci_free_consistent(pci, pt->size, pt->cpu, pt->dma);
 231         pt->cpu = NULL;
 232 }
 233
 234 int saa7146_pgtable_alloc(struct pci_dev *pci, struct saa7146_pgtable *pt)
 235 {
 236         u32          *cpu;
 237         dma_addr_t   dma_addr;
 238
 239         cpu = pci_alloc_consistent(pci, PAGE_SIZE, &dma_addr);
 240         if (NULL == cpu) {
 241                 return -ENOMEM;
 242         }
 243         pt->size = PAGE_SIZE;
 244         pt->cpu  = cpu;
 245         pt->dma  = dma_addr;
 246
 247         return 0;
 248 }
 249
 250 int saa7146_pgtable_build_single(struct pci_dev *pci, struct saa7146_pgtable *pt,
 251         struct scatterlist *list, int sglen  )
 252 {
 253         u32 *ptr, fill;
 254         int nr_pages = 0;
 255         int i,p;
 256
 257         BUG_ON(0 == sglen);
 258         BUG_ON(list->offset > PAGE_SIZE);
 259
 260         /* if we have a user buffer, the first page may not be
 261            aligned to a page boundary. */
 262         pt->offset = list->offset;
 263
 264         ptr = pt->cpu;
 265         for (i = 0; i < sglen; i++, list++) {
 266 /*
 267                 printk("i:%d, adr:0x%08x, len:%d, offset:%d\n", i,sg_dma_address(list), sg_dma_len(list), list->offset);
 268 */
 269                 for (p = 0; p * 4096 < list->length; p++, ptr++) {
 270                         *ptr = cpu_to_le32(sg_dma_address(list) + p * 4096);
 271                         nr_pages++;
 272                 }
 273         }
 274
 275
 276         /* safety; fill the page table up with the last valid page */
 277         fill = *(ptr-1);
 278         for(i=nr_pages;i<1024;i++) {
 279                 *ptr++ = fill;
 280         }
 281
 282 /*
 283         ptr = pt->cpu;
 284         printk("offset: %d\n",pt->offset);
 285         for(i=0;i<5;i++) {
 286                 printk("ptr1 %d: 0x%08x\n",i,ptr[i]);
 287         }
 288 */
 289         return 0;
 290 }
 291
 292 /********************************************************************************/
 293 /* interrupt handler */
 294 static irqreturn_t interrupt_hw(int irq, void *dev_id)
 295 {
 296         struct saa7146_dev *dev = dev_id;
 297         u32 isr;
 298         u32 ack_isr;
 299
 300         /* read out the interrupt status register */
 301         ack_isr = isr = saa7146_read(dev, ISR);
 302
 303         /* is this our interrupt? */
 304         if ( 0 == isr ) {
 305                 /* nope, some other device */
 306                 return IRQ_NONE;
 307         }
 308
 309         if( 0 != (dev->ext)) {
 310                 if( 0 != (dev->ext->irq_mask & isr )) {
 311                         if( 0 != dev->ext->irq_func ) {
 312                                 dev->ext->irq_func(dev, &isr);
 313                         }
 314                         isr &= ~dev->ext->irq_mask;
 315                 }
 316         }
 317         if (0 != (isr & (MASK_27))) {
 318                 DEB_INT(("irq: RPS0 (0x%08x).\n",isr));
 319                 if( 0 != dev->vv_data && 0 != dev->vv_callback) {
 320                         dev->vv_callback(dev,isr);
 321                 }
 322                 isr &= ~MASK_27;
 323         }
 324         if (0 != (isr & (MASK_28))) {
 325                 if( 0 != dev->vv_data && 0 != dev->vv_callback) {
 326                         dev->vv_callback(dev,isr);
 327                 }
 328                 isr &= ~MASK_28;
 329         }
 330         if (0 != (isr & (MASK_16|MASK_17))) {
 331                 SAA7146_IER_DISABLE(dev, MASK_16|MASK_17);
 332                 /* only wake up if we expect something */
 333                 if (0 != dev->i2c_op) {
 334                         dev->i2c_op = 0;
 335                         wake_up(&dev->i2c_wq);
 336                 } else {
 337                         u32 psr = saa7146_read(dev, PSR);
 338                         u32 ssr = saa7146_read(dev, SSR);
 339                         printk(KERN_WARNING "%s: unexpected i2c irq: isr %08x psr %08x ssr %08x\n",
 340                                dev->name, isr, psr, ssr);
 341                 }
 342                 isr &= ~(MASK_16|MASK_17);
 343         }
 344         if( 0 != isr ) {
 345                 ERR(("warning: interrupt enabled, but not handled properly.(0x%08x)\n",isr));
 346                 ERR(("disabling interrupt source(s)!\n"));
 347                 SAA7146_IER_DISABLE(dev,isr);
 348         }
 349         saa7146_write(dev, ISR, ack_isr);
 350         return IRQ_HANDLED;
 351 }
 352
 353 /*********************************************************************************/
 354 /* configuration-functions                                                       */
 355
 356 static int saa7146_init_one(struct pci_dev *pci, const struct pci_device_id *ent)
 357 {
 358         struct saa7146_pci_extension_data *pci_ext = (struct saa7146_pci_extension_data *)ent->driver_data;
 359         struct saa7146_extension *ext = pci_ext->ext;
 360         struct saa7146_dev *dev;
 361         int err = -ENOMEM;
 362
 363         /* clear out mem for sure */
 364         dev = kzalloc(sizeof(struct saa7146_dev), GFP_KERNEL);
 365         if (!dev) {
 366                 ERR(("out of memory.\n"));
 367                 goto out;
 368         }
 369
 370         DEB_EE(("pci:%p\n",pci));
 371
 372         err = pci_enable_device(pci);
 373         if (err < 0) {
 374                 ERR(("pci_enable_device() failed.\n"));
 375                 goto err_free;
 376         }
 377
 378         /* enable bus-mastering */
 379         pci_set_master(pci);
 380
 381         dev->pci = pci;
 382
 383         /* get chip-revision; this is needed to enable bug-fixes */
 384         err = pci_read_config_dword(pci, PCI_CLASS_REVISION, &dev->revision);
 385         if (err < 0) {
 386                 ERR(("pci_read_config_dword() failed.\n"));
 387                 goto err_disable;
 388         }
 389         dev->revision &= 0xf;
 390
 391         /* remap the memory from virtual to physical address */
 392
 393         err = pci_request_region(pci, 0, "saa7146");
 394         if (err < 0)
 395                 goto err_disable;
 396
 397         dev->mem = ioremap(pci_resource_start(pci, 0),
 398                            pci_resource_len(pci, 0));
 399         if (!dev->mem) {
 400                 ERR(("ioremap() failed.\n"));
 401                 err = -ENODEV;
 402                 goto err_release;
 403         }
 404
 405         /* we don't do a master reset here anymore, it screws up
 406            some boards that don't have an i2c-eeprom for configuration
 407            values */
 408 /*
 409         saa7146_write(dev, MC1, MASK_31);
 410 */
 411
 412         /* disable all irqs */
 413         saa7146_write(dev, IER, 0);
 414
 415         /* shut down all dma transfers and rps tasks */
 416         saa7146_write(dev, MC1, 0x30ff0000);
 417
 418         /* clear out any rps-signals pending */
 419         saa7146_write(dev, MC2, 0xf8000000);
 420
 421         /* request an interrupt for the saa7146 */
 422         err = request_irq(pci->irq, interrupt_hw, IRQF_SHARED | IRQF_DISABLED,
 423                           dev->name, dev);
 424         if (err < 0) {
 425                 ERR(("request_irq() failed.\n"));
 426                 goto err_unmap;
 427         }
 428
 429         err = -ENOMEM;
 430
 431         /* get memory for various stuff */
 432         dev->d_rps0.cpu_addr = pci_alloc_consistent(pci, SAA7146_RPS_MEM,
 433                                                     &dev->d_rps0.dma_handle);
 434         if (!dev->d_rps0.cpu_addr)
 435                 goto err_free_irq;
 436         memset(dev->d_rps0.cpu_addr, 0x0, SAA7146_RPS_MEM);
 437
 438         dev->d_rps1.cpu_addr = pci_alloc_consistent(pci, SAA7146_RPS_MEM,
 439                                                     &dev->d_rps1.dma_handle);
 440         if (!dev->d_rps1.cpu_addr)
 441                 goto err_free_rps0;
 442         memset(dev->d_rps1.cpu_addr, 0x0, SAA7146_RPS_MEM);
 443
 444         dev->d_i2c.cpu_addr = pci_alloc_consistent(pci, SAA7146_RPS_MEM,
 445                                                    &dev->d_i2c.dma_handle);
 446         if (!dev->d_i2c.cpu_addr)
 447                 goto err_free_rps1;
 448         memset(dev->d_i2c.cpu_addr, 0x0, SAA7146_RPS_MEM);
 449
 450         /* the rest + print status message */
 451
 452         /* create a nice device name */
 453         sprintf(dev->name, "saa7146 (%d)", saa7146_num);
 454
 455         INFO(("found saa7146 @ mem %p (revision %d, irq %d) (0x%04x,0x%04x).\n", dev->mem, dev->revision, pci->irq, pci->subsystem_vendor, pci->subsystem_device));
 456         dev->ext = ext;
 457
 458         pci_set_drvdata(pci, dev);
 459
 460         mutex_init(&dev->lock);
 461         spin_lock_init(&dev->int_slock);
 462         spin_lock_init(&dev->slock);
 463
 464         mutex_init(&dev->i2c_lock);
 465
 466         dev->module = THIS_MODULE;
 467         init_waitqueue_head(&dev->i2c_wq);
 468
 469         /* set some sane pci arbitrition values */
 470         saa7146_write(dev, PCI_BT_V1, 0x1c00101f);
 471
 472         /* TODO: use the status code of the callback */
 473
 474         err = -ENODEV;
 475
 476         if (ext->probe && ext->probe(dev)) {
 477                 DEB_D(("ext->probe() failed for %p. skipping device.\n",dev));
 478                 goto err_free_i2c;
 479         }
 480
 481         if (ext->attach(dev, pci_ext)) {
 482                 DEB_D(("ext->attach() failed for %p. skipping device.\n",dev));
 483                 goto err_unprobe;
 484         }
 485
 486         INIT_LIST_HEAD(&dev->item);
 487         list_add_tail(&dev->item,&saa7146_devices);
 488         saa7146_num++;
 489
 490         err = 0;
 491 out:
 492         return err;
 493
 494 err_unprobe:
 495         pci_set_drvdata(pci, NULL);
 496 err_free_i2c:
 497         pci_free_consistent(pci, SAA7146_RPS_MEM, dev->d_i2c.cpu_addr,
 498                             dev->d_i2c.dma_handle);
 499 err_free_rps1:
 500         pci_free_consistent(pci, SAA7146_RPS_MEM, dev->d_rps1.cpu_addr,
 501                             dev->d_rps1.dma_handle);
 502 err_free_rps0:
 503         pci_free_consistent(pci, SAA7146_RPS_MEM, dev->d_rps0.cpu_addr,
 504                             dev->d_rps0.dma_handle);
 505 err_free_irq:
 506         free_irq(pci->irq, (void *)dev);
 507 err_unmap:
 508         iounmap(dev->mem);
 509 err_release:
 510         pci_release_region(pci, 0);
 511 err_disable:
 512         pci_disable_device(pci);
 513 err_free:
 514         kfree(dev);
 515         goto out;
 516 }
 517
 518 static void saa7146_remove_one(struct pci_dev *pdev)
 519 {
 520         struct saa7146_dev* dev = pci_get_drvdata(pdev);
 521         struct {
 522                 void *addr;
 523                 dma_addr_t dma;
 524         } dev_map[] = {
 525                 { dev->d_i2c.cpu_addr, dev->d_i2c.dma_handle },
 526                 { dev->d_rps1.cpu_addr, dev->d_rps1.dma_handle },
 527                 { dev->d_rps0.cpu_addr, dev->d_rps0.dma_handle },
 528                 { NULL, 0 }
 529         }, *p;
 530
 531         DEB_EE(("dev:%p\n",dev));
 532
 533         dev->ext->detach(dev);
 534
 535         /* shut down all video dma transfers */
 536         saa7146_write(dev, MC1, 0x00ff0000);
 537
 538         /* disable all irqs, release irq-routine */
 539         saa7146_write(dev, IER, 0);
 540
 541         free_irq(pdev->irq, dev);
 542
 543         for (p = dev_map; p->addr; p++)
 544                 pci_free_consistent(pdev, SAA7146_RPS_MEM, p->addr, p->dma);
 545
 546         iounmap(dev->mem);
 547         pci_release_region(pdev, 0);
 548         list_del(&dev->item);
 549         pci_disable_device(pdev);
 550         kfree(dev);
 551
 552         saa7146_num--;
 553 }
 554
 555 /*********************************************************************************/
 556 /* extension handling functions                                                  */
 557
 558 int saa7146_register_extension(struct saa7146_extension* ext)
 559 {
 560         DEB_EE(("ext:%p\n",ext));
 561
 562         ext->driver.name = ext->name;
 563         ext->driver.id_table = ext->pci_tbl;
 564         ext->driver.probe = saa7146_init_one;
 565         ext->driver.remove = saa7146_remove_one;
 566
 567         printk("saa7146: register extension '%s'.\n",ext->name);
 568         return pci_register_driver(&ext->driver);
 569 }
 570
 571 int saa7146_unregister_extension(struct saa7146_extension* ext)
 572 {
 573         DEB_EE(("ext:%p\n",ext));
 574         printk("saa7146: unregister extension '%s'.\n",ext->name);
 575         pci_unregister_driver(&ext->driver);
 576         return 0;
 577 }
 578
 579 EXPORT_SYMBOL_GPL(saa7146_register_extension);
 580 EXPORT_SYMBOL_GPL(saa7146_unregister_extension);
 581
 582 /* misc functions used by extension modules */
 583 EXPORT_SYMBOL_GPL(saa7146_pgtable_alloc);
 584 EXPORT_SYMBOL_GPL(saa7146_pgtable_free);
 585 EXPORT_SYMBOL_GPL(saa7146_pgtable_build_single);
 586 EXPORT_SYMBOL_GPL(saa7146_vmalloc_build_pgtable);
 587 EXPORT_SYMBOL_GPL(saa7146_vfree_destroy_pgtable);
 588 EXPORT_SYMBOL_GPL(saa7146_wait_for_debi_done);
 589
 590 EXPORT_SYMBOL_GPL(saa7146_setgpio);
 591
 592 EXPORT_SYMBOL_GPL(saa7146_i2c_adapter_prepare);
 593
 594 EXPORT_SYMBOL_GPL(saa7146_debug);
 595 EXPORT_SYMBOL_GPL(saa7146_devices);
 596 EXPORT_SYMBOL_GPL(saa7146_devices_lock);
 597
 598 MODULE_AUTHOR("Michael Hunold <michael@mihu.de>");
 599 MODULE_DESCRIPTION("driver for generic saa7146-based hardware");
 600 MODULE_LICENSE("GPL");