Merge with /home/raj/git/u-boot
[platform/kernel/u-boot.git] / board / trab / trab.c
1 /*
2  * (C) Copyright 2002
3  * Gary Jennejohn, DENX Software Engineering, <gj@denx.de>
4  *
5  * See file CREDITS for list of people who contributed to this
6  * project.
7  *
8  * This program is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU General Public License as
10  * published by the Free Software Foundation; either version 2 of
11  * the License, or (at your option) any later version.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
21  * MA 02111-1307 USA
22  */
23
24 /* #define DEBUG */
25
26 #include <common.h>
27 #include <malloc.h>
28 #include <s3c2400.h>
29 #include <command.h>
30
31 DECLARE_GLOBAL_DATA_PTR;
32
33 #ifdef CFG_BRIGHTNESS
34 static void spi_init(void);
35 static void wait_transmit_done(void);
36 static void tsc2000_write(unsigned int page, unsigned int reg,
37                                                   unsigned int data);
38 static void tsc2000_set_brightness(void);
39 #endif
40 #ifdef CONFIG_MODEM_SUPPORT
41 static int key_pressed(void);
42 extern void disable_putc(void);
43 extern int do_mdm_init; /* defined in common/main.c */
44
45 /*
46  * We need a delay of at least 500 us after turning on the VFD clock
47  * before we can read any useful information for the CPLD controlling
48  * the keyboard switches. Let's play safe and wait 5 ms. The problem
49  * is that timers are not available yet, so we use a manually timed
50  * loop.
51  */
52 #define KBD_MDELAY      5000
53 static void udelay_no_timer (int usec)
54 {
55         int i;
56         int delay = usec * 3;
57
58         for (i = 0; i < delay; i ++) gd->bd->bi_arch_number = MACH_TYPE_TRAB;
59 }
60 #endif /* CONFIG_MODEM_SUPPORT */
61
62 /*
63  * Miscellaneous platform dependent initialisations
64  */
65
66 int board_init ()
67 {
68 #if defined(CONFIG_VFD)
69         extern int vfd_init_clocks(void);
70 #endif
71         S3C24X0_CLOCK_POWER * const clk_power = S3C24X0_GetBase_CLOCK_POWER();
72         S3C24X0_GPIO * const gpio = S3C24X0_GetBase_GPIO();
73
74         /* memory and cpu-speed are setup before relocation */
75 #ifdef CONFIG_TRAB_50MHZ
76         /* change the clock to be 50 MHz 1:1:1 */
77         /* MDIV:0x5c PDIV:4 SDIV:2 */
78         clk_power->MPLLCON = 0x5c042;
79         clk_power->CLKDIVN = 0;
80 #else
81         /* change the clock to be 133 MHz 1:2:4 */
82         /* MDIV:0x7d PDIV:4 SDIV:1 */
83         clk_power->MPLLCON = 0x7d041;
84         clk_power->CLKDIVN = 3;
85 #endif
86
87         /* set up the I/O ports */
88         gpio->PACON = 0x3ffff;
89         gpio->PBCON = 0xaaaaaaaa;
90         gpio->PBUP  = 0xffff;
91         /* INPUT nCTS0 nRTS0 TXD[1] TXD[0] RXD[1] RXD[0]        */
92         /*  00,    10,      10,      10,      10,      10,      10      */
93         gpio->PFCON = (2<<0) | (2<<2) | (2<<4) | (2<<6) | (2<<8) | (2<<10);
94 #ifdef CONFIG_HWFLOW
95         /* do not pull up RXD0, RXD1, TXD0, TXD1, CTS0, RTS0 */
96         gpio->PFUP  = (1<<0) | (1<<1) | (1<<2) | (1<<3) | (1<<4) | (1<<5);
97 #else
98         /* do not pull up RXD0, RXD1, TXD0, TXD1 */
99         gpio->PFUP  = (1<<0) | (1<<1) | (1<<2) | (1<<3);
100 #endif
101         gpio->PGCON = 0x0;
102         gpio->PGUP  = 0x0;
103         gpio->OPENCR= 0x0;
104
105         /* suppress flicker of the VFDs */
106         gpio->MISCCR = 0x40;
107         gpio->PFCON |= (2<<12);
108
109         gd->bd->bi_arch_number = MACH_TYPE_TRAB;
110
111         /* adress of boot parameters */
112         gd->bd->bi_boot_params = 0x0c000100;
113
114         /* Make sure both buzzers are turned off */
115         gpio->PDCON |= 0x5400;
116         gpio->PDDAT &= ~0xE0;
117
118 #ifdef CONFIG_VFD
119         vfd_init_clocks();
120 #endif /* CONFIG_VFD */
121
122 #ifdef CONFIG_MODEM_SUPPORT
123         udelay_no_timer (KBD_MDELAY);
124
125         if (key_pressed()) {
126                 disable_putc(); /* modem doesn't understand banner etc */
127                 do_mdm_init = 1;
128         }
129 #endif  /* CONFIG_MODEM_SUPPORT */
130
131 #ifdef CONFIG_DRIVER_S3C24X0_I2C
132         /* Configure I/O ports PG5 und PG6 for I2C */
133         gpio->PGCON = (gpio->PGCON & 0x003c00) | 0x003c00;
134 #endif /* CONFIG_DRIVER_S3C24X0_I2C */
135
136         return 0;
137 }
138
139 int dram_init (void)
140 {
141         gd->bd->bi_dram[0].start = PHYS_SDRAM_1;
142         gd->bd->bi_dram[0].size = PHYS_SDRAM_1_SIZE;
143         return 0;
144 }
145
146 /*-----------------------------------------------------------------------
147  * Keyboard Controller
148  */
149
150 /* Maximum key number */
151 #define KEYBD_KEY_NUM           4
152
153 #define KBD_DATA        (((*(volatile ulong *)0x04020000) >> 16) & 0xF)
154
155 static char *key_match (ulong);
156
157 int misc_init_r (void)
158 {
159         ulong kbd_data = KBD_DATA;
160         char *str;
161         char keybd_env[KEYBD_KEY_NUM + 1];
162         int i;
163
164 #ifdef CONFIG_VERSION_VARIABLE
165         {
166                 /* Set version variable. Please note, that this variable is
167                  * also set in main_loop() later in the boot process. The
168                  * version variable has to be set this early, because so it
169                  * could be used in script files on an usb stick, which
170                  * might be called during do_auto_update() */
171                 extern char version_string[];
172
173                 setenv ("ver", version_string);
174         }
175 #endif /* CONFIG_VERSION_VARIABLE */
176
177 #ifdef CONFIG_AUTO_UPDATE
178         {
179                 extern int do_auto_update(void);
180                 /* this has priority over all else */
181                 do_auto_update();
182         }
183 #endif
184
185         for (i = 0; i < KEYBD_KEY_NUM; ++i) {
186                 keybd_env[i] = '0' + ((kbd_data >> i) & 1);
187         }
188         keybd_env[i] = '\0';
189         debug ("** Setting keybd=\"%s\"\n", keybd_env);
190         setenv ("keybd", keybd_env);
191
192         str = strdup (key_match (kbd_data));    /* decode keys */
193
194 #ifdef CONFIG_PREBOOT   /* automatically configure "preboot" command on key match */
195         debug ("** Setting preboot=\"%s\"\n", str);
196         setenv ("preboot", str);        /* set or delete definition */
197 #endif /* CONFIG_PREBOOT */
198         if (str != NULL) {
199                 free (str);
200         }
201
202 #ifdef CFG_BRIGHTNESS
203         tsc2000_set_brightness();
204 #endif
205         return (0);
206 }
207
208 #ifdef CONFIG_PREBOOT
209
210 static uchar kbd_magic_prefix[] = "key_magic";
211 static uchar kbd_command_prefix[] = "key_cmd";
212
213 static int compare_magic (ulong kbd_data, char *str)
214 {
215         uchar key_mask;
216
217         debug ("compare_magic: kbd: %04lx  str: \"%s\"\n",kbd_data,str);
218         for (; *str; str++)
219         {
220                 uchar c = *str - '1';
221
222                 if (c >= KEYBD_KEY_NUM)         /* bad key number */
223                         return -1;
224
225                 key_mask = 1 << c;
226
227                 if (!(kbd_data & key_mask)) {   /* key not pressed */
228                         debug ( "compare_magic: "
229                                 "kbd: %04lx mask: %04lx - key not pressed\n",
230                                 kbd_data, key_mask );
231                         return -1;
232                 }
233
234                 kbd_data &= ~key_mask;
235         }
236
237         if (kbd_data) {                         /* key(s) not released */
238                 debug ( "compare_magic: "
239                         "kbd: %04lx - key(s) not released\n", kbd_data);
240                 return -1;
241         }
242
243         return 0;
244 }
245
246 /*-----------------------------------------------------------------------
247  * Check if pressed key(s) match magic sequence,
248  * and return the command string associated with that key(s).
249  *
250  * If no key press was decoded, NULL is returned.
251  *
252  * Note: the first character of the argument will be overwritten with
253  * the "magic charcter code" of the decoded key(s), or '\0'.
254  *
255  *
256  * Note: the string points to static environment data and must be
257  * saved before you call any function that modifies the environment.
258  */
259 static char *key_match (ulong kbd_data)
260 {
261         char magic[sizeof (kbd_magic_prefix) + 1];
262         char cmd_name[sizeof (kbd_command_prefix) + 1];
263         char *suffix;
264         char *kbd_magic_keys;
265
266         /*
267          * The following string defines the characters that can pe appended
268          * to "key_magic" to form the names of environment variables that
269          * hold "magic" key codes, i. e. such key codes that can cause
270          * pre-boot actions. If the string is empty (""), then only
271          * "key_magic" is checked (old behaviour); the string "125" causes
272          * checks for "key_magic1", "key_magic2" and "key_magic5", etc.
273          */
274         if ((kbd_magic_keys = getenv ("magic_keys")) == NULL)
275                 kbd_magic_keys = "";
276
277         debug ("key_match: magic_keys=\"%s\"\n", kbd_magic_keys);
278
279         /* loop over all magic keys;
280          * use '\0' suffix in case of empty string
281          */
282         for (suffix=kbd_magic_keys; *suffix || suffix==kbd_magic_keys; ++suffix)
283         {
284                 sprintf (magic, "%s%c", kbd_magic_prefix, *suffix);
285
286                 debug ("key_match: magic=\"%s\"\n",
287                         getenv(magic) ? getenv(magic) : "<UNDEFINED>");
288
289                 if (compare_magic(kbd_data, getenv(magic)) == 0)
290                 {
291                         sprintf (cmd_name, "%s%c", kbd_command_prefix, *suffix);
292                         debug ("key_match: cmdname %s=\"%s\"\n",
293                                 cmd_name,
294                                 getenv (cmd_name) ?
295                                         getenv (cmd_name) :
296                                         "<UNDEFINED>");
297                         return (getenv (cmd_name));
298                 }
299         }
300         debug ("key_match: no match\n");
301         return (NULL);
302 }
303 #endif                                                  /* CONFIG_PREBOOT */
304
305 /* Read Keyboard status */
306 int do_kbd (cmd_tbl_t * cmdtp, int flag, int argc, char *argv[])
307 {
308         ulong kbd_data = KBD_DATA;
309         char keybd_env[KEYBD_KEY_NUM + 1];
310         int i;
311
312         puts ("Keys:");
313         for (i = 0; i < KEYBD_KEY_NUM; ++i) {
314                 keybd_env[i] = '0' + ((kbd_data >> i) & 1);
315                 printf (" %c", keybd_env[i]);
316         }
317         keybd_env[i] = '\0';
318         putc ('\n');
319         setenv ("keybd", keybd_env);
320         return 0;
321 }
322
323 U_BOOT_CMD(
324         kbd,    1,      1,      do_kbd,
325         "kbd     - read keyboard status\n",
326         NULL
327 );
328
329 #ifdef CONFIG_MODEM_SUPPORT
330 static int key_pressed(void)
331 {
332         return (compare_magic(KBD_DATA, CONFIG_MODEM_KEY_MAGIC) == 0);
333 }
334 #endif  /* CONFIG_MODEM_SUPPORT */
335
336 #ifdef CFG_BRIGHTNESS
337
338 static inline void SET_CS_TOUCH(void)
339 {
340         S3C24X0_GPIO * const gpio = S3C24X0_GetBase_GPIO();
341
342         gpio->PDDAT &= 0x5FF;
343 }
344
345 static inline void CLR_CS_TOUCH(void)
346 {
347         S3C24X0_GPIO * const gpio = S3C24X0_GetBase_GPIO();
348
349         gpio->PDDAT |= 0x200;
350 }
351
352 static void spi_init(void)
353 {
354         S3C24X0_GPIO * const gpio = S3C24X0_GetBase_GPIO();
355         S3C24X0_SPI * const spi = S3C24X0_GetBase_SPI();
356         int i;
357
358         /* Configure I/O ports. */
359         gpio->PDCON = (gpio->PDCON & 0xF3FFFF) | 0x040000;
360         gpio->PGCON = (gpio->PGCON & 0x0F3FFF) | 0x008000;
361         gpio->PGCON = (gpio->PGCON & 0x0CFFFF) | 0x020000;
362         gpio->PGCON = (gpio->PGCON & 0x03FFFF) | 0x080000;
363
364         CLR_CS_TOUCH();
365
366         spi->ch[0].SPPRE = 0x1F; /* Baudrate ca. 514kHz */
367         spi->ch[0].SPPIN = 0x01;  /* SPI-MOSI holds Level after last bit */
368         spi->ch[0].SPCON = 0x1A;  /* Polling, Prescaler, Master, CPOL=0, CPHA=1 */
369
370         /* Dummy byte ensures clock to be low. */
371         for (i = 0; i < 10; i++) {
372                 spi->ch[0].SPTDAT = 0xFF;
373         }
374         wait_transmit_done();
375 }
376
377 static void wait_transmit_done(void)
378 {
379         S3C24X0_SPI * const spi = S3C24X0_GetBase_SPI();
380
381         while (!(spi->ch[0].SPSTA & 0x01)); /* wait until transfer is done */
382 }
383
384 static void tsc2000_write(unsigned int page, unsigned int reg,
385                                                   unsigned int data)
386 {
387         S3C24X0_SPI * const spi = S3C24X0_GetBase_SPI();
388         unsigned int command;
389
390         SET_CS_TOUCH();
391         command = 0x0000;
392         command |= (page << 11);
393         command |= (reg << 5);
394
395         spi->ch[0].SPTDAT = (command & 0xFF00) >> 8;
396         wait_transmit_done();
397         spi->ch[0].SPTDAT = (command & 0x00FF);
398         wait_transmit_done();
399         spi->ch[0].SPTDAT = (data & 0xFF00) >> 8;
400         wait_transmit_done();
401         spi->ch[0].SPTDAT = (data & 0x00FF);
402         wait_transmit_done();
403
404         CLR_CS_TOUCH();
405 }
406
407 static void tsc2000_set_brightness(void)
408 {
409         char tmp[10];
410         int i, br;
411
412         spi_init();
413         tsc2000_write(1, 2, 0x0); /* Power up DAC */
414
415         i = getenv_r("brightness", tmp, sizeof(tmp));
416         br = (i > 0)
417                 ? (int) simple_strtoul (tmp, NULL, 10)
418                 : CFG_BRIGHTNESS;
419
420         tsc2000_write(0, 0xb, br & 0xff);
421 }
422 #endif