| /* |
| * (C) Copyright 2001 |
| * Gerald Van Baren, Custom IDEAS, vanbaren@cideas.com. |
| * |
| * See file CREDITS for list of people who contributed to this |
| * project. |
| * |
| * This program is free software; you can redistribute it and/or |
| * modify it under the terms of the GNU General Public License as |
| * published by the Free Software Foundation; either version 2 of |
| * the License, or (at your option) any later version. |
| * |
| * This program is distributed in the hope that it will be useful, |
| * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| * GNU General Public License for more details. |
| * |
| * You should have received a copy of the GNU General Public License |
| * along with this program; if not, write to the Free Software |
| * Foundation, Inc., 59 Temple Place, Suite 330, Boston, |
| * MA 02111-1307 USA |
| */ |
| |
| /* |
| * I2C Functions similar to the standard memory functions. |
| * |
| * There are several parameters in many of the commands that bear further |
| * explanations: |
| * |
| * {i2c_chip} is the I2C chip address (the first byte sent on the bus). |
| * Each I2C chip on the bus has a unique address. On the I2C data bus, |
| * the address is the upper seven bits and the LSB is the "read/write" |
| * bit. Note that the {i2c_chip} address specified on the command |
| * line is not shifted up: e.g. a typical EEPROM memory chip may have |
| * an I2C address of 0x50, but the data put on the bus will be 0xA0 |
| * for write and 0xA1 for read. This "non shifted" address notation |
| * matches at least half of the data sheets :-/. |
| * |
| * {addr} is the address (or offset) within the chip. Small memory |
| * chips have 8 bit addresses. Large memory chips have 16 bit |
| * addresses. Other memory chips have 9, 10, or 11 bit addresses. |
| * Many non-memory chips have multiple registers and {addr} is used |
| * as the register index. Some non-memory chips have only one register |
| * and therefore don't need any {addr} parameter. |
| * |
| * The default {addr} parameter is one byte (.1) which works well for |
| * memories and registers with 8 bits of address space. |
| * |
| * You can specify the length of the {addr} field with the optional .0, |
| * .1, or .2 modifier (similar to the .b, .w, .l modifier). If you are |
| * manipulating a single register device which doesn't use an address |
| * field, use "0.0" for the address and the ".0" length field will |
| * suppress the address in the I2C data stream. This also works for |
| * successive reads using the I2C auto-incrementing memory pointer. |
| * |
| * If you are manipulating a large memory with 2-byte addresses, use |
| * the .2 address modifier, e.g. 210.2 addresses location 528 (decimal). |
| * |
| * Then there are the unfortunate memory chips that spill the most |
| * significant 1, 2, or 3 bits of address into the chip address byte. |
| * This effectively makes one chip (logically) look like 2, 4, or |
| * 8 chips. This is handled (awkwardly) by #defining |
| * CONFIG_SYS_I2C_EEPROM_ADDR_OVERFLOW and using the .1 modifier on the |
| * {addr} field (since .1 is the default, it doesn't actually have to |
| * be specified). Examples: given a memory chip at I2C chip address |
| * 0x50, the following would happen... |
| * i2c md 50 0 10 display 16 bytes starting at 0x000 |
| * On the bus: <S> A0 00 <E> <S> A1 <rd> ... <rd> |
| * i2c md 50 100 10 display 16 bytes starting at 0x100 |
| * On the bus: <S> A2 00 <E> <S> A3 <rd> ... <rd> |
| * i2c md 50 210 10 display 16 bytes starting at 0x210 |
| * On the bus: <S> A4 10 <E> <S> A5 <rd> ... <rd> |
| * This is awfully ugly. It would be nice if someone would think up |
| * a better way of handling this. |
| * |
| * Adapted from cmd_mem.c which is copyright Wolfgang Denk (wd@denx.de). |
| */ |
| |
| #include <common.h> |
| #include <command.h> |
| #include <environment.h> |
| #include <i2c.h> |
| #include <malloc.h> |
| #include <asm/byteorder.h> |
| |
| /* Display values from last command. |
| * Memory modify remembered values are different from display memory. |
| */ |
| static uchar i2c_dp_last_chip; |
| static uint i2c_dp_last_addr; |
| static uint i2c_dp_last_alen; |
| static uint i2c_dp_last_length = 0x10; |
| |
| static uchar i2c_mm_last_chip; |
| static uint i2c_mm_last_addr; |
| static uint i2c_mm_last_alen; |
| |
| /* If only one I2C bus is present, the list of devices to ignore when |
| * the probe command is issued is represented by a 1D array of addresses. |
| * When multiple buses are present, the list is an array of bus-address |
| * pairs. The following macros take care of this */ |
| |
| #if defined(CONFIG_SYS_I2C_NOPROBES) |
| #if defined(CONFIG_I2C_MULTI_BUS) |
| static struct |
| { |
| uchar bus; |
| uchar addr; |
| } i2c_no_probes[] = CONFIG_SYS_I2C_NOPROBES; |
| #define GET_BUS_NUM i2c_get_bus_num() |
| #define COMPARE_BUS(b,i) (i2c_no_probes[(i)].bus == (b)) |
| #define COMPARE_ADDR(a,i) (i2c_no_probes[(i)].addr == (a)) |
| #define NO_PROBE_ADDR(i) i2c_no_probes[(i)].addr |
| #else /* single bus */ |
| static uchar i2c_no_probes[] = CONFIG_SYS_I2C_NOPROBES; |
| #define GET_BUS_NUM 0 |
| #define COMPARE_BUS(b,i) ((b) == 0) /* Make compiler happy */ |
| #define COMPARE_ADDR(a,i) (i2c_no_probes[(i)] == (a)) |
| #define NO_PROBE_ADDR(i) i2c_no_probes[(i)] |
| #endif /* CONFIG_MULTI_BUS */ |
| |
| #define NUM_ELEMENTS_NOPROBE (sizeof(i2c_no_probes)/sizeof(i2c_no_probes[0])) |
| #endif |
| |
| #if defined(CONFIG_I2C_MUX) |
| static I2C_MUX_DEVICE *i2c_mux_devices = NULL; |
| static int i2c_mux_busid = CONFIG_SYS_MAX_I2C_BUS; |
| |
| DECLARE_GLOBAL_DATA_PTR; |
| |
| #endif |
| |
| /* TODO: Implement architecture-specific get/set functions */ |
| unsigned int __def_i2c_get_bus_speed(void) |
| { |
| return CONFIG_SYS_I2C_SPEED; |
| } |
| unsigned int i2c_get_bus_speed(void) |
| __attribute__((weak, alias("__def_i2c_get_bus_speed"))); |
| |
| int __def_i2c_set_bus_speed(unsigned int speed) |
| { |
| if (speed != CONFIG_SYS_I2C_SPEED) |
| return -1; |
| |
| return 0; |
| } |
| int i2c_set_bus_speed(unsigned int) |
| __attribute__((weak, alias("__def_i2c_set_bus_speed"))); |
| |
| /* |
| * Syntax: |
| * i2c md {i2c_chip} {addr}{.0, .1, .2} {len} |
| */ |
| #define DISP_LINE_LEN 16 |
| |
| /* |
| * Syntax: |
| * i2c read {i2c_chip} {devaddr}{.0, .1, .2} {len} {memaddr} |
| */ |
| |
| int do_i2c_read ( cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) |
| { |
| u_char chip; |
| uint devaddr, alen, length; |
| u_char *memaddr; |
| int j; |
| |
| if (argc != 5) { |
| cmd_usage(cmdtp); |
| return 1; |
| } |
| |
| /* |
| * I2C chip address |
| */ |
| chip = simple_strtoul(argv[1], NULL, 16); |
| |
| /* |
| * I2C data address within the chip. This can be 1 or |
| * 2 bytes long. Some day it might be 3 bytes long :-). |
| */ |
| devaddr = simple_strtoul(argv[2], NULL, 16); |
| alen = 1; |
| for (j = 0; j < 8; j++) { |
| if (argv[2][j] == '.') { |
| alen = argv[2][j+1] - '0'; |
| if (alen > 3) { |
| cmd_usage(cmdtp); |
| return 1; |
| } |
| break; |
| } else if (argv[2][j] == '\0') |
| break; |
| } |
| |
| /* |
| * Length is the number of objects, not number of bytes. |
| */ |
| length = simple_strtoul(argv[3], NULL, 16); |
| |
| /* |
| * memaddr is the address where to store things in memory |
| */ |
| memaddr = (u_char *)simple_strtoul(argv[4], NULL, 16); |
| |
| if (i2c_read(chip, devaddr, alen, memaddr, length) != 0) { |
| puts ("Error reading the chip.\n"); |
| return 1; |
| } |
| return 0; |
| } |
| |
| int do_i2c_md ( cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) |
| { |
| u_char chip; |
| uint addr, alen, length; |
| int j, nbytes, linebytes; |
| |
| /* We use the last specified parameters, unless new ones are |
| * entered. |
| */ |
| chip = i2c_dp_last_chip; |
| addr = i2c_dp_last_addr; |
| alen = i2c_dp_last_alen; |
| length = i2c_dp_last_length; |
| |
| if (argc < 3) { |
| cmd_usage(cmdtp); |
| return 1; |
| } |
| |
| if ((flag & CMD_FLAG_REPEAT) == 0) { |
| /* |
| * New command specified. |
| */ |
| alen = 1; |
| |
| /* |
| * I2C chip address |
| */ |
| chip = simple_strtoul(argv[1], NULL, 16); |
| |
| /* |
| * I2C data address within the chip. This can be 1 or |
| * 2 bytes long. Some day it might be 3 bytes long :-). |
| */ |
| addr = simple_strtoul(argv[2], NULL, 16); |
| alen = 1; |
| for (j = 0; j < 8; j++) { |
| if (argv[2][j] == '.') { |
| alen = argv[2][j+1] - '0'; |
| if (alen > 3) { |
| cmd_usage(cmdtp); |
| return 1; |
| } |
| break; |
| } else if (argv[2][j] == '\0') |
| break; |
| } |
| |
| /* |
| * If another parameter, it is the length to display. |
| * Length is the number of objects, not number of bytes. |
| */ |
| if (argc > 3) |
| length = simple_strtoul(argv[3], NULL, 16); |
| } |
| |
| /* |
| * Print the lines. |
| * |
| * We buffer all read data, so we can make sure data is read only |
| * once. |
| */ |
| nbytes = length; |
| do { |
| unsigned char linebuf[DISP_LINE_LEN]; |
| unsigned char *cp; |
| |
| linebytes = (nbytes > DISP_LINE_LEN) ? DISP_LINE_LEN : nbytes; |
| |
| if (i2c_read(chip, addr, alen, linebuf, linebytes) != 0) |
| puts ("Error reading the chip.\n"); |
| else { |
| printf("%04x:", addr); |
| cp = linebuf; |
| for (j=0; j<linebytes; j++) { |
| printf(" %02x", *cp++); |
| addr++; |
| } |
| puts (" "); |
| cp = linebuf; |
| for (j=0; j<linebytes; j++) { |
| if ((*cp < 0x20) || (*cp > 0x7e)) |
| puts ("."); |
| else |
| printf("%c", *cp); |
| cp++; |
| } |
| putc ('\n'); |
| } |
| nbytes -= linebytes; |
| } while (nbytes > 0); |
| |
| i2c_dp_last_chip = chip; |
| i2c_dp_last_addr = addr; |
| i2c_dp_last_alen = alen; |
| i2c_dp_last_length = length; |
| |
| return 0; |
| } |
| |
| |
| /* Write (fill) memory |
| * |
| * Syntax: |
| * i2c mw {i2c_chip} {addr}{.0, .1, .2} {data} [{count}] |
| */ |
| int do_i2c_mw ( cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) |
| { |
| uchar chip; |
| ulong addr; |
| uint alen; |
| uchar byte; |
| int count; |
| int j; |
| |
| if ((argc < 4) || (argc > 5)) { |
| cmd_usage(cmdtp); |
| return 1; |
| } |
| |
| /* |
| * Chip is always specified. |
| */ |
| chip = simple_strtoul(argv[1], NULL, 16); |
| |
| /* |
| * Address is always specified. |
| */ |
| addr = simple_strtoul(argv[2], NULL, 16); |
| alen = 1; |
| for (j = 0; j < 8; j++) { |
| if (argv[2][j] == '.') { |
| alen = argv[2][j+1] - '0'; |
| if (alen > 3) { |
| cmd_usage(cmdtp); |
| return 1; |
| } |
| break; |
| } else if (argv[2][j] == '\0') |
| break; |
| } |
| |
| /* |
| * Value to write is always specified. |
| */ |
| byte = simple_strtoul(argv[3], NULL, 16); |
| |
| /* |
| * Optional count |
| */ |
| if (argc == 5) |
| count = simple_strtoul(argv[4], NULL, 16); |
| else |
| count = 1; |
| |
| while (count-- > 0) { |
| if (i2c_write(chip, addr++, alen, &byte, 1) != 0) |
| puts ("Error writing the chip.\n"); |
| /* |
| * Wait for the write to complete. The write can take |
| * up to 10mSec (we allow a little more time). |
| */ |
| /* |
| * No write delay with FRAM devices. |
| */ |
| #if !defined(CONFIG_SYS_I2C_FRAM) |
| udelay(11000); |
| #endif |
| } |
| |
| return (0); |
| } |
| |
| /* Calculate a CRC on memory |
| * |
| * Syntax: |
| * i2c crc32 {i2c_chip} {addr}{.0, .1, .2} {count} |
| */ |
| int do_i2c_crc (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) |
| { |
| uchar chip; |
| ulong addr; |
| uint alen; |
| int count; |
| uchar byte; |
| ulong crc; |
| ulong err; |
| int j; |
| |
| if (argc < 4) { |
| cmd_usage(cmdtp); |
| return 1; |
| } |
| |
| /* |
| * Chip is always specified. |
| */ |
| chip = simple_strtoul(argv[1], NULL, 16); |
| |
| /* |
| * Address is always specified. |
| */ |
| addr = simple_strtoul(argv[2], NULL, 16); |
| alen = 1; |
| for (j = 0; j < 8; j++) { |
| if (argv[2][j] == '.') { |
| alen = argv[2][j+1] - '0'; |
| if (alen > 3) { |
| cmd_usage(cmdtp); |
| return 1; |
| } |
| break; |
| } else if (argv[2][j] == '\0') |
| break; |
| } |
| |
| /* |
| * Count is always specified |
| */ |
| count = simple_strtoul(argv[3], NULL, 16); |
| |
| printf ("CRC32 for %08lx ... %08lx ==> ", addr, addr + count - 1); |
| /* |
| * CRC a byte at a time. This is going to be slooow, but hey, the |
| * memories are small and slow too so hopefully nobody notices. |
| */ |
| crc = 0; |
| err = 0; |
| while (count-- > 0) { |
| if (i2c_read(chip, addr, alen, &byte, 1) != 0) |
| err++; |
| crc = crc32 (crc, &byte, 1); |
| addr++; |
| } |
| if (err > 0) |
| puts ("Error reading the chip,\n"); |
| else |
| printf ("%08lx\n", crc); |
| |
| return 0; |
| } |
| |
| /* Modify memory. |
| * |
| * Syntax: |
| * i2c mm{.b, .w, .l} {i2c_chip} {addr}{.0, .1, .2} |
| * i2c nm{.b, .w, .l} {i2c_chip} {addr}{.0, .1, .2} |
| */ |
| |
| static int |
| mod_i2c_mem(cmd_tbl_t *cmdtp, int incrflag, int flag, int argc, char *argv[]) |
| { |
| uchar chip; |
| ulong addr; |
| uint alen; |
| ulong data; |
| int size = 1; |
| int nbytes; |
| int j; |
| extern char console_buffer[]; |
| |
| if (argc != 3) { |
| cmd_usage(cmdtp); |
| return 1; |
| } |
| |
| #ifdef CONFIG_BOOT_RETRY_TIME |
| reset_cmd_timeout(); /* got a good command to get here */ |
| #endif |
| /* |
| * We use the last specified parameters, unless new ones are |
| * entered. |
| */ |
| chip = i2c_mm_last_chip; |
| addr = i2c_mm_last_addr; |
| alen = i2c_mm_last_alen; |
| |
| if ((flag & CMD_FLAG_REPEAT) == 0) { |
| /* |
| * New command specified. Check for a size specification. |
| * Defaults to byte if no or incorrect specification. |
| */ |
| size = cmd_get_data_size(argv[0], 1); |
| |
| /* |
| * Chip is always specified. |
| */ |
| chip = simple_strtoul(argv[1], NULL, 16); |
| |
| /* |
| * Address is always specified. |
| */ |
| addr = simple_strtoul(argv[2], NULL, 16); |
| alen = 1; |
| for (j = 0; j < 8; j++) { |
| if (argv[2][j] == '.') { |
| alen = argv[2][j+1] - '0'; |
| if (alen > 3) { |
| cmd_usage(cmdtp); |
| return 1; |
| } |
| break; |
| } else if (argv[2][j] == '\0') |
| break; |
| } |
| } |
| |
| /* |
| * Print the address, followed by value. Then accept input for |
| * the next value. A non-converted value exits. |
| */ |
| do { |
| printf("%08lx:", addr); |
| if (i2c_read(chip, addr, alen, (uchar *)&data, size) != 0) |
| puts ("\nError reading the chip,\n"); |
| else { |
| data = cpu_to_be32(data); |
| if (size == 1) |
| printf(" %02lx", (data >> 24) & 0x000000FF); |
| else if (size == 2) |
| printf(" %04lx", (data >> 16) & 0x0000FFFF); |
| else |
| printf(" %08lx", data); |
| } |
| |
| nbytes = readline (" ? "); |
| if (nbytes == 0) { |
| /* |
| * <CR> pressed as only input, don't modify current |
| * location and move to next. |
| */ |
| if (incrflag) |
| addr += size; |
| nbytes = size; |
| #ifdef CONFIG_BOOT_RETRY_TIME |
| reset_cmd_timeout(); /* good enough to not time out */ |
| #endif |
| } |
| #ifdef CONFIG_BOOT_RETRY_TIME |
| else if (nbytes == -2) |
| break; /* timed out, exit the command */ |
| #endif |
| else { |
| char *endp; |
| |
| data = simple_strtoul(console_buffer, &endp, 16); |
| if (size == 1) |
| data = data << 24; |
| else if (size == 2) |
| data = data << 16; |
| data = be32_to_cpu(data); |
| nbytes = endp - console_buffer; |
| if (nbytes) { |
| #ifdef CONFIG_BOOT_RETRY_TIME |
| /* |
| * good enough to not time out |
| */ |
| reset_cmd_timeout(); |
| #endif |
| if (i2c_write(chip, addr, alen, (uchar *)&data, size) != 0) |
| puts ("Error writing the chip.\n"); |
| #ifdef CONFIG_SYS_EEPROM_PAGE_WRITE_DELAY_MS |
| udelay(CONFIG_SYS_EEPROM_PAGE_WRITE_DELAY_MS * 1000); |
| #endif |
| if (incrflag) |
| addr += size; |
| } |
| } |
| } while (nbytes); |
| |
| i2c_mm_last_chip = chip; |
| i2c_mm_last_addr = addr; |
| i2c_mm_last_alen = alen; |
| |
| return 0; |
| } |
| |
| /* |
| * Syntax: |
| * i2c probe {addr}{.0, .1, .2} |
| */ |
| int do_i2c_probe (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) |
| { |
| int j; |
| #if defined(CONFIG_SYS_I2C_NOPROBES) |
| int k, skip; |
| uchar bus = GET_BUS_NUM; |
| #endif /* NOPROBES */ |
| |
| puts ("Valid chip addresses:"); |
| for (j = 0; j < 128; j++) { |
| #if defined(CONFIG_SYS_I2C_NOPROBES) |
| skip = 0; |
| for (k=0; k < NUM_ELEMENTS_NOPROBE; k++) { |
| if (COMPARE_BUS(bus, k) && COMPARE_ADDR(j, k)) { |
| skip = 1; |
| break; |
| } |
| } |
| if (skip) |
| continue; |
| #endif |
| if (i2c_probe(j) == 0) |
| printf(" %02X", j); |
| } |
| putc ('\n'); |
| |
| #if defined(CONFIG_SYS_I2C_NOPROBES) |
| puts ("Excluded chip addresses:"); |
| for (k=0; k < NUM_ELEMENTS_NOPROBE; k++) { |
| if (COMPARE_BUS(bus,k)) |
| printf(" %02X", NO_PROBE_ADDR(k)); |
| } |
| putc ('\n'); |
| #endif |
| |
| return 0; |
| } |
| |
| /* |
| * Syntax: |
| * i2c loop {i2c_chip} {addr}{.0, .1, .2} [{length}] [{delay}] |
| * {length} - Number of bytes to read |
| * {delay} - A DECIMAL number and defaults to 1000 uSec |
| */ |
| int do_i2c_loop(cmd_tbl_t *cmdtp, int flag, int argc, char *argv[]) |
| { |
| u_char chip; |
| ulong alen; |
| uint addr; |
| uint length; |
| u_char bytes[16]; |
| int delay; |
| int j; |
| |
| if (argc < 3) { |
| cmd_usage(cmdtp); |
| return 1; |
| } |
| |
| /* |
| * Chip is always specified. |
| */ |
| chip = simple_strtoul(argv[1], NULL, 16); |
| |
| /* |
| * Address is always specified. |
| */ |
| addr = simple_strtoul(argv[2], NULL, 16); |
| alen = 1; |
| for (j = 0; j < 8; j++) { |
| if (argv[2][j] == '.') { |
| alen = argv[2][j+1] - '0'; |
| if (alen > 3) { |
| cmd_usage(cmdtp); |
| return 1; |
| } |
| break; |
| } else if (argv[2][j] == '\0') |
| break; |
| } |
| |
| /* |
| * Length is the number of objects, not number of bytes. |
| */ |
| length = 1; |
| length = simple_strtoul(argv[3], NULL, 16); |
| if (length > sizeof(bytes)) |
| length = sizeof(bytes); |
| |
| /* |
| * The delay time (uSec) is optional. |
| */ |
| delay = 1000; |
| if (argc > 3) |
| delay = simple_strtoul(argv[4], NULL, 10); |
| /* |
| * Run the loop... |
| */ |
| while (1) { |
| if (i2c_read(chip, addr, alen, bytes, length) != 0) |
| puts ("Error reading the chip.\n"); |
| udelay(delay); |
| } |
| |
| /* NOTREACHED */ |
| return 0; |
| } |
| |
| /* |
| * The SDRAM command is separately configured because many |
| * (most?) embedded boards don't use SDRAM DIMMs. |
| */ |
| #if defined(CONFIG_CMD_SDRAM) |
| static void print_ddr2_tcyc (u_char const b) |
| { |
| printf ("%d.", (b >> 4) & 0x0F); |
| switch (b & 0x0F) { |
| case 0x0: |
| case 0x1: |
| case 0x2: |
| case 0x3: |
| case 0x4: |
| case 0x5: |
| case 0x6: |
| case 0x7: |
| case 0x8: |
| case 0x9: |
| printf ("%d ns\n", b & 0x0F); |
| break; |
| case 0xA: |
| puts ("25 ns\n"); |
| break; |
| case 0xB: |
| puts ("33 ns\n"); |
| break; |
| case 0xC: |
| puts ("66 ns\n"); |
| break; |
| case 0xD: |
| puts ("75 ns\n"); |
| break; |
| default: |
| puts ("?? ns\n"); |
| break; |
| } |
| } |
| |
| static void decode_bits (u_char const b, char const *str[], int const do_once) |
| { |
| u_char mask; |
| |
| for (mask = 0x80; mask != 0x00; mask >>= 1, ++str) { |
| if (b & mask) { |
| puts (*str); |
| if (do_once) |
| return; |
| } |
| } |
| } |
| |
| /* |
| * Syntax: |
| * i2c sdram {i2c_chip} |
| */ |
| int do_sdram (cmd_tbl_t * cmdtp, int flag, int argc, char *argv[]) |
| { |
| enum { unknown, EDO, SDRAM, DDR2 } type; |
| |
| u_char chip; |
| u_char data[128]; |
| u_char cksum; |
| int j; |
| |
| static const char *decode_CAS_DDR2[] = { |
| " TBD", " 6", " 5", " 4", " 3", " 2", " TBD", " TBD" |
| }; |
| |
| static const char *decode_CAS_default[] = { |
| " TBD", " 7", " 6", " 5", " 4", " 3", " 2", " 1" |
| }; |
| |
| static const char *decode_CS_WE_default[] = { |
| " TBD", " 6", " 5", " 4", " 3", " 2", " 1", " 0" |
| }; |
| |
| static const char *decode_byte21_default[] = { |
| " TBD (bit 7)\n", |
| " Redundant row address\n", |
| " Differential clock input\n", |
| " Registerd DQMB inputs\n", |
| " Buffered DQMB inputs\n", |
| " On-card PLL\n", |
| " Registered address/control lines\n", |
| " Buffered address/control lines\n" |
| }; |
| |
| static const char *decode_byte22_DDR2[] = { |
| " TBD (bit 7)\n", |
| " TBD (bit 6)\n", |
| " TBD (bit 5)\n", |
| " TBD (bit 4)\n", |
| " TBD (bit 3)\n", |
| " Supports partial array self refresh\n", |
| " Supports 50 ohm ODT\n", |
| " Supports weak driver\n" |
| }; |
| |
| static const char *decode_row_density_DDR2[] = { |
| "512 MiB", "256 MiB", "128 MiB", "16 GiB", |
| "8 GiB", "4 GiB", "2 GiB", "1 GiB" |
| }; |
| |
| static const char *decode_row_density_default[] = { |
| "512 MiB", "256 MiB", "128 MiB", "64 MiB", |
| "32 MiB", "16 MiB", "8 MiB", "4 MiB" |
| }; |
| |
| if (argc < 2) { |
| cmd_usage(cmdtp); |
| return 1; |
| } |
| /* |
| * Chip is always specified. |
| */ |
| chip = simple_strtoul (argv[1], NULL, 16); |
| |
| if (i2c_read (chip, 0, 1, data, sizeof (data)) != 0) { |
| puts ("No SDRAM Serial Presence Detect found.\n"); |
| return 1; |
| } |
| |
| cksum = 0; |
| for (j = 0; j < 63; j++) { |
| cksum += data[j]; |
| } |
| if (cksum != data[63]) { |
| printf ("WARNING: Configuration data checksum failure:\n" |
| " is 0x%02x, calculated 0x%02x\n", data[63], cksum); |
| } |
| printf ("SPD data revision %d.%d\n", |
| (data[62] >> 4) & 0x0F, data[62] & 0x0F); |
| printf ("Bytes used 0x%02X\n", data[0]); |
| printf ("Serial memory size 0x%02X\n", 1 << data[1]); |
| |
| puts ("Memory type "); |
| switch (data[2]) { |
| case 2: |
| type = EDO; |
| puts ("EDO\n"); |
| break; |
| case 4: |
| type = SDRAM; |
| puts ("SDRAM\n"); |
| break; |
| case 8: |
| type = DDR2; |
| puts ("DDR2\n"); |
| break; |
| default: |
| type = unknown; |
| puts ("unknown\n"); |
| break; |
| } |
| |
| puts ("Row address bits "); |
| if ((data[3] & 0x00F0) == 0) |
| printf ("%d\n", data[3] & 0x0F); |
| else |
| printf ("%d/%d\n", data[3] & 0x0F, (data[3] >> 4) & 0x0F); |
| |
| puts ("Column address bits "); |
| if ((data[4] & 0x00F0) == 0) |
| printf ("%d\n", data[4] & 0x0F); |
| else |
| printf ("%d/%d\n", data[4] & 0x0F, (data[4] >> 4) & 0x0F); |
| |
| switch (type) { |
| case DDR2: |
| printf ("Number of ranks %d\n", |
| (data[5] & 0x07) + 1); |
| break; |
| default: |
| printf ("Module rows %d\n", data[5]); |
| break; |
| } |
| |
| switch (type) { |
| case DDR2: |
| printf ("Module data width %d bits\n", data[6]); |
| break; |
| default: |
| printf ("Module data width %d bits\n", |
| (data[7] << 8) | data[6]); |
| break; |
| } |
| |
| puts ("Interface signal levels "); |
| switch(data[8]) { |
| case 0: puts ("TTL 5.0 V\n"); break; |
| case 1: puts ("LVTTL\n"); break; |
| case 2: puts ("HSTL 1.5 V\n"); break; |
| case 3: puts ("SSTL 3.3 V\n"); break; |
| case 4: puts ("SSTL 2.5 V\n"); break; |
| case 5: puts ("SSTL 1.8 V\n"); break; |
| default: puts ("unknown\n"); break; |
| } |
| |
| switch (type) { |
| case DDR2: |
| printf ("SDRAM cycle time "); |
| print_ddr2_tcyc (data[9]); |
| break; |
| default: |
| printf ("SDRAM cycle time %d.%d ns\n", |
| (data[9] >> 4) & 0x0F, data[9] & 0x0F); |
| break; |
| } |
| |
| switch (type) { |
| case DDR2: |
| printf ("SDRAM access time 0.%d%d ns\n", |
| (data[10] >> 4) & 0x0F, data[10] & 0x0F); |
| break; |
| default: |
| printf ("SDRAM access time %d.%d ns\n", |
| (data[10] >> 4) & 0x0F, data[10] & 0x0F); |
| break; |
| } |
| |
| puts ("EDC configuration "); |
| switch (data[11]) { |
| case 0: puts ("None\n"); break; |
| case 1: puts ("Parity\n"); break; |
| case 2: puts ("ECC\n"); break; |
| default: puts ("unknown\n"); break; |
| } |
| |
| if ((data[12] & 0x80) == 0) |
| puts ("No self refresh, rate "); |
| else |
| puts ("Self refresh, rate "); |
| |
| switch(data[12] & 0x7F) { |
| case 0: puts ("15.625 us\n"); break; |
| case 1: puts ("3.9 us\n"); break; |
| case 2: puts ("7.8 us\n"); break; |
| case 3: puts ("31.3 us\n"); break; |
| case 4: puts ("62.5 us\n"); break; |
| case 5: puts ("125 us\n"); break; |
| default: puts ("unknown\n"); break; |
| } |
| |
| switch (type) { |
| case DDR2: |
| printf ("SDRAM width (primary) %d\n", data[13]); |
| break; |
| default: |
| printf ("SDRAM width (primary) %d\n", data[13] & 0x7F); |
| if ((data[13] & 0x80) != 0) { |
| printf (" (second bank) %d\n", |
| 2 * (data[13] & 0x7F)); |
| } |
| break; |
| } |
| |
| switch (type) { |
| case DDR2: |
| if (data[14] != 0) |
| printf ("EDC width %d\n", data[14]); |
| break; |
| default: |
| if (data[14] != 0) { |
| printf ("EDC width %d\n", |
| data[14] & 0x7F); |
| |
| if ((data[14] & 0x80) != 0) { |
| printf (" (second bank) %d\n", |
| 2 * (data[14] & 0x7F)); |
| } |
| } |
| break; |
| } |
| |
| if (DDR2 != type) { |
| printf ("Min clock delay, back-to-back random column addresses " |
| "%d\n", data[15]); |
| } |
| |
| puts ("Burst length(s) "); |
| if (data[16] & 0x80) puts (" Page"); |
| if (data[16] & 0x08) puts (" 8"); |
| if (data[16] & 0x04) puts (" 4"); |
| if (data[16] & 0x02) puts (" 2"); |
| if (data[16] & 0x01) puts (" 1"); |
| putc ('\n'); |
| printf ("Number of banks %d\n", data[17]); |
| |
| switch (type) { |
| case DDR2: |
| puts ("CAS latency(s) "); |
| decode_bits (data[18], decode_CAS_DDR2, 0); |
| putc ('\n'); |
| break; |
| default: |
| puts ("CAS latency(s) "); |
| decode_bits (data[18], decode_CAS_default, 0); |
| putc ('\n'); |
| break; |
| } |
| |
| if (DDR2 != type) { |
| puts ("CS latency(s) "); |
| decode_bits (data[19], decode_CS_WE_default, 0); |
| putc ('\n'); |
| } |
| |
| if (DDR2 != type) { |
| puts ("WE latency(s) "); |
| decode_bits (data[20], decode_CS_WE_default, 0); |
| putc ('\n'); |
| } |
| |
| switch (type) { |
| case DDR2: |
| puts ("Module attributes:\n"); |
| if (data[21] & 0x80) |
| puts (" TBD (bit 7)\n"); |
| if (data[21] & 0x40) |
| puts (" Analysis probe installed\n"); |
| if (data[21] & 0x20) |
| puts (" TBD (bit 5)\n"); |
| if (data[21] & 0x10) |
| puts (" FET switch external enable\n"); |
| printf (" %d PLLs on DIMM\n", (data[21] >> 2) & 0x03); |
| if (data[20] & 0x11) { |
| printf (" %d active registers on DIMM\n", |
| (data[21] & 0x03) + 1); |
| } |
| break; |
| default: |
| puts ("Module attributes:\n"); |
| if (!data[21]) |
| puts (" (none)\n"); |
| else |
| decode_bits (data[21], decode_byte21_default, 0); |
| break; |
| } |
| |
| switch (type) { |
| case DDR2: |
| decode_bits (data[22], decode_byte22_DDR2, 0); |
| break; |
| default: |
| puts ("Device attributes:\n"); |
| if (data[22] & 0x80) puts (" TBD (bit 7)\n"); |
| if (data[22] & 0x40) puts (" TBD (bit 6)\n"); |
| if (data[22] & 0x20) puts (" Upper Vcc tolerance 5%\n"); |
| else puts (" Upper Vcc tolerance 10%\n"); |
| if (data[22] & 0x10) puts (" Lower Vcc tolerance 5%\n"); |
| else puts (" Lower Vcc tolerance 10%\n"); |
| if (data[22] & 0x08) puts (" Supports write1/read burst\n"); |
| if (data[22] & 0x04) puts (" Supports precharge all\n"); |
| if (data[22] & 0x02) puts (" Supports auto precharge\n"); |
| if (data[22] & 0x01) puts (" Supports early RAS# precharge\n"); |
| break; |
| } |
| |
| switch (type) { |
| case DDR2: |
| printf ("SDRAM cycle time (2nd highest CAS latency) "); |
| print_ddr2_tcyc (data[23]); |
| break; |
| default: |
| printf ("SDRAM cycle time (2nd highest CAS latency) %d." |
| "%d ns\n", (data[23] >> 4) & 0x0F, data[23] & 0x0F); |
| break; |
| } |
| |
| switch (type) { |
| case DDR2: |
| printf ("SDRAM access from clock (2nd highest CAS latency) 0." |
| "%d%d ns\n", (data[24] >> 4) & 0x0F, data[24] & 0x0F); |
| break; |
| default: |
| printf ("SDRAM access from clock (2nd highest CAS latency) %d." |
| "%d ns\n", (data[24] >> 4) & 0x0F, data[24] & 0x0F); |
| break; |
| } |
| |
| switch (type) { |
| case DDR2: |
| printf ("SDRAM cycle time (3rd highest CAS latency) "); |
| print_ddr2_tcyc (data[25]); |
| break; |
| default: |
| printf ("SDRAM cycle time (3rd highest CAS latency) %d." |
| "%d ns\n", (data[25] >> 4) & 0x0F, data[25] & 0x0F); |
| break; |
| } |
| |
| switch (type) { |
| case DDR2: |
| printf ("SDRAM access from clock (3rd highest CAS latency) 0." |
| "%d%d ns\n", (data[26] >> 4) & 0x0F, data[26] & 0x0F); |
| break; |
| default: |
| printf ("SDRAM access from clock (3rd highest CAS latency) %d." |
| "%d ns\n", (data[26] >> 4) & 0x0F, data[26] & 0x0F); |
| break; |
| } |
| |
| switch (type) { |
| case DDR2: |
| printf ("Minimum row precharge %d.%02d ns\n", |
| (data[27] >> 2) & 0x3F, 25 * (data[27] & 0x03)); |
| break; |
| default: |
| printf ("Minimum row precharge %d ns\n", data[27]); |
| break; |
| } |
| |
| switch (type) { |
| case DDR2: |
| printf ("Row active to row active min %d.%02d ns\n", |
| (data[28] >> 2) & 0x3F, 25 * (data[28] & 0x03)); |
| break; |
| default: |
| printf ("Row active to row active min %d ns\n", data[28]); |
| break; |
| } |
| |
| switch (type) { |
| case DDR2: |
| printf ("RAS to CAS delay min %d.%02d ns\n", |
| (data[29] >> 2) & 0x3F, 25 * (data[29] & 0x03)); |
| break; |
| default: |
| printf ("RAS to CAS delay min %d ns\n", data[29]); |
| break; |
| } |
| |
| printf ("Minimum RAS pulse width %d ns\n", data[30]); |
| |
| switch (type) { |
| case DDR2: |
| puts ("Density of each row "); |
| decode_bits (data[31], decode_row_density_DDR2, 1); |
| putc ('\n'); |
| break; |
| default: |
| puts ("Density of each row "); |
| decode_bits (data[31], decode_row_density_default, 1); |
| putc ('\n'); |
| break; |
| } |
| |
| switch (type) { |
| case DDR2: |
| puts ("Command and Address setup "); |
| if (data[32] >= 0xA0) { |
| printf ("1.%d%d ns\n", |
| ((data[32] >> 4) & 0x0F) - 10, data[32] & 0x0F); |
| } else { |
| printf ("0.%d%d ns\n", |
| ((data[32] >> 4) & 0x0F), data[32] & 0x0F); |
| } |
| break; |
| default: |
| printf ("Command and Address setup %c%d.%d ns\n", |
| (data[32] & 0x80) ? '-' : '+', |
| (data[32] >> 4) & 0x07, data[32] & 0x0F); |
| break; |
| } |
| |
| switch (type) { |
| case DDR2: |
| puts ("Command and Address hold "); |
| if (data[33] >= 0xA0) { |
| printf ("1.%d%d ns\n", |
| ((data[33] >> 4) & 0x0F) - 10, data[33] & 0x0F); |
| } else { |
| printf ("0.%d%d ns\n", |
| ((data[33] >> 4) & 0x0F), data[33] & 0x0F); |
| } |
| break; |
| default: |
| printf ("Command and Address hold %c%d.%d ns\n", |
| (data[33] & 0x80) ? '-' : '+', |
| (data[33] >> 4) & 0x07, data[33] & 0x0F); |
| break; |
| } |
| |
| switch (type) { |
| case DDR2: |
| printf ("Data signal input setup 0.%d%d ns\n", |
| (data[34] >> 4) & 0x0F, data[34] & 0x0F); |
| break; |
| default: |
| printf ("Data signal input setup %c%d.%d ns\n", |
| (data[34] & 0x80) ? '-' : '+', |
| (data[34] >> 4) & 0x07, data[34] & 0x0F); |
| break; |
| } |
| |
| switch (type) { |
| case DDR2: |
| printf ("Data signal input hold 0.%d%d ns\n", |
| (data[35] >> 4) & 0x0F, data[35] & 0x0F); |
| break; |
| default: |
| printf ("Data signal input hold %c%d.%d ns\n", |
| (data[35] & 0x80) ? '-' : '+', |
| (data[35] >> 4) & 0x07, data[35] & 0x0F); |
| break; |
| } |
| |
| puts ("Manufacturer's JEDEC ID "); |
| for (j = 64; j <= 71; j++) |
| printf ("%02X ", data[j]); |
| putc ('\n'); |
| printf ("Manufacturing Location %02X\n", data[72]); |
| puts ("Manufacturer's Part Number "); |
| for (j = 73; j <= 90; j++) |
| printf ("%02X ", data[j]); |
| putc ('\n'); |
| printf ("Revision Code %02X %02X\n", data[91], data[92]); |
| printf ("Manufacturing Date %02X %02X\n", data[93], data[94]); |
| puts ("Assembly Serial Number "); |
| for (j = 95; j <= 98; j++) |
| printf ("%02X ", data[j]); |
| putc ('\n'); |
| |
| if (DDR2 != type) { |
| printf ("Speed rating PC%d\n", |
| data[126] == 0x66 ? 66 : data[126]); |
| } |
| return 0; |
| } |
| #endif |
| |
| #if defined(CONFIG_I2C_MUX) |
| int do_i2c_add_bus(cmd_tbl_t * cmdtp, int flag, int argc, char *argv[]) |
| { |
| int ret=0; |
| |
| if (argc == 1) { |
| /* show all busses */ |
| I2C_MUX *mux; |
| I2C_MUX_DEVICE *device = i2c_mux_devices; |
| |
| printf ("Busses reached over muxes:\n"); |
| while (device != NULL) { |
| printf ("Bus ID: %x\n", device->busid); |
| printf (" reached over Mux(es):\n"); |
| mux = device->mux; |
| while (mux != NULL) { |
| printf (" %s@%x ch: %x\n", mux->name, mux->chip, mux->channel); |
| mux = mux->next; |
| } |
| device = device->next; |
| } |
| } else { |
| I2C_MUX_DEVICE *dev; |
| |
| dev = i2c_mux_ident_muxstring ((uchar *)argv[1]); |
| ret = 0; |
| } |
| return ret; |
| } |
| #endif /* CONFIG_I2C_MUX */ |
| |
| #if defined(CONFIG_I2C_MULTI_BUS) |
| int do_i2c_bus_num(cmd_tbl_t * cmdtp, int flag, int argc, char *argv[]) |
| { |
| int bus_idx, ret=0; |
| |
| if (argc == 1) |
| /* querying current setting */ |
| printf("Current bus is %d\n", i2c_get_bus_num()); |
| else { |
| bus_idx = simple_strtoul(argv[1], NULL, 10); |
| printf("Setting bus to %d\n", bus_idx); |
| ret = i2c_set_bus_num(bus_idx); |
| if (ret) |
| printf("Failure changing bus number (%d)\n", ret); |
| } |
| return ret; |
| } |
| #endif /* CONFIG_I2C_MULTI_BUS */ |
| |
| int do_i2c_bus_speed(cmd_tbl_t * cmdtp, int flag, int argc, char *argv[]) |
| { |
| int speed, ret=0; |
| |
| if (argc == 1) |
| /* querying current speed */ |
| printf("Current bus speed=%d\n", i2c_get_bus_speed()); |
| else { |
| speed = simple_strtoul(argv[1], NULL, 10); |
| printf("Setting bus speed to %d Hz\n", speed); |
| ret = i2c_set_bus_speed(speed); |
| if (ret) |
| printf("Failure changing bus speed (%d)\n", ret); |
| } |
| return ret; |
| } |
| |
| int do_i2c_mm(cmd_tbl_t * cmdtp, int flag, int argc, char *argv[]) |
| { |
| return mod_i2c_mem (cmdtp, 1, flag, argc, argv); |
| } |
| |
| int do_i2c_nm(cmd_tbl_t * cmdtp, int flag, int argc, char *argv[]) |
| { |
| return mod_i2c_mem (cmdtp, 0, flag, argc, argv); |
| } |
| |
| int do_i2c_reset(cmd_tbl_t * cmdtp, int flag, int argc, char *argv[]) |
| { |
| i2c_init(CONFIG_SYS_I2C_SPEED, CONFIG_SYS_I2C_SLAVE); |
| return 0; |
| } |
| |
| static cmd_tbl_t cmd_i2c_sub[] = { |
| #if defined(CONFIG_I2C_MUX) |
| U_BOOT_CMD_MKENT(bus, 1, 1, do_i2c_add_bus, "", ""), |
| #endif /* CONFIG_I2C_MUX */ |
| U_BOOT_CMD_MKENT(crc32, 3, 1, do_i2c_crc, "", ""), |
| #if defined(CONFIG_I2C_MULTI_BUS) |
| U_BOOT_CMD_MKENT(dev, 1, 1, do_i2c_bus_num, "", ""), |
| #endif /* CONFIG_I2C_MULTI_BUS */ |
| U_BOOT_CMD_MKENT(loop, 3, 1, do_i2c_loop, "", ""), |
| U_BOOT_CMD_MKENT(md, 3, 1, do_i2c_md, "", ""), |
| U_BOOT_CMD_MKENT(mm, 2, 1, do_i2c_mm, "", ""), |
| U_BOOT_CMD_MKENT(mw, 3, 1, do_i2c_mw, "", ""), |
| U_BOOT_CMD_MKENT(nm, 2, 1, do_i2c_nm, "", ""), |
| U_BOOT_CMD_MKENT(probe, 0, 1, do_i2c_probe, "", ""), |
| U_BOOT_CMD_MKENT(read, 5, 1, do_i2c_read, "", ""), |
| U_BOOT_CMD_MKENT(reset, 0, 1, do_i2c_reset, "", ""), |
| #if defined(CONFIG_CMD_SDRAM) |
| U_BOOT_CMD_MKENT(sdram, 1, 1, do_sdram, "", ""), |
| #endif |
| U_BOOT_CMD_MKENT(speed, 1, 1, do_i2c_bus_speed, "", ""), |
| }; |
| |
| int do_i2c(cmd_tbl_t * cmdtp, int flag, int argc, char *argv[]) |
| { |
| cmd_tbl_t *c; |
| |
| /* Strip off leading 'i2c' command argument */ |
| argc--; |
| argv++; |
| |
| c = find_cmd_tbl(argv[0], &cmd_i2c_sub[0], ARRAY_SIZE(cmd_i2c_sub)); |
| |
| if (c) { |
| return c->cmd(cmdtp, flag, argc, argv); |
| } else { |
| cmd_usage(cmdtp); |
| return 1; |
| } |
| } |
| |
| /***************************************************/ |
| |
| U_BOOT_CMD( |
| i2c, 6, 1, do_i2c, |
| "I2C sub-system", |
| #if defined(CONFIG_I2C_MUX) |
| "bus [muxtype:muxaddr:muxchannel] - add a new bus reached over muxes\ni2c " |
| #endif /* CONFIG_I2C_MUX */ |
| "crc32 chip address[.0, .1, .2] count - compute CRC32 checksum\n" |
| #if defined(CONFIG_I2C_MULTI_BUS) |
| "i2c dev [dev] - show or set current I2C bus\n" |
| #endif /* CONFIG_I2C_MULTI_BUS */ |
| "i2c loop chip address[.0, .1, .2] [# of objects] - looping read of device\n" |
| "i2c md chip address[.0, .1, .2] [# of objects] - read from I2C device\n" |
| "i2c mm chip address[.0, .1, .2] - write to I2C device (auto-incrementing)\n" |
| "i2c mw chip address[.0, .1, .2] value [count] - write to I2C device (fill)\n" |
| "i2c nm chip address[.0, .1, .2] - write to I2C device (constant address)\n" |
| "i2c probe - show devices on the I2C bus\n" |
| "i2c read chip address[.0, .1, .2] length memaddress - read to memory \n" |
| "i2c reset - re-init the I2C Controller\n" |
| #if defined(CONFIG_CMD_SDRAM) |
| "i2c sdram chip - print SDRAM configuration information\n" |
| #endif |
| "i2c speed [speed] - show or set I2C bus speed" |
| ); |
| |
| #if defined(CONFIG_I2C_MUX) |
| int i2c_mux_add_device(I2C_MUX_DEVICE *dev) |
| { |
| I2C_MUX_DEVICE *devtmp = i2c_mux_devices; |
| |
| if (i2c_mux_devices == NULL) { |
| i2c_mux_devices = dev; |
| return 0; |
| } |
| while (devtmp->next != NULL) |
| devtmp = devtmp->next; |
| |
| devtmp->next = dev; |
| return 0; |
| } |
| |
| I2C_MUX_DEVICE *i2c_mux_search_device(int id) |
| { |
| I2C_MUX_DEVICE *device = i2c_mux_devices; |
| |
| while (device != NULL) { |
| if (device->busid == id) |
| return device; |
| device = device->next; |
| } |
| return NULL; |
| } |
| |
| /* searches in the buf from *pos the next ':'. |
| * returns: |
| * 0 if found (with *pos = where) |
| * < 0 if an error occured |
| * > 0 if the end of buf is reached |
| */ |
| static int i2c_mux_search_next (int *pos, uchar *buf, int len) |
| { |
| while ((buf[*pos] != ':') && (*pos < len)) { |
| *pos += 1; |
| } |
| if (*pos >= len) |
| return 1; |
| if (buf[*pos] != ':') |
| return -1; |
| return 0; |
| } |
| |
| static int i2c_mux_get_busid (void) |
| { |
| int tmp = i2c_mux_busid; |
| |
| i2c_mux_busid ++; |
| return tmp; |
| } |
| |
| /* Analyses a Muxstring and sends immediately the |
| Commands to the Muxes. Runs from Flash. |
| */ |
| int i2c_mux_ident_muxstring_f (uchar *buf) |
| { |
| int pos = 0; |
| int oldpos; |
| int ret = 0; |
| int len = strlen((char *)buf); |
| int chip; |
| uchar channel; |
| int was = 0; |
| |
| while (ret == 0) { |
| oldpos = pos; |
| /* search name */ |
| ret = i2c_mux_search_next(&pos, buf, len); |
| if (ret != 0) |
| printf ("ERROR\n"); |
| /* search address */ |
| pos ++; |
| oldpos = pos; |
| ret = i2c_mux_search_next(&pos, buf, len); |
| if (ret != 0) |
| printf ("ERROR\n"); |
| buf[pos] = 0; |
| chip = simple_strtoul((char *)&buf[oldpos], NULL, 16); |
| buf[pos] = ':'; |
| /* search channel */ |
| pos ++; |
| oldpos = pos; |
| ret = i2c_mux_search_next(&pos, buf, len); |
| if (ret < 0) |
| printf ("ERROR\n"); |
| was = 0; |
| if (buf[pos] != 0) { |
| buf[pos] = 0; |
| was = 1; |
| } |
| channel = simple_strtoul((char *)&buf[oldpos], NULL, 16); |
| if (was) |
| buf[pos] = ':'; |
| if (i2c_write(chip, 0, 0, &channel, 1) != 0) { |
| printf ("Error setting Mux: chip:%x channel: \ |
| %x\n", chip, channel); |
| return -1; |
| } |
| pos ++; |
| oldpos = pos; |
| |
| } |
| |
| return 0; |
| } |
| |
| /* Analyses a Muxstring and if this String is correct |
| * adds a new I2C Bus. |
| */ |
| I2C_MUX_DEVICE *i2c_mux_ident_muxstring (uchar *buf) |
| { |
| I2C_MUX_DEVICE *device; |
| I2C_MUX *mux; |
| int pos = 0; |
| int oldpos; |
| int ret = 0; |
| int len = strlen((char *)buf); |
| int was = 0; |
| |
| device = (I2C_MUX_DEVICE *)malloc (sizeof(I2C_MUX_DEVICE)); |
| device->mux = NULL; |
| device->busid = i2c_mux_get_busid (); |
| device->next = NULL; |
| while (ret == 0) { |
| mux = (I2C_MUX *)malloc (sizeof(I2C_MUX)); |
| mux->next = NULL; |
| /* search name of mux */ |
| oldpos = pos; |
| ret = i2c_mux_search_next(&pos, buf, len); |
| if (ret != 0) |
| printf ("%s no name.\n", __FUNCTION__); |
| mux->name = (char *)malloc (pos - oldpos + 1); |
| memcpy (mux->name, &buf[oldpos], pos - oldpos); |
| mux->name[pos - oldpos] = 0; |
| /* search address */ |
| pos ++; |
| oldpos = pos; |
| ret = i2c_mux_search_next(&pos, buf, len); |
| if (ret != 0) |
| printf ("%s no mux address.\n", __FUNCTION__); |
| buf[pos] = 0; |
| mux->chip = simple_strtoul((char *)&buf[oldpos], NULL, 16); |
| buf[pos] = ':'; |
| /* search channel */ |
| pos ++; |
| oldpos = pos; |
| ret = i2c_mux_search_next(&pos, buf, len); |
| if (ret < 0) |
| printf ("%s no mux channel.\n", __FUNCTION__); |
| was = 0; |
| if (buf[pos] != 0) { |
| buf[pos] = 0; |
| was = 1; |
| } |
| mux->channel = simple_strtoul((char *)&buf[oldpos], NULL, 16); |
| if (was) |
| buf[pos] = ':'; |
| if (device->mux == NULL) |
| device->mux = mux; |
| else { |
| I2C_MUX *muxtmp = device->mux; |
| while (muxtmp->next != NULL) { |
| muxtmp = muxtmp->next; |
| } |
| muxtmp->next = mux; |
| } |
| pos ++; |
| oldpos = pos; |
| } |
| if (ret > 0) { |
| /* Add Device */ |
| i2c_mux_add_device (device); |
| return device; |
| } |
| |
| return NULL; |
| } |
| |
| int i2x_mux_select_mux(int bus) |
| { |
| I2C_MUX_DEVICE *dev; |
| I2C_MUX *mux; |
| |
| if ((gd->flags & GD_FLG_RELOC) != GD_FLG_RELOC) { |
| /* select Default Mux Bus */ |
| #if defined(CONFIG_SYS_I2C_IVM_BUS) |
| i2c_mux_ident_muxstring_f ((uchar *)CONFIG_SYS_I2C_IVM_BUS); |
| #else |
| { |
| unsigned char *buf; |
| buf = (unsigned char *) getenv("EEprom_ivm"); |
| if (buf != NULL) |
| i2c_mux_ident_muxstring_f (buf); |
| } |
| #endif |
| return 0; |
| } |
| dev = i2c_mux_search_device(bus); |
| if (dev == NULL) |
| return -1; |
| |
| mux = dev->mux; |
| while (mux != NULL) { |
| if (i2c_write(mux->chip, 0, 0, &mux->channel, 1) != 0) { |
| printf ("Error setting Mux: chip:%x channel: \ |
| %x\n", mux->chip, mux->channel); |
| return -1; |
| } |
| mux = mux->next; |
| } |
| return 0; |
| } |
| #endif /* CONFIG_I2C_MUX */ |