Merge branch 'parisc-4.9-1' of git://git.kernel.org/pub/scm/linux/kernel/git/deller...
[cascardo/linux.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
570         ret = applesmc_get_lower_bound(&s->temp_begin, "T");
571         if (ret)
572                 return ret;
573         ret = applesmc_get_lower_bound(&s->temp_end, "U");
574         if (ret)
575                 return ret;
576         s->temp_count = s->temp_end - s->temp_begin;
577
578         ret = applesmc_init_index(s);
579         if (ret)
580                 return ret;
581
582         ret = applesmc_has_key(LIGHT_SENSOR_LEFT_KEY, &left_light_sensor);
583         if (ret)
584                 return ret;
585         ret = applesmc_has_key(LIGHT_SENSOR_RIGHT_KEY, &right_light_sensor);
586         if (ret)
587                 return ret;
588         ret = applesmc_has_key(MOTION_SENSOR_KEY, &s->has_accelerometer);
589         if (ret)
590                 return ret;
591         ret = applesmc_has_key(BACKLIGHT_KEY, &s->has_key_backlight);
592         if (ret)
593                 return ret;
594
595         s->num_light_sensors = left_light_sensor + right_light_sensor;
596         s->init_complete = true;
597
598         pr_info("key=%d fan=%d temp=%d index=%d acc=%d lux=%d kbd=%d\n",
599                s->key_count, s->fan_count, s->temp_count, s->index_count,
600                s->has_accelerometer,
601                s->num_light_sensors,
602                s->has_key_backlight);
603
604         return 0;
605 }
606
607 static void applesmc_destroy_smcreg(void)
608 {
609         kfree(smcreg.index);
610         smcreg.index = NULL;
611         kfree(smcreg.cache);
612         smcreg.cache = NULL;
613         smcreg.init_complete = false;
614 }
615
616 /*
617  * applesmc_init_smcreg - Initialize register cache.
618  *
619  * Retries until initialization is successful, or the operation times out.
620  *
621  */
622 static int applesmc_init_smcreg(void)
623 {
624         int ms, ret;
625
626         for (ms = 0; ms < INIT_TIMEOUT_MSECS; ms += INIT_WAIT_MSECS) {
627                 ret = applesmc_init_smcreg_try();
628                 if (!ret) {
629                         if (ms)
630                                 pr_info("init_smcreg() took %d ms\n", ms);
631                         return 0;
632                 }
633                 msleep(INIT_WAIT_MSECS);
634         }
635
636         applesmc_destroy_smcreg();
637
638         return ret;
639 }
640
641 /* Device model stuff */
642 static int applesmc_probe(struct platform_device *dev)
643 {
644         int ret;
645
646         ret = applesmc_init_smcreg();
647         if (ret)
648                 return ret;
649
650         applesmc_device_init();
651
652         return 0;
653 }
654
655 /* Synchronize device with memorized backlight state */
656 static int applesmc_pm_resume(struct device *dev)
657 {
658         if (smcreg.has_key_backlight)
659                 applesmc_write_key(BACKLIGHT_KEY, backlight_state, 2);
660         return 0;
661 }
662
663 /* Reinitialize device on resume from hibernation */
664 static int applesmc_pm_restore(struct device *dev)
665 {
666         applesmc_device_init();
667         return applesmc_pm_resume(dev);
668 }
669
670 static const struct dev_pm_ops applesmc_pm_ops = {
671         .resume = applesmc_pm_resume,
672         .restore = applesmc_pm_restore,
673 };
674
675 static struct platform_driver applesmc_driver = {
676         .probe = applesmc_probe,
677         .driver = {
678                 .name = "applesmc",
679                 .pm = &applesmc_pm_ops,
680         },
681 };
682
683 /*
684  * applesmc_calibrate - Set our "resting" values.  Callers must
685  * hold applesmc_lock.
686  */
687 static void applesmc_calibrate(void)
688 {
689         applesmc_read_s16(MOTION_SENSOR_X_KEY, &rest_x);
690         applesmc_read_s16(MOTION_SENSOR_Y_KEY, &rest_y);
691         rest_x = -rest_x;
692 }
693
694 static void applesmc_idev_poll(struct input_polled_dev *dev)
695 {
696         struct input_dev *idev = dev->input;
697         s16 x, y;
698
699         if (applesmc_read_s16(MOTION_SENSOR_X_KEY, &x))
700                 return;
701         if (applesmc_read_s16(MOTION_SENSOR_Y_KEY, &y))
702                 return;
703
704         x = -x;
705         input_report_abs(idev, ABS_X, x - rest_x);
706         input_report_abs(idev, ABS_Y, y - rest_y);
707         input_sync(idev);
708 }
709
710 /* Sysfs Files */
711
712 static ssize_t applesmc_name_show(struct device *dev,
713                                    struct device_attribute *attr, char *buf)
714 {
715         return snprintf(buf, PAGE_SIZE, "applesmc\n");
716 }
717
718 static ssize_t applesmc_position_show(struct device *dev,
719                                    struct device_attribute *attr, char *buf)
720 {
721         int ret;
722         s16 x, y, z;
723
724         ret = applesmc_read_s16(MOTION_SENSOR_X_KEY, &x);
725         if (ret)
726                 goto out;
727         ret = applesmc_read_s16(MOTION_SENSOR_Y_KEY, &y);
728         if (ret)
729                 goto out;
730         ret = applesmc_read_s16(MOTION_SENSOR_Z_KEY, &z);
731         if (ret)
732                 goto out;
733
734 out:
735         if (ret)
736                 return ret;
737         else
738                 return snprintf(buf, PAGE_SIZE, "(%d,%d,%d)\n", x, y, z);
739 }
740
741 static ssize_t applesmc_light_show(struct device *dev,
742                                 struct device_attribute *attr, char *sysfsbuf)
743 {
744         const struct applesmc_entry *entry;
745         static int data_length;
746         int ret;
747         u8 left = 0, right = 0;
748         u8 buffer[10];
749
750         if (!data_length) {
751                 entry = applesmc_get_entry_by_key(LIGHT_SENSOR_LEFT_KEY);
752                 if (IS_ERR(entry))
753                         return PTR_ERR(entry);
754                 if (entry->len > 10)
755                         return -ENXIO;
756                 data_length = entry->len;
757                 pr_info("light sensor data length set to %d\n", data_length);
758         }
759
760         ret = applesmc_read_key(LIGHT_SENSOR_LEFT_KEY, buffer, data_length);
761         /* newer macbooks report a single 10-bit bigendian value */
762         if (data_length == 10) {
763                 left = be16_to_cpu(*(__be16 *)(buffer + 6)) >> 2;
764                 goto out;
765         }
766         left = buffer[2];
767         if (ret)
768                 goto out;
769         ret = applesmc_read_key(LIGHT_SENSOR_RIGHT_KEY, buffer, data_length);
770         right = buffer[2];
771
772 out:
773         if (ret)
774                 return ret;
775         else
776                 return snprintf(sysfsbuf, PAGE_SIZE, "(%d,%d)\n", left, right);
777 }
778
779 /* Displays sensor key as label */
780 static ssize_t applesmc_show_sensor_label(struct device *dev,
781                         struct device_attribute *devattr, char *sysfsbuf)
782 {
783         const char *key = smcreg.index[to_index(devattr)];
784
785         return snprintf(sysfsbuf, PAGE_SIZE, "%s\n", key);
786 }
787
788 /* Displays degree Celsius * 1000 */
789 static ssize_t applesmc_show_temperature(struct device *dev,
790                         struct device_attribute *devattr, char *sysfsbuf)
791 {
792         const char *key = smcreg.index[to_index(devattr)];
793         int ret;
794         s16 value;
795         int temp;
796
797         ret = applesmc_read_s16(key, &value);
798         if (ret)
799                 return ret;
800
801         temp = 250 * (value >> 6);
802
803         return snprintf(sysfsbuf, PAGE_SIZE, "%d\n", temp);
804 }
805
806 static ssize_t applesmc_show_fan_speed(struct device *dev,
807                                 struct device_attribute *attr, char *sysfsbuf)
808 {
809         int ret;
810         unsigned int speed = 0;
811         char newkey[5];
812         u8 buffer[2];
813
814         sprintf(newkey, fan_speed_fmt[to_option(attr)], to_index(attr));
815
816         ret = applesmc_read_key(newkey, buffer, 2);
817         speed = ((buffer[0] << 8 | buffer[1]) >> 2);
818
819         if (ret)
820                 return ret;
821         else
822                 return snprintf(sysfsbuf, PAGE_SIZE, "%u\n", speed);
823 }
824
825 static ssize_t applesmc_store_fan_speed(struct device *dev,
826                                         struct device_attribute *attr,
827                                         const char *sysfsbuf, size_t count)
828 {
829         int ret;
830         unsigned long speed;
831         char newkey[5];
832         u8 buffer[2];
833
834         if (kstrtoul(sysfsbuf, 10, &speed) < 0 || speed >= 0x4000)
835                 return -EINVAL;         /* Bigger than a 14-bit value */
836
837         sprintf(newkey, fan_speed_fmt[to_option(attr)], to_index(attr));
838
839         buffer[0] = (speed >> 6) & 0xff;
840         buffer[1] = (speed << 2) & 0xff;
841         ret = applesmc_write_key(newkey, buffer, 2);
842
843         if (ret)
844                 return ret;
845         else
846                 return count;
847 }
848
849 static ssize_t applesmc_show_fan_manual(struct device *dev,
850                         struct device_attribute *attr, char *sysfsbuf)
851 {
852         int ret;
853         u16 manual = 0;
854         u8 buffer[2];
855
856         ret = applesmc_read_key(FANS_MANUAL, buffer, 2);
857         manual = ((buffer[0] << 8 | buffer[1]) >> to_index(attr)) & 0x01;
858
859         if (ret)
860                 return ret;
861         else
862                 return snprintf(sysfsbuf, PAGE_SIZE, "%d\n", manual);
863 }
864
865 static ssize_t applesmc_store_fan_manual(struct device *dev,
866                                          struct device_attribute *attr,
867                                          const char *sysfsbuf, size_t count)
868 {
869         int ret;
870         u8 buffer[2];
871         unsigned long input;
872         u16 val;
873
874         if (kstrtoul(sysfsbuf, 10, &input) < 0)
875                 return -EINVAL;
876
877         ret = applesmc_read_key(FANS_MANUAL, buffer, 2);
878         val = (buffer[0] << 8 | buffer[1]);
879         if (ret)
880                 goto out;
881
882         if (input)
883                 val = val | (0x01 << to_index(attr));
884         else
885                 val = val & ~(0x01 << to_index(attr));
886
887         buffer[0] = (val >> 8) & 0xFF;
888         buffer[1] = val & 0xFF;
889
890         ret = applesmc_write_key(FANS_MANUAL, buffer, 2);
891
892 out:
893         if (ret)
894                 return ret;
895         else
896                 return count;
897 }
898
899 static ssize_t applesmc_show_fan_position(struct device *dev,
900                                 struct device_attribute *attr, char *sysfsbuf)
901 {
902         int ret;
903         char newkey[5];
904         u8 buffer[17];
905
906         sprintf(newkey, FAN_ID_FMT, to_index(attr));
907
908         ret = applesmc_read_key(newkey, buffer, 16);
909         buffer[16] = 0;
910
911         if (ret)
912                 return ret;
913         else
914                 return snprintf(sysfsbuf, PAGE_SIZE, "%s\n", buffer+4);
915 }
916
917 static ssize_t applesmc_calibrate_show(struct device *dev,
918                                 struct device_attribute *attr, char *sysfsbuf)
919 {
920         return snprintf(sysfsbuf, PAGE_SIZE, "(%d,%d)\n", rest_x, rest_y);
921 }
922
923 static ssize_t applesmc_calibrate_store(struct device *dev,
924         struct device_attribute *attr, const char *sysfsbuf, size_t count)
925 {
926         applesmc_calibrate();
927
928         return count;
929 }
930
931 static void applesmc_backlight_set(struct work_struct *work)
932 {
933         applesmc_write_key(BACKLIGHT_KEY, backlight_state, 2);
934 }
935 static DECLARE_WORK(backlight_work, &applesmc_backlight_set);
936
937 static void applesmc_brightness_set(struct led_classdev *led_cdev,
938                                                 enum led_brightness value)
939 {
940         int ret;
941
942         backlight_state[0] = value;
943         ret = queue_work(applesmc_led_wq, &backlight_work);
944
945         if (debug && (!ret))
946                 dev_dbg(led_cdev->dev, "work was already on the queue.\n");
947 }
948
949 static ssize_t applesmc_key_count_show(struct device *dev,
950                                 struct device_attribute *attr, char *sysfsbuf)
951 {
952         int ret;
953         u8 buffer[4];
954         u32 count;
955
956         ret = applesmc_read_key(KEY_COUNT_KEY, buffer, 4);
957         count = ((u32)buffer[0]<<24) + ((u32)buffer[1]<<16) +
958                                                 ((u32)buffer[2]<<8) + buffer[3];
959
960         if (ret)
961                 return ret;
962         else
963                 return snprintf(sysfsbuf, PAGE_SIZE, "%d\n", count);
964 }
965
966 static ssize_t applesmc_key_at_index_read_show(struct device *dev,
967                                 struct device_attribute *attr, char *sysfsbuf)
968 {
969         const struct applesmc_entry *entry;
970         int ret;
971
972         entry = applesmc_get_entry_by_index(key_at_index);
973         if (IS_ERR(entry))
974                 return PTR_ERR(entry);
975         ret = applesmc_read_entry(entry, sysfsbuf, entry->len);
976         if (ret)
977                 return ret;
978
979         return entry->len;
980 }
981
982 static ssize_t applesmc_key_at_index_data_length_show(struct device *dev,
983                                 struct device_attribute *attr, char *sysfsbuf)
984 {
985         const struct applesmc_entry *entry;
986
987         entry = applesmc_get_entry_by_index(key_at_index);
988         if (IS_ERR(entry))
989                 return PTR_ERR(entry);
990
991         return snprintf(sysfsbuf, PAGE_SIZE, "%d\n", entry->len);
992 }
993
994 static ssize_t applesmc_key_at_index_type_show(struct device *dev,
995                                 struct device_attribute *attr, char *sysfsbuf)
996 {
997         const struct applesmc_entry *entry;
998
999         entry = applesmc_get_entry_by_index(key_at_index);
1000         if (IS_ERR(entry))
1001                 return PTR_ERR(entry);
1002
1003         return snprintf(sysfsbuf, PAGE_SIZE, "%s\n", entry->type);
1004 }
1005
1006 static ssize_t applesmc_key_at_index_name_show(struct device *dev,
1007                                 struct device_attribute *attr, char *sysfsbuf)
1008 {
1009         const struct applesmc_entry *entry;
1010
1011         entry = applesmc_get_entry_by_index(key_at_index);
1012         if (IS_ERR(entry))
1013                 return PTR_ERR(entry);
1014
1015         return snprintf(sysfsbuf, PAGE_SIZE, "%s\n", entry->key);
1016 }
1017
1018 static ssize_t applesmc_key_at_index_show(struct device *dev,
1019                                 struct device_attribute *attr, char *sysfsbuf)
1020 {
1021         return snprintf(sysfsbuf, PAGE_SIZE, "%d\n", key_at_index);
1022 }
1023
1024 static ssize_t applesmc_key_at_index_store(struct device *dev,
1025         struct device_attribute *attr, const char *sysfsbuf, size_t count)
1026 {
1027         unsigned long newkey;
1028
1029         if (kstrtoul(sysfsbuf, 10, &newkey) < 0
1030             || newkey >= smcreg.key_count)
1031                 return -EINVAL;
1032
1033         key_at_index = newkey;
1034         return count;
1035 }
1036
1037 static struct led_classdev applesmc_backlight = {
1038         .name                   = "smc::kbd_backlight",
1039         .default_trigger        = "nand-disk",
1040         .brightness_set         = applesmc_brightness_set,
1041 };
1042
1043 static struct applesmc_node_group info_group[] = {
1044         { "name", applesmc_name_show },
1045         { "key_count", applesmc_key_count_show },
1046         { "key_at_index", applesmc_key_at_index_show, applesmc_key_at_index_store },
1047         { "key_at_index_name", applesmc_key_at_index_name_show },
1048         { "key_at_index_type", applesmc_key_at_index_type_show },
1049         { "key_at_index_data_length", applesmc_key_at_index_data_length_show },
1050         { "key_at_index_data", applesmc_key_at_index_read_show },
1051         { }
1052 };
1053
1054 static struct applesmc_node_group accelerometer_group[] = {
1055         { "position", applesmc_position_show },
1056         { "calibrate", applesmc_calibrate_show, applesmc_calibrate_store },
1057         { }
1058 };
1059
1060 static struct applesmc_node_group light_sensor_group[] = {
1061         { "light", applesmc_light_show },
1062         { }
1063 };
1064
1065 static struct applesmc_node_group fan_group[] = {
1066         { "fan%d_label", applesmc_show_fan_position },
1067         { "fan%d_input", applesmc_show_fan_speed, NULL, 0 },
1068         { "fan%d_min", applesmc_show_fan_speed, applesmc_store_fan_speed, 1 },
1069         { "fan%d_max", applesmc_show_fan_speed, NULL, 2 },
1070         { "fan%d_safe", applesmc_show_fan_speed, NULL, 3 },
1071         { "fan%d_output", applesmc_show_fan_speed, applesmc_store_fan_speed, 4 },
1072         { "fan%d_manual", applesmc_show_fan_manual, applesmc_store_fan_manual },
1073         { }
1074 };
1075
1076 static struct applesmc_node_group temp_group[] = {
1077         { "temp%d_label", applesmc_show_sensor_label },
1078         { "temp%d_input", applesmc_show_temperature },
1079         { }
1080 };
1081
1082 /* Module stuff */
1083
1084 /*
1085  * applesmc_destroy_nodes - remove files and free associated memory
1086  */
1087 static void applesmc_destroy_nodes(struct applesmc_node_group *groups)
1088 {
1089         struct applesmc_node_group *grp;
1090         struct applesmc_dev_attr *node;
1091
1092         for (grp = groups; grp->nodes; grp++) {
1093                 for (node = grp->nodes; node->sda.dev_attr.attr.name; node++)
1094                         sysfs_remove_file(&pdev->dev.kobj,
1095                                           &node->sda.dev_attr.attr);
1096                 kfree(grp->nodes);
1097                 grp->nodes = NULL;
1098         }
1099 }
1100
1101 /*
1102  * applesmc_create_nodes - create a two-dimensional group of sysfs files
1103  */
1104 static int applesmc_create_nodes(struct applesmc_node_group *groups, int num)
1105 {
1106         struct applesmc_node_group *grp;
1107         struct applesmc_dev_attr *node;
1108         struct attribute *attr;
1109         int ret, i;
1110
1111         for (grp = groups; grp->format; grp++) {
1112                 grp->nodes = kcalloc(num + 1, sizeof(*node), GFP_KERNEL);
1113                 if (!grp->nodes) {
1114                         ret = -ENOMEM;
1115                         goto out;
1116                 }
1117                 for (i = 0; i < num; i++) {
1118                         node = &grp->nodes[i];
1119                         sprintf(node->name, grp->format, i + 1);
1120                         node->sda.index = (grp->option << 16) | (i & 0xffff);
1121                         node->sda.dev_attr.show = grp->show;
1122                         node->sda.dev_attr.store = grp->store;
1123                         attr = &node->sda.dev_attr.attr;
1124                         sysfs_attr_init(attr);
1125                         attr->name = node->name;
1126                         attr->mode = S_IRUGO | (grp->store ? S_IWUSR : 0);
1127                         ret = sysfs_create_file(&pdev->dev.kobj, attr);
1128                         if (ret) {
1129                                 attr->name = NULL;
1130                                 goto out;
1131                         }
1132                 }
1133         }
1134
1135         return 0;
1136 out:
1137         applesmc_destroy_nodes(groups);
1138         return ret;
1139 }
1140
1141 /* Create accelerometer resources */
1142 static int applesmc_create_accelerometer(void)
1143 {
1144         struct input_dev *idev;
1145         int ret;
1146
1147         if (!smcreg.has_accelerometer)
1148                 return 0;
1149
1150         ret = applesmc_create_nodes(accelerometer_group, 1);
1151         if (ret)
1152                 goto out;
1153
1154         applesmc_idev = input_allocate_polled_device();
1155         if (!applesmc_idev) {
1156                 ret = -ENOMEM;
1157                 goto out_sysfs;
1158         }
1159
1160         applesmc_idev->poll = applesmc_idev_poll;
1161         applesmc_idev->poll_interval = APPLESMC_POLL_INTERVAL;
1162
1163         /* initial calibrate for the input device */
1164         applesmc_calibrate();
1165
1166         /* initialize the input device */
1167         idev = applesmc_idev->input;
1168         idev->name = "applesmc";
1169         idev->id.bustype = BUS_HOST;
1170         idev->dev.parent = &pdev->dev;
1171         idev->evbit[0] = BIT_MASK(EV_ABS);
1172         input_set_abs_params(idev, ABS_X,
1173                         -256, 256, APPLESMC_INPUT_FUZZ, APPLESMC_INPUT_FLAT);
1174         input_set_abs_params(idev, ABS_Y,
1175                         -256, 256, APPLESMC_INPUT_FUZZ, APPLESMC_INPUT_FLAT);
1176
1177         ret = input_register_polled_device(applesmc_idev);
1178         if (ret)
1179                 goto out_idev;
1180
1181         return 0;
1182
1183 out_idev:
1184         input_free_polled_device(applesmc_idev);
1185
1186 out_sysfs:
1187         applesmc_destroy_nodes(accelerometer_group);
1188
1189 out:
1190         pr_warn("driver init failed (ret=%d)!\n", ret);
1191         return ret;
1192 }
1193
1194 /* Release all resources used by the accelerometer */
1195 static void applesmc_release_accelerometer(void)
1196 {
1197         if (!smcreg.has_accelerometer)
1198                 return;
1199         input_unregister_polled_device(applesmc_idev);
1200         input_free_polled_device(applesmc_idev);
1201         applesmc_destroy_nodes(accelerometer_group);
1202 }
1203
1204 static int applesmc_create_light_sensor(void)
1205 {
1206         if (!smcreg.num_light_sensors)
1207                 return 0;
1208         return applesmc_create_nodes(light_sensor_group, 1);
1209 }
1210
1211 static void applesmc_release_light_sensor(void)
1212 {
1213         if (!smcreg.num_light_sensors)
1214                 return;
1215         applesmc_destroy_nodes(light_sensor_group);
1216 }
1217
1218 static int applesmc_create_key_backlight(void)
1219 {
1220         if (!smcreg.has_key_backlight)
1221                 return 0;
1222         applesmc_led_wq = create_singlethread_workqueue("applesmc-led");
1223         if (!applesmc_led_wq)
1224                 return -ENOMEM;
1225         return led_classdev_register(&pdev->dev, &applesmc_backlight);
1226 }
1227
1228 static void applesmc_release_key_backlight(void)
1229 {
1230         if (!smcreg.has_key_backlight)
1231                 return;
1232         led_classdev_unregister(&applesmc_backlight);
1233         destroy_workqueue(applesmc_led_wq);
1234 }
1235
1236 static int applesmc_dmi_match(const struct dmi_system_id *id)
1237 {
1238         return 1;
1239 }
1240
1241 /*
1242  * Note that DMI_MATCH(...,"MacBook") will match "MacBookPro1,1".
1243  * So we need to put "Apple MacBook Pro" before "Apple MacBook".
1244  */
1245 static __initdata struct dmi_system_id applesmc_whitelist[] = {
1246         { applesmc_dmi_match, "Apple MacBook Air", {
1247           DMI_MATCH(DMI_BOARD_VENDOR, "Apple"),
1248           DMI_MATCH(DMI_PRODUCT_NAME, "MacBookAir") },
1249         },
1250         { applesmc_dmi_match, "Apple MacBook Pro", {
1251           DMI_MATCH(DMI_BOARD_VENDOR, "Apple"),
1252           DMI_MATCH(DMI_PRODUCT_NAME, "MacBookPro") },
1253         },
1254         { applesmc_dmi_match, "Apple MacBook", {
1255           DMI_MATCH(DMI_BOARD_VENDOR, "Apple"),
1256           DMI_MATCH(DMI_PRODUCT_NAME, "MacBook") },
1257         },
1258         { applesmc_dmi_match, "Apple Macmini", {
1259           DMI_MATCH(DMI_BOARD_VENDOR, "Apple"),
1260           DMI_MATCH(DMI_PRODUCT_NAME, "Macmini") },
1261         },
1262         { applesmc_dmi_match, "Apple MacPro", {
1263           DMI_MATCH(DMI_BOARD_VENDOR, "Apple"),
1264           DMI_MATCH(DMI_PRODUCT_NAME, "MacPro") },
1265         },
1266         { applesmc_dmi_match, "Apple iMac", {
1267           DMI_MATCH(DMI_BOARD_VENDOR, "Apple"),
1268           DMI_MATCH(DMI_PRODUCT_NAME, "iMac") },
1269         },
1270         { .ident = NULL }
1271 };
1272
1273 static int __init applesmc_init(void)
1274 {
1275         int ret;
1276
1277         if (!dmi_check_system(applesmc_whitelist)) {
1278                 pr_warn("supported laptop not found!\n");
1279                 ret = -ENODEV;
1280                 goto out;
1281         }
1282
1283         if (!request_region(APPLESMC_DATA_PORT, APPLESMC_NR_PORTS,
1284                                                                 "applesmc")) {
1285                 ret = -ENXIO;
1286                 goto out;
1287         }
1288
1289         ret = platform_driver_register(&applesmc_driver);
1290         if (ret)
1291                 goto out_region;
1292
1293         pdev = platform_device_register_simple("applesmc", APPLESMC_DATA_PORT,
1294                                                NULL, 0);
1295         if (IS_ERR(pdev)) {
1296                 ret = PTR_ERR(pdev);
1297                 goto out_driver;
1298         }
1299
1300         /* create register cache */
1301         ret = applesmc_init_smcreg();
1302         if (ret)
1303                 goto out_device;
1304
1305         ret = applesmc_create_nodes(info_group, 1);
1306         if (ret)
1307                 goto out_smcreg;
1308
1309         ret = applesmc_create_nodes(fan_group, smcreg.fan_count);
1310         if (ret)
1311                 goto out_info;
1312
1313         ret = applesmc_create_nodes(temp_group, smcreg.index_count);
1314         if (ret)
1315                 goto out_fans;
1316
1317         ret = applesmc_create_accelerometer();
1318         if (ret)
1319                 goto out_temperature;
1320
1321         ret = applesmc_create_light_sensor();
1322         if (ret)
1323                 goto out_accelerometer;
1324
1325         ret = applesmc_create_key_backlight();
1326         if (ret)
1327                 goto out_light_sysfs;
1328
1329         hwmon_dev = hwmon_device_register(&pdev->dev);
1330         if (IS_ERR(hwmon_dev)) {
1331                 ret = PTR_ERR(hwmon_dev);
1332                 goto out_light_ledclass;
1333         }
1334
1335         return 0;
1336
1337 out_light_ledclass:
1338         applesmc_release_key_backlight();
1339 out_light_sysfs:
1340         applesmc_release_light_sensor();
1341 out_accelerometer:
1342         applesmc_release_accelerometer();
1343 out_temperature:
1344         applesmc_destroy_nodes(temp_group);
1345 out_fans:
1346         applesmc_destroy_nodes(fan_group);
1347 out_info:
1348         applesmc_destroy_nodes(info_group);
1349 out_smcreg:
1350         applesmc_destroy_smcreg();
1351 out_device:
1352         platform_device_unregister(pdev);
1353 out_driver:
1354         platform_driver_unregister(&applesmc_driver);
1355 out_region:
1356         release_region(APPLESMC_DATA_PORT, APPLESMC_NR_PORTS);
1357 out:
1358         pr_warn("driver init failed (ret=%d)!\n", ret);
1359         return ret;
1360 }
1361
1362 static void __exit applesmc_exit(void)
1363 {
1364         hwmon_device_unregister(hwmon_dev);
1365         applesmc_release_key_backlight();
1366         applesmc_release_light_sensor();
1367         applesmc_release_accelerometer();
1368         applesmc_destroy_nodes(temp_group);
1369         applesmc_destroy_nodes(fan_group);
1370         applesmc_destroy_nodes(info_group);
1371         applesmc_destroy_smcreg();
1372         platform_device_unregister(pdev);
1373         platform_driver_unregister(&applesmc_driver);
1374         release_region(APPLESMC_DATA_PORT, APPLESMC_NR_PORTS);
1375 }
1376
1377 module_init(applesmc_init);
1378 module_exit(applesmc_exit);
1379
1380 MODULE_AUTHOR("Nicolas Boichat");
1381 MODULE_DESCRIPTION("Apple SMC");
1382 MODULE_LICENSE("GPL v2");
1383 MODULE_DEVICE_TABLE(dmi, applesmc_whitelist);