mirror of
https://github.com/AsahiLinux/u-boot
synced 2024-12-12 22:33:18 +00:00
331 lines
7.4 KiB
C
331 lines
7.4 KiB
C
/*
|
|
* (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 */
|