blob: 79a5151c01cd86c1a18d62b8f2322d43a172e06c [file] [log] [blame]
Wolfgang Denkad5bb452007-03-06 18:08:43 +01001/*
2 * (C) Copyright 2003
3 * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
4 *
5 * See file CREDITS for list of people who contributed to this
6 * project.
7 *
8 * This program is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU General Public License as
10 * published by the Free Software Foundation; either version 2 of
11 * the License, or (at your option) any later version.
12 *
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
21 * MA 02111-1307 USA
22 */
23
24#include <post.h>
25#include <common.h>
26
Wolfgang Denkad5bb452007-03-06 18:08:43 +010027/*
28 * SYSMON test
29 *
30 * This test performs the system hardware monitoring.
31 * The test passes when all the following voltages and temperatures
32 * are within allowed ranges:
33 *
34 * Board temperature
35 * Front temperature
36 * +3.3V CPU logic
37 * +5V logic
38 * +12V PCMCIA
39 * +12V CCFL
40 * +5V standby
41 *
42 * CCFL is not enabled if temperature values are not within allowed ranges
43 *
44 * See the list off all parameters in the sysmon_table below
45 */
46
47#include <post.h>
48#include <watchdog.h>
49#include <i2c.h>
50
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +020051#if CONFIG_POST & CONFIG_SYS_POST_SYSMON
Wolfgang Denkad5bb452007-03-06 18:08:43 +010052
53DECLARE_GLOBAL_DATA_PTR;
54
55static int sysmon_temp_invalid = 0;
56
57/* #define DEBUG */
58
59#define RELOC(x) if (x != NULL) x = (void *) ((ulong) (x) + gd->reloc_off)
60
61typedef struct sysmon_s sysmon_t;
62typedef struct sysmon_table_s sysmon_table_t;
63
64static void sysmon_lm87_init (sysmon_t * this);
65static void sysmon_pic_init (sysmon_t * this);
66static uint sysmon_i2c_read (sysmon_t * this, uint addr);
67static uint sysmon_i2c_read_sgn (sysmon_t * this, uint addr);
68static void sysmon_ccfl_disable (sysmon_table_t * this);
69static void sysmon_ccfl_enable (sysmon_table_t * this);
70
71struct sysmon_s
72{
73 uchar chip;
74 void (*init)(sysmon_t *);
75 uint (*read)(sysmon_t *, uint);
76};
77
78static sysmon_t sysmon_lm87 =
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +020079 {CONFIG_SYS_I2C_SYSMON_ADDR, sysmon_lm87_init, sysmon_i2c_read};
Wolfgang Denkad5bb452007-03-06 18:08:43 +010080static sysmon_t sysmon_lm87_sgn =
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +020081 {CONFIG_SYS_I2C_SYSMON_ADDR, sysmon_lm87_init, sysmon_i2c_read_sgn};
Wolfgang Denkad5bb452007-03-06 18:08:43 +010082static sysmon_t sysmon_pic =
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +020083 {CONFIG_SYS_I2C_PICIO_ADDR, sysmon_pic_init, sysmon_i2c_read};
Wolfgang Denkad5bb452007-03-06 18:08:43 +010084
85static sysmon_t * sysmon_list[] =
86{
87 &sysmon_lm87,
88 &sysmon_lm87_sgn,
89 &sysmon_pic,
90 NULL
91};
92
93struct sysmon_table_s
94{
95 char * name;
96 char * unit_name;
97 sysmon_t * sysmon;
98 void (*exec_before)(sysmon_table_t *);
99 void (*exec_after)(sysmon_table_t *);
100
101 int unit_precision;
102 int unit_div;
103 int unit_min;
104 int unit_max;
105 uint val_mask;
106 uint val_min;
107 uint val_max;
108 int val_valid;
109 uint val_min_alt;
110 uint val_max_alt;
111 int val_valid_alt;
112 uint addr;
113};
114
115static sysmon_table_t sysmon_table[] =
116{
117 {"Board temperature", " C", &sysmon_lm87_sgn, NULL, sysmon_ccfl_disable,
118 1, 1, -128, 127, 0xFF, 0x58, 0xD5, 0, 0x6C, 0xC6, 0, 0x27},
119
120 {"Front temperature", " C", &sysmon_lm87, NULL, sysmon_ccfl_disable,
121 1, 100, -27316, 8984, 0xFF, 0xA4, 0xFC, 0, 0xB2, 0xF1, 0, 0x29},
122
123 {"+3.3V CPU logic", "V", &sysmon_lm87, NULL, NULL,
124 100, 1000, 0, 4386, 0xFF, 0xB6, 0xC9, 0, 0xB6, 0xC9, 0, 0x22},
125
126 {"+ 5 V logic", "V", &sysmon_lm87, NULL, NULL,
127 100, 1000, 0, 6630, 0xFF, 0xB6, 0xCA, 0, 0xB6, 0xCA, 0, 0x23},
128
129 {"+12 V PCMCIA", "V", &sysmon_lm87, NULL, NULL,
130 100, 1000, 0, 15460, 0xFF, 0xBC, 0xD0, 0, 0xBC, 0xD0, 0, 0x21},
131
132 {"+12 V CCFL", "V", &sysmon_lm87, NULL, sysmon_ccfl_enable,
133 100, 1000, 0, 15900, 0xFF, 0xB6, 0xCA, 0, 0xB6, 0xCA, 0, 0x24},
134
135 {"+ 5 V standby", "V", &sysmon_pic, NULL, NULL,
136 100, 1000, 0, 6040, 0xFF, 0xC8, 0xDE, 0, 0xC8, 0xDE, 0, 0x7C},
137};
138static int sysmon_table_size = sizeof(sysmon_table) / sizeof(sysmon_table[0]);
139
140static int conversion_done = 0;
141
142
143int sysmon_init_f (void)
144{
145 sysmon_t ** l;
146 ulong reg;
147
148 /* Power on CCFL, PCMCIA */
149 reg = pic_read (0x60);
150 reg |= 0x09;
151 pic_write (0x60, reg);
152
153 for (l = sysmon_list; *l; l++) {
154 (*l)->init(*l);
155 }
156
157 return 0;
158}
159
160void sysmon_reloc (void)
161{
162 sysmon_t ** l;
163 sysmon_table_t * t;
164
165 for (l = sysmon_list; *l; l++) {
166 RELOC(*l);
167 RELOC((*l)->init);
168 RELOC((*l)->read);
169 }
170
171 for (t = sysmon_table; t < sysmon_table + sysmon_table_size; t ++) {
172 RELOC(t->exec_before);
173 RELOC(t->exec_after);
174 RELOC(t->sysmon);
175 }
176}
177
178static char *sysmon_unit_value (sysmon_table_t *s, uint val)
179{
180 static char buf[32];
181 int unit_val =
182 s->unit_min + (s->unit_max - s->unit_min) * val / s->val_mask;
183 char *p, sign;
184 int dec, frac;
185
186 if (val == -1) {
187 return "I/O ERROR";
188 }
189
190 if (unit_val < 0) {
191 sign = '-';
192 unit_val = -unit_val;
193 } else {
194 sign = '+';
195 }
196
197 p = buf + sprintf(buf, "%c%2d", sign, unit_val / s->unit_div);
198
199
200 frac = unit_val % s->unit_div;
201
202 frac /= (s->unit_div / s->unit_precision);
203
204 dec = s->unit_precision;
205
206 if (dec != 1) {
207 *p++ = '.';
208 }
209 for (dec /= 10; dec != 0; dec /= 10) {
210 *p++ = '0' + (frac / dec) % 10;
211 }
212 strcpy(p, s->unit_name);
213
214 return buf;
215}
216
217static void sysmon_lm87_init (sysmon_t * this)
218{
219 uchar val;
220
221 /* Detect LM87 chip */
222 if (i2c_read(this->chip, 0x40, 1, &val, 1) || (val & 0x80) != 0 ||
223 i2c_read(this->chip, 0x3E, 1, &val, 1) || val != 0x02) {
224 printf("Error: LM87 not found at 0x%02X\n", this->chip);
225 return;
226 }
227
228 /* Configure pins 5,6 as AIN */
229 val = 0x03;
230 if (i2c_write(this->chip, 0x16, 1, &val, 1)) {
231 printf("Error: can't write LM87 config register\n");
232 return;
233 }
234
235 /* Start monitoring */
236 val = 0x01;
237 if (i2c_write(this->chip, 0x40, 1, &val, 1)) {
238 printf("Error: can't write LM87 config register\n");
239 return;
240 }
241}
242
243static void sysmon_pic_init (sysmon_t * this)
244{
245}
246
247static uint sysmon_i2c_read (sysmon_t * this, uint addr)
248{
249 uchar val;
250 uint res = i2c_read(this->chip, addr, 1, &val, 1);
251
252 return res == 0 ? val : -1;
253}
254
255static uint sysmon_i2c_read_sgn (sysmon_t * this, uint addr)
256{
257 uchar val;
258 return i2c_read(this->chip, addr, 1, &val, 1) == 0 ?
259 128 + (signed char)val : -1;
260}
261
262static void sysmon_ccfl_disable (sysmon_table_t * this)
263{
264 if (!this->val_valid_alt) {
265 sysmon_temp_invalid = 1;
266 }
267}
268
269static void sysmon_ccfl_enable (sysmon_table_t * this)
270{
271 ulong reg;
272
273 if (!sysmon_temp_invalid) {
274 reg = pic_read (0x60);
275 reg |= 0x06;
276 pic_write (0x60, reg);
277 }
278}
279
280int sysmon_post_test (int flags)
281{
282 int res = 0;
283 sysmon_table_t * t;
284 uint val;
285
286 /*
287 * The A/D conversion on the LM87 sensor takes 300 ms.
288 */
289 if (! conversion_done) {
290 while (post_time_ms(gd->post_init_f_time) < 300) WATCHDOG_RESET ();
291 conversion_done = 1;
292 }
293
294 for (t = sysmon_table; t < sysmon_table + sysmon_table_size; t ++) {
295 if (t->exec_before) {
296 t->exec_before(t);
297 }
298
299 val = t->sysmon->read(t->sysmon, t->addr);
300 if (val != -1) {
301 t->val_valid = val >= t->val_min && val <= t->val_max;
302 t->val_valid_alt = val >= t->val_min_alt && val <= t->val_max_alt;
303 } else {
304 t->val_valid = 0;
305 t->val_valid_alt = 0;
306 }
307
308 if (t->exec_after) {
309 t->exec_after(t);
310 }
311
312 if ((!t->val_valid) || (flags & POST_MANUAL)) {
313 printf("%-17s = %-10s ", t->name, sysmon_unit_value(t, val));
314 printf("allowed range");
315 printf(" %-8s ..", sysmon_unit_value(t, t->val_min));
316 printf(" %-8s", sysmon_unit_value(t, t->val_max));
317 printf(" %s\n", t->val_valid ? "OK" : "FAIL");
318 }
319
320 if (!t->val_valid) {
321 res = -1;
322 }
323 }
324
325 return res;
326}
327
Jean-Christophe PLAGNIOL-VILLARD6d0f6bc2008-10-16 15:01:15 +0200328#endif /* CONFIG_POST & CONFIG_SYS_POST_SYSMON */