1/*
2 * jc42.c - driver for Jedec JC42.4 compliant temperature sensors
3 *
4 * Copyright (c) 2010  Ericsson AB.
5 *
6 * Derived from lm77.c by Andras BALI <drewie@freemail.hu>.
7 *
8 * JC42.4 compliant temperature sensors are typically used on memory modules.
9 *
10 * This program is free software; you can redistribute it and/or modify
11 * it under the terms of the GNU General Public License as published by
12 * the Free Software Foundation; either version 2 of the License, or
13 * (at your option) any later version.
14 *
15 * This program is distributed in the hope that it will be useful,
16 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
18 * GNU General Public License for more details.
19 *
20 * You should have received a copy of the GNU General Public License
21 * along with this program; if not, write to the Free Software
22 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
23 */
24
25#include <linux/module.h>
26#include <linux/init.h>
27#include <linux/slab.h>
28#include <linux/jiffies.h>
29#include <linux/i2c.h>
30#include <linux/hwmon.h>
31#include <linux/hwmon-sysfs.h>
32#include <linux/err.h>
33#include <linux/mutex.h>
34
35/* Addresses to scan */
36static const unsigned short normal_i2c[] = {
37	0x18, 0x19, 0x1a, 0x1b, 0x1c, 0x1d, 0x1e, 0x1f, I2C_CLIENT_END };
38
39/* JC42 registers. All registers are 16 bit. */
40#define JC42_REG_CAP		0x00
41#define JC42_REG_CONFIG		0x01
42#define JC42_REG_TEMP_UPPER	0x02
43#define JC42_REG_TEMP_LOWER	0x03
44#define JC42_REG_TEMP_CRITICAL	0x04
45#define JC42_REG_TEMP		0x05
46#define JC42_REG_MANID		0x06
47#define JC42_REG_DEVICEID	0x07
48
49/* Status bits in temperature register */
50#define JC42_ALARM_CRIT_BIT	15
51#define JC42_ALARM_MAX_BIT	14
52#define JC42_ALARM_MIN_BIT	13
53
54/* Configuration register defines */
55#define JC42_CFG_CRIT_ONLY	(1 << 2)
56#define JC42_CFG_TCRIT_LOCK	(1 << 6)
57#define JC42_CFG_EVENT_LOCK	(1 << 7)
58#define JC42_CFG_SHUTDOWN	(1 << 8)
59#define JC42_CFG_HYST_SHIFT	9
60#define JC42_CFG_HYST_MASK	0x03
61
62/* Capabilities */
63#define JC42_CAP_RANGE		(1 << 2)
64
65/* Manufacturer IDs */
66#define ADT_MANID		0x11d4  /* Analog Devices */
67#define MAX_MANID		0x004d  /* Maxim */
68#define IDT_MANID		0x00b3  /* IDT */
69#define MCP_MANID		0x0054  /* Microchip */
70#define NXP_MANID		0x1131  /* NXP Semiconductors */
71#define ONS_MANID		0x1b09  /* ON Semiconductor */
72#define STM_MANID		0x104a  /* ST Microelectronics */
73
74/* Supported chips */
75
76/* Analog Devices */
77#define ADT7408_DEVID		0x0801
78#define ADT7408_DEVID_MASK	0xffff
79
80/* IDT */
81#define TS3000B3_DEVID		0x2903  /* Also matches TSE2002B3 */
82#define TS3000B3_DEVID_MASK	0xffff
83
84/* Maxim */
85#define MAX6604_DEVID		0x3e00
86#define MAX6604_DEVID_MASK	0xffff
87
88/* Microchip */
89#define MCP98242_DEVID		0x2000
90#define MCP98242_DEVID_MASK	0xfffc
91
92#define MCP98243_DEVID		0x2100
93#define MCP98243_DEVID_MASK	0xfffc
94
95#define MCP9843_DEVID		0x0000	/* Also matches mcp9805 */
96#define MCP9843_DEVID_MASK	0xfffe
97
98/* NXP */
99#define SE97_DEVID		0xa200
100#define SE97_DEVID_MASK		0xfffc
101
102#define SE98_DEVID		0xa100
103#define SE98_DEVID_MASK		0xfffc
104
105/* ON Semiconductor */
106#define CAT6095_DEVID		0x0800	/* Also matches CAT34TS02 */
107#define CAT6095_DEVID_MASK	0xffe0
108
109/* ST Microelectronics */
110#define STTS424_DEVID		0x0101
111#define STTS424_DEVID_MASK	0xffff
112
113#define STTS424E_DEVID		0x0000
114#define STTS424E_DEVID_MASK	0xfffe
115
116static u16 jc42_hysteresis[] = { 0, 1500, 3000, 6000 };
117
118struct jc42_chips {
119	u16 manid;
120	u16 devid;
121	u16 devid_mask;
122};
123
124static struct jc42_chips jc42_chips[] = {
125	{ ADT_MANID, ADT7408_DEVID, ADT7408_DEVID_MASK },
126	{ IDT_MANID, TS3000B3_DEVID, TS3000B3_DEVID_MASK },
127	{ MAX_MANID, MAX6604_DEVID, MAX6604_DEVID_MASK },
128	{ MCP_MANID, MCP98242_DEVID, MCP98242_DEVID_MASK },
129	{ MCP_MANID, MCP98243_DEVID, MCP98243_DEVID_MASK },
130	{ MCP_MANID, MCP9843_DEVID, MCP9843_DEVID_MASK },
131	{ NXP_MANID, SE97_DEVID, SE97_DEVID_MASK },
132	{ ONS_MANID, CAT6095_DEVID, CAT6095_DEVID_MASK },
133	{ NXP_MANID, SE98_DEVID, SE98_DEVID_MASK },
134	{ STM_MANID, STTS424_DEVID, STTS424_DEVID_MASK },
135	{ STM_MANID, STTS424E_DEVID, STTS424E_DEVID_MASK },
136};
137
138/* Each client has this additional data */
139struct jc42_data {
140	struct device	*hwmon_dev;
141	struct mutex	update_lock;	/* protect register access */
142	bool		extended;	/* true if extended range supported */
143	bool		valid;
144	unsigned long	last_updated;	/* In jiffies */
145	u16		orig_config;	/* original configuration */
146	u16		config;		/* current configuration */
147	u16		temp_input;	/* Temperatures */
148	u16		temp_crit;
149	u16		temp_min;
150	u16		temp_max;
151};
152
153static int jc42_probe(struct i2c_client *client,
154		      const struct i2c_device_id *id);
155static int jc42_detect(struct i2c_client *client, struct i2c_board_info *info);
156static int jc42_remove(struct i2c_client *client);
157
158static struct jc42_data *jc42_update_device(struct device *dev);
159
160static const struct i2c_device_id jc42_id[] = {
161	{ "adt7408", 0 },
162	{ "cat94ts02", 0 },
163	{ "cat6095", 0 },
164	{ "jc42", 0 },
165	{ "max6604", 0 },
166	{ "mcp9805", 0 },
167	{ "mcp98242", 0 },
168	{ "mcp98243", 0 },
169	{ "mcp9843", 0 },
170	{ "se97", 0 },
171	{ "se97b", 0 },
172	{ "se98", 0 },
173	{ "stts424", 0 },
174	{ "tse2002b3", 0 },
175	{ "ts3000b3", 0 },
176	{ }
177};
178MODULE_DEVICE_TABLE(i2c, jc42_id);
179
180#ifdef CONFIG_PM
181
182static int jc42_suspend(struct device *dev)
183{
184	struct i2c_client *client = to_i2c_client(dev);
185	struct jc42_data *data = i2c_get_clientdata(client);
186
187	data->config |= JC42_CFG_SHUTDOWN;
188	i2c_smbus_write_word_swapped(client, JC42_REG_CONFIG, data->config);
189	return 0;
190}
191
192static int jc42_resume(struct device *dev)
193{
194	struct i2c_client *client = to_i2c_client(dev);
195	struct jc42_data *data = i2c_get_clientdata(client);
196
197	data->config &= ~JC42_CFG_SHUTDOWN;
198	i2c_smbus_write_word_swapped(client, JC42_REG_CONFIG, data->config);
199	return 0;
200}
201
202static const struct dev_pm_ops jc42_dev_pm_ops = {
203	.suspend = jc42_suspend,
204	.resume = jc42_resume,
205};
206
207#define JC42_DEV_PM_OPS (&jc42_dev_pm_ops)
208#else
209#define JC42_DEV_PM_OPS NULL
210#endif /* CONFIG_PM */
211
212/* This is the driver that will be inserted */
213static struct i2c_driver jc42_driver = {
214	.class		= I2C_CLASS_SPD,
215	.driver = {
216		.name	= "jc42",
217		.pm = JC42_DEV_PM_OPS,
218	},
219	.probe		= jc42_probe,
220	.remove		= jc42_remove,
221	.id_table	= jc42_id,
222	.detect		= jc42_detect,
223	.address_list	= normal_i2c,
224};
225
226#define JC42_TEMP_MIN_EXTENDED	(-40000)
227#define JC42_TEMP_MIN		0
228#define JC42_TEMP_MAX		125000
229
230static u16 jc42_temp_to_reg(int temp, bool extended)
231{
232	int ntemp = SENSORS_LIMIT(temp,
233				  extended ? JC42_TEMP_MIN_EXTENDED :
234				  JC42_TEMP_MIN, JC42_TEMP_MAX);
235
236	/* convert from 0.001 to 0.0625 resolution */
237	return (ntemp * 2 / 125) & 0x1fff;
238}
239
240static int jc42_temp_from_reg(s16 reg)
241{
242	reg &= 0x1fff;
243
244	/* sign extend register */
245	if (reg & 0x1000)
246		reg |= 0xf000;
247
248	/* convert from 0.0625 to 0.001 resolution */
249	return reg * 125 / 2;
250}
251
252/* sysfs stuff */
253
254/* read routines for temperature limits */
255#define show(value)	\
256static ssize_t show_##value(struct device *dev,				\
257			    struct device_attribute *attr,		\
258			    char *buf)					\
259{									\
260	struct jc42_data *data = jc42_update_device(dev);		\
261	if (IS_ERR(data))						\
262		return PTR_ERR(data);					\
263	return sprintf(buf, "%d\n", jc42_temp_from_reg(data->value));	\
264}
265
266show(temp_input);
267show(temp_crit);
268show(temp_min);
269show(temp_max);
270
271/* read routines for hysteresis values */
272static ssize_t show_temp_crit_hyst(struct device *dev,
273				   struct device_attribute *attr, char *buf)
274{
275	struct jc42_data *data = jc42_update_device(dev);
276	int temp, hyst;
277
278	if (IS_ERR(data))
279		return PTR_ERR(data);
280
281	temp = jc42_temp_from_reg(data->temp_crit);
282	hyst = jc42_hysteresis[(data->config >> JC42_CFG_HYST_SHIFT)
283			       & JC42_CFG_HYST_MASK];
284	return sprintf(buf, "%d\n", temp - hyst);
285}
286
287static ssize_t show_temp_max_hyst(struct device *dev,
288				  struct device_attribute *attr, char *buf)
289{
290	struct jc42_data *data = jc42_update_device(dev);
291	int temp, hyst;
292
293	if (IS_ERR(data))
294		return PTR_ERR(data);
295
296	temp = jc42_temp_from_reg(data->temp_max);
297	hyst = jc42_hysteresis[(data->config >> JC42_CFG_HYST_SHIFT)
298			       & JC42_CFG_HYST_MASK];
299	return sprintf(buf, "%d\n", temp - hyst);
300}
301
302/* write routines */
303#define set(value, reg)	\
304static ssize_t set_##value(struct device *dev,				\
305			   struct device_attribute *attr,		\
306			   const char *buf, size_t count)		\
307{									\
308	struct i2c_client *client = to_i2c_client(dev);			\
309	struct jc42_data *data = i2c_get_clientdata(client);		\
310	int err, ret = count;						\
311	long val;							\
312	if (kstrtol(buf, 10, &val) < 0)				\
313		return -EINVAL;						\
314	mutex_lock(&data->update_lock);					\
315	data->value = jc42_temp_to_reg(val, data->extended);		\
316	err = i2c_smbus_write_word_swapped(client, reg, data->value);	\
317	if (err < 0)							\
318		ret = err;						\
319	mutex_unlock(&data->update_lock);				\
320	return ret;							\
321}
322
323set(temp_min, JC42_REG_TEMP_LOWER);
324set(temp_max, JC42_REG_TEMP_UPPER);
325set(temp_crit, JC42_REG_TEMP_CRITICAL);
326
327/* JC42.4 compliant chips only support four hysteresis values.
328 * Pick best choice and go from there. */
329static ssize_t set_temp_crit_hyst(struct device *dev,
330				  struct device_attribute *attr,
331				  const char *buf, size_t count)
332{
333	struct i2c_client *client = to_i2c_client(dev);
334	struct jc42_data *data = i2c_get_clientdata(client);
335	unsigned long val;
336	int diff, hyst;
337	int err;
338	int ret = count;
339
340	if (kstrtoul(buf, 10, &val) < 0)
341		return -EINVAL;
342
343	diff = jc42_temp_from_reg(data->temp_crit) - val;
344	hyst = 0;
345	if (diff > 0) {
346		if (diff < 2250)
347			hyst = 1;	/* 1.5 degrees C */
348		else if (diff < 4500)
349			hyst = 2;	/* 3.0 degrees C */
350		else
351			hyst = 3;	/* 6.0 degrees C */
352	}
353
354	mutex_lock(&data->update_lock);
355	data->config = (data->config
356			& ~(JC42_CFG_HYST_MASK << JC42_CFG_HYST_SHIFT))
357	  | (hyst << JC42_CFG_HYST_SHIFT);
358	err = i2c_smbus_write_word_swapped(client, JC42_REG_CONFIG,
359					   data->config);
360	if (err < 0)
361		ret = err;
362	mutex_unlock(&data->update_lock);
363	return ret;
364}
365
366static ssize_t show_alarm(struct device *dev,
367			  struct device_attribute *attr, char *buf)
368{
369	u16 bit = to_sensor_dev_attr(attr)->index;
370	struct jc42_data *data = jc42_update_device(dev);
371	u16 val;
372
373	if (IS_ERR(data))
374		return PTR_ERR(data);
375
376	val = data->temp_input;
377	if (bit != JC42_ALARM_CRIT_BIT && (data->config & JC42_CFG_CRIT_ONLY))
378		val = 0;
379	return sprintf(buf, "%u\n", (val >> bit) & 1);
380}
381
382static DEVICE_ATTR(temp1_input, S_IRUGO,
383		   show_temp_input, NULL);
384static DEVICE_ATTR(temp1_crit, S_IRUGO,
385		   show_temp_crit, set_temp_crit);
386static DEVICE_ATTR(temp1_min, S_IRUGO,
387		   show_temp_min, set_temp_min);
388static DEVICE_ATTR(temp1_max, S_IRUGO,
389		   show_temp_max, set_temp_max);
390
391static DEVICE_ATTR(temp1_crit_hyst, S_IRUGO,
392		   show_temp_crit_hyst, set_temp_crit_hyst);
393static DEVICE_ATTR(temp1_max_hyst, S_IRUGO,
394		   show_temp_max_hyst, NULL);
395
396static SENSOR_DEVICE_ATTR(temp1_crit_alarm, S_IRUGO, show_alarm, NULL,
397			  JC42_ALARM_CRIT_BIT);
398static SENSOR_DEVICE_ATTR(temp1_min_alarm, S_IRUGO, show_alarm, NULL,
399			  JC42_ALARM_MIN_BIT);
400static SENSOR_DEVICE_ATTR(temp1_max_alarm, S_IRUGO, show_alarm, NULL,
401			  JC42_ALARM_MAX_BIT);
402
403static struct attribute *jc42_attributes[] = {
404	&dev_attr_temp1_input.attr,
405	&dev_attr_temp1_crit.attr,
406	&dev_attr_temp1_min.attr,
407	&dev_attr_temp1_max.attr,
408	&dev_attr_temp1_crit_hyst.attr,
409	&dev_attr_temp1_max_hyst.attr,
410	&sensor_dev_attr_temp1_crit_alarm.dev_attr.attr,
411	&sensor_dev_attr_temp1_min_alarm.dev_attr.attr,
412	&sensor_dev_attr_temp1_max_alarm.dev_attr.attr,
413	NULL
414};
415
416static umode_t jc42_attribute_mode(struct kobject *kobj,
417				  struct attribute *attr, int index)
418{
419	struct device *dev = container_of(kobj, struct device, kobj);
420	struct i2c_client *client = to_i2c_client(dev);
421	struct jc42_data *data = i2c_get_clientdata(client);
422	unsigned int config = data->config;
423	bool readonly;
424
425	if (attr == &dev_attr_temp1_crit.attr)
426		readonly = config & JC42_CFG_TCRIT_LOCK;
427	else if (attr == &dev_attr_temp1_min.attr ||
428		 attr == &dev_attr_temp1_max.attr)
429		readonly = config & JC42_CFG_EVENT_LOCK;
430	else if (attr == &dev_attr_temp1_crit_hyst.attr)
431		readonly = config & (JC42_CFG_EVENT_LOCK | JC42_CFG_TCRIT_LOCK);
432	else
433		readonly = true;
434
435	return S_IRUGO | (readonly ? 0 : S_IWUSR);
436}
437
438static const struct attribute_group jc42_group = {
439	.attrs = jc42_attributes,
440	.is_visible = jc42_attribute_mode,
441};
442
443/* Return 0 if detection is successful, -ENODEV otherwise */
444static int jc42_detect(struct i2c_client *new_client,
445		       struct i2c_board_info *info)
446{
447	struct i2c_adapter *adapter = new_client->adapter;
448	int i, config, cap, manid, devid;
449
450	if (!i2c_check_functionality(adapter, I2C_FUNC_SMBUS_BYTE_DATA |
451				     I2C_FUNC_SMBUS_WORD_DATA))
452		return -ENODEV;
453
454	cap = i2c_smbus_read_word_swapped(new_client, JC42_REG_CAP);
455	config = i2c_smbus_read_word_swapped(new_client, JC42_REG_CONFIG);
456	manid = i2c_smbus_read_word_swapped(new_client, JC42_REG_MANID);
457	devid = i2c_smbus_read_word_swapped(new_client, JC42_REG_DEVICEID);
458
459	if (cap < 0 || config < 0 || manid < 0 || devid < 0)
460		return -ENODEV;
461
462	if ((cap & 0xff00) || (config & 0xf800))
463		return -ENODEV;
464
465	for (i = 0; i < ARRAY_SIZE(jc42_chips); i++) {
466		struct jc42_chips *chip = &jc42_chips[i];
467		if (manid == chip->manid &&
468		    (devid & chip->devid_mask) == chip->devid) {
469			strlcpy(info->type, "jc42", I2C_NAME_SIZE);
470			return 0;
471		}
472	}
473	return -ENODEV;
474}
475
476static int jc42_probe(struct i2c_client *new_client,
477		      const struct i2c_device_id *id)
478{
479	struct jc42_data *data;
480	int config, cap, err;
481
482	data = kzalloc(sizeof(struct jc42_data), GFP_KERNEL);
483	if (!data) {
484		err = -ENOMEM;
485		goto exit;
486	}
487
488	i2c_set_clientdata(new_client, data);
489	mutex_init(&data->update_lock);
490
491	cap = i2c_smbus_read_word_swapped(new_client, JC42_REG_CAP);
492	if (cap < 0) {
493		err = -EINVAL;
494		goto exit_free;
495	}
496	data->extended = !!(cap & JC42_CAP_RANGE);
497
498	config = i2c_smbus_read_word_swapped(new_client, JC42_REG_CONFIG);
499	if (config < 0) {
500		err = -EINVAL;
501		goto exit_free;
502	}
503	data->orig_config = config;
504	if (config & JC42_CFG_SHUTDOWN) {
505		config &= ~JC42_CFG_SHUTDOWN;
506		i2c_smbus_write_word_swapped(new_client, JC42_REG_CONFIG,
507					     config);
508	}
509	data->config = config;
510
511	/* Register sysfs hooks */
512	err = sysfs_create_group(&new_client->dev.kobj, &jc42_group);
513	if (err)
514		goto exit_free;
515
516	data->hwmon_dev = hwmon_device_register(&new_client->dev);
517	if (IS_ERR(data->hwmon_dev)) {
518		err = PTR_ERR(data->hwmon_dev);
519		goto exit_remove;
520	}
521
522	return 0;
523
524exit_remove:
525	sysfs_remove_group(&new_client->dev.kobj, &jc42_group);
526exit_free:
527	kfree(data);
528exit:
529	return err;
530}
531
532static int jc42_remove(struct i2c_client *client)
533{
534	struct jc42_data *data = i2c_get_clientdata(client);
535	hwmon_device_unregister(data->hwmon_dev);
536	sysfs_remove_group(&client->dev.kobj, &jc42_group);
537	if (data->config != data->orig_config)
538		i2c_smbus_write_word_swapped(client, JC42_REG_CONFIG,
539					     data->orig_config);
540	kfree(data);
541	return 0;
542}
543
544static struct jc42_data *jc42_update_device(struct device *dev)
545{
546	struct i2c_client *client = to_i2c_client(dev);
547	struct jc42_data *data = i2c_get_clientdata(client);
548	struct jc42_data *ret = data;
549	int val;
550
551	mutex_lock(&data->update_lock);
552
553	if (time_after(jiffies, data->last_updated + HZ) || !data->valid) {
554		val = i2c_smbus_read_word_swapped(client, JC42_REG_TEMP);
555		if (val < 0) {
556			ret = ERR_PTR(val);
557			goto abort;
558		}
559		data->temp_input = val;
560
561		val = i2c_smbus_read_word_swapped(client,
562						  JC42_REG_TEMP_CRITICAL);
563		if (val < 0) {
564			ret = ERR_PTR(val);
565			goto abort;
566		}
567		data->temp_crit = val;
568
569		val = i2c_smbus_read_word_swapped(client, JC42_REG_TEMP_LOWER);
570		if (val < 0) {
571			ret = ERR_PTR(val);
572			goto abort;
573		}
574		data->temp_min = val;
575
576		val = i2c_smbus_read_word_swapped(client, JC42_REG_TEMP_UPPER);
577		if (val < 0) {
578			ret = ERR_PTR(val);
579			goto abort;
580		}
581		data->temp_max = val;
582
583		data->last_updated = jiffies;
584		data->valid = true;
585	}
586abort:
587	mutex_unlock(&data->update_lock);
588	return ret;
589}
590
591static int __init sensors_jc42_init(void)
592{
593	return i2c_add_driver(&jc42_driver);
594}
595
596static void __exit sensors_jc42_exit(void)
597{
598	i2c_del_driver(&jc42_driver);
599}
600
601MODULE_AUTHOR("Guenter Roeck <guenter.roeck@ericsson.com>");
602MODULE_DESCRIPTION("JC42 driver");
603MODULE_LICENSE("GPL");
604
605module_init(sensors_jc42_init);
606module_exit(sensors_jc42_exit);
607