drivers/media/common/ir-functions.c - kernel/msm - Gitiles

 /*
  *
  * some common structs and functions to handle infrared remotes via
  * input layer ...
  *
  * (c) 2003 Gerd Knorr <kraxel@bytesex.org> [SuSE Labs]
  *
  *  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/moduleparam.h>
 #include <linux/string.h>
 #include <linux/jiffies.h>
 #include <media/ir-common.h>

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

 MODULE_AUTHOR("Gerd Knorr <kraxel@bytesex.org> [SuSE Labs]");
 MODULE_LICENSE("GPL");

 static int repeat = 1;
 module_param(repeat, int, 0444);
 MODULE_PARM_DESC(repeat,"auto-repeat for IR keys (default: on)");

 static int debug = 0;    /* debug level (0,1,2) */
 module_param(debug, int, 0644);

 #define dprintk(level, fmt, arg...)	if (debug >= level) \
 	printk(KERN_DEBUG fmt , ## arg)

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

 static void ir_input_key_event(struct input_dev *dev, struct ir_input_state *ir)
 {
 	if (KEY_RESERVED == ir->keycode) {
 		printk(KERN_INFO "%s: unknown key: key=0x%02x raw=0x%02x down=%d\n",
 		       dev->name,ir->ir_key,ir->ir_raw,ir->keypressed);
 		return;
 	}
 	dprintk(1,"%s: key event code=%d down=%d\n",
 		dev->name,ir->keycode,ir->keypressed);
 	input_report_key(dev,ir->keycode,ir->keypressed);
 	input_sync(dev);
 }

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

 void ir_input_init(struct input_dev *dev, struct ir_input_state *ir,
 		   int ir_type, IR_KEYTAB_TYPE *ir_codes)
 {
 	int i;

 	ir->ir_type = ir_type;
 	if (ir_codes)
 		memcpy(ir->ir_codes, ir_codes, sizeof(ir->ir_codes));


 	dev->keycode     = ir->ir_codes;
 	dev->keycodesize = sizeof(IR_KEYTAB_TYPE);
 	dev->keycodemax  = IR_KEYTAB_SIZE;
 	for (i = 0; i < IR_KEYTAB_SIZE; i++)
 		set_bit(ir->ir_codes[i], dev->keybit);
 	clear_bit(0, dev->keybit);

 	set_bit(EV_KEY, dev->evbit);
 	if (repeat)
 		set_bit(EV_REP, dev->evbit);
 }

 void ir_input_nokey(struct input_dev *dev, struct ir_input_state *ir)
 {
 	if (ir->keypressed) {
 		ir->keypressed = 0;
 		ir_input_key_event(dev,ir);
 	}
 }

 void ir_input_keydown(struct input_dev *dev, struct ir_input_state *ir,
 		      u32 ir_key, u32 ir_raw)
 {
 	u32 keycode = IR_KEYCODE(ir->ir_codes, ir_key);

 	if (ir->keypressed && ir->keycode != keycode) {
 		ir->keypressed = 0;
 		ir_input_key_event(dev,ir);
 	}
 	if (!ir->keypressed) {
 		ir->ir_key  = ir_key;
 		ir->ir_raw  = ir_raw;
 		ir->keycode = keycode;
 		ir->keypressed = 1;
 		ir_input_key_event(dev,ir);
 	}
 }

 /* -------------------------------------------------------------------------- */
 /* extract mask bits out of data and pack them into the result */
 u32 ir_extract_bits(u32 data, u32 mask)
 {
 	u32 vbit = 1, value = 0;

 	do {
 	    if (mask&1) {
 		if (data&1)
 			value |= vbit;
 		vbit<<=1;
 	    }
 	    data>>=1;
 	} while (mask>>=1);

 	return value;
 }

 static int inline getbit(u32 *samples, int bit)
 {
 	return (samples[bit/32] & (1 << (31-(bit%32)))) ? 1 : 0;
 }

 /* sump raw samples for visual debugging ;) */
 int ir_dump_samples(u32 *samples, int count)
 {
 	int i, bit, start;

 	printk(KERN_DEBUG "ir samples: ");
 	start = 0;
 	for (i = 0; i < count * 32; i++) {
 		bit = getbit(samples,i);
 		if (bit)
 			start = 1;
 		if (0 == start)
 			continue;
 		printk("%s", bit ? "#" : "_");
 	}
 	printk("\n");
 	return 0;
 }

 /* decode raw samples, pulse distance coding used by NEC remotes */
 int ir_decode_pulsedistance(u32 *samples, int count, int low, int high)
 {
 	int i,last,bit,len;
 	u32 curBit;
 	u32 value;

 	/* find start burst */
 	for (i = len = 0; i < count * 32; i++) {
 		bit = getbit(samples,i);
 		if (bit) {
 			len++;
 		} else {
 			if (len >= 29)
 				break;
 			len = 0;
 		}
 	}

 	/* start burst to short */
 	if (len < 29)
 		return 0xffffffff;

 	/* find start silence */
 	for (len = 0; i < count * 32; i++) {
 		bit = getbit(samples,i);
 		if (bit) {
 			break;
 		} else {
 			len++;
 		}
 	}

 	/* silence to short */
 	if (len < 7)
 		return 0xffffffff;

 	/* go decoding */
 	len   = 0;
 	last = 1;
 	value = 0; curBit = 1;
 	for (; i < count * 32; i++) {
 		bit  = getbit(samples,i);
 		if (last) {
 			if(bit) {
 				continue;
 			} else {
 				len = 1;
 			}
 		} else {
 			if (bit) {
 				if (len > (low + high) /2)
 					value |= curBit;
 				curBit <<= 1;
 				if (curBit == 1)
 					break;
 			} else {
 				len++;
 			}
 		}
 		last = bit;
 	}

 	return value;
 }

 /* decode raw samples, biphase coding, used by rc5 for example */
 int ir_decode_biphase(u32 *samples, int count, int low, int high)
 {
 	int i,last,bit,len,flips;
 	u32 value;

 	/* find start bit (1) */
 	for (i = 0; i < 32; i++) {
 		bit = getbit(samples,i);
 		if (bit)
 			break;
 	}

 	/* go decoding */
 	len   = 0;
 	flips = 0;
 	value = 1;
 	for (; i < count * 32; i++) {
 		if (len > high)
 			break;
 		if (flips > 1)
 			break;
 		last = bit;
 		bit  = getbit(samples,i);
 		if (last == bit) {
 			len++;
 			continue;
 		}
 		if (len < low) {
 			len++;
 			flips++;
 			continue;
 		}
 		value <<= 1;
 		value |= bit;
 		flips = 0;
 		len   = 1;
 	}
 	return value;
 }

 /* RC5 decoding stuff, moved from bttv-input.c to share it with
  * saa7134 */

 /* decode raw bit pattern to RC5 code */
 u32 ir_rc5_decode(unsigned int code)
 {
 	unsigned int org_code = code;
 	unsigned int pair;
 	unsigned int rc5 = 0;
 	int i;

 	for (i = 0; i < 14; ++i) {
 		pair = code & 0x3;
 		code >>= 2;

 		rc5 <<= 1;
 		switch (pair) {
 		case 0:
 		case 2:
 			break;
 		case 1:
 			rc5 |= 1;
 			break;
 		case 3:
 			dprintk(1, "ir-common: ir_rc5_decode(%x) bad code\n", org_code);
 			return 0;
 		}
 	}
 	dprintk(1, "ir-common: code=%x, rc5=%x, start=%x, toggle=%x, address=%x, "
 		"instr=%x\n", rc5, org_code, RC5_START(rc5),
 		RC5_TOGGLE(rc5), RC5_ADDR(rc5), RC5_INSTR(rc5));
 	return rc5;
 }

 void ir_rc5_timer_end(unsigned long data)
 {
 	struct card_ir *ir = (struct card_ir *)data;
 	struct timeval tv;
 	unsigned long current_jiffies, timeout;
 	u32 gap;
 	u32 rc5 = 0;

 	/* get time */
 	current_jiffies = jiffies;
 	do_gettimeofday(&tv);

 	/* avoid overflow with gap >1s */
 	if (tv.tv_sec - ir->base_time.tv_sec > 1) {
 		gap = 200000;
 	} else {
 		gap = 1000000 * (tv.tv_sec - ir->base_time.tv_sec) +
 		    tv.tv_usec - ir->base_time.tv_usec;
 	}

 	/* signal we're ready to start a new code */
 	ir->active = 0;

 	/* Allow some timer jitter (RC5 is ~24ms anyway so this is ok) */
 	if (gap < 28000) {
 		dprintk(1, "ir-common: spurious timer_end\n");
 		return;
 	}

 	if (ir->last_bit < 20) {
 		/* ignore spurious codes (caused by light/other remotes) */
 		dprintk(1, "ir-common: short code: %x\n", ir->code);
 	} else {
 		ir->code = (ir->code << ir->shift_by) | 1;
 		rc5 = ir_rc5_decode(ir->code);

 		/* two start bits? */
 		if (RC5_START(rc5) != ir->start) {
 			dprintk(1, "ir-common: rc5 start bits invalid: %u\n", RC5_START(rc5));

 			/* right address? */
 		} else if (RC5_ADDR(rc5) == ir->addr) {
 			u32 toggle = RC5_TOGGLE(rc5);
 			u32 instr = RC5_INSTR(rc5);

 			/* Good code, decide if repeat/repress */
 			if (toggle != RC5_TOGGLE(ir->last_rc5) ||
 			    instr != RC5_INSTR(ir->last_rc5)) {
 				dprintk(1, "ir-common: instruction %x, toggle %x\n", instr,
 					toggle);
 				ir_input_nokey(ir->dev, &ir->ir);
 				ir_input_keydown(ir->dev, &ir->ir, instr,
 						 instr);
 			}

 			/* Set/reset key-up timer */
 			timeout = current_jiffies +
 				  msecs_to_jiffies(ir->rc5_key_timeout);
 			mod_timer(&ir->timer_keyup, timeout);

 			/* Save code for repeat test */
 			ir->last_rc5 = rc5;
 		}
 	}
 }

 void ir_rc5_timer_keyup(unsigned long data)
 {
 	struct card_ir *ir = (struct card_ir *)data;

 	dprintk(1, "ir-common: key released\n");
 	ir_input_nokey(ir->dev, &ir->ir);
 }

 EXPORT_SYMBOL_GPL(ir_input_init);
 EXPORT_SYMBOL_GPL(ir_input_nokey);
 EXPORT_SYMBOL_GPL(ir_input_keydown);

 EXPORT_SYMBOL_GPL(ir_extract_bits);
 EXPORT_SYMBOL_GPL(ir_dump_samples);
 EXPORT_SYMBOL_GPL(ir_decode_biphase);
 EXPORT_SYMBOL_GPL(ir_decode_pulsedistance);

 EXPORT_SYMBOL_GPL(ir_rc5_decode);
 EXPORT_SYMBOL_GPL(ir_rc5_timer_end);
 EXPORT_SYMBOL_GPL(ir_rc5_timer_keyup);

 /*
  * Local variables:
  * c-basic-offset: 8
  * End:
  */
	/*
	*
	* some common structs and functions to handle infrared remotes via
	* input layer ...
	*
	* (c) 2003 Gerd Knorr <kraxel@bytesex.org> [SuSE Labs]
	*
	* 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/moduleparam.h>
	#include <linux/string.h>
	#include <linux/jiffies.h>
	#include <media/ir-common.h>

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

	MODULE_AUTHOR("Gerd Knorr <kraxel@bytesex.org> [SuSE Labs]");
	MODULE_LICENSE("GPL");

	static int repeat = 1;
	module_param(repeat, int, 0444);
	MODULE_PARM_DESC(repeat,"auto-repeat for IR keys (default: on)");

	static int debug = 0; /* debug level (0,1,2) */
	module_param(debug, int, 0644);

	#define dprintk(level, fmt, arg...) if (debug >= level) \
	printk(KERN_DEBUG fmt , ## arg)

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

	static void ir_input_key_event(struct input_dev dev, struct ir_input_state ir)
	{
	if (KEY_RESERVED == ir->keycode) {
	printk(KERN_INFO "%s: unknown key: key=0x%02x raw=0x%02x down=%d\n",
	dev->name,ir->ir_key,ir->ir_raw,ir->keypressed);
	return;
	}
	dprintk(1,"%s: key event code=%d down=%d\n",
	dev->name,ir->keycode,ir->keypressed);
	input_report_key(dev,ir->keycode,ir->keypressed);
	input_sync(dev);
	}

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

	void ir_input_init(struct input_dev dev, struct ir_input_state ir,
	int ir_type, IR_KEYTAB_TYPE *ir_codes)
	{
	int i;

	ir->ir_type = ir_type;
	if (ir_codes)
	memcpy(ir->ir_codes, ir_codes, sizeof(ir->ir_codes));


	dev->keycode = ir->ir_codes;
	dev->keycodesize = sizeof(IR_KEYTAB_TYPE);
	dev->keycodemax = IR_KEYTAB_SIZE;
	for (i = 0; i < IR_KEYTAB_SIZE; i++)
	set_bit(ir->ir_codes[i], dev->keybit);
	clear_bit(0, dev->keybit);

	set_bit(EV_KEY, dev->evbit);
	if (repeat)
	set_bit(EV_REP, dev->evbit);
	}

	void ir_input_nokey(struct input_dev dev, struct ir_input_state ir)
	{
	if (ir->keypressed) {
	ir->keypressed = 0;
	ir_input_key_event(dev,ir);
	}
	}

	void ir_input_keydown(struct input_dev dev, struct ir_input_state ir,
	u32 ir_key, u32 ir_raw)
	{
	u32 keycode = IR_KEYCODE(ir->ir_codes, ir_key);

	if (ir->keypressed && ir->keycode != keycode) {
	ir->keypressed = 0;
	ir_input_key_event(dev,ir);
	}
	if (!ir->keypressed) {
	ir->ir_key = ir_key;
	ir->ir_raw = ir_raw;
	ir->keycode = keycode;
	ir->keypressed = 1;
	ir_input_key_event(dev,ir);
	}
	}

	/* -------------------------------------------------------------------------- */
	/* extract mask bits out of data and pack them into the result */
	u32 ir_extract_bits(u32 data, u32 mask)
	{
	u32 vbit = 1, value = 0;

	do {
	if (mask&1) {
	if (data&1)
	value \|= vbit;
	vbit<<=1;
	}
	data>>=1;
	} while (mask>>=1);

	return value;
	}

	static int inline getbit(u32 *samples, int bit)
	{
	return (samples[bit/32] & (1 << (31-(bit%32)))) ? 1 : 0;
	}

	/* sump raw samples for visual debugging ;) */
	int ir_dump_samples(u32 *samples, int count)
	{
	int i, bit, start;

	printk(KERN_DEBUG "ir samples: ");
	start = 0;
	for (i = 0; i < count * 32; i++) {
	bit = getbit(samples,i);
	if (bit)
	start = 1;
	if (0 == start)
	continue;
	printk("%s", bit ? "#" : "_");
	}
	printk("\n");
	return 0;
	}

	/* decode raw samples, pulse distance coding used by NEC remotes */
	int ir_decode_pulsedistance(u32 *samples, int count, int low, int high)
	{
	int i,last,bit,len;
	u32 curBit;
	u32 value;

	/* find start burst */
	for (i = len = 0; i < count * 32; i++) {
	bit = getbit(samples,i);
	if (bit) {
	len++;
	} else {
	if (len >= 29)
	break;
	len = 0;
	}
	}

	/* start burst to short */
	if (len < 29)
	return 0xffffffff;

	/* find start silence */
	for (len = 0; i < count * 32; i++) {
	bit = getbit(samples,i);
	if (bit) {
	break;
	} else {
	len++;
	}
	}

	/* silence to short */
	if (len < 7)
	return 0xffffffff;

	/* go decoding */
	len = 0;
	last = 1;
	value = 0; curBit = 1;
	for (; i < count * 32; i++) {
	bit = getbit(samples,i);
	if (last) {
	if(bit) {
	continue;
	} else {
	len = 1;
	}
	} else {
	if (bit) {
	if (len > (low + high) /2)
	value \|= curBit;
	curBit <<= 1;
	if (curBit == 1)
	break;
	} else {
	len++;
	}
	}
	last = bit;
	}

	return value;
	}

	/* decode raw samples, biphase coding, used by rc5 for example */
	int ir_decode_biphase(u32 *samples, int count, int low, int high)
	{
	int i,last,bit,len,flips;
	u32 value;

	/* find start bit (1) */
	for (i = 0; i < 32; i++) {
	bit = getbit(samples,i);
	if (bit)
	break;
	}

	/* go decoding */
	len = 0;
	flips = 0;
	value = 1;
	for (; i < count * 32; i++) {
	if (len > high)
	break;
	if (flips > 1)
	break;
	last = bit;
	bit = getbit(samples,i);
	if (last == bit) {
	len++;
	continue;
	}
	if (len < low) {
	len++;
	flips++;
	continue;
	}
	value <<= 1;
	value \|= bit;
	flips = 0;
	len = 1;
	}
	return value;
	}

	/* RC5 decoding stuff, moved from bttv-input.c to share it with
	* saa7134 */

	/* decode raw bit pattern to RC5 code */
	u32 ir_rc5_decode(unsigned int code)
	{
	unsigned int org_code = code;
	unsigned int pair;
	unsigned int rc5 = 0;
	int i;

	for (i = 0; i < 14; ++i) {
	pair = code & 0x3;
	code >>= 2;

	rc5 <<= 1;
	switch (pair) {
	case 0:
	case 2:
	break;
	case 1:
	rc5 \|= 1;
	break;
	case 3:
	dprintk(1, "ir-common: ir_rc5_decode(%x) bad code\n", org_code);
	return 0;
	}
	}
	dprintk(1, "ir-common: code=%x, rc5=%x, start=%x, toggle=%x, address=%x, "
	"instr=%x\n", rc5, org_code, RC5_START(rc5),
	RC5_TOGGLE(rc5), RC5_ADDR(rc5), RC5_INSTR(rc5));
	return rc5;
	}

	void ir_rc5_timer_end(unsigned long data)
	{
	struct card_ir ir = (struct card_ir )data;
	struct timeval tv;
	unsigned long current_jiffies, timeout;
	u32 gap;
	u32 rc5 = 0;

	/* get time */
	current_jiffies = jiffies;
	do_gettimeofday(&tv);

	/* avoid overflow with gap >1s */
	if (tv.tv_sec - ir->base_time.tv_sec > 1) {
	gap = 200000;
	} else {
	gap = 1000000 * (tv.tv_sec - ir->base_time.tv_sec) +
	tv.tv_usec - ir->base_time.tv_usec;
	}

	/* signal we're ready to start a new code */
	ir->active = 0;

	/* Allow some timer jitter (RC5 is ~24ms anyway so this is ok) */
	if (gap < 28000) {
	dprintk(1, "ir-common: spurious timer_end\n");
	return;
	}

	if (ir->last_bit < 20) {
	/* ignore spurious codes (caused by light/other remotes) */
	dprintk(1, "ir-common: short code: %x\n", ir->code);
	} else {
	ir->code = (ir->code << ir->shift_by) \| 1;
	rc5 = ir_rc5_decode(ir->code);

	/* two start bits? */
	if (RC5_START(rc5) != ir->start) {
	dprintk(1, "ir-common: rc5 start bits invalid: %u\n", RC5_START(rc5));

	/* right address? */
	} else if (RC5_ADDR(rc5) == ir->addr) {
	u32 toggle = RC5_TOGGLE(rc5);
	u32 instr = RC5_INSTR(rc5);

	/* Good code, decide if repeat/repress */
	if (toggle != RC5_TOGGLE(ir->last_rc5) \|\|
	instr != RC5_INSTR(ir->last_rc5)) {
	dprintk(1, "ir-common: instruction %x, toggle %x\n", instr,
	toggle);
	ir_input_nokey(ir->dev, &ir->ir);
	ir_input_keydown(ir->dev, &ir->ir, instr,
	instr);
	}

	/* Set/reset key-up timer */
	timeout = current_jiffies +
	msecs_to_jiffies(ir->rc5_key_timeout);
	mod_timer(&ir->timer_keyup, timeout);

	/* Save code for repeat test */
	ir->last_rc5 = rc5;
	}
	}
	}

	void ir_rc5_timer_keyup(unsigned long data)
	{
	struct card_ir ir = (struct card_ir )data;

	dprintk(1, "ir-common: key released\n");
	ir_input_nokey(ir->dev, &ir->ir);
	}

	EXPORT_SYMBOL_GPL(ir_input_init);
	EXPORT_SYMBOL_GPL(ir_input_nokey);
	EXPORT_SYMBOL_GPL(ir_input_keydown);

	EXPORT_SYMBOL_GPL(ir_extract_bits);
	EXPORT_SYMBOL_GPL(ir_dump_samples);
	EXPORT_SYMBOL_GPL(ir_decode_biphase);
	EXPORT_SYMBOL_GPL(ir_decode_pulsedistance);

	EXPORT_SYMBOL_GPL(ir_rc5_decode);
	EXPORT_SYMBOL_GPL(ir_rc5_timer_end);
	EXPORT_SYMBOL_GPL(ir_rc5_timer_keyup);

	/*
	* Local variables:
	* c-basic-offset: 8
	* End:
	*/