]>
Commit | Line | Data |
---|---|---|
ad5bb451 WD |
1 | /* |
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 | ||
ad5bb451 WD |
27 | /* |
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 | ||
51 | #if CONFIG_POST & CFG_POST_SYSMON | |
52 | ||
53 | DECLARE_GLOBAL_DATA_PTR; | |
54 | ||
55 | static 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 | ||
61 | typedef struct sysmon_s sysmon_t; | |
62 | typedef struct sysmon_table_s sysmon_table_t; | |
63 | ||
64 | static void sysmon_lm87_init (sysmon_t * this); | |
65 | static void sysmon_pic_init (sysmon_t * this); | |
66 | static uint sysmon_i2c_read (sysmon_t * this, uint addr); | |
67 | static uint sysmon_i2c_read_sgn (sysmon_t * this, uint addr); | |
68 | static void sysmon_ccfl_disable (sysmon_table_t * this); | |
69 | static void sysmon_ccfl_enable (sysmon_table_t * this); | |
70 | ||
71 | struct sysmon_s | |
72 | { | |
73 | uchar chip; | |
74 | void (*init)(sysmon_t *); | |
75 | uint (*read)(sysmon_t *, uint); | |
76 | }; | |
77 | ||
78 | static sysmon_t sysmon_lm87 = | |
79 | {CFG_I2C_SYSMON_ADDR, sysmon_lm87_init, sysmon_i2c_read}; | |
80 | static sysmon_t sysmon_lm87_sgn = | |
81 | {CFG_I2C_SYSMON_ADDR, sysmon_lm87_init, sysmon_i2c_read_sgn}; | |
82 | static sysmon_t sysmon_pic = | |
83 | {CFG_I2C_PICIO_ADDR, sysmon_pic_init, sysmon_i2c_read}; | |
84 | ||
85 | static sysmon_t * sysmon_list[] = | |
86 | { | |
87 | &sysmon_lm87, | |
88 | &sysmon_lm87_sgn, | |
89 | &sysmon_pic, | |
90 | NULL | |
91 | }; | |
92 | ||
93 | struct 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 | ||
115 | static 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 | }; | |
138 | static int sysmon_table_size = sizeof(sysmon_table) / sizeof(sysmon_table[0]); | |
139 | ||
140 | static int conversion_done = 0; | |
141 | ||
142 | ||
143 | int 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 | ||
160 | void 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 | ||
178 | static 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 | ||
217 | static 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 | ||
243 | static void sysmon_pic_init (sysmon_t * this) | |
244 | { | |
245 | } | |
246 | ||
247 | static 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 | ||
255 | static 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 | ||
262 | static void sysmon_ccfl_disable (sysmon_table_t * this) | |
263 | { | |
264 | if (!this->val_valid_alt) { | |
265 | sysmon_temp_invalid = 1; | |
266 | } | |
267 | } | |
268 | ||
269 | static 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 | ||
280 | int 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 | ||
328 | #endif /* CONFIG_POST & CFG_POST_SYSMON */ |