post/board/lwmon/sysmon.c - github/trini/u-boot - Gitiles

 /*
  * (C) Copyright 2003
  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
  *
  * SPDX-License-Identifier:	GPL-2.0+
  */

 #include <post.h>
 #include <common.h>

 /*
  * 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 & CONFIG_SYS_POST_SYSMON

 DECLARE_GLOBAL_DATA_PTR;

 static int sysmon_temp_invalid = 0;

 /* #define DEBUG */

 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 =
 	{CONFIG_SYS_I2C_SYSMON_ADDR, sysmon_lm87_init, sysmon_i2c_read};
 static sysmon_t sysmon_lm87_sgn =
 	{CONFIG_SYS_I2C_SYSMON_ADDR, sysmon_lm87_init, sysmon_i2c_read_sgn};
 static sysmon_t sysmon_pic =
 	{CONFIG_SYS_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 = ARRAY_SIZE(sysmon_table);

 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)
 {
 	/* Do nothing for now, sysmon_reloc() is required by the sysmon post */
 }

 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 & CONFIG_SYS_POST_SYSMON */
	/*
	* (C) Copyright 2003
	* Wolfgang Denk, DENX Software Engineering, wd@denx.de.
	*
	* SPDX-License-Identifier: GPL-2.0+
	*/

	#include <post.h>
	#include <common.h>

	/*
	* 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 & CONFIG_SYS_POST_SYSMON

	DECLARE_GLOBAL_DATA_PTR;

	static int sysmon_temp_invalid = 0;

	/* #define DEBUG */

	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 =
	{CONFIG_SYS_I2C_SYSMON_ADDR, sysmon_lm87_init, sysmon_i2c_read};
	static sysmon_t sysmon_lm87_sgn =
	{CONFIG_SYS_I2C_SYSMON_ADDR, sysmon_lm87_init, sysmon_i2c_read_sgn};
	static sysmon_t sysmon_pic =
	{CONFIG_SYS_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 = ARRAY_SIZE(sysmon_table);

	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)
	{
	/* Do nothing for now, sysmon_reloc() is required by the sysmon post */
	}

	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 & CONFIG_SYS_POST_SYSMON */