Logo Search packages:      
Sourcecode: linux version File versions  Download package

vivi.c

/*
 * Virtual Video driver - This code emulates a real video device with v4l2 api
 *
 * Copyright (c) 2006 by:
 *      Mauro Carvalho Chehab <mchehab--a.t--infradead.org>
 *      Ted Walther <ted--a.t--enumera.com>
 *      John Sokol <sokol--a.t--videotechnology.com>
 *      http://v4l.videotechnology.com/
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the BSD Licence, GNU General Public License
 * as published by the Free Software Foundation; either version 2 of the
 * License, or (at your option) any later version
 */
#include <linux/module.h>
#include <linux/delay.h>
#include <linux/errno.h>
#include <linux/fs.h>
#include <linux/kernel.h>
#include <linux/slab.h>
#include <linux/mm.h>
#include <linux/ioport.h>
#include <linux/init.h>
#include <linux/sched.h>
#include <linux/pci.h>
#include <linux/random.h>
#include <linux/version.h>
#include <linux/mutex.h>
#include <linux/videodev2.h>
#include <linux/dma-mapping.h>
#ifdef CONFIG_VIDEO_V4L1_COMPAT
/* Include V4L1 specific functions. Should be removed soon */
#include <linux/videodev.h>
#endif
#include <linux/interrupt.h>
#include <media/videobuf-vmalloc.h>
#include <media/v4l2-common.h>
#include <linux/kthread.h>
#include <linux/highmem.h>
#include <linux/freezer.h>

/* Wake up at about 30 fps */
#define WAKE_NUMERATOR 30
#define WAKE_DENOMINATOR 1001
#define BUFFER_TIMEOUT     msecs_to_jiffies(500)  /* 0.5 seconds */

/* These timers are for 1 fps - used only for testing */
//#define WAKE_DENOMINATOR 30 /* hack for testing purposes */
//#define BUFFER_TIMEOUT     msecs_to_jiffies(5000)  /* 5 seconds */

#include "font.h"

#define VIVI_MAJOR_VERSION 0
#define VIVI_MINOR_VERSION 4
#define VIVI_RELEASE 0
#define VIVI_VERSION KERNEL_VERSION(VIVI_MAJOR_VERSION, VIVI_MINOR_VERSION, VIVI_RELEASE)

/* Declare static vars that will be used as parameters */
static unsigned int vid_limit = 16; /* Video memory limit, in Mb */
static struct video_device vivi;    /* Video device */
static int video_nr = -1;           /* /dev/videoN, -1 for autodetect */

/* supported controls */
static struct v4l2_queryctrl vivi_qctrl[] = {
      {
            .id            = V4L2_CID_AUDIO_VOLUME,
            .name          = "Volume",
            .minimum       = 0,
            .maximum       = 65535,
            .step          = 65535/100,
            .default_value = 65535,
            .flags         = 0,
            .type          = V4L2_CTRL_TYPE_INTEGER,
      },{
            .id            = V4L2_CID_BRIGHTNESS,
            .type          = V4L2_CTRL_TYPE_INTEGER,
            .name          = "Brightness",
            .minimum       = 0,
            .maximum       = 255,
            .step          = 1,
            .default_value = 127,
            .flags         = 0,
      }, {
            .id            = V4L2_CID_CONTRAST,
            .type          = V4L2_CTRL_TYPE_INTEGER,
            .name          = "Contrast",
            .minimum       = 0,
            .maximum       = 255,
            .step          = 0x1,
            .default_value = 0x10,
            .flags         = 0,
      }, {
            .id            = V4L2_CID_SATURATION,
            .type          = V4L2_CTRL_TYPE_INTEGER,
            .name          = "Saturation",
            .minimum       = 0,
            .maximum       = 255,
            .step          = 0x1,
            .default_value = 127,
            .flags         = 0,
      }, {
            .id            = V4L2_CID_HUE,
            .type          = V4L2_CTRL_TYPE_INTEGER,
            .name          = "Hue",
            .minimum       = -128,
            .maximum       = 127,
            .step          = 0x1,
            .default_value = 0,
            .flags         = 0,
      }
};

static int qctl_regs[ARRAY_SIZE(vivi_qctrl)];

#define dprintk(level,fmt, arg...)                          \
      do {                                            \
            if (vivi.debug >= (level))                      \
                  printk(KERN_DEBUG "vivi: " fmt , ## arg); \
      } while (0)

/* ------------------------------------------------------------------
      Basic structures
   ------------------------------------------------------------------*/

struct vivi_fmt {
      char  *name;
      u32   fourcc;          /* v4l2 format id */
      int   depth;
};

static struct vivi_fmt format = {
      .name     = "4:2:2, packed, YUYV",
      .fourcc   = V4L2_PIX_FMT_YUYV,
      .depth    = 16,
};

struct sg_to_addr {
      int pos;
      struct scatterlist *sg;
};

/* buffer for one video frame */
struct vivi_buffer {
      /* common v4l buffer stuff -- must be first */
      struct videobuf_buffer vb;

      struct vivi_fmt        *fmt;
};

struct vivi_dmaqueue {
      struct list_head       active;
      struct list_head       queued;
      struct timer_list      timeout;

      /* thread for generating video stream*/
      struct task_struct         *kthread;
      wait_queue_head_t          wq;
      /* Counters to control fps rate */
      int                        frame;
      int                        ini_jiffies;
};

static LIST_HEAD(vivi_devlist);

struct vivi_dev {
      struct list_head           vivi_devlist;

      struct mutex               lock;

      int                        users;

      /* various device info */
      struct video_device        vfd;

      struct vivi_dmaqueue       vidq;

      /* Several counters */
      int                        h,m,s,us,jiffies;
      char                       timestr[13];
};

struct vivi_fh {
      struct vivi_dev            *dev;

      /* video capture */
      struct vivi_fmt            *fmt;
      unsigned int               width,height;
      struct videobuf_queue      vb_vidq;

      enum v4l2_buf_type         type;
};

/* ------------------------------------------------------------------
      DMA and thread functions
   ------------------------------------------------------------------*/

/* Bars and Colors should match positions */

enum colors {
      WHITE,
      AMBAR,
      CYAN,
      GREEN,
      MAGENTA,
      RED,
      BLUE
};

static u8 bars[8][3] = {
      /* R   G   B */
      {204,204,204},    /* white */
      {208,208,  0},  /* ambar */
      {  0,206,206},  /* cyan */
      {  0,239,  0},  /* green */
      {239,  0,239},  /* magenta */
      {205,  0,  0},  /* red */
      {  0,  0,255},  /* blue */
      {  0,  0,  0}
};

#define TO_Y(r,g,b) (((16829*r +33039*g +6416*b  + 32768)>>16)+16)
/* RGB to  V(Cr) Color transform */
#define TO_V(r,g,b) (((28784*r -24103*g -4681*b  + 32768)>>16)+128)
/* RGB to  U(Cb) Color transform */
#define TO_U(r,g,b) (((-9714*r -19070*g +28784*b + 32768)>>16)+128)

#define TSTAMP_MIN_Y 24
#define TSTAMP_MAX_Y TSTAMP_MIN_Y+15
#define TSTAMP_MIN_X 64

static void gen_line(char *basep,int inipos,int wmax,
                 int hmax, int line, int count, char *timestr)
{
      int  w,i,j,pos=inipos,y;
      char *p,*s;
      u8   chr,r,g,b,color;

      /* We will just duplicate the second pixel at the packet */
      wmax/=2;

      /* Generate a standard color bar pattern */
      for (w=0;w<wmax;w++) {
            int colorpos=((w+count)*8/(wmax+1)) % 8;
            r=bars[colorpos][0];
            g=bars[colorpos][1];
            b=bars[colorpos][2];

            for (color=0;color<4;color++) {
                  p=basep+pos;

                  switch (color) {
                        case 0:
                        case 2:
                              *p=TO_Y(r,g,b);         /* Luminance */
                              break;
                        case 1:
                              *p=TO_U(r,g,b);         /* Cb */
                              break;
                        case 3:
                              *p=TO_V(r,g,b);         /* Cr */
                              break;
                  }
                  pos++;
            }
      }

      /* Checks if it is possible to show timestamp */
      if (TSTAMP_MAX_Y>=hmax)
            goto end;
      if (TSTAMP_MIN_X+strlen(timestr)>=wmax)
            goto end;

      /* Print stream time */
      if (line>=TSTAMP_MIN_Y && line<=TSTAMP_MAX_Y) {
            j=TSTAMP_MIN_X;
            for (s=timestr;*s;s++) {
                  chr=rom8x16_bits[(*s-0x30)*16+line-TSTAMP_MIN_Y];
                  for (i=0;i<7;i++) {
                        if (chr&1<<(7-i)) { /* Font color*/
                              r=bars[BLUE][0];
                              g=bars[BLUE][1];
                              b=bars[BLUE][2];
                              r=g=b=0;
                              g=198;
                        } else { /* Background color */
                              r=bars[WHITE][0];
                              g=bars[WHITE][1];
                              b=bars[WHITE][2];
                              r=g=b=0;
                        }

                        pos=inipos+j*2;
                        for (color=0;color<4;color++) {
                              p=basep+pos;

                              y=TO_Y(r,g,b);

                              switch (color) {
                                    case 0:
                                    case 2:
                                          *p=TO_Y(r,g,b);         /* Luminance */
                                          break;
                                    case 1:
                                          *p=TO_U(r,g,b);         /* Cb */
                                          break;
                                    case 3:
                                          *p=TO_V(r,g,b);         /* Cr */
                                          break;
                              }
                              pos++;
                        }
                        j++;
                  }
            }
      }


end:
      return;
}
static void vivi_fillbuff(struct vivi_dev *dev,struct vivi_buffer *buf)
{
      int h,pos=0;
      int hmax  = buf->vb.height;
      int wmax  = buf->vb.width;
      struct timeval ts;
      char *tmpbuf = kmalloc(wmax*2,GFP_KERNEL);
      void *vbuf=videobuf_to_vmalloc (&buf->vb);
      /* FIXME: move to dev struct */
      static int mv_count=0;

      if (!tmpbuf)
            return;

      for (h=0;h<hmax;h++) {
            gen_line(tmpbuf,0,wmax,hmax,h,mv_count,
                   dev->timestr);
            /* FIXME: replacing to __copy_to_user */
            if (copy_to_user(vbuf+pos,tmpbuf,wmax*2)!=0)
                  dprintk(2,"vivifill copy_to_user failed.\n");
            pos += wmax*2;
      }

      mv_count++;

      kfree(tmpbuf);

      /* Updates stream time */

      dev->us+=jiffies_to_usecs(jiffies-dev->jiffies);
      dev->jiffies=jiffies;
      if (dev->us>=1000000) {
            dev->us-=1000000;
            dev->s++;
            if (dev->s>=60) {
                  dev->s-=60;
                  dev->m++;
                  if (dev->m>60) {
                        dev->m-=60;
                        dev->h++;
                        if (dev->h>24)
                              dev->h-=24;
                  }
            }
      }
      sprintf(dev->timestr,"%02d:%02d:%02d:%03d",
                  dev->h,dev->m,dev->s,(dev->us+500)/1000);

      dprintk(2,"vivifill at %s: Buffer 0x%08lx size= %d\n",dev->timestr,
                  (unsigned long)tmpbuf,pos);

      /* Advice that buffer was filled */
      buf->vb.state = STATE_DONE;
      buf->vb.field_count++;
      do_gettimeofday(&ts);
      buf->vb.ts = ts;

      list_del(&buf->vb.queue);
      wake_up(&buf->vb.done);
}

static int restart_video_queue(struct vivi_dmaqueue *dma_q);

static void vivi_thread_tick(struct vivi_dmaqueue  *dma_q)
{
      struct vivi_buffer    *buf;
      struct vivi_dev *dev= container_of(dma_q,struct vivi_dev,vidq);

      int bc;

      /* Announces videobuf that all went ok */
      for (bc = 0;; bc++) {
            if (list_empty(&dma_q->active)) {
                  dprintk(1,"No active queue to serve\n");
                  break;
            }

            buf = list_entry(dma_q->active.next,
                         struct vivi_buffer, vb.queue);

            /* Nobody is waiting something to be done, just return */
            if (!waitqueue_active(&buf->vb.done)) {
                  mod_timer(&dma_q->timeout, jiffies+BUFFER_TIMEOUT);
                  return;
            }

            do_gettimeofday(&buf->vb.ts);
            dprintk(2,"[%p/%d] wakeup\n",buf,buf->vb.i);

            /* Fill buffer */
            vivi_fillbuff(dev,buf);

            if (list_empty(&dma_q->active)) {
                  del_timer(&dma_q->timeout);
            } else {
                  mod_timer(&dma_q->timeout, jiffies+BUFFER_TIMEOUT);
            }
      }
      if (bc != 1)
            dprintk(1,"%s: %d buffers handled (should be 1)\n",__FUNCTION__,bc);
}

static void vivi_sleep(struct vivi_dmaqueue  *dma_q)
{
      int timeout;
      DECLARE_WAITQUEUE(wait, current);

      dprintk(1,"%s dma_q=0x%08lx\n",__FUNCTION__,(unsigned long)dma_q);

      add_wait_queue(&dma_q->wq, &wait);
      if (!kthread_should_stop()) {
            dma_q->frame++;

            /* Calculate time to wake up */
            timeout=dma_q->ini_jiffies+msecs_to_jiffies((dma_q->frame*WAKE_NUMERATOR*1000)/WAKE_DENOMINATOR)-jiffies;

            if (timeout <= 0) {
                  int old=dma_q->frame;
                  dma_q->frame=(jiffies_to_msecs(jiffies-dma_q->ini_jiffies)*WAKE_DENOMINATOR)/(WAKE_NUMERATOR*1000)+1;

                  timeout=dma_q->ini_jiffies+msecs_to_jiffies((dma_q->frame*WAKE_NUMERATOR*1000)/WAKE_DENOMINATOR)-jiffies;

                  dprintk(1,"underrun, losed %d frames. "
                          "Now, frame is %d. Waking on %d jiffies\n",
                              dma_q->frame-old,dma_q->frame,timeout);
            } else
                  dprintk(1,"will sleep for %i jiffies\n",timeout);

            vivi_thread_tick(dma_q);

            schedule_timeout_interruptible (timeout);
      }

      remove_wait_queue(&dma_q->wq, &wait);
      try_to_freeze();
}

static int vivi_thread(void *data)
{
      struct vivi_dmaqueue  *dma_q=data;

      dprintk(1,"thread started\n");

      mod_timer(&dma_q->timeout, jiffies+BUFFER_TIMEOUT);
      set_freezable();

      for (;;) {
            vivi_sleep(dma_q);

            if (kthread_should_stop())
                  break;
      }
      dprintk(1, "thread: exit\n");
      return 0;
}

static int vivi_start_thread(struct vivi_dmaqueue  *dma_q)
{
      dma_q->frame=0;
      dma_q->ini_jiffies=jiffies;

      dprintk(1,"%s\n",__FUNCTION__);

      dma_q->kthread = kthread_run(vivi_thread, dma_q, "vivi");

      if (IS_ERR(dma_q->kthread)) {
            printk(KERN_ERR "vivi: kernel_thread() failed\n");
            return PTR_ERR(dma_q->kthread);
      }
      /* Wakes thread */
      wake_up_interruptible(&dma_q->wq);

      dprintk(1,"returning from %s\n",__FUNCTION__);
      return 0;
}

static void vivi_stop_thread(struct vivi_dmaqueue  *dma_q)
{
      dprintk(1,"%s\n",__FUNCTION__);
      /* shutdown control thread */
      if (dma_q->kthread) {
            kthread_stop(dma_q->kthread);
            dma_q->kthread=NULL;
      }
}

static int restart_video_queue(struct vivi_dmaqueue *dma_q)
{
      struct vivi_buffer *buf, *prev;

      dprintk(1,"%s dma_q=0x%08lx\n",__FUNCTION__,(unsigned long)dma_q);

      if (!list_empty(&dma_q->active)) {
            buf = list_entry(dma_q->active.next, struct vivi_buffer, vb.queue);
            dprintk(2,"restart_queue [%p/%d]: restart dma\n",
                  buf, buf->vb.i);

            dprintk(1,"Restarting video dma\n");
            vivi_stop_thread(dma_q);
//          vivi_start_thread(dma_q);

            /* cancel all outstanding capture / vbi requests */
            list_for_each_entry_safe(buf, prev, &dma_q->active, vb.queue) {
                  list_del(&buf->vb.queue);
                  buf->vb.state = STATE_ERROR;
                  wake_up(&buf->vb.done);
            }
            mod_timer(&dma_q->timeout, jiffies+BUFFER_TIMEOUT);

            return 0;
      }

      prev = NULL;
      for (;;) {
            if (list_empty(&dma_q->queued))
                  return 0;
            buf = list_entry(dma_q->queued.next, struct vivi_buffer, vb.queue);
            if (NULL == prev) {
                  list_del(&buf->vb.queue);
                  list_add_tail(&buf->vb.queue,&dma_q->active);

                  dprintk(1,"Restarting video dma\n");
                  vivi_stop_thread(dma_q);
                  vivi_start_thread(dma_q);

                  buf->vb.state = STATE_ACTIVE;
                  mod_timer(&dma_q->timeout, jiffies+BUFFER_TIMEOUT);
                  dprintk(2,"[%p/%d] restart_queue - first active\n",
                        buf,buf->vb.i);

            } else if (prev->vb.width  == buf->vb.width  &&
                     prev->vb.height == buf->vb.height &&
                     prev->fmt       == buf->fmt) {
                  list_del(&buf->vb.queue);
                  list_add_tail(&buf->vb.queue,&dma_q->active);
                  buf->vb.state = STATE_ACTIVE;
                  dprintk(2,"[%p/%d] restart_queue - move to active\n",
                        buf,buf->vb.i);
            } else {
                  return 0;
            }
            prev = buf;
      }
}

static void vivi_vid_timeout(unsigned long data)
{
      struct vivi_dev      *dev  = (struct vivi_dev*)data;
      struct vivi_dmaqueue *vidq = &dev->vidq;
      struct vivi_buffer   *buf;

      while (!list_empty(&vidq->active)) {
            buf = list_entry(vidq->active.next, struct vivi_buffer, vb.queue);
            list_del(&buf->vb.queue);
            buf->vb.state = STATE_ERROR;
            wake_up(&buf->vb.done);
            printk("vivi/0: [%p/%d] timeout\n", buf, buf->vb.i);
      }

      restart_video_queue(vidq);
}

/* ------------------------------------------------------------------
      Videobuf operations
   ------------------------------------------------------------------*/
static int
buffer_setup(struct videobuf_queue *vq, unsigned int *count, unsigned int *size)
{
      struct vivi_fh *fh = vq->priv_data;

      *size = fh->width*fh->height*2;

      if (0 == *count)
            *count = 32;

      while (*size * *count > vid_limit * 1024 * 1024)
            (*count)--;

      dprintk(1,"%s, count=%d, size=%d\n",__FUNCTION__,*count, *size);

      return 0;
}

static void free_buffer(struct videobuf_queue *vq, struct vivi_buffer *buf)
{
      dprintk(1,"%s\n",__FUNCTION__);

      if (in_interrupt())
            BUG();

      videobuf_waiton(&buf->vb,0,0);
      videobuf_vmalloc_free(&buf->vb);
      buf->vb.state = STATE_NEEDS_INIT;
}

#define norm_maxw() 1024
#define norm_maxh() 768
static int
buffer_prepare(struct videobuf_queue *vq, struct videobuf_buffer *vb,
                                    enum v4l2_field field)
{
      struct vivi_fh     *fh  = vq->priv_data;
      struct vivi_buffer *buf = container_of(vb,struct vivi_buffer,vb);
      int rc, init_buffer = 0;

      dprintk(1,"%s, field=%d\n",__FUNCTION__,field);

      BUG_ON(NULL == fh->fmt);
      if (fh->width  < 48 || fh->width  > norm_maxw() ||
          fh->height < 32 || fh->height > norm_maxh())
            return -EINVAL;
      buf->vb.size = fh->width*fh->height*2;
      if (0 != buf->vb.baddr  &&  buf->vb.bsize < buf->vb.size)
            return -EINVAL;

      if (buf->fmt       != fh->fmt    ||
          buf->vb.width  != fh->width  ||
          buf->vb.height != fh->height ||
      buf->vb.field  != field) {
            buf->fmt       = fh->fmt;
            buf->vb.width  = fh->width;
            buf->vb.height = fh->height;
            buf->vb.field  = field;
            init_buffer = 1;
      }

      if (STATE_NEEDS_INIT == buf->vb.state) {
            if (0 != (rc = videobuf_iolock(vq,&buf->vb,NULL)))
                  goto fail;
      }

      buf->vb.state = STATE_PREPARED;

      return 0;

fail:
      free_buffer(vq,buf);
      return rc;
}

static void
buffer_queue(struct videobuf_queue *vq, struct videobuf_buffer *vb)
{
      struct vivi_buffer    *buf     = container_of(vb,struct vivi_buffer,vb);
      struct vivi_fh        *fh      = vq->priv_data;
      struct vivi_dev       *dev     = fh->dev;
      struct vivi_dmaqueue  *vidq    = &dev->vidq;
      struct vivi_buffer    *prev;

      if (!list_empty(&vidq->queued)) {
            dprintk(1,"adding vb queue=0x%08lx\n",(unsigned long)&buf->vb.queue);
            list_add_tail(&buf->vb.queue,&vidq->queued);
            buf->vb.state = STATE_QUEUED;
            dprintk(2,"[%p/%d] buffer_queue - append to queued\n",
                  buf, buf->vb.i);
      } else if (list_empty(&vidq->active)) {
            list_add_tail(&buf->vb.queue,&vidq->active);

            buf->vb.state = STATE_ACTIVE;
            mod_timer(&vidq->timeout, jiffies+BUFFER_TIMEOUT);
            dprintk(2,"[%p/%d] buffer_queue - first active\n",
                  buf, buf->vb.i);

            vivi_start_thread(vidq);
      } else {
            prev = list_entry(vidq->active.prev, struct vivi_buffer, vb.queue);
            if (prev->vb.width  == buf->vb.width  &&
                prev->vb.height == buf->vb.height &&
                prev->fmt       == buf->fmt) {
                  list_add_tail(&buf->vb.queue,&vidq->active);
                  buf->vb.state = STATE_ACTIVE;
                  dprintk(2,"[%p/%d] buffer_queue - append to active\n",
                        buf, buf->vb.i);

            } else {
                  list_add_tail(&buf->vb.queue,&vidq->queued);
                  buf->vb.state = STATE_QUEUED;
                  dprintk(2,"[%p/%d] buffer_queue - first queued\n",
                        buf, buf->vb.i);
            }
      }
}

static void buffer_release(struct videobuf_queue *vq, struct videobuf_buffer *vb)
{
      struct vivi_buffer   *buf  = container_of(vb,struct vivi_buffer,vb);
      struct vivi_fh       *fh   = vq->priv_data;
      struct vivi_dev      *dev  = (struct vivi_dev*)fh->dev;
      struct vivi_dmaqueue *vidq = &dev->vidq;

      dprintk(1,"%s\n",__FUNCTION__);

      vivi_stop_thread(vidq);

      free_buffer(vq,buf);
}

static struct videobuf_queue_ops vivi_video_qops = {
      .buf_setup      = buffer_setup,
      .buf_prepare    = buffer_prepare,
      .buf_queue      = buffer_queue,
      .buf_release    = buffer_release,
};

/* ------------------------------------------------------------------
      IOCTL vidioc handling
   ------------------------------------------------------------------*/
static int vidioc_querycap (struct file *file, void  *priv,
                              struct v4l2_capability *cap)
{
      strcpy(cap->driver, "vivi");
      strcpy(cap->card, "vivi");
      cap->version = VIVI_VERSION;
      cap->capabilities =     V4L2_CAP_VIDEO_CAPTURE |
                        V4L2_CAP_STREAMING     |
                        V4L2_CAP_READWRITE;
      return 0;
}

static int vidioc_enum_fmt_cap (struct file *file, void  *priv,
                              struct v4l2_fmtdesc *f)
{
      if (f->index > 0)
            return -EINVAL;

      strlcpy(f->description,format.name,sizeof(f->description));
      f->pixelformat = format.fourcc;
      return 0;
}

static int vidioc_g_fmt_cap (struct file *file, void *priv,
                              struct v4l2_format *f)
{
      struct vivi_fh  *fh=priv;

      f->fmt.pix.width        = fh->width;
      f->fmt.pix.height       = fh->height;
      f->fmt.pix.field        = fh->vb_vidq.field;
      f->fmt.pix.pixelformat  = fh->fmt->fourcc;
      f->fmt.pix.bytesperline =
            (f->fmt.pix.width * fh->fmt->depth) >> 3;
      f->fmt.pix.sizeimage =
            f->fmt.pix.height * f->fmt.pix.bytesperline;

      return (0);
}

static int vidioc_try_fmt_cap (struct file *file, void *priv,
                  struct v4l2_format *f)
{
      struct vivi_fmt *fmt;
      enum v4l2_field field;
      unsigned int maxw, maxh;

      if (format.fourcc != f->fmt.pix.pixelformat) {
            dprintk(1,"Fourcc format (0x%08x) invalid. Driver accepts "
                  "only 0x%08x\n",f->fmt.pix.pixelformat,format.fourcc);
            return -EINVAL;
      }
      fmt=&format;

      field = f->fmt.pix.field;

      if (field == V4L2_FIELD_ANY) {
            field=V4L2_FIELD_INTERLACED;
      } else if (V4L2_FIELD_INTERLACED != field) {
            dprintk(1,"Field type invalid.\n");
            return -EINVAL;
      }

      maxw  = norm_maxw();
      maxh  = norm_maxh();

      f->fmt.pix.field = field;
      if (f->fmt.pix.height < 32)
            f->fmt.pix.height = 32;
      if (f->fmt.pix.height > maxh)
            f->fmt.pix.height = maxh;
      if (f->fmt.pix.width < 48)
            f->fmt.pix.width = 48;
      if (f->fmt.pix.width > maxw)
            f->fmt.pix.width = maxw;
      f->fmt.pix.width &= ~0x03;
      f->fmt.pix.bytesperline =
            (f->fmt.pix.width * fmt->depth) >> 3;
      f->fmt.pix.sizeimage =
            f->fmt.pix.height * f->fmt.pix.bytesperline;

      return 0;
}

/*FIXME: This seems to be generic enough to be at videodev2 */
static int vidioc_s_fmt_cap (struct file *file, void *priv,
                              struct v4l2_format *f)
{
      struct vivi_fh  *fh=priv;
      int ret = vidioc_try_fmt_cap(file,fh,f);
      if (ret < 0)
            return (ret);

      fh->fmt           = &format;
      fh->width         = f->fmt.pix.width;
      fh->height        = f->fmt.pix.height;
      fh->vb_vidq.field = f->fmt.pix.field;
      fh->type          = f->type;

      return (0);
}

static int vidioc_reqbufs (struct file *file, void *priv, struct v4l2_requestbuffers *p)
{
      struct vivi_fh  *fh=priv;

      return (videobuf_reqbufs(&fh->vb_vidq, p));
}

static int vidioc_querybuf (struct file *file, void *priv, struct v4l2_buffer *p)
{
      struct vivi_fh  *fh=priv;

      return (videobuf_querybuf(&fh->vb_vidq, p));
}

static int vidioc_qbuf (struct file *file, void *priv, struct v4l2_buffer *p)
{
      struct vivi_fh  *fh=priv;

      return (videobuf_qbuf(&fh->vb_vidq, p));
}

static int vidioc_dqbuf (struct file *file, void *priv, struct v4l2_buffer *p)
{
      struct vivi_fh  *fh=priv;

      return (videobuf_dqbuf(&fh->vb_vidq, p,
                        file->f_flags & O_NONBLOCK));
}

#ifdef CONFIG_VIDEO_V4L1_COMPAT
static int vidiocgmbuf (struct file *file, void *priv, struct video_mbuf *mbuf)
{
      struct vivi_fh  *fh=priv;

      return videobuf_cgmbuf (&fh->vb_vidq, mbuf, 8);
}
#endif

static int vidioc_streamon(struct file *file, void *priv, enum v4l2_buf_type i)
{
      struct vivi_fh  *fh=priv;

      if (fh->type != V4L2_BUF_TYPE_VIDEO_CAPTURE)
            return -EINVAL;
      if (i != fh->type)
            return -EINVAL;

      return videobuf_streamon(&fh->vb_vidq);
}

static int vidioc_streamoff(struct file *file, void *priv, enum v4l2_buf_type i)
{
      struct vivi_fh  *fh=priv;

      if (fh->type != V4L2_BUF_TYPE_VIDEO_CAPTURE)
            return -EINVAL;
      if (i != fh->type)
            return -EINVAL;

      return videobuf_streamoff(&fh->vb_vidq);
}

static int vidioc_s_std (struct file *file, void *priv, v4l2_std_id *i)
{
      return 0;
}

/* only one input in this sample driver */
static int vidioc_enum_input (struct file *file, void *priv,
                        struct v4l2_input *inp)
{
      if (inp->index != 0)
            return -EINVAL;

      inp->type = V4L2_INPUT_TYPE_CAMERA;
      inp->std = V4L2_STD_NTSC_M;
      strcpy(inp->name,"Camera");

      return (0);
}

static int vidioc_g_input (struct file *file, void *priv, unsigned int *i)
{
      *i = 0;

      return (0);
}
static int vidioc_s_input (struct file *file, void *priv, unsigned int i)
{
      if (i > 0)
            return -EINVAL;

      return (0);
}

      /* --- controls ---------------------------------------------- */
static int vidioc_queryctrl (struct file *file, void *priv,
                        struct v4l2_queryctrl *qc)
{
      int i;

      for (i = 0; i < ARRAY_SIZE(vivi_qctrl); i++)
            if (qc->id && qc->id == vivi_qctrl[i].id) {
                  memcpy(qc, &(vivi_qctrl[i]),
                        sizeof(*qc));
                  return (0);
            }

      return -EINVAL;
}

static int vidioc_g_ctrl (struct file *file, void *priv,
                        struct v4l2_control *ctrl)
{
      int i;

      for (i = 0; i < ARRAY_SIZE(vivi_qctrl); i++)
            if (ctrl->id == vivi_qctrl[i].id) {
                  ctrl->value=qctl_regs[i];
                  return (0);
            }

      return -EINVAL;
}
static int vidioc_s_ctrl (struct file *file, void *priv,
                        struct v4l2_control *ctrl)
{
      int i;

      for (i = 0; i < ARRAY_SIZE(vivi_qctrl); i++)
            if (ctrl->id == vivi_qctrl[i].id) {
                  if (ctrl->value <
                        vivi_qctrl[i].minimum
                        || ctrl->value >
                        vivi_qctrl[i].maximum) {
                              return (-ERANGE);
                        }
                  qctl_regs[i]=ctrl->value;
                  return (0);
            }
      return -EINVAL;
}

/* ------------------------------------------------------------------
      File operations for the device
   ------------------------------------------------------------------*/

#define line_buf_size(norm) (norm_maxw(norm)*(format.depth+7)/8)

static int vivi_open(struct inode *inode, struct file *file)
{
      int minor = iminor(inode);
      struct vivi_dev *dev;
      struct vivi_fh *fh;
      int i;

      printk(KERN_DEBUG "vivi: open called (minor=%d)\n",minor);

      list_for_each_entry(dev, &vivi_devlist, vivi_devlist)
            if (dev->vfd.minor == minor)
                  goto found;
      return -ENODEV;
found:



      /* If more than one user, mutex should be added */
      dev->users++;

      dprintk(1, "open minor=%d type=%s users=%d\n", minor,
            v4l2_type_names[V4L2_BUF_TYPE_VIDEO_CAPTURE], dev->users);

      /* allocate + initialize per filehandle data */
      fh = kzalloc(sizeof(*fh),GFP_KERNEL);
      if (NULL == fh) {
            dev->users--;
            return -ENOMEM;
      }

      file->private_data = fh;
      fh->dev      = dev;

      fh->type     = V4L2_BUF_TYPE_VIDEO_CAPTURE;
      fh->fmt      = &format;
      fh->width    = 640;
      fh->height   = 480;

      /* Put all controls at a sane state */
      for (i = 0; i < ARRAY_SIZE(vivi_qctrl); i++)
            qctl_regs[i] =vivi_qctrl[i].default_value;

      dprintk(1,"Open: fh=0x%08lx, dev=0x%08lx, dev->vidq=0x%08lx\n",
            (unsigned long)fh,(unsigned long)dev,(unsigned long)&dev->vidq);
      dprintk(1,"Open: list_empty queued=%d\n",list_empty(&dev->vidq.queued));
      dprintk(1,"Open: list_empty active=%d\n",list_empty(&dev->vidq.active));

      /* Resets frame counters */
      dev->h=0;
      dev->m=0;
      dev->s=0;
      dev->us=0;
      dev->jiffies=jiffies;
      sprintf(dev->timestr,"%02d:%02d:%02d:%03d",
                  dev->h,dev->m,dev->s,(dev->us+500)/1000);

      videobuf_queue_vmalloc_init(&fh->vb_vidq, &vivi_video_qops,
                  NULL, NULL,
                  fh->type,
                  V4L2_FIELD_INTERLACED,
                  sizeof(struct vivi_buffer),fh);

      return 0;
}

static ssize_t
vivi_read(struct file *file, char __user *data, size_t count, loff_t *ppos)
{
      struct vivi_fh        *fh = file->private_data;

      if (fh->type==V4L2_BUF_TYPE_VIDEO_CAPTURE) {
            return videobuf_read_stream(&fh->vb_vidq, data, count, ppos, 0,
                              file->f_flags & O_NONBLOCK);
      }
      return 0;
}

static unsigned int
vivi_poll(struct file *file, struct poll_table_struct *wait)
{
      struct vivi_fh        *fh = file->private_data;
      struct videobuf_queue *q = &fh->vb_vidq;

      dprintk(1,"%s\n",__FUNCTION__);

      if (V4L2_BUF_TYPE_VIDEO_CAPTURE != fh->type)
            return POLLERR;

      return videobuf_poll_stream(file, q, wait);
}

static int vivi_release(struct inode *inode, struct file *file)
{
      struct vivi_fh         *fh = file->private_data;
      struct vivi_dev *dev       = fh->dev;
      struct vivi_dmaqueue *vidq = &dev->vidq;

      int minor = iminor(inode);

      vivi_stop_thread(vidq);
      videobuf_stop(&fh->vb_vidq);
      videobuf_mmap_free(&fh->vb_vidq);

      kfree (fh);

      dev->users--;

      printk(KERN_DEBUG "vivi: close called (minor=%d, users=%d)\n",minor,dev->users);

      return 0;
}

static int
vivi_mmap(struct file *file, struct vm_area_struct * vma)
{
      struct vivi_fh        *fh = file->private_data;
      int ret;

      dprintk (1,"mmap called, vma=0x%08lx\n",(unsigned long)vma);

      ret=videobuf_mmap_mapper(&fh->vb_vidq, vma);

      dprintk (1,"vma start=0x%08lx, size=%ld, ret=%d\n",
            (unsigned long)vma->vm_start,
            (unsigned long)vma->vm_end-(unsigned long)vma->vm_start,
            ret);

      return ret;
}

static const struct file_operations vivi_fops = {
      .owner            = THIS_MODULE,
      .open           = vivi_open,
      .release        = vivi_release,
      .read           = vivi_read,
      .poll       = vivi_poll,
      .ioctl          = video_ioctl2, /* V4L2 ioctl handler */
      .mmap           = vivi_mmap,
      .llseek         = no_llseek,
};

static struct video_device vivi = {
      .name       = "vivi",
      .type       = VID_TYPE_CAPTURE,
      .fops           = &vivi_fops,
      .minor            = -1,
//    .release    = video_device_release,

      .vidioc_querycap      = vidioc_querycap,
      .vidioc_enum_fmt_cap  = vidioc_enum_fmt_cap,
      .vidioc_g_fmt_cap     = vidioc_g_fmt_cap,
      .vidioc_try_fmt_cap   = vidioc_try_fmt_cap,
      .vidioc_s_fmt_cap     = vidioc_s_fmt_cap,
      .vidioc_reqbufs       = vidioc_reqbufs,
      .vidioc_querybuf      = vidioc_querybuf,
      .vidioc_qbuf          = vidioc_qbuf,
      .vidioc_dqbuf         = vidioc_dqbuf,
      .vidioc_s_std         = vidioc_s_std,
      .vidioc_enum_input    = vidioc_enum_input,
      .vidioc_g_input       = vidioc_g_input,
      .vidioc_s_input       = vidioc_s_input,
      .vidioc_queryctrl     = vidioc_queryctrl,
      .vidioc_g_ctrl        = vidioc_g_ctrl,
      .vidioc_s_ctrl        = vidioc_s_ctrl,
      .vidioc_streamon      = vidioc_streamon,
      .vidioc_streamoff     = vidioc_streamoff,
#ifdef CONFIG_VIDEO_V4L1_COMPAT
      .vidiocgmbuf          = vidiocgmbuf,
#endif
      .tvnorms              = V4L2_STD_NTSC_M,
      .current_norm         = V4L2_STD_NTSC_M,
};
/* -----------------------------------------------------------------
      Initialization and module stuff
   ------------------------------------------------------------------*/

static int __init vivi_init(void)
{
      int ret;
      struct vivi_dev *dev;

      dev = kzalloc(sizeof(*dev),GFP_KERNEL);
      if (NULL == dev)
            return -ENOMEM;
      list_add_tail(&dev->vivi_devlist,&vivi_devlist);

      /* init video dma queues */
      INIT_LIST_HEAD(&dev->vidq.active);
      INIT_LIST_HEAD(&dev->vidq.queued);
      init_waitqueue_head(&dev->vidq.wq);

      /* initialize locks */
      mutex_init(&dev->lock);

      dev->vidq.timeout.function = vivi_vid_timeout;
      dev->vidq.timeout.data     = (unsigned long)dev;
      init_timer(&dev->vidq.timeout);

      ret = video_register_device(&vivi, VFL_TYPE_GRABBER, video_nr);
      printk(KERN_INFO "Video Technology Magazine Virtual Video Capture Board (Load status: %d)\n", ret);
      return ret;
}

static void __exit vivi_exit(void)
{
      struct vivi_dev *h;
      struct list_head *list;

      while (!list_empty(&vivi_devlist)) {
            list = vivi_devlist.next;
            list_del(list);
            h = list_entry(list, struct vivi_dev, vivi_devlist);
            kfree (h);
      }
      video_unregister_device(&vivi);
}

module_init(vivi_init);
module_exit(vivi_exit);

MODULE_DESCRIPTION("Video Technology Magazine Virtual Video Capture Board");
MODULE_AUTHOR("Mauro Carvalho Chehab, Ted Walther and John Sokol");
MODULE_LICENSE("Dual BSD/GPL");

module_param(video_nr, int, 0);

module_param_named(debug,vivi.debug, int, 0644);
MODULE_PARM_DESC(debug,"activates debug info");

module_param(vid_limit,int,0644);
MODULE_PARM_DESC(vid_limit,"capture memory limit in megabytes");


Generated by  Doxygen 1.6.0   Back to index