[go: nahoru, domu]

1/*
2 * SS4200-E Hardware API
3 * Copyright (c) 2009, Intel Corporation.
4 * Copyright IBM Corporation, 2009
5 *
6 * This program is free software; you can redistribute it and/or modify it
7 * under the terms and conditions of the GNU General Public License,
8 * version 2, as published by the Free Software Foundation.
9 *
10 * This program is distributed in the hope it will be useful, but WITHOUT
11 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
12 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
13 * more details.
14 *
15 * You should have received a copy of the GNU General Public License along with
16 * this program; if not, write to the Free Software Foundation, Inc.,
17 * 51 Franklin St - Fifth Floor, Boston, MA 02110-1301 USA.
18 *
19 * Author: Dave Hansen <dave@sr71.net>
20 */
21
22#define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
23
24#include <linux/dmi.h>
25#include <linux/init.h>
26#include <linux/ioport.h>
27#include <linux/kernel.h>
28#include <linux/leds.h>
29#include <linux/module.h>
30#include <linux/pci.h>
31#include <linux/types.h>
32#include <linux/uaccess.h>
33
34MODULE_AUTHOR("Rodney Girod <rgirod@confocus.com>, Dave Hansen <dave@sr71.net>");
35MODULE_DESCRIPTION("Intel NAS/Home Server ICH7 GPIO Driver");
36MODULE_LICENSE("GPL");
37
38/*
39 * ICH7 LPC/GPIO PCI Config register offsets
40 */
41#define PMBASE		0x040
42#define GPIO_BASE	0x048
43#define GPIO_CTRL	0x04c
44#define GPIO_EN		0x010
45
46/*
47 * The ICH7 GPIO register block is 64 bytes in size.
48 */
49#define ICH7_GPIO_SIZE	64
50
51/*
52 * Define register offsets within the ICH7 register block.
53 */
54#define GPIO_USE_SEL	0x000
55#define GP_IO_SEL	0x004
56#define GP_LVL		0x00c
57#define GPO_BLINK	0x018
58#define GPI_INV		0x030
59#define GPIO_USE_SEL2	0x034
60#define GP_IO_SEL2	0x038
61#define GP_LVL2		0x03c
62
63/*
64 * PCI ID of the Intel ICH7 LPC Device within which the GPIO block lives.
65 */
66static const struct pci_device_id ich7_lpc_pci_id[] = {
67	{ PCI_DEVICE(PCI_VENDOR_ID_INTEL, PCI_DEVICE_ID_INTEL_ICH7_0) },
68	{ PCI_DEVICE(PCI_VENDOR_ID_INTEL, PCI_DEVICE_ID_INTEL_ICH7_1) },
69	{ PCI_DEVICE(PCI_VENDOR_ID_INTEL, PCI_DEVICE_ID_INTEL_ICH7_30) },
70	{ } /* NULL entry */
71};
72
73MODULE_DEVICE_TABLE(pci, ich7_lpc_pci_id);
74
75static int __init ss4200_led_dmi_callback(const struct dmi_system_id *id)
76{
77	pr_info("detected '%s'\n", id->ident);
78	return 1;
79}
80
81static bool nodetect;
82module_param_named(nodetect, nodetect, bool, 0);
83MODULE_PARM_DESC(nodetect, "Skip DMI-based hardware detection");
84
85/*
86 * struct nas_led_whitelist - List of known good models
87 *
88 * Contains the known good models this driver is compatible with.
89 * When adding a new model try to be as strict as possible. This
90 * makes it possible to keep the false positives (the model is
91 * detected as working, but in reality it is not) as low as
92 * possible.
93 */
94static struct dmi_system_id nas_led_whitelist[] __initdata = {
95	{
96		.callback = ss4200_led_dmi_callback,
97		.ident = "Intel SS4200-E",
98		.matches = {
99			DMI_MATCH(DMI_SYS_VENDOR, "Intel"),
100			DMI_MATCH(DMI_PRODUCT_NAME, "SS4200-E"),
101			DMI_MATCH(DMI_PRODUCT_VERSION, "1.00.00")
102		}
103	},
104	{}
105};
106
107/*
108 * Base I/O address assigned to the Power Management register block
109 */
110static u32 g_pm_io_base;
111
112/*
113 * Base I/O address assigned to the ICH7 GPIO register block
114 */
115static u32 nas_gpio_io_base;
116
117/*
118 * When we successfully register a region, we are returned a resource.
119 * We use these to identify which regions we need to release on our way
120 * back out.
121 */
122static struct resource *gp_gpio_resource;
123
124struct nasgpio_led {
125	char *name;
126	u32 gpio_bit;
127	struct led_classdev led_cdev;
128};
129
130/*
131 * gpio_bit(s) are the ICH7 GPIO bit assignments
132 */
133static struct nasgpio_led nasgpio_leds[] = {
134	{ .name = "hdd1:blue:sata",	.gpio_bit = 0 },
135	{ .name = "hdd1:amber:sata",	.gpio_bit = 1 },
136	{ .name = "hdd2:blue:sata",	.gpio_bit = 2 },
137	{ .name = "hdd2:amber:sata",	.gpio_bit = 3 },
138	{ .name = "hdd3:blue:sata",	.gpio_bit = 4 },
139	{ .name = "hdd3:amber:sata",	.gpio_bit = 5 },
140	{ .name = "hdd4:blue:sata",	.gpio_bit = 6 },
141	{ .name = "hdd4:amber:sata",	.gpio_bit = 7 },
142	{ .name = "power:blue:power",	.gpio_bit = 27},
143	{ .name = "power:amber:power",  .gpio_bit = 28},
144};
145
146#define NAS_RECOVERY	0x00000400	/* GPIO10 */
147
148static struct nasgpio_led *
149led_classdev_to_nasgpio_led(struct led_classdev *led_cdev)
150{
151	return container_of(led_cdev, struct nasgpio_led, led_cdev);
152}
153
154static struct nasgpio_led *get_led_named(char *name)
155{
156	int i;
157	for (i = 0; i < ARRAY_SIZE(nasgpio_leds); i++) {
158		if (strcmp(nasgpio_leds[i].name, name))
159			continue;
160		return &nasgpio_leds[i];
161	}
162	return NULL;
163}
164
165/*
166 * This protects access to the gpio ports.
167 */
168static DEFINE_SPINLOCK(nasgpio_gpio_lock);
169
170/*
171 * There are two gpio ports, one for blinking and the other
172 * for power.  @port tells us if we're doing blinking or
173 * power control.
174 *
175 * Caller must hold nasgpio_gpio_lock
176 */
177static void __nasgpio_led_set_attr(struct led_classdev *led_cdev,
178				   u32 port, u32 value)
179{
180	struct nasgpio_led *led = led_classdev_to_nasgpio_led(led_cdev);
181	u32 gpio_out;
182
183	gpio_out = inl(nas_gpio_io_base + port);
184	if (value)
185		gpio_out |= (1<<led->gpio_bit);
186	else
187		gpio_out &= ~(1<<led->gpio_bit);
188
189	outl(gpio_out, nas_gpio_io_base + port);
190}
191
192static void nasgpio_led_set_attr(struct led_classdev *led_cdev,
193				 u32 port, u32 value)
194{
195	spin_lock(&nasgpio_gpio_lock);
196	__nasgpio_led_set_attr(led_cdev, port, value);
197	spin_unlock(&nasgpio_gpio_lock);
198}
199
200static u32 nasgpio_led_get_attr(struct led_classdev *led_cdev, u32 port)
201{
202	struct nasgpio_led *led = led_classdev_to_nasgpio_led(led_cdev);
203	u32 gpio_in;
204
205	spin_lock(&nasgpio_gpio_lock);
206	gpio_in = inl(nas_gpio_io_base + port);
207	spin_unlock(&nasgpio_gpio_lock);
208	if (gpio_in & (1<<led->gpio_bit))
209		return 1;
210	return 0;
211}
212
213/*
214 * There is actual brightness control in the hardware,
215 * but it is via smbus commands and not implemented
216 * in this driver.
217 */
218static void nasgpio_led_set_brightness(struct led_classdev *led_cdev,
219				       enum led_brightness brightness)
220{
221	u32 setting = 0;
222	if (brightness >= LED_HALF)
223		setting = 1;
224	/*
225	 * Hold the lock across both operations.  This ensures
226	 * consistency so that both the "turn off blinking"
227	 * and "turn light off" operations complete as a set.
228	 */
229	spin_lock(&nasgpio_gpio_lock);
230	/*
231	 * LED class documentation asks that past blink state
232	 * be disabled when brightness is turned to zero.
233	 */
234	if (brightness == 0)
235		__nasgpio_led_set_attr(led_cdev, GPO_BLINK, 0);
236	__nasgpio_led_set_attr(led_cdev, GP_LVL, setting);
237	spin_unlock(&nasgpio_gpio_lock);
238}
239
240static int nasgpio_led_set_blink(struct led_classdev *led_cdev,
241				 unsigned long *delay_on,
242				 unsigned long *delay_off)
243{
244	u32 setting = 1;
245	if (!(*delay_on == 0 && *delay_off == 0) &&
246	    !(*delay_on == 500 && *delay_off == 500))
247		return -EINVAL;
248	/*
249	 * These are very approximate.
250	 */
251	*delay_on = 500;
252	*delay_off = 500;
253
254	nasgpio_led_set_attr(led_cdev, GPO_BLINK, setting);
255
256	return 0;
257}
258
259
260/*
261 * Initialize the ICH7 GPIO registers for NAS usage.  The BIOS should have
262 * already taken care of this, but we will do so in a non destructive manner
263 * so that we have what we need whether the BIOS did it or not.
264 */
265static int ich7_gpio_init(struct device *dev)
266{
267	int i;
268	u32 config_data = 0;
269	u32 all_nas_led = 0;
270
271	for (i = 0; i < ARRAY_SIZE(nasgpio_leds); i++)
272		all_nas_led |= (1<<nasgpio_leds[i].gpio_bit);
273
274	spin_lock(&nasgpio_gpio_lock);
275	/*
276	 * We need to enable all of the GPIO lines used by the NAS box,
277	 * so we will read the current Use Selection and add our usage
278	 * to it.  This should be benign with regard to the original
279	 * BIOS configuration.
280	 */
281	config_data = inl(nas_gpio_io_base + GPIO_USE_SEL);
282	dev_dbg(dev, ": Data read from GPIO_USE_SEL = 0x%08x\n", config_data);
283	config_data |= all_nas_led + NAS_RECOVERY;
284	outl(config_data, nas_gpio_io_base + GPIO_USE_SEL);
285	config_data = inl(nas_gpio_io_base + GPIO_USE_SEL);
286	dev_dbg(dev, ": GPIO_USE_SEL = 0x%08x\n\n", config_data);
287
288	/*
289	 * The LED GPIO outputs need to be configured for output, so we
290	 * will ensure that all LED lines are cleared for output and the
291	 * RECOVERY line ready for input.  This too should be benign with
292	 * regard to BIOS configuration.
293	 */
294	config_data = inl(nas_gpio_io_base + GP_IO_SEL);
295	dev_dbg(dev, ": Data read from GP_IO_SEL = 0x%08x\n",
296					config_data);
297	config_data &= ~all_nas_led;
298	config_data |= NAS_RECOVERY;
299	outl(config_data, nas_gpio_io_base + GP_IO_SEL);
300	config_data = inl(nas_gpio_io_base + GP_IO_SEL);
301	dev_dbg(dev, ": GP_IO_SEL = 0x%08x\n", config_data);
302
303	/*
304	 * In our final system, the BIOS will initialize the state of all
305	 * of the LEDs.  For now, we turn them all off (or Low).
306	 */
307	config_data = inl(nas_gpio_io_base + GP_LVL);
308	dev_dbg(dev, ": Data read from GP_LVL = 0x%08x\n", config_data);
309	/*
310	 * In our final system, the BIOS will initialize the blink state of all
311	 * of the LEDs.  For now, we turn blink off for all of them.
312	 */
313	config_data = inl(nas_gpio_io_base + GPO_BLINK);
314	dev_dbg(dev, ": Data read from GPO_BLINK = 0x%08x\n", config_data);
315
316	/*
317	 * At this moment, I am unsure if anything needs to happen with GPI_INV
318	 */
319	config_data = inl(nas_gpio_io_base + GPI_INV);
320	dev_dbg(dev, ": Data read from GPI_INV = 0x%08x\n", config_data);
321
322	spin_unlock(&nasgpio_gpio_lock);
323	return 0;
324}
325
326static void ich7_lpc_cleanup(struct device *dev)
327{
328	/*
329	 * If we were given exclusive use of the GPIO
330	 * I/O Address range, we must return it.
331	 */
332	if (gp_gpio_resource) {
333		dev_dbg(dev, ": Releasing GPIO I/O addresses\n");
334		release_region(nas_gpio_io_base, ICH7_GPIO_SIZE);
335		gp_gpio_resource = NULL;
336	}
337}
338
339/*
340 * The OS has determined that the LPC of the Intel ICH7 Southbridge is present
341 * so we can retrive the required operational information and prepare the GPIO.
342 */
343static struct pci_dev *nas_gpio_pci_dev;
344static int ich7_lpc_probe(struct pci_dev *dev,
345				    const struct pci_device_id *id)
346{
347	int status;
348	u32 gc = 0;
349
350	status = pci_enable_device(dev);
351	if (status) {
352		dev_err(&dev->dev, "pci_enable_device failed\n");
353		return -EIO;
354	}
355
356	nas_gpio_pci_dev = dev;
357	status = pci_read_config_dword(dev, PMBASE, &g_pm_io_base);
358	if (status)
359		goto out;
360	g_pm_io_base &= 0x00000ff80;
361
362	status = pci_read_config_dword(dev, GPIO_CTRL, &gc);
363	if (!(GPIO_EN & gc)) {
364		status = -EEXIST;
365		dev_info(&dev->dev,
366			   "ERROR: The LPC GPIO Block has not been enabled.\n");
367		goto out;
368	}
369
370	status = pci_read_config_dword(dev, GPIO_BASE, &nas_gpio_io_base);
371	if (0 > status) {
372		dev_info(&dev->dev, "Unable to read GPIOBASE.\n");
373		goto out;
374	}
375	dev_dbg(&dev->dev, ": GPIOBASE = 0x%08x\n", nas_gpio_io_base);
376	nas_gpio_io_base &= 0x00000ffc0;
377
378	/*
379	 * Insure that we have exclusive access to the GPIO I/O address range.
380	 */
381	gp_gpio_resource = request_region(nas_gpio_io_base, ICH7_GPIO_SIZE,
382					  KBUILD_MODNAME);
383	if (NULL == gp_gpio_resource) {
384		dev_info(&dev->dev,
385			 "ERROR Unable to register GPIO I/O addresses.\n");
386		status = -1;
387		goto out;
388	}
389
390	/*
391	 * Initialize the GPIO for NAS/Home Server Use
392	 */
393	ich7_gpio_init(&dev->dev);
394
395out:
396	if (status) {
397		ich7_lpc_cleanup(&dev->dev);
398		pci_disable_device(dev);
399	}
400	return status;
401}
402
403static void ich7_lpc_remove(struct pci_dev *dev)
404{
405	ich7_lpc_cleanup(&dev->dev);
406	pci_disable_device(dev);
407}
408
409/*
410 * pci_driver structure passed to the PCI modules
411 */
412static struct pci_driver nas_gpio_pci_driver = {
413	.name = KBUILD_MODNAME,
414	.id_table = ich7_lpc_pci_id,
415	.probe = ich7_lpc_probe,
416	.remove = ich7_lpc_remove,
417};
418
419static struct led_classdev *get_classdev_for_led_nr(int nr)
420{
421	struct nasgpio_led *nas_led = &nasgpio_leds[nr];
422	struct led_classdev *led = &nas_led->led_cdev;
423	return led;
424}
425
426
427static void set_power_light_amber_noblink(void)
428{
429	struct nasgpio_led *amber = get_led_named("power:amber:power");
430	struct nasgpio_led *blue = get_led_named("power:blue:power");
431
432	if (!amber || !blue)
433		return;
434	/*
435	 * LED_OFF implies disabling future blinking
436	 */
437	pr_debug("setting blue off and amber on\n");
438
439	nasgpio_led_set_brightness(&blue->led_cdev, LED_OFF);
440	nasgpio_led_set_brightness(&amber->led_cdev, LED_FULL);
441}
442
443static ssize_t nas_led_blink_show(struct device *dev,
444				  struct device_attribute *attr, char *buf)
445{
446	struct led_classdev *led = dev_get_drvdata(dev);
447	int blinking = 0;
448	if (nasgpio_led_get_attr(led, GPO_BLINK))
449		blinking = 1;
450	return sprintf(buf, "%u\n", blinking);
451}
452
453static ssize_t nas_led_blink_store(struct device *dev,
454				   struct device_attribute *attr,
455				   const char *buf, size_t size)
456{
457	int ret;
458	struct led_classdev *led = dev_get_drvdata(dev);
459	unsigned long blink_state;
460
461	ret = kstrtoul(buf, 10, &blink_state);
462	if (ret)
463		return ret;
464
465	nasgpio_led_set_attr(led, GPO_BLINK, blink_state);
466
467	return size;
468}
469
470static DEVICE_ATTR(blink, 0644, nas_led_blink_show, nas_led_blink_store);
471
472static struct attribute *nasgpio_led_attrs[] = {
473	&dev_attr_blink.attr,
474	NULL
475};
476ATTRIBUTE_GROUPS(nasgpio_led);
477
478static int register_nasgpio_led(int led_nr)
479{
480	int ret;
481	struct nasgpio_led *nas_led = &nasgpio_leds[led_nr];
482	struct led_classdev *led = get_classdev_for_led_nr(led_nr);
483
484	led->name = nas_led->name;
485	led->brightness = LED_OFF;
486	if (nasgpio_led_get_attr(led, GP_LVL))
487		led->brightness = LED_FULL;
488	led->brightness_set = nasgpio_led_set_brightness;
489	led->blink_set = nasgpio_led_set_blink;
490	led->groups = nasgpio_led_groups;
491	ret = led_classdev_register(&nas_gpio_pci_dev->dev, led);
492	if (ret)
493		return ret;
494
495	return 0;
496}
497
498static void unregister_nasgpio_led(int led_nr)
499{
500	struct led_classdev *led = get_classdev_for_led_nr(led_nr);
501	led_classdev_unregister(led);
502}
503/*
504 * module load/initialization
505 */
506static int __init nas_gpio_init(void)
507{
508	int i;
509	int ret = 0;
510	int nr_devices = 0;
511
512	nr_devices = dmi_check_system(nas_led_whitelist);
513	if (nodetect) {
514		pr_info("skipping hardware autodetection\n");
515		pr_info("Please send 'dmidecode' output to dave@sr71.net\n");
516		nr_devices++;
517	}
518
519	if (nr_devices <= 0) {
520		pr_info("no LED devices found\n");
521		return -ENODEV;
522	}
523
524	pr_info("registering PCI driver\n");
525	ret = pci_register_driver(&nas_gpio_pci_driver);
526	if (ret)
527		return ret;
528	for (i = 0; i < ARRAY_SIZE(nasgpio_leds); i++) {
529		ret = register_nasgpio_led(i);
530		if (ret)
531			goto out_err;
532	}
533	/*
534	 * When the system powers on, the BIOS leaves the power
535	 * light blue and blinking.  This will turn it solid
536	 * amber once the driver is loaded.
537	 */
538	set_power_light_amber_noblink();
539	return 0;
540out_err:
541	for (i--; i >= 0; i--)
542		unregister_nasgpio_led(i);
543	pci_unregister_driver(&nas_gpio_pci_driver);
544	return ret;
545}
546
547/*
548 * module unload
549 */
550static void __exit nas_gpio_exit(void)
551{
552	int i;
553	pr_info("Unregistering driver\n");
554	for (i = 0; i < ARRAY_SIZE(nasgpio_leds); i++)
555		unregister_nasgpio_led(i);
556	pci_unregister_driver(&nas_gpio_pci_driver);
557}
558
559module_init(nas_gpio_init);
560module_exit(nas_gpio_exit);
561