V4L/DVB (7492): vivi: Simplify the vivi driver and avoid deadlocks
[linux-2.6] / drivers / media / video / vivi.c
1 /*
2  * Virtual Video driver - This code emulates a real video device with v4l2 api
3  *
4  * Copyright (c) 2006 by:
5  *      Mauro Carvalho Chehab <mchehab--a.t--infradead.org>
6  *      Ted Walther <ted--a.t--enumera.com>
7  *      John Sokol <sokol--a.t--videotechnology.com>
8  *      http://v4l.videotechnology.com/
9  *
10  * This program is free software; you can redistribute it and/or modify
11  * it under the terms of the BSD Licence, GNU General Public License
12  * as published by the Free Software Foundation; either version 2 of the
13  * License, or (at your option) any later version
14  */
15 #include <linux/module.h>
16 #include <linux/delay.h>
17 #include <linux/errno.h>
18 #include <linux/fs.h>
19 #include <linux/kernel.h>
20 #include <linux/slab.h>
21 #include <linux/mm.h>
22 #include <linux/ioport.h>
23 #include <linux/init.h>
24 #include <linux/sched.h>
25 #include <linux/pci.h>
26 #include <linux/random.h>
27 #include <linux/version.h>
28 #include <linux/mutex.h>
29 #include <linux/videodev2.h>
30 #include <linux/dma-mapping.h>
31 #ifdef CONFIG_VIDEO_V4L1_COMPAT
32 /* Include V4L1 specific functions. Should be removed soon */
33 #include <linux/videodev.h>
34 #endif
35 #include <linux/interrupt.h>
36 #include <media/videobuf-vmalloc.h>
37 #include <media/v4l2-common.h>
38 #include <linux/kthread.h>
39 #include <linux/highmem.h>
40 #include <linux/freezer.h>
41
42 /* Wake up at about 30 fps */
43 #define WAKE_NUMERATOR 30
44 #define WAKE_DENOMINATOR 1001
45 #define BUFFER_TIMEOUT     msecs_to_jiffies(500)  /* 0.5 seconds */
46
47 #include "font.h"
48
49 #define VIVI_MAJOR_VERSION 0
50 #define VIVI_MINOR_VERSION 4
51 #define VIVI_RELEASE 0
52 #define VIVI_VERSION \
53         KERNEL_VERSION(VIVI_MAJOR_VERSION, VIVI_MINOR_VERSION, VIVI_RELEASE)
54
55 /* Declare static vars that will be used as parameters */
56 static unsigned int vid_limit = 16;     /* Video memory limit, in Mb */
57 static int video_nr = -1;               /* /dev/videoN, -1 for autodetect */
58 static int n_devs = 1;                  /* Number of virtual devices */
59
60 /* supported controls */
61 static struct v4l2_queryctrl vivi_qctrl[] = {
62         {
63                 .id            = V4L2_CID_AUDIO_VOLUME,
64                 .name          = "Volume",
65                 .minimum       = 0,
66                 .maximum       = 65535,
67                 .step          = 65535/100,
68                 .default_value = 65535,
69                 .flags         = 0,
70                 .type          = V4L2_CTRL_TYPE_INTEGER,
71         }, {
72                 .id            = V4L2_CID_BRIGHTNESS,
73                 .type          = V4L2_CTRL_TYPE_INTEGER,
74                 .name          = "Brightness",
75                 .minimum       = 0,
76                 .maximum       = 255,
77                 .step          = 1,
78                 .default_value = 127,
79                 .flags         = 0,
80         }, {
81                 .id            = V4L2_CID_CONTRAST,
82                 .type          = V4L2_CTRL_TYPE_INTEGER,
83                 .name          = "Contrast",
84                 .minimum       = 0,
85                 .maximum       = 255,
86                 .step          = 0x1,
87                 .default_value = 0x10,
88                 .flags         = 0,
89         }, {
90                 .id            = V4L2_CID_SATURATION,
91                 .type          = V4L2_CTRL_TYPE_INTEGER,
92                 .name          = "Saturation",
93                 .minimum       = 0,
94                 .maximum       = 255,
95                 .step          = 0x1,
96                 .default_value = 127,
97                 .flags         = 0,
98         }, {
99                 .id            = V4L2_CID_HUE,
100                 .type          = V4L2_CTRL_TYPE_INTEGER,
101                 .name          = "Hue",
102                 .minimum       = -128,
103                 .maximum       = 127,
104                 .step          = 0x1,
105                 .default_value = 0,
106                 .flags         = 0,
107         }
108 };
109
110 static int qctl_regs[ARRAY_SIZE(vivi_qctrl)];
111
112 #define dprintk(dev, level, fmt, arg...)                                \
113         do {                                                            \
114                 if (dev->vfd->debug >= (level))                         \
115                         printk(KERN_DEBUG "vivi: " fmt , ## arg);       \
116         } while (0)
117
118 /* ------------------------------------------------------------------
119         Basic structures
120    ------------------------------------------------------------------*/
121
122 struct vivi_fmt {
123         char  *name;
124         u32   fourcc;          /* v4l2 format id */
125         int   depth;
126 };
127
128 static struct vivi_fmt format = {
129         .name     = "4:2:2, packed, YUYV",
130         .fourcc   = V4L2_PIX_FMT_YUYV,
131         .depth    = 16,
132 };
133
134 struct sg_to_addr {
135         int pos;
136         struct scatterlist *sg;
137 };
138
139 /* buffer for one video frame */
140 struct vivi_buffer {
141         /* common v4l buffer stuff -- must be first */
142         struct videobuf_buffer vb;
143
144         struct vivi_fmt        *fmt;
145 };
146
147 struct vivi_dmaqueue {
148         struct list_head       active;
149
150         /* thread for generating video stream*/
151         struct task_struct         *kthread;
152         wait_queue_head_t          wq;
153         /* Counters to control fps rate */
154         int                        frame;
155         int                        ini_jiffies;
156 };
157
158 static LIST_HEAD(vivi_devlist);
159
160 struct vivi_dev {
161         struct list_head           vivi_devlist;
162
163         spinlock_t                 slock;
164         struct mutex               mutex;
165
166         int                        users;
167
168         /* various device info */
169         struct video_device        *vfd;
170
171         struct vivi_dmaqueue       vidq;
172
173         /* Several counters */
174         int                        h, m, s, ms;
175         unsigned long              jiffies;
176         char                       timestr[13];
177
178         int                        mv_count;    /* Controls bars movement */
179 };
180
181 struct vivi_fh {
182         struct vivi_dev            *dev;
183
184         /* video capture */
185         struct vivi_fmt            *fmt;
186         unsigned int               width, height;
187         struct videobuf_queue      vb_vidq;
188
189         enum v4l2_buf_type         type;
190 };
191
192 /* ------------------------------------------------------------------
193         DMA and thread functions
194    ------------------------------------------------------------------*/
195
196 /* Bars and Colors should match positions */
197
198 enum colors {
199         WHITE,
200         AMBAR,
201         CYAN,
202         GREEN,
203         MAGENTA,
204         RED,
205         BLUE,
206         BLACK,
207 };
208
209 static u8 bars[8][3] = {
210         /* R   G   B */
211         {204, 204, 204},  /* white */
212         {208, 208,   0},  /* ambar */
213         {  0, 206, 206},  /* cyan */
214         {  0, 239,   0},  /* green */
215         {239,   0, 239},  /* magenta */
216         {205,   0,   0},  /* red */
217         {  0,   0, 255},  /* blue */
218         {  0,   0,   0},  /* black */
219 };
220
221 #define TO_Y(r, g, b) \
222         (((16829 * r + 33039 * g + 6416 * b  + 32768) >> 16) + 16)
223 /* RGB to  V(Cr) Color transform */
224 #define TO_V(r, g, b) \
225         (((28784 * r - 24103 * g - 4681 * b  + 32768) >> 16) + 128)
226 /* RGB to  U(Cb) Color transform */
227 #define TO_U(r, g, b) \
228         (((-9714 * r - 19070 * g + 28784 * b + 32768) >> 16) + 128)
229
230 #define TSTAMP_MIN_Y 24
231 #define TSTAMP_MAX_Y TSTAMP_MIN_Y+15
232 #define TSTAMP_MIN_X 64
233
234 static void gen_line(char *basep, int inipos, int wmax,
235                 int hmax, int line, int count, char *timestr)
236 {
237         int  w, i, j, y;
238         int pos = inipos;
239         char *p, *s;
240         u8   chr, r, g, b, color;
241
242         /* We will just duplicate the second pixel at the packet */
243         wmax /= 2;
244
245         /* Generate a standard color bar pattern */
246         for (w = 0; w < wmax; w++) {
247                 int colorpos = ((w + count) * 8/(wmax + 1)) % 8;
248                 r = bars[colorpos][0];
249                 g = bars[colorpos][1];
250                 b = bars[colorpos][2];
251
252                 for (color = 0; color < 4; color++) {
253                         p = basep + pos;
254
255                         switch (color) {
256                         case 0:
257                         case 2:
258                                 *p = TO_Y(r, g, b);     /* Luma */
259                                 break;
260                         case 1:
261                                 *p = TO_U(r, g, b);     /* Cb */
262                                 break;
263                         case 3:
264                                 *p = TO_V(r, g, b);     /* Cr */
265                                 break;
266                         }
267                         pos++;
268                 }
269         }
270
271         /* Checks if it is possible to show timestamp */
272         if (TSTAMP_MAX_Y >= hmax)
273                 goto end;
274         if (TSTAMP_MIN_X + strlen(timestr) >= wmax)
275                 goto end;
276
277         /* Print stream time */
278         if (line >= TSTAMP_MIN_Y && line <= TSTAMP_MAX_Y) {
279                 j = TSTAMP_MIN_X;
280                 for (s = timestr; *s; s++) {
281                         chr = rom8x16_bits[(*s-0x30)*16+line-TSTAMP_MIN_Y];
282                         for (i = 0; i < 7; i++) {
283                                 if (chr & 1 << (7 - i)) {
284                                         /* Font color*/
285                                         r = 0;
286                                         g = 198;
287                                         b = 0;
288                                 } else {
289                                         /* Background color */
290                                         r = bars[BLACK][0];
291                                         g = bars[BLACK][1];
292                                         b = bars[BLACK][2];
293                                 }
294
295                                 pos = inipos + j * 2;
296                                 for (color = 0; color < 4; color++) {
297                                         p = basep + pos;
298
299                                         y = TO_Y(r, g, b);
300
301                                         switch (color) {
302                                         case 0:
303                                         case 2:
304                                                 *p = TO_Y(r, g, b); /* Luma */
305                                                 break;
306                                         case 1:
307                                                 *p = TO_U(r, g, b); /* Cb */
308                                                 break;
309                                         case 3:
310                                                 *p = TO_V(r, g, b); /* Cr */
311                                                 break;
312                                         }
313                                         pos++;
314                                 }
315                                 j++;
316                         }
317                 }
318         }
319
320 end:
321         return;
322 }
323
324 static void vivi_fillbuff(struct vivi_dev *dev, struct vivi_buffer *buf)
325 {
326         int h , pos = 0;
327         int hmax  = buf->vb.height;
328         int wmax  = buf->vb.width;
329         struct timeval ts;
330         char *tmpbuf = kmalloc(wmax * 2, GFP_ATOMIC);
331         void *vbuf = videobuf_to_vmalloc(&buf->vb);
332
333         if (!tmpbuf)
334                 return;
335
336         if (!vbuf)
337                 return;
338
339         for (h = 0; h < hmax; h++) {
340                 gen_line(tmpbuf, 0, wmax, hmax, h, dev->mv_count,
341                          dev->timestr);
342                 memcpy(vbuf + pos, tmpbuf, wmax * 2);
343                 pos += wmax*2;
344         }
345
346         dev->mv_count++;
347
348         kfree(tmpbuf);
349
350         /* Updates stream time */
351
352         dev->ms += jiffies_to_msecs(jiffies-dev->jiffies);
353         dev->jiffies = jiffies;
354         if (dev->ms >= 1000) {
355                 dev->ms -= 1000;
356                 dev->s++;
357                 if (dev->s >= 60) {
358                         dev->s -= 60;
359                         dev->m++;
360                         if (dev->m > 60) {
361                                 dev->m -= 60;
362                                 dev->h++;
363                                 if (dev->h > 24)
364                                         dev->h -= 24;
365                         }
366                 }
367         }
368         sprintf(dev->timestr, "%02d:%02d:%02d:%03d",
369                         dev->h, dev->m, dev->s, dev->ms);
370
371         dprintk(dev, 2, "vivifill at %s: Buffer 0x%08lx size= %d\n",
372                         dev->timestr, (unsigned long)tmpbuf, pos);
373
374         /* Advice that buffer was filled */
375         buf->vb.field_count++;
376         do_gettimeofday(&ts);
377         buf->vb.ts = ts;
378         buf->vb.state = VIDEOBUF_DONE;
379 }
380
381 static void vivi_thread_tick(struct vivi_fh *fh)
382 {
383         struct vivi_buffer *buf;
384         struct vivi_dev *dev = fh->dev;
385         struct vivi_dmaqueue *dma_q = &dev->vidq;
386
387         unsigned long flags = 0;
388
389         dprintk(dev, 1, "Thread tick\n");
390
391         spin_lock_irqsave(&dev->slock, flags);
392         if (list_empty(&dma_q->active)) {
393                 dprintk(dev, 1, "No active queue to serve\n");
394                 goto unlock;
395         }
396
397         buf = list_entry(dma_q->active.next,
398                          struct vivi_buffer, vb.queue);
399
400         /* Nobody is waiting on this buffer, return */
401         if (!waitqueue_active(&buf->vb.done))
402                 goto unlock;
403
404         list_del(&buf->vb.queue);
405
406         do_gettimeofday(&buf->vb.ts);
407
408         /* Fill buffer */
409         vivi_fillbuff(dev, buf);
410         dprintk(dev, 1, "filled buffer %p\n", buf);
411
412         wake_up(&buf->vb.done);
413         dprintk(dev, 2, "[%p/%d] wakeup\n", buf, buf->vb. i);
414 unlock:
415         spin_unlock_irqrestore(&dev->slock, flags);
416         return;
417 }
418
419 #define frames_to_ms(frames)                                    \
420         ((frames * WAKE_NUMERATOR * 1000) / WAKE_DENOMINATOR)
421
422 static void vivi_sleep(struct vivi_fh *fh)
423 {
424         struct vivi_dev *dev = fh->dev;
425         struct vivi_dmaqueue *dma_q = &dev->vidq;
426         int timeout;
427         DECLARE_WAITQUEUE(wait, current);
428
429         dprintk(dev, 1, "%s dma_q=0x%08lx\n", __FUNCTION__,
430                 (unsigned long)dma_q);
431
432         add_wait_queue(&dma_q->wq, &wait);
433         if (kthread_should_stop())
434                 goto stop_task;
435
436         /* Calculate time to wake up */
437         timeout = msecs_to_jiffies(frames_to_ms(1));
438
439         vivi_thread_tick(fh);
440
441         schedule_timeout_interruptible(timeout);
442
443 stop_task:
444         remove_wait_queue(&dma_q->wq, &wait);
445         try_to_freeze();
446 }
447
448 static int vivi_thread(void *data)
449 {
450         struct vivi_fh  *fh = data;
451         struct vivi_dev *dev = fh->dev;
452
453         dprintk(dev, 1, "thread started\n");
454
455         set_freezable();
456
457         for (;;) {
458                 vivi_sleep(fh);
459
460                 if (kthread_should_stop())
461                         break;
462         }
463         dprintk(dev, 1, "thread: exit\n");
464         return 0;
465 }
466
467 static int vivi_start_thread(struct vivi_fh *fh)
468 {
469         struct vivi_dev *dev = fh->dev;
470         struct vivi_dmaqueue *dma_q = &dev->vidq;
471
472         dma_q->frame = 0;
473         dma_q->ini_jiffies = jiffies;
474
475         dprintk(dev, 1, "%s\n", __FUNCTION__);
476
477         dma_q->kthread = kthread_run(vivi_thread, fh, "vivi");
478
479         if (IS_ERR(dma_q->kthread)) {
480                 printk(KERN_ERR "vivi: kernel_thread() failed\n");
481                 return PTR_ERR(dma_q->kthread);
482         }
483         /* Wakes thread */
484         wake_up_interruptible(&dma_q->wq);
485
486         dprintk(dev, 1, "returning from %s\n", __FUNCTION__);
487         return 0;
488 }
489
490 static void vivi_stop_thread(struct vivi_dmaqueue  *dma_q)
491 {
492         struct vivi_dev *dev = container_of(dma_q, struct vivi_dev, vidq);
493
494         dprintk(dev, 1, "%s\n", __FUNCTION__);
495         /* shutdown control thread */
496         if (dma_q->kthread) {
497                 kthread_stop(dma_q->kthread);
498                 dma_q->kthread = NULL;
499         }
500 }
501
502 /* ------------------------------------------------------------------
503         Videobuf operations
504    ------------------------------------------------------------------*/
505 static int
506 buffer_setup(struct videobuf_queue *vq, unsigned int *count, unsigned int *size)
507 {
508         struct vivi_fh  *fh = vq->priv_data;
509         struct vivi_dev *dev  = fh->dev;
510
511         *size = fh->width*fh->height*2;
512
513         if (0 == *count)
514                 *count = 32;
515
516         while (*size * *count > vid_limit * 1024 * 1024)
517                 (*count)--;
518
519         dprintk(dev, 1, "%s, count=%d, size=%d\n", __FUNCTION__,
520                 *count, *size);
521
522         return 0;
523 }
524
525 static void free_buffer(struct videobuf_queue *vq, struct vivi_buffer *buf)
526 {
527         struct vivi_fh  *fh = vq->priv_data;
528         struct vivi_dev *dev  = fh->dev;
529
530         dprintk(dev, 1, "%s, state: %i\n", __FUNCTION__, buf->vb.state);
531
532         if (in_interrupt())
533                 BUG();
534
535         videobuf_vmalloc_free(&buf->vb);
536         dprintk(dev, 1, "free_buffer: freed");
537         buf->vb.state = VIDEOBUF_NEEDS_INIT;
538 }
539
540 #define norm_maxw() 1024
541 #define norm_maxh() 768
542 static int
543 buffer_prepare(struct videobuf_queue *vq, struct videobuf_buffer *vb,
544                                                 enum v4l2_field field)
545 {
546         struct vivi_fh     *fh  = vq->priv_data;
547         struct vivi_dev    *dev = fh->dev;
548         struct vivi_buffer *buf = container_of(vb, struct vivi_buffer, vb);
549         int rc;
550
551         dprintk(dev, 1, "%s, field=%d\n", __FUNCTION__, field);
552
553         BUG_ON(NULL == fh->fmt);
554
555         if (fh->width  < 48 || fh->width  > norm_maxw() ||
556             fh->height < 32 || fh->height > norm_maxh())
557                 return -EINVAL;
558
559         buf->vb.size = fh->width*fh->height*2;
560         if (0 != buf->vb.baddr  &&  buf->vb.bsize < buf->vb.size)
561                 return -EINVAL;
562
563         /* These properties only change when queue is idle, see s_fmt */
564         buf->fmt       = fh->fmt;
565         buf->vb.width  = fh->width;
566         buf->vb.height = fh->height;
567         buf->vb.field  = field;
568
569         if (VIDEOBUF_NEEDS_INIT == buf->vb.state) {
570                 rc = videobuf_iolock(vq, &buf->vb, NULL);
571                 if (rc < 0)
572                         goto fail;
573         }
574
575         buf->vb.state = VIDEOBUF_PREPARED;
576
577         return 0;
578
579 fail:
580         free_buffer(vq, buf);
581         return rc;
582 }
583
584 static void
585 buffer_queue(struct videobuf_queue *vq, struct videobuf_buffer *vb)
586 {
587         struct vivi_buffer    *buf  = container_of(vb, struct vivi_buffer, vb);
588         struct vivi_fh        *fh   = vq->priv_data;
589         struct vivi_dev       *dev  = fh->dev;
590         struct vivi_dmaqueue *vidq = &dev->vidq;
591
592         dprintk(dev, 1, "%s\n", __FUNCTION__);
593
594         buf->vb.state = VIDEOBUF_QUEUED;
595         list_add_tail(&buf->vb.queue, &vidq->active);
596 }
597
598 static void buffer_release(struct videobuf_queue *vq,
599                            struct videobuf_buffer *vb)
600 {
601         struct vivi_buffer   *buf  = container_of(vb, struct vivi_buffer, vb);
602         struct vivi_fh       *fh   = vq->priv_data;
603         struct vivi_dev      *dev  = (struct vivi_dev *)fh->dev;
604
605         dprintk(dev, 1, "%s\n", __FUNCTION__);
606
607         free_buffer(vq, buf);
608 }
609
610 static struct videobuf_queue_ops vivi_video_qops = {
611         .buf_setup      = buffer_setup,
612         .buf_prepare    = buffer_prepare,
613         .buf_queue      = buffer_queue,
614         .buf_release    = buffer_release,
615 };
616
617 /* ------------------------------------------------------------------
618         IOCTL vidioc handling
619    ------------------------------------------------------------------*/
620 static int vidioc_querycap(struct file *file, void  *priv,
621                                         struct v4l2_capability *cap)
622 {
623         strcpy(cap->driver, "vivi");
624         strcpy(cap->card, "vivi");
625         cap->version = VIVI_VERSION;
626         cap->capabilities =     V4L2_CAP_VIDEO_CAPTURE |
627                                 V4L2_CAP_STREAMING     |
628                                 V4L2_CAP_READWRITE;
629         return 0;
630 }
631
632 static int vidioc_enum_fmt_cap(struct file *file, void  *priv,
633                                         struct v4l2_fmtdesc *f)
634 {
635         if (f->index > 0)
636                 return -EINVAL;
637
638         strlcpy(f->description, format.name, sizeof(f->description));
639         f->pixelformat = format.fourcc;
640         return 0;
641 }
642
643 static int vidioc_g_fmt_cap(struct file *file, void *priv,
644                                         struct v4l2_format *f)
645 {
646         struct vivi_fh *fh = priv;
647
648         f->fmt.pix.width        = fh->width;
649         f->fmt.pix.height       = fh->height;
650         f->fmt.pix.field        = fh->vb_vidq.field;
651         f->fmt.pix.pixelformat  = fh->fmt->fourcc;
652         f->fmt.pix.bytesperline =
653                 (f->fmt.pix.width * fh->fmt->depth) >> 3;
654         f->fmt.pix.sizeimage =
655                 f->fmt.pix.height * f->fmt.pix.bytesperline;
656
657         return (0);
658 }
659
660 static int vidioc_try_fmt_cap(struct file *file, void *priv,
661                         struct v4l2_format *f)
662 {
663         struct vivi_fh  *fh  = priv;
664         struct vivi_dev *dev = fh->dev;
665         struct vivi_fmt *fmt;
666         enum v4l2_field field;
667         unsigned int maxw, maxh;
668
669         if (format.fourcc != f->fmt.pix.pixelformat) {
670                 dprintk(dev, 1, "Fourcc format (0x%08x) invalid. "
671                         "Driver accepts only 0x%08x\n",
672                         f->fmt.pix.pixelformat, format.fourcc);
673                 return -EINVAL;
674         }
675         fmt = &format;
676
677         field = f->fmt.pix.field;
678
679         if (field == V4L2_FIELD_ANY) {
680                 field = V4L2_FIELD_INTERLACED;
681         } else if (V4L2_FIELD_INTERLACED != field) {
682                 dprintk(dev, 1, "Field type invalid.\n");
683                 return -EINVAL;
684         }
685
686         maxw  = norm_maxw();
687         maxh  = norm_maxh();
688
689         f->fmt.pix.field = field;
690         if (f->fmt.pix.height < 32)
691                 f->fmt.pix.height = 32;
692         if (f->fmt.pix.height > maxh)
693                 f->fmt.pix.height = maxh;
694         if (f->fmt.pix.width < 48)
695                 f->fmt.pix.width = 48;
696         if (f->fmt.pix.width > maxw)
697                 f->fmt.pix.width = maxw;
698         f->fmt.pix.width &= ~0x03;
699         f->fmt.pix.bytesperline =
700                 (f->fmt.pix.width * fmt->depth) >> 3;
701         f->fmt.pix.sizeimage =
702                 f->fmt.pix.height * f->fmt.pix.bytesperline;
703
704         return 0;
705 }
706
707 /*FIXME: This seems to be generic enough to be at videodev2 */
708 static int vidioc_s_fmt_cap(struct file *file, void *priv,
709                                         struct v4l2_format *f)
710 {
711         struct vivi_fh  *fh = priv;
712         struct videobuf_queue *q = &fh->vb_vidq;
713
714         int ret = vidioc_try_fmt_cap(file, fh, f);
715         if (ret < 0)
716                 return (ret);
717
718         mutex_lock(&q->vb_lock);
719
720         if (videobuf_queue_is_busy(&fh->vb_vidq)) {
721                 dprintk(fh->dev, 1, "%s queue busy\n", __FUNCTION__);
722                 ret = -EBUSY;
723                 goto out;
724         }
725
726         fh->fmt           = &format;
727         fh->width         = f->fmt.pix.width;
728         fh->height        = f->fmt.pix.height;
729         fh->vb_vidq.field = f->fmt.pix.field;
730         fh->type          = f->type;
731
732         ret = 0;
733 out:
734         mutex_unlock(&q->vb_lock);
735
736         return (ret);
737 }
738
739 static int vidioc_reqbufs(struct file *file, void *priv,
740                           struct v4l2_requestbuffers *p)
741 {
742         struct vivi_fh  *fh = priv;
743
744         return (videobuf_reqbufs(&fh->vb_vidq, p));
745 }
746
747 static int vidioc_querybuf(struct file *file, void *priv, struct v4l2_buffer *p)
748 {
749         struct vivi_fh  *fh = priv;
750
751         return (videobuf_querybuf(&fh->vb_vidq, p));
752 }
753
754 static int vidioc_qbuf(struct file *file, void *priv, struct v4l2_buffer *p)
755 {
756         struct vivi_fh *fh = priv;
757
758         return (videobuf_qbuf(&fh->vb_vidq, p));
759 }
760
761 static int vidioc_dqbuf(struct file *file, void *priv, struct v4l2_buffer *p)
762 {
763         struct vivi_fh  *fh = priv;
764
765         return (videobuf_dqbuf(&fh->vb_vidq, p,
766                                 file->f_flags & O_NONBLOCK));
767 }
768
769 #ifdef CONFIG_VIDEO_V4L1_COMPAT
770 static int vidiocgmbuf(struct file *file, void *priv, struct video_mbuf *mbuf)
771 {
772         struct vivi_fh  *fh = priv;
773
774         return videobuf_cgmbuf(&fh->vb_vidq, mbuf, 8);
775 }
776 #endif
777
778 static int vidioc_streamon(struct file *file, void *priv, enum v4l2_buf_type i)
779 {
780         struct vivi_fh  *fh = priv;
781
782         if (fh->type != V4L2_BUF_TYPE_VIDEO_CAPTURE)
783                 return -EINVAL;
784         if (i != fh->type)
785                 return -EINVAL;
786
787         return videobuf_streamon(&fh->vb_vidq);
788 }
789
790 static int vidioc_streamoff(struct file *file, void *priv, enum v4l2_buf_type i)
791 {
792         struct vivi_fh  *fh = priv;
793
794         if (fh->type != V4L2_BUF_TYPE_VIDEO_CAPTURE)
795                 return -EINVAL;
796         if (i != fh->type)
797                 return -EINVAL;
798
799         return videobuf_streamoff(&fh->vb_vidq);
800 }
801
802 static int vidioc_s_std(struct file *file, void *priv, v4l2_std_id *i)
803 {
804         return 0;
805 }
806
807 /* only one input in this sample driver */
808 static int vidioc_enum_input(struct file *file, void *priv,
809                                 struct v4l2_input *inp)
810 {
811         if (inp->index != 0)
812                 return -EINVAL;
813
814         inp->type = V4L2_INPUT_TYPE_CAMERA;
815         inp->std = V4L2_STD_525_60;
816         strcpy(inp->name, "Camera");
817
818         return (0);
819 }
820
821 static int vidioc_g_input(struct file *file, void *priv, unsigned int *i)
822 {
823         *i = 0;
824
825         return (0);
826 }
827 static int vidioc_s_input(struct file *file, void *priv, unsigned int i)
828 {
829         if (i > 0)
830                 return -EINVAL;
831
832         return (0);
833 }
834
835         /* --- controls ---------------------------------------------- */
836 static int vidioc_queryctrl(struct file *file, void *priv,
837                             struct v4l2_queryctrl *qc)
838 {
839         int i;
840
841         for (i = 0; i < ARRAY_SIZE(vivi_qctrl); i++)
842                 if (qc->id && qc->id == vivi_qctrl[i].id) {
843                         memcpy(qc, &(vivi_qctrl[i]),
844                                 sizeof(*qc));
845                         return (0);
846                 }
847
848         return -EINVAL;
849 }
850
851 static int vidioc_g_ctrl(struct file *file, void *priv,
852                          struct v4l2_control *ctrl)
853 {
854         int i;
855
856         for (i = 0; i < ARRAY_SIZE(vivi_qctrl); i++)
857                 if (ctrl->id == vivi_qctrl[i].id) {
858                         ctrl->value = qctl_regs[i];
859                         return (0);
860                 }
861
862         return -EINVAL;
863 }
864 static int vidioc_s_ctrl(struct file *file, void *priv,
865                                 struct v4l2_control *ctrl)
866 {
867         int i;
868
869         for (i = 0; i < ARRAY_SIZE(vivi_qctrl); i++)
870                 if (ctrl->id == vivi_qctrl[i].id) {
871                         if (ctrl->value < vivi_qctrl[i].minimum
872                             || ctrl->value > vivi_qctrl[i].maximum) {
873                                         return (-ERANGE);
874                                 }
875                         qctl_regs[i] = ctrl->value;
876                         return (0);
877                 }
878         return -EINVAL;
879 }
880
881 /* ------------------------------------------------------------------
882         File operations for the device
883    ------------------------------------------------------------------*/
884
885 #define line_buf_size(norm) (norm_maxw(norm)*(format.depth+7)/8)
886
887 static int vivi_open(struct inode *inode, struct file *file)
888 {
889         int minor = iminor(inode);
890         struct vivi_dev *dev;
891         struct vivi_fh *fh;
892         int i;
893         int retval = 0;
894
895         printk(KERN_DEBUG "vivi: open called (minor=%d)\n", minor);
896
897         list_for_each_entry(dev, &vivi_devlist, vivi_devlist)
898                 if (dev->vfd->minor == minor)
899                         goto found;
900         return -ENODEV;
901
902 found:
903         mutex_lock(&dev->mutex);
904         dev->users++;
905
906         if (dev->users > 1) {
907                 dev->users--;
908                 retval = -EBUSY;
909                 goto unlock;
910         }
911
912         dprintk(dev, 1, "open minor=%d type=%s users=%d\n", minor,
913                 v4l2_type_names[V4L2_BUF_TYPE_VIDEO_CAPTURE], dev->users);
914
915         /* allocate + initialize per filehandle data */
916         fh = kzalloc(sizeof(*fh), GFP_KERNEL);
917         if (NULL == fh) {
918                 dev->users--;
919                 retval = -ENOMEM;
920                 goto unlock;
921         }
922 unlock:
923         mutex_unlock(&dev->mutex);
924         if (retval)
925                 return retval;
926
927         file->private_data = fh;
928         fh->dev      = dev;
929
930         fh->type     = V4L2_BUF_TYPE_VIDEO_CAPTURE;
931         fh->fmt      = &format;
932         fh->width    = 640;
933         fh->height   = 480;
934
935         /* Put all controls at a sane state */
936         for (i = 0; i < ARRAY_SIZE(vivi_qctrl); i++)
937                 qctl_regs[i] = vivi_qctrl[i].default_value;
938
939         /* Resets frame counters */
940         dev->h = 0;
941         dev->m = 0;
942         dev->s = 0;
943         dev->ms = 0;
944         dev->mv_count = 0;
945         dev->jiffies = jiffies;
946         sprintf(dev->timestr, "%02d:%02d:%02d:%03d",
947                         dev->h, dev->m, dev->s, dev->ms);
948
949         videobuf_queue_vmalloc_init(&fh->vb_vidq, &vivi_video_qops,
950                         NULL, &dev->slock, fh->type, V4L2_FIELD_INTERLACED,
951                         sizeof(struct vivi_buffer), fh);
952
953         vivi_start_thread(fh);
954
955         return 0;
956 }
957
958 static ssize_t
959 vivi_read(struct file *file, char __user *data, size_t count, loff_t *ppos)
960 {
961         struct vivi_fh *fh = file->private_data;
962
963         if (fh->type == V4L2_BUF_TYPE_VIDEO_CAPTURE) {
964                 return videobuf_read_stream(&fh->vb_vidq, data, count, ppos, 0,
965                                         file->f_flags & O_NONBLOCK);
966         }
967         return 0;
968 }
969
970 static unsigned int
971 vivi_poll(struct file *file, struct poll_table_struct *wait)
972 {
973         struct vivi_fh        *fh = file->private_data;
974         struct vivi_dev       *dev = fh->dev;
975         struct videobuf_queue *q = &fh->vb_vidq;
976
977         dprintk(dev, 1, "%s\n", __FUNCTION__);
978
979         if (V4L2_BUF_TYPE_VIDEO_CAPTURE != fh->type)
980                 return POLLERR;
981
982         return videobuf_poll_stream(file, q, wait);
983 }
984
985 static int vivi_close(struct inode *inode, struct file *file)
986 {
987         struct vivi_fh         *fh = file->private_data;
988         struct vivi_dev *dev       = fh->dev;
989         struct vivi_dmaqueue *vidq = &dev->vidq;
990
991         int minor = iminor(inode);
992
993         vivi_stop_thread(vidq);
994         videobuf_stop(&fh->vb_vidq);
995         videobuf_mmap_free(&fh->vb_vidq);
996
997         kfree(fh);
998
999         mutex_lock(&dev->mutex);
1000         dev->users--;
1001         mutex_unlock(&dev->mutex);
1002
1003         dprintk(dev, 1, "close called (minor=%d, users=%d)\n",
1004                 minor, dev->users);
1005
1006         return 0;
1007 }
1008
1009 static int vivi_release(void)
1010 {
1011         struct vivi_dev *dev;
1012         struct list_head *list;
1013
1014         while (!list_empty(&vivi_devlist)) {
1015                 list = vivi_devlist.next;
1016                 list_del(list);
1017                 dev = list_entry(list, struct vivi_dev, vivi_devlist);
1018
1019                 if (-1 != dev->vfd->minor)
1020                         video_unregister_device(dev->vfd);
1021                 else
1022                         video_device_release(dev->vfd);
1023
1024                 kfree(dev);
1025         }
1026
1027         return 0;
1028 }
1029
1030 static int vivi_mmap(struct file *file, struct vm_area_struct *vma)
1031 {
1032         struct vivi_fh  *fh = file->private_data;
1033         struct vivi_dev *dev = fh->dev;
1034         int ret;
1035
1036         dprintk(dev, 1, "mmap called, vma=0x%08lx\n", (unsigned long)vma);
1037
1038         ret = videobuf_mmap_mapper(&fh->vb_vidq, vma);
1039
1040         dprintk(dev, 1, "vma start=0x%08lx, size=%ld, ret=%d\n",
1041                 (unsigned long)vma->vm_start,
1042                 (unsigned long)vma->vm_end-(unsigned long)vma->vm_start,
1043                 ret);
1044
1045         return ret;
1046 }
1047
1048 static const struct file_operations vivi_fops = {
1049         .owner          = THIS_MODULE,
1050         .open           = vivi_open,
1051         .release        = vivi_close,
1052         .read           = vivi_read,
1053         .poll           = vivi_poll,
1054         .ioctl          = video_ioctl2, /* V4L2 ioctl handler */
1055         .compat_ioctl   = v4l_compat_ioctl32,
1056         .mmap           = vivi_mmap,
1057         .llseek         = no_llseek,
1058 };
1059
1060 static struct video_device vivi_template = {
1061         .name           = "vivi",
1062         .type           = VID_TYPE_CAPTURE,
1063         .fops           = &vivi_fops,
1064         .minor          = -1,
1065         .release        = video_device_release,
1066
1067         .vidioc_querycap      = vidioc_querycap,
1068         .vidioc_enum_fmt_cap  = vidioc_enum_fmt_cap,
1069         .vidioc_g_fmt_cap     = vidioc_g_fmt_cap,
1070         .vidioc_try_fmt_cap   = vidioc_try_fmt_cap,
1071         .vidioc_s_fmt_cap     = vidioc_s_fmt_cap,
1072         .vidioc_reqbufs       = vidioc_reqbufs,
1073         .vidioc_querybuf      = vidioc_querybuf,
1074         .vidioc_qbuf          = vidioc_qbuf,
1075         .vidioc_dqbuf         = vidioc_dqbuf,
1076         .vidioc_s_std         = vidioc_s_std,
1077         .vidioc_enum_input    = vidioc_enum_input,
1078         .vidioc_g_input       = vidioc_g_input,
1079         .vidioc_s_input       = vidioc_s_input,
1080         .vidioc_queryctrl     = vidioc_queryctrl,
1081         .vidioc_g_ctrl        = vidioc_g_ctrl,
1082         .vidioc_s_ctrl        = vidioc_s_ctrl,
1083         .vidioc_streamon      = vidioc_streamon,
1084         .vidioc_streamoff     = vidioc_streamoff,
1085 #ifdef CONFIG_VIDEO_V4L1_COMPAT
1086         .vidiocgmbuf          = vidiocgmbuf,
1087 #endif
1088         .tvnorms              = V4L2_STD_525_60,
1089         .current_norm         = V4L2_STD_NTSC_M,
1090 };
1091 /* -----------------------------------------------------------------
1092         Initialization and module stuff
1093    ------------------------------------------------------------------*/
1094
1095 static int __init vivi_init(void)
1096 {
1097         int ret = -ENOMEM, i;
1098         struct vivi_dev *dev;
1099         struct video_device *vfd;
1100
1101         for (i = 0; i < n_devs; i++) {
1102                 dev = kzalloc(sizeof(*dev), GFP_KERNEL);
1103                 if (NULL == dev)
1104                         break;
1105
1106                 list_add_tail(&dev->vivi_devlist, &vivi_devlist);
1107
1108                 /* init video dma queues */
1109                 INIT_LIST_HEAD(&dev->vidq.active);
1110                 init_waitqueue_head(&dev->vidq.wq);
1111
1112                 /* initialize locks */
1113                 spin_lock_init(&dev->slock);
1114                 mutex_init(&dev->mutex);
1115
1116                 vfd = video_device_alloc();
1117                 if (NULL == vfd)
1118                         break;
1119
1120                 *vfd = vivi_template;
1121
1122                 ret = video_register_device(vfd, VFL_TYPE_GRABBER, video_nr);
1123                 if (ret < 0)
1124                         break;
1125
1126                 snprintf(vfd->name, sizeof(vfd->name), "%s (%i)",
1127                          vivi_template.name, vfd->minor);
1128
1129                 if (video_nr >= 0)
1130                         video_nr++;
1131
1132                 dev->vfd = vfd;
1133         }
1134
1135         if (ret < 0) {
1136                 vivi_release();
1137                 printk(KERN_INFO "Error %d while loading vivi driver\n", ret);
1138         } else
1139                 printk(KERN_INFO "Video Technology Magazine Virtual Video "
1140                                  "Capture Board successfully loaded.\n");
1141         return ret;
1142 }
1143
1144 static void __exit vivi_exit(void)
1145 {
1146         vivi_release();
1147 }
1148
1149 module_init(vivi_init);
1150 module_exit(vivi_exit);
1151
1152 MODULE_DESCRIPTION("Video Technology Magazine Virtual Video Capture Board");
1153 MODULE_AUTHOR("Mauro Carvalho Chehab, Ted Walther and John Sokol");
1154 MODULE_LICENSE("Dual BSD/GPL");
1155
1156 module_param(video_nr, int, 0);
1157 MODULE_PARM_DESC(video_nr, "video iminor start number");
1158
1159 module_param(n_devs, int, 0);
1160 MODULE_PARM_DESC(n_devs, "number of video devices to create");
1161
1162 module_param_named(debug, vivi_template.debug, int, 0444);
1163 MODULE_PARM_DESC(debug, "activates debug info");
1164
1165 module_param(vid_limit, int, 0644);
1166 MODULE_PARM_DESC(vid_limit, "capture memory limit in megabytes");