| /* |
| * |
| * keyboard input driver for i2c IR remote controls |
| * |
| * Copyright (c) 2000-2003 Gerd Knorr <kraxel@bytesex.org> |
| * modified for PixelView (BT878P+W/FM) by |
| * Michal Kochanowicz <mkochano@pld.org.pl> |
| * Christoph Bartelmus <lirc@bartelmus.de> |
| * modified for KNC ONE TV Station/Anubis Typhoon TView Tuner by |
| * Ulrich Mueller <ulrich.mueller42@web.de> |
| * modified for em2820 based USB TV tuners by |
| * Markus Rechberger <mrechberger@gmail.com> |
| * modified for DViCO Fusion HDTV 5 RT GOLD by |
| * Chaogui Zhang <czhang1974@gmail.com> |
| * |
| * 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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
| * |
| */ |
| |
| #include <linux/module.h> |
| #include <linux/init.h> |
| #include <linux/kernel.h> |
| #include <linux/string.h> |
| #include <linux/timer.h> |
| #include <linux/delay.h> |
| #include <linux/errno.h> |
| #include <linux/slab.h> |
| #include <linux/i2c.h> |
| #include <linux/i2c-id.h> |
| #include <linux/workqueue.h> |
| |
| #include <media/ir-common.h> |
| #include <media/ir-kbd-i2c.h> |
| |
| /* ----------------------------------------------------------------------- */ |
| /* insmod parameters */ |
| |
| static int debug; |
| module_param(debug, int, 0644); /* debug level (0,1,2) */ |
| |
| static int hauppauge = 0; |
| module_param(hauppauge, int, 0644); /* Choose Hauppauge remote */ |
| MODULE_PARM_DESC(hauppauge, "Specify Hauppauge remote: 0=black, 1=grey (defaults to 0)"); |
| |
| |
| #define DEVNAME "ir-kbd-i2c" |
| #define dprintk(level, fmt, arg...) if (debug >= level) \ |
| printk(KERN_DEBUG DEVNAME ": " fmt , ## arg) |
| |
| /* ----------------------------------------------------------------------- */ |
| |
| static int get_key_haup_common(struct IR_i2c *ir, u32 *ir_key, u32 *ir_raw, |
| int size, int offset) |
| { |
| unsigned char buf[6]; |
| int start, range, toggle, dev, code; |
| |
| /* poll IR chip */ |
| if (size != i2c_master_recv(&ir->c,buf,size)) |
| return -EIO; |
| |
| /* split rc5 data block ... */ |
| start = (buf[offset] >> 7) & 1; |
| range = (buf[offset] >> 6) & 1; |
| toggle = (buf[offset] >> 5) & 1; |
| dev = buf[offset] & 0x1f; |
| code = (buf[offset+1] >> 2) & 0x3f; |
| |
| /* rc5 has two start bits |
| * the first bit must be one |
| * the second bit defines the command range (1 = 0-63, 0 = 64 - 127) |
| */ |
| if (!start) |
| /* no key pressed */ |
| return 0; |
| |
| if (!range) |
| code += 64; |
| |
| dprintk(1,"ir hauppauge (rc5): s%d r%d t%d dev=%d code=%d\n", |
| start, range, toggle, dev, code); |
| |
| /* return key */ |
| *ir_key = code; |
| *ir_raw = (start << 12) | (toggle << 11) | (dev << 6) | code; |
| return 1; |
| } |
| |
| static inline int get_key_haup(struct IR_i2c *ir, u32 *ir_key, u32 *ir_raw) |
| { |
| return get_key_haup_common (ir, ir_key, ir_raw, 3, 0); |
| } |
| |
| static inline int get_key_haup_xvr(struct IR_i2c *ir, u32 *ir_key, u32 *ir_raw) |
| { |
| return get_key_haup_common (ir, ir_key, ir_raw, 6, 3); |
| } |
| |
| static int get_key_pixelview(struct IR_i2c *ir, u32 *ir_key, u32 *ir_raw) |
| { |
| unsigned char b; |
| |
| /* poll IR chip */ |
| if (1 != i2c_master_recv(&ir->c,&b,1)) { |
| dprintk(1,"read error\n"); |
| return -EIO; |
| } |
| *ir_key = b; |
| *ir_raw = b; |
| return 1; |
| } |
| |
| static int get_key_pv951(struct IR_i2c *ir, u32 *ir_key, u32 *ir_raw) |
| { |
| unsigned char b; |
| |
| /* poll IR chip */ |
| if (1 != i2c_master_recv(&ir->c,&b,1)) { |
| dprintk(1,"read error\n"); |
| return -EIO; |
| } |
| |
| /* ignore 0xaa */ |
| if (b==0xaa) |
| return 0; |
| dprintk(2,"key %02x\n", b); |
| |
| *ir_key = b; |
| *ir_raw = b; |
| return 1; |
| } |
| |
| static int get_key_fusionhdtv(struct IR_i2c *ir, u32 *ir_key, u32 *ir_raw) |
| { |
| unsigned char buf[4]; |
| |
| /* poll IR chip */ |
| if (4 != i2c_master_recv(&ir->c,buf,4)) { |
| dprintk(1,"read error\n"); |
| return -EIO; |
| } |
| |
| if(buf[0] !=0 || buf[1] !=0 || buf[2] !=0 || buf[3] != 0) |
| dprintk(2, "%s: 0x%2x 0x%2x 0x%2x 0x%2x\n", __FUNCTION__, |
| buf[0], buf[1], buf[2], buf[3]); |
| |
| /* no key pressed or signal from other ir remote */ |
| if(buf[0] != 0x1 || buf[1] != 0xfe) |
| return 0; |
| |
| *ir_key = buf[2]; |
| *ir_raw = (buf[2] << 8) | buf[3]; |
| |
| return 1; |
| } |
| |
| static int get_key_knc1(struct IR_i2c *ir, u32 *ir_key, u32 *ir_raw) |
| { |
| unsigned char b; |
| |
| /* poll IR chip */ |
| if (1 != i2c_master_recv(&ir->c,&b,1)) { |
| dprintk(1,"read error\n"); |
| return -EIO; |
| } |
| |
| /* it seems that 0xFE indicates that a button is still hold |
| down, while 0xff indicates that no button is hold |
| down. 0xfe sequences are sometimes interrupted by 0xFF */ |
| |
| dprintk(2,"key %02x\n", b); |
| |
| if (b == 0xff) |
| return 0; |
| |
| if (b == 0xfe) |
| /* keep old data */ |
| return 1; |
| |
| *ir_key = b; |
| *ir_raw = b; |
| return 1; |
| } |
| |
| /* Common (grey or coloured) pinnacle PCTV remote handling |
| * |
| */ |
| static int get_key_pinnacle(struct IR_i2c *ir, u32 *ir_key, u32 *ir_raw, |
| int parity_offset, int marker, int code_modulo) |
| { |
| unsigned char b[4]; |
| unsigned int start = 0,parity = 0,code = 0; |
| |
| /* poll IR chip */ |
| if (4 != i2c_master_recv(&ir->c,b,4)) { |
| dprintk(2,"read error\n"); |
| return -EIO; |
| } |
| |
| for (start = 0; start < ARRAY_SIZE(b); start++) { |
| if (b[start] == marker) { |
| code=b[(start+parity_offset+1)%4]; |
| parity=b[(start+parity_offset)%4]; |
| } |
| } |
| |
| /* Empty Request */ |
| if (parity==0) |
| return 0; |
| |
| /* Repeating... */ |
| if (ir->old == parity) |
| return 0; |
| |
| ir->old = parity; |
| |
| /* drop special codes when a key is held down a long time for the grey controller |
| In this case, the second bit of the code is asserted */ |
| if (marker == 0xfe && (code & 0x40)) |
| return 0; |
| |
| code %= code_modulo; |
| |
| *ir_raw = code; |
| *ir_key = code; |
| |
| dprintk(1,"Pinnacle PCTV key %02x\n", code); |
| |
| return 1; |
| } |
| |
| /* The grey pinnacle PCTV remote |
| * |
| * There are one issue with this remote: |
| * - I2c packet does not change when the same key is pressed quickly. The workaround |
| * is to hold down each key for about half a second, so that another code is generated |
| * in the i2c packet, and the function can distinguish key presses. |
| * |
| * Sylvain Pasche <sylvain.pasche@gmail.com> |
| */ |
| int get_key_pinnacle_grey(struct IR_i2c *ir, u32 *ir_key, u32 *ir_raw) |
| { |
| |
| return get_key_pinnacle(ir, ir_key, ir_raw, 1, 0xfe, 0xff); |
| } |
| |
| EXPORT_SYMBOL_GPL(get_key_pinnacle_grey); |
| |
| |
| /* The new pinnacle PCTV remote (with the colored buttons) |
| * |
| * Ricardo Cerqueira <v4l@cerqueira.org> |
| */ |
| int get_key_pinnacle_color(struct IR_i2c *ir, u32 *ir_key, u32 *ir_raw) |
| { |
| /* code_modulo parameter (0x88) is used to reduce code value to fit inside IR_KEYTAB_SIZE |
| * |
| * this is the only value that results in 42 unique |
| * codes < 128 |
| */ |
| |
| return get_key_pinnacle(ir, ir_key, ir_raw, 2, 0x80, 0x88); |
| } |
| |
| EXPORT_SYMBOL_GPL(get_key_pinnacle_color); |
| |
| /* ----------------------------------------------------------------------- */ |
| |
| static void ir_key_poll(struct IR_i2c *ir) |
| { |
| static u32 ir_key, ir_raw; |
| int rc; |
| |
| dprintk(2,"ir_poll_key\n"); |
| rc = ir->get_key(ir, &ir_key, &ir_raw); |
| if (rc < 0) { |
| dprintk(2,"error\n"); |
| return; |
| } |
| |
| if (0 == rc) { |
| ir_input_nokey(ir->input, &ir->ir); |
| } else { |
| ir_input_keydown(ir->input, &ir->ir, ir_key, ir_raw); |
| } |
| } |
| |
| static void ir_timer(unsigned long data) |
| { |
| struct IR_i2c *ir = (struct IR_i2c*)data; |
| schedule_work(&ir->work); |
| } |
| |
| static void ir_work(struct work_struct *work) |
| { |
| struct IR_i2c *ir = container_of(work, struct IR_i2c, work); |
| |
| ir_key_poll(ir); |
| mod_timer(&ir->timer, jiffies + msecs_to_jiffies(100)); |
| } |
| |
| /* ----------------------------------------------------------------------- */ |
| |
| static int ir_attach(struct i2c_adapter *adap, int addr, |
| unsigned short flags, int kind); |
| static int ir_detach(struct i2c_client *client); |
| static int ir_probe(struct i2c_adapter *adap); |
| |
| static struct i2c_driver driver = { |
| .driver = { |
| .name = "ir-kbd-i2c", |
| }, |
| .id = I2C_DRIVERID_INFRARED, |
| .attach_adapter = ir_probe, |
| .detach_client = ir_detach, |
| }; |
| |
| static struct i2c_client client_template = |
| { |
| .name = "unset", |
| .driver = &driver |
| }; |
| |
| static int ir_attach(struct i2c_adapter *adap, int addr, |
| unsigned short flags, int kind) |
| { |
| IR_KEYTAB_TYPE *ir_codes = NULL; |
| char *name; |
| int ir_type; |
| struct IR_i2c *ir; |
| struct input_dev *input_dev; |
| int err; |
| |
| ir = kzalloc(sizeof(struct IR_i2c),GFP_KERNEL); |
| input_dev = input_allocate_device(); |
| if (!ir || !input_dev) { |
| err = -ENOMEM; |
| goto err_out_free; |
| } |
| |
| ir->c = client_template; |
| ir->input = input_dev; |
| |
| ir->c.adapter = adap; |
| ir->c.addr = addr; |
| |
| i2c_set_clientdata(&ir->c, ir); |
| |
| switch(addr) { |
| case 0x64: |
| name = "Pixelview"; |
| ir->get_key = get_key_pixelview; |
| ir_type = IR_TYPE_OTHER; |
| ir_codes = ir_codes_empty; |
| break; |
| case 0x4b: |
| name = "PV951"; |
| ir->get_key = get_key_pv951; |
| ir_type = IR_TYPE_OTHER; |
| ir_codes = ir_codes_pv951; |
| break; |
| case 0x18: |
| case 0x1a: |
| name = "Hauppauge"; |
| ir->get_key = get_key_haup; |
| ir_type = IR_TYPE_RC5; |
| if (hauppauge == 1) { |
| ir_codes = ir_codes_hauppauge_new; |
| } else { |
| ir_codes = ir_codes_rc5_tv; |
| } |
| break; |
| case 0x30: |
| name = "KNC One"; |
| ir->get_key = get_key_knc1; |
| ir_type = IR_TYPE_OTHER; |
| ir_codes = ir_codes_empty; |
| break; |
| case 0x6b: |
| name = "FusionHDTV"; |
| ir->get_key = get_key_fusionhdtv; |
| ir_type = IR_TYPE_RC5; |
| ir_codes = ir_codes_fusionhdtv_mce; |
| break; |
| case 0x7a: |
| case 0x47: |
| case 0x71: |
| case 0x2d: |
| if (adap->id == I2C_HW_B_CX2388x) { |
| /* Handled by cx88-input */ |
| name = "CX2388x remote"; |
| ir_type = IR_TYPE_RC5; |
| ir->get_key = get_key_haup_xvr; |
| if (hauppauge == 1) { |
| ir_codes = ir_codes_hauppauge_new; |
| } else { |
| ir_codes = ir_codes_rc5_tv; |
| } |
| } else { |
| /* Handled by saa7134-input */ |
| name = "SAA713x remote"; |
| ir_type = IR_TYPE_OTHER; |
| } |
| break; |
| default: |
| /* shouldn't happen */ |
| printk(DEVNAME ": Huh? unknown i2c address (0x%02x)?\n", addr); |
| err = -ENODEV; |
| goto err_out_free; |
| } |
| |
| /* Sets name */ |
| snprintf(ir->c.name, sizeof(ir->c.name), "i2c IR (%s)", name); |
| ir->ir_codes = ir_codes; |
| |
| /* register i2c device |
| * At device register, IR codes may be changed to be |
| * board dependent. |
| */ |
| err = i2c_attach_client(&ir->c); |
| if (err) |
| goto err_out_free; |
| |
| /* If IR not supported or disabled, unregisters driver */ |
| if (ir->get_key == NULL) { |
| err = -ENODEV; |
| goto err_out_detach; |
| } |
| |
| /* Phys addr can only be set after attaching (for ir->c.dev.bus_id) */ |
| snprintf(ir->phys, sizeof(ir->phys), "%s/%s/ir0", |
| ir->c.adapter->dev.bus_id, |
| ir->c.dev.bus_id); |
| |
| /* init + register input device */ |
| ir_input_init(input_dev, &ir->ir, ir_type, ir->ir_codes); |
| input_dev->id.bustype = BUS_I2C; |
| input_dev->name = ir->c.name; |
| input_dev->phys = ir->phys; |
| |
| err = input_register_device(ir->input); |
| if (err) |
| goto err_out_detach; |
| |
| printk(DEVNAME ": %s detected at %s [%s]\n", |
| ir->input->name, ir->input->phys, adap->name); |
| |
| /* start polling via eventd */ |
| INIT_WORK(&ir->work, ir_work); |
| init_timer(&ir->timer); |
| ir->timer.function = ir_timer; |
| ir->timer.data = (unsigned long)ir; |
| schedule_work(&ir->work); |
| |
| return 0; |
| |
| err_out_detach: |
| i2c_detach_client(&ir->c); |
| err_out_free: |
| input_free_device(input_dev); |
| kfree(ir); |
| return err; |
| } |
| |
| static int ir_detach(struct i2c_client *client) |
| { |
| struct IR_i2c *ir = i2c_get_clientdata(client); |
| |
| /* kill outstanding polls */ |
| del_timer_sync(&ir->timer); |
| flush_scheduled_work(); |
| |
| /* unregister devices */ |
| input_unregister_device(ir->input); |
| i2c_detach_client(&ir->c); |
| |
| /* free memory */ |
| kfree(ir); |
| return 0; |
| } |
| |
| static int ir_probe(struct i2c_adapter *adap) |
| { |
| |
| /* The external IR receiver is at i2c address 0x34 (0x35 for |
| reads). Future Hauppauge cards will have an internal |
| receiver at 0x30 (0x31 for reads). In theory, both can be |
| fitted, and Hauppauge suggest an external overrides an |
| internal. |
| |
| That's why we probe 0x1a (~0x34) first. CB |
| */ |
| |
| static const int probe_bttv[] = { 0x1a, 0x18, 0x4b, 0x64, 0x30, -1}; |
| static const int probe_saa7134[] = { 0x7a, 0x47, 0x71, 0x2d, -1 }; |
| static const int probe_em28XX[] = { 0x30, 0x47, -1 }; |
| static const int probe_cx88[] = { 0x18, 0x6b, 0x71, -1 }; |
| static const int probe_cx23885[] = { 0x6b, -1 }; |
| const int *probe = NULL; |
| struct i2c_client c; |
| unsigned char buf; |
| int i,rc; |
| |
| switch (adap->id) { |
| case I2C_HW_B_BT848: |
| probe = probe_bttv; |
| break; |
| case I2C_HW_B_CX2341X: |
| probe = probe_bttv; |
| break; |
| case I2C_HW_SAA7134: |
| probe = probe_saa7134; |
| break; |
| case I2C_HW_B_EM28XX: |
| probe = probe_em28XX; |
| break; |
| case I2C_HW_B_CX2388x: |
| probe = probe_cx88; |
| break; |
| case I2C_HW_B_CX23885: |
| probe = probe_cx23885; |
| break; |
| } |
| if (NULL == probe) |
| return 0; |
| |
| memset(&c,0,sizeof(c)); |
| c.adapter = adap; |
| for (i = 0; -1 != probe[i]; i++) { |
| c.addr = probe[i]; |
| rc = i2c_master_recv(&c,&buf,0); |
| dprintk(1,"probe 0x%02x @ %s: %s\n", |
| probe[i], adap->name, |
| (0 == rc) ? "yes" : "no"); |
| if (0 == rc) { |
| ir_attach(adap,probe[i],0,0); |
| break; |
| } |
| } |
| return 0; |
| } |
| |
| /* ----------------------------------------------------------------------- */ |
| |
| MODULE_AUTHOR("Gerd Knorr, Michal Kochanowicz, Christoph Bartelmus, Ulrich Mueller"); |
| MODULE_DESCRIPTION("input driver for i2c IR remote controls"); |
| MODULE_LICENSE("GPL"); |
| |
| static int __init ir_init(void) |
| { |
| return i2c_add_driver(&driver); |
| } |
| |
| static void __exit ir_fini(void) |
| { |
| i2c_del_driver(&driver); |
| } |
| |
| module_init(ir_init); |
| module_exit(ir_fini); |
| |
| /* |
| * Overrides for Emacs so that we follow Linus's tabbing style. |
| * --------------------------------------------------------------------------- |
| * Local variables: |
| * c-basic-offset: 8 |
| * End: |
| */ |