/*
 * Sunplus spca561 subdriver
 *
 * Copyright (C) 2004 Michel Xhaard mxhaard@magic.fr
 *
 * V4L2 by Jean-Francois Moine <http://moinejf.free.fr>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
 */

#define MODULE_NAME "spca561"

#include <linux/input.h>
#include "gspca.h"

MODULE_AUTHOR("Michel Xhaard <mxhaard@users.sourceforge.net>");
MODULE_DESCRIPTION("GSPCA/SPCA561 USB Camera Driver");
MODULE_LICENSE("GPL");

/* specific webcam descriptor */
struct sd {
        struct gspca_dev gspca_dev;     /* !! must be the first item */

        __u16 exposure;                 /* rev12a only */
#define EXPOSURE_MIN 1
#define EXPOSURE_DEF 700                /* == 10 fps */
#define EXPOSURE_MAX (2047 + 325)       /* see setexposure */

        __u8 contrast;                  /* rev72a only */
#define CONTRAST_MIN 0x00
#define CONTRAST_DEF 0x20
#define CONTRAST_MAX 0x3f

        __u8 brightness;                /* rev72a only */
#define BRIGHTNESS_MIN 0
#define BRIGHTNESS_DEF 0x20
#define BRIGHTNESS_MAX 0x3f

        __u8 white;
#define HUE_MIN 1
#define HUE_DEF 0x40
#define HUE_MAX 0x7f

        __u8 autogain;
#define AUTOGAIN_MIN 0
#define AUTOGAIN_DEF 1
#define AUTOGAIN_MAX 1

        __u8 gain;                      /* rev12a only */
#define GAIN_MIN 0
#define GAIN_DEF 63
#define GAIN_MAX 255

#define EXPO12A_DEF 3
        __u8 expo12a;           /* expo/gain? for rev 12a */

        __u8 chip_revision;
#define Rev012A 0
#define Rev072A 1

        signed char ag_cnt;
#define AG_CNT_START 13
};

static const struct v4l2_pix_format sif_012a_mode[] = {
        {160, 120, V4L2_PIX_FMT_SGBRG8, V4L2_FIELD_NONE,
                .bytesperline = 160,
                .sizeimage = 160 * 120,
                .colorspace = V4L2_COLORSPACE_SRGB,
                .priv = 3},
        {176, 144, V4L2_PIX_FMT_SGBRG8, V4L2_FIELD_NONE,
                .bytesperline = 176,
                .sizeimage = 176 * 144,
                .colorspace = V4L2_COLORSPACE_SRGB,
                .priv = 2},
        {320, 240, V4L2_PIX_FMT_SPCA561, V4L2_FIELD_NONE,
                .bytesperline = 320,
                .sizeimage = 320 * 240 * 4 / 8,
                .colorspace = V4L2_COLORSPACE_SRGB,
                .priv = 1},
        {352, 288, V4L2_PIX_FMT_SPCA561, V4L2_FIELD_NONE,
                .bytesperline = 352,
                .sizeimage = 352 * 288 * 4 / 8,
                .colorspace = V4L2_COLORSPACE_SRGB,
                .priv = 0},
};

static const struct v4l2_pix_format sif_072a_mode[] = {
        {160, 120, V4L2_PIX_FMT_SGBRG8, V4L2_FIELD_NONE,
                .bytesperline = 160,
                .sizeimage = 160 * 120,
                .colorspace = V4L2_COLORSPACE_SRGB,
                .priv = 3},
        {176, 144, V4L2_PIX_FMT_SGBRG8, V4L2_FIELD_NONE,
                .bytesperline = 176,
                .sizeimage = 176 * 144,
                .colorspace = V4L2_COLORSPACE_SRGB,
                .priv = 2},
        {320, 240, V4L2_PIX_FMT_SGBRG8, V4L2_FIELD_NONE,
                .bytesperline = 320,
                .sizeimage = 320 * 240,
                .colorspace = V4L2_COLORSPACE_SRGB,
                .priv = 1},
        {352, 288, V4L2_PIX_FMT_SGBRG8, V4L2_FIELD_NONE,
                .bytesperline = 352,
                .sizeimage = 352 * 288,
                .colorspace = V4L2_COLORSPACE_SRGB,
                .priv = 0},
};

/*
 * Initialization data
 * I'm not very sure how to split initialization from open data
 * chunks. For now, we'll consider everything as initialization
 */
/* Frame packet header offsets for the spca561 */
#define SPCA561_OFFSET_SNAP 1
#define SPCA561_OFFSET_TYPE 2
#define SPCA561_OFFSET_COMPRESS 3
#define SPCA561_OFFSET_FRAMSEQ   4
#define SPCA561_OFFSET_GPIO 5
#define SPCA561_OFFSET_USBBUFF 6
#define SPCA561_OFFSET_WIN2GRAVE 7
#define SPCA561_OFFSET_WIN2RAVE 8
#define SPCA561_OFFSET_WIN2BAVE 9
#define SPCA561_OFFSET_WIN2GBAVE 10
#define SPCA561_OFFSET_WIN1GRAVE 11
#define SPCA561_OFFSET_WIN1RAVE 12
#define SPCA561_OFFSET_WIN1BAVE 13
#define SPCA561_OFFSET_WIN1GBAVE 14
#define SPCA561_OFFSET_FREQ 15
#define SPCA561_OFFSET_VSYNC 16
#define SPCA561_INDEX_I2C_BASE 0x8800
#define SPCA561_SNAPBIT 0x20
#define SPCA561_SNAPCTRL 0x40

static const u16 rev72a_reset[][2] = {
        {0x0000, 0x8114},       /* Software GPIO output data */
        {0x0001, 0x8114},       /* Software GPIO output data */
        {0x0000, 0x8112},       /* Some kind of reset */
        {}
};
static const __u16 rev72a_init_data1[][2] = {
        {0x0003, 0x8701},       /* PCLK clock delay adjustment */
        {0x0001, 0x8703},       /* HSYNC from cmos inverted */
        {0x0011, 0x8118},       /* Enable and conf sensor */
        {0x0001, 0x8118},       /* Conf sensor */
        {0x0092, 0x8804},       /* I know nothing about these */
        {0x0010, 0x8802},       /* 0x88xx registers, so I won't */
        {}
};
static const u16 rev72a_init_sensor1[][2] = {
        {0x0001, 0x000d},
        {0x0002, 0x0018},
        {0x0004, 0x0165},
        {0x0005, 0x0021},
        {0x0007, 0x00aa},
        {0x0020, 0x1504},
        {0x0039, 0x0002},
        {0x0035, 0x0010},
        {0x0009, 0x1049},
        {0x0028, 0x000b},
        {0x003b, 0x000f},
        {0x003c, 0x0000},
        {}
};
static const __u16 rev72a_init_data2[][2] = {
        {0x0018, 0x8601},       /* Pixel/line selection for color separation */
        {0x0000, 0x8602},       /* Optical black level for user setting */
        {0x0060, 0x8604},       /* Optical black horizontal offset */
        {0x0002, 0x8605},       /* Optical black vertical offset */
        {0x0000, 0x8603},       /* Non-automatic optical black level */
        {0x0002, 0x865b},       /* Horizontal offset for valid pixels */
        {0x0000, 0x865f},       /* Vertical valid pixels window (x2) */
        {0x00b0, 0x865d},       /* Horizontal valid pixels window (x2) */
        {0x0090, 0x865e},       /* Vertical valid lines window (x2) */
        {0x00e0, 0x8406},       /* Memory buffer threshold */
        {0x0000, 0x8660},       /* Compensation memory stuff */
        {0x0002, 0x8201},       /* Output address for r/w serial EEPROM */
        {0x0008, 0x8200},       /* Clear valid bit for serial EEPROM */
        {0x0001, 0x8200},       /* OprMode to be executed by hardware */
/* from ms-win */
        {0x0000, 0x8611},       /* R offset for white balance */
        {0x00fd, 0x8612},       /* Gr offset for white balance */
        {0x0003, 0x8613},       /* B offset for white balance */
        {0x0000, 0x8614},       /* Gb offset for white balance */
/* from ms-win */
        {0x0035, 0x8651},       /* R gain for white balance */
        {0x0040, 0x8652},       /* Gr gain for white balance */
        {0x005f, 0x8653},       /* B gain for white balance */
        {0x0040, 0x8654},       /* Gb gain for white balance */
        {0x0002, 0x8502},       /* Maximum average bit rate stuff */
        {0x0011, 0x8802},

        {0x0087, 0x8700},       /* Set master clock (96Mhz????) */
        {0x0081, 0x8702},       /* Master clock output enable */

        {0x0000, 0x8500},       /* Set image type (352x288 no compression) */
        /* Originally was 0x0010 (352x288 compression) */

        {0x0002, 0x865b},       /* Horizontal offset for valid pixels */
        {0x0003, 0x865c},       /* Vertical offset for valid lines */
        {}
};
static const u16 rev72a_init_sensor2[][2] = {
        {0x0003, 0x0121},
        {0x0004, 0x0165},
        {0x0005, 0x002f},       /* blanking control column */
        {0x0006, 0x0000},       /* blanking mode row*/
        {0x000a, 0x0002},
        {0x0009, 0x1061},       /* setexposure times && pixel clock
                                 * 0001 0 | 000 0110 0001 */
        {0x0035, 0x0014},
        {}
};

/******************** QC Express etch2 stuff ********************/
static const __u16 Pb100_1map8300[][2] = {
        /* reg, value */
        {0x8320, 0x3304},

        {0x8303, 0x0125},       /* image area */
        {0x8304, 0x0169},
        {0x8328, 0x000b},
        {0x833c, 0x0001},               /*fixme: win:07*/

        {0x832f, 0x1904},               /*fixme: was 0419*/
        {0x8307, 0x00aa},
        {0x8301, 0x0003},
        {0x8302, 0x000e},
        {}
};
static const __u16 Pb100_2map8300[][2] = {
        /* reg, value */
        {0x8339, 0x0000},
        {0x8307, 0x00aa},
        {}
};

static const __u16 spca561_161rev12A_data1[][2] = {
        {0x29, 0x8118},         /* Control register (various enable bits) */
        {0x08, 0x8114},         /* GPIO: Led off */
        {0x0e, 0x8112},         /* 0x0e stream off 0x3e stream on */
        {0x00, 0x8102},         /* white balance - new */
        {0x92, 0x8804},
        {0x04, 0x8802},         /* windows uses 08 */
        {}
};
static const __u16 spca561_161rev12A_data2[][2] = {
        {0x21, 0x8118},
        {0x10, 0x8500},
        {0x07, 0x8601},
        {0x07, 0x8602},
        {0x04, 0x8501},

        {0x07, 0x8201},         /* windows uses 02 */
        {0x08, 0x8200},
        {0x01, 0x8200},

        {0x90, 0x8604},
        {0x00, 0x8605},
        {0xb0, 0x8603},

        /* sensor gains */
        {0x07, 0x8601},         /* white balance - new */
        {0x07, 0x8602},         /* white balance - new */
        {0x00, 0x8610},         /* *red */
        {0x00, 0x8611},         /* 3f   *green */
        {0x00, 0x8612},         /* green *blue */
        {0x00, 0x8613},         /* blue *green */
        {0x43, 0x8614},         /* green *red - white balance - was 0x35 */
        {0x40, 0x8615},         /* 40   *green - white balance - was 0x35 */
        {0x71, 0x8616},         /* 7a   *blue - white balance - was 0x35 */
        {0x40, 0x8617},         /* 40   *green - white balance - was 0x35 */

        {0x0c, 0x8620},         /* 0c */
        {0xc8, 0x8631},         /* c8 */
        {0xc8, 0x8634},         /* c8 */
        {0x23, 0x8635},         /* 23 */
        {0x1f, 0x8636},         /* 1f */
        {0xdd, 0x8637},         /* dd */
        {0xe1, 0x8638},         /* e1 */
        {0x1d, 0x8639},         /* 1d */
        {0x21, 0x863a},         /* 21 */
        {0xe3, 0x863b},         /* e3 */
        {0xdf, 0x863c},         /* df */
        {0xf0, 0x8505},
        {0x32, 0x850a},
/*      {0x99, 0x8700},          * - white balance - new (removed) */
        /* HDG we used to do this in stop0, making the init state and the state
           after a start / stop different, so do this here instead. */
        {0x29, 0x8118},
        {}
};

static void reg_w_val(struct usb_device *dev, __u16 index, __u8 value)
{
        int ret;

        ret = usb_control_msg(dev, usb_sndctrlpipe(dev, 0),
                              0,                /* request */
                              USB_DIR_OUT | USB_TYPE_VENDOR | USB_RECIP_DEVICE,
                              value, index, NULL, 0, 500);
        PDEBUG(D_USBO, "reg write: 0x%02x:0x%02x", index, value);
        if (ret < 0)
                err("reg write: error %d", ret);
}

static void write_vector(struct gspca_dev *gspca_dev,
                        const __u16 data[][2])
{
        struct usb_device *dev = gspca_dev->dev;
        int i;

        i = 0;
        while (data[i][1] != 0) {
                reg_w_val(dev, data[i][1], data[i][0]);
                i++;
        }
}

/* read 'len' bytes to gspca_dev->usb_buf */
static void reg_r(struct gspca_dev *gspca_dev,
                  __u16 index, __u16 length)
{
        usb_control_msg(gspca_dev->dev,
                        usb_rcvctrlpipe(gspca_dev->dev, 0),
                        0,                      /* request */
                        USB_DIR_IN | USB_TYPE_VENDOR | USB_RECIP_DEVICE,
                        0,                      /* value */
                        index, gspca_dev->usb_buf, length, 500);
}

/* write 'len' bytes from gspca_dev->usb_buf */
static void reg_w_buf(struct gspca_dev *gspca_dev,
                      __u16 index, __u16 len)
{
        usb_control_msg(gspca_dev->dev,
                        usb_sndctrlpipe(gspca_dev->dev, 0),
                        0,                      /* request */
                        USB_DIR_OUT | USB_TYPE_VENDOR | USB_RECIP_DEVICE,
                        0,                      /* value */
                        index, gspca_dev->usb_buf, len, 500);
}

static void i2c_write(struct gspca_dev *gspca_dev, __u16 value, __u16 reg)
{
        int retry = 60;

        reg_w_val(gspca_dev->dev, 0x8801, reg);
        reg_w_val(gspca_dev->dev, 0x8805, value);
        reg_w_val(gspca_dev->dev, 0x8800, value >> 8);
        do {
                reg_r(gspca_dev, 0x8803, 1);
                if (!gspca_dev->usb_buf[0])
                        return;
                msleep(10);
        } while (--retry);
}

static int i2c_read(struct gspca_dev *gspca_dev, __u16 reg, __u8 mode)
{
        int retry = 60;
        __u8 value;

        reg_w_val(gspca_dev->dev, 0x8804, 0x92);
        reg_w_val(gspca_dev->dev, 0x8801, reg);
        reg_w_val(gspca_dev->dev, 0x8802, mode | 0x01);
        do {
                reg_r(gspca_dev, 0x8803, 1);
                if (!gspca_dev->usb_buf[0]) {
                        reg_r(gspca_dev, 0x8800, 1);
                        value = gspca_dev->usb_buf[0];
                        reg_r(gspca_dev, 0x8805, 1);
                        return ((int) value << 8) | gspca_dev->usb_buf[0];
                }
                msleep(10);
        } while (--retry);
        return -1;
}

static void sensor_mapwrite(struct gspca_dev *gspca_dev,
                            const __u16 (*sensormap)[2])
{
        while ((*sensormap)[0]) {
                gspca_dev->usb_buf[0] = (*sensormap)[1];
                gspca_dev->usb_buf[1] = (*sensormap)[1] >> 8;
                reg_w_buf(gspca_dev, (*sensormap)[0], 2);
                sensormap++;
        }
}

static void write_sensor_72a(struct gspca_dev *gspca_dev,
                            const __u16 (*sensor)[2])
{
        while ((*sensor)[0]) {
                i2c_write(gspca_dev, (*sensor)[1], (*sensor)[0]);
                sensor++;
        }
}

static void init_161rev12A(struct gspca_dev *gspca_dev)
{
        write_vector(gspca_dev, spca561_161rev12A_data1);
        sensor_mapwrite(gspca_dev, Pb100_1map8300);
/*fixme: should be in sd_start*/
        write_vector(gspca_dev, spca561_161rev12A_data2);
        sensor_mapwrite(gspca_dev, Pb100_2map8300);
}

/* this function is called at probe time */
static int sd_config(struct gspca_dev *gspca_dev,
                     const struct usb_device_id *id)
{
        struct sd *sd = (struct sd *) gspca_dev;
        struct cam *cam;
        __u16 vendor, product;
        __u8 data1, data2;

        /* Read frm global register the USB product and vendor IDs, just to
         * prove that we can communicate with the device.  This works, which
         * confirms at we are communicating properly and that the device
         * is a 561. */
        reg_r(gspca_dev, 0x8104, 1);
        data1 = gspca_dev->usb_buf[0];
        reg_r(gspca_dev, 0x8105, 1);
        data2 = gspca_dev->usb_buf[0];
        vendor = (data2 << 8) | data1;
        reg_r(gspca_dev, 0x8106, 1);
        data1 = gspca_dev->usb_buf[0];
        reg_r(gspca_dev, 0x8107, 1);
        data2 = gspca_dev->usb_buf[0];
        product = (data2 << 8) | data1;
        if (vendor != id->idVendor || product != id->idProduct) {
                PDEBUG(D_PROBE, "Bad vendor / product from device");
                return -EINVAL;
        }

        cam = &gspca_dev->cam;
        gspca_dev->nbalt = 7 + 1;       /* choose alternate 7 first */

        sd->chip_revision = id->driver_info;
        if (sd->chip_revision == Rev012A) {
                cam->cam_mode = sif_012a_mode;
                cam->nmodes = ARRAY_SIZE(sif_012a_mode);
        } else {
                cam->cam_mode = sif_072a_mode;
                cam->nmodes = ARRAY_SIZE(sif_072a_mode);
        }
        sd->brightness = BRIGHTNESS_DEF;
        sd->contrast = CONTRAST_DEF;
        sd->white = HUE_DEF;
        sd->exposure = EXPOSURE_DEF;
        sd->autogain = AUTOGAIN_DEF;
        sd->gain = GAIN_DEF;
        sd->expo12a = EXPO12A_DEF;
        return 0;
}

/* this function is called at probe and resume time */
static int sd_init_12a(struct gspca_dev *gspca_dev)
{
        PDEBUG(D_STREAM, "Chip revision: 012a");
        init_161rev12A(gspca_dev);
        return 0;
}
static int sd_init_72a(struct gspca_dev *gspca_dev)
{
        PDEBUG(D_STREAM, "Chip revision: 072a");
        write_vector(gspca_dev, rev72a_reset);
        msleep(200);
        write_vector(gspca_dev, rev72a_init_data1);
        write_sensor_72a(gspca_dev, rev72a_init_sensor1);
        write_vector(gspca_dev, rev72a_init_data2);
        write_sensor_72a(gspca_dev, rev72a_init_sensor2);
        reg_w_val(gspca_dev->dev, 0x8112, 0x30);
        return 0;
}

/* rev 72a only */
static void setbrightness(struct gspca_dev *gspca_dev)
{
        struct sd *sd = (struct sd *) gspca_dev;
        struct usb_device *dev = gspca_dev->dev;
        __u8 value;

        value = sd->brightness;

        /* offsets for white balance */
        reg_w_val(dev, 0x8611, value);          /* R */
        reg_w_val(dev, 0x8612, value);          /* Gr */
        reg_w_val(dev, 0x8613, value);          /* B */
        reg_w_val(dev, 0x8614, value);          /* Gb */
}

static void setwhite(struct gspca_dev *gspca_dev)
{
        struct sd *sd = (struct sd *) gspca_dev;
        __u16 white;
        __u8 blue, red;
        __u16 reg;

        /* try to emulate MS-win as possible */
        white = sd->white;
        red = 0x20 + white * 3 / 8;
        blue = 0x90 - white * 5 / 8;
        if (sd->chip_revision == Rev012A) {
                reg = 0x8614;
        } else {
                reg = 0x8651;
                red += sd->contrast - 0x20;
                blue += sd->contrast - 0x20;
        }
        reg_w_val(gspca_dev->dev, reg, red);
        reg_w_val(gspca_dev->dev, reg + 2, blue);
}

static void setcontrast(struct gspca_dev *gspca_dev)
{
        struct sd *sd = (struct sd *) gspca_dev;
        struct usb_device *dev = gspca_dev->dev;
        __u8 value;

        if (sd->chip_revision != Rev072A)
                return;
        value = sd->contrast + 0x20;

        /* gains for white balance */
        setwhite(gspca_dev);
/*      reg_w_val(dev, 0x8651, value);           * R - done by setwhite */
        reg_w_val(dev, 0x8652, value);          /* Gr */
/*      reg_w_val(dev, 0x8653, value);           * B - done by setwhite */
        reg_w_val(dev, 0x8654, value);          /* Gb */
}

/* rev 12a only */
static void setexposure(struct gspca_dev *gspca_dev)
{
        struct sd *sd = (struct sd *) gspca_dev;
        int i, expo = 0;

        /* Register 0x8309 controls exposure for the spca561,
           the basic exposure setting goes from 1-2047, where 1 is completely
           dark and 2047 is very bright. It not only influences exposure but
           also the framerate (to allow for longer exposure) from 1 - 300 it
           only raises the exposure time then from 300 - 600 it halves the
           framerate to be able to further raise the exposure time and for every
           300 more it halves the framerate again. This allows for a maximum
           exposure time of circa 0.2 - 0.25 seconds (30 / (2000/3000) fps).
           Sometimes this is not enough, the 1-2047 uses bits 0-10, bits 11-12
           configure a divider for the base framerate which us used at the
           exposure setting of 1-300. These bits configure the base framerate
           according to the following formula: fps = 60 / (value + 2) */

        /* We choose to use the high bits setting the fixed framerate divisor
           asap, as setting high basic exposure setting without the fixed
           divider in combination with high gains makes the cam stop */
        int table[] =  { 0, 450, 550, 625, EXPOSURE_MAX };

        for (i = 0; i < ARRAY_SIZE(table) - 1; i++) {
                if (sd->exposure <= table[i + 1]) {
                        expo  = sd->exposure - table[i];
                        if (i)
                                expo += 300;
                        expo |= i << 11;
                        break;
                }
        }

        gspca_dev->usb_buf[0] = expo;
        gspca_dev->usb_buf[1] = expo >> 8;
        reg_w_buf(gspca_dev, 0x8309, 2);
}

/* rev 12a only */
static void setgain(struct gspca_dev *gspca_dev)
{
        struct sd *sd = (struct sd *) gspca_dev;

        /* gain reg low 6 bits  0-63 gain, bit 6 and 7, both double the
           sensitivity when set, so 31 + one of them set == 63, and 15
           with both of them set == 63 */
        if (sd->gain < 64)
                gspca_dev->usb_buf[0] = sd->gain;
        else if (sd->gain < 128)
                gspca_dev->usb_buf[0] = (sd->gain / 2) | 0x40;
        else
                gspca_dev->usb_buf[0] = (sd->gain / 4) | 0xc0;

        gspca_dev->usb_buf[1] = 0;
        reg_w_buf(gspca_dev, 0x8335, 2);
}

static void setautogain(struct gspca_dev *gspca_dev)
{
        struct sd *sd = (struct sd *) gspca_dev;

        if (sd->autogain)
                sd->ag_cnt = AG_CNT_START;
        else
                sd->ag_cnt = -1;
}

static int sd_start_12a(struct gspca_dev *gspca_dev)
{
        struct usb_device *dev = gspca_dev->dev;
        int mode;
        static const __u8 Reg8391[8] =
                {0x92, 0x30, 0x20, 0x00, 0x0c, 0x00, 0x00, 0x00};

        mode = gspca_dev->cam.cam_mode[(int) gspca_dev->curr_mode].priv;
        if (mode <= 1) {
                /* Use compression on 320x240 and above */
                reg_w_val(dev, 0x8500, 0x10 | mode);
        } else {
                /* I couldn't get the compression to work below 320x240
                 * Fortunately at these resolutions the bandwidth
                 * is sufficient to push raw frames at ~20fps */
                reg_w_val(dev, 0x8500, mode);
        }               /* -- qq@kuku.eu.org */

        gspca_dev->usb_buf[0] = 0xaa;
        gspca_dev->usb_buf[1] = 0x00;
        reg_w_buf(gspca_dev, 0x8307, 2);
        /* clock - lower 0x8X values lead to fps > 30 */
        reg_w_val(gspca_dev->dev, 0x8700, 0x8a);
                                        /* 0x8f 0x85 0x27 clock */
        reg_w_val(gspca_dev->dev, 0x8112, 0x1e | 0x20);
        reg_w_val(gspca_dev->dev, 0x850b, 0x03);
        memcpy(gspca_dev->usb_buf, Reg8391, 8);
        reg_w_buf(gspca_dev, 0x8391, 8);
        reg_w_buf(gspca_dev, 0x8390, 8);
        setwhite(gspca_dev);
        setgain(gspca_dev);
        setexposure(gspca_dev);

        /* Led ON (bit 3 -> 0 */
        reg_w_val(gspca_dev->dev, 0x8114, 0x00);
        return 0;
}
static int sd_start_72a(struct gspca_dev *gspca_dev)
{
        struct usb_device *dev = gspca_dev->dev;
        int Clck;
        int mode;

        write_vector(gspca_dev, rev72a_reset);
        msleep(200);
        write_vector(gspca_dev, rev72a_init_data1);
        write_sensor_72a(gspca_dev, rev72a_init_sensor1);

        mode = gspca_dev->cam.cam_mode[(int) gspca_dev->curr_mode].priv;
        switch (mode) {
        default:
        case 0:
                Clck = 0x27;            /* ms-win 0x87 */
                break;
        case 1:
                Clck = 0x25;
                break;
        case 2:
                Clck = 0x22;
                break;
        case 3:
                Clck = 0x21;
                break;
        }
        reg_w_val(dev, 0x8700, Clck);   /* 0x27 clock */
        reg_w_val(dev, 0x8702, 0x81);
        reg_w_val(dev, 0x8500, mode);   /* mode */
        write_sensor_72a(gspca_dev, rev72a_init_sensor2);
        setcontrast(gspca_dev);
/*      setbrightness(gspca_dev);        * fixme: bad values */
        setautogain(gspca_dev);
        reg_w_val(dev, 0x8112, 0x10 | 0x20);
        return 0;
}

static void sd_stopN(struct gspca_dev *gspca_dev)
{
        struct sd *sd = (struct sd *) gspca_dev;

        if (sd->chip_revision == Rev012A) {
                reg_w_val(gspca_dev->dev, 0x8112, 0x0e);
                /* Led Off (bit 3 -> 1 */
                reg_w_val(gspca_dev->dev, 0x8114, 0x08);
        } else {
                reg_w_val(gspca_dev->dev, 0x8112, 0x20);
/*              reg_w_val(gspca_dev->dev, 0x8102, 0x00); ?? */
        }
}

static void do_autogain(struct gspca_dev *gspca_dev)
{
        struct sd *sd = (struct sd *) gspca_dev;
        int expotimes;
        int pixelclk;
        int gainG;
        __u8 R, Gr, Gb, B;
        int y;
        __u8 luma_mean = 110;
        __u8 luma_delta = 20;
        __u8 spring = 4;

        if (sd->ag_cnt < 0)
                return;
        if (--sd->ag_cnt >= 0)
                return;
        sd->ag_cnt = AG_CNT_START;

        switch (sd->chip_revision) {
        case Rev072A:
                reg_r(gspca_dev, 0x8621, 1);
                Gr = gspca_dev->usb_buf[0];
                reg_r(gspca_dev, 0x8622, 1);
                R = gspca_dev->usb_buf[0];
                reg_r(gspca_dev, 0x8623, 1);
                B = gspca_dev->usb_buf[0];
                reg_r(gspca_dev, 0x8624, 1);
                Gb = gspca_dev->usb_buf[0];
                y = (77 * R + 75 * (Gr + Gb) + 29 * B) >> 8;
                /* u= (128*B-(43*(Gr+Gb+R))) >> 8; */
                /* v= (128*R-(53*(Gr+Gb))-21*B) >> 8; */
                /* PDEBUG(D_CONF,"reading Y %d U %d V %d ",y,u,v); */

                if (y < luma_mean - luma_delta ||
                    y > luma_mean + luma_delta) {
                        expotimes = i2c_read(gspca_dev, 0x09, 0x10);
                        pixelclk = 0x0800;
                        expotimes = expotimes & 0x07ff;
                        /* PDEBUG(D_PACK,
                                "Exposition Times 0x%03X Clock 0x%04X ",
                                expotimes,pixelclk); */
                        gainG = i2c_read(gspca_dev, 0x35, 0x10);
                        /* PDEBUG(D_PACK,
                                "reading Gain register %d", gainG); */

                        expotimes += (luma_mean - y) >> spring;
                        gainG += (luma_mean - y) / 50;
                        /* PDEBUG(D_PACK,
                                "compute expotimes %d gain %d",
                                expotimes,gainG); */

                        if (gainG > 0x3f)
                                gainG = 0x3f;
                        else if (gainG < 3)
                                gainG = 3;
                        i2c_write(gspca_dev, gainG, 0x35);

                        if (expotimes > 0x0256)
                                expotimes = 0x0256;
                        else if (expotimes < 3)
                                expotimes = 3;
                        i2c_write(gspca_dev, expotimes | pixelclk, 0x09);
                }
                break;
        }
}

static void sd_pkt_scan(struct gspca_dev *gspca_dev,
                        u8 *data,               /* isoc packet */
                        int len)                /* iso packet length */
{
        struct sd *sd = (struct sd *) gspca_dev;

        len--;
        switch (*data++) {                      /* sequence number */
        case 0:                                 /* start of frame */
                gspca_frame_add(gspca_dev, LAST_PACKET, NULL, 0);

                /* This should never happen */
                if (len < 2) {
                        PDEBUG(D_ERR, "Short SOF packet, ignoring");
                        gspca_dev->last_packet_type = DISCARD_PACKET;
                        return;
                }

#if defined(CONFIG_INPUT) || defined(CONFIG_INPUT_MODULE)
                if (data[0] & 0x20) {
                        input_report_key(gspca_dev->input_dev, KEY_CAMERA, 1);
                        input_sync(gspca_dev->input_dev);
                        input_report_key(gspca_dev->input_dev, KEY_CAMERA, 0);
                        input_sync(gspca_dev->input_dev);
                }
#endif

                if (data[1] & 0x10) {
                        /* compressed bayer */
                        gspca_frame_add(gspca_dev, FIRST_PACKET, data, len);
                } else {
                        /* raw bayer (with a header, which we skip) */
                        if (sd->chip_revision == Rev012A) {
                                data += 20;
                                len -= 20;
                        } else {
                                data += 16;
                                len -= 16;
                        }
                        gspca_frame_add(gspca_dev, FIRST_PACKET, data, len);
                }
                return;
        case 0xff:                      /* drop (empty mpackets) */
                return;
        }
        gspca_frame_add(gspca_dev, INTER_PACKET, data, len);
}

/* rev 72a only */
static int sd_setbrightness(struct gspca_dev *gspca_dev, __s32 val)
{
        struct sd *sd = (struct sd *) gspca_dev;

        sd->brightness = val;
        if (gspca_dev->streaming)
                setbrightness(gspca_dev);
        return 0;
}

static int sd_getbrightness(struct gspca_dev *gspca_dev, __s32 *val)
{
        struct sd *sd = (struct sd *) gspca_dev;

        *val = sd->brightness;
        return 0;
}

/* rev 72a only */
static int sd_setcontrast(struct gspca_dev *gspca_dev, __s32 val)
{
        struct sd *sd = (struct sd *) gspca_dev;

        sd->contrast = val;
        if (gspca_dev->streaming)
                setcontrast(gspca_dev);
        return 0;
}

static int sd_getcontrast(struct gspca_dev *gspca_dev, __s32 *val)
{
        struct sd *sd = (struct sd *) gspca_dev;

        *val = sd->contrast;
        return 0;
}

static int sd_setautogain(struct gspca_dev *gspca_dev, __s32 val)
{
        struct sd *sd = (struct sd *) gspca_dev;

        sd->autogain = val;
        if (gspca_dev->streaming)
                setautogain(gspca_dev);
        return 0;
}

static int sd_getautogain(struct gspca_dev *gspca_dev, __s32 *val)
{
        struct sd *sd = (struct sd *) gspca_dev;

        *val = sd->autogain;
        return 0;
}

static int sd_setwhite(struct gspca_dev *gspca_dev, __s32 val)
{
        struct sd *sd = (struct sd *) gspca_dev;

        sd->white = val;
        if (gspca_dev->streaming)
                setwhite(gspca_dev);
        return 0;
}

static int sd_getwhite(struct gspca_dev *gspca_dev, __s32 *val)
{
        struct sd *sd = (struct sd *) gspca_dev;

        *val = sd->white;
        return 0;
}

/* rev12a only */
static int sd_setexposure(struct gspca_dev *gspca_dev, __s32 val)
{
        struct sd *sd = (struct sd *) gspca_dev;

        sd->exposure = val;
        if (gspca_dev->streaming)
                setexposure(gspca_dev);
        return 0;
}

static int sd_getexposure(struct gspca_dev *gspca_dev, __s32 *val)
{
        struct sd *sd = (struct sd *) gspca_dev;

        *val = sd->exposure;
        return 0;
}

/* rev12a only */
static int sd_setgain(struct gspca_dev *gspca_dev, __s32 val)
{
        struct sd *sd = (struct sd *) gspca_dev;

        sd->gain = val;
        if (gspca_dev->streaming)
                setgain(gspca_dev);
        return 0;
}

static int sd_getgain(struct gspca_dev *gspca_dev, __s32 *val)
{
        struct sd *sd = (struct sd *) gspca_dev;

        *val = sd->gain;
        return 0;
}

/* control tables */
static const struct ctrl sd_ctrls_12a[] = {
        {
            {
                .id = V4L2_CID_HUE,
                .type = V4L2_CTRL_TYPE_INTEGER,
                .name = "Hue",
                .minimum = HUE_MIN,
                .maximum = HUE_MAX,
                .step = 1,
                .default_value = HUE_DEF,
            },
            .set = sd_setwhite,
            .get = sd_getwhite,
        },
        {
            {
                .id = V4L2_CID_EXPOSURE,
                .type = V4L2_CTRL_TYPE_INTEGER,
                .name = "Exposure",
                .minimum = EXPOSURE_MIN,
                .maximum = EXPOSURE_MAX,
                .step = 1,
                .default_value = EXPOSURE_DEF,
            },
            .set = sd_setexposure,
            .get = sd_getexposure,
        },
        {
            {
                .id = V4L2_CID_GAIN,
                .type = V4L2_CTRL_TYPE_INTEGER,
                .name = "Gain",
                .minimum = GAIN_MIN,
                .maximum = GAIN_MAX,
                .step = 1,
                .default_value = GAIN_DEF,
            },
            .set = sd_setgain,
            .get = sd_getgain,
        },
};

static const struct ctrl sd_ctrls_72a[] = {
        {
            {
                .id = V4L2_CID_HUE,
                .type = V4L2_CTRL_TYPE_INTEGER,
                .name = "Hue",
                .minimum = HUE_MIN,
                .maximum = HUE_MAX,
                .step = 1,
                .default_value = HUE_DEF,
            },
            .set = sd_setwhite,
            .get = sd_getwhite,
        },
        {
           {
                .id = V4L2_CID_BRIGHTNESS,
                .type = V4L2_CTRL_TYPE_INTEGER,
                .name = "Brightness",
                .minimum = BRIGHTNESS_MIN,
                .maximum = BRIGHTNESS_MAX,
                .step = 1,
                .default_value = BRIGHTNESS_DEF,
            },
            .set = sd_setbrightness,
            .get = sd_getbrightness,

        },
        {
            {
                .id = V4L2_CID_CONTRAST,
                .type = V4L2_CTRL_TYPE_INTEGER,
                .name = "Contrast",
                .minimum = CONTRAST_MIN,
                .maximum = CONTRAST_MAX,
                .step = 1,
                .default_value = CONTRAST_DEF,
            },
            .set = sd_setcontrast,
            .get = sd_getcontrast,
        },
        {
            {
                .id = V4L2_CID_AUTOGAIN,
                .type = V4L2_CTRL_TYPE_BOOLEAN,
                .name = "Auto Gain",
                .minimum = AUTOGAIN_MIN,
                .maximum = AUTOGAIN_MAX,
                .step = 1,
                .default_value = AUTOGAIN_DEF,
            },
            .set = sd_setautogain,
            .get = sd_getautogain,
        },
};

/* sub-driver description */
static const struct sd_desc sd_desc_12a = {
        .name = MODULE_NAME,
        .ctrls = sd_ctrls_12a,
        .nctrls = ARRAY_SIZE(sd_ctrls_12a),
        .config = sd_config,
        .init = sd_init_12a,
        .start = sd_start_12a,
        .stopN = sd_stopN,
        .pkt_scan = sd_pkt_scan,
#if defined(CONFIG_INPUT) || defined(CONFIG_INPUT_MODULE)
        .other_input = 1,
#endif
};
static const struct sd_desc sd_desc_72a = {
        .name = MODULE_NAME,
        .ctrls = sd_ctrls_72a,
        .nctrls = ARRAY_SIZE(sd_ctrls_72a),
        .config = sd_config,
        .init = sd_init_72a,
        .start = sd_start_72a,
        .stopN = sd_stopN,
        .pkt_scan = sd_pkt_scan,
        .dq_callback = do_autogain,
#if defined(CONFIG_INPUT) || defined(CONFIG_INPUT_MODULE)
        .other_input = 1,
#endif
};
static const struct sd_desc *sd_desc[2] = {
        &sd_desc_12a,
        &sd_desc_72a
};

/* -- module initialisation -- */
static const struct usb_device_id device_table[] = {
        {USB_DEVICE(0x041e, 0x401a), .driver_info = Rev072A},
        {USB_DEVICE(0x041e, 0x403b), .driver_info = Rev012A},
        {USB_DEVICE(0x0458, 0x7004), .driver_info = Rev072A},
        {USB_DEVICE(0x0461, 0x0815), .driver_info = Rev072A},
        {USB_DEVICE(0x046d, 0x0928), .driver_info = Rev012A},
        {USB_DEVICE(0x046d, 0x0929), .driver_info = Rev012A},
        {USB_DEVICE(0x046d, 0x092a), .driver_info = Rev012A},
        {USB_DEVICE(0x046d, 0x092b), .driver_info = Rev012A},
        {USB_DEVICE(0x046d, 0x092c), .driver_info = Rev012A},
        {USB_DEVICE(0x046d, 0x092d), .driver_info = Rev012A},
        {USB_DEVICE(0x046d, 0x092e), .driver_info = Rev012A},
        {USB_DEVICE(0x046d, 0x092f), .driver_info = Rev012A},
        {USB_DEVICE(0x04fc, 0x0561), .driver_info = Rev072A},
        {USB_DEVICE(0x060b, 0xa001), .driver_info = Rev072A},
        {USB_DEVICE(0x10fd, 0x7e50), .driver_info = Rev072A},
        {USB_DEVICE(0xabcd, 0xcdee), .driver_info = Rev072A},
        {}
};

MODULE_DEVICE_TABLE(usb, device_table);

/* -- device connect -- */
static int sd_probe(struct usb_interface *intf,
                    const struct usb_device_id *id)
{
        return gspca_dev_probe(intf, id,
                                sd_desc[id->driver_info],
                                sizeof(struct sd),
                               THIS_MODULE);
}

static struct usb_driver sd_driver = {
        .name = MODULE_NAME,
        .id_table = device_table,
        .probe = sd_probe,
        .disconnect = gspca_disconnect,
#ifdef CONFIG_PM
        .suspend = gspca_suspend,
        .resume = gspca_resume,
#endif
};

/* -- module insert / remove -- */
static int __init sd_mod_init(void)
{
        return usb_register(&sd_driver);
}
static void __exit sd_mod_exit(void)
{
        usb_deregister(&sd_driver);
}

module_init(sd_mod_init);
module_exit(sd_mod_exit);