drivers/media/common/saa7146/saa7146_core.c

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