Subversion Repositories shark

/*

    bttv-if.c  --  interfaces to other kernel modules

        all the i2c code is here

        also the gpio interface exported by bttv (used by lirc)

    bttv - Bt848 frame grabber driver

    Copyright (C) 1996,97,98 Ralph  Metzler (rjkm@thp.uni-koeln.de)

                           & Marcus Metzler (mocm@thp.uni-koeln.de)

    (c) 1999-2003 Gerd Knorr <kraxel@bytesex.org>

    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

    (at your option) 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., 675 Mass Ave, Cambridge, MA 02139, USA.

*/

#include <linuxcomp.h>

#include <linux/module.h>

#include <linux/init.h>

#include <linux/delay.h>

#include <asm/io.h>

#include "drivers/bttvp.h"

static struct i2c_algo_bit_data bttv_i2c_algo_bit_template;

static struct i2c_adapter bttv_i2c_adap_sw_template;

static struct i2c_adapter bttv_i2c_adap_hw_template;

static struct i2c_client bttv_i2c_client_template;

#ifndef I2C_PEC

static void bttv_inc_use(struct i2c_adapter *adap);

static void bttv_dec_use(struct i2c_adapter *adap);

#endif

static int attach_inform(struct i2c_client *client);

EXPORT_SYMBOL(bttv_get_cardinfo);

EXPORT_SYMBOL(bttv_get_pcidev);

EXPORT_SYMBOL(bttv_get_id);

EXPORT_SYMBOL(bttv_gpio_enable);

EXPORT_SYMBOL(bttv_read_gpio);

EXPORT_SYMBOL(bttv_write_gpio);

EXPORT_SYMBOL(bttv_get_gpio_queue);

EXPORT_SYMBOL(bttv_i2c_call);

static int i2c_debug = 1;

static int i2c_hw = 0;

MODULE_PARM(i2c_debug,"i");

MODULE_PARM(i2c_hw,"i");

/* ----------------------------------------------------------------------- */

/* Exported functions - for other modules which want to access the         */

/*                      gpio ports (IR for example)                        */

/*                      see bttv.h for comments                            */

int bttv_get_cardinfo(unsigned int card, int *type, unsigned *cardid)

{

        if (card >= bttv_num) {

                return -1;

        }

        *type   = bttvs[card].type;

        *cardid = bttvs[card].cardid;

        return 0;

}

struct pci_dev* bttv_get_pcidev(unsigned int card)

{

        if (card >= bttv_num)

                return NULL;

        return bttvs[card].dev;

}

int bttv_get_id(unsigned int card)

{

        printk("bttv_get_id is obsolete, use bttv_get_cardinfo instead\n");

        if (card >= bttv_num) {

                return -1;

        }

        return bttvs[card].type;

}

int bttv_gpio_enable(unsigned int card, unsigned long mask, unsigned long data)

{

        struct bttv *btv;

        if (card >= bttv_num) {

                return -EINVAL;

        }

        btv = &bttvs[card];

        btaor(data, ~mask, BT848_GPIO_OUT_EN);

        if (bttv_gpio)

                bttv_gpio_tracking(btv,"extern enable");

        return 0;

}

int bttv_read_gpio(unsigned int card, unsigned long *data)

{

        struct bttv *btv;

        if (card >= bttv_num) {

                return -EINVAL;

        }

        btv = &bttvs[card];

        if(btv->shutdown) {

                return -ENODEV;

        }

/* prior setting BT848_GPIO_REG_INP is (probably) not needed

   because we set direct input on init */

        *data = btread(BT848_GPIO_DATA);

        return 0;

}

int bttv_write_gpio(unsigned int card, unsigned long mask, unsigned long data)

{

        struct bttv *btv;

        if (card >= bttv_num) {

                return -EINVAL;

        }

        btv = &bttvs[card];

/* prior setting BT848_GPIO_REG_INP is (probably) not needed

   because direct input is set on init */

        btaor(data & mask, ~mask, BT848_GPIO_DATA);

        if (bttv_gpio)

                bttv_gpio_tracking(btv,"extern write");

        return 0;

}

wait_queue_head_t* bttv_get_gpio_queue(unsigned int card)

{

        struct bttv *btv;

        if (card >= bttv_num) {

                return NULL;

        }

        btv = &bttvs[card];

        if (bttvs[card].shutdown) {

                return NULL;

        }

        return &btv->gpioq;

}

/* ----------------------------------------------------------------------- */

/* I2C functions - bitbanging adapter (software i2c)                       */

void bttv_bit_setscl(void *data, int state)

{

        struct bttv *btv = (struct bttv*)data;

        if (state)

                btv->i2c_state |= 0x02;

        else

                btv->i2c_state &= ~0x02;

        btwrite(btv->i2c_state, BT848_I2C);

        btread(BT848_I2C);

}

void bttv_bit_setsda(void *data, int state)

{

        struct bttv *btv = (struct bttv*)data;

        if (state)

                btv->i2c_state |= 0x01;

        else

                btv->i2c_state &= ~0x01;

        btwrite(btv->i2c_state, BT848_I2C);

        btread(BT848_I2C);

}

static int bttv_bit_getscl(void *data)

{

        struct bttv *btv = (struct bttv*)data;

        int state;

        state = btread(BT848_I2C) & 0x02 ? 1 : 0;

        return state;

}

static int bttv_bit_getsda(void *data)

{

        struct bttv *btv = (struct bttv*)data;

        int state;

        state = btread(BT848_I2C) & 0x01;

        return state;

}

static struct i2c_algo_bit_data bttv_i2c_algo_bit_template = {

        .setsda  = bttv_bit_setsda,

        .setscl  = bttv_bit_setscl,

        .getsda  = bttv_bit_getsda,

        .getscl  = bttv_bit_getscl,

        .udelay  = 16,

        .mdelay  = 10,

        .timeout = 200,

};

static struct i2c_adapter bttv_i2c_adap_sw_template = {

#ifdef I2C_PEC

        .owner             = THIS_MODULE,

#else

        .inc_use           = bttv_inc_use,

        .dec_use           = bttv_dec_use,

#endif

#ifdef I2C_ADAP_CLASS_TV_ANALOG

        .class             = I2C_ADAP_CLASS_TV_ANALOG,

#endif

        I2C_DEVNAME("bt848"),

        .id                = I2C_HW_B_BT848,

        .client_register   = attach_inform,

};

/* ----------------------------------------------------------------------- */

/* I2C functions - hardware i2c                                            */

static int algo_control(struct i2c_adapter *adapter,

                        unsigned int cmd, unsigned long arg)

{

        return 0;

}

static u32 functionality(struct i2c_adapter *adap)

{

        return I2C_FUNC_SMBUS_EMUL;

}

extern unsigned long read_time(void);

static int

bttv_i2c_wait_done(struct bttv *btv)

{

        u32 stat;

        unsigned long timeout;

        timeout = read_time() + 10000; /* 10ms */

        for (;;) {

                stat = btread(BT848_INT_STAT);

                if (stat & BT848_INT_I2CDONE)

                        break;

                if (timeout > read_time())

                        return -EIO;

                udelay(10);

        }

        btwrite(BT848_INT_I2CDONE|BT848_INT_RACK, BT848_INT_STAT);

        return ((stat & BT848_INT_RACK) ? 1 : 0);

}

#define I2C_HW (BT878_I2C_MODE  | BT848_I2C_SYNC |\

                BT848_I2C_SCL | BT848_I2C_SDA)

static int

bttv_i2c_sendbytes(struct bttv *btv, const struct i2c_msg *msg, int last)

{

        u32 xmit;

        int retval,cnt;

        /* start, address + first byte */

        xmit = (msg->addr << 25) | (msg->buf[0] << 16) | I2C_HW;

        if (msg->len > 1 || !last)

                xmit |= BT878_I2C_NOSTOP;

        btwrite(xmit, BT848_I2C);

        retval = bttv_i2c_wait_done(btv);

        if (retval < 0)

                goto err;

        if (retval == 0)

                goto eio;

        if (i2c_debug) {

                printk(" <W %02x %02x", msg->addr << 1, msg->buf[0]);

                if (!(xmit & BT878_I2C_NOSTOP))

                        printk(" >\n");

        }

        for (cnt = 1; cnt < msg->len; cnt++ ) {

                /* following bytes */

                xmit = (msg->buf[cnt] << 24) | I2C_HW | BT878_I2C_NOSTART;

                if (cnt < msg->len-1 || !last)

                        xmit |= BT878_I2C_NOSTOP;

                btwrite(xmit, BT848_I2C);

                retval = bttv_i2c_wait_done(btv);

                if (retval < 0)

                        goto err;

                if (retval == 0)

                        goto eio;

                if (i2c_debug) {

                        printk(" %02x", msg->buf[cnt]);

                        if (!(xmit & BT878_I2C_NOSTOP))

                                printk(" >\n");

                }

        }

        return msg->len;

 eio:

        retval = -EIO;

 err:

        if (i2c_debug)

                printk(" ERR: %d\n",retval);

        return retval;

}

static int

bttv_i2c_readbytes(struct bttv *btv, const struct i2c_msg *msg, int last)

{

        u32 xmit;

        u32 cnt;

        int retval;

        for(cnt = 0; cnt < msg->len; cnt++) {

                xmit = (msg->addr << 25) | (1 << 24) | I2C_HW;

                if (cnt < msg->len-1)

                        xmit |= BT848_I2C_W3B;

                if (cnt < msg->len-1 || !last)

                        xmit |= BT878_I2C_NOSTOP;

                if (cnt)

                        xmit |= BT878_I2C_NOSTART;

                btwrite(xmit, BT848_I2C);

                retval = bttv_i2c_wait_done(btv);

                if (retval < 0)

                        goto err;

                if (retval == 0)

                        goto eio;

                msg->buf[cnt] = ((u32)btread(BT848_I2C) >> 8) & 0xff;

                if (i2c_debug) {

                        if (!(xmit & BT878_I2C_NOSTART))

                                printk(" <R %02x", (msg->addr << 1) +1);

                        printk(" =%02x", msg->buf[cnt]);

                        if (!(xmit & BT878_I2C_NOSTOP))

                                printk(" >\n");

                }

        }

        return msg->len;

 eio:

        retval = -EIO;

 err:

        if (i2c_debug)

                printk(" ERR: %d\n",retval);

        return retval;

}

int bttv_i2c_xfer(struct i2c_adapter *i2c_adap, struct i2c_msg msgs[], int num)

{

        struct bttv *btv = i2c_get_adapdata(i2c_adap);

        int retval = 0;

        int i;

        if (i2c_debug)

                printk("bt-i2c:");

        btwrite(BT848_INT_I2CDONE|BT848_INT_RACK, BT848_INT_STAT);

        for (i = 0 ; i < num; i++) {

                if (msgs[i].flags & I2C_M_RD) {

                        /* read */

                        retval = bttv_i2c_readbytes(btv, &msgs[i], i+1 == num);

                        if (retval < 0)

                                goto err;

                } else {

                        /* write */

                        retval = bttv_i2c_sendbytes(btv, &msgs[i], i+1 == num);

                        if (retval < 0)

                                goto err;

                }

        }

        return num;

 err:

        return retval;

}

static struct i2c_algorithm bttv_algo = {

        .name          = "bt878",

        .id            = I2C_ALGO_BIT | I2C_HW_B_BT848 /* FIXME */,

        .master_xfer   = bttv_i2c_xfer,

        .algo_control  = algo_control,

        .functionality = functionality,

};

static struct i2c_adapter bttv_i2c_adap_hw_template = {

#ifdef I2C_PEC

        .owner         = THIS_MODULE,

#else

        .inc_use       = bttv_inc_use,

        .dec_use       = bttv_dec_use,

#endif

#ifdef I2C_ADAP_CLASS_TV_ANALOG

        .class         = I2C_ADAP_CLASS_TV_ANALOG,

#endif

        I2C_DEVNAME("bt878"),

        .id            = I2C_ALGO_BIT | I2C_HW_B_BT848 /* FIXME */,

        .algo          = &bttv_algo,

        .client_register = attach_inform,

};

/* ----------------------------------------------------------------------- */

/* I2C functions - common stuff                                            */

#ifndef I2C_PEC

static void bttv_inc_use(struct i2c_adapter *adap)

{

        MOD_INC_USE_COUNT;

}

static void bttv_dec_use(struct i2c_adapter *adap)

{

        MOD_DEC_USE_COUNT;

}

#endif

static int attach_inform(struct i2c_client *client)

{

        struct bttv *btv = i2c_get_adapdata(client->adapter);

        if (btv->tuner_type != UNSET)

                bttv_call_i2c_clients(btv,TUNER_SET_TYPE,&btv->tuner_type);

        if (btv->pinnacle_id != UNSET)

                bttv_call_i2c_clients(btv,AUDC_CONFIG_PINNACLE,

                                      &btv->pinnacle_id);

        if (bttv_debug)

                printk("bttv%d: i2c attach [client=%s]\n",

                       btv->nr, i2c_clientname(client));

        return 0;

}

void bttv_call_i2c_clients(struct bttv *btv, unsigned int cmd, void *arg)

{

        if (0 != btv->i2c_rc)

                return;

        i2c_clients_command(&btv->i2c_adap, cmd, arg);

}

void bttv_i2c_call(unsigned int card, unsigned int cmd, void *arg)

{

        if (card >= bttv_num)

                return;

        bttv_call_i2c_clients(&bttvs[card], cmd, arg);

}

static struct i2c_client bttv_i2c_client_template = {

        I2C_DEVNAME("bttv internal"),

        .id       = -1,

};

/* read I2C */

int bttv_I2CRead(struct bttv *btv, unsigned char addr, char *probe_for)

{

        unsigned char buffer = 0;

        if (0 != btv->i2c_rc)

                return -1;

        if (bttv_verbose && NULL != probe_for)

                printk(KERN_INFO "bttv%d: i2c: checking for %s @ 0x%02x... ",

                       btv->nr,probe_for,addr);

        btv->i2c_client.addr = addr >> 1;

        if (1 != i2c_master_recv(&btv->i2c_client, &buffer, 1)) {

                if (NULL != probe_for) {

                        if (bttv_verbose)

                                printk("not found\n");

                } else

                        printk(KERN_WARNING "bttv%d: i2c read 0x%x: error\n",

                               btv->nr,addr);

                return -1;

        }

        if (bttv_verbose && NULL != probe_for)

                printk("found\n");

        return buffer;

}

/* write I2C */

int bttv_I2CWrite(struct bttv *btv, unsigned char addr, unsigned char b1,

                    unsigned char b2, int both)

{

        unsigned char buffer[2];

        int bytes = both ? 2 : 1;

        if (0 != btv->i2c_rc)

                return -1;

        btv->i2c_client.addr = addr >> 1;

        buffer[0] = b1;

        buffer[1] = b2;

        if (bytes != i2c_master_send(&btv->i2c_client, buffer, bytes))

                return -1;

        return 0;

}

/* read EEPROM content */

void __devinit bttv_readee(struct bttv *btv, unsigned char *eedata, int addr)

{

        int i;

        if (bttv_I2CWrite(btv, addr, 0, -1, 0)<0) {

                printk(KERN_WARNING "bttv: readee error\n");

                return;

        }

        btv->i2c_client.addr = addr >> 1;

        for (i=0; i<256; i+=16) {

                if (16 != i2c_master_recv(&btv->i2c_client,eedata+i,16)) {

                        printk(KERN_WARNING "bttv: readee error\n");

                        break;

                }

        }

}

/* init + register i2c algo-bit adapter */

int __devinit init_bttv_i2c(struct bttv *btv)

{

        int use_hw = (btv->id == 878) && i2c_hw;

        memcpy(&btv->i2c_client, &bttv_i2c_client_template,

               sizeof(bttv_i2c_client_template));

        if (use_hw) {

                /* bt878 */

                memcpy(&btv->i2c_adap, &bttv_i2c_adap_hw_template,

                       sizeof(bttv_i2c_adap_hw_template));

        } else {

                /* bt848 */

                memcpy(&btv->i2c_adap, &bttv_i2c_adap_sw_template,

                       sizeof(bttv_i2c_adap_sw_template));

                memcpy(&btv->i2c_algo, &bttv_i2c_algo_bit_template,

                       sizeof(bttv_i2c_algo_bit_template));

                btv->i2c_algo.data = btv;

                btv->i2c_adap.algo_data = &btv->i2c_algo;

        }

        btv->i2c_adap.dev.parent = &btv->dev->dev;

        snprintf26(btv->i2c_adap.name, sizeof(btv->i2c_adap.name),

                 "bt%d #%d [%s]", btv->id, btv->nr, use_hw ? "hw" : "sw");

        i2c_set_adapdata(&btv->i2c_adap, btv);

        btv->i2c_client.adapter = &btv->i2c_adap;

        if (use_hw) {

                btv->i2c_rc = i2c_add_adapter(&btv->i2c_adap);

        } else {

                bttv_bit_setscl(btv,1);

                bttv_bit_setsda(btv,1);

                btv->i2c_rc = i2c_bit_add_bus(&btv->i2c_adap);

        }

        return btv->i2c_rc;

}

int __devexit fini_bttv_i2c(struct bttv *btv)

{

        int use_hw = (btv->id == 878) && i2c_hw;

        if (0 != btv->i2c_rc)

                return 0;

        if (use_hw) {

                return i2c_del_adapter(&btv->i2c_adap);

        } else {

                return i2c_bit_del_bus(&btv->i2c_adap);

        }

}

/*

 * Local variables:

 * c-basic-offset: 8

 * End:

 */