[IA64-SGI] fixes for XPC disengage and open/close protocol
[linux-2.6] / drivers / input / touchscreen / corgi_ts.c
1 /*
2  *  Touchscreen driver for Sharp Corgi models (SL-C7xx)
3  *
4  *  Copyright (c) 2004-2005 Richard Purdie
5  *
6  *  This program is free software; you can redistribute it and/or modify
7  *  it under the terms of the GNU General Public License version 2 as
8  *  published by the Free Software Foundation.
9  *
10  */
11
12
13 #include <linux/delay.h>
14 #include <linux/device.h>
15 #include <linux/init.h>
16 #include <linux/input.h>
17 #include <linux/interrupt.h>
18 #include <linux/module.h>
19 #include <linux/slab.h>
20 #include <asm/irq.h>
21
22 #include <asm/arch/corgi.h>
23 #include <asm/arch/hardware.h>
24 #include <asm/arch/pxa-regs.h>
25
26
27 #define PWR_MODE_ACTIVE         0
28 #define PWR_MODE_SUSPEND        1
29
30 #define X_AXIS_MAX              3830
31 #define X_AXIS_MIN              150
32 #define Y_AXIS_MAX              3830
33 #define Y_AXIS_MIN              190
34 #define PRESSURE_MIN            0
35 #define PRESSURE_MAX            15000
36
37 struct ts_event {
38         short pressure;
39         short x;
40         short y;
41 };
42
43 struct corgi_ts {
44         char phys[32];
45         struct input_dev input;
46         struct timer_list timer;
47         struct ts_event tc;
48         int pendown;
49         int power_mode;
50 };
51
52 #define STATUS_HSYNC            (GPLR(CORGI_GPIO_HSYNC) & GPIO_bit(CORGI_GPIO_HSYNC))
53
54 #define SyncHS()        while((STATUS_HSYNC) == 0); while((STATUS_HSYNC) != 0);
55 #define CCNT(a)         asm volatile ("mrc p14, 0, %0, C1, C0, 0" : "=r"(a))
56 #define CCNT_ON()       {int pmnc = 1; asm volatile ("mcr p14, 0, %0, C0, C0, 0" : : "r"(pmnc));}
57 #define CCNT_OFF()      {int pmnc = 0; asm volatile ("mcr p14, 0, %0, C0, C0, 0" : : "r"(pmnc));}
58
59 #define WAIT_HS_400_VGA         7013U   // 17.615us
60 #define WAIT_HS_400_QVGA        16622U  // 41.750us
61
62
63 /* ADS7846 Touch Screen Controller bit definitions */
64 #define ADSCTRL_PD0             (1u << 0)       /* PD0 */
65 #define ADSCTRL_PD1             (1u << 1)       /* PD1 */
66 #define ADSCTRL_DFR             (1u << 2)       /* SER/DFR */
67 #define ADSCTRL_MOD             (1u << 3)       /* Mode */
68 #define ADSCTRL_ADR_SH  4       /* Address setting */
69 #define ADSCTRL_STS             (1u << 7)       /* Start Bit */
70
71 /* External Functions */
72 extern int w100fb_get_xres(void);
73 extern int w100fb_get_blanking(void);
74 extern int w100fb_get_fastsysclk(void);
75 extern unsigned int get_clk_frequency_khz(int info);
76
77 static unsigned long calc_waittime(void)
78 {
79         int w100fb_xres = w100fb_get_xres();
80         unsigned int waittime = 0;
81
82         if (w100fb_xres == 480 || w100fb_xres == 640) {
83                 waittime = WAIT_HS_400_VGA * get_clk_frequency_khz(0) / 398131U;
84
85                 if (w100fb_get_fastsysclk() == 100)
86                         waittime = waittime * 75 / 100;
87
88                 if (w100fb_xres == 640)
89                         waittime *= 3;
90
91                 return waittime;
92         }
93
94         return WAIT_HS_400_QVGA * get_clk_frequency_khz(0) / 398131U;
95 }
96
97 static int sync_receive_data_send_cmd(int doRecive, int doSend, unsigned int address, unsigned long wait_time)
98 {
99         int pos = 0;
100         unsigned long timer1 = 0, timer2;
101         int dosleep;
102
103         dosleep = !w100fb_get_blanking();
104
105         if (dosleep && doSend) {
106                 CCNT_ON();
107                 /* polling HSync */
108                 SyncHS();
109                 /* get CCNT */
110                 CCNT(timer1);
111         }
112
113         if (doRecive)
114                 pos = corgi_ssp_ads7846_get();
115
116         if (doSend) {
117                 int cmd = ADSCTRL_PD0 | ADSCTRL_PD1 | (address << ADSCTRL_ADR_SH) | ADSCTRL_STS;
118                 /* dummy command */
119                 corgi_ssp_ads7846_put(cmd);
120                 corgi_ssp_ads7846_get();
121
122                 if (dosleep) {
123                         /* Wait after HSync */
124                         CCNT(timer2);
125                         if (timer2-timer1 > wait_time) {
126                                 /* timeout */
127                                 SyncHS();
128                                 /* get OSCR */
129                                 CCNT(timer1);
130                                 /* Wait after HSync */
131                                 CCNT(timer2);
132                         }
133                         while (timer2 - timer1 < wait_time)
134                                 CCNT(timer2);
135                 }
136                 corgi_ssp_ads7846_put(cmd);
137                 if (dosleep)
138                         CCNT_OFF();
139         }
140         return pos;
141 }
142
143 static int read_xydata(struct corgi_ts *corgi_ts)
144 {
145         unsigned int x, y, z1, z2;
146         unsigned long flags, wait_time;
147
148         /* critical section */
149         local_irq_save(flags);
150         corgi_ssp_ads7846_lock();
151         wait_time=calc_waittime();
152
153         /* Y-axis */
154         sync_receive_data_send_cmd(0, 1, 1u, wait_time);
155
156         /* Y-axis */
157         sync_receive_data_send_cmd(1, 1, 1u, wait_time);
158
159         /* X-axis */
160         y = sync_receive_data_send_cmd(1, 1, 5u, wait_time);
161
162         /* Z1 */
163         x = sync_receive_data_send_cmd(1, 1, 3u, wait_time);
164
165         /* Z2 */
166         z1 = sync_receive_data_send_cmd(1, 1, 4u, wait_time);
167         z2 = sync_receive_data_send_cmd(1, 0, 4u, wait_time);
168
169         /* Power-Down Enable */
170         corgi_ssp_ads7846_put((1u << ADSCTRL_ADR_SH) | ADSCTRL_STS);
171         corgi_ssp_ads7846_get();
172
173         corgi_ssp_ads7846_unlock();
174         local_irq_restore(flags);
175
176         if (x== 0 || y == 0 || z1 == 0 || (x * (z2 - z1) / z1) >= 15000) {
177                 corgi_ts->tc.pressure = 0;
178                 return 0;
179         }
180
181         corgi_ts->tc.x = x;
182         corgi_ts->tc.y = y;
183         corgi_ts->tc.pressure = (x * (z2 - z1)) / z1;
184         return 1;
185 }
186
187 static void new_data(struct corgi_ts *corgi_ts, struct pt_regs *regs)
188 {
189         if (corgi_ts->power_mode != PWR_MODE_ACTIVE)
190                 return;
191
192         if (!corgi_ts->tc.pressure && corgi_ts->pendown == 0)
193                 return;
194
195         if (regs)
196                 input_regs(&corgi_ts->input, regs);
197
198         input_report_abs(&corgi_ts->input, ABS_X, corgi_ts->tc.x);
199         input_report_abs(&corgi_ts->input, ABS_Y, corgi_ts->tc.y);
200         input_report_abs(&corgi_ts->input, ABS_PRESSURE, corgi_ts->tc.pressure);
201         input_report_key(&corgi_ts->input, BTN_TOUCH, (corgi_ts->pendown != 0));
202         input_sync(&corgi_ts->input);
203 }
204
205 static void ts_interrupt_main(struct corgi_ts *corgi_ts, int isTimer, struct pt_regs *regs)
206 {
207         if ((GPLR(CORGI_GPIO_TP_INT) & GPIO_bit(CORGI_GPIO_TP_INT)) == 0) {
208                 /* Disable Interrupt */
209                 set_irq_type(CORGI_IRQ_GPIO_TP_INT, IRQT_NOEDGE);
210                 if (read_xydata(corgi_ts)) {
211                         corgi_ts->pendown = 1;
212                         new_data(corgi_ts, regs);
213                 }
214                 mod_timer(&corgi_ts->timer, jiffies + HZ / 100);
215         } else {
216                 if (corgi_ts->pendown == 1 || corgi_ts->pendown == 2) {
217                         mod_timer(&corgi_ts->timer, jiffies + HZ / 100);
218                         corgi_ts->pendown++;
219                         return;
220                 }
221
222                 if (corgi_ts->pendown) {
223                         corgi_ts->tc.pressure = 0;
224                         new_data(corgi_ts, regs);
225                 }
226
227                 /* Enable Falling Edge */
228                 set_irq_type(CORGI_IRQ_GPIO_TP_INT, IRQT_FALLING);
229                 corgi_ts->pendown = 0;
230         }
231 }
232
233 static void corgi_ts_timer(unsigned long data)
234 {
235         struct corgi_ts *corgits_data = (struct corgi_ts *) data;
236         ts_interrupt_main(corgits_data, 1, NULL);
237 }
238
239 static irqreturn_t ts_interrupt(int irq, void *dev_id, struct pt_regs *regs)
240 {
241         struct corgi_ts *corgits_data = dev_id;
242         ts_interrupt_main(corgits_data, 0, regs);
243         return IRQ_HANDLED;
244 }
245
246 #ifdef CONFIG_PM
247 static int corgits_suspend(struct device *dev, uint32_t state, uint32_t level)
248 {
249         if (level == SUSPEND_POWER_DOWN) {
250                 struct corgi_ts *corgi_ts = dev_get_drvdata(dev);
251
252                 if (corgi_ts->pendown) {
253                         del_timer_sync(&corgi_ts->timer);
254                         corgi_ts->tc.pressure = 0;
255                         new_data(corgi_ts, NULL);
256                         corgi_ts->pendown = 0;
257                 }
258                 corgi_ts->power_mode = PWR_MODE_SUSPEND;
259
260                 corgi_ssp_ads7846_putget((1u << ADSCTRL_ADR_SH) | ADSCTRL_STS);
261         }
262         return 0;
263 }
264
265 static int corgits_resume(struct device *dev, uint32_t level)
266 {
267         if (level == RESUME_POWER_ON) {
268                 struct corgi_ts *corgi_ts = dev_get_drvdata(dev);
269
270                 corgi_ssp_ads7846_putget((4u << ADSCTRL_ADR_SH) | ADSCTRL_STS);
271                 /* Enable Falling Edge */
272                 set_irq_type(CORGI_IRQ_GPIO_TP_INT, IRQT_FALLING);
273                 corgi_ts->power_mode = PWR_MODE_ACTIVE;
274         }
275         return 0;
276 }
277 #else
278 #define corgits_suspend         NULL
279 #define corgits_resume          NULL
280 #endif
281
282 static int __init corgits_probe(struct device *dev)
283 {
284         struct corgi_ts *corgi_ts;
285
286         if (!(corgi_ts = kmalloc(sizeof(struct corgi_ts), GFP_KERNEL)))
287                 return -ENOMEM;
288
289         dev_set_drvdata(dev, corgi_ts);
290
291         memset(corgi_ts, 0, sizeof(struct corgi_ts));
292
293         init_input_dev(&corgi_ts->input);
294         corgi_ts->input.evbit[0] = BIT(EV_KEY) | BIT(EV_ABS);
295         corgi_ts->input.keybit[LONG(BTN_TOUCH)] = BIT(BTN_TOUCH);
296         input_set_abs_params(&corgi_ts->input, ABS_X, X_AXIS_MIN, X_AXIS_MAX, 0, 0);
297         input_set_abs_params(&corgi_ts->input, ABS_Y, Y_AXIS_MIN, Y_AXIS_MAX, 0, 0);
298         input_set_abs_params(&corgi_ts->input, ABS_PRESSURE, PRESSURE_MIN, PRESSURE_MAX, 0, 0);
299
300         strcpy(corgi_ts->phys, "corgits/input0");
301
302         corgi_ts->input.private = corgi_ts;
303         corgi_ts->input.name = "Corgi Touchscreen";
304         corgi_ts->input.dev = dev;
305         corgi_ts->input.phys = corgi_ts->phys;
306         corgi_ts->input.id.bustype = BUS_HOST;
307         corgi_ts->input.id.vendor = 0x0001;
308         corgi_ts->input.id.product = 0x0002;
309         corgi_ts->input.id.version = 0x0100;
310
311         pxa_gpio_mode(CORGI_GPIO_TP_INT | GPIO_IN);
312         pxa_gpio_mode(CORGI_GPIO_HSYNC | GPIO_IN);
313
314         /* Initiaize ADS7846 Difference Reference mode */
315         corgi_ssp_ads7846_putget((1u << ADSCTRL_ADR_SH) | ADSCTRL_STS);
316         mdelay(5);
317         corgi_ssp_ads7846_putget((3u << ADSCTRL_ADR_SH) | ADSCTRL_STS);
318         mdelay(5);
319         corgi_ssp_ads7846_putget((4u << ADSCTRL_ADR_SH) | ADSCTRL_STS);
320         mdelay(5);
321         corgi_ssp_ads7846_putget((5u << ADSCTRL_ADR_SH) | ADSCTRL_STS);
322         mdelay(5);
323
324         init_timer(&corgi_ts->timer);
325         corgi_ts->timer.data = (unsigned long) corgi_ts;
326         corgi_ts->timer.function = corgi_ts_timer;
327
328         input_register_device(&corgi_ts->input);
329         corgi_ts->power_mode = PWR_MODE_ACTIVE;
330
331         if (request_irq(CORGI_IRQ_GPIO_TP_INT, ts_interrupt, SA_INTERRUPT, "ts", corgi_ts)) {
332                 input_unregister_device(&corgi_ts->input);
333                 kfree(corgi_ts);
334                 return -EBUSY;
335         }
336
337         /* Enable Falling Edge */
338         set_irq_type(CORGI_IRQ_GPIO_TP_INT, IRQT_FALLING);
339
340         printk(KERN_INFO "input: Corgi Touchscreen Registered\n");
341
342         return 0;
343 }
344
345 static int corgits_remove(struct device *dev)
346 {
347         struct corgi_ts *corgi_ts = dev_get_drvdata(dev);
348
349         free_irq(CORGI_IRQ_GPIO_TP_INT, NULL);
350         del_timer_sync(&corgi_ts->timer);
351         input_unregister_device(&corgi_ts->input);
352         kfree(corgi_ts);
353         return 0;
354 }
355
356 static struct device_driver corgits_driver = {
357         .name           = "corgi-ts",
358         .bus            = &platform_bus_type,
359         .probe          = corgits_probe,
360         .remove         = corgits_remove,
361         .suspend        = corgits_suspend,
362         .resume         = corgits_resume,
363 };
364
365 static int __devinit corgits_init(void)
366 {
367         return driver_register(&corgits_driver);
368 }
369
370 static void __exit corgits_exit(void)
371 {
372         driver_unregister(&corgits_driver);
373 }
374
375 module_init(corgits_init);
376 module_exit(corgits_exit);
377
378 MODULE_AUTHOR("Richard Purdie <rpurdie@rpsys.net>");
379 MODULE_DESCRIPTION("Corgi TouchScreen Driver");
380 MODULE_LICENSE("GPL");