via686a.c 29.1 KB
Newer Older
Linus Torvalds's avatar
Linus Torvalds committed
1 2
/*
    via686a.c - Part of lm_sensors, Linux kernel modules
3
		for hardware monitoring
4

Linus Torvalds's avatar
Linus Torvalds committed
5
    Copyright (c) 1998 - 2002  Frodo Looijaard <frodol@dds.nl>,
6
			Kyösti Mälkki <kmalkki@cc.hut.fi>,
Linus Torvalds's avatar
Linus Torvalds committed
7 8
			Mark Studebaker <mdsxyz123@yahoo.com>,
			and Bob Dougherty <bobd@stanford.edu>
9
    (Some conversion-factor data were contributed by Jonathan Teh Soon Yew
Linus Torvalds's avatar
Linus Torvalds committed
10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36
    <j.teh@iname.com> and Alex van Kaam <darkside@chello.nl>.)

    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation; either version 2 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
*/

/*
    Supports the Via VT82C686A, VT82C686B south bridges.
    Reports all as a 686A.
    Warning - only supports a single device.
*/

#include <linux/module.h>
#include <linux/slab.h>
#include <linux/pci.h>
#include <linux/jiffies.h>
37
#include <linux/platform_device.h>
38
#include <linux/hwmon.h>
39
#include <linux/hwmon-sysfs.h>
40
#include <linux/err.h>
Linus Torvalds's avatar
Linus Torvalds committed
41
#include <linux/init.h>
42
#include <linux/mutex.h>
43
#include <linux/sysfs.h>
Linus Torvalds's avatar
Linus Torvalds committed
44 45 46 47 48
#include <asm/io.h>


/* If force_addr is set to anything different from 0, we forcibly enable
   the device at the given address. */
49
static unsigned short force_addr;
Linus Torvalds's avatar
Linus Torvalds committed
50 51 52 53
module_param(force_addr, ushort, 0);
MODULE_PARM_DESC(force_addr,
		 "Initialize the base address of the sensors");

54
static struct platform_device *pdev;
Linus Torvalds's avatar
Linus Torvalds committed
55 56 57 58 59 60 61 62 63

/*
   The Via 686a southbridge has a LM78-like chip integrated on the same IC.
   This driver is a customized copy of lm78.c
*/

/* Many VIA686A constants specified below */

/* Length of ISA address segment */
64 65 66
#define VIA686A_EXTENT		0x80
#define VIA686A_BASE_REG	0x70
#define VIA686A_ENABLE_REG	0x74
Linus Torvalds's avatar
Linus Torvalds committed
67 68 69

/* The VIA686A registers */
/* ins numbered 0-4 */
70 71 72
#define VIA686A_REG_IN_MAX(nr)	(0x2b + ((nr) * 2))
#define VIA686A_REG_IN_MIN(nr)	(0x2c + ((nr) * 2))
#define VIA686A_REG_IN(nr)	(0x22 + (nr))
Linus Torvalds's avatar
Linus Torvalds committed
73 74

/* fans numbered 1-2 */
75 76
#define VIA686A_REG_FAN_MIN(nr)	(0x3a + (nr))
#define VIA686A_REG_FAN(nr)	(0x28 + (nr))
Linus Torvalds's avatar
Linus Torvalds committed
77 78

/* temps numbered 1-3 */
79 80 81
static const u8 VIA686A_REG_TEMP[]	= { 0x20, 0x21, 0x1f };
static const u8 VIA686A_REG_TEMP_OVER[]	= { 0x39, 0x3d, 0x1d };
static const u8 VIA686A_REG_TEMP_HYST[]	= { 0x3a, 0x3e, 0x1e };
82 83 84 85 86 87 88 89 90 91
/* bits 7-6 */
#define VIA686A_REG_TEMP_LOW1	0x4b
/* 2 = bits 5-4, 3 = bits 7-6 */
#define VIA686A_REG_TEMP_LOW23	0x49

#define VIA686A_REG_ALARM1	0x41
#define VIA686A_REG_ALARM2	0x42
#define VIA686A_REG_FANDIV	0x47
#define VIA686A_REG_CONFIG	0x40
/* The following register sets temp interrupt mode (bits 1-0 for temp1,
Linus Torvalds's avatar
Linus Torvalds committed
92 93 94 95 96
 3-2 for temp2, 5-4 for temp3).  Modes are:
    00 interrupt stays as long as value is out-of-range
    01 interrupt is cleared once register is read (default)
    10 comparator mode- like 00, but ignores hysteresis
    11 same as 00 */
97
#define VIA686A_REG_TEMP_MODE		0x4b
Linus Torvalds's avatar
Linus Torvalds committed
98
/* We'll just assume that you want to set all 3 simultaneously: */
99 100
#define VIA686A_TEMP_MODE_MASK		0x3F
#define VIA686A_TEMP_MODE_CONTINUOUS	0x00
Linus Torvalds's avatar
Linus Torvalds committed
101 102

/* Conversions. Limit checking is only done on the TO_REG
103
   variants.
Linus Torvalds's avatar
Linus Torvalds committed
104 105 106 107 108 109 110 111 112 113 114 115

********* VOLTAGE CONVERSIONS (Bob Dougherty) ********
 From HWMon.cpp (Copyright 1998-2000 Jonathan Teh Soon Yew):
 voltagefactor[0]=1.25/2628; (2628/1.25=2102.4)   // Vccp
 voltagefactor[1]=1.25/2628; (2628/1.25=2102.4)   // +2.5V
 voltagefactor[2]=1.67/2628; (2628/1.67=1573.7)   // +3.3V
 voltagefactor[3]=2.6/2628;  (2628/2.60=1010.8)   // +5V
 voltagefactor[4]=6.3/2628;  (2628/6.30=417.14)   // +12V
 in[i]=(data[i+2]*25.0+133)*voltagefactor[i];
 That is:
 volts = (25*regVal+133)*factor
 regVal = (volts/factor-133)/25
116
 (These conversions were contributed by Jonathan Teh Soon Yew
Linus Torvalds's avatar
Linus Torvalds committed
117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170
 <j.teh@iname.com>) */
static inline u8 IN_TO_REG(long val, int inNum)
{
	/* To avoid floating point, we multiply constants by 10 (100 for +12V).
	   Rounding is done (120500 is actually 133000 - 12500).
	   Remember that val is expressed in 0.001V/bit, which is why we divide
	   by an additional 10000 (100000 for +12V): 1000 for val and 10 (100)
	   for the constants. */
	if (inNum <= 1)
		return (u8)
		    SENSORS_LIMIT((val * 21024 - 1205000) / 250000, 0, 255);
	else if (inNum == 2)
		return (u8)
		    SENSORS_LIMIT((val * 15737 - 1205000) / 250000, 0, 255);
	else if (inNum == 3)
		return (u8)
		    SENSORS_LIMIT((val * 10108 - 1205000) / 250000, 0, 255);
	else
		return (u8)
		    SENSORS_LIMIT((val * 41714 - 12050000) / 2500000, 0, 255);
}

static inline long IN_FROM_REG(u8 val, int inNum)
{
	/* To avoid floating point, we multiply constants by 10 (100 for +12V).
	   We also multiply them by 1000 because we want 0.001V/bit for the
	   output value. Rounding is done. */
	if (inNum <= 1)
		return (long) ((250000 * val + 1330000 + 21024 / 2) / 21024);
	else if (inNum == 2)
		return (long) ((250000 * val + 1330000 + 15737 / 2) / 15737);
	else if (inNum == 3)
		return (long) ((250000 * val + 1330000 + 10108 / 2) / 10108);
	else
		return (long) ((2500000 * val + 13300000 + 41714 / 2) / 41714);
}

/********* FAN RPM CONVERSIONS ********/
/* Higher register values = slower fans (the fan's strobe gates a counter).
 But this chip saturates back at 0, not at 255 like all the other chips.
 So, 0 means 0 RPM */
static inline u8 FAN_TO_REG(long rpm, int div)
{
	if (rpm == 0)
		return 0;
	rpm = SENSORS_LIMIT(rpm, 1, 1000000);
	return SENSORS_LIMIT((1350000 + rpm * div / 2) / (rpm * div), 1, 255);
}

#define FAN_FROM_REG(val,div) ((val)==0?0:(val)==255?0:1350000/((val)*(div)))

/******** TEMP CONVERSIONS (Bob Dougherty) *********/
/* linear fits from HWMon.cpp (Copyright 1998-2000 Jonathan Teh Soon Yew)
      if(temp<169)
171
	      return double(temp)*0.427-32.08;
Linus Torvalds's avatar
Linus Torvalds committed
172
      else if(temp>=169 && temp<=202)
173
	      return double(temp)*0.582-58.16;
Linus Torvalds's avatar
Linus Torvalds committed
174
      else
175
	      return double(temp)*0.924-127.33;
Linus Torvalds's avatar
Linus Torvalds committed
176

177 178 179
 A fifth-order polynomial fits the unofficial data (provided by Alex van
 Kaam <darkside@chello.nl>) a bit better.  It also give more reasonable
 numbers on my machine (ie. they agree with what my BIOS tells me).
Linus Torvalds's avatar
Linus Torvalds committed
180
 Here's the fifth-order fit to the 8-bit data:
181
 temp = 1.625093e-10*val^5 - 1.001632e-07*val^4 + 2.457653e-05*val^3 -
182
	2.967619e-03*val^2 + 2.175144e-01*val - 7.090067e+0.
Linus Torvalds's avatar
Linus Torvalds committed
183

184
 (2000-10-25- RFD: thanks to Uwe Andersen <uandersen@mayah.com> for
Linus Torvalds's avatar
Linus Torvalds committed
185 186
 finding my typos in this formula!)

187 188 189 190 191 192 193
 Alas, none of the elegant function-fit solutions will work because we
 aren't allowed to use floating point in the kernel and doing it with
 integers doesn't provide enough precision.  So we'll do boring old
 look-up table stuff.  The unofficial data (see below) have effectively
 7-bit resolution (they are rounded to the nearest degree).  I'm assuming
 that the transfer function of the device is monotonic and smooth, so a
 smooth function fit to the data will allow us to get better precision.
Linus Torvalds's avatar
Linus Torvalds committed
194
 I used the 5th-order poly fit described above and solved for
195 196 197 198
 VIA register values 0-255.  I *10 before rounding, so we get tenth-degree
 precision.  (I could have done all 1024 values for our 10-bit readings,
 but the function is very linear in the useful range (0-80 deg C), so
 we'll just use linear interpolation for 10-bit readings.)  So, tempLUT
Linus Torvalds's avatar
Linus Torvalds committed
199
 is the temp at via register values 0-255: */
200
static const s16 tempLUT[] =
201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222
{ -709, -688, -667, -646, -627, -607, -589, -570, -553, -536, -519,
	-503, -487, -471, -456, -442, -428, -414, -400, -387, -375,
	-362, -350, -339, -327, -316, -305, -295, -285, -275, -265,
	-255, -246, -237, -229, -220, -212, -204, -196, -188, -180,
	-173, -166, -159, -152, -145, -139, -132, -126, -120, -114,
	-108, -102, -96, -91, -85, -80, -74, -69, -64, -59, -54, -49,
	-44, -39, -34, -29, -25, -20, -15, -11, -6, -2, 3, 7, 12, 16,
	20, 25, 29, 33, 37, 42, 46, 50, 54, 59, 63, 67, 71, 75, 79, 84,
	88, 92, 96, 100, 104, 109, 113, 117, 121, 125, 130, 134, 138,
	142, 146, 151, 155, 159, 163, 168, 172, 176, 181, 185, 189,
	193, 198, 202, 206, 211, 215, 219, 224, 228, 232, 237, 241,
	245, 250, 254, 259, 263, 267, 272, 276, 281, 285, 290, 294,
	299, 303, 307, 312, 316, 321, 325, 330, 334, 339, 344, 348,
	353, 357, 362, 366, 371, 376, 380, 385, 390, 395, 399, 404,
	409, 414, 419, 423, 428, 433, 438, 443, 449, 454, 459, 464,
	469, 475, 480, 486, 491, 497, 502, 508, 514, 520, 526, 532,
	538, 544, 551, 557, 564, 571, 578, 584, 592, 599, 606, 614,
	621, 629, 637, 645, 654, 662, 671, 680, 689, 698, 708, 718,
	728, 738, 749, 759, 770, 782, 793, 805, 818, 830, 843, 856,
	870, 883, 898, 912, 927, 943, 958, 975, 991, 1008, 1026, 1044,
	1062, 1081, 1101, 1121, 1141, 1162, 1184, 1206, 1229, 1252,
	1276, 1301, 1326, 1352, 1378, 1406, 1434, 1462
Linus Torvalds's avatar
Linus Torvalds committed
223 224
};

225
/* the original LUT values from Alex van Kaam <darkside@chello.nl>
Linus Torvalds's avatar
Linus Torvalds committed
226 227 228 229 230 231 232 233 234 235 236 237 238 239
   (for via register values 12-240):
{-50,-49,-47,-45,-43,-41,-39,-38,-37,-35,-34,-33,-32,-31,
-30,-29,-28,-27,-26,-25,-24,-24,-23,-22,-21,-20,-20,-19,-18,-17,-17,-16,-15,
-15,-14,-14,-13,-12,-12,-11,-11,-10,-9,-9,-8,-8,-7,-7,-6,-6,-5,-5,-4,-4,-3,
-3,-2,-2,-1,-1,0,0,1,1,1,3,3,3,4,4,4,5,5,5,6,6,7,7,8,8,9,9,9,10,10,11,11,12,
12,12,13,13,13,14,14,15,15,16,16,16,17,17,18,18,19,19,20,20,21,21,21,22,22,
22,23,23,24,24,25,25,26,26,26,27,27,27,28,28,29,29,30,30,30,31,31,32,32,33,
33,34,34,35,35,35,36,36,37,37,38,38,39,39,40,40,41,41,42,42,43,43,44,44,45,
45,46,46,47,48,48,49,49,50,51,51,52,52,53,53,54,55,55,56,57,57,58,59,59,60,
61,62,62,63,64,65,66,66,67,68,69,70,71,72,73,74,75,76,77,78,79,80,81,83,84,
85,86,88,89,91,92,94,96,97,99,101,103,105,107,109,110};


 Here's the reverse LUT.  I got it by doing a 6-th order poly fit (needed
240 241 242 243
 an extra term for a good fit to these inverse data!) and then
 solving for each temp value from -50 to 110 (the useable range for
 this chip).  Here's the fit:
 viaRegVal = -1.160370e-10*val^6 +3.193693e-08*val^5 - 1.464447e-06*val^4
Linus Torvalds's avatar
Linus Torvalds committed
244 245 246
 - 2.525453e-04*val^3 + 1.424593e-02*val^2 + 2.148941e+00*val +7.275808e+01)
 Note that n=161: */
static const u8 viaLUT[] =
247 248 249 250 251 252 253 254 255 256 257 258 259
{ 12, 12, 13, 14, 14, 15, 16, 16, 17, 18, 18, 19, 20, 20, 21, 22, 23,
	23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 35, 36, 37, 39, 40,
	41, 43, 45, 46, 48, 49, 51, 53, 55, 57, 59, 60, 62, 64, 66,
	69, 71, 73, 75, 77, 79, 82, 84, 86, 88, 91, 93, 95, 98, 100,
	103, 105, 107, 110, 112, 115, 117, 119, 122, 124, 126, 129,
	131, 134, 136, 138, 140, 143, 145, 147, 150, 152, 154, 156,
	158, 160, 162, 164, 166, 168, 170, 172, 174, 176, 178, 180,
	182, 183, 185, 187, 188, 190, 192, 193, 195, 196, 198, 199,
	200, 202, 203, 205, 206, 207, 208, 209, 210, 211, 212, 213,
	214, 215, 216, 217, 218, 219, 220, 221, 222, 222, 223, 224,
	225, 226, 226, 227, 228, 228, 229, 230, 230, 231, 232, 232,
	233, 233, 234, 235, 235, 236, 236, 237, 237, 238, 238, 239,
	239, 240
Linus Torvalds's avatar
Linus Torvalds committed
260 261 262 263 264 265 266
};

/* Converting temps to (8-bit) hyst and over registers
   No interpolation here.
   The +50 is because the temps start at -50 */
static inline u8 TEMP_TO_REG(long val)
{
267
	return viaLUT[val <= -50000 ? 0 : val >= 110000 ? 160 :
Linus Torvalds's avatar
Linus Torvalds committed
268 269 270 271
		      (val < 0 ? val - 500 : val + 500) / 1000 + 50];
}

/* for 8-bit temperature hyst and over registers */
272
#define TEMP_FROM_REG(val)	((long)tempLUT[val] * 100)
Linus Torvalds's avatar
Linus Torvalds committed
273 274 275 276 277 278 279 280 281 282 283 284 285

/* for 10-bit temperature readings */
static inline long TEMP_FROM_REG10(u16 val)
{
	u16 eightBits = val >> 2;
	u16 twoBits = val & 3;

	/* no interpolation for these */
	if (twoBits == 0 || eightBits == 255)
		return TEMP_FROM_REG(eightBits);

	/* do some linear interpolation */
	return (tempLUT[eightBits] * (4 - twoBits) +
286
		tempLUT[eightBits + 1] * twoBits) * 25;
Linus Torvalds's avatar
Linus Torvalds committed
287 288 289 290 291
}

#define DIV_FROM_REG(val) (1 << (val))
#define DIV_TO_REG(val) ((val)==8?3:(val)==4?2:(val)==1?0:1)

292 293
/* For each registered chip, we need to keep some data in memory.
   The structure is dynamically allocated. */
Linus Torvalds's avatar
Linus Torvalds committed
294
struct via686a_data {
295 296
	unsigned short addr;
	const char *name;
297
	struct class_device *class_dev;
298
	struct mutex update_lock;
Linus Torvalds's avatar
Linus Torvalds committed
299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315
	char valid;		/* !=0 if following fields are valid */
	unsigned long last_updated;	/* In jiffies */

	u8 in[5];		/* Register value */
	u8 in_max[5];		/* Register value */
	u8 in_min[5];		/* Register value */
	u8 fan[2];		/* Register value */
	u8 fan_min[2];		/* Register value */
	u16 temp[3];		/* Register value 10 bit */
	u8 temp_over[3];	/* Register value */
	u8 temp_hyst[3];	/* Register value */
	u8 fan_div[2];		/* Register encoding, shifted right */
	u16 alarms;		/* Register encoding, combined */
};

static struct pci_dev *s_bridge;	/* pointer to the (only) via686a */

316 317
static int via686a_probe(struct platform_device *pdev);
static int via686a_remove(struct platform_device *pdev);
Linus Torvalds's avatar
Linus Torvalds committed
318

319
static inline int via686a_read_value(struct via686a_data *data, u8 reg)
Linus Torvalds's avatar
Linus Torvalds committed
320
{
321
	return inb_p(data->addr + reg);
Linus Torvalds's avatar
Linus Torvalds committed
322 323
}

324
static inline void via686a_write_value(struct via686a_data *data, u8 reg,
Linus Torvalds's avatar
Linus Torvalds committed
325 326
				       u8 value)
{
327
	outb_p(value, data->addr + reg);
Linus Torvalds's avatar
Linus Torvalds committed
328 329 330
}

static struct via686a_data *via686a_update_device(struct device *dev);
331
static void via686a_init_device(struct via686a_data *data);
Linus Torvalds's avatar
Linus Torvalds committed
332 333 334 335

/* following are the sysfs callback functions */

/* 7 voltage sensors */
336 337
static ssize_t show_in(struct device *dev, struct device_attribute *da,
		char *buf) {
Linus Torvalds's avatar
Linus Torvalds committed
338
	struct via686a_data *data = via686a_update_device(dev);
339 340
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
	int nr = attr->index;
Linus Torvalds's avatar
Linus Torvalds committed
341 342 343
	return sprintf(buf, "%ld\n", IN_FROM_REG(data->in[nr], nr));
}

344 345
static ssize_t show_in_min(struct device *dev, struct device_attribute *da,
		char *buf) {
Linus Torvalds's avatar
Linus Torvalds committed
346
	struct via686a_data *data = via686a_update_device(dev);
347 348
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
	int nr = attr->index;
Linus Torvalds's avatar
Linus Torvalds committed
349 350 351
	return sprintf(buf, "%ld\n", IN_FROM_REG(data->in_min[nr], nr));
}

352 353
static ssize_t show_in_max(struct device *dev, struct device_attribute *da,
		char *buf) {
Linus Torvalds's avatar
Linus Torvalds committed
354
	struct via686a_data *data = via686a_update_device(dev);
355 356
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
	int nr = attr->index;
Linus Torvalds's avatar
Linus Torvalds committed
357 358 359
	return sprintf(buf, "%ld\n", IN_FROM_REG(data->in_max[nr], nr));
}

360 361
static ssize_t set_in_min(struct device *dev, struct device_attribute *da,
		const char *buf, size_t count) {
362
	struct via686a_data *data = dev_get_drvdata(dev);
363 364
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
	int nr = attr->index;
Linus Torvalds's avatar
Linus Torvalds committed
365 366
	unsigned long val = simple_strtoul(buf, NULL, 10);

367
	mutex_lock(&data->update_lock);
368
	data->in_min[nr] = IN_TO_REG(val, nr);
369
	via686a_write_value(data, VIA686A_REG_IN_MIN(nr),
Linus Torvalds's avatar
Linus Torvalds committed
370
			data->in_min[nr]);
371
	mutex_unlock(&data->update_lock);
Linus Torvalds's avatar
Linus Torvalds committed
372 373
	return count;
}
374 375
static ssize_t set_in_max(struct device *dev, struct device_attribute *da,
		const char *buf, size_t count) {
376
	struct via686a_data *data = dev_get_drvdata(dev);
377 378
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
	int nr = attr->index;
Linus Torvalds's avatar
Linus Torvalds committed
379 380
	unsigned long val = simple_strtoul(buf, NULL, 10);

381
	mutex_lock(&data->update_lock);
382
	data->in_max[nr] = IN_TO_REG(val, nr);
383
	via686a_write_value(data, VIA686A_REG_IN_MAX(nr),
Linus Torvalds's avatar
Linus Torvalds committed
384
			data->in_max[nr]);
385
	mutex_unlock(&data->update_lock);
Linus Torvalds's avatar
Linus Torvalds committed
386 387 388
	return count;
}
#define show_in_offset(offset)					\
389 390 391 392 393 394
static SENSOR_DEVICE_ATTR(in##offset##_input, S_IRUGO,		\
		show_in, NULL, offset);				\
static SENSOR_DEVICE_ATTR(in##offset##_min, S_IRUGO | S_IWUSR,	\
		show_in_min, set_in_min, offset);		\
static SENSOR_DEVICE_ATTR(in##offset##_max, S_IRUGO | S_IWUSR,	\
		show_in_max, set_in_max, offset);
Linus Torvalds's avatar
Linus Torvalds committed
395 396 397 398 399 400 401 402

show_in_offset(0);
show_in_offset(1);
show_in_offset(2);
show_in_offset(3);
show_in_offset(4);

/* 3 temperatures */
403 404
static ssize_t show_temp(struct device *dev, struct device_attribute *da,
		char *buf) {
Linus Torvalds's avatar
Linus Torvalds committed
405
	struct via686a_data *data = via686a_update_device(dev);
406 407
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
	int nr = attr->index;
Linus Torvalds's avatar
Linus Torvalds committed
408 409
	return sprintf(buf, "%ld\n", TEMP_FROM_REG10(data->temp[nr]));
}
410 411
static ssize_t show_temp_over(struct device *dev, struct device_attribute *da,
		char *buf) {
Linus Torvalds's avatar
Linus Torvalds committed
412
	struct via686a_data *data = via686a_update_device(dev);
413 414
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
	int nr = attr->index;
Linus Torvalds's avatar
Linus Torvalds committed
415 416
	return sprintf(buf, "%ld\n", TEMP_FROM_REG(data->temp_over[nr]));
}
417 418
static ssize_t show_temp_hyst(struct device *dev, struct device_attribute *da,
		char *buf) {
Linus Torvalds's avatar
Linus Torvalds committed
419
	struct via686a_data *data = via686a_update_device(dev);
420 421
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
	int nr = attr->index;
Linus Torvalds's avatar
Linus Torvalds committed
422 423
	return sprintf(buf, "%ld\n", TEMP_FROM_REG(data->temp_hyst[nr]));
}
424 425
static ssize_t set_temp_over(struct device *dev, struct device_attribute *da,
		const char *buf, size_t count) {
426
	struct via686a_data *data = dev_get_drvdata(dev);
427 428
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
	int nr = attr->index;
Linus Torvalds's avatar
Linus Torvalds committed
429 430
	int val = simple_strtol(buf, NULL, 10);

431
	mutex_lock(&data->update_lock);
Linus Torvalds's avatar
Linus Torvalds committed
432
	data->temp_over[nr] = TEMP_TO_REG(val);
433
	via686a_write_value(data, VIA686A_REG_TEMP_OVER[nr],
434
			    data->temp_over[nr]);
435
	mutex_unlock(&data->update_lock);
Linus Torvalds's avatar
Linus Torvalds committed
436 437
	return count;
}
438 439
static ssize_t set_temp_hyst(struct device *dev, struct device_attribute *da,
		const char *buf, size_t count) {
440
	struct via686a_data *data = dev_get_drvdata(dev);
441 442
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
	int nr = attr->index;
Linus Torvalds's avatar
Linus Torvalds committed
443 444
	int val = simple_strtol(buf, NULL, 10);

445
	mutex_lock(&data->update_lock);
Linus Torvalds's avatar
Linus Torvalds committed
446
	data->temp_hyst[nr] = TEMP_TO_REG(val);
447
	via686a_write_value(data, VIA686A_REG_TEMP_HYST[nr],
448
			    data->temp_hyst[nr]);
449
	mutex_unlock(&data->update_lock);
Linus Torvalds's avatar
Linus Torvalds committed
450 451 452
	return count;
}
#define show_temp_offset(offset)					\
453 454 455 456 457 458
static SENSOR_DEVICE_ATTR(temp##offset##_input, S_IRUGO,		\
		show_temp, NULL, offset - 1);				\
static SENSOR_DEVICE_ATTR(temp##offset##_max, S_IRUGO | S_IWUSR,	\
		show_temp_over, set_temp_over, offset - 1);		\
static SENSOR_DEVICE_ATTR(temp##offset##_max_hyst, S_IRUGO | S_IWUSR,	\
		show_temp_hyst, set_temp_hyst, offset - 1);
Linus Torvalds's avatar
Linus Torvalds committed
459 460 461 462 463 464

show_temp_offset(1);
show_temp_offset(2);
show_temp_offset(3);

/* 2 Fans */
465 466
static ssize_t show_fan(struct device *dev, struct device_attribute *da,
		char *buf) {
Linus Torvalds's avatar
Linus Torvalds committed
467
	struct via686a_data *data = via686a_update_device(dev);
468 469
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
	int nr = attr->index;
470
	return sprintf(buf, "%d\n", FAN_FROM_REG(data->fan[nr],
Linus Torvalds's avatar
Linus Torvalds committed
471 472
				DIV_FROM_REG(data->fan_div[nr])) );
}
473 474
static ssize_t show_fan_min(struct device *dev, struct device_attribute *da,
		char *buf) {
Linus Torvalds's avatar
Linus Torvalds committed
475
	struct via686a_data *data = via686a_update_device(dev);
476 477
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
	int nr = attr->index;
478
	return sprintf(buf, "%d\n",
Linus Torvalds's avatar
Linus Torvalds committed
479 480
		FAN_FROM_REG(data->fan_min[nr], DIV_FROM_REG(data->fan_div[nr])) );
}
481 482
static ssize_t show_fan_div(struct device *dev, struct device_attribute *da,
		char *buf) {
Linus Torvalds's avatar
Linus Torvalds committed
483
	struct via686a_data *data = via686a_update_device(dev);
484 485
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
	int nr = attr->index;
486
	return sprintf(buf, "%d\n", DIV_FROM_REG(data->fan_div[nr]) );
Linus Torvalds's avatar
Linus Torvalds committed
487
}
488 489
static ssize_t set_fan_min(struct device *dev, struct device_attribute *da,
		const char *buf, size_t count) {
490
	struct via686a_data *data = dev_get_drvdata(dev);
491 492
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
	int nr = attr->index;
Linus Torvalds's avatar
Linus Torvalds committed
493 494
	int val = simple_strtol(buf, NULL, 10);

495
	mutex_lock(&data->update_lock);
Linus Torvalds's avatar
Linus Torvalds committed
496
	data->fan_min[nr] = FAN_TO_REG(val, DIV_FROM_REG(data->fan_div[nr]));
497
	via686a_write_value(data, VIA686A_REG_FAN_MIN(nr+1), data->fan_min[nr]);
498
	mutex_unlock(&data->update_lock);
Linus Torvalds's avatar
Linus Torvalds committed
499 500
	return count;
}
501 502
static ssize_t set_fan_div(struct device *dev, struct device_attribute *da,
		const char *buf, size_t count) {
503
	struct via686a_data *data = dev_get_drvdata(dev);
504 505
	struct sensor_device_attribute *attr = to_sensor_dev_attr(da);
	int nr = attr->index;
Linus Torvalds's avatar
Linus Torvalds committed
506 507 508
	int val = simple_strtol(buf, NULL, 10);
	int old;

509
	mutex_lock(&data->update_lock);
510
	old = via686a_read_value(data, VIA686A_REG_FANDIV);
Linus Torvalds's avatar
Linus Torvalds committed
511 512
	data->fan_div[nr] = DIV_TO_REG(val);
	old = (old & 0x0f) | (data->fan_div[1] << 6) | (data->fan_div[0] << 4);
513
	via686a_write_value(data, VIA686A_REG_FANDIV, old);
514
	mutex_unlock(&data->update_lock);
Linus Torvalds's avatar
Linus Torvalds committed
515 516 517 518
	return count;
}

#define show_fan_offset(offset)						\
519 520 521 522 523 524
static SENSOR_DEVICE_ATTR(fan##offset##_input, S_IRUGO,			\
		show_fan, NULL, offset - 1);				\
static SENSOR_DEVICE_ATTR(fan##offset##_min, S_IRUGO | S_IWUSR,		\
		show_fan_min, set_fan_min, offset - 1);			\
static SENSOR_DEVICE_ATTR(fan##offset##_div, S_IRUGO | S_IWUSR,		\
		show_fan_div, set_fan_div, offset - 1);
Linus Torvalds's avatar
Linus Torvalds committed
525 526 527 528 529

show_fan_offset(1);
show_fan_offset(2);

/* Alarms */
530
static ssize_t show_alarms(struct device *dev, struct device_attribute *attr, char *buf) {
Linus Torvalds's avatar
Linus Torvalds committed
531
	struct via686a_data *data = via686a_update_device(dev);
532
	return sprintf(buf, "%u\n", data->alarms);
Linus Torvalds's avatar
Linus Torvalds committed
533
}
534
static DEVICE_ATTR(alarms, S_IRUGO, show_alarms, NULL);
Linus Torvalds's avatar
Linus Torvalds committed
535

536 537 538 539 540 541 542 543
static ssize_t show_name(struct device *dev, struct device_attribute
			 *devattr, char *buf)
{
	struct via686a_data *data = dev_get_drvdata(dev);
	return sprintf(buf, "%s\n", data->name);
}
static DEVICE_ATTR(name, S_IRUGO, show_name, NULL);

544
static struct attribute *via686a_attributes[] = {
545 546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576
	&sensor_dev_attr_in0_input.dev_attr.attr,
	&sensor_dev_attr_in1_input.dev_attr.attr,
	&sensor_dev_attr_in2_input.dev_attr.attr,
	&sensor_dev_attr_in3_input.dev_attr.attr,
	&sensor_dev_attr_in4_input.dev_attr.attr,
	&sensor_dev_attr_in0_min.dev_attr.attr,
	&sensor_dev_attr_in1_min.dev_attr.attr,
	&sensor_dev_attr_in2_min.dev_attr.attr,
	&sensor_dev_attr_in3_min.dev_attr.attr,
	&sensor_dev_attr_in4_min.dev_attr.attr,
	&sensor_dev_attr_in0_max.dev_attr.attr,
	&sensor_dev_attr_in1_max.dev_attr.attr,
	&sensor_dev_attr_in2_max.dev_attr.attr,
	&sensor_dev_attr_in3_max.dev_attr.attr,
	&sensor_dev_attr_in4_max.dev_attr.attr,

	&sensor_dev_attr_temp1_input.dev_attr.attr,
	&sensor_dev_attr_temp2_input.dev_attr.attr,
	&sensor_dev_attr_temp3_input.dev_attr.attr,
	&sensor_dev_attr_temp1_max.dev_attr.attr,
	&sensor_dev_attr_temp2_max.dev_attr.attr,
	&sensor_dev_attr_temp3_max.dev_attr.attr,
	&sensor_dev_attr_temp1_max_hyst.dev_attr.attr,
	&sensor_dev_attr_temp2_max_hyst.dev_attr.attr,
	&sensor_dev_attr_temp3_max_hyst.dev_attr.attr,

	&sensor_dev_attr_fan1_input.dev_attr.attr,
	&sensor_dev_attr_fan2_input.dev_attr.attr,
	&sensor_dev_attr_fan1_min.dev_attr.attr,
	&sensor_dev_attr_fan2_min.dev_attr.attr,
	&sensor_dev_attr_fan1_div.dev_attr.attr,
	&sensor_dev_attr_fan2_div.dev_attr.attr,
577 578

	&dev_attr_alarms.attr,
579
	&dev_attr_name.attr,
580 581 582 583 584 585 586
	NULL
};

static const struct attribute_group via686a_group = {
	.attrs = via686a_attributes,
};

587
static struct platform_driver via686a_driver = {
588
	.driver = {
Jean Delvare's avatar
Jean Delvare committed
589
		.owner	= THIS_MODULE,
590 591
		.name	= "via686a",
	},
592 593
	.probe		= via686a_probe,
	.remove		= __devexit_p(via686a_remove),
Linus Torvalds's avatar
Linus Torvalds committed
594 595 596 597
};


/* This is called when the module is loaded */
598
static int __devinit via686a_probe(struct platform_device *pdev)
Linus Torvalds's avatar
Linus Torvalds committed
599 600
{
	struct via686a_data *data;
601 602
	struct resource *res;
	int err;
Linus Torvalds's avatar
Linus Torvalds committed
603 604

	/* Reserve the ISA region */
605 606
	res = platform_get_resource(pdev, IORESOURCE_IO, 0);
	if (!request_region(res->start, VIA686A_EXTENT,
607
			    via686a_driver.driver.name)) {
608 609
		dev_err(&pdev->dev, "Region 0x%lx-0x%lx already in use!\n",
			(unsigned long)res->start, (unsigned long)res->end);
Linus Torvalds's avatar
Linus Torvalds committed
610 611 612
		return -ENODEV;
	}

613
	if (!(data = kzalloc(sizeof(struct via686a_data), GFP_KERNEL))) {
Linus Torvalds's avatar
Linus Torvalds committed
614
		err = -ENOMEM;
615
		goto exit_release;
Linus Torvalds's avatar
Linus Torvalds committed
616 617
	}

618 619 620
	platform_set_drvdata(pdev, data);
	data->addr = res->start;
	data->name = "via686a";
621
	mutex_init(&data->update_lock);
622

Linus Torvalds's avatar
Linus Torvalds committed
623
	/* Initialize the VIA686A chip */
624
	via686a_init_device(data);
Linus Torvalds's avatar
Linus Torvalds committed
625 626

	/* Register sysfs hooks */
627 628
	if ((err = sysfs_create_group(&pdev->dev.kobj, &via686a_group)))
		goto exit_free;
629

630
	data->class_dev = hwmon_device_register(&pdev->dev);
631 632
	if (IS_ERR(data->class_dev)) {
		err = PTR_ERR(data->class_dev);
633
		goto exit_remove_files;
634 635
	}

Linus Torvalds's avatar
Linus Torvalds committed
636 637
	return 0;

638
exit_remove_files:
639
	sysfs_remove_group(&pdev->dev.kobj, &via686a_group);
640
exit_free:
Linus Torvalds's avatar
Linus Torvalds committed
641
	kfree(data);
642
exit_release:
643
	release_region(res->start, VIA686A_EXTENT);
Linus Torvalds's avatar
Linus Torvalds committed
644 645 646
	return err;
}

647
static int __devexit via686a_remove(struct platform_device *pdev)
Linus Torvalds's avatar
Linus Torvalds committed
648
{
649
	struct via686a_data *data = platform_get_drvdata(pdev);
Linus Torvalds's avatar
Linus Torvalds committed
650

651
	hwmon_device_unregister(data->class_dev);
652
	sysfs_remove_group(&pdev->dev.kobj, &via686a_group);
653

654 655
	release_region(data->addr, VIA686A_EXTENT);
	platform_set_drvdata(pdev, NULL);
656
	kfree(data);
Linus Torvalds's avatar
Linus Torvalds committed
657 658 659 660

	return 0;
}

661
static void __devinit via686a_init_device(struct via686a_data *data)
Linus Torvalds's avatar
Linus Torvalds committed
662 663 664 665
{
	u8 reg;

	/* Start monitoring */
666 667
	reg = via686a_read_value(data, VIA686A_REG_CONFIG);
	via686a_write_value(data, VIA686A_REG_CONFIG, (reg | 0x01) & 0x7F);
Linus Torvalds's avatar
Linus Torvalds committed
668 669

	/* Configure temp interrupt mode for continuous-interrupt operation */
670 671
	reg = via686a_read_value(data, VIA686A_REG_TEMP_MODE);
	via686a_write_value(data, VIA686A_REG_TEMP_MODE,
672 673
			    (reg & ~VIA686A_TEMP_MODE_MASK)
			    | VIA686A_TEMP_MODE_CONTINUOUS);
Linus Torvalds's avatar
Linus Torvalds committed
674 675 676 677
}

static struct via686a_data *via686a_update_device(struct device *dev)
{
678
	struct via686a_data *data = dev_get_drvdata(dev);
Linus Torvalds's avatar
Linus Torvalds committed
679 680
	int i;

681
	mutex_lock(&data->update_lock);
Linus Torvalds's avatar
Linus Torvalds committed
682 683 684 685 686

	if (time_after(jiffies, data->last_updated + HZ + HZ / 2)
	    || !data->valid) {
		for (i = 0; i <= 4; i++) {
			data->in[i] =
687 688
			    via686a_read_value(data, VIA686A_REG_IN(i));
			data->in_min[i] = via686a_read_value(data,
Linus Torvalds's avatar
Linus Torvalds committed
689 690 691
							     VIA686A_REG_IN_MIN
							     (i));
			data->in_max[i] =
692
			    via686a_read_value(data, VIA686A_REG_IN_MAX(i));
Linus Torvalds's avatar
Linus Torvalds committed
693 694 695
		}
		for (i = 1; i <= 2; i++) {
			data->fan[i - 1] =
696 697
			    via686a_read_value(data, VIA686A_REG_FAN(i));
			data->fan_min[i - 1] = via686a_read_value(data,
Linus Torvalds's avatar
Linus Torvalds committed
698 699 700
						     VIA686A_REG_FAN_MIN(i));
		}
		for (i = 0; i <= 2; i++) {
701
			data->temp[i] = via686a_read_value(data,
702
						 VIA686A_REG_TEMP[i]) << 2;
Linus Torvalds's avatar
Linus Torvalds committed
703
			data->temp_over[i] =
704
			    via686a_read_value(data,
705
					       VIA686A_REG_TEMP_OVER[i]);
Linus Torvalds's avatar
Linus Torvalds committed
706
			data->temp_hyst[i] =
707
			    via686a_read_value(data,
708
					       VIA686A_REG_TEMP_HYST[i]);
Linus Torvalds's avatar
Linus Torvalds committed
709
		}
710
		/* add in lower 2 bits
Linus Torvalds's avatar
Linus Torvalds committed
711 712 713 714
		   temp1 uses bits 7-6 of VIA686A_REG_TEMP_LOW1
		   temp2 uses bits 5-4 of VIA686A_REG_TEMP_LOW23
		   temp3 uses bits 7-6 of VIA686A_REG_TEMP_LOW23
		 */
715
		data->temp[0] |= (via686a_read_value(data,
Linus Torvalds's avatar
Linus Torvalds committed
716 717 718
						     VIA686A_REG_TEMP_LOW1)
				  & 0xc0) >> 6;
		data->temp[1] |=
719
		    (via686a_read_value(data, VIA686A_REG_TEMP_LOW23) &
Linus Torvalds's avatar
Linus Torvalds committed
720 721
		     0x30) >> 4;
		data->temp[2] |=
722
		    (via686a_read_value(data, VIA686A_REG_TEMP_LOW23) &
Linus Torvalds's avatar
Linus Torvalds committed
723 724
		     0xc0) >> 6;

725
		i = via686a_read_value(data, VIA686A_REG_FANDIV);
Linus Torvalds's avatar
Linus Torvalds committed
726 727 728
		data->fan_div[0] = (i >> 4) & 0x03;
		data->fan_div[1] = i >> 6;
		data->alarms =
729
		    via686a_read_value(data,
Linus Torvalds's avatar
Linus Torvalds committed
730
				       VIA686A_REG_ALARM1) |
731
		    (via686a_read_value(data, VIA686A_REG_ALARM2) << 8);
Linus Torvalds's avatar
Linus Torvalds committed
732 733 734 735
		data->last_updated = jiffies;
		data->valid = 1;
	}

736
	mutex_unlock(&data->update_lock);
Linus Torvalds's avatar
Linus Torvalds committed
737 738 739 740 741

	return data;
}

static struct pci_device_id via686a_pci_ids[] = {
742 743
	{ PCI_DEVICE(PCI_VENDOR_ID_VIA, PCI_DEVICE_ID_VIA_82C686_4) },
	{ 0, }
Linus Torvalds's avatar
Linus Torvalds committed
744 745 746 747
};

MODULE_DEVICE_TABLE(pci, via686a_pci_ids);

748 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786
static int __devinit via686a_device_add(unsigned short address)
{
	struct resource res = {
		.start	= address,
		.end	= address + VIA686A_EXTENT - 1,
		.name	= "via686a",
		.flags	= IORESOURCE_IO,
	};
	int err;

	pdev = platform_device_alloc("via686a", address);
	if (!pdev) {
		err = -ENOMEM;
		printk(KERN_ERR "via686a: Device allocation failed\n");
		goto exit;
	}

	err = platform_device_add_resources(pdev, &res, 1);
	if (err) {
		printk(KERN_ERR "via686a: Device resource addition failed "
		       "(%d)\n", err);
		goto exit_device_put;
	}

	err = platform_device_add(pdev);
	if (err) {
		printk(KERN_ERR "via686a: Device addition failed (%d)\n",
		       err);
		goto exit_device_put;
	}

	return 0;

exit_device_put:
	platform_device_put(pdev);
exit:
	return err;
}

Linus Torvalds's avatar
Linus Torvalds committed
787
static int __devinit via686a_pci_probe(struct pci_dev *dev,
788
				       const struct pci_device_id *id)
Linus Torvalds's avatar
Linus Torvalds committed
789
{
790
	u16 address, val;
791

792 793 794 795 796 797 798
	if (force_addr) {
		address = force_addr & ~(VIA686A_EXTENT - 1);
		dev_warn(&dev->dev, "Forcing ISA address 0x%x\n", address);
		if (PCIBIOS_SUCCESSFUL !=
		    pci_write_config_word(dev, VIA686A_BASE_REG, address | 1))
			return -ENODEV;
	}
799 800 801 802
	if (PCIBIOS_SUCCESSFUL !=
	    pci_read_config_word(dev, VIA686A_BASE_REG, &val))
		return -ENODEV;

803
	address = val & ~(VIA686A_EXTENT - 1);
804
	if (address == 0) {
805 806 807 808 809
		dev_err(&dev->dev, "base address not set - upgrade BIOS "
			"or use force_addr=0xaddr\n");
		return -ENODEV;
	}

810 811 812 813 814 815 816 817 818 819 820 821 822 823 824
	if (PCIBIOS_SUCCESSFUL !=
	    pci_read_config_word(dev, VIA686A_ENABLE_REG, &val))
		return -ENODEV;
	if (!(val & 0x0001)) {
		if (!force_addr) {
			dev_warn(&dev->dev, "Sensors disabled, enable "
				 "with force_addr=0x%x\n", address);
			return -ENODEV;
		}

		dev_warn(&dev->dev, "Enabling sensors\n");
		if (PCIBIOS_SUCCESSFUL !=
		    pci_write_config_word(dev, VIA686A_ENABLE_REG,
					  val | 0x0001))
			return -ENODEV;
Linus Torvalds's avatar
Linus Torvalds committed
825 826
	}

827 828 829 830 831 832 833
	if (platform_driver_register(&via686a_driver))
		goto exit;

	/* Sets global pdev as a side effect */
	if (via686a_device_add(address))
		goto exit_unregister;

Linus Torvalds's avatar
Linus Torvalds committed
834 835 836 837
	/* Always return failure here.  This is to allow other drivers to bind
	 * to this pci device.  We don't really want to have control over the
	 * pci device, we only wanted to read as few register values from it.
	 */
838 839 840 841 842 843
	s_bridge = pci_dev_get(dev);
	return -ENODEV;

exit_unregister:
	platform_driver_unregister(&via686a_driver);
exit:
Linus Torvalds's avatar
Linus Torvalds committed
844 845 846 847
	return -ENODEV;
}

static struct pci_driver via686a_pci_driver = {
848 849 850
	.name		= "via686a",
	.id_table	= via686a_pci_ids,
	.probe		= via686a_pci_probe,
Linus Torvalds's avatar
Linus Torvalds committed
851 852 853 854
};

static int __init sm_via686a_init(void)
{
855
	return pci_register_driver(&via686a_pci_driver);
Linus Torvalds's avatar
Linus Torvalds committed
856 857 858 859 860 861
}

static void __exit sm_via686a_exit(void)
{
	pci_unregister_driver(&via686a_pci_driver);
	if (s_bridge != NULL) {
862 863
		platform_device_unregister(pdev);
		platform_driver_unregister(&via686a_driver);
Linus Torvalds's avatar
Linus Torvalds committed
864 865 866 867 868 869
		pci_dev_put(s_bridge);
		s_bridge = NULL;
	}
}

MODULE_AUTHOR("Kyösti Mälkki <kmalkki@cc.hut.fi>, "
870 871
	      "Mark Studebaker <mdsxyz123@yahoo.com> "
	      "and Bob Dougherty <bobd@stanford.edu>");
Linus Torvalds's avatar
Linus Torvalds committed
872 873 874 875 876
MODULE_DESCRIPTION("VIA 686A Sensor device");
MODULE_LICENSE("GPL");

module_init(sm_via686a_init);
module_exit(sm_via686a_exit);