/* * (C) Copyright 2003 * Wolfgang Denk, DENX Software Engineering, wd@denx.de. * * 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 */ #include <post.h> #include <common.h> #ifdef CONFIG_POST /* * SYSMON test * * This test performs the system hardware monitoring. * The test passes when all the following voltages and temperatures * are within allowed ranges: * * Board temperature * Front temperature * +3.3V CPU logic * +5V logic * +12V PCMCIA * +12V CCFL * +5V standby * * CCFL is not enabled if temperature values are not within allowed ranges * * See the list off all parameters in the sysmon_table below */ #include <post.h> #include <watchdog.h> #include <i2c.h> #if CONFIG_POST & CFG_POST_SYSMON DECLARE_GLOBAL_DATA_PTR; static int sysmon_temp_invalid = 0; /* #define DEBUG */ #define RELOC(x) if (x != NULL) x = (void *) ((ulong) (x) + gd->reloc_off) typedef struct sysmon_s sysmon_t; typedef struct sysmon_table_s sysmon_table_t; static void sysmon_lm87_init (sysmon_t * this); static void sysmon_pic_init (sysmon_t * this); static uint sysmon_i2c_read (sysmon_t * this, uint addr); static uint sysmon_i2c_read_sgn (sysmon_t * this, uint addr); static void sysmon_ccfl_disable (sysmon_table_t * this); static void sysmon_ccfl_enable (sysmon_table_t * this); struct sysmon_s { uchar chip; void (*init)(sysmon_t *); uint (*read)(sysmon_t *, uint); }; static sysmon_t sysmon_lm87 = {CFG_I2C_SYSMON_ADDR, sysmon_lm87_init, sysmon_i2c_read}; static sysmon_t sysmon_lm87_sgn = {CFG_I2C_SYSMON_ADDR, sysmon_lm87_init, sysmon_i2c_read_sgn}; static sysmon_t sysmon_pic = {CFG_I2C_PICIO_ADDR, sysmon_pic_init, sysmon_i2c_read}; static sysmon_t * sysmon_list[] = { &sysmon_lm87, &sysmon_lm87_sgn, &sysmon_pic, NULL }; struct sysmon_table_s { char * name; char * unit_name; sysmon_t * sysmon; void (*exec_before)(sysmon_table_t *); void (*exec_after)(sysmon_table_t *); int unit_precision; int unit_div; int unit_min; int unit_max; uint val_mask; uint val_min; uint val_max; int val_valid; uint val_min_alt; uint val_max_alt; int val_valid_alt; uint addr; }; static sysmon_table_t sysmon_table[] = { {"Board temperature", " C", &sysmon_lm87_sgn, NULL, sysmon_ccfl_disable, 1, 1, -128, 127, 0xFF, 0x58, 0xD5, 0, 0x6C, 0xC6, 0, 0x27}, {"Front temperature", " C", &sysmon_lm87, NULL, sysmon_ccfl_disable, 1, 100, -27316, 8984, 0xFF, 0xA4, 0xFC, 0, 0xB2, 0xF1, 0, 0x29}, {"+3.3V CPU logic", "V", &sysmon_lm87, NULL, NULL, 100, 1000, 0, 4386, 0xFF, 0xB6, 0xC9, 0, 0xB6, 0xC9, 0, 0x22}, {"+ 5 V logic", "V", &sysmon_lm87, NULL, NULL, 100, 1000, 0, 6630, 0xFF, 0xB6, 0xCA, 0, 0xB6, 0xCA, 0, 0x23}, {"+12 V PCMCIA", "V", &sysmon_lm87, NULL, NULL, 100, 1000, 0, 15460, 0xFF, 0xBC, 0xD0, 0, 0xBC, 0xD0, 0, 0x21}, {"+12 V CCFL", "V", &sysmon_lm87, NULL, sysmon_ccfl_enable, 100, 1000, 0, 15900, 0xFF, 0xB6, 0xCA, 0, 0xB6, 0xCA, 0, 0x24}, {"+ 5 V standby", "V", &sysmon_pic, NULL, NULL, 100, 1000, 0, 6040, 0xFF, 0xC8, 0xDE, 0, 0xC8, 0xDE, 0, 0x7C}, }; static int sysmon_table_size = sizeof(sysmon_table) / sizeof(sysmon_table[0]); static int conversion_done = 0; int sysmon_init_f (void) { sysmon_t ** l; ulong reg; /* Power on CCFL, PCMCIA */ reg = pic_read (0x60); reg |= 0x09; pic_write (0x60, reg); for (l = sysmon_list; *l; l++) { (*l)->init(*l); } return 0; } void sysmon_reloc (void) { sysmon_t ** l; sysmon_table_t * t; for (l = sysmon_list; *l; l++) { RELOC(*l); RELOC((*l)->init); RELOC((*l)->read); } for (t = sysmon_table; t < sysmon_table + sysmon_table_size; t ++) { RELOC(t->exec_before); RELOC(t->exec_after); RELOC(t->sysmon); } } static char *sysmon_unit_value (sysmon_table_t *s, uint val) { static char buf[32]; int unit_val = s->unit_min + (s->unit_max - s->unit_min) * val / s->val_mask; char *p, sign; int dec, frac; if (val == -1) { return "I/O ERROR"; } if (unit_val < 0) { sign = '-'; unit_val = -unit_val; } else { sign = '+'; } p = buf + sprintf(buf, "%c%2d", sign, unit_val / s->unit_div); frac = unit_val % s->unit_div; frac /= (s->unit_div / s->unit_precision); dec = s->unit_precision; if (dec != 1) { *p++ = '.'; } for (dec /= 10; dec != 0; dec /= 10) { *p++ = '0' + (frac / dec) % 10; } strcpy(p, s->unit_name); return buf; } static void sysmon_lm87_init (sysmon_t * this) { uchar val; /* Detect LM87 chip */ if (i2c_read(this->chip, 0x40, 1, &val, 1) || (val & 0x80) != 0 || i2c_read(this->chip, 0x3E, 1, &val, 1) || val != 0x02) { printf("Error: LM87 not found at 0x%02X\n", this->chip); return; } /* Configure pins 5,6 as AIN */ val = 0x03; if (i2c_write(this->chip, 0x16, 1, &val, 1)) { printf("Error: can't write LM87 config register\n"); return; } /* Start monitoring */ val = 0x01; if (i2c_write(this->chip, 0x40, 1, &val, 1)) { printf("Error: can't write LM87 config register\n"); return; } } static void sysmon_pic_init (sysmon_t * this) { } static uint sysmon_i2c_read (sysmon_t * this, uint addr) { uchar val; uint res = i2c_read(this->chip, addr, 1, &val, 1); return res == 0 ? val : -1; } static uint sysmon_i2c_read_sgn (sysmon_t * this, uint addr) { uchar val; return i2c_read(this->chip, addr, 1, &val, 1) == 0 ? 128 + (signed char)val : -1; } static void sysmon_ccfl_disable (sysmon_table_t * this) { if (!this->val_valid_alt) { sysmon_temp_invalid = 1; } } static void sysmon_ccfl_enable (sysmon_table_t * this) { ulong reg; if (!sysmon_temp_invalid) { reg = pic_read (0x60); reg |= 0x06; pic_write (0x60, reg); } } int sysmon_post_test (int flags) { int res = 0; sysmon_table_t * t; uint val; /* * The A/D conversion on the LM87 sensor takes 300 ms. */ if (! conversion_done) { while (post_time_ms(gd->post_init_f_time) < 300) WATCHDOG_RESET (); conversion_done = 1; } for (t = sysmon_table; t < sysmon_table + sysmon_table_size; t ++) { if (t->exec_before) { t->exec_before(t); } val = t->sysmon->read(t->sysmon, t->addr); if (val != -1) { t->val_valid = val >= t->val_min && val <= t->val_max; t->val_valid_alt = val >= t->val_min_alt && val <= t->val_max_alt; } else { t->val_valid = 0; t->val_valid_alt = 0; } if (t->exec_after) { t->exec_after(t); } if ((!t->val_valid) || (flags & POST_MANUAL)) { printf("%-17s = %-10s ", t->name, sysmon_unit_value(t, val)); printf("allowed range"); printf(" %-8s ..", sysmon_unit_value(t, t->val_min)); printf(" %-8s", sysmon_unit_value(t, t->val_max)); printf(" %s\n", t->val_valid ? "OK" : "FAIL"); } if (!t->val_valid) { res = -1; } } return res; } #endif /* CONFIG_POST & CFG_POST_SYSMON */ #endif /* CONFIG_POST */