Merge branch 'sh/smp'
[pandora-kernel.git] / drivers / acpi / system.c
1 /*
2  *  acpi_system.c - ACPI System Driver ($Revision: 63 $)
3  *
4  *  Copyright (C) 2001, 2002 Andy Grover <andrew.grover@intel.com>
5  *  Copyright (C) 2001, 2002 Paul Diefenbaugh <paul.s.diefenbaugh@intel.com>
6  *
7  * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
8  *
9  *  This program is free software; you can redistribute it and/or modify
10  *  it under the terms of the GNU General Public License as published by
11  *  the Free Software Foundation; either version 2 of the License, or (at
12  *  your option) any later version.
13  *
14  *  This program is distributed in the hope that it will be useful, but
15  *  WITHOUT ANY WARRANTY; without even the implied warranty of
16  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
17  *  General Public License for more details.
18  *
19  *  You should have received a copy of the GNU General Public License along
20  *  with this program; if not, write to the Free Software Foundation, Inc.,
21  *  59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
22  *
23  * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
24  */
25
26 #include <linux/proc_fs.h>
27 #include <linux/seq_file.h>
28 #include <linux/slab.h>
29 #include <linux/init.h>
30 #include <linux/string.h>
31 #include <asm/uaccess.h>
32
33 #include <acpi/acpi_drivers.h>
34
35 #define PREFIX "ACPI: "
36
37 #define _COMPONENT              ACPI_SYSTEM_COMPONENT
38 ACPI_MODULE_NAME("system");
39
40 #define ACPI_SYSTEM_CLASS               "system"
41 #define ACPI_SYSTEM_DEVICE_NAME         "System"
42
43 u32 acpi_irq_handled;
44 u32 acpi_irq_not_handled;
45
46 /*
47  * Make ACPICA version work as module param
48  */
49 static int param_get_acpica_version(char *buffer, struct kernel_param *kp)
50 {
51         int result;
52
53         result = sprintf(buffer, "%x", ACPI_CA_VERSION);
54
55         return result;
56 }
57
58 module_param_call(acpica_version, NULL, param_get_acpica_version, NULL, 0444);
59
60 /* --------------------------------------------------------------------------
61                               FS Interface (/sys)
62    -------------------------------------------------------------------------- */
63 static LIST_HEAD(acpi_table_attr_list);
64 static struct kobject *tables_kobj;
65 static struct kobject *dynamic_tables_kobj;
66
67 struct acpi_table_attr {
68         struct bin_attribute attr;
69         char name[8];
70         int instance;
71         struct list_head node;
72 };
73
74 static ssize_t acpi_table_show(struct kobject *kobj,
75                                struct bin_attribute *bin_attr, char *buf,
76                                loff_t offset, size_t count)
77 {
78         struct acpi_table_attr *table_attr =
79             container_of(bin_attr, struct acpi_table_attr, attr);
80         struct acpi_table_header *table_header = NULL;
81         acpi_status status;
82         char name[ACPI_NAME_SIZE];
83
84         if (strncmp(table_attr->name, "NULL", 4))
85                 memcpy(name, table_attr->name, ACPI_NAME_SIZE);
86         else
87                 memcpy(name, "\0\0\0\0", 4);
88
89         status =
90             acpi_get_table(name, table_attr->instance,
91                            &table_header);
92         if (ACPI_FAILURE(status))
93                 return -ENODEV;
94
95         return memory_read_from_buffer(buf, count, &offset,
96                                         table_header, table_header->length);
97 }
98
99 static void acpi_table_attr_init(struct acpi_table_attr *table_attr,
100                                  struct acpi_table_header *table_header)
101 {
102         struct acpi_table_header *header = NULL;
103         struct acpi_table_attr *attr = NULL;
104
105         sysfs_attr_init(&table_attr->attr.attr);
106         if (table_header->signature[0] != '\0')
107                 memcpy(table_attr->name, table_header->signature,
108                         ACPI_NAME_SIZE);
109         else
110                 memcpy(table_attr->name, "NULL", 4);
111
112         list_for_each_entry(attr, &acpi_table_attr_list, node) {
113                 if (!memcmp(table_attr->name, attr->name, ACPI_NAME_SIZE))
114                         if (table_attr->instance < attr->instance)
115                                 table_attr->instance = attr->instance;
116         }
117         table_attr->instance++;
118
119         if (table_attr->instance > 1 || (table_attr->instance == 1 &&
120                                         !acpi_get_table
121                                         (table_header->signature, 2, &header)))
122                 sprintf(table_attr->name + ACPI_NAME_SIZE, "%d",
123                         table_attr->instance);
124
125         table_attr->attr.size = 0;
126         table_attr->attr.read = acpi_table_show;
127         table_attr->attr.attr.name = table_attr->name;
128         table_attr->attr.attr.mode = 0400;
129
130         return;
131 }
132
133 static acpi_status
134 acpi_sysfs_table_handler(u32 event, void *table, void *context)
135 {
136         struct acpi_table_attr *table_attr;
137
138         switch (event) {
139         case ACPI_TABLE_EVENT_LOAD:
140                 table_attr =
141                         kzalloc(sizeof(struct acpi_table_attr), GFP_KERNEL);
142                 if (!table_attr)
143                         return AE_NO_MEMORY;
144
145                 acpi_table_attr_init(table_attr, table);
146                 if (sysfs_create_bin_file(dynamic_tables_kobj,
147                                         &table_attr->attr)) {
148                         kfree(table_attr);
149                         return AE_ERROR;
150                 } else
151                         list_add_tail(&table_attr->node,
152                                         &acpi_table_attr_list);
153                 break;
154         case ACPI_TABLE_EVENT_UNLOAD:
155                 /*
156                  * we do not need to do anything right now
157                  * because the table is not deleted from the
158                  * global table list when unloading it.
159                  */
160                 break;
161         default:
162                 return AE_BAD_PARAMETER;
163         }
164         return AE_OK;
165 }
166
167 static int acpi_system_sysfs_init(void)
168 {
169         struct acpi_table_attr *table_attr;
170         struct acpi_table_header *table_header = NULL;
171         int table_index = 0;
172         int result;
173
174         tables_kobj = kobject_create_and_add("tables", acpi_kobj);
175         if (!tables_kobj)
176                 goto err;
177
178         dynamic_tables_kobj = kobject_create_and_add("dynamic", tables_kobj);
179         if (!dynamic_tables_kobj)
180                 goto err_dynamic_tables;
181
182         do {
183                 result = acpi_get_table_by_index(table_index, &table_header);
184                 if (!result) {
185                         table_index++;
186                         table_attr = NULL;
187                         table_attr =
188                             kzalloc(sizeof(struct acpi_table_attr), GFP_KERNEL);
189                         if (!table_attr)
190                                 return -ENOMEM;
191
192                         acpi_table_attr_init(table_attr, table_header);
193                         result =
194                             sysfs_create_bin_file(tables_kobj,
195                                                   &table_attr->attr);
196                         if (result) {
197                                 kfree(table_attr);
198                                 return result;
199                         } else
200                                 list_add_tail(&table_attr->node,
201                                               &acpi_table_attr_list);
202                 }
203         } while (!result);
204         kobject_uevent(tables_kobj, KOBJ_ADD);
205         kobject_uevent(dynamic_tables_kobj, KOBJ_ADD);
206         result = acpi_install_table_handler(acpi_sysfs_table_handler, NULL);
207
208         return result == AE_OK ? 0 : -EINVAL;
209 err_dynamic_tables:
210         kobject_put(tables_kobj);
211 err:
212         return -ENOMEM;
213 }
214
215 /*
216  * Detailed ACPI IRQ counters in /sys/firmware/acpi/interrupts/
217  * See Documentation/ABI/testing/sysfs-firmware-acpi
218  */
219
220 #define COUNT_GPE 0
221 #define COUNT_SCI 1     /* acpi_irq_handled */
222 #define COUNT_SCI_NOT 2 /* acpi_irq_not_handled */
223 #define COUNT_ERROR 3   /* other */
224 #define NUM_COUNTERS_EXTRA 4
225
226 struct event_counter {
227         u32 count;
228         u32 flags;
229 };
230
231 static struct event_counter *all_counters;
232 static u32 num_gpes;
233 static u32 num_counters;
234 static struct attribute **all_attrs;
235 static u32 acpi_gpe_count;
236
237 static struct attribute_group interrupt_stats_attr_group = {
238         .name = "interrupts",
239 };
240 static struct kobj_attribute *counter_attrs;
241
242 static void delete_gpe_attr_array(void)
243 {
244         struct event_counter *tmp = all_counters;
245
246         all_counters = NULL;
247         kfree(tmp);
248
249         if (counter_attrs) {
250                 int i;
251
252                 for (i = 0; i < num_gpes; i++)
253                         kfree(counter_attrs[i].attr.name);
254
255                 kfree(counter_attrs);
256         }
257         kfree(all_attrs);
258
259         return;
260 }
261
262 void acpi_os_gpe_count(u32 gpe_number)
263 {
264         acpi_gpe_count++;
265
266         if (!all_counters)
267                 return;
268
269         if (gpe_number < num_gpes)
270                 all_counters[gpe_number].count++;
271         else
272                 all_counters[num_gpes + ACPI_NUM_FIXED_EVENTS + COUNT_ERROR].
273                                         count++;
274
275         return;
276 }
277
278 void acpi_os_fixed_event_count(u32 event_number)
279 {
280         if (!all_counters)
281                 return;
282
283         if (event_number < ACPI_NUM_FIXED_EVENTS)
284                 all_counters[num_gpes + event_number].count++;
285         else
286                 all_counters[num_gpes + ACPI_NUM_FIXED_EVENTS + COUNT_ERROR].
287                                 count++;
288
289         return;
290 }
291
292 static int get_status(u32 index, acpi_event_status *status, acpi_handle *handle)
293 {
294         int result = 0;
295
296         if (index >= num_gpes + ACPI_NUM_FIXED_EVENTS)
297                 goto end;
298
299         if (index < num_gpes) {
300                 result = acpi_get_gpe_device(index, handle);
301                 if (result) {
302                         ACPI_EXCEPTION((AE_INFO, AE_NOT_FOUND,
303                                 "Invalid GPE 0x%x\n", index));
304                         goto end;
305                 }
306                 result = acpi_get_gpe_status(*handle, index,
307                                                 ACPI_NOT_ISR, status);
308         } else if (index < (num_gpes + ACPI_NUM_FIXED_EVENTS))
309                 result = acpi_get_event_status(index - num_gpes, status);
310
311 end:
312         return result;
313 }
314
315 static ssize_t counter_show(struct kobject *kobj,
316         struct kobj_attribute *attr, char *buf)
317 {
318         int index = attr - counter_attrs;
319         int size;
320         acpi_handle handle;
321         acpi_event_status status;
322         int result = 0;
323
324         all_counters[num_gpes + ACPI_NUM_FIXED_EVENTS + COUNT_SCI].count =
325                 acpi_irq_handled;
326         all_counters[num_gpes + ACPI_NUM_FIXED_EVENTS + COUNT_SCI_NOT].count =
327                 acpi_irq_not_handled;
328         all_counters[num_gpes + ACPI_NUM_FIXED_EVENTS + COUNT_GPE].count =
329                 acpi_gpe_count;
330
331         size = sprintf(buf, "%8d", all_counters[index].count);
332
333         /* "gpe_all" or "sci" */
334         if (index >= num_gpes + ACPI_NUM_FIXED_EVENTS)
335                 goto end;
336
337         result = get_status(index, &status, &handle);
338         if (result)
339                 goto end;
340
341         if (!(status & ACPI_EVENT_FLAG_HANDLE))
342                 size += sprintf(buf + size, "   invalid");
343         else if (status & ACPI_EVENT_FLAG_ENABLED)
344                 size += sprintf(buf + size, "   enabled");
345         else if (status & ACPI_EVENT_FLAG_WAKE_ENABLED)
346                 size += sprintf(buf + size, "   wake_enabled");
347         else
348                 size += sprintf(buf + size, "   disabled");
349
350 end:
351         size += sprintf(buf + size, "\n");
352         return result ? result : size;
353 }
354
355 /*
356  * counter_set() sets the specified counter.
357  * setting the total "sci" file to any value clears all counters.
358  * enable/disable/clear a gpe/fixed event in user space.
359  */
360 static ssize_t counter_set(struct kobject *kobj,
361         struct kobj_attribute *attr, const char *buf, size_t size)
362 {
363         int index = attr - counter_attrs;
364         acpi_event_status status;
365         acpi_handle handle;
366         int result = 0;
367
368         if (index == num_gpes + ACPI_NUM_FIXED_EVENTS + COUNT_SCI) {
369                 int i;
370                 for (i = 0; i < num_counters; ++i)
371                         all_counters[i].count = 0;
372                 acpi_gpe_count = 0;
373                 acpi_irq_handled = 0;
374                 acpi_irq_not_handled = 0;
375                 goto end;
376         }
377
378         /* show the event status for both GPEs and Fixed Events */
379         result = get_status(index, &status, &handle);
380         if (result)
381                 goto end;
382
383         if (!(status & ACPI_EVENT_FLAG_HANDLE)) {
384                 printk(KERN_WARNING PREFIX
385                         "Can not change Invalid GPE/Fixed Event status\n");
386                 return -EINVAL;
387         }
388
389         if (index < num_gpes) {
390                 if (!strcmp(buf, "disable\n") &&
391                                 (status & ACPI_EVENT_FLAG_ENABLED))
392                         result = acpi_set_gpe(handle, index, ACPI_GPE_DISABLE);
393                 else if (!strcmp(buf, "enable\n") &&
394                                 !(status & ACPI_EVENT_FLAG_ENABLED))
395                         result = acpi_set_gpe(handle, index, ACPI_GPE_ENABLE);
396                 else if (!strcmp(buf, "clear\n") &&
397                                 (status & ACPI_EVENT_FLAG_SET))
398                         result = acpi_clear_gpe(handle, index, ACPI_NOT_ISR);
399                 else
400                         all_counters[index].count = strtoul(buf, NULL, 0);
401         } else if (index < num_gpes + ACPI_NUM_FIXED_EVENTS) {
402                 int event = index - num_gpes;
403                 if (!strcmp(buf, "disable\n") &&
404                                 (status & ACPI_EVENT_FLAG_ENABLED))
405                         result = acpi_disable_event(event, ACPI_NOT_ISR);
406                 else if (!strcmp(buf, "enable\n") &&
407                                 !(status & ACPI_EVENT_FLAG_ENABLED))
408                         result = acpi_enable_event(event, ACPI_NOT_ISR);
409                 else if (!strcmp(buf, "clear\n") &&
410                                 (status & ACPI_EVENT_FLAG_SET))
411                         result = acpi_clear_event(event);
412                 else
413                         all_counters[index].count = strtoul(buf, NULL, 0);
414         } else
415                 all_counters[index].count = strtoul(buf, NULL, 0);
416
417         if (ACPI_FAILURE(result))
418                 result = -EINVAL;
419 end:
420         return result ? result : size;
421 }
422
423 void acpi_irq_stats_init(void)
424 {
425         int i;
426
427         if (all_counters)
428                 return;
429
430         num_gpes = acpi_current_gpe_count;
431         num_counters = num_gpes + ACPI_NUM_FIXED_EVENTS + NUM_COUNTERS_EXTRA;
432
433         all_attrs = kzalloc(sizeof(struct attribute *) * (num_counters + 1),
434                         GFP_KERNEL);
435         if (all_attrs == NULL)
436                 return;
437
438         all_counters = kzalloc(sizeof(struct event_counter) * (num_counters),
439                                 GFP_KERNEL);
440         if (all_counters == NULL)
441                 goto fail;
442
443         counter_attrs = kzalloc(sizeof(struct kobj_attribute) * (num_counters),
444                         GFP_KERNEL);
445         if (counter_attrs == NULL)
446                 goto fail;
447
448         for (i = 0; i < num_counters; ++i) {
449                 char buffer[12];
450                 char *name;
451
452                 if (i < num_gpes)
453                         sprintf(buffer, "gpe%02X", i);
454                 else if (i == num_gpes + ACPI_EVENT_PMTIMER)
455                         sprintf(buffer, "ff_pmtimer");
456                 else if (i == num_gpes + ACPI_EVENT_GLOBAL)
457                         sprintf(buffer, "ff_gbl_lock");
458                 else if (i == num_gpes + ACPI_EVENT_POWER_BUTTON)
459                         sprintf(buffer, "ff_pwr_btn");
460                 else if (i == num_gpes + ACPI_EVENT_SLEEP_BUTTON)
461                         sprintf(buffer, "ff_slp_btn");
462                 else if (i == num_gpes + ACPI_EVENT_RTC)
463                         sprintf(buffer, "ff_rt_clk");
464                 else if (i == num_gpes + ACPI_NUM_FIXED_EVENTS + COUNT_GPE)
465                         sprintf(buffer, "gpe_all");
466                 else if (i == num_gpes + ACPI_NUM_FIXED_EVENTS + COUNT_SCI)
467                         sprintf(buffer, "sci");
468                 else if (i == num_gpes + ACPI_NUM_FIXED_EVENTS + COUNT_SCI_NOT)
469                         sprintf(buffer, "sci_not");
470                 else if (i == num_gpes + ACPI_NUM_FIXED_EVENTS + COUNT_ERROR)
471                         sprintf(buffer, "error");
472                 else
473                         sprintf(buffer, "bug%02X", i);
474
475                 name = kzalloc(strlen(buffer) + 1, GFP_KERNEL);
476                 if (name == NULL)
477                         goto fail;
478                 strncpy(name, buffer, strlen(buffer) + 1);
479
480                 sysfs_attr_init(&counter_attrs[i].attr);
481                 counter_attrs[i].attr.name = name;
482                 counter_attrs[i].attr.mode = 0644;
483                 counter_attrs[i].show = counter_show;
484                 counter_attrs[i].store = counter_set;
485
486                 all_attrs[i] = &counter_attrs[i].attr;
487         }
488
489         interrupt_stats_attr_group.attrs = all_attrs;
490         if (!sysfs_create_group(acpi_kobj, &interrupt_stats_attr_group))
491                 return;
492
493 fail:
494         delete_gpe_attr_array();
495         return;
496 }
497
498 static void __exit interrupt_stats_exit(void)
499 {
500         sysfs_remove_group(acpi_kobj, &interrupt_stats_attr_group);
501
502         delete_gpe_attr_array();
503
504         return;
505 }
506
507 /* --------------------------------------------------------------------------
508                               FS Interface (/proc)
509    -------------------------------------------------------------------------- */
510 #ifdef CONFIG_ACPI_PROCFS
511 #define ACPI_SYSTEM_FILE_INFO           "info"
512 #define ACPI_SYSTEM_FILE_EVENT          "event"
513 #define ACPI_SYSTEM_FILE_DSDT           "dsdt"
514 #define ACPI_SYSTEM_FILE_FADT           "fadt"
515
516 static int acpi_system_read_info(struct seq_file *seq, void *offset)
517 {
518
519         seq_printf(seq, "version:                 %x\n", ACPI_CA_VERSION);
520         return 0;
521 }
522
523 static int acpi_system_info_open_fs(struct inode *inode, struct file *file)
524 {
525         return single_open(file, acpi_system_read_info, PDE(inode)->data);
526 }
527
528 static const struct file_operations acpi_system_info_ops = {
529         .owner = THIS_MODULE,
530         .open = acpi_system_info_open_fs,
531         .read = seq_read,
532         .llseek = seq_lseek,
533         .release = single_release,
534 };
535
536 static ssize_t acpi_system_read_dsdt(struct file *, char __user *, size_t,
537                                      loff_t *);
538
539 static const struct file_operations acpi_system_dsdt_ops = {
540         .owner = THIS_MODULE,
541         .read = acpi_system_read_dsdt,
542 };
543
544 static ssize_t
545 acpi_system_read_dsdt(struct file *file,
546                       char __user * buffer, size_t count, loff_t * ppos)
547 {
548         acpi_status status = AE_OK;
549         struct acpi_table_header *dsdt = NULL;
550         ssize_t res;
551
552         status = acpi_get_table(ACPI_SIG_DSDT, 1, &dsdt);
553         if (ACPI_FAILURE(status))
554                 return -ENODEV;
555
556         res = simple_read_from_buffer(buffer, count, ppos, dsdt, dsdt->length);
557
558         return res;
559 }
560
561 static ssize_t acpi_system_read_fadt(struct file *, char __user *, size_t,
562                                      loff_t *);
563
564 static const struct file_operations acpi_system_fadt_ops = {
565         .owner = THIS_MODULE,
566         .read = acpi_system_read_fadt,
567 };
568
569 static ssize_t
570 acpi_system_read_fadt(struct file *file,
571                       char __user * buffer, size_t count, loff_t * ppos)
572 {
573         acpi_status status = AE_OK;
574         struct acpi_table_header *fadt = NULL;
575         ssize_t res;
576
577         status = acpi_get_table(ACPI_SIG_FADT, 1, &fadt);
578         if (ACPI_FAILURE(status))
579                 return -ENODEV;
580
581         res = simple_read_from_buffer(buffer, count, ppos, fadt, fadt->length);
582
583         return res;
584 }
585
586 static int acpi_system_procfs_init(void)
587 {
588         struct proc_dir_entry *entry;
589         int error = 0;
590
591         /* 'info' [R] */
592         entry = proc_create(ACPI_SYSTEM_FILE_INFO, S_IRUGO, acpi_root_dir,
593                             &acpi_system_info_ops);
594         if (!entry)
595                 goto Error;
596
597         /* 'dsdt' [R] */
598         entry = proc_create(ACPI_SYSTEM_FILE_DSDT, S_IRUSR, acpi_root_dir,
599                             &acpi_system_dsdt_ops);
600         if (!entry)
601                 goto Error;
602
603         /* 'fadt' [R] */
604         entry = proc_create(ACPI_SYSTEM_FILE_FADT, S_IRUSR, acpi_root_dir,
605                             &acpi_system_fadt_ops);
606         if (!entry)
607                 goto Error;
608
609       Done:
610         return error;
611
612       Error:
613         remove_proc_entry(ACPI_SYSTEM_FILE_FADT, acpi_root_dir);
614         remove_proc_entry(ACPI_SYSTEM_FILE_DSDT, acpi_root_dir);
615         remove_proc_entry(ACPI_SYSTEM_FILE_INFO, acpi_root_dir);
616
617         error = -EFAULT;
618         goto Done;
619 }
620 #else
621 static int acpi_system_procfs_init(void)
622 {
623         return 0;
624 }
625 #endif
626
627 int __init acpi_system_init(void)
628 {
629         int result;
630
631         result = acpi_system_procfs_init();
632         if (result)
633                 return result;
634
635         result = acpi_system_sysfs_init();
636
637         return result;
638 }