x86/xen: resume timer irqs early
[linux/fpc-iii.git] / drivers / misc / arm-charlcd.c
blob1256a4bf1c04aca6465bcdde05158ade90c7881e
1 /*
2 * Driver for the on-board character LCD found on some ARM reference boards
3 * This is basically an Hitachi HD44780 LCD with a custom IP block to drive it
4 * http://en.wikipedia.org/wiki/HD44780_Character_LCD
5 * Currently it will just display the text "ARM Linux" and the linux version
7 * License terms: GNU General Public License (GPL) version 2
8 * Author: Linus Walleij <triad@df.lth.se>
9 */
10 #include <linux/init.h>
11 #include <linux/module.h>
12 #include <linux/interrupt.h>
13 #include <linux/platform_device.h>
14 #include <linux/completion.h>
15 #include <linux/delay.h>
16 #include <linux/io.h>
17 #include <linux/slab.h>
18 #include <linux/workqueue.h>
19 #include <generated/utsrelease.h>
21 #define DRIVERNAME "arm-charlcd"
22 #define CHARLCD_TIMEOUT (msecs_to_jiffies(1000))
24 /* Offsets to registers */
25 #define CHAR_COM 0x00U
26 #define CHAR_DAT 0x04U
27 #define CHAR_RD 0x08U
28 #define CHAR_RAW 0x0CU
29 #define CHAR_MASK 0x10U
30 #define CHAR_STAT 0x14U
32 #define CHAR_RAW_CLEAR 0x00000000U
33 #define CHAR_RAW_VALID 0x00000100U
35 /* Hitachi HD44780 display commands */
36 #define HD_CLEAR 0x01U
37 #define HD_HOME 0x02U
38 #define HD_ENTRYMODE 0x04U
39 #define HD_ENTRYMODE_INCREMENT 0x02U
40 #define HD_ENTRYMODE_SHIFT 0x01U
41 #define HD_DISPCTRL 0x08U
42 #define HD_DISPCTRL_ON 0x04U
43 #define HD_DISPCTRL_CURSOR_ON 0x02U
44 #define HD_DISPCTRL_CURSOR_BLINK 0x01U
45 #define HD_CRSR_SHIFT 0x10U
46 #define HD_CRSR_SHIFT_DISPLAY 0x08U
47 #define HD_CRSR_SHIFT_DISPLAY_RIGHT 0x04U
48 #define HD_FUNCSET 0x20U
49 #define HD_FUNCSET_8BIT 0x10U
50 #define HD_FUNCSET_2_LINES 0x08U
51 #define HD_FUNCSET_FONT_5X10 0x04U
52 #define HD_SET_CGRAM 0x40U
53 #define HD_SET_DDRAM 0x80U
54 #define HD_BUSY_FLAG 0x80U
56 /**
57 * @dev: a pointer back to containing device
58 * @phybase: the offset to the controller in physical memory
59 * @physize: the size of the physical page
60 * @virtbase: the offset to the controller in virtual memory
61 * @irq: reserved interrupt number
62 * @complete: completion structure for the last LCD command
64 struct charlcd {
65 struct device *dev;
66 u32 phybase;
67 u32 physize;
68 void __iomem *virtbase;
69 int irq;
70 struct completion complete;
71 struct delayed_work init_work;
74 static irqreturn_t charlcd_interrupt(int irq, void *data)
76 struct charlcd *lcd = data;
77 u8 status;
79 status = readl(lcd->virtbase + CHAR_STAT) & 0x01;
80 /* Clear IRQ */
81 writel(CHAR_RAW_CLEAR, lcd->virtbase + CHAR_RAW);
82 if (status)
83 complete(&lcd->complete);
84 else
85 dev_info(lcd->dev, "Spurious IRQ (%02x)\n", status);
86 return IRQ_HANDLED;
90 static void charlcd_wait_complete_irq(struct charlcd *lcd)
92 int ret;
94 ret = wait_for_completion_interruptible_timeout(&lcd->complete,
95 CHARLCD_TIMEOUT);
96 /* Disable IRQ after completion */
97 writel(0x00, lcd->virtbase + CHAR_MASK);
99 if (ret < 0) {
100 dev_err(lcd->dev,
101 "wait_for_completion_interruptible_timeout() "
102 "returned %d waiting for ready\n", ret);
103 return;
106 if (ret == 0) {
107 dev_err(lcd->dev, "charlcd controller timed out "
108 "waiting for ready\n");
109 return;
113 static u8 charlcd_4bit_read_char(struct charlcd *lcd)
115 u8 data;
116 u32 val;
117 int i;
119 /* If we can, use an IRQ to wait for the data, else poll */
120 if (lcd->irq >= 0)
121 charlcd_wait_complete_irq(lcd);
122 else {
123 i = 0;
124 val = 0;
125 while (!(val & CHAR_RAW_VALID) && i < 10) {
126 udelay(100);
127 val = readl(lcd->virtbase + CHAR_RAW);
128 i++;
131 writel(CHAR_RAW_CLEAR, lcd->virtbase + CHAR_RAW);
133 msleep(1);
135 /* Read the 4 high bits of the data */
136 data = readl(lcd->virtbase + CHAR_RD) & 0xf0;
139 * The second read for the low bits does not trigger an IRQ
140 * so in this case we have to poll for the 4 lower bits
142 i = 0;
143 val = 0;
144 while (!(val & CHAR_RAW_VALID) && i < 10) {
145 udelay(100);
146 val = readl(lcd->virtbase + CHAR_RAW);
147 i++;
149 writel(CHAR_RAW_CLEAR, lcd->virtbase + CHAR_RAW);
150 msleep(1);
152 /* Read the 4 low bits of the data */
153 data |= (readl(lcd->virtbase + CHAR_RD) >> 4) & 0x0f;
155 return data;
158 static bool charlcd_4bit_read_bf(struct charlcd *lcd)
160 if (lcd->irq >= 0) {
162 * If we'll use IRQs to wait for the busyflag, clear any
163 * pending flag and enable IRQ
165 writel(CHAR_RAW_CLEAR, lcd->virtbase + CHAR_RAW);
166 init_completion(&lcd->complete);
167 writel(0x01, lcd->virtbase + CHAR_MASK);
169 readl(lcd->virtbase + CHAR_COM);
170 return charlcd_4bit_read_char(lcd) & HD_BUSY_FLAG ? true : false;
173 static void charlcd_4bit_wait_busy(struct charlcd *lcd)
175 int retries = 50;
177 udelay(100);
178 while (charlcd_4bit_read_bf(lcd) && retries)
179 retries--;
180 if (!retries)
181 dev_err(lcd->dev, "timeout waiting for busyflag\n");
184 static void charlcd_4bit_command(struct charlcd *lcd, u8 cmd)
186 u32 cmdlo = (cmd << 4) & 0xf0;
187 u32 cmdhi = (cmd & 0xf0);
189 writel(cmdhi, lcd->virtbase + CHAR_COM);
190 udelay(10);
191 writel(cmdlo, lcd->virtbase + CHAR_COM);
192 charlcd_4bit_wait_busy(lcd);
195 static void charlcd_4bit_char(struct charlcd *lcd, u8 ch)
197 u32 chlo = (ch << 4) & 0xf0;
198 u32 chhi = (ch & 0xf0);
200 writel(chhi, lcd->virtbase + CHAR_DAT);
201 udelay(10);
202 writel(chlo, lcd->virtbase + CHAR_DAT);
203 charlcd_4bit_wait_busy(lcd);
206 static void charlcd_4bit_print(struct charlcd *lcd, int line, const char *str)
208 u8 offset;
209 int i;
212 * We support line 0, 1
213 * Line 1 runs from 0x00..0x27
214 * Line 2 runs from 0x28..0x4f
216 if (line == 0)
217 offset = 0;
218 else if (line == 1)
219 offset = 0x28;
220 else
221 return;
223 /* Set offset */
224 charlcd_4bit_command(lcd, HD_SET_DDRAM | offset);
226 /* Send string */
227 for (i = 0; i < strlen(str) && i < 0x28; i++)
228 charlcd_4bit_char(lcd, str[i]);
231 static void charlcd_4bit_init(struct charlcd *lcd)
233 /* These commands cannot be checked with the busy flag */
234 writel(HD_FUNCSET | HD_FUNCSET_8BIT, lcd->virtbase + CHAR_COM);
235 msleep(5);
236 writel(HD_FUNCSET | HD_FUNCSET_8BIT, lcd->virtbase + CHAR_COM);
237 udelay(100);
238 writel(HD_FUNCSET | HD_FUNCSET_8BIT, lcd->virtbase + CHAR_COM);
239 udelay(100);
240 /* Go to 4bit mode */
241 writel(HD_FUNCSET, lcd->virtbase + CHAR_COM);
242 udelay(100);
244 * 4bit mode, 2 lines, 5x8 font, after this the number of lines
245 * and the font cannot be changed until the next initialization sequence
247 charlcd_4bit_command(lcd, HD_FUNCSET | HD_FUNCSET_2_LINES);
248 charlcd_4bit_command(lcd, HD_DISPCTRL | HD_DISPCTRL_ON);
249 charlcd_4bit_command(lcd, HD_ENTRYMODE | HD_ENTRYMODE_INCREMENT);
250 charlcd_4bit_command(lcd, HD_CLEAR);
251 charlcd_4bit_command(lcd, HD_HOME);
252 /* Put something useful in the display */
253 charlcd_4bit_print(lcd, 0, "ARM Linux");
254 charlcd_4bit_print(lcd, 1, UTS_RELEASE);
257 static void charlcd_init_work(struct work_struct *work)
259 struct charlcd *lcd =
260 container_of(work, struct charlcd, init_work.work);
262 charlcd_4bit_init(lcd);
265 static int __init charlcd_probe(struct platform_device *pdev)
267 int ret;
268 struct charlcd *lcd;
269 struct resource *res;
271 lcd = kzalloc(sizeof(struct charlcd), GFP_KERNEL);
272 if (!lcd)
273 return -ENOMEM;
275 lcd->dev = &pdev->dev;
277 res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
278 if (!res) {
279 ret = -ENOENT;
280 goto out_no_resource;
282 lcd->phybase = res->start;
283 lcd->physize = resource_size(res);
285 if (request_mem_region(lcd->phybase, lcd->physize,
286 DRIVERNAME) == NULL) {
287 ret = -EBUSY;
288 goto out_no_memregion;
291 lcd->virtbase = ioremap(lcd->phybase, lcd->physize);
292 if (!lcd->virtbase) {
293 ret = -ENOMEM;
294 goto out_no_memregion;
297 lcd->irq = platform_get_irq(pdev, 0);
298 /* If no IRQ is supplied, we'll survive without it */
299 if (lcd->irq >= 0) {
300 if (request_irq(lcd->irq, charlcd_interrupt, IRQF_DISABLED,
301 DRIVERNAME, lcd)) {
302 ret = -EIO;
303 goto out_no_irq;
307 platform_set_drvdata(pdev, lcd);
310 * Initialize the display in a delayed work, because
311 * it is VERY slow and would slow down the boot of the system.
313 INIT_DELAYED_WORK(&lcd->init_work, charlcd_init_work);
314 schedule_delayed_work(&lcd->init_work, 0);
316 dev_info(&pdev->dev, "initialized ARM character LCD at %08x\n",
317 lcd->phybase);
319 return 0;
321 out_no_irq:
322 iounmap(lcd->virtbase);
323 out_no_memregion:
324 release_mem_region(lcd->phybase, SZ_4K);
325 out_no_resource:
326 kfree(lcd);
327 return ret;
330 static int __exit charlcd_remove(struct platform_device *pdev)
332 struct charlcd *lcd = platform_get_drvdata(pdev);
334 if (lcd) {
335 free_irq(lcd->irq, lcd);
336 iounmap(lcd->virtbase);
337 release_mem_region(lcd->phybase, lcd->physize);
338 kfree(lcd);
341 return 0;
344 static int charlcd_suspend(struct device *dev)
346 struct platform_device *pdev = to_platform_device(dev);
347 struct charlcd *lcd = platform_get_drvdata(pdev);
349 /* Power the display off */
350 charlcd_4bit_command(lcd, HD_DISPCTRL);
351 return 0;
354 static int charlcd_resume(struct device *dev)
356 struct platform_device *pdev = to_platform_device(dev);
357 struct charlcd *lcd = platform_get_drvdata(pdev);
359 /* Turn the display back on */
360 charlcd_4bit_command(lcd, HD_DISPCTRL | HD_DISPCTRL_ON);
361 return 0;
364 static const struct dev_pm_ops charlcd_pm_ops = {
365 .suspend = charlcd_suspend,
366 .resume = charlcd_resume,
369 static struct platform_driver charlcd_driver = {
370 .driver = {
371 .name = DRIVERNAME,
372 .owner = THIS_MODULE,
373 .pm = &charlcd_pm_ops,
375 .remove = __exit_p(charlcd_remove),
378 module_platform_driver_probe(charlcd_driver, charlcd_probe);
380 MODULE_AUTHOR("Linus Walleij <triad@df.lth.se>");
381 MODULE_DESCRIPTION("ARM Character LCD Driver");
382 MODULE_LICENSE("GPL v2");