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