3 * Martin Krause, TQ-Systems GmbH, martin.krause@tqs.de.
5 * See file CREDITS for list of people who contributed to this
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.
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.
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,
25 * STK52XX specific functions
32 #if defined(CONFIG_CMD_BSP)
34 #if defined(CONFIG_STK52XX) || defined(CONFIG_FO300)
35 #define DEFAULT_VOL 45
36 #define DEFAULT_FREQ 500
37 #define DEFAULT_DURATION 200
44 #define SM501_GPIO_CTRL_LOW 0x00000008UL
45 #define SM501_GPIO_CTRL_HIGH 0x0000000CUL
46 #define SM501_POWER_MODE0_GATE 0x00000040UL
47 #define SM501_POWER_MODE1_GATE 0x00000048UL
48 #define POWER_MODE_GATE_GPIO_PWM_I2C 0x00000040UL
49 #define SM501_GPIO_DATA_LOW 0x00010000UL
50 #define SM501_GPIO_DATA_HIGH 0x00010004UL
51 #define SM501_GPIO_DATA_DIR_LOW 0x00010008UL
52 #define SM501_GPIO_DATA_DIR_HIGH 0x0001000CUL
53 #define SM501_PANEL_DISPLAY_CONTROL 0x00080000UL
55 static int i2s_squarewave(unsigned long duration
, unsigned int freq
,
56 unsigned int channel
);
57 static int i2s_sawtooth(unsigned long duration
, unsigned int freq
,
58 unsigned int channel
);
59 static void spi_init(void);
60 static int spi_transmit(unsigned char data
);
61 static void pcm1772_write_reg(unsigned char addr
, unsigned char data
);
62 static void set_attenuation(unsigned char attenuation
);
64 static void spi_init(void)
66 struct mpc5xxx_spi
*spi
= (struct mpc5xxx_spi
*)MPC5XXX_SPI
;
67 struct mpc5xxx_gpio
*gpio
= (struct mpc5xxx_gpio
*)MPC5XXX_GPIO
;
69 /* PSC3 as SPI and GPIOs */
70 gpio
->port_config
&= 0xFFFFF0FF;
71 gpio
->port_config
|= 0x00000800;
73 * Its important to use the correct order when initializing the
76 spi
->ddr
= 0x0F; /* set all SPI pins as output */
77 spi
->pdr
= 0x08; /* set SS high */
78 spi
->cr1
= 0x50; /* SPI is master, SS is general purpose output */
79 spi
->cr2
= 0x00; /* normal operation */
80 spi
->brr
= 0xFF; /* baud rate: IPB clock / 2048 */
83 static int spi_transmit(unsigned char data
)
86 struct mpc5xxx_spi
*spi
= (struct mpc5xxx_spi
*)MPC5XXX_SPI
;
89 /* wait for SPI transmission completed */
90 while(!(spi
->sr
& 0x80))
92 if (spi
->sr
& 0x40) /* if write collision occured */
94 /* do dummy read to clear status register */
96 printf ("SPI write collision\n");
103 static void pcm1772_write_reg(unsigned char addr
, unsigned char data
)
105 struct mpc5xxx_spi
*spi
= (struct mpc5xxx_spi
*)MPC5XXX_SPI
;
107 spi
->pdr
= 0x00; /* Set SS low */
110 /* wait some time to meet MS# hold time of PCM1772 */
112 spi
->pdr
= 0x08; /* set SS high */
115 static void set_attenuation(unsigned char attenuation
)
117 pcm1772_write_reg(0x01, attenuation
); /* left channel */
118 debug ("PCM1772 attenuation left set to %d.\n", attenuation
);
119 pcm1772_write_reg(0x02, attenuation
); /* right channel */
120 debug ("PCM1772 attenuation right set to %d.\n", attenuation
);
123 void amplifier_init(void)
125 static int init_done
= 0;
127 struct mpc5xxx_gpio
*gpio
= (struct mpc5xxx_gpio
*)MPC5XXX_GPIO
;
129 /* Do this only once, because of the long time delay */
131 /* configure PCM1772 audio format as I2S */
132 pcm1772_write_reg(0x03, 0x01);
133 /* enable audio amplifier */
134 gpio
->sint_gpioe
|= 0x02; /* PSC3_5 as GPIO */
135 gpio
->sint_ode
&= ~0x02; /* PSC3_5 is not open Drain */
136 gpio
->sint_dvo
&= ~0x02; /* PSC3_5 is LOW */
137 gpio
->sint_ddr
|= 0x02; /* PSC3_5 as output */
139 * wait some time to allow amplifier to recover from shutdown
142 for(i
= 0; i
< 350; i
++)
145 * The used amplifier (LM4867) has a so called "pop and click"
146 * elmination filter. The input signal of the amplifier must
147 * exceed a certain level once after power up to activate the
148 * generation of the output signal. This is achieved by
149 * sending a low frequent (nearly inaudible) sawtooth with a
150 * sufficient signal level.
153 i2s_sawtooth (200, 5, LEFT_RIGHT
);
158 static void i2s_init(void)
161 struct mpc5xxx_psc
*psc
= (struct mpc5xxx_psc
*)MPC5XXX_PSC2
;;
162 struct mpc5xxx_gpio
*gpio
= (struct mpc5xxx_gpio
*)MPC5XXX_GPIO
;
164 gpio
->port_config
|= 0x00000070; /* PSC2 ports as Codec with MCLK */
165 psc
->command
= (PSC_RX_DISABLE
| PSC_TX_DISABLE
);
166 psc
->sicr
= 0x22E00000; /* 16 bit data; I2S */
168 *(vu_long
*)(CFG_MBAR
+ 0x22C) = 0x805d; /* PSC2 CDM MCLK config; MCLK
170 *(vu_long
*)(CFG_MBAR
+ 0x214) |= 0x00000040; /* CDM clock enable
172 psc
->ccr
= 0x1F03; /* 16 bit data width; 5.617MHz MCLK */
173 psc
->ctur
= 0x0F; /* 16 bit frame width */
177 psc
->psc_buffer_32
= 0; /* clear tx fifo */
181 static int i2s_play_wave(unsigned long addr
, unsigned long len
)
184 unsigned char *wave_file
= (uchar
*)addr
+ 44; /* quick'n dirty: skip
186 unsigned char swapped
[4];
187 struct mpc5xxx_psc
*psc
= (struct mpc5xxx_psc
*)MPC5XXX_PSC2
;
190 * play wave file in memory; bytes/words are be swapped
192 psc
->command
= (PSC_RX_ENABLE
| PSC_TX_ENABLE
);
194 for(i
= 0;i
< (len
/ 4); i
++) {
195 swapped
[3]=*wave_file
++;
196 swapped
[2]=*wave_file
++;
197 swapped
[1]=*wave_file
++;
198 swapped
[0]=*wave_file
++;
199 psc
->psc_buffer_32
= *((unsigned long*)swapped
);
200 while (psc
->tfnum
> 400) {
205 while (psc
->tfnum
> 0); /* wait for fifo empty */
207 psc
->command
= (PSC_RX_DISABLE
| PSC_TX_DISABLE
);
211 static int i2s_sawtooth(unsigned long duration
, unsigned int freq
,
212 unsigned int channel
)
216 struct mpc5xxx_psc
*psc
= (struct mpc5xxx_psc
*)MPC5XXX_PSC2
;
218 psc
->command
= (PSC_RX_ENABLE
| PSC_TX_ENABLE
);
221 * Generate sawtooth. Start with middle level up to highest level. Then
222 * go to lowest level and back to middle level.
224 for(j
= 0; j
< ((duration
* freq
) / 1000); j
++) {
225 for(i
= 0; i
<= 0x7FFF; i
+= (0x7FFF/(44100/(freq
*4)))) {
227 /* data format: right data left data) */
228 if (channel
== LEFT_RIGHT
)
230 if (channel
== RIGHT
)
232 psc
->psc_buffer_32
= data
;
233 while (psc
->tfnum
> 400);
235 for(i
= 0x7FFF; i
>= -0x7FFF; i
-= (0xFFFF/(44100/(freq
*2)))) {
237 /* data format: right data left data) */
238 if (channel
== LEFT_RIGHT
)
240 if (channel
== RIGHT
)
242 psc
->psc_buffer_32
= data
;
243 while (psc
->tfnum
> 400);
245 for(i
= -0x7FFF; i
<= 0; i
+= (0x7FFF/(44100/(freq
*4)))) {
247 /* data format: right data left data) */
248 if (channel
== LEFT_RIGHT
)
250 if (channel
== RIGHT
)
252 psc
->psc_buffer_32
= data
;
253 while (psc
->tfnum
> 400);
256 while (psc
->tfnum
> 0); /* wait for fifo empty */
258 psc
->command
= (PSC_RX_DISABLE
| PSC_TX_DISABLE
);
263 static int i2s_squarewave(unsigned long duration
, unsigned int freq
,
264 unsigned int channel
)
268 struct mpc5xxx_psc
*psc
= (struct mpc5xxx_psc
*)MPC5XXX_PSC2
;
270 psc
->command
= (PSC_RX_ENABLE
| PSC_TX_ENABLE
);
273 * Generate sqarewave. Start with high level, duty cycle 1:1.
275 for(j
= 0; j
< ((duration
* freq
) / 1000); j
++) {
276 for(i
= 0; i
< (44100/(freq
*2)); i
++) {
278 /* data format: right data left data) */
279 if (channel
== LEFT_RIGHT
)
281 if (channel
== RIGHT
)
283 psc
->psc_buffer_32
= data
;
284 while (psc
->tfnum
> 400);
286 for(i
= 0; i
< (44100/(freq
*2)); i
++) {
288 /* data format: right data left data) */
289 if (channel
== LEFT_RIGHT
)
291 if (channel
== RIGHT
)
293 psc
->psc_buffer_32
= data
;
294 while (psc
->tfnum
> 400);
297 while (psc
->tfnum
> 0); /* wait for fifo empty */
299 psc
->command
= (PSC_RX_DISABLE
| PSC_TX_DISABLE
);
304 static int cmd_sound(cmd_tbl_t
*cmdtp
, int flag
, int argc
, char *argv
[])
306 unsigned long reg
, val
, duration
;
308 unsigned int freq
, channel
;
309 unsigned char volume
;
312 #ifdef CONFIG_STK52XX_REV100
313 printf ("Revision 100 of STK52XX not supported!\n");
320 if ((tmp
= getenv ("volume")) != NULL
) {
321 volume
= simple_strtoul (tmp
, NULL
, 10);
323 volume
= DEFAULT_VOL
;
325 set_attenuation(volume
);
330 printf ("Usage:\n%s\n", cmdtp
->usage
);
333 if (strncmp(argv
[1],"saw",3) == 0) {
334 printf ("Play sawtooth\n");
335 rcode
= i2s_sawtooth (DEFAULT_DURATION
, DEFAULT_FREQ
,
338 } else if (strncmp(argv
[1],"squ",3) == 0) {
339 printf ("Play squarewave\n");
340 rcode
= i2s_squarewave (DEFAULT_DURATION
, DEFAULT_FREQ
,
345 printf ("Usage:\n%s\n", cmdtp
->usage
);
348 if (strncmp(argv
[1],"saw",3) == 0) {
349 duration
= simple_strtoul(argv
[2], NULL
, 10);
350 printf ("Play sawtooth\n");
351 rcode
= i2s_sawtooth (duration
, DEFAULT_FREQ
,
354 } else if (strncmp(argv
[1],"squ",3) == 0) {
355 duration
= simple_strtoul(argv
[2], NULL
, 10);
356 printf ("Play squarewave\n");
357 rcode
= i2s_squarewave (duration
, DEFAULT_FREQ
,
361 printf ("Usage:\n%s\n", cmdtp
->usage
);
364 if (strncmp(argv
[1],"saw",3) == 0) {
365 duration
= simple_strtoul(argv
[2], NULL
, 10);
366 freq
= (unsigned int)simple_strtoul(argv
[3], NULL
, 10);
367 printf ("Play sawtooth\n");
368 rcode
= i2s_sawtooth (duration
, freq
,
371 } else if (strncmp(argv
[1],"squ",3) == 0) {
372 duration
= simple_strtoul(argv
[2], NULL
, 10);
373 freq
= (unsigned int)simple_strtoul(argv
[3], NULL
, 10);
374 printf ("Play squarewave\n");
375 rcode
= i2s_squarewave (duration
, freq
,
378 } else if (strcmp(argv
[1],"pcm1772") == 0) {
379 reg
= simple_strtoul(argv
[2], NULL
, 10);
380 val
= simple_strtoul(argv
[3], NULL
, 10);
381 printf("Set PCM1772 %lu. %lu\n", reg
, val
);
382 pcm1772_write_reg((uchar
)reg
, (uchar
)val
);
385 printf ("Usage:\n%s\n", cmdtp
->usage
);
388 if (strncmp(argv
[1],"saw",3) == 0) {
389 duration
= simple_strtoul(argv
[2], NULL
, 10);
390 freq
= (unsigned int)simple_strtoul(argv
[3], NULL
, 10);
391 if (strncmp(argv
[4],"l",1) == 0)
393 else if (strncmp(argv
[4],"r",1) == 0)
396 channel
= LEFT_RIGHT
;
397 printf ("Play squarewave\n");
398 rcode
= i2s_sawtooth (duration
, freq
,
401 } else if (strncmp(argv
[1],"squ",3) == 0) {
402 duration
= simple_strtoul(argv
[2], NULL
, 10);
403 freq
= (unsigned int)simple_strtoul(argv
[3], NULL
, 10);
404 if (strncmp(argv
[4],"l",1) == 0)
406 else if (strncmp(argv
[4],"r",1) == 0)
409 channel
= LEFT_RIGHT
;
410 printf ("Play squarewave\n");
411 rcode
= i2s_squarewave (duration
, freq
,
415 printf ("Usage:\n%s\n", cmdtp
->usage
);
418 printf ("Usage:\nsound cmd [arg1] [arg2] ...\n");
422 static int cmd_wav(cmd_tbl_t
*cmdtp
, int flag
, int argc
, char *argv
[])
424 unsigned long length
, addr
;
425 unsigned char volume
;
429 #ifdef CONFIG_STK52XX_REV100
430 printf ("Revision 100 of STK52XX not supported!\n");
440 length
= simple_strtoul(argv
[2], NULL
, 16);
441 addr
= simple_strtoul(argv
[1], NULL
, 16);
445 if ((tmp
= getenv ("filesize")) != NULL
) {
446 length
= simple_strtoul (tmp
, NULL
, 16);
448 puts ("No filesize provided\n");
451 addr
= simple_strtoul(argv
[1], NULL
, 16);
454 if ((tmp
= getenv ("filesize")) != NULL
) {
455 length
= simple_strtoul (tmp
, NULL
, 16);
457 puts ("No filesize provided\n");
460 if ((tmp
= getenv ("loadaddr")) != NULL
) {
461 addr
= simple_strtoul (tmp
, NULL
, 16);
463 puts ("No loadaddr provided\n");
469 printf("Usage:\nwav <addr> <length[s]\n");
474 if ((tmp
= getenv ("volume")) != NULL
) {
475 volume
= simple_strtoul (tmp
, NULL
, 10);
477 volume
= DEFAULT_VOL
;
479 set_attenuation(volume
);
481 printf("Play wave file at %#p with length %#x\n", addr
, length
);
482 rcode
= i2s_play_wave(addr
, length
);
487 static int cmd_beep(cmd_tbl_t
*cmdtp
, int flag
, int argc
, char *argv
[])
489 unsigned char volume
;
490 unsigned int channel
;
494 #ifdef CONFIG_STK52XX_REV100
495 printf ("Revision 100 of STK52XX not supported!\n");
505 channel
= LEFT_RIGHT
;
508 if (strncmp(argv
[1],"l",1) == 0)
510 else if (strncmp(argv
[1],"r",1) == 0)
513 channel
= LEFT_RIGHT
;
516 printf ("Usage:\n%s\n", cmdtp
->usage
);
520 if ((tmp
= getenv ("volume")) != NULL
) {
521 volume
= simple_strtoul (tmp
, NULL
, 10);
523 volume
= DEFAULT_VOL
;
525 set_attenuation(volume
);
530 else if (channel
== RIGHT
)
533 printf ("left and right ");
534 printf ("channel\n");
536 rcode
= i2s_squarewave (DEFAULT_DURATION
, DEFAULT_FREQ
, channel
);
542 #if defined(CONFIG_STK52XX)
545 struct mpc5xxx_gpio
*gpio
= (struct mpc5xxx_gpio
*)MPC5XXX_GPIO
;
546 struct mpc5xxx_gpt_0_7
*gpt
= (struct mpc5xxx_gpt_0_7
*)MPC5XXX_GPT
;
548 /* configure PSC3 for SPI and GPIO */
549 gpio
->port_config
&= ~(0x00000F00);
550 gpio
->port_config
|= 0x00000800;
552 gpio
->simple_gpioe
&= ~(0x00000F00);
553 gpio
->simple_gpioe
|= 0x00000F00;
555 gpio
->simple_ddr
&= ~(0x00000F00);
556 gpio
->simple_ddr
|= 0x00000F00;
558 /* configure timer 4-7 for simple GPIO output */
559 gpt
->gpt4
.emsr
|= 0x00000024;
560 gpt
->gpt5
.emsr
|= 0x00000024;
561 gpt
->gpt6
.emsr
|= 0x00000024;
562 gpt
->gpt7
.emsr
|= 0x00000024;
564 #ifndef CONFIG_TQM5200S
565 /* enable SM501 GPIO control (in both power modes) */
566 *(vu_long
*) (SM501_MMIO_BASE
+SM501_POWER_MODE0_GATE
) |=
567 POWER_MODE_GATE_GPIO_PWM_I2C
;
568 *(vu_long
*) (SM501_MMIO_BASE
+SM501_POWER_MODE1_GATE
) |=
569 POWER_MODE_GATE_GPIO_PWM_I2C
;
571 /* configure SM501 gpio pins 24-27 as output */
572 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_CTRL_LOW
) &= ~(0xF << 24);
573 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_DATA_DIR_LOW
) |= (0xF << 24);
575 /* configure SM501 gpio pins 48-51 as output */
576 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_DATA_DIR_HIGH
) |= (0xF << 16);
577 #endif /* !CONFIG_TQM5200S */
581 * return 1 if led number unknown
584 int do_led(char *argv
[])
586 struct mpc5xxx_gpio
*gpio
= (struct mpc5xxx_gpio
*)MPC5XXX_GPIO
;
587 struct mpc5xxx_gpt_0_7
*gpt
= (struct mpc5xxx_gpt_0_7
*)MPC5XXX_GPT
;
589 switch (simple_strtoul(argv
[2], NULL
, 10)) {
592 if (strcmp (argv
[3], "on") == 0) {
593 gpio
->simple_dvo
|= (1 << 8);
595 gpio
->simple_dvo
&= ~(1 << 8);
600 if (strcmp (argv
[3], "on") == 0) {
601 gpio
->simple_dvo
|= (1 << 9);
603 gpio
->simple_dvo
&= ~(1 << 9);
608 if (strcmp (argv
[3], "on") == 0) {
609 gpio
->simple_dvo
|= (1 << 10);
611 gpio
->simple_dvo
&= ~(1 << 10);
616 if (strcmp (argv
[3], "on") == 0) {
617 gpio
->simple_dvo
|= (1 << 11);
619 gpio
->simple_dvo
&= ~(1 << 11);
624 if (strcmp (argv
[3], "on") == 0) {
625 gpt
->gpt4
.emsr
|= (1 << 4);
627 gpt
->gpt4
.emsr
&= ~(1 << 4);
632 if (strcmp (argv
[3], "on") == 0) {
633 gpt
->gpt5
.emsr
|= (1 << 4);
635 gpt
->gpt5
.emsr
&= ~(1 << 4);
640 if (strcmp (argv
[3], "on") == 0) {
641 gpt
->gpt6
.emsr
|= (1 << 4);
643 gpt
->gpt6
.emsr
&= ~(1 << 4);
648 if (strcmp (argv
[3], "on") == 0) {
649 gpt
->gpt7
.emsr
|= (1 << 4);
651 gpt
->gpt7
.emsr
&= ~(1 << 4);
654 #ifndef CONFIG_TQM5200S
656 if (strcmp (argv
[3], "on") == 0) {
657 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_DATA_LOW
) |=
660 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_DATA_LOW
) &=
666 if (strcmp (argv
[3], "on") == 0) {
667 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_DATA_LOW
) |=
670 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_DATA_LOW
) &=
676 if (strcmp (argv
[3], "on") == 0) {
677 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_DATA_LOW
) |=
680 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_DATA_LOW
) &=
686 if (strcmp (argv
[3], "on") == 0) {
687 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_DATA_LOW
) |=
690 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_DATA_LOW
) &=
696 if (strcmp (argv
[3], "on") == 0) {
697 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_DATA_HIGH
) |=
700 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_DATA_HIGH
) &=
706 if (strcmp (argv
[3], "on") == 0) {
707 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_DATA_HIGH
) |=
710 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_DATA_HIGH
) &=
716 if (strcmp (argv
[3], "on") == 0) {
717 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_DATA_HIGH
) |=
720 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_DATA_HIGH
) &=
726 if (strcmp (argv
[3], "on") == 0) {
727 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_DATA_HIGH
) |=
730 *(vu_long
*) (SM501_MMIO_BASE
+SM501_GPIO_DATA_HIGH
) &=
734 #endif /* !CONFIG_TQM5200S */
736 printf ("%s: invalid led number %s\n", __FUNCTION__
, argv
[2]);
744 #if defined(CONFIG_STK52XX) || defined(CONFIG_FO300)
746 * return 1 on CAN initialization failure
747 * return 0 if no failure
751 static int init_done
= 0;
753 struct mpc5xxx_mscan
*can1
=
754 (struct mpc5xxx_mscan
*)(CFG_MBAR
+ 0x0900);
755 struct mpc5xxx_mscan
*can2
=
756 (struct mpc5xxx_mscan
*)(CFG_MBAR
+ 0x0980);
758 /* GPIO configuration of the CAN pins is done in TQM5200.h */
762 can1
->canctl1
|= 0x80; /* CAN enable */
766 can1
->canctl0
|= 0x02; /* sleep mode */
767 /* wait until sleep mode reached */
768 while (!(can1
->canctl1
& 0x02)) {
772 printf ("%s: CAN1 initialize error, "
773 "can not enter sleep mode!\n",
779 can1
->canctl0
= 0x01; /* enter init mode */
780 /* wait until init mode reached */
781 while (!(can1
->canctl1
& 0x01)) {
785 printf ("%s: CAN1 initialize error, "
786 "can not enter init mode!\n",
791 can1
->canctl1
= 0x80;
792 can1
->canctl1
|= 0x40;
793 can1
->canbtr0
= 0x0F;
794 can1
->canbtr1
= 0x7F;
795 can1
->canidac
&= ~(0x30);
796 can1
->canidar1
= 0x00;
797 can1
->canidar3
= 0x00;
798 can1
->canidar5
= 0x00;
799 can1
->canidar7
= 0x00;
800 can1
->canidmr0
= 0xFF;
801 can1
->canidmr1
= 0xFF;
802 can1
->canidmr2
= 0xFF;
803 can1
->canidmr3
= 0xFF;
804 can1
->canidmr4
= 0xFF;
805 can1
->canidmr5
= 0xFF;
806 can1
->canidmr6
= 0xFF;
807 can1
->canidmr7
= 0xFF;
810 can1
->canctl0
&= ~(0x01); /* leave init mode */
811 can1
->canctl0
&= ~(0x02);
812 /* wait until init and sleep mode left */
813 while ((can1
->canctl1
& 0x01) || (can1
->canctl1
& 0x02)) {
817 printf ("%s: CAN1 initialize error, "
818 "can not leave init/sleep mode!\n",
825 can2
->canctl1
|= 0x80; /* CAN enable */
829 can2
->canctl0
|= 0x02; /* sleep mode */
830 /* wait until sleep mode reached */
831 while (!(can2
->canctl1
& 0x02)) {
835 printf ("%s: CAN2 initialize error, "
836 "can not enter sleep mode!\n",
842 can2
->canctl0
= 0x01; /* enter init mode */
843 /* wait until init mode reached */
844 while (!(can2
->canctl1
& 0x01)) {
848 printf ("%s: CAN2 initialize error, "
849 "can not enter init mode!\n",
854 can2
->canctl1
= 0x80;
855 can2
->canctl1
|= 0x40;
856 can2
->canbtr0
= 0x0F;
857 can2
->canbtr1
= 0x7F;
858 can2
->canidac
&= ~(0x30);
859 can2
->canidar1
= 0x00;
860 can2
->canidar3
= 0x00;
861 can2
->canidar5
= 0x00;
862 can2
->canidar7
= 0x00;
863 can2
->canidmr0
= 0xFF;
864 can2
->canidmr1
= 0xFF;
865 can2
->canidmr2
= 0xFF;
866 can2
->canidmr3
= 0xFF;
867 can2
->canidmr4
= 0xFF;
868 can2
->canidmr5
= 0xFF;
869 can2
->canidmr6
= 0xFF;
870 can2
->canidmr7
= 0xFF;
871 can2
->canctl0
&= ~(0x01); /* leave init mode */
872 can2
->canctl0
&= ~(0x02);
875 /* wait until init mode left */
876 while ((can2
->canctl1
& 0x01) || (can2
->canctl1
& 0x02)) {
880 printf ("%s: CAN2 initialize error, "
881 "can not leave init/sleep mode!\n",
892 * return 1 on CAN failure
893 * return 0 if no failure
895 int do_can(char *argv
[])
898 struct mpc5xxx_mscan
*can1
=
899 (struct mpc5xxx_mscan
*)(CFG_MBAR
+ 0x0900);
900 struct mpc5xxx_mscan
*can2
=
901 (struct mpc5xxx_mscan
*)(CFG_MBAR
+ 0x0980);
903 /* send a message on CAN1 */
904 can1
->cantbsel
= 0x01;
905 can1
->cantxfg
.idr
[0] = 0x55;
906 can1
->cantxfg
.idr
[1] = 0x00;
907 can1
->cantxfg
.idr
[1] &= ~0x8;
908 can1
->cantxfg
.idr
[1] &= ~0x10;
909 can1
->cantxfg
.dsr
[0] = 0xCC;
910 can1
->cantxfg
.dlr
= 1;
911 can1
->cantxfg
.tbpr
= 0;
912 can1
->cantflg
= 0x01;
915 while ((can1
->cantflg
& 0x01) == 0) {
918 printf ("%s: CAN1 send timeout, "
919 "can not send message!\n",
928 while (!(can2
->canrflg
& 0x01)) {
931 printf ("%s: CAN2 receive timeout, "
932 "no message received!\n",
939 if (can2
->canrxfg
.dsr
[0] != 0xCC) {
940 printf ("%s: CAN2 receive error, "
946 /* send a message on CAN2 */
947 can2
->cantbsel
= 0x01;
948 can2
->cantxfg
.idr
[0] = 0x55;
949 can2
->cantxfg
.idr
[1] = 0x00;
950 can2
->cantxfg
.idr
[1] &= ~0x8;
951 can2
->cantxfg
.idr
[1] &= ~0x10;
952 can2
->cantxfg
.dsr
[0] = 0xCC;
953 can2
->cantxfg
.dlr
= 1;
954 can2
->cantxfg
.tbpr
= 0;
955 can2
->cantflg
= 0x01;
958 while ((can2
->cantflg
& 0x01) == 0) {
961 printf ("%s: CAN2 send error, "
962 "can not send message!\n",
971 while (!(can1
->canrflg
& 0x01)) {
974 printf ("%s: CAN1 receive timeout, "
975 "no message received!\n",
982 if (can1
->canrxfg
.dsr
[0] != 0xCC) {
983 printf ("%s: CAN1 receive error 0x%02x\n",
984 __FUNCTION__
, (can1
->canrxfg
.dsr
[0]));
992 * return 1 if rs232 port unknown
993 * return 2 on txd/rxd failure (only rs232 2)
994 * return 3 on rts/cts failure
995 * return 0 if no failure
997 int do_rs232(char *argv
[])
999 int error_status
= 0;
1000 struct mpc5xxx_gpio
*gpio
= (struct mpc5xxx_gpio
*)MPC5XXX_GPIO
;
1001 struct mpc5xxx_psc
*psc1
= (struct mpc5xxx_psc
*)MPC5XXX_PSC1
;
1003 switch (simple_strtoul(argv
[2], NULL
, 10)) {
1006 /* check RTS <-> CTS loop */
1010 /* wait some time before requesting status */
1013 /* check status at cts */
1014 if ((psc1
->ip
& 0x01) != 0) {
1016 printf ("%s: failure at rs232_1, cts status is %d "
1018 __FUNCTION__
, (psc1
->ip
& 0x01));
1024 /* wait some time before requesting status */
1027 /* check status at cts */
1028 if ((psc1
->ip
& 0x01) != 1) {
1030 printf ("%s: failure at rs232_1, cts status is %d "
1032 __FUNCTION__
, (psc1
->ip
& 0x01));
1038 /* set PSC3_0, PSC3_2 as output and PSC3_1, PSC3_3 as input */
1039 gpio
->simple_ddr
&= ~(0x00000F00);
1040 gpio
->simple_ddr
|= 0x00000500;
1042 /* check TXD <-> RXD loop */
1044 gpio
->simple_dvo
|= (1 << 8);
1046 /* wait some time before requesting status */
1049 if ((gpio
->simple_ival
& 0x00000200) != 0x00000200) {
1051 printf ("%s: failure at rs232_2, rxd status is %d "
1054 (gpio
->simple_ival
& 0x00000200) >> 9);
1058 gpio
->simple_dvo
&= ~(1 << 8);
1060 /* wait some time before requesting status */
1063 if ((gpio
->simple_ival
& 0x00000200) != 0x00000000) {
1065 printf ("%s: failure at rs232_2, rxd status is %d "
1068 (gpio
->simple_ival
& 0x00000200) >> 9);
1071 /* check RTS <-> CTS loop */
1073 gpio
->simple_dvo
|= (1 << 10);
1075 /* wait some time before requesting status */
1078 if ((gpio
->simple_ival
& 0x00000800) != 0x00000800) {
1080 printf ("%s: failure at rs232_2, cts status is %d "
1083 (gpio
->simple_ival
& 0x00000800) >> 11);
1087 gpio
->simple_dvo
&= ~(1 << 10);
1089 /* wait some time before requesting status */
1092 if ((gpio
->simple_ival
& 0x00000800) != 0x00000000) {
1094 printf ("%s: failure at rs232_2, cts status is %d "
1097 (gpio
->simple_ival
& 0x00000800) >> 11);
1100 /* set PSC3_0, PSC3_1, PSC3_2 and PSC3_3 as output */
1101 gpio
->simple_ddr
&= ~(0x00000F00);
1102 gpio
->simple_ddr
|= 0x00000F00;
1106 printf ("%s: invalid rs232 number %s\n", __FUNCTION__
, argv
[2]);
1111 return error_status
;
1114 #if !defined(CONFIG_FO300) && !defined(CONFIG_TQM5200S)
1115 static void sm501_backlight (unsigned int state
)
1117 if (state
== BL_ON
) {
1118 *(vu_long
*)(SM501_MMIO_BASE
+SM501_PANEL_DISPLAY_CONTROL
) |=
1119 (1 << 26) | (1 << 27);
1120 } else if (state
== BL_OFF
)
1121 *(vu_long
*)(SM501_MMIO_BASE
+SM501_PANEL_DISPLAY_CONTROL
) &=
1122 ~((1 << 26) | (1 << 27));
1124 #endif /* !CONFIG_FO300 & !CONFIG_TQM5200S */
1126 int cmd_fkt(cmd_tbl_t
*cmdtp
, int flag
, int argc
, char *argv
[])
1130 #ifdef CONFIG_STK52XX_REV100
1131 printf ("Revision 100 of STK52XX not supported!\n");
1134 #if defined(CONFIG_STK52XX)
1146 if (strncmp (argv
[1], "can", 3) == 0) {
1147 rcode
= do_can (argv
);
1157 if (strncmp (argv
[1], "rs232", 3) == 0) {
1158 rcode
= do_rs232 (argv
);
1164 #if !defined(CONFIG_FO300) && !defined(CONFIG_TQM5200S)
1165 } else if (strncmp (argv
[1], "backlight", 4) == 0) {
1166 if (strncmp (argv
[2], "on", 2) == 0) {
1167 sm501_backlight (BL_ON
);
1170 else if (strncmp (argv
[2], "off", 3) == 0) {
1171 sm501_backlight (BL_OFF
);
1174 #endif /* !CONFIG_FO300 & !CONFIG_TQM5200S */
1178 #if defined(CONFIG_STK52XX)
1180 if (strcmp (argv
[1], "led") == 0) {
1181 return (do_led (argv
));
1190 printf ("Usage:\nfkt cmd [arg1] [arg2] ...\n");
1196 sound
, 5, 1, cmd_sound
,
1197 "sound - Sound sub-system\n",
1198 "saw [duration] [freq] [channel]\n"
1199 " - generate sawtooth for 'duration' ms with frequency 'freq'\n"
1200 " on left \"l\" or right \"r\" channel\n"
1201 "sound square [duration] [freq] [channel]\n"
1202 " - generate squarewave for 'duration' ms with frequency 'freq'\n"
1203 " on left \"l\" or right \"r\" channel\n"
1208 wav
, 3, 1, cmd_wav
,
1209 "wav - play wav file\n",
1211 " - play wav file at address 'addr' with length 'bytes'\n"
1215 beep
, 2, 1, cmd_beep
,
1216 "beep - play short beep\n",
1218 " - play short beep on \"l\"eft or \"r\"ight channel\n"
1220 #endif /* CONFIG_STK52XX || CONFIG_FO300 */
1222 #if defined(CONFIG_STK52XX)
1224 fkt
, 4, 1, cmd_fkt
,
1225 "fkt - Function test routines\n",
1226 "led number on/off\n"
1227 " - 'number's like printed on STK52XX board\n"
1229 " - loopback plug for X83 required\n"
1230 "fkt rs232 number\n"
1231 " - loopback plug(s) for X2 required\n"
1232 #ifndef CONFIG_TQM5200S
1233 "fkt backlight on/off\n"
1234 " - switch backlight on or off\n"
1235 #endif /* !CONFIG_TQM5200S */
1237 #elif defined(CONFIG_FO300)
1239 fkt
, 3, 1, cmd_fkt
,
1240 "fkt - Function test routines\n",
1242 " - loopback plug for X16/X29 required\n"
1243 "fkt rs232 number\n"
1244 " - loopback plug(s) for X21/X22 required\n"