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