Loading...
1// SPDX-License-Identifier: GPL-2.0-only
2/*
3 * Windfarm PowerMac thermal control. FCU fan control
4 *
5 * Copyright 2012 Benjamin Herrenschmidt, IBM Corp.
6 */
7#undef DEBUG
8
9#include <linux/types.h>
10#include <linux/errno.h>
11#include <linux/kernel.h>
12#include <linux/delay.h>
13#include <linux/slab.h>
14#include <linux/init.h>
15#include <linux/wait.h>
16#include <linux/i2c.h>
17#include <asm/prom.h>
18#include <asm/machdep.h>
19#include <asm/io.h>
20#include <asm/sections.h>
21
22#include "windfarm.h"
23#include "windfarm_mpu.h"
24
25#define VERSION "1.0"
26
27#ifdef DEBUG
28#define DBG(args...) printk(args)
29#else
30#define DBG(args...) do { } while(0)
31#endif
32
33/*
34 * This option is "weird" :) Basically, if you define this to 1
35 * the control loop for the RPMs fans (not PWMs) will apply the
36 * correction factor obtained from the PID to the actual RPM
37 * speed read from the FCU.
38 *
39 * If you define the below constant to 0, then it will be
40 * applied to the setpoint RPM speed, that is basically the
41 * speed we proviously "asked" for.
42 *
43 * I'm using 0 for now which is what therm_pm72 used to do and
44 * what Darwin -apparently- does based on observed behaviour.
45 */
46#define RPM_PID_USE_ACTUAL_SPEED 0
47
48/* Default min/max for pumps */
49#define CPU_PUMP_OUTPUT_MAX 3200
50#define CPU_PUMP_OUTPUT_MIN 1250
51
52#define FCU_FAN_RPM 0
53#define FCU_FAN_PWM 1
54
55struct wf_fcu_priv {
56 struct kref ref;
57 struct i2c_client *i2c;
58 struct mutex lock;
59 struct list_head fan_list;
60 int rpm_shift;
61};
62
63struct wf_fcu_fan {
64 struct list_head link;
65 int id;
66 s32 min, max, target;
67 struct wf_fcu_priv *fcu_priv;
68 struct wf_control ctrl;
69};
70
71static void wf_fcu_release(struct kref *ref)
72{
73 struct wf_fcu_priv *pv = container_of(ref, struct wf_fcu_priv, ref);
74
75 kfree(pv);
76}
77
78static void wf_fcu_fan_release(struct wf_control *ct)
79{
80 struct wf_fcu_fan *fan = ct->priv;
81
82 kref_put(&fan->fcu_priv->ref, wf_fcu_release);
83 kfree(fan);
84}
85
86static int wf_fcu_read_reg(struct wf_fcu_priv *pv, int reg,
87 unsigned char *buf, int nb)
88{
89 int tries, nr, nw;
90
91 mutex_lock(&pv->lock);
92
93 buf[0] = reg;
94 tries = 0;
95 for (;;) {
96 nw = i2c_master_send(pv->i2c, buf, 1);
97 if (nw > 0 || (nw < 0 && nw != -EIO) || tries >= 100)
98 break;
99 msleep(10);
100 ++tries;
101 }
102 if (nw <= 0) {
103 pr_err("Failure writing address to FCU: %d", nw);
104 nr = nw;
105 goto bail;
106 }
107 tries = 0;
108 for (;;) {
109 nr = i2c_master_recv(pv->i2c, buf, nb);
110 if (nr > 0 || (nr < 0 && nr != -ENODEV) || tries >= 100)
111 break;
112 msleep(10);
113 ++tries;
114 }
115 if (nr <= 0)
116 pr_err("wf_fcu: Failure reading data from FCU: %d", nw);
117 bail:
118 mutex_unlock(&pv->lock);
119 return nr;
120}
121
122static int wf_fcu_write_reg(struct wf_fcu_priv *pv, int reg,
123 const unsigned char *ptr, int nb)
124{
125 int tries, nw;
126 unsigned char buf[16];
127
128 buf[0] = reg;
129 memcpy(buf+1, ptr, nb);
130 ++nb;
131 tries = 0;
132 for (;;) {
133 nw = i2c_master_send(pv->i2c, buf, nb);
134 if (nw > 0 || (nw < 0 && nw != -EIO) || tries >= 100)
135 break;
136 msleep(10);
137 ++tries;
138 }
139 if (nw < 0)
140 pr_err("wf_fcu: Failure writing to FCU: %d", nw);
141 return nw;
142}
143
144static int wf_fcu_fan_set_rpm(struct wf_control *ct, s32 value)
145{
146 struct wf_fcu_fan *fan = ct->priv;
147 struct wf_fcu_priv *pv = fan->fcu_priv;
148 int rc, shift = pv->rpm_shift;
149 unsigned char buf[2];
150
151 if (value < fan->min)
152 value = fan->min;
153 if (value > fan->max)
154 value = fan->max;
155
156 fan->target = value;
157
158 buf[0] = value >> (8 - shift);
159 buf[1] = value << shift;
160 rc = wf_fcu_write_reg(pv, 0x10 + (fan->id * 2), buf, 2);
161 if (rc < 0)
162 return -EIO;
163 return 0;
164}
165
166static int wf_fcu_fan_get_rpm(struct wf_control *ct, s32 *value)
167{
168 struct wf_fcu_fan *fan = ct->priv;
169 struct wf_fcu_priv *pv = fan->fcu_priv;
170 int rc, reg_base, shift = pv->rpm_shift;
171 unsigned char failure;
172 unsigned char active;
173 unsigned char buf[2];
174
175 rc = wf_fcu_read_reg(pv, 0xb, &failure, 1);
176 if (rc != 1)
177 return -EIO;
178 if ((failure & (1 << fan->id)) != 0)
179 return -EFAULT;
180 rc = wf_fcu_read_reg(pv, 0xd, &active, 1);
181 if (rc != 1)
182 return -EIO;
183 if ((active & (1 << fan->id)) == 0)
184 return -ENXIO;
185
186 /* Programmed value or real current speed */
187#if RPM_PID_USE_ACTUAL_SPEED
188 reg_base = 0x11;
189#else
190 reg_base = 0x10;
191#endif
192 rc = wf_fcu_read_reg(pv, reg_base + (fan->id * 2), buf, 2);
193 if (rc != 2)
194 return -EIO;
195
196 *value = (buf[0] << (8 - shift)) | buf[1] >> shift;
197
198 return 0;
199}
200
201static int wf_fcu_fan_set_pwm(struct wf_control *ct, s32 value)
202{
203 struct wf_fcu_fan *fan = ct->priv;
204 struct wf_fcu_priv *pv = fan->fcu_priv;
205 unsigned char buf[2];
206 int rc;
207
208 if (value < fan->min)
209 value = fan->min;
210 if (value > fan->max)
211 value = fan->max;
212
213 fan->target = value;
214
215 value = (value * 2559) / 1000;
216 buf[0] = value;
217 rc = wf_fcu_write_reg(pv, 0x30 + (fan->id * 2), buf, 1);
218 if (rc < 0)
219 return -EIO;
220 return 0;
221}
222
223static int wf_fcu_fan_get_pwm(struct wf_control *ct, s32 *value)
224{
225 struct wf_fcu_fan *fan = ct->priv;
226 struct wf_fcu_priv *pv = fan->fcu_priv;
227 unsigned char failure;
228 unsigned char active;
229 unsigned char buf[2];
230 int rc;
231
232 rc = wf_fcu_read_reg(pv, 0x2b, &failure, 1);
233 if (rc != 1)
234 return -EIO;
235 if ((failure & (1 << fan->id)) != 0)
236 return -EFAULT;
237 rc = wf_fcu_read_reg(pv, 0x2d, &active, 1);
238 if (rc != 1)
239 return -EIO;
240 if ((active & (1 << fan->id)) == 0)
241 return -ENXIO;
242
243 rc = wf_fcu_read_reg(pv, 0x30 + (fan->id * 2), buf, 1);
244 if (rc != 1)
245 return -EIO;
246
247 *value = (((s32)buf[0]) * 1000) / 2559;
248
249 return 0;
250}
251
252static s32 wf_fcu_fan_min(struct wf_control *ct)
253{
254 struct wf_fcu_fan *fan = ct->priv;
255
256 return fan->min;
257}
258
259static s32 wf_fcu_fan_max(struct wf_control *ct)
260{
261 struct wf_fcu_fan *fan = ct->priv;
262
263 return fan->max;
264}
265
266static const struct wf_control_ops wf_fcu_fan_rpm_ops = {
267 .set_value = wf_fcu_fan_set_rpm,
268 .get_value = wf_fcu_fan_get_rpm,
269 .get_min = wf_fcu_fan_min,
270 .get_max = wf_fcu_fan_max,
271 .release = wf_fcu_fan_release,
272 .owner = THIS_MODULE,
273};
274
275static const struct wf_control_ops wf_fcu_fan_pwm_ops = {
276 .set_value = wf_fcu_fan_set_pwm,
277 .get_value = wf_fcu_fan_get_pwm,
278 .get_min = wf_fcu_fan_min,
279 .get_max = wf_fcu_fan_max,
280 .release = wf_fcu_fan_release,
281 .owner = THIS_MODULE,
282};
283
284static void wf_fcu_get_pump_minmax(struct wf_fcu_fan *fan)
285{
286 const struct mpu_data *mpu = wf_get_mpu(0);
287 u16 pump_min = 0, pump_max = 0xffff;
288 u16 tmp[4];
289
290 /* Try to fetch pumps min/max infos from eeprom */
291 if (mpu) {
292 memcpy(&tmp, mpu->processor_part_num, 8);
293 if (tmp[0] != 0xffff && tmp[1] != 0xffff) {
294 pump_min = max(pump_min, tmp[0]);
295 pump_max = min(pump_max, tmp[1]);
296 }
297 if (tmp[2] != 0xffff && tmp[3] != 0xffff) {
298 pump_min = max(pump_min, tmp[2]);
299 pump_max = min(pump_max, tmp[3]);
300 }
301 }
302
303 /* Double check the values, this _IS_ needed as the EEPROM on
304 * some dual 2.5Ghz G5s seem, at least, to have both min & max
305 * same to the same value ... (grrrr)
306 */
307 if (pump_min == pump_max || pump_min == 0 || pump_max == 0xffff) {
308 pump_min = CPU_PUMP_OUTPUT_MIN;
309 pump_max = CPU_PUMP_OUTPUT_MAX;
310 }
311
312 fan->min = pump_min;
313 fan->max = pump_max;
314
315 DBG("wf_fcu: pump min/max for %s set to: [%d..%d] RPM\n",
316 fan->ctrl.name, pump_min, pump_max);
317}
318
319static void wf_fcu_get_rpmfan_minmax(struct wf_fcu_fan *fan)
320{
321 struct wf_fcu_priv *pv = fan->fcu_priv;
322 const struct mpu_data *mpu0 = wf_get_mpu(0);
323 const struct mpu_data *mpu1 = wf_get_mpu(1);
324
325 /* Default */
326 fan->min = 2400 >> pv->rpm_shift;
327 fan->max = 56000 >> pv->rpm_shift;
328
329 /* CPU fans have min/max in MPU */
330 if (mpu0 && !strcmp(fan->ctrl.name, "cpu-front-fan-0")) {
331 fan->min = max(fan->min, (s32)mpu0->rminn_intake_fan);
332 fan->max = min(fan->max, (s32)mpu0->rmaxn_intake_fan);
333 goto bail;
334 }
335 if (mpu1 && !strcmp(fan->ctrl.name, "cpu-front-fan-1")) {
336 fan->min = max(fan->min, (s32)mpu1->rminn_intake_fan);
337 fan->max = min(fan->max, (s32)mpu1->rmaxn_intake_fan);
338 goto bail;
339 }
340 if (mpu0 && !strcmp(fan->ctrl.name, "cpu-rear-fan-0")) {
341 fan->min = max(fan->min, (s32)mpu0->rminn_exhaust_fan);
342 fan->max = min(fan->max, (s32)mpu0->rmaxn_exhaust_fan);
343 goto bail;
344 }
345 if (mpu1 && !strcmp(fan->ctrl.name, "cpu-rear-fan-1")) {
346 fan->min = max(fan->min, (s32)mpu1->rminn_exhaust_fan);
347 fan->max = min(fan->max, (s32)mpu1->rmaxn_exhaust_fan);
348 goto bail;
349 }
350 /* Rackmac variants, we just use mpu0 intake */
351 if (!strncmp(fan->ctrl.name, "cpu-fan", 7)) {
352 fan->min = max(fan->min, (s32)mpu0->rminn_intake_fan);
353 fan->max = min(fan->max, (s32)mpu0->rmaxn_intake_fan);
354 goto bail;
355 }
356 bail:
357 DBG("wf_fcu: fan min/max for %s set to: [%d..%d] RPM\n",
358 fan->ctrl.name, fan->min, fan->max);
359}
360
361static void wf_fcu_add_fan(struct wf_fcu_priv *pv, const char *name,
362 int type, int id)
363{
364 struct wf_fcu_fan *fan;
365
366 fan = kzalloc(sizeof(*fan), GFP_KERNEL);
367 if (!fan)
368 return;
369 fan->fcu_priv = pv;
370 fan->id = id;
371 fan->ctrl.name = name;
372 fan->ctrl.priv = fan;
373
374 /* min/max is oddball but the code comes from
375 * therm_pm72 which seems to work so ...
376 */
377 if (type == FCU_FAN_RPM) {
378 if (!strncmp(name, "cpu-pump", strlen("cpu-pump")))
379 wf_fcu_get_pump_minmax(fan);
380 else
381 wf_fcu_get_rpmfan_minmax(fan);
382 fan->ctrl.type = WF_CONTROL_RPM_FAN;
383 fan->ctrl.ops = &wf_fcu_fan_rpm_ops;
384 } else {
385 fan->min = 10;
386 fan->max = 100;
387 fan->ctrl.type = WF_CONTROL_PWM_FAN;
388 fan->ctrl.ops = &wf_fcu_fan_pwm_ops;
389 }
390
391 if (wf_register_control(&fan->ctrl)) {
392 pr_err("wf_fcu: Failed to register fan %s\n", name);
393 kfree(fan);
394 return;
395 }
396 list_add(&fan->link, &pv->fan_list);
397 kref_get(&pv->ref);
398}
399
400static void wf_fcu_lookup_fans(struct wf_fcu_priv *pv)
401{
402 /* Translation of device-tree location properties to
403 * windfarm fan names
404 */
405 static const struct {
406 const char *dt_name; /* Device-tree name */
407 const char *ct_name; /* Control name */
408 } loc_trans[] = {
409 { "BACKSIDE", "backside-fan", },
410 { "SYS CTRLR FAN", "backside-fan", },
411 { "DRIVE BAY", "drive-bay-fan", },
412 { "SLOT", "slots-fan", },
413 { "PCI FAN", "slots-fan", },
414 { "CPU A INTAKE", "cpu-front-fan-0", },
415 { "CPU A EXHAUST", "cpu-rear-fan-0", },
416 { "CPU B INTAKE", "cpu-front-fan-1", },
417 { "CPU B EXHAUST", "cpu-rear-fan-1", },
418 { "CPU A PUMP", "cpu-pump-0", },
419 { "CPU B PUMP", "cpu-pump-1", },
420 { "CPU A 1", "cpu-fan-a-0", },
421 { "CPU A 2", "cpu-fan-b-0", },
422 { "CPU A 3", "cpu-fan-c-0", },
423 { "CPU B 1", "cpu-fan-a-1", },
424 { "CPU B 2", "cpu-fan-b-1", },
425 { "CPU B 3", "cpu-fan-c-1", },
426 };
427 struct device_node *np, *fcu = pv->i2c->dev.of_node;
428 int i;
429
430 DBG("Looking up FCU controls in device-tree...\n");
431
432 for_each_child_of_node(fcu, np) {
433 int id, type = -1;
434 const char *loc;
435 const char *name;
436 const u32 *reg;
437
438 DBG(" control: %pOFn, type: %s\n", np, of_node_get_device_type(np));
439
440 /* Detect control type */
441 if (of_node_is_type(np, "fan-rpm-control") ||
442 of_node_is_type(np, "fan-rpm"))
443 type = FCU_FAN_RPM;
444 if (of_node_is_type(np, "fan-pwm-control") ||
445 of_node_is_type(np, "fan-pwm"))
446 type = FCU_FAN_PWM;
447 /* Only care about fans for now */
448 if (type == -1)
449 continue;
450
451 /* Lookup for a matching location */
452 loc = of_get_property(np, "location", NULL);
453 reg = of_get_property(np, "reg", NULL);
454 if (loc == NULL || reg == NULL)
455 continue;
456 DBG(" matching location: %s, reg: 0x%08x\n", loc, *reg);
457
458 for (i = 0; i < ARRAY_SIZE(loc_trans); i++) {
459 if (strncmp(loc, loc_trans[i].dt_name,
460 strlen(loc_trans[i].dt_name)))
461 continue;
462 name = loc_trans[i].ct_name;
463
464 DBG(" location match, name: %s\n", name);
465
466 if (type == FCU_FAN_RPM)
467 id = ((*reg) - 0x10) / 2;
468 else
469 id = ((*reg) - 0x30) / 2;
470 if (id > 7) {
471 pr_warn("wf_fcu: Can't parse fan ID in device-tree for %pOF\n", np);
472 break;
473 }
474 wf_fcu_add_fan(pv, name, type, id);
475 break;
476 }
477 }
478}
479
480static void wf_fcu_default_fans(struct wf_fcu_priv *pv)
481{
482 /* We only support the default fans for PowerMac7,2 */
483 if (!of_machine_is_compatible("PowerMac7,2"))
484 return;
485
486 wf_fcu_add_fan(pv, "backside-fan", FCU_FAN_PWM, 1);
487 wf_fcu_add_fan(pv, "drive-bay-fan", FCU_FAN_RPM, 2);
488 wf_fcu_add_fan(pv, "slots-fan", FCU_FAN_PWM, 2);
489 wf_fcu_add_fan(pv, "cpu-front-fan-0", FCU_FAN_RPM, 3);
490 wf_fcu_add_fan(pv, "cpu-rear-fan-0", FCU_FAN_RPM, 4);
491 wf_fcu_add_fan(pv, "cpu-front-fan-1", FCU_FAN_RPM, 5);
492 wf_fcu_add_fan(pv, "cpu-rear-fan-1", FCU_FAN_RPM, 6);
493}
494
495static int wf_fcu_init_chip(struct wf_fcu_priv *pv)
496{
497 unsigned char buf = 0xff;
498 int rc;
499
500 rc = wf_fcu_write_reg(pv, 0xe, &buf, 1);
501 if (rc < 0)
502 return -EIO;
503 rc = wf_fcu_write_reg(pv, 0x2e, &buf, 1);
504 if (rc < 0)
505 return -EIO;
506 rc = wf_fcu_read_reg(pv, 0, &buf, 1);
507 if (rc < 0)
508 return -EIO;
509 pv->rpm_shift = (buf == 1) ? 2 : 3;
510
511 pr_debug("wf_fcu: FCU Initialized, RPM fan shift is %d\n",
512 pv->rpm_shift);
513
514 return 0;
515}
516
517static int wf_fcu_probe(struct i2c_client *client,
518 const struct i2c_device_id *id)
519{
520 struct wf_fcu_priv *pv;
521
522 pv = kzalloc(sizeof(*pv), GFP_KERNEL);
523 if (!pv)
524 return -ENOMEM;
525
526 kref_init(&pv->ref);
527 mutex_init(&pv->lock);
528 INIT_LIST_HEAD(&pv->fan_list);
529 pv->i2c = client;
530
531 /*
532 * First we must start the FCU which will query the
533 * shift value to apply to RPMs
534 */
535 if (wf_fcu_init_chip(pv)) {
536 pr_err("wf_fcu: Initialization failed !\n");
537 kfree(pv);
538 return -ENXIO;
539 }
540
541 /* First lookup fans in the device-tree */
542 wf_fcu_lookup_fans(pv);
543
544 /*
545 * Older machines don't have the device-tree entries
546 * we are looking for, just hard code the list
547 */
548 if (list_empty(&pv->fan_list))
549 wf_fcu_default_fans(pv);
550
551 /* Still no fans ? FAIL */
552 if (list_empty(&pv->fan_list)) {
553 pr_err("wf_fcu: Failed to find fans for your machine\n");
554 kfree(pv);
555 return -ENODEV;
556 }
557
558 dev_set_drvdata(&client->dev, pv);
559
560 return 0;
561}
562
563static int wf_fcu_remove(struct i2c_client *client)
564{
565 struct wf_fcu_priv *pv = dev_get_drvdata(&client->dev);
566 struct wf_fcu_fan *fan;
567
568 while (!list_empty(&pv->fan_list)) {
569 fan = list_first_entry(&pv->fan_list, struct wf_fcu_fan, link);
570 list_del(&fan->link);
571 wf_unregister_control(&fan->ctrl);
572 }
573 kref_put(&pv->ref, wf_fcu_release);
574 return 0;
575}
576
577static const struct i2c_device_id wf_fcu_id[] = {
578 { "MAC,fcu", 0 },
579 { }
580};
581MODULE_DEVICE_TABLE(i2c, wf_fcu_id);
582
583static const struct of_device_id wf_fcu_of_id[] = {
584 { .compatible = "fcu", },
585 { }
586};
587MODULE_DEVICE_TABLE(of, wf_fcu_of_id);
588
589static struct i2c_driver wf_fcu_driver = {
590 .driver = {
591 .name = "wf_fcu",
592 .of_match_table = wf_fcu_of_id,
593 },
594 .probe = wf_fcu_probe,
595 .remove = wf_fcu_remove,
596 .id_table = wf_fcu_id,
597};
598
599module_i2c_driver(wf_fcu_driver);
600
601MODULE_AUTHOR("Benjamin Herrenschmidt <benh@kernel.crashing.org>");
602MODULE_DESCRIPTION("FCU control objects for PowerMacs thermal control");
603MODULE_LICENSE("GPL");
604
1/*
2 * Windfarm PowerMac thermal control. FCU fan control
3 *
4 * Copyright 2012 Benjamin Herrenschmidt, IBM Corp.
5 *
6 * Released under the term of the GNU GPL v2.
7 */
8#undef DEBUG
9
10#include <linux/types.h>
11#include <linux/errno.h>
12#include <linux/kernel.h>
13#include <linux/delay.h>
14#include <linux/slab.h>
15#include <linux/init.h>
16#include <linux/wait.h>
17#include <linux/i2c.h>
18#include <asm/prom.h>
19#include <asm/machdep.h>
20#include <asm/io.h>
21#include <asm/sections.h>
22
23#include "windfarm.h"
24#include "windfarm_mpu.h"
25
26#define VERSION "1.0"
27
28#ifdef DEBUG
29#define DBG(args...) printk(args)
30#else
31#define DBG(args...) do { } while(0)
32#endif
33
34/*
35 * This option is "weird" :) Basically, if you define this to 1
36 * the control loop for the RPMs fans (not PWMs) will apply the
37 * correction factor obtained from the PID to the actual RPM
38 * speed read from the FCU.
39 *
40 * If you define the below constant to 0, then it will be
41 * applied to the setpoint RPM speed, that is basically the
42 * speed we proviously "asked" for.
43 *
44 * I'm using 0 for now which is what therm_pm72 used to do and
45 * what Darwin -apparently- does based on observed behaviour.
46 */
47#define RPM_PID_USE_ACTUAL_SPEED 0
48
49/* Default min/max for pumps */
50#define CPU_PUMP_OUTPUT_MAX 3200
51#define CPU_PUMP_OUTPUT_MIN 1250
52
53#define FCU_FAN_RPM 0
54#define FCU_FAN_PWM 1
55
56struct wf_fcu_priv {
57 struct kref ref;
58 struct i2c_client *i2c;
59 struct mutex lock;
60 struct list_head fan_list;
61 int rpm_shift;
62};
63
64struct wf_fcu_fan {
65 struct list_head link;
66 int id;
67 s32 min, max, target;
68 struct wf_fcu_priv *fcu_priv;
69 struct wf_control ctrl;
70};
71
72static void wf_fcu_release(struct kref *ref)
73{
74 struct wf_fcu_priv *pv = container_of(ref, struct wf_fcu_priv, ref);
75
76 kfree(pv);
77}
78
79static void wf_fcu_fan_release(struct wf_control *ct)
80{
81 struct wf_fcu_fan *fan = ct->priv;
82
83 kref_put(&fan->fcu_priv->ref, wf_fcu_release);
84 kfree(fan);
85}
86
87static int wf_fcu_read_reg(struct wf_fcu_priv *pv, int reg,
88 unsigned char *buf, int nb)
89{
90 int tries, nr, nw;
91
92 mutex_lock(&pv->lock);
93
94 buf[0] = reg;
95 tries = 0;
96 for (;;) {
97 nw = i2c_master_send(pv->i2c, buf, 1);
98 if (nw > 0 || (nw < 0 && nw != -EIO) || tries >= 100)
99 break;
100 msleep(10);
101 ++tries;
102 }
103 if (nw <= 0) {
104 pr_err("Failure writing address to FCU: %d", nw);
105 nr = nw;
106 goto bail;
107 }
108 tries = 0;
109 for (;;) {
110 nr = i2c_master_recv(pv->i2c, buf, nb);
111 if (nr > 0 || (nr < 0 && nr != -ENODEV) || tries >= 100)
112 break;
113 msleep(10);
114 ++tries;
115 }
116 if (nr <= 0)
117 pr_err("wf_fcu: Failure reading data from FCU: %d", nw);
118 bail:
119 mutex_unlock(&pv->lock);
120 return nr;
121}
122
123static int wf_fcu_write_reg(struct wf_fcu_priv *pv, int reg,
124 const unsigned char *ptr, int nb)
125{
126 int tries, nw;
127 unsigned char buf[16];
128
129 buf[0] = reg;
130 memcpy(buf+1, ptr, nb);
131 ++nb;
132 tries = 0;
133 for (;;) {
134 nw = i2c_master_send(pv->i2c, buf, nb);
135 if (nw > 0 || (nw < 0 && nw != -EIO) || tries >= 100)
136 break;
137 msleep(10);
138 ++tries;
139 }
140 if (nw < 0)
141 pr_err("wf_fcu: Failure writing to FCU: %d", nw);
142 return nw;
143}
144
145static int wf_fcu_fan_set_rpm(struct wf_control *ct, s32 value)
146{
147 struct wf_fcu_fan *fan = ct->priv;
148 struct wf_fcu_priv *pv = fan->fcu_priv;
149 int rc, shift = pv->rpm_shift;
150 unsigned char buf[2];
151
152 if (value < fan->min)
153 value = fan->min;
154 if (value > fan->max)
155 value = fan->max;
156
157 fan->target = value;
158
159 buf[0] = value >> (8 - shift);
160 buf[1] = value << shift;
161 rc = wf_fcu_write_reg(pv, 0x10 + (fan->id * 2), buf, 2);
162 if (rc < 0)
163 return -EIO;
164 return 0;
165}
166
167static int wf_fcu_fan_get_rpm(struct wf_control *ct, s32 *value)
168{
169 struct wf_fcu_fan *fan = ct->priv;
170 struct wf_fcu_priv *pv = fan->fcu_priv;
171 int rc, reg_base, shift = pv->rpm_shift;
172 unsigned char failure;
173 unsigned char active;
174 unsigned char buf[2];
175
176 rc = wf_fcu_read_reg(pv, 0xb, &failure, 1);
177 if (rc != 1)
178 return -EIO;
179 if ((failure & (1 << fan->id)) != 0)
180 return -EFAULT;
181 rc = wf_fcu_read_reg(pv, 0xd, &active, 1);
182 if (rc != 1)
183 return -EIO;
184 if ((active & (1 << fan->id)) == 0)
185 return -ENXIO;
186
187 /* Programmed value or real current speed */
188#if RPM_PID_USE_ACTUAL_SPEED
189 reg_base = 0x11;
190#else
191 reg_base = 0x10;
192#endif
193 rc = wf_fcu_read_reg(pv, reg_base + (fan->id * 2), buf, 2);
194 if (rc != 2)
195 return -EIO;
196
197 *value = (buf[0] << (8 - shift)) | buf[1] >> shift;
198
199 return 0;
200}
201
202static int wf_fcu_fan_set_pwm(struct wf_control *ct, s32 value)
203{
204 struct wf_fcu_fan *fan = ct->priv;
205 struct wf_fcu_priv *pv = fan->fcu_priv;
206 unsigned char buf[2];
207 int rc;
208
209 if (value < fan->min)
210 value = fan->min;
211 if (value > fan->max)
212 value = fan->max;
213
214 fan->target = value;
215
216 value = (value * 2559) / 1000;
217 buf[0] = value;
218 rc = wf_fcu_write_reg(pv, 0x30 + (fan->id * 2), buf, 1);
219 if (rc < 0)
220 return -EIO;
221 return 0;
222}
223
224static int wf_fcu_fan_get_pwm(struct wf_control *ct, s32 *value)
225{
226 struct wf_fcu_fan *fan = ct->priv;
227 struct wf_fcu_priv *pv = fan->fcu_priv;
228 unsigned char failure;
229 unsigned char active;
230 unsigned char buf[2];
231 int rc;
232
233 rc = wf_fcu_read_reg(pv, 0x2b, &failure, 1);
234 if (rc != 1)
235 return -EIO;
236 if ((failure & (1 << fan->id)) != 0)
237 return -EFAULT;
238 rc = wf_fcu_read_reg(pv, 0x2d, &active, 1);
239 if (rc != 1)
240 return -EIO;
241 if ((active & (1 << fan->id)) == 0)
242 return -ENXIO;
243
244 rc = wf_fcu_read_reg(pv, 0x30 + (fan->id * 2), buf, 1);
245 if (rc != 1)
246 return -EIO;
247
248 *value = (((s32)buf[0]) * 1000) / 2559;
249
250 return 0;
251}
252
253static s32 wf_fcu_fan_min(struct wf_control *ct)
254{
255 struct wf_fcu_fan *fan = ct->priv;
256
257 return fan->min;
258}
259
260static s32 wf_fcu_fan_max(struct wf_control *ct)
261{
262 struct wf_fcu_fan *fan = ct->priv;
263
264 return fan->max;
265}
266
267static const struct wf_control_ops wf_fcu_fan_rpm_ops = {
268 .set_value = wf_fcu_fan_set_rpm,
269 .get_value = wf_fcu_fan_get_rpm,
270 .get_min = wf_fcu_fan_min,
271 .get_max = wf_fcu_fan_max,
272 .release = wf_fcu_fan_release,
273 .owner = THIS_MODULE,
274};
275
276static const struct wf_control_ops wf_fcu_fan_pwm_ops = {
277 .set_value = wf_fcu_fan_set_pwm,
278 .get_value = wf_fcu_fan_get_pwm,
279 .get_min = wf_fcu_fan_min,
280 .get_max = wf_fcu_fan_max,
281 .release = wf_fcu_fan_release,
282 .owner = THIS_MODULE,
283};
284
285static void wf_fcu_get_pump_minmax(struct wf_fcu_fan *fan)
286{
287 const struct mpu_data *mpu = wf_get_mpu(0);
288 u16 pump_min = 0, pump_max = 0xffff;
289 u16 tmp[4];
290
291 /* Try to fetch pumps min/max infos from eeprom */
292 if (mpu) {
293 memcpy(&tmp, mpu->processor_part_num, 8);
294 if (tmp[0] != 0xffff && tmp[1] != 0xffff) {
295 pump_min = max(pump_min, tmp[0]);
296 pump_max = min(pump_max, tmp[1]);
297 }
298 if (tmp[2] != 0xffff && tmp[3] != 0xffff) {
299 pump_min = max(pump_min, tmp[2]);
300 pump_max = min(pump_max, tmp[3]);
301 }
302 }
303
304 /* Double check the values, this _IS_ needed as the EEPROM on
305 * some dual 2.5Ghz G5s seem, at least, to have both min & max
306 * same to the same value ... (grrrr)
307 */
308 if (pump_min == pump_max || pump_min == 0 || pump_max == 0xffff) {
309 pump_min = CPU_PUMP_OUTPUT_MIN;
310 pump_max = CPU_PUMP_OUTPUT_MAX;
311 }
312
313 fan->min = pump_min;
314 fan->max = pump_max;
315
316 DBG("wf_fcu: pump min/max for %s set to: [%d..%d] RPM\n",
317 fan->ctrl.name, pump_min, pump_max);
318}
319
320static void wf_fcu_get_rpmfan_minmax(struct wf_fcu_fan *fan)
321{
322 struct wf_fcu_priv *pv = fan->fcu_priv;
323 const struct mpu_data *mpu0 = wf_get_mpu(0);
324 const struct mpu_data *mpu1 = wf_get_mpu(1);
325
326 /* Default */
327 fan->min = 2400 >> pv->rpm_shift;
328 fan->max = 56000 >> pv->rpm_shift;
329
330 /* CPU fans have min/max in MPU */
331 if (mpu0 && !strcmp(fan->ctrl.name, "cpu-front-fan-0")) {
332 fan->min = max(fan->min, (s32)mpu0->rminn_intake_fan);
333 fan->max = min(fan->max, (s32)mpu0->rmaxn_intake_fan);
334 goto bail;
335 }
336 if (mpu1 && !strcmp(fan->ctrl.name, "cpu-front-fan-1")) {
337 fan->min = max(fan->min, (s32)mpu1->rminn_intake_fan);
338 fan->max = min(fan->max, (s32)mpu1->rmaxn_intake_fan);
339 goto bail;
340 }
341 if (mpu0 && !strcmp(fan->ctrl.name, "cpu-rear-fan-0")) {
342 fan->min = max(fan->min, (s32)mpu0->rminn_exhaust_fan);
343 fan->max = min(fan->max, (s32)mpu0->rmaxn_exhaust_fan);
344 goto bail;
345 }
346 if (mpu1 && !strcmp(fan->ctrl.name, "cpu-rear-fan-1")) {
347 fan->min = max(fan->min, (s32)mpu1->rminn_exhaust_fan);
348 fan->max = min(fan->max, (s32)mpu1->rmaxn_exhaust_fan);
349 goto bail;
350 }
351 /* Rackmac variants, we just use mpu0 intake */
352 if (!strncmp(fan->ctrl.name, "cpu-fan", 7)) {
353 fan->min = max(fan->min, (s32)mpu0->rminn_intake_fan);
354 fan->max = min(fan->max, (s32)mpu0->rmaxn_intake_fan);
355 goto bail;
356 }
357 bail:
358 DBG("wf_fcu: fan min/max for %s set to: [%d..%d] RPM\n",
359 fan->ctrl.name, fan->min, fan->max);
360}
361
362static void wf_fcu_add_fan(struct wf_fcu_priv *pv, const char *name,
363 int type, int id)
364{
365 struct wf_fcu_fan *fan;
366
367 fan = kzalloc(sizeof(*fan), GFP_KERNEL);
368 if (!fan)
369 return;
370 fan->fcu_priv = pv;
371 fan->id = id;
372 fan->ctrl.name = name;
373 fan->ctrl.priv = fan;
374
375 /* min/max is oddball but the code comes from
376 * therm_pm72 which seems to work so ...
377 */
378 if (type == FCU_FAN_RPM) {
379 if (!strncmp(name, "cpu-pump", strlen("cpu-pump")))
380 wf_fcu_get_pump_minmax(fan);
381 else
382 wf_fcu_get_rpmfan_minmax(fan);
383 fan->ctrl.type = WF_CONTROL_RPM_FAN;
384 fan->ctrl.ops = &wf_fcu_fan_rpm_ops;
385 } else {
386 fan->min = 10;
387 fan->max = 100;
388 fan->ctrl.type = WF_CONTROL_PWM_FAN;
389 fan->ctrl.ops = &wf_fcu_fan_pwm_ops;
390 }
391
392 if (wf_register_control(&fan->ctrl)) {
393 pr_err("wf_fcu: Failed to register fan %s\n", name);
394 kfree(fan);
395 return;
396 }
397 list_add(&fan->link, &pv->fan_list);
398 kref_get(&pv->ref);
399}
400
401static void wf_fcu_lookup_fans(struct wf_fcu_priv *pv)
402{
403 /* Translation of device-tree location properties to
404 * windfarm fan names
405 */
406 static const struct {
407 const char *dt_name; /* Device-tree name */
408 const char *ct_name; /* Control name */
409 } loc_trans[] = {
410 { "BACKSIDE", "backside-fan", },
411 { "SYS CTRLR FAN", "backside-fan", },
412 { "DRIVE BAY", "drive-bay-fan", },
413 { "SLOT", "slots-fan", },
414 { "PCI FAN", "slots-fan", },
415 { "CPU A INTAKE", "cpu-front-fan-0", },
416 { "CPU A EXHAUST", "cpu-rear-fan-0", },
417 { "CPU B INTAKE", "cpu-front-fan-1", },
418 { "CPU B EXHAUST", "cpu-rear-fan-1", },
419 { "CPU A PUMP", "cpu-pump-0", },
420 { "CPU B PUMP", "cpu-pump-1", },
421 { "CPU A 1", "cpu-fan-a-0", },
422 { "CPU A 2", "cpu-fan-b-0", },
423 { "CPU A 3", "cpu-fan-c-0", },
424 { "CPU B 1", "cpu-fan-a-1", },
425 { "CPU B 2", "cpu-fan-b-1", },
426 { "CPU B 3", "cpu-fan-c-1", },
427 };
428 struct device_node *np = NULL, *fcu = pv->i2c->dev.of_node;
429 int i;
430
431 DBG("Looking up FCU controls in device-tree...\n");
432
433 while ((np = of_get_next_child(fcu, np)) != NULL) {
434 int id, type = -1;
435 const char *loc;
436 const char *name;
437 const u32 *reg;
438
439 DBG(" control: %s, type: %s\n", np->name, np->type);
440
441 /* Detect control type */
442 if (!strcmp(np->type, "fan-rpm-control") ||
443 !strcmp(np->type, "fan-rpm"))
444 type = FCU_FAN_RPM;
445 if (!strcmp(np->type, "fan-pwm-control") ||
446 !strcmp(np->type, "fan-pwm"))
447 type = FCU_FAN_PWM;
448 /* Only care about fans for now */
449 if (type == -1)
450 continue;
451
452 /* Lookup for a matching location */
453 loc = of_get_property(np, "location", NULL);
454 reg = of_get_property(np, "reg", NULL);
455 if (loc == NULL || reg == NULL)
456 continue;
457 DBG(" matching location: %s, reg: 0x%08x\n", loc, *reg);
458
459 for (i = 0; i < ARRAY_SIZE(loc_trans); i++) {
460 if (strncmp(loc, loc_trans[i].dt_name,
461 strlen(loc_trans[i].dt_name)))
462 continue;
463 name = loc_trans[i].ct_name;
464
465 DBG(" location match, name: %s\n", name);
466
467 if (type == FCU_FAN_RPM)
468 id = ((*reg) - 0x10) / 2;
469 else
470 id = ((*reg) - 0x30) / 2;
471 if (id > 7) {
472 pr_warning("wf_fcu: Can't parse "
473 "fan ID in device-tree for %s\n",
474 np->full_name);
475 break;
476 }
477 wf_fcu_add_fan(pv, name, type, id);
478 break;
479 }
480 }
481}
482
483static void wf_fcu_default_fans(struct wf_fcu_priv *pv)
484{
485 /* We only support the default fans for PowerMac7,2 */
486 if (!of_machine_is_compatible("PowerMac7,2"))
487 return;
488
489 wf_fcu_add_fan(pv, "backside-fan", FCU_FAN_PWM, 1);
490 wf_fcu_add_fan(pv, "drive-bay-fan", FCU_FAN_RPM, 2);
491 wf_fcu_add_fan(pv, "slots-fan", FCU_FAN_PWM, 2);
492 wf_fcu_add_fan(pv, "cpu-front-fan-0", FCU_FAN_RPM, 3);
493 wf_fcu_add_fan(pv, "cpu-rear-fan-0", FCU_FAN_RPM, 4);
494 wf_fcu_add_fan(pv, "cpu-front-fan-1", FCU_FAN_RPM, 5);
495 wf_fcu_add_fan(pv, "cpu-rear-fan-1", FCU_FAN_RPM, 6);
496}
497
498static int wf_fcu_init_chip(struct wf_fcu_priv *pv)
499{
500 unsigned char buf = 0xff;
501 int rc;
502
503 rc = wf_fcu_write_reg(pv, 0xe, &buf, 1);
504 if (rc < 0)
505 return -EIO;
506 rc = wf_fcu_write_reg(pv, 0x2e, &buf, 1);
507 if (rc < 0)
508 return -EIO;
509 rc = wf_fcu_read_reg(pv, 0, &buf, 1);
510 if (rc < 0)
511 return -EIO;
512 pv->rpm_shift = (buf == 1) ? 2 : 3;
513
514 pr_debug("wf_fcu: FCU Initialized, RPM fan shift is %d\n",
515 pv->rpm_shift);
516
517 return 0;
518}
519
520static int wf_fcu_probe(struct i2c_client *client,
521 const struct i2c_device_id *id)
522{
523 struct wf_fcu_priv *pv;
524
525 pv = kzalloc(sizeof(*pv), GFP_KERNEL);
526 if (!pv)
527 return -ENOMEM;
528
529 kref_init(&pv->ref);
530 mutex_init(&pv->lock);
531 INIT_LIST_HEAD(&pv->fan_list);
532 pv->i2c = client;
533
534 /*
535 * First we must start the FCU which will query the
536 * shift value to apply to RPMs
537 */
538 if (wf_fcu_init_chip(pv)) {
539 pr_err("wf_fcu: Initialization failed !\n");
540 kfree(pv);
541 return -ENXIO;
542 }
543
544 /* First lookup fans in the device-tree */
545 wf_fcu_lookup_fans(pv);
546
547 /*
548 * Older machines don't have the device-tree entries
549 * we are looking for, just hard code the list
550 */
551 if (list_empty(&pv->fan_list))
552 wf_fcu_default_fans(pv);
553
554 /* Still no fans ? FAIL */
555 if (list_empty(&pv->fan_list)) {
556 pr_err("wf_fcu: Failed to find fans for your machine\n");
557 kfree(pv);
558 return -ENODEV;
559 }
560
561 dev_set_drvdata(&client->dev, pv);
562
563 return 0;
564}
565
566static int wf_fcu_remove(struct i2c_client *client)
567{
568 struct wf_fcu_priv *pv = dev_get_drvdata(&client->dev);
569 struct wf_fcu_fan *fan;
570
571 while (!list_empty(&pv->fan_list)) {
572 fan = list_first_entry(&pv->fan_list, struct wf_fcu_fan, link);
573 list_del(&fan->link);
574 wf_unregister_control(&fan->ctrl);
575 }
576 kref_put(&pv->ref, wf_fcu_release);
577 return 0;
578}
579
580static const struct i2c_device_id wf_fcu_id[] = {
581 { "MAC,fcu", 0 },
582 { }
583};
584MODULE_DEVICE_TABLE(i2c, wf_fcu_id);
585
586static struct i2c_driver wf_fcu_driver = {
587 .driver = {
588 .name = "wf_fcu",
589 },
590 .probe = wf_fcu_probe,
591 .remove = wf_fcu_remove,
592 .id_table = wf_fcu_id,
593};
594
595module_i2c_driver(wf_fcu_driver);
596
597MODULE_AUTHOR("Benjamin Herrenschmidt <benh@kernel.crashing.org>");
598MODULE_DESCRIPTION("FCU control objects for PowerMacs thermal control");
599MODULE_LICENSE("GPL");
600