SAFE public projects git trees. - safe/jmp/linux-2.6/blob - 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/videodev2.h>
  29 #include <linux/dma-mapping.h>
  30 #ifdef CONFIG_VIDEO_V4L1_COMPAT
  31 /* Include V4L1 specific functions. Should be removed soon */
  32 #include <linux/videodev.h>
  33 #endif
  34 #include <linux/interrupt.h>
  35 #include <media/video-buf.h>
  36 #include <media/v4l2-common.h>
  37 #include <linux/kthread.h>
  38 #include <linux/highmem.h>
  39 #include <linux/freezer.h>
  40
  41 /* Wake up at about 30 fps */
  42 #define WAKE_NUMERATOR 30
  43 #define WAKE_DENOMINATOR 1001
  44 #define BUFFER_TIMEOUT     msecs_to_jiffies(500)  /* 0.5 seconds */
  45
  46 /* These timers are for 1 fps - used only for testing */
  47 //#define WAKE_DENOMINATOR 30 /* hack for testing purposes */
  48 //#define BUFFER_TIMEOUT     msecs_to_jiffies(5000)  /* 5 seconds */
  49
  50 #include "font.h"
  51
  52 #define VIVI_MAJOR_VERSION 0
  53 #define VIVI_MINOR_VERSION 4
  54 #define VIVI_RELEASE 0
  55 #define VIVI_VERSION 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 struct video_device vivi;        /* Video device */
  60 static int video_nr = -1;               /* /dev/videoN, -1 for autodetect */
  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(level,fmt, arg...)                                      \
 115         do {                                                            \
 116                 if (vivi.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 #ifdef CONFIG_VIVI_SCATTER
 149         struct sg_to_addr      *to_addr;
 150 #endif
 151 };
 152
 153 struct vivi_dmaqueue {
 154         struct list_head       active;
 155         struct list_head       queued;
 156         struct timer_list      timeout;
 157
 158         /* thread for generating video stream*/
 159         struct task_struct         *kthread;
 160         wait_queue_head_t          wq;
 161         /* Counters to control fps rate */
 162         int                        frame;
 163         int                        ini_jiffies;
 164 };
 165
 166 static LIST_HEAD(vivi_devlist);
 167
 168 struct vivi_dev {
 169         struct list_head           vivi_devlist;
 170
 171         struct semaphore           lock;
 172
 173         int                        users;
 174
 175         /* various device info */
 176         unsigned int               resources;
 177         struct video_device        vfd;
 178
 179         struct vivi_dmaqueue       vidq;
 180
 181         /* Several counters */
 182         int                        h,m,s,us,jiffies;
 183         char                       timestr[13];
 184 };
 185
 186 struct vivi_fh {
 187         struct vivi_dev            *dev;
 188
 189         /* video capture */
 190         struct vivi_fmt            *fmt;
 191         unsigned int               width,height;
 192         struct videobuf_queue      vb_vidq;
 193
 194         enum v4l2_buf_type         type;
 195 };
 196
 197 /* ------------------------------------------------------------------
 198         DMA and thread functions
 199    ------------------------------------------------------------------*/
 200
 201 /* Bars and Colors should match positions */
 202
 203 enum colors {
 204         WHITE,
 205         AMBAR,
 206         CYAN,
 207         GREEN,
 208         MAGENTA,
 209         RED,
 210         BLUE
 211 };
 212
 213 static u8 bars[8][3] = {
 214         /* R   G   B */
 215         {204,204,204},  /* white */
 216         {208,208,  0},  /* ambar */
 217         {  0,206,206},  /* cyan */
 218         {  0,239,  0},  /* green */
 219         {239,  0,239},  /* magenta */
 220         {205,  0,  0},  /* red */
 221         {  0,  0,255},  /* blue */
 222         {  0,  0,  0}
 223 };
 224
 225 #define TO_Y(r,g,b) (((16829*r +33039*g +6416*b  + 32768)>>16)+16)
 226 /* RGB to  V(Cr) Color transform */
 227 #define TO_V(r,g,b) (((28784*r -24103*g -4681*b  + 32768)>>16)+128)
 228 /* RGB to  U(Cb) Color transform */
 229 #define TO_U(r,g,b) (((-9714*r -19070*g +28784*b + 32768)>>16)+128)
 230
 231 #define TSTAMP_MIN_Y 24
 232 #define TSTAMP_MAX_Y TSTAMP_MIN_Y+15
 233 #define TSTAMP_MIN_X 64
 234
 235 #ifdef CONFIG_VIVI_SCATTER
 236 static void prep_to_addr(struct sg_to_addr to_addr[],
 237                          struct videobuf_buffer *vb)
 238 {
 239         int i, pos=0;
 240
 241         for (i=0;i<vb->dma.nr_pages;i++) {
 242                 to_addr[i].sg=&vb->dma.sglist[i];
 243                 to_addr[i].pos=pos;
 244                 pos += vb->dma.sglist[i].length;
 245         }
 246 }
 247
 248 static int get_addr_pos(int pos, int pages, struct sg_to_addr to_addr[])
 249 {
 250         int p1=0,p2=pages-1,p3=pages/2;
 251
 252         /* Sanity test */
 253         BUG_ON (pos>=to_addr[p2].pos+to_addr[p2].sg->length);
 254
 255         while (p1+1<p2) {
 256                 if (pos < to_addr[p3].pos) {
 257                         p2=p3;
 258                 } else {
 259                         p1=p3;
 260                 }
 261                 p3=(p1+p2)/2;
 262         }
 263         if (pos >= to_addr[p2].pos)
 264                 p1=p2;
 265
 266         return (p1);
 267 }
 268 #endif
 269
 270 #ifdef CONFIG_VIVI_SCATTER
 271 static void gen_line(struct sg_to_addr to_addr[],int inipos,int pages,int wmax,
 272                      int hmax, int line, char *timestr)
 273 #else
 274 static void gen_line(char *basep,int inipos,int wmax,
 275                      int hmax, int line, char *timestr)
 276 #endif
 277 {
 278         int  w,i,j,pos=inipos,y;
 279         char *p,*s;
 280         u8   chr,r,g,b,color;
 281 #ifdef CONFIG_VIVI_SCATTER
 282         int pgpos,oldpg;
 283         char *basep;
 284         struct page *pg;
 285
 286         unsigned long flags;
 287         spinlock_t spinlock;
 288
 289         spin_lock_init(&spinlock);
 290
 291         /* Get first addr pointed to pixel position */
 292         oldpg=get_addr_pos(pos,pages,to_addr);
 293         pg=pfn_to_page(sg_dma_address(to_addr[oldpg].sg) >> PAGE_SHIFT);
 294         spin_lock_irqsave(&spinlock,flags);
 295         basep = kmap_atomic(pg, KM_BOUNCE_READ)+to_addr[oldpg].sg->offset;
 296 #endif
 297
 298         /* We will just duplicate the second pixel at the packet */
 299         wmax/=2;
 300
 301         /* Generate a standard color bar pattern */
 302         for (w=0;w<wmax;w++) {
 303                 r=bars[w*7/wmax][0];
 304                 g=bars[w*7/wmax][1];
 305                 b=bars[w*7/wmax][2];
 306
 307                 for (color=0;color<4;color++) {
 308 #ifdef CONFIG_VIVI_SCATTER
 309                         pgpos=get_addr_pos(pos,pages,to_addr);
 310                         if (pgpos!=oldpg) {
 311                                 pg=pfn_to_page(sg_dma_address(to_addr[pgpos].sg) >> PAGE_SHIFT);
 312                                 kunmap_atomic(basep, KM_BOUNCE_READ);
 313                                 basep= kmap_atomic(pg, KM_BOUNCE_READ)+to_addr[pgpos].sg->offset;
 314                                 oldpg=pgpos;
 315                         }
 316                         p=basep+pos-to_addr[pgpos].pos;
 317 #else
 318                         p=basep+pos;
 319 #endif
 320
 321                         switch (color) {
 322                                 case 0:
 323                                 case 2:
 324                                         *p=TO_Y(r,g,b);         /* Luminance */
 325                                         break;
 326                                 case 1:
 327                                         *p=TO_U(r,g,b);         /* Cb */
 328                                         break;
 329                                 case 3:
 330                                         *p=TO_V(r,g,b);         /* Cr */
 331                                         break;
 332                         }
 333                         pos++;
 334                 }
 335         }
 336
 337         /* Checks if it is possible to show timestamp */
 338         if (TSTAMP_MAX_Y>=hmax)
 339                 goto end;
 340         if (TSTAMP_MIN_X+strlen(timestr)>=wmax)
 341                 goto end;
 342
 343         /* Print stream time */
 344         if (line>=TSTAMP_MIN_Y && line<=TSTAMP_MAX_Y) {
 345                 j=TSTAMP_MIN_X;
 346                 for (s=timestr;*s;s++) {
 347                         chr=rom8x16_bits[(*s-0x30)*16+line-TSTAMP_MIN_Y];
 348                         for (i=0;i<7;i++) {
 349                                 if (chr&1<<(7-i)) { /* Font color*/
 350                                         r=bars[BLUE][0];
 351                                         g=bars[BLUE][1];
 352                                         b=bars[BLUE][2];
 353                                         r=g=b=0;
 354                                         g=198;
 355                                 } else { /* Background color */
 356                                         r=bars[WHITE][0];
 357                                         g=bars[WHITE][1];
 358                                         b=bars[WHITE][2];
 359                                         r=g=b=0;
 360                                 }
 361
 362                                 pos=inipos+j*2;
 363                                 for (color=0;color<4;color++) {
 364 #ifdef CONFIG_VIVI_SCATTER
 365                                         pgpos=get_addr_pos(pos,pages,to_addr);
 366                                         if (pgpos!=oldpg) {
 367                                                 pg=pfn_to_page(sg_dma_address(
 368                                                                 to_addr[pgpos].sg)
 369                                                                 >> PAGE_SHIFT);
 370                                                 kunmap_atomic(basep,
 371                                                                 KM_BOUNCE_READ);
 372                                                 basep= kmap_atomic(pg,
 373                                                         KM_BOUNCE_READ)+
 374                                                         to_addr[pgpos].sg->offset;
 375                                                 oldpg=pgpos;
 376                                         }
 377                                         p=basep+pos-to_addr[pgpos].pos;
 378 #else
 379                                         p=basep+pos;
 380 #endif
 381
 382                                         y=TO_Y(r,g,b);
 383
 384                                         switch (color) {
 385                                                 case 0:
 386                                                 case 2:
 387                                                         *p=TO_Y(r,g,b);         /* Luminance */
 388                                                         break;
 389                                                 case 1:
 390                                                         *p=TO_U(r,g,b);         /* Cb */
 391                                                         break;
 392                                                 case 3:
 393                                                         *p=TO_V(r,g,b);         /* Cr */
 394                                                         break;
 395                                         }
 396                                         pos++;
 397                                 }
 398                                 j++;
 399                         }
 400                 }
 401         }
 402
 403
 404 end:
 405 #ifdef CONFIG_VIVI_SCATTER
 406         kunmap_atomic(basep, KM_BOUNCE_READ);
 407         spin_unlock_irqrestore(&spinlock,flags);
 408 #else
 409         return;
 410 #endif
 411 }
 412 static void vivi_fillbuff(struct vivi_dev *dev,struct vivi_buffer *buf)
 413 {
 414         int h,pos=0;
 415         int hmax  = buf->vb.height;
 416         int wmax  = buf->vb.width;
 417         struct timeval ts;
 418 #ifdef CONFIG_VIVI_SCATTER
 419         struct sg_to_addr *to_addr=buf->to_addr;
 420         struct videobuf_buffer *vb=&buf->vb;
 421 #else
 422         char *tmpbuf;
 423 #endif
 424
 425 #ifdef CONFIG_VIVI_SCATTER
 426         /* Test if DMA mapping is ready */
 427         if (!sg_dma_address(&vb->dma.sglist[0]))
 428                 return;
 429
 430         prep_to_addr(to_addr,vb);
 431
 432         /* Check if there is enough memory */
 433         BUG_ON(buf->vb.dma.nr_pages << PAGE_SHIFT < (buf->vb.width*buf->vb.height)*2);
 434 #else
 435         if (buf->vb.dma.varea) {
 436                 tmpbuf=kmalloc (wmax*2, GFP_KERNEL);
 437         } else {
 438                 tmpbuf=buf->vb.dma.vmalloc;
 439         }
 440
 441 #endif
 442
 443         for (h=0;h<hmax;h++) {
 444 #ifdef CONFIG_VIVI_SCATTER
 445                 gen_line(to_addr,pos,vb->dma.nr_pages,wmax,hmax,h,dev->timestr);
 446 #else
 447                 if (buf->vb.dma.varea) {
 448                         gen_line(tmpbuf,0,wmax,hmax,h,dev->timestr);
 449                         /* FIXME: replacing to __copy_to_user */
 450                         if (copy_to_user(buf->vb.dma.varea+pos,tmpbuf,wmax*2)!=0)
 451                                 dprintk(2,"vivifill copy_to_user failed.\n");
 452                 } else {
 453                         gen_line(tmpbuf,pos,wmax,hmax,h,dev->timestr);
 454                 }
 455 #endif
 456                 pos += wmax*2;
 457         }
 458
 459         /* Updates stream time */
 460
 461         dev->us+=jiffies_to_usecs(jiffies-dev->jiffies);
 462         dev->jiffies=jiffies;
 463         if (dev->us>=1000000) {
 464                 dev->us-=1000000;
 465                 dev->s++;
 466                 if (dev->s>=60) {
 467                         dev->s-=60;
 468                         dev->m++;
 469                         if (dev->m>60) {
 470                                 dev->m-=60;
 471                                 dev->h++;
 472                                 if (dev->h>24)
 473                                         dev->h-=24;
 474                         }
 475                 }
 476         }
 477         sprintf(dev->timestr,"%02d:%02d:%02d:%03d",
 478                         dev->h,dev->m,dev->s,(dev->us+500)/1000);
 479
 480         dprintk(2,"vivifill at %s: Buffer 0x%08lx size= %d\n",dev->timestr,
 481                         (unsigned long)buf->vb.dma.varea,pos);
 482
 483         /* Advice that buffer was filled */
 484         buf->vb.state = STATE_DONE;
 485         buf->vb.field_count++;
 486         do_gettimeofday(&ts);
 487         buf->vb.ts = ts;
 488
 489         list_del(&buf->vb.queue);
 490         wake_up(&buf->vb.done);
 491 }
 492
 493 static int restart_video_queue(struct vivi_dmaqueue *dma_q);
 494
 495 static void vivi_thread_tick(struct vivi_dmaqueue  *dma_q)
 496 {
 497         struct vivi_buffer    *buf;
 498         struct vivi_dev *dev= container_of(dma_q,struct vivi_dev,vidq);
 499
 500         int bc;
 501
 502         /* Announces videobuf that all went ok */
 503         for (bc = 0;; bc++) {
 504                 if (list_empty(&dma_q->active)) {
 505                         dprintk(1,"No active queue to serve\n");
 506                         break;
 507                 }
 508
 509                 buf = list_entry(dma_q->active.next,
 510                                  struct vivi_buffer, vb.queue);
 511
 512                 /* Nobody is waiting something to be done, just return */
 513                 if (!waitqueue_active(&buf->vb.done)) {
 514                         mod_timer(&dma_q->timeout, jiffies+BUFFER_TIMEOUT);
 515                         return;
 516                 }
 517
 518                 do_gettimeofday(&buf->vb.ts);
 519                 dprintk(2,"[%p/%d] wakeup\n",buf,buf->vb.i);
 520
 521                 /* Fill buffer */
 522                 vivi_fillbuff(dev,buf);
 523
 524                 if (list_empty(&dma_q->active)) {
 525                         del_timer(&dma_q->timeout);
 526                 } else {
 527                         mod_timer(&dma_q->timeout, jiffies+BUFFER_TIMEOUT);
 528                 }
 529         }
 530         if (bc != 1)
 531                 dprintk(1,"%s: %d buffers handled (should be 1)\n",__FUNCTION__,bc);
 532 }
 533
 534 static void vivi_sleep(struct vivi_dmaqueue  *dma_q)
 535 {
 536         int timeout;
 537         DECLARE_WAITQUEUE(wait, current);
 538
 539         dprintk(1,"%s dma_q=0x%08lx\n",__FUNCTION__,(unsigned long)dma_q);
 540
 541         add_wait_queue(&dma_q->wq, &wait);
 542         if (!kthread_should_stop()) {
 543                 dma_q->frame++;
 544
 545                 /* Calculate time to wake up */
 546                 timeout=dma_q->ini_jiffies+msecs_to_jiffies((dma_q->frame*WAKE_NUMERATOR*1000)/WAKE_DENOMINATOR)-jiffies;
 547
 548                 if (timeout <= 0) {
 549                         int old=dma_q->frame;
 550                         dma_q->frame=(jiffies_to_msecs(jiffies-dma_q->ini_jiffies)*WAKE_DENOMINATOR)/(WAKE_NUMERATOR*1000)+1;
 551
 552                         timeout=dma_q->ini_jiffies+msecs_to_jiffies((dma_q->frame*WAKE_NUMERATOR*1000)/WAKE_DENOMINATOR)-jiffies;
 553
 554                         dprintk(1,"underrun, losed %d frames. "
 555                                   "Now, frame is %d. Waking on %d jiffies\n",
 556                                         dma_q->frame-old,dma_q->frame,timeout);
 557                 } else
 558                         dprintk(1,"will sleep for %i jiffies\n",timeout);
 559
 560                 vivi_thread_tick(dma_q);
 561
 562                 schedule_timeout_interruptible (timeout);
 563         }
 564
 565         remove_wait_queue(&dma_q->wq, &wait);
 566         try_to_freeze();
 567 }
 568
 569 static int vivi_thread(void *data)
 570 {
 571         struct vivi_dmaqueue  *dma_q=data;
 572
 573         dprintk(1,"thread started\n");
 574
 575         mod_timer(&dma_q->timeout, jiffies+BUFFER_TIMEOUT);
 576
 577         for (;;) {
 578                 vivi_sleep(dma_q);
 579
 580                 if (kthread_should_stop())
 581                         break;
 582         }
 583         dprintk(1, "thread: exit\n");
 584         return 0;
 585 }
 586
 587 static int vivi_start_thread(struct vivi_dmaqueue  *dma_q)
 588 {
 589         dma_q->frame=0;
 590         dma_q->ini_jiffies=jiffies;
 591
 592         dprintk(1,"%s\n",__FUNCTION__);
 593
 594         dma_q->kthread = kthread_run(vivi_thread, dma_q, "vivi");
 595
 596         if (IS_ERR(dma_q->kthread)) {
 597                 printk(KERN_ERR "vivi: kernel_thread() failed\n");
 598                 return PTR_ERR(dma_q->kthread);
 599         }
 600         /* Wakes thread */
 601         wake_up_interruptible(&dma_q->wq);
 602
 603         dprintk(1,"returning from %s\n",__FUNCTION__);
 604         return 0;
 605 }
 606
 607 static void vivi_stop_thread(struct vivi_dmaqueue  *dma_q)
 608 {
 609         dprintk(1,"%s\n",__FUNCTION__);
 610         /* shutdown control thread */
 611         if (dma_q->kthread) {
 612                 kthread_stop(dma_q->kthread);
 613                 dma_q->kthread=NULL;
 614         }
 615 }
 616
 617 static int restart_video_queue(struct vivi_dmaqueue *dma_q)
 618 {
 619         struct vivi_buffer *buf, *prev;
 620         struct list_head *item;
 621
 622         dprintk(1,"%s dma_q=0x%08lx\n",__FUNCTION__,(unsigned long)dma_q);
 623
 624         if (!list_empty(&dma_q->active)) {
 625                 buf = list_entry(dma_q->active.next, struct vivi_buffer, vb.queue);
 626                 dprintk(2,"restart_queue [%p/%d]: restart dma\n",
 627                         buf, buf->vb.i);
 628
 629                 dprintk(1,"Restarting video dma\n");
 630                 vivi_stop_thread(dma_q);
 631 //              vivi_start_thread(dma_q);
 632
 633                 /* cancel all outstanding capture / vbi requests */
 634                 list_for_each(item,&dma_q->active) {
 635                         buf = list_entry(item, struct vivi_buffer, vb.queue);
 636
 637                         list_del(&buf->vb.queue);
 638                         buf->vb.state = STATE_ERROR;
 639                         wake_up(&buf->vb.done);
 640                 }
 641                 mod_timer(&dma_q->timeout, jiffies+BUFFER_TIMEOUT);
 642
 643                 return 0;
 644         }
 645
 646         prev = NULL;
 647         for (;;) {
 648                 if (list_empty(&dma_q->queued))
 649                         return 0;
 650                 buf = list_entry(dma_q->queued.next, struct vivi_buffer, vb.queue);
 651                 if (NULL == prev) {
 652                         list_del(&buf->vb.queue);
 653                         list_add_tail(&buf->vb.queue,&dma_q->active);
 654
 655                         dprintk(1,"Restarting video dma\n");
 656                         vivi_stop_thread(dma_q);
 657                         vivi_start_thread(dma_q);
 658
 659                         buf->vb.state = STATE_ACTIVE;
 660                         mod_timer(&dma_q->timeout, jiffies+BUFFER_TIMEOUT);
 661                         dprintk(2,"[%p/%d] restart_queue - first active\n",
 662                                 buf,buf->vb.i);
 663
 664                 } else if (prev->vb.width  == buf->vb.width  &&
 665                            prev->vb.height == buf->vb.height &&
 666                            prev->fmt       == buf->fmt) {
 667                         list_del(&buf->vb.queue);
 668                         list_add_tail(&buf->vb.queue,&dma_q->active);
 669                         buf->vb.state = STATE_ACTIVE;
 670                         dprintk(2,"[%p/%d] restart_queue - move to active\n",
 671                                 buf,buf->vb.i);
 672                 } else {
 673                         return 0;
 674                 }
 675                 prev = buf;
 676         }
 677 }
 678
 679 static void vivi_vid_timeout(unsigned long data)
 680 {
 681         struct vivi_dev      *dev  = (struct vivi_dev*)data;
 682         struct vivi_dmaqueue *vidq = &dev->vidq;
 683         struct vivi_buffer   *buf;
 684
 685         while (!list_empty(&vidq->active)) {
 686                 buf = list_entry(vidq->active.next, struct vivi_buffer, vb.queue);
 687                 list_del(&buf->vb.queue);
 688                 buf->vb.state = STATE_ERROR;
 689                 wake_up(&buf->vb.done);
 690                 printk("vivi/0: [%p/%d] timeout\n", buf, buf->vb.i);
 691         }
 692
 693         restart_video_queue(vidq);
 694 }
 695
 696 /* ------------------------------------------------------------------
 697         Videobuf operations
 698    ------------------------------------------------------------------*/
 699 static int
 700 buffer_setup(struct videobuf_queue *vq, unsigned int *count, unsigned int *size)
 701 {
 702         struct vivi_fh *fh = vq->priv_data;
 703
 704         *size = fh->width*fh->height*2;
 705
 706         if (0 == *count)
 707                 *count = 32;
 708         while (*size * *count > vid_limit * 1024 * 1024)
 709                 (*count)--;
 710         return 0;
 711 }
 712
 713 static void free_buffer(struct videobuf_queue *vq, struct vivi_buffer *buf)
 714 {
 715         dprintk(1,"%s\n",__FUNCTION__);
 716
 717         if (in_interrupt())
 718                 BUG();
 719
 720 #ifdef CONFIG_VIVI_SCATTER
 721         /*FIXME: Maybe a spinlock is required here */
 722         kfree(buf->to_addr);
 723         buf->to_addr=NULL;
 724 #endif
 725
 726         videobuf_waiton(&buf->vb,0,0);
 727         videobuf_dma_unmap(vq, &buf->vb.dma);
 728         videobuf_dma_free(&buf->vb.dma);
 729         buf->vb.state = STATE_NEEDS_INIT;
 730 }
 731
 732 #define norm_maxw() 1024
 733 #define norm_maxh() 768
 734 static int
 735 buffer_prepare(struct videobuf_queue *vq, struct videobuf_buffer *vb,
 736                                                 enum v4l2_field field)
 737 {
 738         struct vivi_fh     *fh  = vq->priv_data;
 739         struct vivi_buffer *buf = container_of(vb,struct vivi_buffer,vb);
 740         int rc, init_buffer = 0;
 741
 742 //      dprintk(1,"%s, field=%d\n",__FUNCTION__,field);
 743
 744         BUG_ON(NULL == fh->fmt);
 745         if (fh->width  < 48 || fh->width  > norm_maxw() ||
 746             fh->height < 32 || fh->height > norm_maxh())
 747                 return -EINVAL;
 748         buf->vb.size = fh->width*fh->height*2;
 749         if (0 != buf->vb.baddr  &&  buf->vb.bsize < buf->vb.size)
 750                 return -EINVAL;
 751
 752         if (buf->fmt       != fh->fmt    ||
 753             buf->vb.width  != fh->width  ||
 754             buf->vb.height != fh->height ||
 755         buf->vb.field  != field) {
 756                 buf->fmt       = fh->fmt;
 757                 buf->vb.width  = fh->width;
 758                 buf->vb.height = fh->height;
 759                 buf->vb.field  = field;
 760                 init_buffer = 1;
 761         }
 762
 763         if (STATE_NEEDS_INIT == buf->vb.state) {
 764                 if (0 != (rc = videobuf_iolock(vq,&buf->vb,NULL)))
 765                         goto fail;
 766         }
 767
 768         buf->vb.state = STATE_PREPARED;
 769
 770 #ifdef CONFIG_VIVI_SCATTER
 771         if (NULL == (buf->to_addr = kmalloc(sizeof(*buf->to_addr) * vb->dma.nr_pages,GFP_KERNEL))) {
 772                 rc=-ENOMEM;
 773                 goto fail;
 774         }
 775 #endif
 776         return 0;
 777
 778 fail:
 779         free_buffer(vq,buf);
 780         return rc;
 781 }
 782
 783 static void
 784 buffer_queue(struct videobuf_queue *vq, struct videobuf_buffer *vb)
 785 {
 786         struct vivi_buffer    *buf     = container_of(vb,struct vivi_buffer,vb);
 787         struct vivi_fh        *fh      = vq->priv_data;
 788         struct vivi_dev       *dev     = fh->dev;
 789         struct vivi_dmaqueue  *vidq    = &dev->vidq;
 790         struct vivi_buffer    *prev;
 791
 792         if (!list_empty(&vidq->queued)) {
 793                 dprintk(1,"adding vb queue=0x%08lx\n",(unsigned long)&buf->vb.queue);
 794                 list_add_tail(&buf->vb.queue,&vidq->queued);
 795                 buf->vb.state = STATE_QUEUED;
 796                 dprintk(2,"[%p/%d] buffer_queue - append to queued\n",
 797                         buf, buf->vb.i);
 798         } else if (list_empty(&vidq->active)) {
 799                 list_add_tail(&buf->vb.queue,&vidq->active);
 800
 801                 buf->vb.state = STATE_ACTIVE;
 802                 mod_timer(&vidq->timeout, jiffies+BUFFER_TIMEOUT);
 803                 dprintk(2,"[%p/%d] buffer_queue - first active\n",
 804                         buf, buf->vb.i);
 805
 806                 vivi_start_thread(vidq);
 807         } else {
 808                 prev = list_entry(vidq->active.prev, struct vivi_buffer, vb.queue);
 809                 if (prev->vb.width  == buf->vb.width  &&
 810                     prev->vb.height == buf->vb.height &&
 811                     prev->fmt       == buf->fmt) {
 812                         list_add_tail(&buf->vb.queue,&vidq->active);
 813                         buf->vb.state = STATE_ACTIVE;
 814                         dprintk(2,"[%p/%d] buffer_queue - append to active\n",
 815                                 buf, buf->vb.i);
 816
 817                 } else {
 818                         list_add_tail(&buf->vb.queue,&vidq->queued);
 819                         buf->vb.state = STATE_QUEUED;
 820                         dprintk(2,"[%p/%d] buffer_queue - first queued\n",
 821                                 buf, buf->vb.i);
 822                 }
 823         }
 824 }
 825
 826 static void buffer_release(struct videobuf_queue *vq, struct videobuf_buffer *vb)
 827 {
 828         struct vivi_buffer   *buf  = container_of(vb,struct vivi_buffer,vb);
 829         struct vivi_fh       *fh   = vq->priv_data;
 830         struct vivi_dev      *dev  = (struct vivi_dev*)fh->dev;
 831         struct vivi_dmaqueue *vidq = &dev->vidq;
 832
 833         dprintk(1,"%s\n",__FUNCTION__);
 834
 835         vivi_stop_thread(vidq);
 836
 837         free_buffer(vq,buf);
 838 }
 839
 840 #ifdef CONFIG_VIVI_SCATTER
 841 static int vivi_map_sg(void *dev, struct scatterlist *sg, int nents,
 842                        int direction)
 843 {
 844         int i;
 845
 846         dprintk(1,"%s, number of pages=%d\n",__FUNCTION__,nents);
 847         BUG_ON(direction == DMA_NONE);
 848
 849         for (i = 0; i < nents; i++ ) {
 850                 BUG_ON(!sg[i].page);
 851
 852                 sg_dma_address(&sg[i]) = page_to_phys(sg[i].page) + sg[i].offset;
 853         }
 854
 855         return nents;
 856 }
 857
 858 static int vivi_unmap_sg(void *dev,struct scatterlist *sglist,int nr_pages,
 859                          int direction)
 860 {
 861         dprintk(1,"%s\n",__FUNCTION__);
 862         return 0;
 863 }
 864
 865 static int vivi_dma_sync_sg(void *dev,struct scatterlist *sglist, int nr_pages,
 866                             int direction)
 867 {
 868 //      dprintk(1,"%s\n",__FUNCTION__);
 869
 870 //      flush_write_buffers();
 871         return 0;
 872 }
 873 #endif
 874
 875 static struct videobuf_queue_ops vivi_video_qops = {
 876         .buf_setup      = buffer_setup,
 877         .buf_prepare    = buffer_prepare,
 878         .buf_queue      = buffer_queue,
 879         .buf_release    = buffer_release,
 880
 881         /* Non-pci handling routines */
 882 //      .vb_map_sg      = vivi_map_sg,
 883 //      .vb_dma_sync_sg = vivi_dma_sync_sg,
 884 //      .vb_unmap_sg    = vivi_unmap_sg,
 885 };
 886
 887 /* ------------------------------------------------------------------
 888         IOCTL handling
 889    ------------------------------------------------------------------*/
 890
 891
 892 static int res_get(struct vivi_dev *dev, struct vivi_fh *fh)
 893 {
 894         /* is it free? */
 895         down(&dev->lock);
 896         if (dev->resources) {
 897                 /* no, someone else uses it */
 898                 up(&dev->lock);
 899                 return 0;
 900         }
 901         /* it's free, grab it */
 902         dev->resources =1;
 903         dprintk(1,"res: get\n");
 904         up(&dev->lock);
 905         return 1;
 906 }
 907
 908 static int res_locked(struct vivi_dev *dev)
 909 {
 910         return (dev->resources);
 911 }
 912
 913 static void res_free(struct vivi_dev *dev, struct vivi_fh *fh)
 914 {
 915         down(&dev->lock);
 916         dev->resources = 0;
 917         dprintk(1,"res: put\n");
 918         up(&dev->lock);
 919 }
 920
 921 /* ------------------------------------------------------------------
 922         IOCTL vidioc handling
 923    ------------------------------------------------------------------*/
 924 static int vidioc_querycap (struct file *file, void  *priv,
 925                                         struct v4l2_capability *cap)
 926 {
 927         strcpy(cap->driver, "vivi");
 928         strcpy(cap->card, "vivi");
 929         cap->version = VIVI_VERSION;
 930         cap->capabilities =     V4L2_CAP_VIDEO_CAPTURE |
 931                                 V4L2_CAP_STREAMING     |
 932                                 V4L2_CAP_READWRITE;
 933         return 0;
 934 }
 935
 936 static int vidioc_enum_fmt_cap (struct file *file, void  *priv,
 937                                         struct v4l2_fmtdesc *f)
 938 {
 939         if (f->index > 0)
 940                 return -EINVAL;
 941
 942         strlcpy(f->description,format.name,sizeof(f->description));
 943         f->pixelformat = format.fourcc;
 944         return 0;
 945 }
 946
 947 static int vidioc_g_fmt_cap (struct file *file, void *priv,
 948                                         struct v4l2_format *f)
 949 {
 950         struct vivi_fh  *fh=priv;
 951
 952         f->fmt.pix.width        = fh->width;
 953         f->fmt.pix.height       = fh->height;
 954         f->fmt.pix.field        = fh->vb_vidq.field;
 955         f->fmt.pix.pixelformat  = fh->fmt->fourcc;
 956         f->fmt.pix.bytesperline =
 957                 (f->fmt.pix.width * fh->fmt->depth) >> 3;
 958         f->fmt.pix.sizeimage =
 959                 f->fmt.pix.height * f->fmt.pix.bytesperline;
 960
 961         return (0);
 962 }
 963
 964 static int vidioc_try_fmt_cap (struct file *file, void *priv,
 965                         struct v4l2_format *f)
 966 {
 967         struct vivi_fmt *fmt;
 968         enum v4l2_field field;
 969         unsigned int maxw, maxh;
 970
 971         if (format.fourcc != f->fmt.pix.pixelformat) {
 972                 dprintk(1,"Fourcc format (0x%08x) invalid. Driver accepts "
 973                         "only 0x%08x\n",f->fmt.pix.pixelformat,format.fourcc);
 974                 return -EINVAL;
 975         }
 976         fmt=&format;
 977
 978         field = f->fmt.pix.field;
 979
 980         if (field == V4L2_FIELD_ANY) {
 981 //              field=V4L2_FIELD_INTERLACED;
 982                 field=V4L2_FIELD_SEQ_TB;
 983         } else if (V4L2_FIELD_INTERLACED != field) {
 984                 dprintk(1,"Field type invalid.\n");
 985                 return -EINVAL;
 986         }
 987
 988         maxw  = norm_maxw();
 989         maxh  = norm_maxh();
 990
 991         f->fmt.pix.field = field;
 992         if (f->fmt.pix.height < 32)
 993                 f->fmt.pix.height = 32;
 994         if (f->fmt.pix.height > maxh)
 995                 f->fmt.pix.height = maxh;
 996         if (f->fmt.pix.width < 48)
 997                 f->fmt.pix.width = 48;
 998         if (f->fmt.pix.width > maxw)
 999                 f->fmt.pix.width = maxw;
1000         f->fmt.pix.width &= ~0x03;
1001         f->fmt.pix.bytesperline =
1002                 (f->fmt.pix.width * fmt->depth) >> 3;
1003         f->fmt.pix.sizeimage =
1004                 f->fmt.pix.height * f->fmt.pix.bytesperline;
1005
1006         return 0;
1007 }
1008
1009 /*FIXME: This seems to be generic enough to be at videodev2 */
1010 static int vidioc_s_fmt_cap (struct file *file, void *priv,
1011                                         struct v4l2_format *f)
1012 {
1013         struct vivi_fh  *fh=priv;
1014         int ret = vidioc_try_fmt_cap(file,fh,f);
1015         if (ret < 0)
1016                 return (ret);
1017
1018         fh->fmt           = &format;
1019         fh->width         = f->fmt.pix.width;
1020         fh->height        = f->fmt.pix.height;
1021         fh->vb_vidq.field = f->fmt.pix.field;
1022         fh->type          = f->type;
1023
1024         return (0);
1025 }
1026
1027 static int vidioc_reqbufs (struct file *file, void *priv, struct v4l2_requestbuffers *p)
1028 {
1029         struct vivi_fh  *fh=priv;
1030
1031         return (videobuf_reqbufs(&fh->vb_vidq, p));
1032 }
1033
1034 static int vidioc_querybuf (struct file *file, void *priv, struct v4l2_buffer *p)
1035 {
1036         struct vivi_fh  *fh=priv;
1037
1038         return (videobuf_querybuf(&fh->vb_vidq, p));
1039 }
1040
1041 static int vidioc_qbuf (struct file *file, void *priv, struct v4l2_buffer *p)
1042 {
1043         struct vivi_fh  *fh=priv;
1044
1045         return (videobuf_qbuf(&fh->vb_vidq, p));
1046 }
1047
1048 static int vidioc_dqbuf (struct file *file, void *priv, struct v4l2_buffer *p)
1049 {
1050         struct vivi_fh  *fh=priv;
1051
1052         return (videobuf_dqbuf(&fh->vb_vidq, p,
1053                                 file->f_flags & O_NONBLOCK));
1054 }
1055
1056 #ifdef CONFIG_VIDEO_V4L1_COMPAT
1057 static int vidiocgmbuf (struct file *file, void *priv, struct video_mbuf *mbuf)
1058 {
1059         struct vivi_fh  *fh=priv;
1060         struct videobuf_queue *q=&fh->vb_vidq;
1061         struct v4l2_requestbuffers req;
1062         unsigned int i;
1063         int ret;
1064
1065         req.type   = q->type;
1066         req.count  = 8;
1067         req.memory = V4L2_MEMORY_MMAP;
1068         ret = videobuf_reqbufs(q,&req);
1069         if (ret < 0)
1070                 return (ret);
1071
1072         mbuf->frames = req.count;
1073         mbuf->size   = 0;
1074         for (i = 0; i < mbuf->frames; i++) {
1075                 mbuf->offsets[i]  = q->bufs[i]->boff;
1076                 mbuf->size       += q->bufs[i]->bsize;
1077         }
1078         return (0);
1079 }
1080 #endif
1081
1082 static int vidioc_streamon(struct file *file, void *priv, enum v4l2_buf_type i)
1083 {
1084         struct vivi_fh  *fh=priv;
1085         struct vivi_dev *dev    = fh->dev;
1086
1087         if (fh->type != V4L2_BUF_TYPE_VIDEO_CAPTURE)
1088                 return -EINVAL;
1089         if (i != fh->type)
1090                 return -EINVAL;
1091
1092         if (!res_get(dev,fh))
1093                 return -EBUSY;
1094         return (videobuf_streamon(&fh->vb_vidq));
1095 }
1096
1097 static int vidioc_streamoff(struct file *file, void *priv, enum v4l2_buf_type i)
1098 {
1099         struct vivi_fh  *fh=priv;
1100         struct vivi_dev *dev    = fh->dev;
1101
1102         if (fh->type != V4L2_BUF_TYPE_VIDEO_CAPTURE)
1103                 return -EINVAL;
1104         if (i != fh->type)
1105                 return -EINVAL;
1106
1107         videobuf_streamoff(&fh->vb_vidq);
1108         res_free(dev,fh);
1109
1110         return (0);
1111 }
1112
1113 static int vidioc_s_std (struct file *file, void *priv, v4l2_std_id *i)
1114 {
1115         return 0;
1116 }
1117
1118 /* only one input in this sample driver */
1119 static int vidioc_enum_input (struct file *file, void *priv,
1120                                 struct v4l2_input *inp)
1121 {
1122         if (inp->index != 0)
1123                 return -EINVAL;
1124
1125         inp->type = V4L2_INPUT_TYPE_CAMERA;
1126         inp->std = V4L2_STD_NTSC_M;
1127         strcpy(inp->name,"Camera");
1128
1129         return (0);
1130 }
1131
1132 static int vidioc_g_input (struct file *file, void *priv, unsigned int *i)
1133 {
1134         *i = 0;
1135
1136         return (0);
1137 }
1138 static int vidioc_s_input (struct file *file, void *priv, unsigned int i)
1139 {
1140         if (i > 0)
1141                 return -EINVAL;
1142
1143         return (0);
1144 }
1145
1146         /* --- controls ---------------------------------------------- */
1147 static int vidioc_queryctrl (struct file *file, void *priv,
1148                                 struct v4l2_queryctrl *qc)
1149 {
1150         int i;
1151
1152         for (i = 0; i < ARRAY_SIZE(vivi_qctrl); i++)
1153                 if (qc->id && qc->id == vivi_qctrl[i].id) {
1154                         memcpy(qc, &(vivi_qctrl[i]),
1155                                 sizeof(*qc));
1156                         return (0);
1157                 }
1158
1159         return -EINVAL;
1160 }
1161
1162 static int vidioc_g_ctrl (struct file *file, void *priv,
1163                                 struct v4l2_control *ctrl)
1164 {
1165         int i;
1166
1167         for (i = 0; i < ARRAY_SIZE(vivi_qctrl); i++)
1168                 if (ctrl->id == vivi_qctrl[i].id) {
1169                         ctrl->value=qctl_regs[i];
1170                         return (0);
1171                 }
1172
1173         return -EINVAL;
1174 }
1175 static int vidioc_s_ctrl (struct file *file, void *priv,
1176                                 struct v4l2_control *ctrl)
1177 {
1178         int i;
1179
1180         for (i = 0; i < ARRAY_SIZE(vivi_qctrl); i++)
1181                 if (ctrl->id == vivi_qctrl[i].id) {
1182                         if (ctrl->value <
1183                                 vivi_qctrl[i].minimum
1184                                 || ctrl->value >
1185                                 vivi_qctrl[i].maximum) {
1186                                         return (-ERANGE);
1187                                 }
1188                         qctl_regs[i]=ctrl->value;
1189                         return (0);
1190                 }
1191         return -EINVAL;
1192 }
1193
1194 /* ------------------------------------------------------------------
1195         File operations for the device
1196    ------------------------------------------------------------------*/
1197
1198 #define line_buf_size(norm) (norm_maxw(norm)*(format.depth+7)/8)
1199
1200 static int vivi_open(struct inode *inode, struct file *file)
1201 {
1202         int minor = iminor(inode);
1203         struct vivi_dev *h,*dev = NULL;
1204         struct vivi_fh *fh;
1205         struct list_head *list;
1206         enum v4l2_buf_type type = 0;
1207         int i;
1208
1209         printk(KERN_DEBUG "vivi: open called (minor=%d)\n",minor);
1210
1211         list_for_each(list,&vivi_devlist) {
1212                 h = list_entry(list, struct vivi_dev, vivi_devlist);
1213                 if (h->vfd.minor == minor) {
1214                         dev  = h;
1215                         type = V4L2_BUF_TYPE_VIDEO_CAPTURE;
1216                 }
1217         }
1218         if (NULL == dev)
1219                 return -ENODEV;
1220
1221
1222
1223         /* If more than one user, mutex should be added */
1224         dev->users++;
1225
1226         dprintk(1,"open minor=%d type=%s users=%d\n",
1227                                 minor,v4l2_type_names[type],dev->users);
1228
1229         /* allocate + initialize per filehandle data */
1230         fh = kzalloc(sizeof(*fh),GFP_KERNEL);
1231         if (NULL == fh) {
1232                 dev->users--;
1233                 return -ENOMEM;
1234         }
1235
1236         file->private_data = fh;
1237         fh->dev      = dev;
1238
1239         fh->type     = V4L2_BUF_TYPE_VIDEO_CAPTURE;
1240         fh->fmt      = &format;
1241         fh->width    = 640;
1242         fh->height   = 480;
1243
1244         /* Put all controls at a sane state */
1245         for (i = 0; i < ARRAY_SIZE(vivi_qctrl); i++)
1246                 qctl_regs[i] =vivi_qctrl[i].default_value;
1247
1248         dprintk(1,"Open: fh=0x%08lx, dev=0x%08lx, dev->vidq=0x%08lx\n",
1249                 (unsigned long)fh,(unsigned long)dev,(unsigned long)&dev->vidq);
1250         dprintk(1,"Open: list_empty queued=%d\n",list_empty(&dev->vidq.queued));
1251         dprintk(1,"Open: list_empty active=%d\n",list_empty(&dev->vidq.active));
1252
1253         /* Resets frame counters */
1254         dev->h=0;
1255         dev->m=0;
1256         dev->s=0;
1257         dev->us=0;
1258         dev->jiffies=jiffies;
1259         sprintf(dev->timestr,"%02d:%02d:%02d:%03d",
1260                         dev->h,dev->m,dev->s,(dev->us+500)/1000);
1261
1262 #ifdef CONFIG_VIVI_SCATTER
1263         videobuf_queue_init(&fh->vb_vidq,VIDEOBUF_DMA_SCATTER, &vivi_video_qops,
1264                         NULL, NULL,
1265                         fh->type,
1266                         V4L2_FIELD_INTERLACED,
1267                         sizeof(struct vivi_buffer),fh);
1268 #else
1269         videobuf_queue_init(&fh->vb_vidq, &vivi_video_qops,
1270                         NULL, NULL,
1271                         fh->type,
1272                         V4L2_FIELD_INTERLACED,
1273                         sizeof(struct vivi_buffer),fh);
1274 #endif
1275
1276         return 0;
1277 }
1278
1279 static ssize_t
1280 vivi_read(struct file *file, char __user *data, size_t count, loff_t *ppos)
1281 {
1282         struct vivi_fh        *fh = file->private_data;
1283
1284         if (fh->type==V4L2_BUF_TYPE_VIDEO_CAPTURE) {
1285                 if (res_locked(fh->dev))
1286                         return -EBUSY;
1287                 return videobuf_read_one(&fh->vb_vidq, data, count, ppos,
1288                                         file->f_flags & O_NONBLOCK);
1289         }
1290         return 0;
1291 }
1292
1293 static unsigned int
1294 vivi_poll(struct file *file, struct poll_table_struct *wait)
1295 {
1296         struct vivi_fh        *fh = file->private_data;
1297         struct vivi_buffer    *buf;
1298
1299         dprintk(1,"%s\n",__FUNCTION__);
1300
1301         if (V4L2_BUF_TYPE_VIDEO_CAPTURE != fh->type)
1302                 return POLLERR;
1303
1304         if (res_get(fh->dev,fh)) {
1305                 dprintk(1,"poll: mmap interface\n");
1306                 /* streaming capture */
1307                 if (list_empty(&fh->vb_vidq.stream))
1308                         return POLLERR;
1309                 buf = list_entry(fh->vb_vidq.stream.next,struct vivi_buffer,vb.stream);
1310         } else {
1311                 dprintk(1,"poll: read() interface\n");
1312                 /* read() capture */
1313                 buf = (struct vivi_buffer*)fh->vb_vidq.read_buf;
1314                 if (NULL == buf)
1315                         return POLLERR;
1316         }
1317         poll_wait(file, &buf->vb.done, wait);
1318         if (buf->vb.state == STATE_DONE ||
1319             buf->vb.state == STATE_ERROR)
1320                 return POLLIN|POLLRDNORM;
1321         return 0;
1322 }
1323
1324 static int vivi_release(struct inode *inode, struct file *file)
1325 {
1326         struct vivi_fh         *fh = file->private_data;
1327         struct vivi_dev *dev       = fh->dev;
1328         struct vivi_dmaqueue *vidq = &dev->vidq;
1329
1330         int minor = iminor(inode);
1331
1332         vivi_stop_thread(vidq);
1333         videobuf_mmap_free(&fh->vb_vidq);
1334
1335         kfree (fh);
1336
1337         dev->users--;
1338
1339         printk(KERN_DEBUG "vivi: close called (minor=%d, users=%d)\n",minor,dev->users);
1340
1341         return 0;
1342 }
1343
1344 static int
1345 vivi_mmap(struct file *file, struct vm_area_struct * vma)
1346 {
1347         struct vivi_fh        *fh = file->private_data;
1348         int ret;
1349
1350         dprintk (1,"mmap called, vma=0x%08lx\n",(unsigned long)vma);
1351
1352         ret=videobuf_mmap_mapper(&fh->vb_vidq, vma);
1353
1354         dprintk (1,"vma start=0x%08lx, size=%ld, ret=%d\n",
1355                 (unsigned long)vma->vm_start,
1356                 (unsigned long)vma->vm_end-(unsigned long)vma->vm_start,
1357                 ret);
1358
1359         return ret;
1360 }
1361
1362 static const struct file_operations vivi_fops = {
1363         .owner          = THIS_MODULE,
1364         .open           = vivi_open,
1365         .release        = vivi_release,
1366         .read           = vivi_read,
1367         .poll           = vivi_poll,
1368         .ioctl          = video_ioctl2, /* V4L2 ioctl handler */
1369         .mmap           = vivi_mmap,
1370         .llseek         = no_llseek,
1371 };
1372
1373 static struct video_device vivi = {
1374         .name           = "vivi",
1375         .type           = VID_TYPE_CAPTURE,
1376         .hardware       = 0,
1377         .fops           = &vivi_fops,
1378         .minor          = -1,
1379 //      .release        = video_device_release,
1380
1381         .vidioc_querycap      = vidioc_querycap,
1382         .vidioc_enum_fmt_cap  = vidioc_enum_fmt_cap,
1383         .vidioc_g_fmt_cap     = vidioc_g_fmt_cap,
1384         .vidioc_try_fmt_cap   = vidioc_try_fmt_cap,
1385         .vidioc_s_fmt_cap     = vidioc_s_fmt_cap,
1386         .vidioc_reqbufs       = vidioc_reqbufs,
1387         .vidioc_querybuf      = vidioc_querybuf,
1388         .vidioc_qbuf          = vidioc_qbuf,
1389         .vidioc_dqbuf         = vidioc_dqbuf,
1390         .vidioc_s_std         = vidioc_s_std,
1391         .vidioc_enum_input    = vidioc_enum_input,
1392         .vidioc_g_input       = vidioc_g_input,
1393         .vidioc_s_input       = vidioc_s_input,
1394         .vidioc_queryctrl     = vidioc_queryctrl,
1395         .vidioc_g_ctrl        = vidioc_g_ctrl,
1396         .vidioc_s_ctrl        = vidioc_s_ctrl,
1397         .vidioc_streamon      = vidioc_streamon,
1398         .vidioc_streamoff     = vidioc_streamoff,
1399 #ifdef CONFIG_VIDEO_V4L1_COMPAT
1400         .vidiocgmbuf          = vidiocgmbuf,
1401 #endif
1402         .tvnorms              = V4L2_STD_NTSC_M,
1403         .current_norm         = V4L2_STD_NTSC_M,
1404 };
1405 /* -----------------------------------------------------------------
1406         Initialization and module stuff
1407    ------------------------------------------------------------------*/
1408
1409 static int __init vivi_init(void)
1410 {
1411         int ret;
1412         struct vivi_dev *dev;
1413
1414         dev = kzalloc(sizeof(*dev),GFP_KERNEL);
1415         if (NULL == dev)
1416                 return -ENOMEM;
1417         list_add_tail(&dev->vivi_devlist,&vivi_devlist);
1418
1419         /* init video dma queues */
1420         INIT_LIST_HEAD(&dev->vidq.active);
1421         INIT_LIST_HEAD(&dev->vidq.queued);
1422         init_waitqueue_head(&dev->vidq.wq);
1423
1424         /* initialize locks */
1425         init_MUTEX(&dev->lock);
1426
1427         dev->vidq.timeout.function = vivi_vid_timeout;
1428         dev->vidq.timeout.data     = (unsigned long)dev;
1429         init_timer(&dev->vidq.timeout);
1430
1431         ret = video_register_device(&vivi, VFL_TYPE_GRABBER, video_nr);
1432         printk(KERN_INFO "Video Technology Magazine Virtual Video Capture Board (Load status: %d)\n", ret);
1433         return ret;
1434 }
1435
1436 static void __exit vivi_exit(void)
1437 {
1438         struct vivi_dev *h;
1439         struct list_head *list;
1440
1441         while (!list_empty(&vivi_devlist)) {
1442                 list = vivi_devlist.next;
1443                 list_del(list);
1444                 h = list_entry(list, struct vivi_dev, vivi_devlist);
1445                 kfree (h);
1446         }
1447         video_unregister_device(&vivi);
1448 }
1449
1450 module_init(vivi_init);
1451 module_exit(vivi_exit);
1452
1453 MODULE_DESCRIPTION("Video Technology Magazine Virtual Video Capture Board");
1454 MODULE_AUTHOR("Mauro Carvalho Chehab, Ted Walther and John Sokol");
1455 MODULE_LICENSE("Dual BSD/GPL");
1456
1457 module_param(video_nr, int, 0);
1458
1459 module_param_named(debug,vivi.debug, int, 0644);
1460 MODULE_PARM_DESC(debug,"activates debug info");
1461
1462 module_param(vid_limit,int,0644);
1463 MODULE_PARM_DESC(vid_limit,"capture memory limit in megabytes");
1464