GNU Linux-libre 5.10.153-gnu1
[releases.git] / 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 = kmalloc_array(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 < sg_dma_len(list); 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");