Linux Audio

Check our new training course

Loading...
Note: File does not exist in v3.1.
  1// SPDX-License-Identifier: GPL-2.0
  2/*
  3 * Fan Control HDL CORE driver
  4 *
  5 * Copyright 2019 Analog Devices Inc.
  6 */
  7#include <linux/bits.h>
  8#include <linux/clk.h>
  9#include <linux/fpga/adi-axi-common.h>
 10#include <linux/hwmon.h>
 11#include <linux/hwmon-sysfs.h>
 12#include <linux/interrupt.h>
 13#include <linux/io.h>
 14#include <linux/kernel.h>
 15#include <linux/module.h>
 16#include <linux/of.h>
 17#include <linux/platform_device.h>
 18
 19/* register map */
 20#define ADI_REG_RSTN		0x0080
 21#define ADI_REG_PWM_WIDTH	0x0084
 22#define ADI_REG_TACH_PERIOD	0x0088
 23#define ADI_REG_TACH_TOLERANCE	0x008c
 24#define ADI_REG_PWM_PERIOD	0x00c0
 25#define ADI_REG_TACH_MEASUR	0x00c4
 26#define ADI_REG_TEMPERATURE	0x00c8
 27#define ADI_REG_TEMP_00_H	0x0100
 28#define ADI_REG_TEMP_25_L	0x0104
 29#define ADI_REG_TEMP_25_H	0x0108
 30#define ADI_REG_TEMP_50_L	0x010c
 31#define ADI_REG_TEMP_50_H	0x0110
 32#define ADI_REG_TEMP_75_L	0x0114
 33#define ADI_REG_TEMP_75_H	0x0118
 34#define ADI_REG_TEMP_100_L	0x011c
 35
 36#define ADI_REG_IRQ_MASK	0x0040
 37#define ADI_REG_IRQ_PENDING	0x0044
 38#define ADI_REG_IRQ_SRC		0x0048
 39
 40/* IRQ sources */
 41#define ADI_IRQ_SRC_PWM_CHANGED		BIT(0)
 42#define ADI_IRQ_SRC_TACH_ERR		BIT(1)
 43#define ADI_IRQ_SRC_TEMP_INCREASE	BIT(2)
 44#define ADI_IRQ_SRC_NEW_MEASUR		BIT(3)
 45#define ADI_IRQ_SRC_MASK		GENMASK(3, 0)
 46#define ADI_IRQ_MASK_OUT_ALL		0xFFFFFFFFU
 47
 48#define SYSFS_PWM_MAX			255
 49
 50struct axi_fan_control_data {
 51	void __iomem *base;
 52	struct device *hdev;
 53	unsigned long clk_rate;
 54	int irq;
 55	/* pulses per revolution */
 56	u32 ppr;
 57	bool hw_pwm_req;
 58	bool update_tacho_params;
 59	u8 fan_fault;
 60};
 61
 62static inline void axi_iowrite(const u32 val, const u32 reg,
 63			       const struct axi_fan_control_data *ctl)
 64{
 65	iowrite32(val, ctl->base + reg);
 66}
 67
 68static inline u32 axi_ioread(const u32 reg,
 69			     const struct axi_fan_control_data *ctl)
 70{
 71	return ioread32(ctl->base + reg);
 72}
 73
 74/*
 75 * The core calculates the temperature as:
 76 *	T = /raw * 509.3140064 / 65535) - 280.2308787
 77 */
 78static ssize_t axi_fan_control_show(struct device *dev, struct device_attribute *da, char *buf)
 79{
 80	struct axi_fan_control_data *ctl = dev_get_drvdata(dev);
 81	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
 82	u32 temp = axi_ioread(attr->index, ctl);
 83
 84	temp = DIV_ROUND_CLOSEST_ULL(temp * 509314ULL, 65535) - 280230;
 85
 86	return sprintf(buf, "%u\n", temp);
 87}
 88
 89static ssize_t axi_fan_control_store(struct device *dev, struct device_attribute *da,
 90				     const char *buf, size_t count)
 91{
 92	struct axi_fan_control_data *ctl = dev_get_drvdata(dev);
 93	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
 94	u32 temp;
 95	int ret;
 96
 97	ret = kstrtou32(buf, 10, &temp);
 98	if (ret)
 99		return ret;
100
101	temp = DIV_ROUND_CLOSEST_ULL((temp + 280230) * 65535ULL, 509314);
102	axi_iowrite(temp, attr->index, ctl);
103
104	return count;
105}
106
107static long axi_fan_control_get_pwm_duty(const struct axi_fan_control_data *ctl)
108{
109	u32 pwm_width = axi_ioread(ADI_REG_PWM_WIDTH, ctl);
110	u32 pwm_period = axi_ioread(ADI_REG_PWM_PERIOD, ctl);
111	/*
112	 * PWM_PERIOD is a RO register set by the core. It should never be 0.
113	 * For now we are trusting the HW...
114	 */
115	return DIV_ROUND_CLOSEST(pwm_width * SYSFS_PWM_MAX, pwm_period);
116}
117
118static int axi_fan_control_set_pwm_duty(const long val,
119					struct axi_fan_control_data *ctl)
120{
121	u32 pwm_period = axi_ioread(ADI_REG_PWM_PERIOD, ctl);
122	u32 new_width;
123	long __val = clamp_val(val, 0, SYSFS_PWM_MAX);
124
125	new_width = DIV_ROUND_CLOSEST(__val * pwm_period, SYSFS_PWM_MAX);
126
127	axi_iowrite(new_width, ADI_REG_PWM_WIDTH, ctl);
128
129	return 0;
130}
131
132static long axi_fan_control_get_fan_rpm(const struct axi_fan_control_data *ctl)
133{
134	const u32 tach = axi_ioread(ADI_REG_TACH_MEASUR, ctl);
135
136	if (tach == 0)
137		/* should we return error, EAGAIN maybe? */
138		return 0;
139	/*
140	 * The tacho period should be:
141	 *      TACH = 60/(ppr * rpm), where rpm is revolutions per second
142	 *      and ppr is pulses per revolution.
143	 * Given the tacho period, we can multiply it by the input clock
144	 * so that we know how many clocks we need to have this period.
145	 * From this, we can derive the RPM value.
146	 */
147	return DIV_ROUND_CLOSEST(60 * ctl->clk_rate, ctl->ppr * tach);
148}
149
150static int axi_fan_control_read_temp(struct device *dev, u32 attr, long *val)
151{
152	struct axi_fan_control_data *ctl = dev_get_drvdata(dev);
153	long raw_temp;
154
155	switch (attr) {
156	case hwmon_temp_input:
157		raw_temp = axi_ioread(ADI_REG_TEMPERATURE, ctl);
158		/*
159		 * The formula for the temperature is:
160		 *      T = (ADC * 501.3743 / 2^bits) - 273.6777
161		 * It's multiplied by 1000 to have millidegrees as
162		 * specified by the hwmon sysfs interface.
163		 */
164		*val = ((raw_temp * 501374) >> 16) - 273677;
165		return 0;
166	default:
167		return -ENOTSUPP;
168	}
169}
170
171static int axi_fan_control_read_fan(struct device *dev, u32 attr, long *val)
172{
173	struct axi_fan_control_data *ctl = dev_get_drvdata(dev);
174
175	switch (attr) {
176	case hwmon_fan_fault:
177		*val = ctl->fan_fault;
178		/* clear it now */
179		ctl->fan_fault = 0;
180		return 0;
181	case hwmon_fan_input:
182		*val = axi_fan_control_get_fan_rpm(ctl);
183		return 0;
184	default:
185		return -ENOTSUPP;
186	}
187}
188
189static int axi_fan_control_read_pwm(struct device *dev, u32 attr, long *val)
190{
191	struct axi_fan_control_data *ctl = dev_get_drvdata(dev);
192
193	switch (attr) {
194	case hwmon_pwm_input:
195		*val = axi_fan_control_get_pwm_duty(ctl);
196		return 0;
197	default:
198		return -ENOTSUPP;
199	}
200}
201
202static int axi_fan_control_write_pwm(struct device *dev, u32 attr, long val)
203{
204	struct axi_fan_control_data *ctl = dev_get_drvdata(dev);
205
206	switch (attr) {
207	case hwmon_pwm_input:
208		return axi_fan_control_set_pwm_duty(val, ctl);
209	default:
210		return -ENOTSUPP;
211	}
212}
213
214static int axi_fan_control_read_labels(struct device *dev,
215				       enum hwmon_sensor_types type,
216				       u32 attr, int channel, const char **str)
217{
218	switch (type) {
219	case hwmon_fan:
220		*str = "FAN";
221		return 0;
222	case hwmon_temp:
223		*str = "SYSMON4";
224		return 0;
225	default:
226		return -ENOTSUPP;
227	}
228}
229
230static int axi_fan_control_read(struct device *dev,
231				enum hwmon_sensor_types type,
232				u32 attr, int channel, long *val)
233{
234	switch (type) {
235	case hwmon_fan:
236		return axi_fan_control_read_fan(dev, attr, val);
237	case hwmon_pwm:
238		return axi_fan_control_read_pwm(dev, attr, val);
239	case hwmon_temp:
240		return axi_fan_control_read_temp(dev, attr, val);
241	default:
242		return -ENOTSUPP;
243	}
244}
245
246static int axi_fan_control_write(struct device *dev,
247				 enum hwmon_sensor_types type,
248				 u32 attr, int channel, long val)
249{
250	switch (type) {
251	case hwmon_pwm:
252		return axi_fan_control_write_pwm(dev, attr, val);
253	default:
254		return -ENOTSUPP;
255	}
256}
257
258static umode_t axi_fan_control_fan_is_visible(const u32 attr)
259{
260	switch (attr) {
261	case hwmon_fan_input:
262	case hwmon_fan_fault:
263	case hwmon_fan_label:
264		return 0444;
265	default:
266		return 0;
267	}
268}
269
270static umode_t axi_fan_control_pwm_is_visible(const u32 attr)
271{
272	switch (attr) {
273	case hwmon_pwm_input:
274		return 0644;
275	default:
276		return 0;
277	}
278}
279
280static umode_t axi_fan_control_temp_is_visible(const u32 attr)
281{
282	switch (attr) {
283	case hwmon_temp_input:
284	case hwmon_temp_label:
285		return 0444;
286	default:
287		return 0;
288	}
289}
290
291static umode_t axi_fan_control_is_visible(const void *data,
292					  enum hwmon_sensor_types type,
293					  u32 attr, int channel)
294{
295	switch (type) {
296	case hwmon_fan:
297		return axi_fan_control_fan_is_visible(attr);
298	case hwmon_pwm:
299		return axi_fan_control_pwm_is_visible(attr);
300	case hwmon_temp:
301		return axi_fan_control_temp_is_visible(attr);
302	default:
303		return 0;
304	}
305}
306
307/*
308 * This core has two main ways of changing the PWM duty cycle. It is done,
309 * either by a request from userspace (writing on pwm1_input) or by the
310 * core itself. When the change is done by the core, it will use predefined
311 * parameters to evaluate the tach signal and, on that case we cannot set them.
312 * On the other hand, when the request is done by the user, with some arbitrary
313 * value that the core does not now about, we have to provide the tach
314 * parameters so that, the core can evaluate the signal. On the IRQ handler we
315 * distinguish this by using the ADI_IRQ_SRC_TEMP_INCREASE interrupt. This tell
316 * us that the CORE requested a new duty cycle. After this, there is 5s delay
317 * on which the core waits for the fan rotation speed to stabilize. After this
318 * we get ADI_IRQ_SRC_PWM_CHANGED irq where we will decide if we need to set
319 * the tach parameters or not on the next tach measurement cycle (corresponding
320 * already to the ney duty cycle) based on the %ctl->hw_pwm_req flag.
321 */
322static irqreturn_t axi_fan_control_irq_handler(int irq, void *data)
323{
324	struct axi_fan_control_data *ctl = (struct axi_fan_control_data *)data;
325	u32 irq_pending = axi_ioread(ADI_REG_IRQ_PENDING, ctl);
326	u32 clear_mask;
327
328	if (irq_pending & ADI_IRQ_SRC_TEMP_INCREASE)
329		/* hardware requested a new pwm */
330		ctl->hw_pwm_req = true;
331
332	if (irq_pending & ADI_IRQ_SRC_PWM_CHANGED) {
333		/*
334		 * if the pwm changes on behalf of software,
335		 * we need to provide new tacho parameters to the core.
336		 * Wait for the next measurement for that...
337		 */
338		if (!ctl->hw_pwm_req) {
339			ctl->update_tacho_params = true;
340		} else {
341			ctl->hw_pwm_req = false;
342			hwmon_notify_event(ctl->hdev, hwmon_pwm,
343					   hwmon_pwm_input, 0);
344		}
345	}
346
347	if (irq_pending & ADI_IRQ_SRC_NEW_MEASUR) {
348		if (ctl->update_tacho_params) {
349			u32 new_tach = axi_ioread(ADI_REG_TACH_MEASUR, ctl);
350			/* get 25% tolerance */
351			u32 tach_tol = DIV_ROUND_CLOSEST(new_tach * 25, 100);
352
353			/* set new tacho parameters */
354			axi_iowrite(new_tach, ADI_REG_TACH_PERIOD, ctl);
355			axi_iowrite(tach_tol, ADI_REG_TACH_TOLERANCE, ctl);
356			ctl->update_tacho_params = false;
357		}
358	}
359
360	if (irq_pending & ADI_IRQ_SRC_TACH_ERR)
361		ctl->fan_fault = 1;
362
363	/* clear all interrupts */
364	clear_mask = irq_pending & ADI_IRQ_SRC_MASK;
365	axi_iowrite(clear_mask, ADI_REG_IRQ_PENDING, ctl);
366
367	return IRQ_HANDLED;
368}
369
370static int axi_fan_control_init(struct axi_fan_control_data *ctl,
371				const struct device_node *np)
372{
373	int ret;
374
375	/* get fan pulses per revolution */
376	ret = of_property_read_u32(np, "pulses-per-revolution", &ctl->ppr);
377	if (ret)
378		return ret;
379
380	/* 1, 2 and 4 are the typical and accepted values */
381	if (ctl->ppr != 1 && ctl->ppr != 2 && ctl->ppr != 4)
382		return -EINVAL;
383	/*
384	 * Enable all IRQs
385	 */
386	axi_iowrite(ADI_IRQ_MASK_OUT_ALL &
387		    ~(ADI_IRQ_SRC_NEW_MEASUR | ADI_IRQ_SRC_TACH_ERR |
388		      ADI_IRQ_SRC_PWM_CHANGED | ADI_IRQ_SRC_TEMP_INCREASE),
389		    ADI_REG_IRQ_MASK, ctl);
390
391	/* bring the device out of reset */
392	axi_iowrite(0x01, ADI_REG_RSTN, ctl);
393
394	return ret;
395}
396
397static const struct hwmon_channel_info * const axi_fan_control_info[] = {
398	HWMON_CHANNEL_INFO(pwm, HWMON_PWM_INPUT),
399	HWMON_CHANNEL_INFO(fan, HWMON_F_INPUT | HWMON_F_FAULT | HWMON_F_LABEL),
400	HWMON_CHANNEL_INFO(temp, HWMON_T_INPUT | HWMON_T_LABEL),
401	NULL
402};
403
404static const struct hwmon_ops axi_fan_control_hwmon_ops = {
405	.is_visible = axi_fan_control_is_visible,
406	.read = axi_fan_control_read,
407	.write = axi_fan_control_write,
408	.read_string = axi_fan_control_read_labels,
409};
410
411static const struct hwmon_chip_info axi_chip_info = {
412	.ops = &axi_fan_control_hwmon_ops,
413	.info = axi_fan_control_info,
414};
415
416/* temperature threshold below which PWM should be 0% */
417static SENSOR_DEVICE_ATTR_RW(pwm1_auto_point1_temp_hyst, axi_fan_control, ADI_REG_TEMP_00_H);
418/* temperature threshold above which PWM should be 25% */
419static SENSOR_DEVICE_ATTR_RW(pwm1_auto_point1_temp, axi_fan_control, ADI_REG_TEMP_25_L);
420/* temperature threshold below which PWM should be 25% */
421static SENSOR_DEVICE_ATTR_RW(pwm1_auto_point2_temp_hyst, axi_fan_control, ADI_REG_TEMP_25_H);
422/* temperature threshold above which PWM should be 50% */
423static SENSOR_DEVICE_ATTR_RW(pwm1_auto_point2_temp, axi_fan_control, ADI_REG_TEMP_50_L);
424/* temperature threshold below which PWM should be 50% */
425static SENSOR_DEVICE_ATTR_RW(pwm1_auto_point3_temp_hyst, axi_fan_control, ADI_REG_TEMP_50_H);
426/* temperature threshold above which PWM should be 75% */
427static SENSOR_DEVICE_ATTR_RW(pwm1_auto_point3_temp, axi_fan_control, ADI_REG_TEMP_75_L);
428/* temperature threshold below which PWM should be 75% */
429static SENSOR_DEVICE_ATTR_RW(pwm1_auto_point4_temp_hyst, axi_fan_control, ADI_REG_TEMP_75_H);
430/* temperature threshold above which PWM should be 100% */
431static SENSOR_DEVICE_ATTR_RW(pwm1_auto_point4_temp, axi_fan_control, ADI_REG_TEMP_100_L);
432
433static struct attribute *axi_fan_control_attrs[] = {
434	&sensor_dev_attr_pwm1_auto_point1_temp_hyst.dev_attr.attr,
435	&sensor_dev_attr_pwm1_auto_point1_temp.dev_attr.attr,
436	&sensor_dev_attr_pwm1_auto_point2_temp_hyst.dev_attr.attr,
437	&sensor_dev_attr_pwm1_auto_point2_temp.dev_attr.attr,
438	&sensor_dev_attr_pwm1_auto_point3_temp_hyst.dev_attr.attr,
439	&sensor_dev_attr_pwm1_auto_point3_temp.dev_attr.attr,
440	&sensor_dev_attr_pwm1_auto_point4_temp_hyst.dev_attr.attr,
441	&sensor_dev_attr_pwm1_auto_point4_temp.dev_attr.attr,
442	NULL,
443};
444ATTRIBUTE_GROUPS(axi_fan_control);
445
446static const u32 version_1_0_0 = ADI_AXI_PCORE_VER(1, 0, 'a');
447
448static const struct of_device_id axi_fan_control_of_match[] = {
449	{ .compatible = "adi,axi-fan-control-1.00.a",
450		.data = (void *)&version_1_0_0},
451	{},
452};
453MODULE_DEVICE_TABLE(of, axi_fan_control_of_match);
454
455static int axi_fan_control_probe(struct platform_device *pdev)
456{
457	struct axi_fan_control_data *ctl;
458	struct clk *clk;
459	const struct of_device_id *id;
460	const char *name = "axi_fan_control";
461	u32 version;
462	int ret;
463
464	id = of_match_node(axi_fan_control_of_match, pdev->dev.of_node);
465	if (!id)
466		return -EINVAL;
467
468	ctl = devm_kzalloc(&pdev->dev, sizeof(*ctl), GFP_KERNEL);
469	if (!ctl)
470		return -ENOMEM;
471
472	ctl->base = devm_platform_ioremap_resource(pdev, 0);
473	if (IS_ERR(ctl->base))
474		return PTR_ERR(ctl->base);
475
476	clk = devm_clk_get_enabled(&pdev->dev, NULL);
477	if (IS_ERR(clk)) {
478		dev_err(&pdev->dev, "clk_get failed with %ld\n", PTR_ERR(clk));
479		return PTR_ERR(clk);
480	}
481
482	ctl->clk_rate = clk_get_rate(clk);
483	if (!ctl->clk_rate)
484		return -EINVAL;
485
486	version = axi_ioread(ADI_AXI_REG_VERSION, ctl);
487	if (ADI_AXI_PCORE_VER_MAJOR(version) !=
488	    ADI_AXI_PCORE_VER_MAJOR((*(u32 *)id->data))) {
489		dev_err(&pdev->dev, "Major version mismatch. Expected %d.%.2d.%c, Reported %d.%.2d.%c\n",
490			ADI_AXI_PCORE_VER_MAJOR((*(u32 *)id->data)),
491			ADI_AXI_PCORE_VER_MINOR((*(u32 *)id->data)),
492			ADI_AXI_PCORE_VER_PATCH((*(u32 *)id->data)),
493			ADI_AXI_PCORE_VER_MAJOR(version),
494			ADI_AXI_PCORE_VER_MINOR(version),
495			ADI_AXI_PCORE_VER_PATCH(version));
496		return -ENODEV;
497	}
498
499	ret = axi_fan_control_init(ctl, pdev->dev.of_node);
500	if (ret) {
501		dev_err(&pdev->dev, "Failed to initialize device\n");
502		return ret;
503	}
504
505	ctl->hdev = devm_hwmon_device_register_with_info(&pdev->dev,
506							 name,
507							 ctl,
508							 &axi_chip_info,
509							 axi_fan_control_groups);
510
511	if (IS_ERR(ctl->hdev))
512		return PTR_ERR(ctl->hdev);
513
514	ctl->irq = platform_get_irq(pdev, 0);
515	if (ctl->irq < 0)
516		return ctl->irq;
517
518	ret = devm_request_threaded_irq(&pdev->dev, ctl->irq, NULL,
519					axi_fan_control_irq_handler,
520					IRQF_ONESHOT | IRQF_TRIGGER_HIGH,
521					pdev->driver_override, ctl);
522	if (ret) {
523		dev_err(&pdev->dev, "failed to request an irq, %d", ret);
524		return ret;
525	}
526
527	return 0;
528}
529
530static struct platform_driver axi_fan_control_driver = {
531	.driver = {
532		.name = "axi_fan_control_driver",
533		.of_match_table = axi_fan_control_of_match,
534	},
535	.probe = axi_fan_control_probe,
536};
537module_platform_driver(axi_fan_control_driver);
538
539MODULE_AUTHOR("Nuno Sa <nuno.sa@analog.com>");
540MODULE_DESCRIPTION("Analog Devices Fan Control HDL CORE driver");
541MODULE_LICENSE("GPL");