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,
28 #include <asm/arch/s3c24x0_cpu.h>
32 * TRAB board specific commands. Especially commands for burn-in and function
35 #if defined(CONFIG_CMD_BSP)
37 /* limits for valid range of VCC5V in mV */
38 #define VCC5V_MIN 4500
39 #define VCC5V_MAX 5500
42 * Test strings for EEPROM test. Length of string 2 must not exceed length of
43 * string 1. Otherwise a buffer overrun could occur!
45 #define EEPROM_TEST_STRING_1 "0987654321 :tset a si siht"
46 #define EEPROM_TEST_STRING_2 "this is a test: 1234567890"
49 * min/max limits for valid contact temperature during burn in test (in
50 * degree Centigrade * 100)
52 #define MIN_CONTACT_TEMP -1000
53 #define MAX_CONTACT_TEMP +9000
55 /* blinking frequency of status LED */
56 #define LED_BLINK_FREQ 5
58 /* delay time between burn in cycles in seconds */
59 #ifndef BURN_IN_CYCLE_DELAY /* if not defined in include/configs/trab.h */
60 #define BURN_IN_CYCLE_DELAY 5
63 /* physical SRAM parameters */
64 #define SRAM_ADDR 0x02000000 /* GCS1 */
65 #define SRAM_SIZE 0x40000 /* 256 kByte */
67 /* CPLD-Register for controlling TRAB hardware functions */
68 #define CPLD_BUTTONS ((volatile unsigned long *)0x04020000)
69 #define CPLD_FILL_LEVEL ((volatile unsigned long *)0x04008000)
70 #define CPLD_ROTARY_SWITCH ((volatile unsigned long *)0x04018000)
71 #define CPLD_RS485_RE ((volatile unsigned long *)0x04028000)
73 /* I2C EEPROM device address */
74 #define I2C_EEPROM_DEV_ADDR 0x54
76 /* EEPROM address map */
77 #define EE_ADDR_TEST 192
78 #define EE_ADDR_MAX_CYCLES 256
79 #define EE_ADDR_STATUS 258
80 #define EE_ADDR_PASS_CYCLES 259
81 #define EE_ADDR_FIRST_ERROR_CYCLE 261
82 #define EE_ADDR_FIRST_ERROR_NUM 263
83 #define EE_ADDR_FIRST_ERROR_NAME 264
84 #define EE_ADDR_ACT_CYCLE 280
86 /* Bit definitions for ADCCON */
87 #define ADC_ENABLE_START 0x1
88 #define ADC_READ_START 0x2
90 #define ADC_INP_AIN0 (0x0 << 3)
91 #define ADC_INP_AIN1 (0x1 << 3)
92 #define ADC_INP_AIN2 (0x2 << 3)
93 #define ADC_INP_AIN3 (0x3 << 3)
94 #define ADC_INP_AIN4 (0x4 << 3)
95 #define ADC_INP_AIN5 (0x5 << 3)
96 #define ADC_INP_AIN6 (0x6 << 3)
97 #define ADC_INP_AIN7 (0x7 << 3)
98 #define ADC_PRSCEN 0x4000
99 #define ADC_ECFLG 0x800
104 extern int memory_post_tests (unsigned long start, unsigned long size);
105 extern int i2c_write (uchar, uint, int , uchar* , int);
106 extern int i2c_read (uchar, uint, int , uchar* , int);
107 extern void tsc2000_reg_init (void);
108 extern s32 tsc2000_contact_temp (void);
109 extern void tsc2000_spi_init(void);
111 /* function declarations */
112 int do_dip (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]);
113 int do_vcc5v (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]);
114 int do_burn_in (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]);
115 int do_contact_temp (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]);
116 int do_burn_in_status (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]);
117 int i2c_write_multiple (uchar chip, uint addr, int alen,
118 uchar *buffer, int len);
119 int i2c_read_multiple (uchar chip, uint addr, int alen,
120 uchar *buffer, int len);
121 int do_temp_log (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]);
123 /* helper functions */
124 static void adc_init (void);
125 static int adc_read (unsigned int channel);
126 static int read_dip (void);
127 static int read_vcc5v (void);
128 static int test_dip (void);
129 static int test_vcc5v (void);
130 static int test_rotary_switch (void);
131 static int test_sram (void);
132 static int test_eeprom (void);
133 static int test_contact_temp (void);
134 static void led_set (unsigned int);
135 static void led_blink (void);
136 static void led_init (void);
137 static void sdelay (unsigned long seconds); /* delay in seconds */
138 static int dummy (void);
139 static int read_max_cycles(void);
140 static void test_function_table_init (void);
141 static void global_vars_init (void);
142 static int global_vars_write_to_eeprom (void);
148 u16 first_error_cycle;
150 char first_error_name[16];
153 typedef struct test_function_s {
158 /* max number of Burn In Functions */
161 /* table with burn in functions */
162 test_function_t test_function[BIF_MAX];
165 int do_burn_in (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
171 return cmd_usage(cmdtp);
175 test_function_table_init ();
178 if (global_vars_write_to_eeprom () != 0) {
179 printf ("%s: error writing global_vars to eeprom\n",
184 if (read_max_cycles () != 0) {
185 printf ("%s: error reading max_cycles from eeprom\n",
190 if (max_cycles == 0) {
191 printf ("%s: error, burn in max_cycles = 0\n", __FUNCTION__);
196 for (act_cycle = 1; act_cycle <= max_cycles; act_cycle++) {
201 * avoid timestamp overflow problem after about 68 minutes of
204 reset_timer_masked ();
205 for (i = 0; i < BIF_MAX; i++) {
207 /* call test function */
208 if ((*test_function[i].pf)() != 0) {
209 printf ("error in %s test\n",
210 test_function[i].name);
212 /* is it the first error? */
215 first_error_cycle = act_cycle;
217 /* do not use error_num 0 */
218 first_error_num = i+1;
219 strncpy (first_error_name,
220 test_function[i].name,
221 sizeof (first_error_name));
227 /* were all tests of actual cycle OK? */
228 if (cycle_status == 0)
231 /* set status LED if no error is occoured since yet */
235 printf ("%s: cycle %d finished\n", __FUNCTION__, act_cycle);
237 /* pause between cycles */
238 sdelay (BURN_IN_CYCLE_DELAY);
241 if (global_vars_write_to_eeprom () != 0) {
243 printf ("%s: error writing global_vars to eeprom\n",
249 led_blink (); /* endless loop!! */
258 burn_in, 1, 1, do_burn_in,
259 "start burn-in test application on TRAB",
261 " - start burn-in test application\n"
262 " The burn-in test could took a while to finish!\n"
263 " The content of the onboard EEPROM is modified!"
267 int do_dip (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
272 return cmd_usage(cmdtp);
274 if ((dip = read_dip ()) == -1)
277 for (i = 0; i < 4; i++) {
278 if ((dip & (1 << i)) == 0)
290 "read dip switch on TRAB",
292 " - read state of dip switch (S1) on TRAB board\n"
293 " read sequence: 1-2-3-4; ON=1; OFF=0; e.g.: \"0100\""
297 int do_vcc5v (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
302 return cmd_usage(cmdtp);
304 if ((vcc5v = read_vcc5v ()) == -1)
307 printf ("%d", (vcc5v / 1000));
308 printf (".%d", (vcc5v % 1000) / 100);
309 printf ("%d V\n", (vcc5v % 100) / 10) ;
315 vcc5v, 1, 1, do_vcc5v,
316 "read VCC5V on TRAB",
318 " - read actual value of voltage VCC5V"
322 int do_contact_temp (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
327 return cmd_usage(cmdtp);
331 contact_temp = tsc2000_contact_temp();
332 printf ("%d degree C * 100\n", contact_temp) ;
338 c_temp, 1, 1, do_contact_temp,
339 "read contact temperature on TRAB",
341 " - reads the onboard temperature (=contact temperature)\n"
345 int do_burn_in_status (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
348 return cmd_usage(cmdtp);
350 if (i2c_read_multiple (I2C_EEPROM_DEV_ADDR, EE_ADDR_STATUS, 1,
351 (unsigned char*) &status, 1))
354 if (i2c_read_multiple (I2C_EEPROM_DEV_ADDR, EE_ADDR_PASS_CYCLES, 1,
355 (unsigned char*) &pass_cycles, 2))
358 if (i2c_read_multiple (I2C_EEPROM_DEV_ADDR, EE_ADDR_FIRST_ERROR_CYCLE,
359 1, (unsigned char*) &first_error_cycle, 2))
362 if (i2c_read_multiple (I2C_EEPROM_DEV_ADDR, EE_ADDR_FIRST_ERROR_NUM,
363 1, (unsigned char*) &first_error_num, 1))
366 if (i2c_read_multiple (I2C_EEPROM_DEV_ADDR, EE_ADDR_FIRST_ERROR_NAME,
367 1, (unsigned char*)first_error_name,
368 sizeof (first_error_name)))
371 if (read_max_cycles () != 0)
374 printf ("max_cycles = %d\n", max_cycles);
375 printf ("status = %d\n", status);
376 printf ("pass_cycles = %d\n", pass_cycles);
377 printf ("first_error_cycle = %d\n", first_error_cycle);
378 printf ("first_error_num = %d\n", first_error_num);
379 printf ("first_error_name = %.*s\n",(int) sizeof(first_error_name),
386 bis, 1, 1, do_burn_in_status,
387 "print burn in status on TRAB",
389 " - prints the status variables of the last burn in test\n"
390 " stored in the onboard EEPROM on TRAB board"
393 static int read_dip (void)
395 unsigned int result = 0;
399 /***********************************************************
400 DIP switch connection (according to wa4-cpu.sp.301.pdf, page 3):
406 "On" DIP switch position short-circuits the voltage from
407 the input channel (i.e. '0' conversion result means "on").
408 *************************************************************/
410 for (i = 7; i > 3; i--) {
412 if ((adc_val = adc_read (i)) == -1) {
413 printf ("%s: Channel %d could not be read\n",
419 * Input voltage (switch open) is 1.8 V.
420 * (Vin_High/VRef)*adc_res = (1,8V/2,5V)*1023) = 736
421 * Set trigger at halve that value.
424 result |= (1 << (i-4));
430 static int read_vcc5v (void)
434 /* VCC5V is connected to channel 2 */
436 if ((result = adc_read (2)) == -1) {
437 printf ("%s: VCC5V could not be read\n", __FUNCTION__);
441 * Calculate voltage value. Split in two parts because there is no
442 * floating point support. VCC5V is connected over an resistor divider:
443 * VCC5V=ADCval*2,5V/1023*(10K+30K)/10K.
445 result = result * 10 * 1000 / 1023; /* result in mV */
451 static int test_dip (void)
453 static int first_run = 1;
454 static int first_dip;
457 if ((first_dip = read_dip ()) == -1) {
461 debug ("%s: first_dip=%d\n", __FUNCTION__, first_dip);
463 if (first_dip != read_dip ()) {
471 static int test_vcc5v (void)
475 if ((vcc5v = read_vcc5v ()) == -1) {
479 if ((vcc5v > VCC5V_MAX) || (vcc5v < VCC5V_MIN)) {
480 printf ("%s: vcc5v[V/100]=%d\n", __FUNCTION__, vcc5v);
488 static int test_rotary_switch (void)
490 static int first_run = 1;
495 * clear bits in CPLD, because they have random values after
498 *CPLD_ROTARY_SWITCH |= (1 << 16) | (1 << 17);
500 first_rs = ((*CPLD_ROTARY_SWITCH >> 16) & 0x7);
502 debug ("%s: first_rs=%d\n", __FUNCTION__, first_rs);
505 if (first_rs != ((*CPLD_ROTARY_SWITCH >> 16) & 0x7)) {
513 static int test_sram (void)
515 return (memory_post_tests (SRAM_ADDR, SRAM_SIZE));
519 static int test_eeprom (void)
521 unsigned char temp[sizeof (EEPROM_TEST_STRING_1)];
524 /* write test string 1, read back and verify */
525 if (i2c_write_multiple (I2C_EEPROM_DEV_ADDR, EE_ADDR_TEST, 1,
526 (unsigned char*)EEPROM_TEST_STRING_1,
527 sizeof (EEPROM_TEST_STRING_1))) {
531 if (i2c_read_multiple (I2C_EEPROM_DEV_ADDR, EE_ADDR_TEST, 1,
532 temp, sizeof (EEPROM_TEST_STRING_1))) {
536 if (strcmp ((char *)temp, EEPROM_TEST_STRING_1) != 0) {
538 printf ("%s: error; read_str = \"%s\"\n", __FUNCTION__, temp);
541 /* write test string 2, read back and verify */
543 if (i2c_write_multiple (I2C_EEPROM_DEV_ADDR, EE_ADDR_TEST, 1,
544 (unsigned char*)EEPROM_TEST_STRING_2,
545 sizeof (EEPROM_TEST_STRING_2))) {
549 if (i2c_read_multiple (I2C_EEPROM_DEV_ADDR, EE_ADDR_TEST, 1,
550 temp, sizeof (EEPROM_TEST_STRING_2))) {
554 if (strcmp ((char *)temp, EEPROM_TEST_STRING_2) != 0) {
556 printf ("%s: error; read str = \"%s\"\n",
564 static int test_contact_temp (void)
568 contact_temp = tsc2000_contact_temp ();
570 if ((contact_temp < MIN_CONTACT_TEMP)
571 || (contact_temp > MAX_CONTACT_TEMP))
578 int i2c_write_multiple (uchar chip, uint addr, int alen,
579 uchar *buffer, int len)
584 printf ("%s: addr len other than 1 not supported\n",
589 for (i = 0; i < len; i++) {
590 if (i2c_write (chip, addr+i, alen, buffer+i, 1)) {
591 printf ("%s: could not write to i2c device %d"
592 ", addr %d\n", __FUNCTION__, chip, addr);
596 printf ("chip=%#x, addr+i=%#x+%d=%p, alen=%d, *buffer+i="
597 "%#x+%d=%p=\"%.1s\"\n", chip, addr, i, addr+i,
598 alen, buffer, i, buffer+i, buffer+i);
607 int i2c_read_multiple ( uchar chip, uint addr, int alen,
608 uchar *buffer, int len)
613 printf ("%s: addr len other than 1 not supported\n",
618 for (i = 0; i < len; i++) {
619 if (i2c_read (chip, addr+i, alen, buffer+i, 1)) {
620 printf ("%s: could not read from i2c device %#x"
621 ", addr %d\n", __FUNCTION__, chip, addr);
629 static int adc_read (unsigned int channel)
631 int j = 1000; /* timeout value for wait loop in us */
633 struct s3c2400_adc *padc;
635 padc = s3c2400_get_base_adc();
640 padc->ADCCON &= ~ADC_STDBM; /* select normal mode */
641 padc->ADCCON &= ~(0x7 << 3); /* clear the channel bits */
642 padc->ADCCON |= ((channel << 3) | ADC_ENABLE_START);
645 if ((padc->ADCCON & ADC_ENABLE_START) == 0)
651 printf("%s: ADC timeout\n", __FUNCTION__);
652 padc->ADCCON |= ADC_STDBM; /* select standby mode */
656 result = padc->ADCDAT & 0x3FF;
658 padc->ADCCON |= ADC_STDBM; /* select standby mode */
660 debug ("%s: channel %d, result[DIGIT]=%d\n", __FUNCTION__,
661 (padc->ADCCON >> 3) & 0x7, result);
664 * Wait for ADC to be ready for next conversion. This delay value was
665 * estimated, because the datasheet does not specify a value.
673 static void adc_init (void)
675 struct s3c2400_adc *padc;
677 padc = s3c2400_get_base_adc();
679 padc->ADCCON &= ~(0xff << 6); /* clear prescaler bits */
680 padc->ADCCON |= ((65 << 6) | ADC_PRSCEN); /* set prescaler */
683 * Wait some time to avoid problem with very first call of
684 * adc_read(). Without this delay, sometimes the first read
685 * adc value is 0. Perhaps because the adjustment of prescaler
686 * takes some clock cycles?
694 static void led_set (unsigned int state)
696 struct s3c24x0_gpio * const gpio = s3c24x0_get_base_gpio();
701 case 0: /* turn LED off */
702 gpio->PADAT |= (1 << 12);
704 case 1: /* turn LED on */
705 gpio->PADAT &= ~(1 << 12);
712 static void led_blink (void)
716 /* blink LED. This function does not return! */
718 reset_timer_masked ();
720 udelay (1000000 / LED_BLINK_FREQ / 2);
722 udelay (1000000 / LED_BLINK_FREQ / 2);
727 static void led_init (void)
729 struct s3c24x0_gpio * const gpio = s3c24x0_get_base_gpio();
731 /* configure GPA12 as output and set to High -> LED off */
732 gpio->PACON &= ~(1 << 12);
733 gpio->PADAT |= (1 << 12);
737 static void sdelay (unsigned long seconds)
741 for (i = 0; i < seconds; i++) {
747 static int global_vars_write_to_eeprom (void)
749 if (i2c_write_multiple (I2C_EEPROM_DEV_ADDR, EE_ADDR_STATUS, 1,
750 (unsigned char*) &status, 1)) {
753 if (i2c_write_multiple (I2C_EEPROM_DEV_ADDR, EE_ADDR_PASS_CYCLES, 1,
754 (unsigned char*) &pass_cycles, 2)) {
757 if (i2c_write_multiple (I2C_EEPROM_DEV_ADDR, EE_ADDR_FIRST_ERROR_CYCLE,
758 1, (unsigned char*) &first_error_cycle, 2)) {
761 if (i2c_write_multiple (I2C_EEPROM_DEV_ADDR, EE_ADDR_FIRST_ERROR_NUM,
762 1, (unsigned char*) &first_error_num, 1)) {
765 if (i2c_write_multiple (I2C_EEPROM_DEV_ADDR, EE_ADDR_FIRST_ERROR_NAME,
766 1, (unsigned char*) first_error_name,
767 sizeof(first_error_name))) {
773 static void global_vars_init (void)
775 status = 1; /* error */
777 first_error_cycle = 0;
779 first_error_name[0] = '\0';
785 static void test_function_table_init (void)
789 for (i = 0; i < BIF_MAX; i++)
790 test_function[i].pf = dummy;
793 * the length of "name" must not exceed 16, including the '\0'
794 * termination. See also the EEPROM address map.
796 test_function[0].pf = test_dip;
797 test_function[0].name = "dip";
799 test_function[1].pf = test_vcc5v;
800 test_function[1].name = "vcc5v";
802 test_function[2].pf = test_rotary_switch;
803 test_function[2].name = "rotary_switch";
805 test_function[3].pf = test_sram;
806 test_function[3].name = "sram";
808 test_function[4].pf = test_eeprom;
809 test_function[4].name = "eeprom";
811 test_function[5].pf = test_contact_temp;
812 test_function[5].name = "contact_temp";
816 static int read_max_cycles (void)
818 if (i2c_read_multiple (I2C_EEPROM_DEV_ADDR, EE_ADDR_MAX_CYCLES, 1,
819 (unsigned char *) &max_cycles, 2) != 0) {
826 static int dummy(void)
831 int do_temp_log (cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
835 #if defined(CONFIG_CMD_DATE)
840 return cmd_usage(cmdtp);
843 delay = simple_strtoul(argv[1], NULL, 10);
848 #if defined(CONFIG_CMD_DATE)
850 printf ("%4d-%02d-%02d %2d:%02d:%02d - ",
851 tm.tm_year, tm.tm_mon, tm.tm_mday,
852 tm.tm_hour, tm.tm_min, tm.tm_sec);
855 contact_temp = tsc2000_contact_temp();
856 printf ("%d\n", contact_temp) ;
860 * reset timer to avoid timestamp overflow problem
861 * after about 68 minutes of udelay() time.
863 reset_timer_masked ();
871 tlog, 2, 1, do_temp_log,
872 "log contact temperature [1/100 C] to console (endlessly)",
874 " - contact temperature [1/100 C] is printed endlessly to console\n"
875 " <delay> specifies the seconds to wait between two measurements\n"
876 " For each measurment a timestamp is printeted"