|  | /* | 
|  | * (C) Copyright 2004 | 
|  | * Wolfgang Denk, DENX Software Engineering, wd@denx.de. | 
|  | * | 
|  | * SPDX-License-Identifier:	GPL-2.0+ | 
|  | */ | 
|  |  | 
|  | #include <common.h> | 
|  | #include <command.h> | 
|  | #include <malloc.h> | 
|  | #include <asm/m5249.h> | 
|  | #include <asm/io.h> | 
|  |  | 
|  |  | 
|  | /* Prototypes */ | 
|  | int i2c_write(uchar chip, uint addr, int alen, uchar *buffer, int len); | 
|  | int i2c_read(uchar chip, uint addr, int alen, uchar *buffer, int len); | 
|  |  | 
|  |  | 
|  | #if 0 | 
|  | #define FPGA_DEBUG | 
|  | #endif | 
|  |  | 
|  | /* predefine these here for FPGA programming (before including fpga.c) */ | 
|  | #define SET_FPGA(data)  mbar2_writeLong(MCFSIM_GPIO1_OUT, data) | 
|  | #define FPGA_DONE_STATE (mbar2_readLong(MCFSIM_GPIO1_READ) & CONFIG_SYS_FPGA_DONE) | 
|  | #define FPGA_INIT_STATE (mbar2_readLong(MCFSIM_GPIO1_READ) & CONFIG_SYS_FPGA_INIT) | 
|  | #define FPGA_PROG_ACTIVE_HIGH          /* on this platform is PROG active high!   */ | 
|  | #define out32(a,b)                     /* nothing to do (gpio already configured) */ | 
|  |  | 
|  |  | 
|  | /* fpga configuration data - generated by bin2cc */ | 
|  | const unsigned char fpgadata[] = | 
|  | { | 
|  | #include "fpgadata.c" | 
|  | }; | 
|  |  | 
|  | /* | 
|  | * include common fpga code (for esd boards) | 
|  | */ | 
|  | #include "../common/fpga.c" | 
|  |  | 
|  |  | 
|  | int checkboard (void) { | 
|  | ulong val; | 
|  | uchar val8; | 
|  |  | 
|  | puts ("Board: "); | 
|  | puts("esd TASREG"); | 
|  | val8 = ((uchar)~((uchar)mbar2_readLong(MCFSIM_GPIO1_READ) >> 4)) & 0xf; | 
|  | printf(" (Switch=%1X)\n", val8); | 
|  |  | 
|  | /* | 
|  | * Set LED on | 
|  | */ | 
|  | val = mbar2_readLong(MCFSIM_GPIO1_OUT) & ~CONFIG_SYS_GPIO1_LED; | 
|  | mbar2_writeLong(MCFSIM_GPIO1_OUT, val);   /* Set LED on */ | 
|  |  | 
|  | return 0; | 
|  | }; | 
|  |  | 
|  |  | 
|  | phys_size_t initdram (int board_type) { | 
|  | unsigned long	junk = 0xa5a59696; | 
|  |  | 
|  | /* | 
|  | *  Note: | 
|  | *	RC = ([(RefreshTime/#rows) / (1/BusClk)] / 16) - 1 | 
|  | */ | 
|  |  | 
|  | #ifdef CONFIG_SYS_FAST_CLK | 
|  | /* | 
|  | * Busclk=70MHz, RefreshTime=64ms, #rows=4096 (4K) | 
|  | * SO=1, NAM=0, COC=0, RTIM=01 (6clk refresh), RC=39 | 
|  | */ | 
|  | mbar_writeShort(MCFSIM_DCR, 0x8239); | 
|  | #elif CONFIG_SYS_PLL_BYPASS | 
|  | /* | 
|  | * Busclk=5.6448MHz, RefreshTime=64ms, #rows=8192 (8K) | 
|  | * SO=1, NAM=0, COC=0, RTIM=01 (6clk refresh), RC=02 | 
|  | */ | 
|  | mbar_writeShort(MCFSIM_DCR, 0x8202); | 
|  | #else | 
|  | /* | 
|  | * Busclk=36MHz, RefreshTime=64ms, #rows=4096 (4K) | 
|  | * SO=1, NAM=0, COC=0, RTIM=01 (6clk refresh), RC=22 (562 bus clock cycles) | 
|  | */ | 
|  | mbar_writeShort(MCFSIM_DCR, 0x8222); | 
|  | #endif | 
|  |  | 
|  | /* | 
|  | * SDRAM starts at 0x0000_0000, CASL=10, CBM=010, PS=10 (16bit port), | 
|  | * PM=1 (continuous page mode) | 
|  | */ | 
|  |  | 
|  | /* RE=0 (keep auto-refresh disabled while setting up registers) */ | 
|  | mbar_writeLong(MCFSIM_DACR0, 0x00003324); | 
|  |  | 
|  | /* BAM=007c (bits 22,21 are bank selects; 256kB blocks) */ | 
|  | mbar_writeLong(MCFSIM_DMR0, 0x01fc0001); | 
|  |  | 
|  | /** Precharge sequence **/ | 
|  | mbar_writeLong(MCFSIM_DACR0, 0x0000332c); /* Set DACR0[IP] (bit 3) */ | 
|  | out_be32((void *)0, junk); /* write to a memory location to init. precharge */ | 
|  | udelay(0x10); /* Allow several Precharge cycles */ | 
|  |  | 
|  | /** Refresh Sequence **/ | 
|  | mbar_writeLong(MCFSIM_DACR0, 0x0000b324); /* Enable the refresh bit, DACR0[RE] (bit 15) */ | 
|  | udelay(0x7d0); /* Allow gobs of refresh cycles */ | 
|  |  | 
|  | /** Mode Register initialization **/ | 
|  | mbar_writeLong(MCFSIM_DACR0, 0x0000b364);  /* Enable DACR0[IMRS] (bit 6); RE remains enabled */ | 
|  | out_be32((void *)0x800, junk); /* Access RAM to initialize the mode register */ | 
|  |  | 
|  | return CONFIG_SYS_SDRAM_SIZE * 1024 * 1024; | 
|  | }; | 
|  |  | 
|  |  | 
|  | int testdram (void) { | 
|  | /* TODO: XXX XXX XXX */ | 
|  | printf ("DRAM test not implemented!\n"); | 
|  |  | 
|  | return (0); | 
|  | } | 
|  |  | 
|  |  | 
|  | int misc_init_r (void) | 
|  | { | 
|  | unsigned char *dst; | 
|  | ulong len = sizeof(fpgadata); | 
|  | int status; | 
|  | int index; | 
|  | int i; | 
|  | uchar buf[8]; | 
|  |  | 
|  | dst = malloc(CONFIG_SYS_FPGA_MAX_SIZE); | 
|  | if (gunzip (dst, CONFIG_SYS_FPGA_MAX_SIZE, (uchar *)fpgadata, &len) != 0) { | 
|  | printf ("GUNZIP ERROR - must RESET board to recover\n"); | 
|  | do_reset (NULL, 0, 0, NULL); | 
|  | } | 
|  |  | 
|  | status = fpga_boot(dst, len); | 
|  | if (status != 0) { | 
|  | printf("\nFPGA: Booting failed "); | 
|  | switch (status) { | 
|  | case ERROR_FPGA_PRG_INIT_LOW: | 
|  | printf("(Timeout: INIT not low after asserting PROGRAM*)\n "); | 
|  | break; | 
|  | case ERROR_FPGA_PRG_INIT_HIGH: | 
|  | printf("(Timeout: INIT not high after deasserting PROGRAM*)\n "); | 
|  | break; | 
|  | case ERROR_FPGA_PRG_DONE: | 
|  | printf("(Timeout: DONE not high after programming FPGA)\n "); | 
|  | break; | 
|  | } | 
|  |  | 
|  | /* display infos on fpgaimage */ | 
|  | index = 15; | 
|  | for (i=0; i<4; i++) { | 
|  | len = dst[index]; | 
|  | printf("FPGA: %s\n", &(dst[index+1])); | 
|  | index += len+3; | 
|  | } | 
|  | putc ('\n'); | 
|  | /* delayed reboot */ | 
|  | for (i=20; i>0; i--) { | 
|  | printf("Rebooting in %2d seconds \r",i); | 
|  | for (index=0;index<1000;index++) | 
|  | udelay(1000); | 
|  | } | 
|  | putc ('\n'); | 
|  | do_reset(NULL, 0, 0, NULL); | 
|  | } | 
|  |  | 
|  | puts("FPGA:  "); | 
|  |  | 
|  | /* display infos on fpgaimage */ | 
|  | index = 15; | 
|  | for (i=0; i<4; i++) { | 
|  | len = dst[index]; | 
|  | printf("%s ", &(dst[index+1])); | 
|  | index += len+3; | 
|  | } | 
|  | putc ('\n'); | 
|  |  | 
|  | free(dst); | 
|  |  | 
|  | /* | 
|  | * | 
|  | */ | 
|  | buf[0] = 0x00; | 
|  | buf[1] = 0x32; | 
|  | buf[2] = 0x3f; | 
|  | i2c_write(0x38, 0, 0, buf, 3); | 
|  |  | 
|  | return (0); | 
|  | } | 
|  |  | 
|  |  | 
|  | #if 1 /* test-only: board specific test commands */ | 
|  | int i2c_probe(uchar addr); | 
|  |  | 
|  | /* | 
|  | */ | 
|  | int do_iploop(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) | 
|  | { | 
|  | ulong addr; | 
|  |  | 
|  | if (argc < 2) { | 
|  | puts("ERROR!\n"); | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | addr = simple_strtol (argv[1], NULL, 16); | 
|  |  | 
|  | printf("i2c probe looping on addr 0x%lx (cntrl-c aborts)...\n", addr); | 
|  |  | 
|  | for (;;) { | 
|  | i2c_probe(addr); | 
|  |  | 
|  | /* Abort if ctrl-c was pressed */ | 
|  | if (ctrlc()) { | 
|  | puts("\nAbort\n"); | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | udelay(1000); | 
|  | } | 
|  |  | 
|  | return 0; | 
|  | } | 
|  | U_BOOT_CMD( | 
|  | iploop,	2,	1,	do_iploop, | 
|  | "i2c probe loop <addr>", | 
|  | "" | 
|  | ); | 
|  |  | 
|  | /* | 
|  | */ | 
|  | int do_codec(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) | 
|  | { | 
|  | uchar buf[8]; | 
|  |  | 
|  | out_be16((void *)0xe0000000, 0x4000); | 
|  |  | 
|  | udelay(5000); /* wait for 5ms */ | 
|  |  | 
|  | buf[0] = 0x10; | 
|  | buf[1] = 0x07; | 
|  | buf[2] = 0x03; | 
|  | i2c_write(0x10, 0, 0, buf, 3); | 
|  |  | 
|  | buf[0] = 0x10; | 
|  | buf[1] = 0x01; | 
|  | buf[2] = 0x80; | 
|  | i2c_write(0x10, 0, 0, buf, 3); | 
|  |  | 
|  | buf[0] = 0x10; | 
|  | buf[1] = 0x02; | 
|  | buf[2] = 0x03; | 
|  | i2c_write(0x10, 0, 0, buf, 3); | 
|  |  | 
|  | buf[0] = 0x10; | 
|  | buf[1] = 0x03; | 
|  | buf[2] = 0x29; | 
|  | i2c_write(0x10, 0, 0, buf, 3); | 
|  |  | 
|  | buf[0] = 0x10; | 
|  | buf[1] = 0x04; | 
|  | buf[2] = 0x00; | 
|  | i2c_write(0x10, 0, 0, buf, 3); | 
|  |  | 
|  | buf[0] = 0x10; | 
|  | buf[1] = 0x05; | 
|  | buf[2] = 0x00; | 
|  | i2c_write(0x10, 0, 0, buf, 3); | 
|  |  | 
|  | buf[0] = 0x10; | 
|  | buf[1] = 0x07; | 
|  | buf[2] = 0x02; | 
|  | i2c_write(0x10, 0, 0, buf, 3); | 
|  |  | 
|  | return 0; | 
|  | } | 
|  | U_BOOT_CMD( | 
|  | codec,	1,	1,	do_codec, | 
|  | "Enable codec", | 
|  | "" | 
|  | ); | 
|  |  | 
|  | /* | 
|  | */ | 
|  | int do_saa(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) | 
|  | { | 
|  | ulong addr; | 
|  | ulong instr; | 
|  | ulong cntrl; | 
|  | ulong data; | 
|  | uchar buf[8]; | 
|  |  | 
|  | if (argc < 5) { | 
|  | puts("ERROR!\n"); | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | addr = simple_strtol (argv[1], NULL, 16); | 
|  | instr = simple_strtol (argv[2], NULL, 16); | 
|  | cntrl = simple_strtol (argv[3], NULL, 16); | 
|  | data = simple_strtol (argv[4], NULL, 16); | 
|  |  | 
|  | buf[0] = (uchar)instr; | 
|  | buf[1] = (uchar)cntrl; | 
|  | buf[2] = (uchar)data; | 
|  | i2c_write(addr, 0, 0, buf, 3); | 
|  |  | 
|  | return 0; | 
|  | } | 
|  | U_BOOT_CMD( | 
|  | saa,	5,	1,	do_saa, | 
|  | "Write to SAA1064 <addr> <instr> <cntrl> <data>", | 
|  | "" | 
|  | ); | 
|  |  | 
|  | /* | 
|  | */ | 
|  | int do_iwrite(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) | 
|  | { | 
|  | ulong addr; | 
|  | ulong data0; | 
|  | ulong data1; | 
|  | ulong data2; | 
|  | ulong data3; | 
|  | uchar buf[8]; | 
|  | int cnt; | 
|  |  | 
|  | if (argc < 3) { | 
|  | puts("ERROR!\n"); | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | addr = simple_strtol (argv[1], NULL, 16); | 
|  | cnt = simple_strtol (argv[2], NULL, 16); | 
|  | data0 = simple_strtol (argv[3], NULL, 16); | 
|  | data1 = simple_strtol (argv[4], NULL, 16); | 
|  | data2 = simple_strtol (argv[5], NULL, 16); | 
|  | data3 = simple_strtol (argv[6], NULL, 16); | 
|  |  | 
|  | printf("Writing %d bytes to device %lx!\n", cnt, addr); | 
|  | buf[0] = (uchar)data0; | 
|  | buf[1] = (uchar)data1; | 
|  | buf[2] = (uchar)data2; | 
|  | buf[3] = (uchar)data3; | 
|  | i2c_write(addr, 0, 0, buf, cnt); | 
|  |  | 
|  | return 0; | 
|  | } | 
|  | U_BOOT_CMD( | 
|  | iwrite,	6,	1,	do_iwrite, | 
|  | "Write n bytes to I2C-device", | 
|  | "addr cnt data0 ... datan" | 
|  | ); | 
|  |  | 
|  | /* | 
|  | */ | 
|  | int do_iread(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) | 
|  | { | 
|  | ulong addr; | 
|  | ulong cnt; | 
|  | uchar buf[32]; | 
|  | int i; | 
|  |  | 
|  | if (argc < 3) { | 
|  | puts("ERROR!\n"); | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | addr = simple_strtol (argv[1], NULL, 16); | 
|  | cnt = simple_strtol (argv[2], NULL, 16); | 
|  |  | 
|  | i2c_read(addr, 0, 0, buf, cnt); | 
|  | printf("I2C Data:"); | 
|  | for (i=0; i<cnt; i++) { | 
|  | printf(" %02X", buf[i]); | 
|  | } | 
|  | printf("\n"); | 
|  |  | 
|  | return 0; | 
|  | } | 
|  | U_BOOT_CMD( | 
|  | iread,	3,	1,	do_iread, | 
|  | "Read from I2C <addr> <cnt>", | 
|  | "" | 
|  | ); | 
|  |  | 
|  | /* | 
|  | */ | 
|  | int do_ireadl(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[]) | 
|  | { | 
|  | ulong addr; | 
|  | uchar buf[32]; | 
|  | int cnt; | 
|  |  | 
|  | if (argc < 2) { | 
|  | puts("ERROR!\n"); | 
|  | return -1; | 
|  | } | 
|  |  | 
|  | addr = simple_strtol (argv[1], NULL, 16); | 
|  | cnt = 1; | 
|  |  | 
|  | printf("iread looping on addr 0x%lx (cntrl-c aborts)...\n", addr); | 
|  |  | 
|  | for (;;) { | 
|  | i2c_read(addr, 0, 0, buf, cnt); | 
|  |  | 
|  | /* Abort if ctrl-c was pressed */ | 
|  | if (ctrlc()) { | 
|  | puts("\nAbort\n"); | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | udelay(3000); | 
|  | } | 
|  |  | 
|  | return 0; | 
|  | } | 
|  | U_BOOT_CMD( | 
|  | ireadl,	2,	1,	do_ireadl, | 
|  | "Read-loop from I2C <addr>", | 
|  | "" | 
|  | ); | 
|  | #endif |