Merge branch 'perf-core-for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git...
[sfrench/cifs-2.6.git] / drivers / hwmon / asus_atk0110.c
1 /*
2  * Copyright (C) 2007-2009 Luca Tettamanti <kronos.it@gmail.com>
3  *
4  * This file is released under the GPLv2
5  * See COPYING in the top level directory of the kernel tree.
6  */
7
8 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
9
10 #include <linux/debugfs.h>
11 #include <linux/kernel.h>
12 #include <linux/hwmon.h>
13 #include <linux/list.h>
14 #include <linux/module.h>
15 #include <linux/slab.h>
16 #include <linux/dmi.h>
17 #include <linux/jiffies.h>
18 #include <linux/err.h>
19 #include <linux/acpi.h>
20
21 #define ATK_HID "ATK0110"
22
23 static bool new_if;
24 module_param(new_if, bool, 0);
25 MODULE_PARM_DESC(new_if, "Override detection heuristic and force the use of the new ATK0110 interface");
26
27 static const struct dmi_system_id __initconst atk_force_new_if[] = {
28         {
29                 /* Old interface has broken MCH temp monitoring */
30                 .ident = "Asus Sabertooth X58",
31                 .matches = {
32                         DMI_MATCH(DMI_BOARD_NAME, "SABERTOOTH X58")
33                 }
34         }, {
35                 /* Old interface reads the same sensor for fan0 and fan1 */
36                 .ident = "Asus M5A78L",
37                 .matches = {
38                         DMI_MATCH(DMI_BOARD_NAME, "M5A78L")
39                 }
40         },
41         { }
42 };
43
44 /*
45  * Minimum time between readings, enforced in order to avoid
46  * hogging the CPU.
47  */
48 #define CACHE_TIME              HZ
49
50 #define BOARD_ID                "MBIF"
51 #define METHOD_ENUMERATE        "GGRP"
52 #define METHOD_READ             "GITM"
53 #define METHOD_WRITE            "SITM"
54 #define METHOD_OLD_READ_TMP     "RTMP"
55 #define METHOD_OLD_READ_VLT     "RVLT"
56 #define METHOD_OLD_READ_FAN     "RFAN"
57 #define METHOD_OLD_ENUM_TMP     "TSIF"
58 #define METHOD_OLD_ENUM_VLT     "VSIF"
59 #define METHOD_OLD_ENUM_FAN     "FSIF"
60
61 #define ATK_MUX_HWMON           0x00000006ULL
62 #define ATK_MUX_MGMT            0x00000011ULL
63
64 #define ATK_CLASS_MASK          0xff000000ULL
65 #define ATK_CLASS_FREQ_CTL      0x03000000ULL
66 #define ATK_CLASS_FAN_CTL       0x04000000ULL
67 #define ATK_CLASS_HWMON         0x06000000ULL
68 #define ATK_CLASS_MGMT          0x11000000ULL
69
70 #define ATK_TYPE_MASK           0x00ff0000ULL
71 #define HWMON_TYPE_VOLT         0x00020000ULL
72 #define HWMON_TYPE_TEMP         0x00030000ULL
73 #define HWMON_TYPE_FAN          0x00040000ULL
74
75 #define ATK_ELEMENT_ID_MASK     0x0000ffffULL
76
77 #define ATK_EC_ID               0x11060004ULL
78
79 enum atk_pack_member {
80         HWMON_PACK_FLAGS,
81         HWMON_PACK_NAME,
82         HWMON_PACK_LIMIT1,
83         HWMON_PACK_LIMIT2,
84         HWMON_PACK_ENABLE
85 };
86
87 /* New package format */
88 #define _HWMON_NEW_PACK_SIZE    7
89 #define _HWMON_NEW_PACK_FLAGS   0
90 #define _HWMON_NEW_PACK_NAME    1
91 #define _HWMON_NEW_PACK_UNK1    2
92 #define _HWMON_NEW_PACK_UNK2    3
93 #define _HWMON_NEW_PACK_LIMIT1  4
94 #define _HWMON_NEW_PACK_LIMIT2  5
95 #define _HWMON_NEW_PACK_ENABLE  6
96
97 /* Old package format */
98 #define _HWMON_OLD_PACK_SIZE    5
99 #define _HWMON_OLD_PACK_FLAGS   0
100 #define _HWMON_OLD_PACK_NAME    1
101 #define _HWMON_OLD_PACK_LIMIT1  2
102 #define _HWMON_OLD_PACK_LIMIT2  3
103 #define _HWMON_OLD_PACK_ENABLE  4
104
105
106 struct atk_data {
107         struct device *hwmon_dev;
108         acpi_handle atk_handle;
109         struct acpi_device *acpi_dev;
110
111         bool old_interface;
112
113         /* old interface */
114         acpi_handle rtmp_handle;
115         acpi_handle rvlt_handle;
116         acpi_handle rfan_handle;
117         /* new interface */
118         acpi_handle enumerate_handle;
119         acpi_handle read_handle;
120         acpi_handle write_handle;
121
122         bool disable_ec;
123
124         int voltage_count;
125         int temperature_count;
126         int fan_count;
127         struct list_head sensor_list;
128         struct attribute_group attr_group;
129         const struct attribute_group *attr_groups[2];
130
131         struct {
132                 struct dentry *root;
133                 u32 id;
134         } debugfs;
135 };
136
137
138 typedef ssize_t (*sysfs_show_func)(struct device *dev,
139                         struct device_attribute *attr, char *buf);
140
141 static const struct acpi_device_id atk_ids[] = {
142         {ATK_HID, 0},
143         {"", 0},
144 };
145 MODULE_DEVICE_TABLE(acpi, atk_ids);
146
147 #define ATTR_NAME_SIZE 16 /* Worst case is "tempN_input" */
148
149 struct atk_sensor_data {
150         struct list_head list;
151         struct atk_data *data;
152         struct device_attribute label_attr;
153         struct device_attribute input_attr;
154         struct device_attribute limit1_attr;
155         struct device_attribute limit2_attr;
156         char label_attr_name[ATTR_NAME_SIZE];
157         char input_attr_name[ATTR_NAME_SIZE];
158         char limit1_attr_name[ATTR_NAME_SIZE];
159         char limit2_attr_name[ATTR_NAME_SIZE];
160         u64 id;
161         u64 type;
162         u64 limit1;
163         u64 limit2;
164         u64 cached_value;
165         unsigned long last_updated; /* in jiffies */
166         bool is_valid;
167         char const *acpi_name;
168 };
169
170 /*
171  * Return buffer format:
172  * [0-3] "value" is valid flag
173  * [4-7] value
174  * [8- ] unknown stuff on newer mobos
175  */
176 struct atk_acpi_ret_buffer {
177         u32 flags;
178         u32 value;
179         u8 data[];
180 };
181
182 /* Input buffer used for GITM and SITM methods */
183 struct atk_acpi_input_buf {
184         u32 id;
185         u32 param1;
186         u32 param2;
187 };
188
189 static int atk_add(struct acpi_device *device);
190 static int atk_remove(struct acpi_device *device);
191 static void atk_print_sensor(struct atk_data *data, union acpi_object *obj);
192 static int atk_read_value(struct atk_sensor_data *sensor, u64 *value);
193
194 static struct acpi_driver atk_driver = {
195         .name   = ATK_HID,
196         .class  = "hwmon",
197         .ids    = atk_ids,
198         .ops    = {
199                 .add    = atk_add,
200                 .remove = atk_remove,
201         },
202 };
203
204 #define input_to_atk_sensor(attr) \
205         container_of(attr, struct atk_sensor_data, input_attr)
206
207 #define label_to_atk_sensor(attr) \
208         container_of(attr, struct atk_sensor_data, label_attr)
209
210 #define limit1_to_atk_sensor(attr) \
211         container_of(attr, struct atk_sensor_data, limit1_attr)
212
213 #define limit2_to_atk_sensor(attr) \
214         container_of(attr, struct atk_sensor_data, limit2_attr)
215
216 static ssize_t atk_input_show(struct device *dev,
217                 struct device_attribute *attr, char *buf)
218 {
219         struct atk_sensor_data *s = input_to_atk_sensor(attr);
220         u64 value;
221         int err;
222
223         err = atk_read_value(s, &value);
224         if (err)
225                 return err;
226
227         if (s->type == HWMON_TYPE_TEMP)
228                 /* ACPI returns decidegree */
229                 value *= 100;
230
231         return sprintf(buf, "%llu\n", value);
232 }
233
234 static ssize_t atk_label_show(struct device *dev,
235                 struct device_attribute *attr, char *buf)
236 {
237         struct atk_sensor_data *s = label_to_atk_sensor(attr);
238
239         return sprintf(buf, "%s\n", s->acpi_name);
240 }
241
242 static ssize_t atk_limit1_show(struct device *dev,
243                 struct device_attribute *attr, char *buf)
244 {
245         struct atk_sensor_data *s = limit1_to_atk_sensor(attr);
246         u64 value = s->limit1;
247
248         if (s->type == HWMON_TYPE_TEMP)
249                 value *= 100;
250
251         return sprintf(buf, "%lld\n", value);
252 }
253
254 static ssize_t atk_limit2_show(struct device *dev,
255                 struct device_attribute *attr, char *buf)
256 {
257         struct atk_sensor_data *s = limit2_to_atk_sensor(attr);
258         u64 value = s->limit2;
259
260         if (s->type == HWMON_TYPE_TEMP)
261                 value *= 100;
262
263         return sprintf(buf, "%lld\n", value);
264 }
265
266 static void atk_init_attribute(struct device_attribute *attr, char *name,
267                 sysfs_show_func show)
268 {
269         sysfs_attr_init(&attr->attr);
270         attr->attr.name = name;
271         attr->attr.mode = 0444;
272         attr->show = show;
273         attr->store = NULL;
274 }
275
276
277 static union acpi_object *atk_get_pack_member(struct atk_data *data,
278                                                 union acpi_object *pack,
279                                                 enum atk_pack_member m)
280 {
281         bool old_if = data->old_interface;
282         int offset;
283
284         switch (m) {
285         case HWMON_PACK_FLAGS:
286                 offset = old_if ? _HWMON_OLD_PACK_FLAGS : _HWMON_NEW_PACK_FLAGS;
287                 break;
288         case HWMON_PACK_NAME:
289                 offset = old_if ? _HWMON_OLD_PACK_NAME : _HWMON_NEW_PACK_NAME;
290                 break;
291         case HWMON_PACK_LIMIT1:
292                 offset = old_if ? _HWMON_OLD_PACK_LIMIT1 :
293                                   _HWMON_NEW_PACK_LIMIT1;
294                 break;
295         case HWMON_PACK_LIMIT2:
296                 offset = old_if ? _HWMON_OLD_PACK_LIMIT2 :
297                                   _HWMON_NEW_PACK_LIMIT2;
298                 break;
299         case HWMON_PACK_ENABLE:
300                 offset = old_if ? _HWMON_OLD_PACK_ENABLE :
301                                   _HWMON_NEW_PACK_ENABLE;
302                 break;
303         default:
304                 return NULL;
305         }
306
307         return &pack->package.elements[offset];
308 }
309
310
311 /*
312  * New package format is:
313  * - flag (int)
314  *      class - used for de-muxing the request to the correct GITn
315  *      type (volt, temp, fan)
316  *      sensor id |
317  *      sensor id - used for de-muxing the request _inside_ the GITn
318  * - name (str)
319  * - unknown (int)
320  * - unknown (int)
321  * - limit1 (int)
322  * - limit2 (int)
323  * - enable (int)
324  *
325  * The old package has the same format but it's missing the two unknown fields.
326  */
327 static int validate_hwmon_pack(struct atk_data *data, union acpi_object *obj)
328 {
329         struct device *dev = &data->acpi_dev->dev;
330         union acpi_object *tmp;
331         bool old_if = data->old_interface;
332         int const expected_size = old_if ? _HWMON_OLD_PACK_SIZE :
333                                            _HWMON_NEW_PACK_SIZE;
334
335         if (obj->type != ACPI_TYPE_PACKAGE) {
336                 dev_warn(dev, "Invalid type: %d\n", obj->type);
337                 return -EINVAL;
338         }
339
340         if (obj->package.count != expected_size) {
341                 dev_warn(dev, "Invalid package size: %d, expected: %d\n",
342                                 obj->package.count, expected_size);
343                 return -EINVAL;
344         }
345
346         tmp = atk_get_pack_member(data, obj, HWMON_PACK_FLAGS);
347         if (tmp->type != ACPI_TYPE_INTEGER) {
348                 dev_warn(dev, "Invalid type (flag): %d\n", tmp->type);
349                 return -EINVAL;
350         }
351
352         tmp = atk_get_pack_member(data, obj, HWMON_PACK_NAME);
353         if (tmp->type != ACPI_TYPE_STRING) {
354                 dev_warn(dev, "Invalid type (name): %d\n", tmp->type);
355                 return -EINVAL;
356         }
357
358         /* Don't check... we don't know what they're useful for anyway */
359 #if 0
360         tmp = &obj->package.elements[HWMON_PACK_UNK1];
361         if (tmp->type != ACPI_TYPE_INTEGER) {
362                 dev_warn(dev, "Invalid type (unk1): %d\n", tmp->type);
363                 return -EINVAL;
364         }
365
366         tmp = &obj->package.elements[HWMON_PACK_UNK2];
367         if (tmp->type != ACPI_TYPE_INTEGER) {
368                 dev_warn(dev, "Invalid type (unk2): %d\n", tmp->type);
369                 return -EINVAL;
370         }
371 #endif
372
373         tmp = atk_get_pack_member(data, obj, HWMON_PACK_LIMIT1);
374         if (tmp->type != ACPI_TYPE_INTEGER) {
375                 dev_warn(dev, "Invalid type (limit1): %d\n", tmp->type);
376                 return -EINVAL;
377         }
378
379         tmp = atk_get_pack_member(data, obj, HWMON_PACK_LIMIT2);
380         if (tmp->type != ACPI_TYPE_INTEGER) {
381                 dev_warn(dev, "Invalid type (limit2): %d\n", tmp->type);
382                 return -EINVAL;
383         }
384
385         tmp = atk_get_pack_member(data, obj, HWMON_PACK_ENABLE);
386         if (tmp->type != ACPI_TYPE_INTEGER) {
387                 dev_warn(dev, "Invalid type (enable): %d\n", tmp->type);
388                 return -EINVAL;
389         }
390
391         atk_print_sensor(data, obj);
392
393         return 0;
394 }
395
396 #ifdef DEBUG
397 static char const *atk_sensor_type(union acpi_object *flags)
398 {
399         u64 type = flags->integer.value & ATK_TYPE_MASK;
400         char const *what;
401
402         switch (type) {
403         case HWMON_TYPE_VOLT:
404                 what = "voltage";
405                 break;
406         case HWMON_TYPE_TEMP:
407                 what = "temperature";
408                 break;
409         case HWMON_TYPE_FAN:
410                 what = "fan";
411                 break;
412         default:
413                 what = "unknown";
414                 break;
415         }
416
417         return what;
418 }
419 #endif
420
421 static void atk_print_sensor(struct atk_data *data, union acpi_object *obj)
422 {
423 #ifdef DEBUG
424         struct device *dev = &data->acpi_dev->dev;
425         union acpi_object *flags;
426         union acpi_object *name;
427         union acpi_object *limit1;
428         union acpi_object *limit2;
429         union acpi_object *enable;
430         char const *what;
431
432         flags = atk_get_pack_member(data, obj, HWMON_PACK_FLAGS);
433         name = atk_get_pack_member(data, obj, HWMON_PACK_NAME);
434         limit1 = atk_get_pack_member(data, obj, HWMON_PACK_LIMIT1);
435         limit2 = atk_get_pack_member(data, obj, HWMON_PACK_LIMIT2);
436         enable = atk_get_pack_member(data, obj, HWMON_PACK_ENABLE);
437
438         what = atk_sensor_type(flags);
439
440         dev_dbg(dev, "%s: %#llx %s [%llu-%llu] %s\n", what,
441                         flags->integer.value,
442                         name->string.pointer,
443                         limit1->integer.value, limit2->integer.value,
444                         enable->integer.value ? "enabled" : "disabled");
445 #endif
446 }
447
448 static int atk_read_value_old(struct atk_sensor_data *sensor, u64 *value)
449 {
450         struct atk_data *data = sensor->data;
451         struct device *dev = &data->acpi_dev->dev;
452         struct acpi_object_list params;
453         union acpi_object id;
454         acpi_status status;
455         acpi_handle method;
456
457         switch (sensor->type) {
458         case HWMON_TYPE_VOLT:
459                 method = data->rvlt_handle;
460                 break;
461         case HWMON_TYPE_TEMP:
462                 method = data->rtmp_handle;
463                 break;
464         case HWMON_TYPE_FAN:
465                 method = data->rfan_handle;
466                 break;
467         default:
468                 return -EINVAL;
469         }
470
471         id.type = ACPI_TYPE_INTEGER;
472         id.integer.value = sensor->id;
473
474         params.count = 1;
475         params.pointer = &id;
476
477         status = acpi_evaluate_integer(method, NULL, &params, value);
478         if (status != AE_OK) {
479                 dev_warn(dev, "%s: ACPI exception: %s\n", __func__,
480                                 acpi_format_exception(status));
481                 return -EIO;
482         }
483
484         return 0;
485 }
486
487 static union acpi_object *atk_ggrp(struct atk_data *data, u16 mux)
488 {
489         struct device *dev = &data->acpi_dev->dev;
490         struct acpi_buffer buf;
491         acpi_status ret;
492         struct acpi_object_list params;
493         union acpi_object id;
494         union acpi_object *pack;
495
496         id.type = ACPI_TYPE_INTEGER;
497         id.integer.value = mux;
498         params.count = 1;
499         params.pointer = &id;
500
501         buf.length = ACPI_ALLOCATE_BUFFER;
502         ret = acpi_evaluate_object(data->enumerate_handle, NULL, &params, &buf);
503         if (ret != AE_OK) {
504                 dev_err(dev, "GGRP[%#x] ACPI exception: %s\n", mux,
505                                 acpi_format_exception(ret));
506                 return ERR_PTR(-EIO);
507         }
508         pack = buf.pointer;
509         if (pack->type != ACPI_TYPE_PACKAGE) {
510                 /* Execution was successful, but the id was not found */
511                 ACPI_FREE(pack);
512                 return ERR_PTR(-ENOENT);
513         }
514
515         if (pack->package.count < 1) {
516                 dev_err(dev, "GGRP[%#x] package is too small\n", mux);
517                 ACPI_FREE(pack);
518                 return ERR_PTR(-EIO);
519         }
520         return pack;
521 }
522
523 static union acpi_object *atk_gitm(struct atk_data *data, u64 id)
524 {
525         struct device *dev = &data->acpi_dev->dev;
526         struct atk_acpi_input_buf buf;
527         union acpi_object tmp;
528         struct acpi_object_list params;
529         struct acpi_buffer ret;
530         union acpi_object *obj;
531         acpi_status status;
532
533         buf.id = id;
534         buf.param1 = 0;
535         buf.param2 = 0;
536
537         tmp.type = ACPI_TYPE_BUFFER;
538         tmp.buffer.pointer = (u8 *)&buf;
539         tmp.buffer.length = sizeof(buf);
540
541         params.count = 1;
542         params.pointer = (void *)&tmp;
543
544         ret.length = ACPI_ALLOCATE_BUFFER;
545         status = acpi_evaluate_object_typed(data->read_handle, NULL, &params,
546                         &ret, ACPI_TYPE_BUFFER);
547         if (status != AE_OK) {
548                 dev_warn(dev, "GITM[%#llx] ACPI exception: %s\n", id,
549                                 acpi_format_exception(status));
550                 return ERR_PTR(-EIO);
551         }
552         obj = ret.pointer;
553
554         /* Sanity check */
555         if (obj->buffer.length < 8) {
556                 dev_warn(dev, "Unexpected ASBF length: %u\n",
557                                 obj->buffer.length);
558                 ACPI_FREE(obj);
559                 return ERR_PTR(-EIO);
560         }
561         return obj;
562 }
563
564 static union acpi_object *atk_sitm(struct atk_data *data,
565                 struct atk_acpi_input_buf *buf)
566 {
567         struct device *dev = &data->acpi_dev->dev;
568         struct acpi_object_list params;
569         union acpi_object tmp;
570         struct acpi_buffer ret;
571         union acpi_object *obj;
572         acpi_status status;
573
574         tmp.type = ACPI_TYPE_BUFFER;
575         tmp.buffer.pointer = (u8 *)buf;
576         tmp.buffer.length = sizeof(*buf);
577
578         params.count = 1;
579         params.pointer = &tmp;
580
581         ret.length = ACPI_ALLOCATE_BUFFER;
582         status = acpi_evaluate_object_typed(data->write_handle, NULL, &params,
583                         &ret, ACPI_TYPE_BUFFER);
584         if (status != AE_OK) {
585                 dev_warn(dev, "SITM[%#x] ACPI exception: %s\n", buf->id,
586                                 acpi_format_exception(status));
587                 return ERR_PTR(-EIO);
588         }
589         obj = ret.pointer;
590
591         /* Sanity check */
592         if (obj->buffer.length < 8) {
593                 dev_warn(dev, "Unexpected ASBF length: %u\n",
594                                 obj->buffer.length);
595                 ACPI_FREE(obj);
596                 return ERR_PTR(-EIO);
597         }
598         return obj;
599 }
600
601 static int atk_read_value_new(struct atk_sensor_data *sensor, u64 *value)
602 {
603         struct atk_data *data = sensor->data;
604         struct device *dev = &data->acpi_dev->dev;
605         union acpi_object *obj;
606         struct atk_acpi_ret_buffer *buf;
607         int err = 0;
608
609         obj = atk_gitm(data, sensor->id);
610         if (IS_ERR(obj))
611                 return PTR_ERR(obj);
612
613         buf = (struct atk_acpi_ret_buffer *)obj->buffer.pointer;
614         if (buf->flags == 0) {
615                 /*
616                  * The reading is not valid, possible causes:
617                  * - sensor failure
618                  * - enumeration was FUBAR (and we didn't notice)
619                  */
620                 dev_warn(dev, "Read failed, sensor = %#llx\n", sensor->id);
621                 err = -EIO;
622                 goto out;
623         }
624
625         *value = buf->value;
626 out:
627         ACPI_FREE(obj);
628         return err;
629 }
630
631 static int atk_read_value(struct atk_sensor_data *sensor, u64 *value)
632 {
633         int err;
634
635         if (!sensor->is_valid ||
636             time_after(jiffies, sensor->last_updated + CACHE_TIME)) {
637                 if (sensor->data->old_interface)
638                         err = atk_read_value_old(sensor, value);
639                 else
640                         err = atk_read_value_new(sensor, value);
641
642                 if (err)
643                         return err;
644
645                 sensor->is_valid = true;
646                 sensor->last_updated = jiffies;
647                 sensor->cached_value = *value;
648         } else {
649                 *value = sensor->cached_value;
650                 err = 0;
651         }
652
653         return err;
654 }
655
656 #ifdef CONFIG_DEBUG_FS
657 static int atk_debugfs_gitm_get(void *p, u64 *val)
658 {
659         struct atk_data *data = p;
660         union acpi_object *ret;
661         struct atk_acpi_ret_buffer *buf;
662         int err = 0;
663
664         if (!data->read_handle)
665                 return -ENODEV;
666
667         if (!data->debugfs.id)
668                 return -EINVAL;
669
670         ret = atk_gitm(data, data->debugfs.id);
671         if (IS_ERR(ret))
672                 return PTR_ERR(ret);
673
674         buf = (struct atk_acpi_ret_buffer *)ret->buffer.pointer;
675         if (buf->flags)
676                 *val = buf->value;
677         else
678                 err = -EIO;
679
680         ACPI_FREE(ret);
681         return err;
682 }
683
684 DEFINE_SIMPLE_ATTRIBUTE(atk_debugfs_gitm,
685                         atk_debugfs_gitm_get,
686                         NULL,
687                         "0x%08llx\n");
688
689 static int atk_acpi_print(char *buf, size_t sz, union acpi_object *obj)
690 {
691         int ret = 0;
692
693         switch (obj->type) {
694         case ACPI_TYPE_INTEGER:
695                 ret = snprintf(buf, sz, "0x%08llx\n", obj->integer.value);
696                 break;
697         case ACPI_TYPE_STRING:
698                 ret = snprintf(buf, sz, "%s\n", obj->string.pointer);
699                 break;
700         }
701
702         return ret;
703 }
704
705 static void atk_pack_print(char *buf, size_t sz, union acpi_object *pack)
706 {
707         int ret;
708         int i;
709
710         for (i = 0; i < pack->package.count; i++) {
711                 union acpi_object *obj = &pack->package.elements[i];
712
713                 ret = atk_acpi_print(buf, sz, obj);
714                 if (ret >= sz)
715                         break;
716                 buf += ret;
717                 sz -= ret;
718         }
719 }
720
721 static int atk_debugfs_ggrp_open(struct inode *inode, struct file *file)
722 {
723         struct atk_data *data = inode->i_private;
724         char *buf = NULL;
725         union acpi_object *ret;
726         u8 cls;
727         int i;
728
729         if (!data->enumerate_handle)
730                 return -ENODEV;
731         if (!data->debugfs.id)
732                 return -EINVAL;
733
734         cls = (data->debugfs.id & 0xff000000) >> 24;
735         ret = atk_ggrp(data, cls);
736         if (IS_ERR(ret))
737                 return PTR_ERR(ret);
738
739         for (i = 0; i < ret->package.count; i++) {
740                 union acpi_object *pack = &ret->package.elements[i];
741                 union acpi_object *id;
742
743                 if (pack->type != ACPI_TYPE_PACKAGE)
744                         continue;
745                 if (!pack->package.count)
746                         continue;
747                 id = &pack->package.elements[0];
748                 if (id->integer.value == data->debugfs.id) {
749                         /* Print the package */
750                         buf = kzalloc(512, GFP_KERNEL);
751                         if (!buf) {
752                                 ACPI_FREE(ret);
753                                 return -ENOMEM;
754                         }
755                         atk_pack_print(buf, 512, pack);
756                         break;
757                 }
758         }
759         ACPI_FREE(ret);
760
761         if (!buf)
762                 return -EINVAL;
763
764         file->private_data = buf;
765
766         return nonseekable_open(inode, file);
767 }
768
769 static ssize_t atk_debugfs_ggrp_read(struct file *file, char __user *buf,
770                 size_t count, loff_t *pos)
771 {
772         char *str = file->private_data;
773         size_t len = strlen(str);
774
775         return simple_read_from_buffer(buf, count, pos, str, len);
776 }
777
778 static int atk_debugfs_ggrp_release(struct inode *inode, struct file *file)
779 {
780         kfree(file->private_data);
781         return 0;
782 }
783
784 static const struct file_operations atk_debugfs_ggrp_fops = {
785         .read           = atk_debugfs_ggrp_read,
786         .open           = atk_debugfs_ggrp_open,
787         .release        = atk_debugfs_ggrp_release,
788         .llseek         = no_llseek,
789 };
790
791 static void atk_debugfs_init(struct atk_data *data)
792 {
793         struct dentry *d;
794         struct dentry *f;
795
796         data->debugfs.id = 0;
797
798         d = debugfs_create_dir("asus_atk0110", NULL);
799         if (!d || IS_ERR(d))
800                 return;
801
802         f = debugfs_create_x32("id", S_IRUSR | S_IWUSR, d, &data->debugfs.id);
803         if (!f || IS_ERR(f))
804                 goto cleanup;
805
806         f = debugfs_create_file("gitm", S_IRUSR, d, data,
807                         &atk_debugfs_gitm);
808         if (!f || IS_ERR(f))
809                 goto cleanup;
810
811         f = debugfs_create_file("ggrp", S_IRUSR, d, data,
812                         &atk_debugfs_ggrp_fops);
813         if (!f || IS_ERR(f))
814                 goto cleanup;
815
816         data->debugfs.root = d;
817
818         return;
819 cleanup:
820         debugfs_remove_recursive(d);
821 }
822
823 static void atk_debugfs_cleanup(struct atk_data *data)
824 {
825         debugfs_remove_recursive(data->debugfs.root);
826 }
827
828 #else /* CONFIG_DEBUG_FS */
829
830 static void atk_debugfs_init(struct atk_data *data)
831 {
832 }
833
834 static void atk_debugfs_cleanup(struct atk_data *data)
835 {
836 }
837 #endif
838
839 static int atk_add_sensor(struct atk_data *data, union acpi_object *obj)
840 {
841         struct device *dev = &data->acpi_dev->dev;
842         union acpi_object *flags;
843         union acpi_object *name;
844         union acpi_object *limit1;
845         union acpi_object *limit2;
846         union acpi_object *enable;
847         struct atk_sensor_data *sensor;
848         char const *base_name;
849         char const *limit1_name;
850         char const *limit2_name;
851         u64 type;
852         int err;
853         int *num;
854         int start;
855
856         if (obj->type != ACPI_TYPE_PACKAGE) {
857                 /* wft is this? */
858                 dev_warn(dev, "Unknown type for ACPI object: (%d)\n",
859                                 obj->type);
860                 return -EINVAL;
861         }
862
863         err = validate_hwmon_pack(data, obj);
864         if (err)
865                 return err;
866
867         /* Ok, we have a valid hwmon package */
868         type = atk_get_pack_member(data, obj, HWMON_PACK_FLAGS)->integer.value
869                & ATK_TYPE_MASK;
870
871         switch (type) {
872         case HWMON_TYPE_VOLT:
873                 base_name = "in";
874                 limit1_name = "min";
875                 limit2_name = "max";
876                 num = &data->voltage_count;
877                 start = 0;
878                 break;
879         case HWMON_TYPE_TEMP:
880                 base_name = "temp";
881                 limit1_name = "max";
882                 limit2_name = "crit";
883                 num = &data->temperature_count;
884                 start = 1;
885                 break;
886         case HWMON_TYPE_FAN:
887                 base_name = "fan";
888                 limit1_name = "min";
889                 limit2_name = "max";
890                 num = &data->fan_count;
891                 start = 1;
892                 break;
893         default:
894                 dev_warn(dev, "Unknown sensor type: %#llx\n", type);
895                 return -EINVAL;
896         }
897
898         enable = atk_get_pack_member(data, obj, HWMON_PACK_ENABLE);
899         if (!enable->integer.value)
900                 /* sensor is disabled */
901                 return 0;
902
903         flags = atk_get_pack_member(data, obj, HWMON_PACK_FLAGS);
904         name = atk_get_pack_member(data, obj, HWMON_PACK_NAME);
905         limit1 = atk_get_pack_member(data, obj, HWMON_PACK_LIMIT1);
906         limit2 = atk_get_pack_member(data, obj, HWMON_PACK_LIMIT2);
907
908         sensor = devm_kzalloc(dev, sizeof(*sensor), GFP_KERNEL);
909         if (!sensor)
910                 return -ENOMEM;
911
912         sensor->acpi_name = devm_kstrdup(dev, name->string.pointer, GFP_KERNEL);
913         if (!sensor->acpi_name)
914                 return -ENOMEM;
915
916         INIT_LIST_HEAD(&sensor->list);
917         sensor->type = type;
918         sensor->data = data;
919         sensor->id = flags->integer.value;
920         sensor->limit1 = limit1->integer.value;
921         if (data->old_interface)
922                 sensor->limit2 = limit2->integer.value;
923         else
924                 /* The upper limit is expressed as delta from lower limit */
925                 sensor->limit2 = sensor->limit1 + limit2->integer.value;
926
927         snprintf(sensor->input_attr_name, ATTR_NAME_SIZE,
928                         "%s%d_input", base_name, start + *num);
929         atk_init_attribute(&sensor->input_attr,
930                         sensor->input_attr_name,
931                         atk_input_show);
932
933         snprintf(sensor->label_attr_name, ATTR_NAME_SIZE,
934                         "%s%d_label", base_name, start + *num);
935         atk_init_attribute(&sensor->label_attr,
936                         sensor->label_attr_name,
937                         atk_label_show);
938
939         snprintf(sensor->limit1_attr_name, ATTR_NAME_SIZE,
940                         "%s%d_%s", base_name, start + *num, limit1_name);
941         atk_init_attribute(&sensor->limit1_attr,
942                         sensor->limit1_attr_name,
943                         atk_limit1_show);
944
945         snprintf(sensor->limit2_attr_name, ATTR_NAME_SIZE,
946                         "%s%d_%s", base_name, start + *num, limit2_name);
947         atk_init_attribute(&sensor->limit2_attr,
948                         sensor->limit2_attr_name,
949                         atk_limit2_show);
950
951         list_add(&sensor->list, &data->sensor_list);
952         (*num)++;
953
954         return 1;
955 }
956
957 static int atk_enumerate_old_hwmon(struct atk_data *data)
958 {
959         struct device *dev = &data->acpi_dev->dev;
960         struct acpi_buffer buf;
961         union acpi_object *pack;
962         acpi_status status;
963         int i, ret;
964         int count = 0;
965
966         /* Voltages */
967         buf.length = ACPI_ALLOCATE_BUFFER;
968         status = acpi_evaluate_object_typed(data->atk_handle,
969                         METHOD_OLD_ENUM_VLT, NULL, &buf, ACPI_TYPE_PACKAGE);
970         if (status != AE_OK) {
971                 dev_warn(dev, METHOD_OLD_ENUM_VLT ": ACPI exception: %s\n",
972                                 acpi_format_exception(status));
973
974                 return -ENODEV;
975         }
976
977         pack = buf.pointer;
978         for (i = 1; i < pack->package.count; i++) {
979                 union acpi_object *obj = &pack->package.elements[i];
980
981                 ret = atk_add_sensor(data, obj);
982                 if (ret > 0)
983                         count++;
984         }
985         ACPI_FREE(buf.pointer);
986
987         /* Temperatures */
988         buf.length = ACPI_ALLOCATE_BUFFER;
989         status = acpi_evaluate_object_typed(data->atk_handle,
990                         METHOD_OLD_ENUM_TMP, NULL, &buf, ACPI_TYPE_PACKAGE);
991         if (status != AE_OK) {
992                 dev_warn(dev, METHOD_OLD_ENUM_TMP ": ACPI exception: %s\n",
993                                 acpi_format_exception(status));
994
995                 return -ENODEV;
996         }
997
998         pack = buf.pointer;
999         for (i = 1; i < pack->package.count; i++) {
1000                 union acpi_object *obj = &pack->package.elements[i];
1001
1002                 ret = atk_add_sensor(data, obj);
1003                 if (ret > 0)
1004                         count++;
1005         }
1006         ACPI_FREE(buf.pointer);
1007
1008         /* Fans */
1009         buf.length = ACPI_ALLOCATE_BUFFER;
1010         status = acpi_evaluate_object_typed(data->atk_handle,
1011                         METHOD_OLD_ENUM_FAN, NULL, &buf, ACPI_TYPE_PACKAGE);
1012         if (status != AE_OK) {
1013                 dev_warn(dev, METHOD_OLD_ENUM_FAN ": ACPI exception: %s\n",
1014                                 acpi_format_exception(status));
1015
1016                 return -ENODEV;
1017         }
1018
1019         pack = buf.pointer;
1020         for (i = 1; i < pack->package.count; i++) {
1021                 union acpi_object *obj = &pack->package.elements[i];
1022
1023                 ret = atk_add_sensor(data, obj);
1024                 if (ret > 0)
1025                         count++;
1026         }
1027         ACPI_FREE(buf.pointer);
1028
1029         return count;
1030 }
1031
1032 static int atk_ec_present(struct atk_data *data)
1033 {
1034         struct device *dev = &data->acpi_dev->dev;
1035         union acpi_object *pack;
1036         union acpi_object *ec;
1037         int ret;
1038         int i;
1039
1040         pack = atk_ggrp(data, ATK_MUX_MGMT);
1041         if (IS_ERR(pack)) {
1042                 if (PTR_ERR(pack) == -ENOENT) {
1043                         /* The MGMT class does not exists - that's ok */
1044                         dev_dbg(dev, "Class %#llx not found\n", ATK_MUX_MGMT);
1045                         return 0;
1046                 }
1047                 return PTR_ERR(pack);
1048         }
1049
1050         /* Search the EC */
1051         ec = NULL;
1052         for (i = 0; i < pack->package.count; i++) {
1053                 union acpi_object *obj = &pack->package.elements[i];
1054                 union acpi_object *id;
1055
1056                 if (obj->type != ACPI_TYPE_PACKAGE)
1057                         continue;
1058
1059                 id = &obj->package.elements[0];
1060                 if (id->type != ACPI_TYPE_INTEGER)
1061                         continue;
1062
1063                 if (id->integer.value == ATK_EC_ID) {
1064                         ec = obj;
1065                         break;
1066                 }
1067         }
1068
1069         ret = (ec != NULL);
1070         if (!ret)
1071                 /* The system has no EC */
1072                 dev_dbg(dev, "EC not found\n");
1073
1074         ACPI_FREE(pack);
1075         return ret;
1076 }
1077
1078 static int atk_ec_enabled(struct atk_data *data)
1079 {
1080         struct device *dev = &data->acpi_dev->dev;
1081         union acpi_object *obj;
1082         struct atk_acpi_ret_buffer *buf;
1083         int err;
1084
1085         obj = atk_gitm(data, ATK_EC_ID);
1086         if (IS_ERR(obj)) {
1087                 dev_err(dev, "Unable to query EC status\n");
1088                 return PTR_ERR(obj);
1089         }
1090         buf = (struct atk_acpi_ret_buffer *)obj->buffer.pointer;
1091
1092         if (buf->flags == 0) {
1093                 dev_err(dev, "Unable to query EC status\n");
1094                 err = -EIO;
1095         } else {
1096                 err = (buf->value != 0);
1097                 dev_dbg(dev, "EC is %sabled\n",
1098                                 err ? "en" : "dis");
1099         }
1100
1101         ACPI_FREE(obj);
1102         return err;
1103 }
1104
1105 static int atk_ec_ctl(struct atk_data *data, int enable)
1106 {
1107         struct device *dev = &data->acpi_dev->dev;
1108         union acpi_object *obj;
1109         struct atk_acpi_input_buf sitm;
1110         struct atk_acpi_ret_buffer *ec_ret;
1111         int err = 0;
1112
1113         sitm.id = ATK_EC_ID;
1114         sitm.param1 = enable;
1115         sitm.param2 = 0;
1116
1117         obj = atk_sitm(data, &sitm);
1118         if (IS_ERR(obj)) {
1119                 dev_err(dev, "Failed to %sable the EC\n",
1120                                 enable ? "en" : "dis");
1121                 return PTR_ERR(obj);
1122         }
1123         ec_ret = (struct atk_acpi_ret_buffer *)obj->buffer.pointer;
1124         if (ec_ret->flags == 0) {
1125                 dev_err(dev, "Failed to %sable the EC\n",
1126                                 enable ? "en" : "dis");
1127                 err = -EIO;
1128         } else {
1129                 dev_info(dev, "EC %sabled\n",
1130                                 enable ? "en" : "dis");
1131         }
1132
1133         ACPI_FREE(obj);
1134         return err;
1135 }
1136
1137 static int atk_enumerate_new_hwmon(struct atk_data *data)
1138 {
1139         struct device *dev = &data->acpi_dev->dev;
1140         union acpi_object *pack;
1141         int err;
1142         int i;
1143
1144         err = atk_ec_present(data);
1145         if (err < 0)
1146                 return err;
1147         if (err) {
1148                 err = atk_ec_enabled(data);
1149                 if (err < 0)
1150                         return err;
1151                 /* If the EC was disabled we will disable it again on unload */
1152                 data->disable_ec = err;
1153
1154                 err = atk_ec_ctl(data, 1);
1155                 if (err) {
1156                         data->disable_ec = false;
1157                         return err;
1158                 }
1159         }
1160
1161         dev_dbg(dev, "Enumerating hwmon sensors\n");
1162
1163         pack = atk_ggrp(data, ATK_MUX_HWMON);
1164         if (IS_ERR(pack))
1165                 return PTR_ERR(pack);
1166
1167         for (i = 0; i < pack->package.count; i++) {
1168                 union acpi_object *obj = &pack->package.elements[i];
1169
1170                 atk_add_sensor(data, obj);
1171         }
1172
1173         err = data->voltage_count + data->temperature_count + data->fan_count;
1174
1175         ACPI_FREE(pack);
1176         return err;
1177 }
1178
1179 static int atk_init_attribute_groups(struct atk_data *data)
1180 {
1181         struct device *dev = &data->acpi_dev->dev;
1182         struct atk_sensor_data *s;
1183         struct attribute **attrs;
1184         int i = 0;
1185         int len = (data->voltage_count + data->temperature_count
1186                         + data->fan_count) * 4 + 1;
1187
1188         attrs = devm_kcalloc(dev, len, sizeof(struct attribute *), GFP_KERNEL);
1189         if (!attrs)
1190                 return -ENOMEM;
1191
1192         list_for_each_entry(s, &data->sensor_list, list) {
1193                 attrs[i++] = &s->input_attr.attr;
1194                 attrs[i++] = &s->label_attr.attr;
1195                 attrs[i++] = &s->limit1_attr.attr;
1196                 attrs[i++] = &s->limit2_attr.attr;
1197         }
1198
1199         data->attr_group.attrs = attrs;
1200         data->attr_groups[0] = &data->attr_group;
1201
1202         return 0;
1203 }
1204
1205 static int atk_register_hwmon(struct atk_data *data)
1206 {
1207         struct device *dev = &data->acpi_dev->dev;
1208
1209         dev_dbg(dev, "registering hwmon device\n");
1210         data->hwmon_dev = hwmon_device_register_with_groups(dev, "atk0110",
1211                                                             data,
1212                                                             data->attr_groups);
1213
1214         return PTR_ERR_OR_ZERO(data->hwmon_dev);
1215 }
1216
1217 static int atk_probe_if(struct atk_data *data)
1218 {
1219         struct device *dev = &data->acpi_dev->dev;
1220         acpi_handle ret;
1221         acpi_status status;
1222         int err = 0;
1223
1224         /* RTMP: read temperature */
1225         status = acpi_get_handle(data->atk_handle, METHOD_OLD_READ_TMP, &ret);
1226         if (ACPI_SUCCESS(status))
1227                 data->rtmp_handle = ret;
1228         else
1229                 dev_dbg(dev, "method " METHOD_OLD_READ_TMP " not found: %s\n",
1230                                 acpi_format_exception(status));
1231
1232         /* RVLT: read voltage */
1233         status = acpi_get_handle(data->atk_handle, METHOD_OLD_READ_VLT, &ret);
1234         if (ACPI_SUCCESS(status))
1235                 data->rvlt_handle = ret;
1236         else
1237                 dev_dbg(dev, "method " METHOD_OLD_READ_VLT " not found: %s\n",
1238                                 acpi_format_exception(status));
1239
1240         /* RFAN: read fan status */
1241         status = acpi_get_handle(data->atk_handle, METHOD_OLD_READ_FAN, &ret);
1242         if (ACPI_SUCCESS(status))
1243                 data->rfan_handle = ret;
1244         else
1245                 dev_dbg(dev, "method " METHOD_OLD_READ_FAN " not found: %s\n",
1246                                 acpi_format_exception(status));
1247
1248         /* Enumeration */
1249         status = acpi_get_handle(data->atk_handle, METHOD_ENUMERATE, &ret);
1250         if (ACPI_SUCCESS(status))
1251                 data->enumerate_handle = ret;
1252         else
1253                 dev_dbg(dev, "method " METHOD_ENUMERATE " not found: %s\n",
1254                                 acpi_format_exception(status));
1255
1256         /* De-multiplexer (read) */
1257         status = acpi_get_handle(data->atk_handle, METHOD_READ, &ret);
1258         if (ACPI_SUCCESS(status))
1259                 data->read_handle = ret;
1260         else
1261                 dev_dbg(dev, "method " METHOD_READ " not found: %s\n",
1262                                 acpi_format_exception(status));
1263
1264         /* De-multiplexer (write) */
1265         status = acpi_get_handle(data->atk_handle, METHOD_WRITE, &ret);
1266         if (ACPI_SUCCESS(status))
1267                 data->write_handle = ret;
1268         else
1269                 dev_dbg(dev, "method " METHOD_WRITE " not found: %s\n",
1270                                  acpi_format_exception(status));
1271
1272         /*
1273          * Check for hwmon methods: first check "old" style methods; note that
1274          * both may be present: in this case we stick to the old interface;
1275          * analysis of multiple DSDTs indicates that when both interfaces
1276          * are present the new one (GGRP/GITM) is not functional.
1277          */
1278         if (new_if)
1279                 dev_info(dev, "Overriding interface detection\n");
1280         if (data->rtmp_handle &&
1281                         data->rvlt_handle && data->rfan_handle && !new_if)
1282                 data->old_interface = true;
1283         else if (data->enumerate_handle && data->read_handle &&
1284                         data->write_handle)
1285                 data->old_interface = false;
1286         else
1287                 err = -ENODEV;
1288
1289         return err;
1290 }
1291
1292 static int atk_add(struct acpi_device *device)
1293 {
1294         acpi_status ret;
1295         int err;
1296         struct acpi_buffer buf;
1297         union acpi_object *obj;
1298         struct atk_data *data;
1299
1300         dev_dbg(&device->dev, "adding...\n");
1301
1302         data = devm_kzalloc(&device->dev, sizeof(*data), GFP_KERNEL);
1303         if (!data)
1304                 return -ENOMEM;
1305
1306         data->acpi_dev = device;
1307         data->atk_handle = device->handle;
1308         INIT_LIST_HEAD(&data->sensor_list);
1309         data->disable_ec = false;
1310
1311         buf.length = ACPI_ALLOCATE_BUFFER;
1312         ret = acpi_evaluate_object_typed(data->atk_handle, BOARD_ID, NULL,
1313                         &buf, ACPI_TYPE_PACKAGE);
1314         if (ret != AE_OK) {
1315                 dev_dbg(&device->dev, "atk: method MBIF not found\n");
1316         } else {
1317                 obj = buf.pointer;
1318                 if (obj->package.count >= 2) {
1319                         union acpi_object *id = &obj->package.elements[1];
1320                         if (id->type == ACPI_TYPE_STRING)
1321                                 dev_dbg(&device->dev, "board ID = %s\n",
1322                                         id->string.pointer);
1323                 }
1324                 ACPI_FREE(buf.pointer);
1325         }
1326
1327         err = atk_probe_if(data);
1328         if (err) {
1329                 dev_err(&device->dev, "No usable hwmon interface detected\n");
1330                 goto out;
1331         }
1332
1333         if (data->old_interface) {
1334                 dev_dbg(&device->dev, "Using old hwmon interface\n");
1335                 err = atk_enumerate_old_hwmon(data);
1336         } else {
1337                 dev_dbg(&device->dev, "Using new hwmon interface\n");
1338                 err = atk_enumerate_new_hwmon(data);
1339         }
1340         if (err < 0)
1341                 goto out;
1342         if (err == 0) {
1343                 dev_info(&device->dev,
1344                          "No usable sensor detected, bailing out\n");
1345                 err = -ENODEV;
1346                 goto out;
1347         }
1348
1349         err = atk_init_attribute_groups(data);
1350         if (err)
1351                 goto out;
1352         err = atk_register_hwmon(data);
1353         if (err)
1354                 goto out;
1355
1356         atk_debugfs_init(data);
1357
1358         device->driver_data = data;
1359         return 0;
1360 out:
1361         if (data->disable_ec)
1362                 atk_ec_ctl(data, 0);
1363         return err;
1364 }
1365
1366 static int atk_remove(struct acpi_device *device)
1367 {
1368         struct atk_data *data = device->driver_data;
1369         dev_dbg(&device->dev, "removing...\n");
1370
1371         device->driver_data = NULL;
1372
1373         atk_debugfs_cleanup(data);
1374
1375         hwmon_device_unregister(data->hwmon_dev);
1376
1377         if (data->disable_ec) {
1378                 if (atk_ec_ctl(data, 0))
1379                         dev_err(&device->dev, "Failed to disable EC\n");
1380         }
1381
1382         return 0;
1383 }
1384
1385 static int __init atk0110_init(void)
1386 {
1387         int ret;
1388
1389         /* Make sure it's safe to access the device through ACPI */
1390         if (!acpi_resources_are_enforced()) {
1391                 pr_err("Resources not safely usable due to acpi_enforce_resources kernel parameter\n");
1392                 return -EBUSY;
1393         }
1394
1395         if (dmi_check_system(atk_force_new_if))
1396                 new_if = true;
1397
1398         ret = acpi_bus_register_driver(&atk_driver);
1399         if (ret)
1400                 pr_info("acpi_bus_register_driver failed: %d\n", ret);
1401
1402         return ret;
1403 }
1404
1405 static void __exit atk0110_exit(void)
1406 {
1407         acpi_bus_unregister_driver(&atk_driver);
1408 }
1409
1410 module_init(atk0110_init);
1411 module_exit(atk0110_exit);
1412
1413 MODULE_LICENSE("GPL");