Merge tag 'for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git/rdma/rdma
[sfrench/cifs-2.6.git] / drivers / hwmon / applesmc.c
1 /*
2  * drivers/hwmon/applesmc.c - driver for Apple's SMC (accelerometer, temperature
3  * sensors, fan control, keyboard backlight control) used in Intel-based Apple
4  * computers.
5  *
6  * Copyright (C) 2007 Nicolas Boichat <nicolas@boichat.ch>
7  * Copyright (C) 2010 Henrik Rydberg <rydberg@euromail.se>
8  *
9  * Based on hdaps.c driver:
10  * Copyright (C) 2005 Robert Love <rml@novell.com>
11  * Copyright (C) 2005 Jesper Juhl <jj@chaosbits.net>
12  *
13  * Fan control based on smcFanControl:
14  * Copyright (C) 2006 Hendrik Holtmann <holtmann@mac.com>
15  *
16  * This program is free software; you can redistribute it and/or modify it
17  * under the terms of the GNU General Public License v2 as published by the
18  * Free Software Foundation.
19  *
20  * This program is distributed in the hope that it will be useful, but WITHOUT
21  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
22  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
23  * more details.
24  *
25  * You should have received a copy of the GNU General Public License along with
26  * this program; if not, write to the Free Software Foundation, Inc.,
27  * 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA
28  */
29
30 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
31
32 #include <linux/delay.h>
33 #include <linux/platform_device.h>
34 #include <linux/input-polldev.h>
35 #include <linux/kernel.h>
36 #include <linux/slab.h>
37 #include <linux/module.h>
38 #include <linux/timer.h>
39 #include <linux/dmi.h>
40 #include <linux/mutex.h>
41 #include <linux/hwmon-sysfs.h>
42 #include <linux/io.h>
43 #include <linux/leds.h>
44 #include <linux/hwmon.h>
45 #include <linux/workqueue.h>
46 #include <linux/err.h>
47
48 /* data port used by Apple SMC */
49 #define APPLESMC_DATA_PORT      0x300
50 /* command/status port used by Apple SMC */
51 #define APPLESMC_CMD_PORT       0x304
52
53 #define APPLESMC_NR_PORTS       32 /* 0x300-0x31f */
54
55 #define APPLESMC_MAX_DATA_LENGTH 32
56
57 /* wait up to 128 ms for a status change. */
58 #define APPLESMC_MIN_WAIT       0x0010
59 #define APPLESMC_RETRY_WAIT     0x0100
60 #define APPLESMC_MAX_WAIT       0x20000
61
62 #define APPLESMC_READ_CMD       0x10
63 #define APPLESMC_WRITE_CMD      0x11
64 #define APPLESMC_GET_KEY_BY_INDEX_CMD   0x12
65 #define APPLESMC_GET_KEY_TYPE_CMD       0x13
66
67 #define KEY_COUNT_KEY           "#KEY" /* r-o ui32 */
68
69 #define LIGHT_SENSOR_LEFT_KEY   "ALV0" /* r-o {alv (6-10 bytes) */
70 #define LIGHT_SENSOR_RIGHT_KEY  "ALV1" /* r-o {alv (6-10 bytes) */
71 #define BACKLIGHT_KEY           "LKSB" /* w-o {lkb (2 bytes) */
72
73 #define CLAMSHELL_KEY           "MSLD" /* r-o ui8 (unused) */
74
75 #define MOTION_SENSOR_X_KEY     "MO_X" /* r-o sp78 (2 bytes) */
76 #define MOTION_SENSOR_Y_KEY     "MO_Y" /* r-o sp78 (2 bytes) */
77 #define MOTION_SENSOR_Z_KEY     "MO_Z" /* r-o sp78 (2 bytes) */
78 #define MOTION_SENSOR_KEY       "MOCN" /* r/w ui16 */
79
80 #define FANS_COUNT              "FNum" /* r-o ui8 */
81 #define FANS_MANUAL             "FS! " /* r-w ui16 */
82 #define FAN_ID_FMT              "F%dID" /* r-o char[16] */
83
84 #define TEMP_SENSOR_TYPE        "sp78"
85
86 /* List of keys used to read/write fan speeds */
87 static const char *const fan_speed_fmt[] = {
88         "F%dAc",                /* actual speed */
89         "F%dMn",                /* minimum speed (rw) */
90         "F%dMx",                /* maximum speed */
91         "F%dSf",                /* safe speed - not all models */
92         "F%dTg",                /* target speed (manual: rw) */
93 };
94
95 #define INIT_TIMEOUT_MSECS      5000    /* wait up to 5s for device init ... */
96 #define INIT_WAIT_MSECS         50      /* ... in 50ms increments */
97
98 #define APPLESMC_POLL_INTERVAL  50      /* msecs */
99 #define APPLESMC_INPUT_FUZZ     4       /* input event threshold */
100 #define APPLESMC_INPUT_FLAT     4
101
102 #define to_index(attr) (to_sensor_dev_attr(attr)->index & 0xffff)
103 #define to_option(attr) (to_sensor_dev_attr(attr)->index >> 16)
104
105 /* Dynamic device node attributes */
106 struct applesmc_dev_attr {
107         struct sensor_device_attribute sda;     /* hwmon attributes */
108         char name[32];                          /* room for node file name */
109 };
110
111 /* Dynamic device node group */
112 struct applesmc_node_group {
113         char *format;                           /* format string */
114         void *show;                             /* show function */
115         void *store;                            /* store function */
116         int option;                             /* function argument */
117         struct applesmc_dev_attr *nodes;        /* dynamic node array */
118 };
119
120 /* AppleSMC entry - cached register information */
121 struct applesmc_entry {
122         char key[5];            /* four-letter key code */
123         u8 valid;               /* set when entry is successfully read once */
124         u8 len;                 /* bounded by APPLESMC_MAX_DATA_LENGTH */
125         char type[5];           /* four-letter type code */
126         u8 flags;               /* 0x10: func; 0x40: write; 0x80: read */
127 };
128
129 /* Register lookup and registers common to all SMCs */
130 static struct applesmc_registers {
131         struct mutex mutex;             /* register read/write mutex */
132         unsigned int key_count;         /* number of SMC registers */
133         unsigned int fan_count;         /* number of fans */
134         unsigned int temp_count;        /* number of temperature registers */
135         unsigned int temp_begin;        /* temperature lower index bound */
136         unsigned int temp_end;          /* temperature upper index bound */
137         unsigned int index_count;       /* size of temperature index array */
138         int num_light_sensors;          /* number of light sensors */
139         bool has_accelerometer;         /* has motion sensor */
140         bool has_key_backlight;         /* has keyboard backlight */
141         bool init_complete;             /* true when fully initialized */
142         struct applesmc_entry *cache;   /* cached key entries */
143         const char **index;             /* temperature key index */
144 } smcreg = {
145         .mutex = __MUTEX_INITIALIZER(smcreg.mutex),
146 };
147
148 static const int debug;
149 static struct platform_device *pdev;
150 static s16 rest_x;
151 static s16 rest_y;
152 static u8 backlight_state[2];
153
154 static struct device *hwmon_dev;
155 static struct input_polled_dev *applesmc_idev;
156
157 /*
158  * Last index written to key_at_index sysfs file, and value to use for all other
159  * key_at_index_* sysfs files.
160  */
161 static unsigned int key_at_index;
162
163 static struct workqueue_struct *applesmc_led_wq;
164
165 /*
166  * wait_read - Wait for a byte to appear on SMC port. Callers must
167  * hold applesmc_lock.
168  */
169 static int wait_read(void)
170 {
171         u8 status;
172         int us;
173         for (us = APPLESMC_MIN_WAIT; us < APPLESMC_MAX_WAIT; us <<= 1) {
174                 udelay(us);
175                 status = inb(APPLESMC_CMD_PORT);
176                 /* read: wait for smc to settle */
177                 if (status & 0x01)
178                         return 0;
179         }
180
181         pr_warn("wait_read() fail: 0x%02x\n", status);
182         return -EIO;
183 }
184
185 /*
186  * send_byte - Write to SMC port, retrying when necessary. Callers
187  * must hold applesmc_lock.
188  */
189 static int send_byte(u8 cmd, u16 port)
190 {
191         u8 status;
192         int us;
193
194         outb(cmd, port);
195         for (us = APPLESMC_MIN_WAIT; us < APPLESMC_MAX_WAIT; us <<= 1) {
196                 udelay(us);
197                 status = inb(APPLESMC_CMD_PORT);
198                 /* write: wait for smc to settle */
199                 if (status & 0x02)
200                         continue;
201                 /* ready: cmd accepted, return */
202                 if (status & 0x04)
203                         return 0;
204                 /* timeout: give up */
205                 if (us << 1 == APPLESMC_MAX_WAIT)
206                         break;
207                 /* busy: long wait and resend */
208                 udelay(APPLESMC_RETRY_WAIT);
209                 outb(cmd, port);
210         }
211
212         pr_warn("send_byte(0x%02x, 0x%04x) fail: 0x%02x\n", cmd, port, status);
213         return -EIO;
214 }
215
216 static int send_command(u8 cmd)
217 {
218         return send_byte(cmd, APPLESMC_CMD_PORT);
219 }
220
221 static int send_argument(const char *key)
222 {
223         int i;
224
225         for (i = 0; i < 4; i++)
226                 if (send_byte(key[i], APPLESMC_DATA_PORT))
227                         return -EIO;
228         return 0;
229 }
230
231 static int read_smc(u8 cmd, const char *key, u8 *buffer, u8 len)
232 {
233         u8 status, data = 0;
234         int i;
235
236         if (send_command(cmd) || send_argument(key)) {
237                 pr_warn("%.4s: read arg fail\n", key);
238                 return -EIO;
239         }
240
241         /* This has no effect on newer (2012) SMCs */
242         if (send_byte(len, APPLESMC_DATA_PORT)) {
243                 pr_warn("%.4s: read len fail\n", key);
244                 return -EIO;
245         }
246
247         for (i = 0; i < len; i++) {
248                 if (wait_read()) {
249                         pr_warn("%.4s: read data[%d] fail\n", key, i);
250                         return -EIO;
251                 }
252                 buffer[i] = inb(APPLESMC_DATA_PORT);
253         }
254
255         /* Read the data port until bit0 is cleared */
256         for (i = 0; i < 16; i++) {
257                 udelay(APPLESMC_MIN_WAIT);
258                 status = inb(APPLESMC_CMD_PORT);
259                 if (!(status & 0x01))
260                         break;
261                 data = inb(APPLESMC_DATA_PORT);
262         }
263         if (i)
264                 pr_warn("flushed %d bytes, last value is: %d\n", i, data);
265
266         return 0;
267 }
268
269 static int write_smc(u8 cmd, const char *key, const u8 *buffer, u8 len)
270 {
271         int i;
272
273         if (send_command(cmd) || send_argument(key)) {
274                 pr_warn("%s: write arg fail\n", key);
275                 return -EIO;
276         }
277
278         if (send_byte(len, APPLESMC_DATA_PORT)) {
279                 pr_warn("%.4s: write len fail\n", key);
280                 return -EIO;
281         }
282
283         for (i = 0; i < len; i++) {
284                 if (send_byte(buffer[i], APPLESMC_DATA_PORT)) {
285                         pr_warn("%s: write data fail\n", key);
286                         return -EIO;
287                 }
288         }
289
290         return 0;
291 }
292
293 static int read_register_count(unsigned int *count)
294 {
295         __be32 be;
296         int ret;
297
298         ret = read_smc(APPLESMC_READ_CMD, KEY_COUNT_KEY, (u8 *)&be, 4);
299         if (ret)
300                 return ret;
301
302         *count = be32_to_cpu(be);
303         return 0;
304 }
305
306 /*
307  * Serialized I/O
308  *
309  * Returns zero on success or a negative error on failure.
310  * All functions below are concurrency safe - callers should NOT hold lock.
311  */
312
313 static int applesmc_read_entry(const struct applesmc_entry *entry,
314                                u8 *buf, u8 len)
315 {
316         int ret;
317
318         if (entry->len != len)
319                 return -EINVAL;
320         mutex_lock(&smcreg.mutex);
321         ret = read_smc(APPLESMC_READ_CMD, entry->key, buf, len);
322         mutex_unlock(&smcreg.mutex);
323
324         return ret;
325 }
326
327 static int applesmc_write_entry(const struct applesmc_entry *entry,
328                                 const u8 *buf, u8 len)
329 {
330         int ret;
331
332         if (entry->len != len)
333                 return -EINVAL;
334         mutex_lock(&smcreg.mutex);
335         ret = write_smc(APPLESMC_WRITE_CMD, entry->key, buf, len);
336         mutex_unlock(&smcreg.mutex);
337         return ret;
338 }
339
340 static const struct applesmc_entry *applesmc_get_entry_by_index(int index)
341 {
342         struct applesmc_entry *cache = &smcreg.cache[index];
343         u8 key[4], info[6];
344         __be32 be;
345         int ret = 0;
346
347         if (cache->valid)
348                 return cache;
349
350         mutex_lock(&smcreg.mutex);
351
352         if (cache->valid)
353                 goto out;
354         be = cpu_to_be32(index);
355         ret = read_smc(APPLESMC_GET_KEY_BY_INDEX_CMD, (u8 *)&be, key, 4);
356         if (ret)
357                 goto out;
358         ret = read_smc(APPLESMC_GET_KEY_TYPE_CMD, key, info, 6);
359         if (ret)
360                 goto out;
361
362         memcpy(cache->key, key, 4);
363         cache->len = info[0];
364         memcpy(cache->type, &info[1], 4);
365         cache->flags = info[5];
366         cache->valid = 1;
367
368 out:
369         mutex_unlock(&smcreg.mutex);
370         if (ret)
371                 return ERR_PTR(ret);
372         return cache;
373 }
374
375 static int applesmc_get_lower_bound(unsigned int *lo, const char *key)
376 {
377         int begin = 0, end = smcreg.key_count;
378         const struct applesmc_entry *entry;
379
380         while (begin != end) {
381                 int middle = begin + (end - begin) / 2;
382                 entry = applesmc_get_entry_by_index(middle);
383                 if (IS_ERR(entry)) {
384                         *lo = 0;
385                         return PTR_ERR(entry);
386                 }
387                 if (strcmp(entry->key, key) < 0)
388                         begin = middle + 1;
389                 else
390                         end = middle;
391         }
392
393         *lo = begin;
394         return 0;
395 }
396
397 static int applesmc_get_upper_bound(unsigned int *hi, const char *key)
398 {
399         int begin = 0, end = smcreg.key_count;
400         const struct applesmc_entry *entry;
401
402         while (begin != end) {
403                 int middle = begin + (end - begin) / 2;
404                 entry = applesmc_get_entry_by_index(middle);
405                 if (IS_ERR(entry)) {
406                         *hi = smcreg.key_count;
407                         return PTR_ERR(entry);
408                 }
409                 if (strcmp(key, entry->key) < 0)
410                         end = middle;
411                 else
412                         begin = middle + 1;
413         }
414
415         *hi = begin;
416         return 0;
417 }
418
419 static const struct applesmc_entry *applesmc_get_entry_by_key(const char *key)
420 {
421         int begin, end;
422         int ret;
423
424         ret = applesmc_get_lower_bound(&begin, key);
425         if (ret)
426                 return ERR_PTR(ret);
427         ret = applesmc_get_upper_bound(&end, key);
428         if (ret)
429                 return ERR_PTR(ret);
430         if (end - begin != 1)
431                 return ERR_PTR(-EINVAL);
432
433         return applesmc_get_entry_by_index(begin);
434 }
435
436 static int applesmc_read_key(const char *key, u8 *buffer, u8 len)
437 {
438         const struct applesmc_entry *entry;
439
440         entry = applesmc_get_entry_by_key(key);
441         if (IS_ERR(entry))
442                 return PTR_ERR(entry);
443
444         return applesmc_read_entry(entry, buffer, len);
445 }
446
447 static int applesmc_write_key(const char *key, const u8 *buffer, u8 len)
448 {
449         const struct applesmc_entry *entry;
450
451         entry = applesmc_get_entry_by_key(key);
452         if (IS_ERR(entry))
453                 return PTR_ERR(entry);
454
455         return applesmc_write_entry(entry, buffer, len);
456 }
457
458 static int applesmc_has_key(const char *key, bool *value)
459 {
460         const struct applesmc_entry *entry;
461
462         entry = applesmc_get_entry_by_key(key);
463         if (IS_ERR(entry) && PTR_ERR(entry) != -EINVAL)
464                 return PTR_ERR(entry);
465
466         *value = !IS_ERR(entry);
467         return 0;
468 }
469
470 /*
471  * applesmc_read_s16 - Read 16-bit signed big endian register
472  */
473 static int applesmc_read_s16(const char *key, s16 *value)
474 {
475         u8 buffer[2];
476         int ret;
477
478         ret = applesmc_read_key(key, buffer, 2);
479         if (ret)
480                 return ret;
481
482         *value = ((s16)buffer[0] << 8) | buffer[1];
483         return 0;
484 }
485
486 /*
487  * applesmc_device_init - initialize the accelerometer.  Can sleep.
488  */
489 static void applesmc_device_init(void)
490 {
491         int total;
492         u8 buffer[2];
493
494         if (!smcreg.has_accelerometer)
495                 return;
496
497         for (total = INIT_TIMEOUT_MSECS; total > 0; total -= INIT_WAIT_MSECS) {
498                 if (!applesmc_read_key(MOTION_SENSOR_KEY, buffer, 2) &&
499                                 (buffer[0] != 0x00 || buffer[1] != 0x00))
500                         return;
501                 buffer[0] = 0xe0;
502                 buffer[1] = 0x00;
503                 applesmc_write_key(MOTION_SENSOR_KEY, buffer, 2);
504                 msleep(INIT_WAIT_MSECS);
505         }
506
507         pr_warn("failed to init the device\n");
508 }
509
510 static int applesmc_init_index(struct applesmc_registers *s)
511 {
512         const struct applesmc_entry *entry;
513         unsigned int i;
514
515         if (s->index)
516                 return 0;
517
518         s->index = kcalloc(s->temp_count, sizeof(s->index[0]), GFP_KERNEL);
519         if (!s->index)
520                 return -ENOMEM;
521
522         for (i = s->temp_begin; i < s->temp_end; i++) {
523                 entry = applesmc_get_entry_by_index(i);
524                 if (IS_ERR(entry))
525                         continue;
526                 if (strcmp(entry->type, TEMP_SENSOR_TYPE))
527                         continue;
528                 s->index[s->index_count++] = entry->key;
529         }
530
531         return 0;
532 }
533
534 /*
535  * applesmc_init_smcreg_try - Try to initialize register cache. Idempotent.
536  */
537 static int applesmc_init_smcreg_try(void)
538 {
539         struct applesmc_registers *s = &smcreg;
540         bool left_light_sensor = 0, right_light_sensor = 0;
541         unsigned int count;
542         u8 tmp[1];
543         int ret;
544
545         if (s->init_complete)
546                 return 0;
547
548         ret = read_register_count(&count);
549         if (ret)
550                 return ret;
551
552         if (s->cache && s->key_count != count) {
553                 pr_warn("key count changed from %d to %d\n",
554                         s->key_count, count);
555                 kfree(s->cache);
556                 s->cache = NULL;
557         }
558         s->key_count = count;
559
560         if (!s->cache)
561                 s->cache = kcalloc(s->key_count, sizeof(*s->cache), GFP_KERNEL);
562         if (!s->cache)
563                 return -ENOMEM;
564
565         ret = applesmc_read_key(FANS_COUNT, tmp, 1);
566         if (ret)
567                 return ret;
568         s->fan_count = tmp[0];
569         if (s->fan_count > 10)
570                 s->fan_count = 10;
571
572         ret = applesmc_get_lower_bound(&s->temp_begin, "T");
573         if (ret)
574                 return ret;
575         ret = applesmc_get_lower_bound(&s->temp_end, "U");
576         if (ret)
577                 return ret;
578         s->temp_count = s->temp_end - s->temp_begin;
579
580         ret = applesmc_init_index(s);
581         if (ret)
582                 return ret;
583
584         ret = applesmc_has_key(LIGHT_SENSOR_LEFT_KEY, &left_light_sensor);
585         if (ret)
586                 return ret;
587         ret = applesmc_has_key(LIGHT_SENSOR_RIGHT_KEY, &right_light_sensor);
588         if (ret)
589                 return ret;
590         ret = applesmc_has_key(MOTION_SENSOR_KEY, &s->has_accelerometer);
591         if (ret)
592                 return ret;
593         ret = applesmc_has_key(BACKLIGHT_KEY, &s->has_key_backlight);
594         if (ret)
595                 return ret;
596
597         s->num_light_sensors = left_light_sensor + right_light_sensor;
598         s->init_complete = true;
599
600         pr_info("key=%d fan=%d temp=%d index=%d acc=%d lux=%d kbd=%d\n",
601                s->key_count, s->fan_count, s->temp_count, s->index_count,
602                s->has_accelerometer,
603                s->num_light_sensors,
604                s->has_key_backlight);
605
606         return 0;
607 }
608
609 static void applesmc_destroy_smcreg(void)
610 {
611         kfree(smcreg.index);
612         smcreg.index = NULL;
613         kfree(smcreg.cache);
614         smcreg.cache = NULL;
615         smcreg.init_complete = false;
616 }
617
618 /*
619  * applesmc_init_smcreg - Initialize register cache.
620  *
621  * Retries until initialization is successful, or the operation times out.
622  *
623  */
624 static int applesmc_init_smcreg(void)
625 {
626         int ms, ret;
627
628         for (ms = 0; ms < INIT_TIMEOUT_MSECS; ms += INIT_WAIT_MSECS) {
629                 ret = applesmc_init_smcreg_try();
630                 if (!ret) {
631                         if (ms)
632                                 pr_info("init_smcreg() took %d ms\n", ms);
633                         return 0;
634                 }
635                 msleep(INIT_WAIT_MSECS);
636         }
637
638         applesmc_destroy_smcreg();
639
640         return ret;
641 }
642
643 /* Device model stuff */
644 static int applesmc_probe(struct platform_device *dev)
645 {
646         int ret;
647
648         ret = applesmc_init_smcreg();
649         if (ret)
650                 return ret;
651
652         applesmc_device_init();
653
654         return 0;
655 }
656
657 /* Synchronize device with memorized backlight state */
658 static int applesmc_pm_resume(struct device *dev)
659 {
660         if (smcreg.has_key_backlight)
661                 applesmc_write_key(BACKLIGHT_KEY, backlight_state, 2);
662         return 0;
663 }
664
665 /* Reinitialize device on resume from hibernation */
666 static int applesmc_pm_restore(struct device *dev)
667 {
668         applesmc_device_init();
669         return applesmc_pm_resume(dev);
670 }
671
672 static const struct dev_pm_ops applesmc_pm_ops = {
673         .resume = applesmc_pm_resume,
674         .restore = applesmc_pm_restore,
675 };
676
677 static struct platform_driver applesmc_driver = {
678         .probe = applesmc_probe,
679         .driver = {
680                 .name = "applesmc",
681                 .pm = &applesmc_pm_ops,
682         },
683 };
684
685 /*
686  * applesmc_calibrate - Set our "resting" values.  Callers must
687  * hold applesmc_lock.
688  */
689 static void applesmc_calibrate(void)
690 {
691         applesmc_read_s16(MOTION_SENSOR_X_KEY, &rest_x);
692         applesmc_read_s16(MOTION_SENSOR_Y_KEY, &rest_y);
693         rest_x = -rest_x;
694 }
695
696 static void applesmc_idev_poll(struct input_polled_dev *dev)
697 {
698         struct input_dev *idev = dev->input;
699         s16 x, y;
700
701         if (applesmc_read_s16(MOTION_SENSOR_X_KEY, &x))
702                 return;
703         if (applesmc_read_s16(MOTION_SENSOR_Y_KEY, &y))
704                 return;
705
706         x = -x;
707         input_report_abs(idev, ABS_X, x - rest_x);
708         input_report_abs(idev, ABS_Y, y - rest_y);
709         input_sync(idev);
710 }
711
712 /* Sysfs Files */
713
714 static ssize_t applesmc_name_show(struct device *dev,
715                                    struct device_attribute *attr, char *buf)
716 {
717         return snprintf(buf, PAGE_SIZE, "applesmc\n");
718 }
719
720 static ssize_t applesmc_position_show(struct device *dev,
721                                    struct device_attribute *attr, char *buf)
722 {
723         int ret;
724         s16 x, y, z;
725
726         ret = applesmc_read_s16(MOTION_SENSOR_X_KEY, &x);
727         if (ret)
728                 goto out;
729         ret = applesmc_read_s16(MOTION_SENSOR_Y_KEY, &y);
730         if (ret)
731                 goto out;
732         ret = applesmc_read_s16(MOTION_SENSOR_Z_KEY, &z);
733         if (ret)
734                 goto out;
735
736 out:
737         if (ret)
738                 return ret;
739         else
740                 return snprintf(buf, PAGE_SIZE, "(%d,%d,%d)\n", x, y, z);
741 }
742
743 static ssize_t applesmc_light_show(struct device *dev,
744                                 struct device_attribute *attr, char *sysfsbuf)
745 {
746         const struct applesmc_entry *entry;
747         static int data_length;
748         int ret;
749         u8 left = 0, right = 0;
750         u8 buffer[10];
751
752         if (!data_length) {
753                 entry = applesmc_get_entry_by_key(LIGHT_SENSOR_LEFT_KEY);
754                 if (IS_ERR(entry))
755                         return PTR_ERR(entry);
756                 if (entry->len > 10)
757                         return -ENXIO;
758                 data_length = entry->len;
759                 pr_info("light sensor data length set to %d\n", data_length);
760         }
761
762         ret = applesmc_read_key(LIGHT_SENSOR_LEFT_KEY, buffer, data_length);
763         /* newer macbooks report a single 10-bit bigendian value */
764         if (data_length == 10) {
765                 left = be16_to_cpu(*(__be16 *)(buffer + 6)) >> 2;
766                 goto out;
767         }
768         left = buffer[2];
769         if (ret)
770                 goto out;
771         ret = applesmc_read_key(LIGHT_SENSOR_RIGHT_KEY, buffer, data_length);
772         right = buffer[2];
773
774 out:
775         if (ret)
776                 return ret;
777         else
778                 return snprintf(sysfsbuf, PAGE_SIZE, "(%d,%d)\n", left, right);
779 }
780
781 /* Displays sensor key as label */
782 static ssize_t applesmc_show_sensor_label(struct device *dev,
783                         struct device_attribute *devattr, char *sysfsbuf)
784 {
785         const char *key = smcreg.index[to_index(devattr)];
786
787         return snprintf(sysfsbuf, PAGE_SIZE, "%s\n", key);
788 }
789
790 /* Displays degree Celsius * 1000 */
791 static ssize_t applesmc_show_temperature(struct device *dev,
792                         struct device_attribute *devattr, char *sysfsbuf)
793 {
794         const char *key = smcreg.index[to_index(devattr)];
795         int ret;
796         s16 value;
797         int temp;
798
799         ret = applesmc_read_s16(key, &value);
800         if (ret)
801                 return ret;
802
803         temp = 250 * (value >> 6);
804
805         return snprintf(sysfsbuf, PAGE_SIZE, "%d\n", temp);
806 }
807
808 static ssize_t applesmc_show_fan_speed(struct device *dev,
809                                 struct device_attribute *attr, char *sysfsbuf)
810 {
811         int ret;
812         unsigned int speed = 0;
813         char newkey[5];
814         u8 buffer[2];
815
816         scnprintf(newkey, sizeof(newkey), fan_speed_fmt[to_option(attr)],
817                   to_index(attr));
818
819         ret = applesmc_read_key(newkey, buffer, 2);
820         speed = ((buffer[0] << 8 | buffer[1]) >> 2);
821
822         if (ret)
823                 return ret;
824         else
825                 return snprintf(sysfsbuf, PAGE_SIZE, "%u\n", speed);
826 }
827
828 static ssize_t applesmc_store_fan_speed(struct device *dev,
829                                         struct device_attribute *attr,
830                                         const char *sysfsbuf, size_t count)
831 {
832         int ret;
833         unsigned long speed;
834         char newkey[5];
835         u8 buffer[2];
836
837         if (kstrtoul(sysfsbuf, 10, &speed) < 0 || speed >= 0x4000)
838                 return -EINVAL;         /* Bigger than a 14-bit value */
839
840         scnprintf(newkey, sizeof(newkey), fan_speed_fmt[to_option(attr)],
841                   to_index(attr));
842
843         buffer[0] = (speed >> 6) & 0xff;
844         buffer[1] = (speed << 2) & 0xff;
845         ret = applesmc_write_key(newkey, buffer, 2);
846
847         if (ret)
848                 return ret;
849         else
850                 return count;
851 }
852
853 static ssize_t applesmc_show_fan_manual(struct device *dev,
854                         struct device_attribute *attr, char *sysfsbuf)
855 {
856         int ret;
857         u16 manual = 0;
858         u8 buffer[2];
859
860         ret = applesmc_read_key(FANS_MANUAL, buffer, 2);
861         manual = ((buffer[0] << 8 | buffer[1]) >> to_index(attr)) & 0x01;
862
863         if (ret)
864                 return ret;
865         else
866                 return snprintf(sysfsbuf, PAGE_SIZE, "%d\n", manual);
867 }
868
869 static ssize_t applesmc_store_fan_manual(struct device *dev,
870                                          struct device_attribute *attr,
871                                          const char *sysfsbuf, size_t count)
872 {
873         int ret;
874         u8 buffer[2];
875         unsigned long input;
876         u16 val;
877
878         if (kstrtoul(sysfsbuf, 10, &input) < 0)
879                 return -EINVAL;
880
881         ret = applesmc_read_key(FANS_MANUAL, buffer, 2);
882         val = (buffer[0] << 8 | buffer[1]);
883         if (ret)
884                 goto out;
885
886         if (input)
887                 val = val | (0x01 << to_index(attr));
888         else
889                 val = val & ~(0x01 << to_index(attr));
890
891         buffer[0] = (val >> 8) & 0xFF;
892         buffer[1] = val & 0xFF;
893
894         ret = applesmc_write_key(FANS_MANUAL, buffer, 2);
895
896 out:
897         if (ret)
898                 return ret;
899         else
900                 return count;
901 }
902
903 static ssize_t applesmc_show_fan_position(struct device *dev,
904                                 struct device_attribute *attr, char *sysfsbuf)
905 {
906         int ret;
907         char newkey[5];
908         u8 buffer[17];
909
910         scnprintf(newkey, sizeof(newkey), FAN_ID_FMT, to_index(attr));
911
912         ret = applesmc_read_key(newkey, buffer, 16);
913         buffer[16] = 0;
914
915         if (ret)
916                 return ret;
917         else
918                 return snprintf(sysfsbuf, PAGE_SIZE, "%s\n", buffer+4);
919 }
920
921 static ssize_t applesmc_calibrate_show(struct device *dev,
922                                 struct device_attribute *attr, char *sysfsbuf)
923 {
924         return snprintf(sysfsbuf, PAGE_SIZE, "(%d,%d)\n", rest_x, rest_y);
925 }
926
927 static ssize_t applesmc_calibrate_store(struct device *dev,
928         struct device_attribute *attr, const char *sysfsbuf, size_t count)
929 {
930         applesmc_calibrate();
931
932         return count;
933 }
934
935 static void applesmc_backlight_set(struct work_struct *work)
936 {
937         applesmc_write_key(BACKLIGHT_KEY, backlight_state, 2);
938 }
939 static DECLARE_WORK(backlight_work, &applesmc_backlight_set);
940
941 static void applesmc_brightness_set(struct led_classdev *led_cdev,
942                                                 enum led_brightness value)
943 {
944         int ret;
945
946         backlight_state[0] = value;
947         ret = queue_work(applesmc_led_wq, &backlight_work);
948
949         if (debug && (!ret))
950                 dev_dbg(led_cdev->dev, "work was already on the queue.\n");
951 }
952
953 static ssize_t applesmc_key_count_show(struct device *dev,
954                                 struct device_attribute *attr, char *sysfsbuf)
955 {
956         int ret;
957         u8 buffer[4];
958         u32 count;
959
960         ret = applesmc_read_key(KEY_COUNT_KEY, buffer, 4);
961         count = ((u32)buffer[0]<<24) + ((u32)buffer[1]<<16) +
962                                                 ((u32)buffer[2]<<8) + buffer[3];
963
964         if (ret)
965                 return ret;
966         else
967                 return snprintf(sysfsbuf, PAGE_SIZE, "%d\n", count);
968 }
969
970 static ssize_t applesmc_key_at_index_read_show(struct device *dev,
971                                 struct device_attribute *attr, char *sysfsbuf)
972 {
973         const struct applesmc_entry *entry;
974         int ret;
975
976         entry = applesmc_get_entry_by_index(key_at_index);
977         if (IS_ERR(entry))
978                 return PTR_ERR(entry);
979         ret = applesmc_read_entry(entry, sysfsbuf, entry->len);
980         if (ret)
981                 return ret;
982
983         return entry->len;
984 }
985
986 static ssize_t applesmc_key_at_index_data_length_show(struct device *dev,
987                                 struct device_attribute *attr, char *sysfsbuf)
988 {
989         const struct applesmc_entry *entry;
990
991         entry = applesmc_get_entry_by_index(key_at_index);
992         if (IS_ERR(entry))
993                 return PTR_ERR(entry);
994
995         return snprintf(sysfsbuf, PAGE_SIZE, "%d\n", entry->len);
996 }
997
998 static ssize_t applesmc_key_at_index_type_show(struct device *dev,
999                                 struct device_attribute *attr, char *sysfsbuf)
1000 {
1001         const struct applesmc_entry *entry;
1002
1003         entry = applesmc_get_entry_by_index(key_at_index);
1004         if (IS_ERR(entry))
1005                 return PTR_ERR(entry);
1006
1007         return snprintf(sysfsbuf, PAGE_SIZE, "%s\n", entry->type);
1008 }
1009
1010 static ssize_t applesmc_key_at_index_name_show(struct device *dev,
1011                                 struct device_attribute *attr, char *sysfsbuf)
1012 {
1013         const struct applesmc_entry *entry;
1014
1015         entry = applesmc_get_entry_by_index(key_at_index);
1016         if (IS_ERR(entry))
1017                 return PTR_ERR(entry);
1018
1019         return snprintf(sysfsbuf, PAGE_SIZE, "%s\n", entry->key);
1020 }
1021
1022 static ssize_t applesmc_key_at_index_show(struct device *dev,
1023                                 struct device_attribute *attr, char *sysfsbuf)
1024 {
1025         return snprintf(sysfsbuf, PAGE_SIZE, "%d\n", key_at_index);
1026 }
1027
1028 static ssize_t applesmc_key_at_index_store(struct device *dev,
1029         struct device_attribute *attr, const char *sysfsbuf, size_t count)
1030 {
1031         unsigned long newkey;
1032
1033         if (kstrtoul(sysfsbuf, 10, &newkey) < 0
1034             || newkey >= smcreg.key_count)
1035                 return -EINVAL;
1036
1037         key_at_index = newkey;
1038         return count;
1039 }
1040
1041 static struct led_classdev applesmc_backlight = {
1042         .name                   = "smc::kbd_backlight",
1043         .default_trigger        = "nand-disk",
1044         .brightness_set         = applesmc_brightness_set,
1045 };
1046
1047 static struct applesmc_node_group info_group[] = {
1048         { "name", applesmc_name_show },
1049         { "key_count", applesmc_key_count_show },
1050         { "key_at_index", applesmc_key_at_index_show, applesmc_key_at_index_store },
1051         { "key_at_index_name", applesmc_key_at_index_name_show },
1052         { "key_at_index_type", applesmc_key_at_index_type_show },
1053         { "key_at_index_data_length", applesmc_key_at_index_data_length_show },
1054         { "key_at_index_data", applesmc_key_at_index_read_show },
1055         { }
1056 };
1057
1058 static struct applesmc_node_group accelerometer_group[] = {
1059         { "position", applesmc_position_show },
1060         { "calibrate", applesmc_calibrate_show, applesmc_calibrate_store },
1061         { }
1062 };
1063
1064 static struct applesmc_node_group light_sensor_group[] = {
1065         { "light", applesmc_light_show },
1066         { }
1067 };
1068
1069 static struct applesmc_node_group fan_group[] = {
1070         { "fan%d_label", applesmc_show_fan_position },
1071         { "fan%d_input", applesmc_show_fan_speed, NULL, 0 },
1072         { "fan%d_min", applesmc_show_fan_speed, applesmc_store_fan_speed, 1 },
1073         { "fan%d_max", applesmc_show_fan_speed, NULL, 2 },
1074         { "fan%d_safe", applesmc_show_fan_speed, NULL, 3 },
1075         { "fan%d_output", applesmc_show_fan_speed, applesmc_store_fan_speed, 4 },
1076         { "fan%d_manual", applesmc_show_fan_manual, applesmc_store_fan_manual },
1077         { }
1078 };
1079
1080 static struct applesmc_node_group temp_group[] = {
1081         { "temp%d_label", applesmc_show_sensor_label },
1082         { "temp%d_input", applesmc_show_temperature },
1083         { }
1084 };
1085
1086 /* Module stuff */
1087
1088 /*
1089  * applesmc_destroy_nodes - remove files and free associated memory
1090  */
1091 static void applesmc_destroy_nodes(struct applesmc_node_group *groups)
1092 {
1093         struct applesmc_node_group *grp;
1094         struct applesmc_dev_attr *node;
1095
1096         for (grp = groups; grp->nodes; grp++) {
1097                 for (node = grp->nodes; node->sda.dev_attr.attr.name; node++)
1098                         sysfs_remove_file(&pdev->dev.kobj,
1099                                           &node->sda.dev_attr.attr);
1100                 kfree(grp->nodes);
1101                 grp->nodes = NULL;
1102         }
1103 }
1104
1105 /*
1106  * applesmc_create_nodes - create a two-dimensional group of sysfs files
1107  */
1108 static int applesmc_create_nodes(struct applesmc_node_group *groups, int num)
1109 {
1110         struct applesmc_node_group *grp;
1111         struct applesmc_dev_attr *node;
1112         struct attribute *attr;
1113         int ret, i;
1114
1115         for (grp = groups; grp->format; grp++) {
1116                 grp->nodes = kcalloc(num + 1, sizeof(*node), GFP_KERNEL);
1117                 if (!grp->nodes) {
1118                         ret = -ENOMEM;
1119                         goto out;
1120                 }
1121                 for (i = 0; i < num; i++) {
1122                         node = &grp->nodes[i];
1123                         scnprintf(node->name, sizeof(node->name), grp->format,
1124                                   i + 1);
1125                         node->sda.index = (grp->option << 16) | (i & 0xffff);
1126                         node->sda.dev_attr.show = grp->show;
1127                         node->sda.dev_attr.store = grp->store;
1128                         attr = &node->sda.dev_attr.attr;
1129                         sysfs_attr_init(attr);
1130                         attr->name = node->name;
1131                         attr->mode = 0444 | (grp->store ? 0200 : 0);
1132                         ret = sysfs_create_file(&pdev->dev.kobj, attr);
1133                         if (ret) {
1134                                 attr->name = NULL;
1135                                 goto out;
1136                         }
1137                 }
1138         }
1139
1140         return 0;
1141 out:
1142         applesmc_destroy_nodes(groups);
1143         return ret;
1144 }
1145
1146 /* Create accelerometer resources */
1147 static int applesmc_create_accelerometer(void)
1148 {
1149         struct input_dev *idev;
1150         int ret;
1151
1152         if (!smcreg.has_accelerometer)
1153                 return 0;
1154
1155         ret = applesmc_create_nodes(accelerometer_group, 1);
1156         if (ret)
1157                 goto out;
1158
1159         applesmc_idev = input_allocate_polled_device();
1160         if (!applesmc_idev) {
1161                 ret = -ENOMEM;
1162                 goto out_sysfs;
1163         }
1164
1165         applesmc_idev->poll = applesmc_idev_poll;
1166         applesmc_idev->poll_interval = APPLESMC_POLL_INTERVAL;
1167
1168         /* initial calibrate for the input device */
1169         applesmc_calibrate();
1170
1171         /* initialize the input device */
1172         idev = applesmc_idev->input;
1173         idev->name = "applesmc";
1174         idev->id.bustype = BUS_HOST;
1175         idev->dev.parent = &pdev->dev;
1176         idev->evbit[0] = BIT_MASK(EV_ABS);
1177         input_set_abs_params(idev, ABS_X,
1178                         -256, 256, APPLESMC_INPUT_FUZZ, APPLESMC_INPUT_FLAT);
1179         input_set_abs_params(idev, ABS_Y,
1180                         -256, 256, APPLESMC_INPUT_FUZZ, APPLESMC_INPUT_FLAT);
1181
1182         ret = input_register_polled_device(applesmc_idev);
1183         if (ret)
1184                 goto out_idev;
1185
1186         return 0;
1187
1188 out_idev:
1189         input_free_polled_device(applesmc_idev);
1190
1191 out_sysfs:
1192         applesmc_destroy_nodes(accelerometer_group);
1193
1194 out:
1195         pr_warn("driver init failed (ret=%d)!\n", ret);
1196         return ret;
1197 }
1198
1199 /* Release all resources used by the accelerometer */
1200 static void applesmc_release_accelerometer(void)
1201 {
1202         if (!smcreg.has_accelerometer)
1203                 return;
1204         input_unregister_polled_device(applesmc_idev);
1205         input_free_polled_device(applesmc_idev);
1206         applesmc_destroy_nodes(accelerometer_group);
1207 }
1208
1209 static int applesmc_create_light_sensor(void)
1210 {
1211         if (!smcreg.num_light_sensors)
1212                 return 0;
1213         return applesmc_create_nodes(light_sensor_group, 1);
1214 }
1215
1216 static void applesmc_release_light_sensor(void)
1217 {
1218         if (!smcreg.num_light_sensors)
1219                 return;
1220         applesmc_destroy_nodes(light_sensor_group);
1221 }
1222
1223 static int applesmc_create_key_backlight(void)
1224 {
1225         if (!smcreg.has_key_backlight)
1226                 return 0;
1227         applesmc_led_wq = create_singlethread_workqueue("applesmc-led");
1228         if (!applesmc_led_wq)
1229                 return -ENOMEM;
1230         return led_classdev_register(&pdev->dev, &applesmc_backlight);
1231 }
1232
1233 static void applesmc_release_key_backlight(void)
1234 {
1235         if (!smcreg.has_key_backlight)
1236                 return;
1237         led_classdev_unregister(&applesmc_backlight);
1238         destroy_workqueue(applesmc_led_wq);
1239 }
1240
1241 static int applesmc_dmi_match(const struct dmi_system_id *id)
1242 {
1243         return 1;
1244 }
1245
1246 /*
1247  * Note that DMI_MATCH(...,"MacBook") will match "MacBookPro1,1".
1248  * So we need to put "Apple MacBook Pro" before "Apple MacBook".
1249  */
1250 static const struct dmi_system_id applesmc_whitelist[] __initconst = {
1251         { applesmc_dmi_match, "Apple MacBook Air", {
1252           DMI_MATCH(DMI_BOARD_VENDOR, "Apple"),
1253           DMI_MATCH(DMI_PRODUCT_NAME, "MacBookAir") },
1254         },
1255         { applesmc_dmi_match, "Apple MacBook Pro", {
1256           DMI_MATCH(DMI_BOARD_VENDOR, "Apple"),
1257           DMI_MATCH(DMI_PRODUCT_NAME, "MacBookPro") },
1258         },
1259         { applesmc_dmi_match, "Apple MacBook", {
1260           DMI_MATCH(DMI_BOARD_VENDOR, "Apple"),
1261           DMI_MATCH(DMI_PRODUCT_NAME, "MacBook") },
1262         },
1263         { applesmc_dmi_match, "Apple Macmini", {
1264           DMI_MATCH(DMI_BOARD_VENDOR, "Apple"),
1265           DMI_MATCH(DMI_PRODUCT_NAME, "Macmini") },
1266         },
1267         { applesmc_dmi_match, "Apple MacPro", {
1268           DMI_MATCH(DMI_BOARD_VENDOR, "Apple"),
1269           DMI_MATCH(DMI_PRODUCT_NAME, "MacPro") },
1270         },
1271         { applesmc_dmi_match, "Apple iMac", {
1272           DMI_MATCH(DMI_BOARD_VENDOR, "Apple"),
1273           DMI_MATCH(DMI_PRODUCT_NAME, "iMac") },
1274         },
1275         { .ident = NULL }
1276 };
1277
1278 static int __init applesmc_init(void)
1279 {
1280         int ret;
1281
1282         if (!dmi_check_system(applesmc_whitelist)) {
1283                 pr_warn("supported laptop not found!\n");
1284                 ret = -ENODEV;
1285                 goto out;
1286         }
1287
1288         if (!request_region(APPLESMC_DATA_PORT, APPLESMC_NR_PORTS,
1289                                                                 "applesmc")) {
1290                 ret = -ENXIO;
1291                 goto out;
1292         }
1293
1294         ret = platform_driver_register(&applesmc_driver);
1295         if (ret)
1296                 goto out_region;
1297
1298         pdev = platform_device_register_simple("applesmc", APPLESMC_DATA_PORT,
1299                                                NULL, 0);
1300         if (IS_ERR(pdev)) {
1301                 ret = PTR_ERR(pdev);
1302                 goto out_driver;
1303         }
1304
1305         /* create register cache */
1306         ret = applesmc_init_smcreg();
1307         if (ret)
1308                 goto out_device;
1309
1310         ret = applesmc_create_nodes(info_group, 1);
1311         if (ret)
1312                 goto out_smcreg;
1313
1314         ret = applesmc_create_nodes(fan_group, smcreg.fan_count);
1315         if (ret)
1316                 goto out_info;
1317
1318         ret = applesmc_create_nodes(temp_group, smcreg.index_count);
1319         if (ret)
1320                 goto out_fans;
1321
1322         ret = applesmc_create_accelerometer();
1323         if (ret)
1324                 goto out_temperature;
1325
1326         ret = applesmc_create_light_sensor();
1327         if (ret)
1328                 goto out_accelerometer;
1329
1330         ret = applesmc_create_key_backlight();
1331         if (ret)
1332                 goto out_light_sysfs;
1333
1334         hwmon_dev = hwmon_device_register(&pdev->dev);
1335         if (IS_ERR(hwmon_dev)) {
1336                 ret = PTR_ERR(hwmon_dev);
1337                 goto out_light_ledclass;
1338         }
1339
1340         return 0;
1341
1342 out_light_ledclass:
1343         applesmc_release_key_backlight();
1344 out_light_sysfs:
1345         applesmc_release_light_sensor();
1346 out_accelerometer:
1347         applesmc_release_accelerometer();
1348 out_temperature:
1349         applesmc_destroy_nodes(temp_group);
1350 out_fans:
1351         applesmc_destroy_nodes(fan_group);
1352 out_info:
1353         applesmc_destroy_nodes(info_group);
1354 out_smcreg:
1355         applesmc_destroy_smcreg();
1356 out_device:
1357         platform_device_unregister(pdev);
1358 out_driver:
1359         platform_driver_unregister(&applesmc_driver);
1360 out_region:
1361         release_region(APPLESMC_DATA_PORT, APPLESMC_NR_PORTS);
1362 out:
1363         pr_warn("driver init failed (ret=%d)!\n", ret);
1364         return ret;
1365 }
1366
1367 static void __exit applesmc_exit(void)
1368 {
1369         hwmon_device_unregister(hwmon_dev);
1370         applesmc_release_key_backlight();
1371         applesmc_release_light_sensor();
1372         applesmc_release_accelerometer();
1373         applesmc_destroy_nodes(temp_group);
1374         applesmc_destroy_nodes(fan_group);
1375         applesmc_destroy_nodes(info_group);
1376         applesmc_destroy_smcreg();
1377         platform_device_unregister(pdev);
1378         platform_driver_unregister(&applesmc_driver);
1379         release_region(APPLESMC_DATA_PORT, APPLESMC_NR_PORTS);
1380 }
1381
1382 module_init(applesmc_init);
1383 module_exit(applesmc_exit);
1384
1385 MODULE_AUTHOR("Nicolas Boichat");
1386 MODULE_DESCRIPTION("Apple SMC");
1387 MODULE_LICENSE("GPL v2");
1388 MODULE_DEVICE_TABLE(dmi, applesmc_whitelist);