xref: /openbmc/linux/drivers/input/misc/yealink.c (revision 08642e7c)
1 /*
2  * drivers/usb/input/yealink.c
3  *
4  * Copyright (c) 2005 Henk Vergonet <Henk.Vergonet@gmail.com>
5  *
6  * This program is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU General Public License as
8  * published by the Free Software Foundation; either version 2 of
9  * the License, or (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
19  */
20 /*
21  * Description:
22  *   Driver for the USB-P1K voip usb phone.
23  *   This device is produced by Yealink Network Technology Co Ltd
24  *   but may be branded under several names:
25  *	- Yealink usb-p1k
26  *	- Tiptel 115
27  *	- ...
28  *
29  * This driver is based on:
30  *   - the usbb2k-api	http://savannah.nongnu.org/projects/usbb2k-api/
31  *   - information from	http://memeteau.free.fr/usbb2k
32  *   - the xpad-driver	drivers/input/joystick/xpad.c
33  *
34  * Thanks to:
35  *   - Olivier Vandorpe, for providing the usbb2k-api.
36  *   - Martin Diehl, for spotting my memory allocation bug.
37  *
38  * History:
39  *   20050527 henk	First version, functional keyboard. Keyboard events
40  *			will pop-up on the ../input/eventX bus.
41  *   20050531 henk	Added led, LCD, dialtone and sysfs interface.
42  *   20050610 henk	Cleanups, make it ready for public consumption.
43  *   20050630 henk	Cleanups, fixes in response to comments.
44  *   20050701 henk	sysfs write serialisation, fix potential unload races
45  *   20050801 henk	Added ringtone, restructure USB
46  *   20050816 henk	Merge 2.6.13-rc6
47  */
48 
49 #include <linux/kernel.h>
50 #include <linux/init.h>
51 #include <linux/slab.h>
52 #include <linux/module.h>
53 #include <linux/rwsem.h>
54 #include <linux/usb/input.h>
55 #include <linux/map_to_7segment.h>
56 
57 #include "yealink.h"
58 
59 #define DRIVER_VERSION "yld-20051230"
60 #define DRIVER_AUTHOR "Henk Vergonet"
61 #define DRIVER_DESC "Yealink phone driver"
62 
63 #define YEALINK_POLLING_FREQUENCY	10	/* in [Hz] */
64 
65 struct yld_status {
66 	u8	lcd[24];
67 	u8	led;
68 	u8	dialtone;
69 	u8	ringtone;
70 	u8	keynum;
71 } __attribute__ ((packed));
72 
73 /*
74  * Register the LCD segment and icon map
75  */
76 #define _LOC(k,l)	{ .a = (k), .m = (l) }
77 #define _SEG(t, a, am, b, bm, c, cm, d, dm, e, em, f, fm, g, gm)	\
78 	{ .type	= (t),							\
79 	  .u = { .s = {	_LOC(a, am), _LOC(b, bm), _LOC(c, cm),		\
80 		        _LOC(d, dm), _LOC(e, em), _LOC(g, gm),		\
81 			_LOC(f, fm) } } }
82 #define _PIC(t, h, hm, n)						\
83 	{ .type	= (t),							\
84  	  .u = { .p = { .name = (n), .a = (h), .m = (hm) } } }
85 
86 static const struct lcd_segment_map {
87 	char	type;
88 	union {
89 		struct pictogram_map {
90 			u8	a,m;
91 			char	name[10];
92 		}	p;
93 		struct segment_map {
94 			u8	a,m;
95 		} s[7];
96 	} u;
97 } lcdMap[] = {
98 #include "yealink.h"
99 };
100 
101 struct yealink_dev {
102 	struct input_dev *idev;		/* input device */
103 	struct usb_device *udev;	/* usb device */
104 
105 	/* irq input channel */
106 	struct yld_ctl_packet	*irq_data;
107 	dma_addr_t		irq_dma;
108 	struct urb		*urb_irq;
109 
110 	/* control output channel */
111 	struct yld_ctl_packet	*ctl_data;
112 	dma_addr_t		ctl_dma;
113 	struct usb_ctrlrequest	*ctl_req;
114 	struct urb		*urb_ctl;
115 
116 	char phys[64];			/* physical device path */
117 
118 	u8 lcdMap[ARRAY_SIZE(lcdMap)];	/* state of LCD, LED ... */
119 	int key_code;			/* last reported key	 */
120 
121 	unsigned int shutdown:1;
122 
123 	int	stat_ix;
124 	union {
125 		struct yld_status s;
126 		u8		  b[sizeof(struct yld_status)];
127 	} master, copy;
128 };
129 
130 
131 /*******************************************************************************
132  * Yealink lcd interface
133  ******************************************************************************/
134 
135 /*
136  * Register a default 7 segment character set
137  */
138 static SEG7_DEFAULT_MAP(map_seg7);
139 
140  /* Display a char,
141   * char '\9' and '\n' are placeholders and do not overwrite the original text.
142   * A space will always hide an icon.
143   */
144 static int setChar(struct yealink_dev *yld, int el, int chr)
145 {
146 	int i, a, m, val;
147 
148 	if (el >= ARRAY_SIZE(lcdMap))
149 		return -EINVAL;
150 
151 	if (chr == '\t' || chr == '\n')
152 	    return 0;
153 
154 	yld->lcdMap[el] = chr;
155 
156 	if (lcdMap[el].type == '.') {
157 		a = lcdMap[el].u.p.a;
158 		m = lcdMap[el].u.p.m;
159 		if (chr != ' ')
160 			yld->master.b[a] |= m;
161 		else
162 			yld->master.b[a] &= ~m;
163 		return 0;
164 	}
165 
166 	val = map_to_seg7(&map_seg7, chr);
167 	for (i = 0; i < ARRAY_SIZE(lcdMap[0].u.s); i++) {
168 		m = lcdMap[el].u.s[i].m;
169 
170 		if (m == 0)
171 			continue;
172 
173 		a = lcdMap[el].u.s[i].a;
174 		if (val & 1)
175 			yld->master.b[a] |= m;
176 		else
177 			yld->master.b[a] &= ~m;
178 		val = val >> 1;
179 	}
180 	return 0;
181 };
182 
183 /*******************************************************************************
184  * Yealink key interface
185  ******************************************************************************/
186 
187 /* Map device buttons to internal key events.
188  *
189  * USB-P1K button layout:
190  *
191  *             up
192  *       IN           OUT
193  *            down
194  *
195  *     pickup   C    hangup
196  *       1      2      3
197  *       4      5      6
198  *       7      8      9
199  *       *      0      #
200  *
201  * The "up" and "down" keys, are symbolised by arrows on the button.
202  * The "pickup" and "hangup" keys are symbolised by a green and red phone
203  * on the button.
204  */
205 static int map_p1k_to_key(int scancode)
206 {
207 	switch(scancode) {		/* phone key:	*/
208 	case 0x23: return KEY_LEFT;	/*   IN		*/
209 	case 0x33: return KEY_UP;	/*   up		*/
210 	case 0x04: return KEY_RIGHT;	/*   OUT	*/
211 	case 0x24: return KEY_DOWN;	/*   down	*/
212 	case 0x03: return KEY_ENTER;	/*   pickup	*/
213 	case 0x14: return KEY_BACKSPACE; /*  C		*/
214 	case 0x13: return KEY_ESC;	/*   hangup	*/
215 	case 0x00: return KEY_1;	/*   1		*/
216 	case 0x01: return KEY_2;	/*   2 		*/
217 	case 0x02: return KEY_3;	/*   3		*/
218 	case 0x10: return KEY_4;	/*   4		*/
219 	case 0x11: return KEY_5;	/*   5		*/
220 	case 0x12: return KEY_6;	/*   6		*/
221 	case 0x20: return KEY_7;	/*   7		*/
222 	case 0x21: return KEY_8;	/*   8		*/
223 	case 0x22: return KEY_9;	/*   9		*/
224 	case 0x30: return KEY_KPASTERISK; /* *		*/
225 	case 0x31: return KEY_0;	/*   0		*/
226 	case 0x32: return KEY_LEFTSHIFT |
227 			  KEY_3 << 8;	/*   #		*/
228 	}
229 	return -EINVAL;
230 }
231 
232 /* Completes a request by converting the data into events for the
233  * input subsystem.
234  *
235  * The key parameter can be cascaded: key2 << 8 | key1
236  */
237 static void report_key(struct yealink_dev *yld, int key)
238 {
239 	struct input_dev *idev = yld->idev;
240 
241 	if (yld->key_code >= 0) {
242 		/* old key up */
243 		input_report_key(idev, yld->key_code & 0xff, 0);
244 		if (yld->key_code >> 8)
245 			input_report_key(idev, yld->key_code >> 8, 0);
246 	}
247 
248 	yld->key_code = key;
249 	if (key >= 0) {
250 		/* new valid key */
251 		input_report_key(idev, key & 0xff, 1);
252 		if (key >> 8)
253 			input_report_key(idev, key >> 8, 1);
254 	}
255 	input_sync(idev);
256 }
257 
258 /*******************************************************************************
259  * Yealink usb communication interface
260  ******************************************************************************/
261 
262 static int yealink_cmd(struct yealink_dev *yld, struct yld_ctl_packet *p)
263 {
264 	u8	*buf = (u8 *)p;
265 	int	i;
266 	u8	sum = 0;
267 
268 	for(i=0; i<USB_PKT_LEN-1; i++)
269 		sum -= buf[i];
270 	p->sum = sum;
271 	return usb_control_msg(yld->udev,
272 			usb_sndctrlpipe(yld->udev, 0),
273 			USB_REQ_SET_CONFIGURATION,
274 			USB_TYPE_CLASS | USB_RECIP_INTERFACE | USB_DIR_OUT,
275 			0x200, 3,
276 			p, sizeof(*p),
277 			USB_CTRL_SET_TIMEOUT);
278 }
279 
280 static u8 default_ringtone[] = {
281 	0xEF,			/* volume [0-255] */
282 	0xFB, 0x1E, 0x00, 0x0C,	/* 1250 [hz], 12/100 [s] */
283 	0xFC, 0x18, 0x00, 0x0C,	/* 1000 [hz], 12/100 [s] */
284 	0xFB, 0x1E, 0x00, 0x0C,
285 	0xFC, 0x18, 0x00, 0x0C,
286 	0xFB, 0x1E, 0x00, 0x0C,
287 	0xFC, 0x18, 0x00, 0x0C,
288 	0xFB, 0x1E, 0x00, 0x0C,
289 	0xFC, 0x18, 0x00, 0x0C,
290 	0xFF, 0xFF, 0x01, 0x90,	/* silent, 400/100 [s] */
291 	0x00, 0x00		/* end of sequence */
292 };
293 
294 static int yealink_set_ringtone(struct yealink_dev *yld, u8 *buf, size_t size)
295 {
296 	struct yld_ctl_packet *p = yld->ctl_data;
297 	int	ix, len;
298 
299 	if (size <= 0)
300 		return -EINVAL;
301 
302 	/* Set the ringtone volume */
303 	memset(yld->ctl_data, 0, sizeof(*(yld->ctl_data)));
304 	yld->ctl_data->cmd	= CMD_RING_VOLUME;
305 	yld->ctl_data->size	= 1;
306 	yld->ctl_data->data[0]	= buf[0];
307 	yealink_cmd(yld, p);
308 
309 	buf++;
310 	size--;
311 
312 	p->cmd = CMD_RING_NOTE;
313 	ix = 0;
314 	while (size != ix) {
315 		len = size - ix;
316 		if (len > sizeof(p->data))
317 			len = sizeof(p->data);
318 		p->size	  = len;
319 		p->offset = cpu_to_be16(ix);
320 		memcpy(p->data, &buf[ix], len);
321 		yealink_cmd(yld, p);
322 		ix += len;
323 	}
324 	return 0;
325 }
326 
327 /* keep stat_master & stat_copy in sync.
328  */
329 static int yealink_do_idle_tasks(struct yealink_dev *yld)
330 {
331 	u8 val;
332 	int i, ix, len;
333 
334 	ix = yld->stat_ix;
335 
336 	memset(yld->ctl_data, 0, sizeof(*(yld->ctl_data)));
337 	yld->ctl_data->cmd  = CMD_KEYPRESS;
338 	yld->ctl_data->size = 1;
339 	yld->ctl_data->sum  = 0xff - CMD_KEYPRESS;
340 
341 	/* If state update pointer wraps do a KEYPRESS first. */
342 	if (ix >= sizeof(yld->master)) {
343 		yld->stat_ix = 0;
344 		return 0;
345 	}
346 
347 	/* find update candidates: copy != master */
348 	do {
349 		val = yld->master.b[ix];
350 		if (val != yld->copy.b[ix])
351 			goto send_update;
352 	} while (++ix < sizeof(yld->master));
353 
354 	/* nothing todo, wait a bit and poll for a KEYPRESS */
355 	yld->stat_ix = 0;
356 	/* TODO how can we wait abit. ??
357 	 * msleep_interruptible(1000 / YEALINK_POLLING_FREQUENCY);
358 	 */
359 	return 0;
360 
361 send_update:
362 
363 	/* Setup an appropriate update request */
364 	yld->copy.b[ix] = val;
365 	yld->ctl_data->data[0] = val;
366 
367 	switch(ix) {
368 	case offsetof(struct yld_status, led):
369 		yld->ctl_data->cmd	= CMD_LED;
370 		yld->ctl_data->sum	= -1 - CMD_LED - val;
371 		break;
372 	case offsetof(struct yld_status, dialtone):
373 		yld->ctl_data->cmd	= CMD_DIALTONE;
374 		yld->ctl_data->sum	= -1 - CMD_DIALTONE - val;
375 		break;
376 	case offsetof(struct yld_status, ringtone):
377 		yld->ctl_data->cmd	= CMD_RINGTONE;
378 		yld->ctl_data->sum	= -1 - CMD_RINGTONE - val;
379 		break;
380 	case offsetof(struct yld_status, keynum):
381 		val--;
382 		val &= 0x1f;
383 		yld->ctl_data->cmd	= CMD_SCANCODE;
384 		yld->ctl_data->offset	= cpu_to_be16(val);
385 		yld->ctl_data->data[0]	= 0;
386 		yld->ctl_data->sum	= -1 - CMD_SCANCODE - val;
387 		break;
388 	default:
389 		len = sizeof(yld->master.s.lcd) - ix;
390 		if (len > sizeof(yld->ctl_data->data))
391 			len = sizeof(yld->ctl_data->data);
392 
393 		/* Combine up to <len> consecutive LCD bytes in a singe request
394 		 */
395 		yld->ctl_data->cmd	= CMD_LCD;
396 		yld->ctl_data->offset	= cpu_to_be16(ix);
397 		yld->ctl_data->size	= len;
398 		yld->ctl_data->sum	= -CMD_LCD - ix - val - len;
399 		for(i=1; i<len; i++) {
400 			ix++;
401 			val = yld->master.b[ix];
402 			yld->copy.b[ix]		= val;
403 			yld->ctl_data->data[i]	= val;
404 			yld->ctl_data->sum     -= val;
405 		}
406 	}
407 	yld->stat_ix = ix + 1;
408 	return 1;
409 }
410 
411 /* Decide on how to handle responses
412  *
413  * The state transition diagram is somethhing like:
414  *
415  *          syncState<--+
416  *               |      |
417  *               |    idle
418  *              \|/     |
419  * init --ok--> waitForKey --ok--> getKey
420  *  ^               ^                |
421  *  |               +-------ok-------+
422  * error,start
423  *
424  */
425 static void urb_irq_callback(struct urb *urb)
426 {
427 	struct yealink_dev *yld = urb->context;
428 	int ret, status = urb->status;
429 
430 	if (status)
431 		err("%s - urb status %d", __func__, status);
432 
433 	switch (yld->irq_data->cmd) {
434 	case CMD_KEYPRESS:
435 
436 		yld->master.s.keynum = yld->irq_data->data[0];
437 		break;
438 
439 	case CMD_SCANCODE:
440 		dbg("get scancode %x", yld->irq_data->data[0]);
441 
442 		report_key(yld, map_p1k_to_key(yld->irq_data->data[0]));
443 		break;
444 
445 	default:
446 		err("unexpected response %x", yld->irq_data->cmd);
447 	}
448 
449 	yealink_do_idle_tasks(yld);
450 
451 	if (!yld->shutdown) {
452 		ret = usb_submit_urb(yld->urb_ctl, GFP_ATOMIC);
453 		if (ret && ret != -EPERM)
454 			err("%s - usb_submit_urb failed %d", __func__, ret);
455 	}
456 }
457 
458 static void urb_ctl_callback(struct urb *urb)
459 {
460 	struct yealink_dev *yld = urb->context;
461 	int ret = 0, status = urb->status;
462 
463 	if (status)
464 		err("%s - urb status %d", __func__, status);
465 
466 	switch (yld->ctl_data->cmd) {
467 	case CMD_KEYPRESS:
468 	case CMD_SCANCODE:
469 		/* ask for a response */
470 		if (!yld->shutdown)
471 			ret = usb_submit_urb(yld->urb_irq, GFP_ATOMIC);
472 		break;
473 	default:
474 		/* send new command */
475 		yealink_do_idle_tasks(yld);
476 		if (!yld->shutdown)
477 			ret = usb_submit_urb(yld->urb_ctl, GFP_ATOMIC);
478 		break;
479 	}
480 
481 	if (ret && ret != -EPERM)
482 		err("%s - usb_submit_urb failed %d", __func__, ret);
483 }
484 
485 /*******************************************************************************
486  * input event interface
487  ******************************************************************************/
488 
489 /* TODO should we issue a ringtone on a SND_BELL event?
490 static int input_ev(struct input_dev *dev, unsigned int type,
491 		unsigned int code, int value)
492 {
493 
494 	if (type != EV_SND)
495 		return -EINVAL;
496 
497 	switch (code) {
498 	case SND_BELL:
499 	case SND_TONE:
500 		break;
501 	default:
502 		return -EINVAL;
503 	}
504 
505 	return 0;
506 }
507 */
508 
509 static int input_open(struct input_dev *dev)
510 {
511 	struct yealink_dev *yld = input_get_drvdata(dev);
512 	int i, ret;
513 
514 	dbg("%s", __func__);
515 
516 	/* force updates to device */
517 	for (i = 0; i<sizeof(yld->master); i++)
518 		yld->copy.b[i] = ~yld->master.b[i];
519 	yld->key_code = -1;	/* no keys pressed */
520 
521         yealink_set_ringtone(yld, default_ringtone, sizeof(default_ringtone));
522 
523 	/* issue INIT */
524 	memset(yld->ctl_data, 0, sizeof(*(yld->ctl_data)));
525 	yld->ctl_data->cmd	= CMD_INIT;
526 	yld->ctl_data->size	= 10;
527 	yld->ctl_data->sum	= 0x100-CMD_INIT-10;
528 	if ((ret = usb_submit_urb(yld->urb_ctl, GFP_KERNEL)) != 0) {
529 		dbg("%s - usb_submit_urb failed with result %d",
530 		     __func__, ret);
531 		return ret;
532 	}
533 	return 0;
534 }
535 
536 static void input_close(struct input_dev *dev)
537 {
538 	struct yealink_dev *yld = input_get_drvdata(dev);
539 
540 	yld->shutdown = 1;
541 	/*
542 	 * Make sure the flag is seen by other CPUs before we start
543 	 * killing URBs so new URBs won't be submitted
544 	 */
545 	smp_wmb();
546 
547 	usb_kill_urb(yld->urb_ctl);
548 	usb_kill_urb(yld->urb_irq);
549 
550 	yld->shutdown = 0;
551 	smp_wmb();
552 }
553 
554 /*******************************************************************************
555  * sysfs interface
556  ******************************************************************************/
557 
558 static DECLARE_RWSEM(sysfs_rwsema);
559 
560 /* Interface to the 7-segments translation table aka. char set.
561  */
562 static ssize_t show_map(struct device *dev, struct device_attribute *attr,
563 				char *buf)
564 {
565 	memcpy(buf, &map_seg7, sizeof(map_seg7));
566 	return sizeof(map_seg7);
567 }
568 
569 static ssize_t store_map(struct device *dev, struct device_attribute *attr,
570 				const char *buf, size_t cnt)
571 {
572 	if (cnt != sizeof(map_seg7))
573 		return -EINVAL;
574 	memcpy(&map_seg7, buf, sizeof(map_seg7));
575 	return sizeof(map_seg7);
576 }
577 
578 /* Interface to the LCD.
579  */
580 
581 /* Reading /sys/../lineX will return the format string with its settings:
582  *
583  * Example:
584  * cat ./line3
585  * 888888888888
586  * Linux Rocks!
587  */
588 static ssize_t show_line(struct device *dev, char *buf, int a, int b)
589 {
590 	struct yealink_dev *yld;
591 	int i;
592 
593 	down_read(&sysfs_rwsema);
594 	yld = dev_get_drvdata(dev);
595 	if (yld == NULL) {
596 		up_read(&sysfs_rwsema);
597 		return -ENODEV;
598 	}
599 
600 	for (i = a; i < b; i++)
601 		*buf++ = lcdMap[i].type;
602 	*buf++ = '\n';
603 	for (i = a; i < b; i++)
604 		*buf++ = yld->lcdMap[i];
605 	*buf++ = '\n';
606 	*buf = 0;
607 
608 	up_read(&sysfs_rwsema);
609 	return 3 + ((b - a) << 1);
610 }
611 
612 static ssize_t show_line1(struct device *dev, struct device_attribute *attr,
613 			char *buf)
614 {
615 	return show_line(dev, buf, LCD_LINE1_OFFSET, LCD_LINE2_OFFSET);
616 }
617 
618 static ssize_t show_line2(struct device *dev, struct device_attribute *attr,
619 			char *buf)
620 {
621 	return show_line(dev, buf, LCD_LINE2_OFFSET, LCD_LINE3_OFFSET);
622 }
623 
624 static ssize_t show_line3(struct device *dev, struct device_attribute *attr,
625 			char *buf)
626 {
627 	return show_line(dev, buf, LCD_LINE3_OFFSET, LCD_LINE4_OFFSET);
628 }
629 
630 /* Writing to /sys/../lineX will set the coresponding LCD line.
631  * - Excess characters are ignored.
632  * - If less characters are written than allowed, the remaining digits are
633  *   unchanged.
634  * - The '\n' or '\t' char is a placeholder, it does not overwrite the
635  *   original content.
636  */
637 static ssize_t store_line(struct device *dev, const char *buf, size_t count,
638 		int el, size_t len)
639 {
640 	struct yealink_dev *yld;
641 	int i;
642 
643 	down_write(&sysfs_rwsema);
644 	yld = dev_get_drvdata(dev);
645 	if (yld == NULL) {
646 		up_write(&sysfs_rwsema);
647 		return -ENODEV;
648 	}
649 
650 	if (len > count)
651 		len = count;
652 	for (i = 0; i < len; i++)
653 		setChar(yld, el++, buf[i]);
654 
655 	up_write(&sysfs_rwsema);
656 	return count;
657 }
658 
659 static ssize_t store_line1(struct device *dev, struct device_attribute *attr,
660 				const char *buf, size_t count)
661 {
662 	return store_line(dev, buf, count, LCD_LINE1_OFFSET, LCD_LINE1_SIZE);
663 }
664 
665 static ssize_t store_line2(struct device *dev, struct device_attribute *attr,
666 				const char *buf, size_t count)
667 {
668 	return store_line(dev, buf, count, LCD_LINE2_OFFSET, LCD_LINE2_SIZE);
669 }
670 
671 static ssize_t store_line3(struct device *dev, struct device_attribute *attr,
672 				const char *buf, size_t count)
673 {
674 	return store_line(dev, buf, count, LCD_LINE3_OFFSET, LCD_LINE3_SIZE);
675 }
676 
677 /* Interface to visible and audible "icons", these include:
678  * pictures on the LCD, the LED, and the dialtone signal.
679  */
680 
681 /* Get a list of "switchable elements" with their current state. */
682 static ssize_t get_icons(struct device *dev, struct device_attribute *attr,
683 			char *buf)
684 {
685 	struct yealink_dev *yld;
686 	int i, ret = 1;
687 
688 	down_read(&sysfs_rwsema);
689 	yld = dev_get_drvdata(dev);
690 	if (yld == NULL) {
691 		up_read(&sysfs_rwsema);
692 		return -ENODEV;
693 	}
694 
695 	for (i = 0; i < ARRAY_SIZE(lcdMap); i++) {
696 		if (lcdMap[i].type != '.')
697 			continue;
698 		ret += sprintf(&buf[ret], "%s %s\n",
699 				yld->lcdMap[i] == ' ' ? "  " : "on",
700 				lcdMap[i].u.p.name);
701 	}
702 	up_read(&sysfs_rwsema);
703 	return ret;
704 }
705 
706 /* Change the visibility of a particular element. */
707 static ssize_t set_icon(struct device *dev, const char *buf, size_t count,
708 			int chr)
709 {
710 	struct yealink_dev *yld;
711 	int i;
712 
713 	down_write(&sysfs_rwsema);
714 	yld = dev_get_drvdata(dev);
715 	if (yld == NULL) {
716 		up_write(&sysfs_rwsema);
717 		return -ENODEV;
718 	}
719 
720 	for (i = 0; i < ARRAY_SIZE(lcdMap); i++) {
721 		if (lcdMap[i].type != '.')
722 			continue;
723 		if (strncmp(buf, lcdMap[i].u.p.name, count) == 0) {
724 			setChar(yld, i, chr);
725 			break;
726 		}
727 	}
728 
729 	up_write(&sysfs_rwsema);
730 	return count;
731 }
732 
733 static ssize_t show_icon(struct device *dev, struct device_attribute *attr,
734 		const char *buf, size_t count)
735 {
736 	return set_icon(dev, buf, count, buf[0]);
737 }
738 
739 static ssize_t hide_icon(struct device *dev, struct device_attribute *attr,
740 		const char *buf, size_t count)
741 {
742 	return set_icon(dev, buf, count, ' ');
743 }
744 
745 /* Upload a ringtone to the device.
746  */
747 
748 /* Stores raw ringtone data in the phone */
749 static ssize_t store_ringtone(struct device *dev,
750 		struct device_attribute *attr,
751 		const char *buf, size_t count)
752 {
753 	struct yealink_dev *yld;
754 
755 	down_write(&sysfs_rwsema);
756 	yld = dev_get_drvdata(dev);
757 	if (yld == NULL) {
758 		up_write(&sysfs_rwsema);
759 		return -ENODEV;
760 	}
761 
762 	/* TODO locking with async usb control interface??? */
763 	yealink_set_ringtone(yld, (char *)buf, count);
764 	up_write(&sysfs_rwsema);
765 	return count;
766 }
767 
768 #define _M444	S_IRUGO
769 #define _M664	S_IRUGO|S_IWUSR|S_IWGRP
770 #define _M220	S_IWUSR|S_IWGRP
771 
772 static DEVICE_ATTR(map_seg7	, _M664, show_map	, store_map	);
773 static DEVICE_ATTR(line1	, _M664, show_line1	, store_line1	);
774 static DEVICE_ATTR(line2	, _M664, show_line2	, store_line2	);
775 static DEVICE_ATTR(line3	, _M664, show_line3	, store_line3	);
776 static DEVICE_ATTR(get_icons	, _M444, get_icons	, NULL		);
777 static DEVICE_ATTR(show_icon	, _M220, NULL		, show_icon	);
778 static DEVICE_ATTR(hide_icon	, _M220, NULL		, hide_icon	);
779 static DEVICE_ATTR(ringtone	, _M220, NULL		, store_ringtone);
780 
781 static struct attribute *yld_attributes[] = {
782 	&dev_attr_line1.attr,
783 	&dev_attr_line2.attr,
784 	&dev_attr_line3.attr,
785 	&dev_attr_get_icons.attr,
786 	&dev_attr_show_icon.attr,
787 	&dev_attr_hide_icon.attr,
788 	&dev_attr_map_seg7.attr,
789 	&dev_attr_ringtone.attr,
790 	NULL
791 };
792 
793 static struct attribute_group yld_attr_group = {
794 	.attrs = yld_attributes
795 };
796 
797 /*******************************************************************************
798  * Linux interface and usb initialisation
799  ******************************************************************************/
800 
801 struct driver_info {
802 	char *name;
803 };
804 
805 static const struct driver_info info_P1K = {
806 	.name	= "Yealink usb-p1k",
807 };
808 
809 static const struct usb_device_id usb_table [] = {
810 	{
811 		.match_flags		= USB_DEVICE_ID_MATCH_DEVICE |
812 						USB_DEVICE_ID_MATCH_INT_INFO,
813 		.idVendor		= 0x6993,
814 		.idProduct		= 0xb001,
815 		.bInterfaceClass	= USB_CLASS_HID,
816 		.bInterfaceSubClass	= 0,
817 		.bInterfaceProtocol	= 0,
818 		.driver_info		= (kernel_ulong_t)&info_P1K
819 	},
820 	{ }
821 };
822 
823 static int usb_cleanup(struct yealink_dev *yld, int err)
824 {
825 	if (yld == NULL)
826 		return err;
827 
828         if (yld->idev) {
829 		if (err)
830 			input_free_device(yld->idev);
831 		else
832 			input_unregister_device(yld->idev);
833 	}
834 
835 	usb_free_urb(yld->urb_irq);
836 	usb_free_urb(yld->urb_ctl);
837 
838 	kfree(yld->ctl_req);
839 	usb_free_coherent(yld->udev, USB_PKT_LEN, yld->ctl_data, yld->ctl_dma);
840 	usb_free_coherent(yld->udev, USB_PKT_LEN, yld->irq_data, yld->irq_dma);
841 
842 	kfree(yld);
843 	return err;
844 }
845 
846 static void usb_disconnect(struct usb_interface *intf)
847 {
848 	struct yealink_dev *yld;
849 
850 	down_write(&sysfs_rwsema);
851 	yld = usb_get_intfdata(intf);
852 	sysfs_remove_group(&intf->dev.kobj, &yld_attr_group);
853 	usb_set_intfdata(intf, NULL);
854 	up_write(&sysfs_rwsema);
855 
856 	usb_cleanup(yld, 0);
857 }
858 
859 static int usb_probe(struct usb_interface *intf, const struct usb_device_id *id)
860 {
861 	struct usb_device *udev = interface_to_usbdev (intf);
862 	struct driver_info *nfo = (struct driver_info *)id->driver_info;
863 	struct usb_host_interface *interface;
864 	struct usb_endpoint_descriptor *endpoint;
865 	struct yealink_dev *yld;
866 	struct input_dev *input_dev;
867 	int ret, pipe, i;
868 
869 	interface = intf->cur_altsetting;
870 	endpoint = &interface->endpoint[0].desc;
871 	if (!usb_endpoint_is_int_in(endpoint))
872 		return -ENODEV;
873 
874 	yld = kzalloc(sizeof(struct yealink_dev), GFP_KERNEL);
875 	if (!yld)
876 		return -ENOMEM;
877 
878 	yld->udev = udev;
879 
880 	yld->idev = input_dev = input_allocate_device();
881 	if (!input_dev)
882 		return usb_cleanup(yld, -ENOMEM);
883 
884 	/* allocate usb buffers */
885 	yld->irq_data = usb_alloc_coherent(udev, USB_PKT_LEN,
886 					   GFP_ATOMIC, &yld->irq_dma);
887 	if (yld->irq_data == NULL)
888 		return usb_cleanup(yld, -ENOMEM);
889 
890 	yld->ctl_data = usb_alloc_coherent(udev, USB_PKT_LEN,
891 					   GFP_ATOMIC, &yld->ctl_dma);
892 	if (!yld->ctl_data)
893 		return usb_cleanup(yld, -ENOMEM);
894 
895 	yld->ctl_req = kmalloc(sizeof(*(yld->ctl_req)), GFP_KERNEL);
896 	if (yld->ctl_req == NULL)
897 		return usb_cleanup(yld, -ENOMEM);
898 
899 	/* allocate urb structures */
900 	yld->urb_irq = usb_alloc_urb(0, GFP_KERNEL);
901         if (yld->urb_irq == NULL)
902 		return usb_cleanup(yld, -ENOMEM);
903 
904 	yld->urb_ctl = usb_alloc_urb(0, GFP_KERNEL);
905         if (yld->urb_ctl == NULL)
906 		return usb_cleanup(yld, -ENOMEM);
907 
908 	/* get a handle to the interrupt data pipe */
909 	pipe = usb_rcvintpipe(udev, endpoint->bEndpointAddress);
910 	ret = usb_maxpacket(udev, pipe, usb_pipeout(pipe));
911 	if (ret != USB_PKT_LEN)
912 		err("invalid payload size %d, expected %zd", ret, USB_PKT_LEN);
913 
914 	/* initialise irq urb */
915 	usb_fill_int_urb(yld->urb_irq, udev, pipe, yld->irq_data,
916 			USB_PKT_LEN,
917 			urb_irq_callback,
918 			yld, endpoint->bInterval);
919 	yld->urb_irq->transfer_dma = yld->irq_dma;
920 	yld->urb_irq->transfer_flags |= URB_NO_TRANSFER_DMA_MAP;
921 	yld->urb_irq->dev = udev;
922 
923 	/* initialise ctl urb */
924 	yld->ctl_req->bRequestType = USB_TYPE_CLASS | USB_RECIP_INTERFACE |
925 				      USB_DIR_OUT;
926 	yld->ctl_req->bRequest	= USB_REQ_SET_CONFIGURATION;
927 	yld->ctl_req->wValue	= cpu_to_le16(0x200);
928 	yld->ctl_req->wIndex	= cpu_to_le16(interface->desc.bInterfaceNumber);
929 	yld->ctl_req->wLength	= cpu_to_le16(USB_PKT_LEN);
930 
931 	usb_fill_control_urb(yld->urb_ctl, udev, usb_sndctrlpipe(udev, 0),
932 			(void *)yld->ctl_req, yld->ctl_data, USB_PKT_LEN,
933 			urb_ctl_callback, yld);
934 	yld->urb_ctl->transfer_dma	= yld->ctl_dma;
935 	yld->urb_ctl->transfer_flags	|= URB_NO_TRANSFER_DMA_MAP;
936 	yld->urb_ctl->dev = udev;
937 
938 	/* find out the physical bus location */
939 	usb_make_path(udev, yld->phys, sizeof(yld->phys));
940 	strlcat(yld->phys,  "/input0", sizeof(yld->phys));
941 
942 	/* register settings for the input device */
943 	input_dev->name = nfo->name;
944 	input_dev->phys = yld->phys;
945 	usb_to_input_id(udev, &input_dev->id);
946 	input_dev->dev.parent = &intf->dev;
947 
948 	input_set_drvdata(input_dev, yld);
949 
950 	input_dev->open = input_open;
951 	input_dev->close = input_close;
952 	/* input_dev->event = input_ev;	TODO */
953 
954 	/* register available key events */
955 	input_dev->evbit[0] = BIT_MASK(EV_KEY);
956 	for (i = 0; i < 256; i++) {
957 		int k = map_p1k_to_key(i);
958 		if (k >= 0) {
959 			set_bit(k & 0xff, input_dev->keybit);
960 			if (k >> 8)
961 				set_bit(k >> 8, input_dev->keybit);
962 		}
963 	}
964 
965 	ret = input_register_device(yld->idev);
966 	if (ret)
967 		return usb_cleanup(yld, ret);
968 
969 	usb_set_intfdata(intf, yld);
970 
971 	/* clear visible elements */
972 	for (i = 0; i < ARRAY_SIZE(lcdMap); i++)
973 		setChar(yld, i, ' ');
974 
975 	/* display driver version on LCD line 3 */
976 	store_line3(&intf->dev, NULL,
977 			DRIVER_VERSION, sizeof(DRIVER_VERSION));
978 
979 	/* Register sysfs hooks (don't care about failure) */
980 	ret = sysfs_create_group(&intf->dev.kobj, &yld_attr_group);
981 	return 0;
982 }
983 
984 static struct usb_driver yealink_driver = {
985 	.name		= "yealink",
986 	.probe		= usb_probe,
987 	.disconnect	= usb_disconnect,
988 	.id_table	= usb_table,
989 };
990 
991 module_usb_driver(yealink_driver);
992 
993 MODULE_DEVICE_TABLE (usb, usb_table);
994 
995 MODULE_AUTHOR(DRIVER_AUTHOR);
996 MODULE_DESCRIPTION(DRIVER_DESC);
997 MODULE_LICENSE("GPL");
998