GNU Linux-libre 4.14.266-gnu1
[releases.git] / tools / power / acpi / os_specific / service_layers / oslinuxtbl.c
1 /******************************************************************************
2  *
3  * Module Name: oslinuxtbl - Linux OSL for obtaining ACPI tables
4  *
5  *****************************************************************************/
6
7 /*
8  * Copyright (C) 2000 - 2017, Intel Corp.
9  * All rights reserved.
10  *
11  * Redistribution and use in source and binary forms, with or without
12  * modification, are permitted provided that the following conditions
13  * are met:
14  * 1. Redistributions of source code must retain the above copyright
15  *    notice, this list of conditions, and the following disclaimer,
16  *    without modification.
17  * 2. Redistributions in binary form must reproduce at minimum a disclaimer
18  *    substantially similar to the "NO WARRANTY" disclaimer below
19  *    ("Disclaimer") and any redistribution must be conditioned upon
20  *    including a substantially similar Disclaimer requirement for further
21  *    binary redistribution.
22  * 3. Neither the names of the above-listed copyright holders nor the names
23  *    of any contributors may be used to endorse or promote products derived
24  *    from this software without specific prior written permission.
25  *
26  * Alternatively, this software may be distributed under the terms of the
27  * GNU General Public License ("GPL") version 2 as published by the Free
28  * Software Foundation.
29  *
30  * NO WARRANTY
31  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
32  * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
33  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR
34  * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
35  * HOLDERS OR CONTRIBUTORS BE LIABLE FOR SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
36  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
37  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
38  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
39  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
40  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
41  * POSSIBILITY OF SUCH DAMAGES.
42  */
43
44 #include "acpidump.h"
45
46 #define _COMPONENT          ACPI_OS_SERVICES
47 ACPI_MODULE_NAME("oslinuxtbl")
48
49 #ifndef PATH_MAX
50 #define PATH_MAX 256
51 #endif
52 /* List of information about obtained ACPI tables */
53 typedef struct osl_table_info {
54         struct osl_table_info *next;
55         u32 instance;
56         char signature[ACPI_NAME_SIZE];
57
58 } osl_table_info;
59
60 /* Local prototypes */
61
62 static acpi_status osl_table_initialize(void);
63
64 static acpi_status
65 osl_table_name_from_file(char *filename, char *signature, u32 *instance);
66
67 static acpi_status osl_add_table_to_list(char *signature, u32 instance);
68
69 static acpi_status
70 osl_read_table_from_file(char *filename,
71                          acpi_size file_offset,
72                          char *signature, struct acpi_table_header **table);
73
74 static acpi_status
75 osl_map_table(acpi_size address,
76               char *signature, struct acpi_table_header **table);
77
78 static void osl_unmap_table(struct acpi_table_header *table);
79
80 static acpi_physical_address
81 osl_find_rsdp_via_efi_by_keyword(FILE * file, const char *keyword);
82
83 static acpi_physical_address osl_find_rsdp_via_efi(void);
84
85 static acpi_status osl_load_rsdp(void);
86
87 static acpi_status osl_list_customized_tables(char *directory);
88
89 static acpi_status
90 osl_get_customized_table(char *pathname,
91                          char *signature,
92                          u32 instance,
93                          struct acpi_table_header **table,
94                          acpi_physical_address *address);
95
96 static acpi_status osl_list_bios_tables(void);
97
98 static acpi_status
99 osl_get_bios_table(char *signature,
100                    u32 instance,
101                    struct acpi_table_header **table,
102                    acpi_physical_address *address);
103
104 static acpi_status osl_get_last_status(acpi_status default_status);
105
106 /* File locations */
107
108 #define DYNAMIC_TABLE_DIR   "/sys/firmware/acpi/tables/dynamic"
109 #define STATIC_TABLE_DIR    "/sys/firmware/acpi/tables"
110 #define EFI_SYSTAB          "/sys/firmware/efi/systab"
111
112 /* Should we get dynamically loaded SSDTs from DYNAMIC_TABLE_DIR? */
113
114 u8 gbl_dump_dynamic_tables = TRUE;
115
116 /* Initialization flags */
117
118 u8 gbl_table_list_initialized = FALSE;
119
120 /* Local copies of main ACPI tables */
121
122 struct acpi_table_rsdp gbl_rsdp;
123 struct acpi_table_fadt *gbl_fadt = NULL;
124 struct acpi_table_rsdt *gbl_rsdt = NULL;
125 struct acpi_table_xsdt *gbl_xsdt = NULL;
126
127 /* Table addresses */
128
129 acpi_physical_address gbl_fadt_address = 0;
130 acpi_physical_address gbl_rsdp_address = 0;
131
132 /* Revision of RSD PTR */
133
134 u8 gbl_revision = 0;
135
136 struct osl_table_info *gbl_table_list_head = NULL;
137 u32 gbl_table_count = 0;
138
139 /******************************************************************************
140  *
141  * FUNCTION:    osl_get_last_status
142  *
143  * PARAMETERS:  default_status  - Default error status to return
144  *
145  * RETURN:      Status; Converted from errno.
146  *
147  * DESCRIPTION: Get last errno and conver it to acpi_status.
148  *
149  *****************************************************************************/
150
151 static acpi_status osl_get_last_status(acpi_status default_status)
152 {
153
154         switch (errno) {
155         case EACCES:
156         case EPERM:
157
158                 return (AE_ACCESS);
159
160         case ENOENT:
161
162                 return (AE_NOT_FOUND);
163
164         case ENOMEM:
165
166                 return (AE_NO_MEMORY);
167
168         default:
169
170                 return (default_status);
171         }
172 }
173
174 /******************************************************************************
175  *
176  * FUNCTION:    acpi_os_get_table_by_address
177  *
178  * PARAMETERS:  address         - Physical address of the ACPI table
179  *              table           - Where a pointer to the table is returned
180  *
181  * RETURN:      Status; Table buffer is returned if AE_OK.
182  *              AE_NOT_FOUND: A valid table was not found at the address
183  *
184  * DESCRIPTION: Get an ACPI table via a physical memory address.
185  *
186  *****************************************************************************/
187
188 acpi_status
189 acpi_os_get_table_by_address(acpi_physical_address address,
190                              struct acpi_table_header **table)
191 {
192         u32 table_length;
193         struct acpi_table_header *mapped_table;
194         struct acpi_table_header *local_table = NULL;
195         acpi_status status = AE_OK;
196
197         /* Get main ACPI tables from memory on first invocation of this function */
198
199         status = osl_table_initialize();
200         if (ACPI_FAILURE(status)) {
201                 return (status);
202         }
203
204         /* Map the table and validate it */
205
206         status = osl_map_table(address, NULL, &mapped_table);
207         if (ACPI_FAILURE(status)) {
208                 return (status);
209         }
210
211         /* Copy table to local buffer and return it */
212
213         table_length = ap_get_table_length(mapped_table);
214         if (table_length == 0) {
215                 status = AE_BAD_HEADER;
216                 goto exit;
217         }
218
219         local_table = calloc(1, table_length);
220         if (!local_table) {
221                 status = AE_NO_MEMORY;
222                 goto exit;
223         }
224
225         memcpy(local_table, mapped_table, table_length);
226
227 exit:
228         osl_unmap_table(mapped_table);
229         *table = local_table;
230         return (status);
231 }
232
233 /******************************************************************************
234  *
235  * FUNCTION:    acpi_os_get_table_by_name
236  *
237  * PARAMETERS:  signature       - ACPI Signature for desired table. Must be
238  *                                a null terminated 4-character string.
239  *              instance        - Multiple table support for SSDT/UEFI (0...n)
240  *                                Must be 0 for other tables.
241  *              table           - Where a pointer to the table is returned
242  *              address         - Where the table physical address is returned
243  *
244  * RETURN:      Status; Table buffer and physical address returned if AE_OK.
245  *              AE_LIMIT: Instance is beyond valid limit
246  *              AE_NOT_FOUND: A table with the signature was not found
247  *
248  * NOTE:        Assumes the input signature is uppercase.
249  *
250  *****************************************************************************/
251
252 acpi_status
253 acpi_os_get_table_by_name(char *signature,
254                           u32 instance,
255                           struct acpi_table_header **table,
256                           acpi_physical_address *address)
257 {
258         acpi_status status;
259
260         /* Get main ACPI tables from memory on first invocation of this function */
261
262         status = osl_table_initialize();
263         if (ACPI_FAILURE(status)) {
264                 return (status);
265         }
266
267         /* Not a main ACPI table, attempt to extract it from the RSDT/XSDT */
268
269         if (!gbl_dump_customized_tables) {
270
271                 /* Attempt to get the table from the memory */
272
273                 status =
274                     osl_get_bios_table(signature, instance, table, address);
275         } else {
276                 /* Attempt to get the table from the static directory */
277
278                 status = osl_get_customized_table(STATIC_TABLE_DIR, signature,
279                                                   instance, table, address);
280         }
281
282         if (ACPI_FAILURE(status) && status == AE_LIMIT) {
283                 if (gbl_dump_dynamic_tables) {
284
285                         /* Attempt to get a dynamic table */
286
287                         status =
288                             osl_get_customized_table(DYNAMIC_TABLE_DIR,
289                                                      signature, instance, table,
290                                                      address);
291                 }
292         }
293
294         return (status);
295 }
296
297 /******************************************************************************
298  *
299  * FUNCTION:    osl_add_table_to_list
300  *
301  * PARAMETERS:  signature       - Table signature
302  *              instance        - Table instance
303  *
304  * RETURN:      Status; Successfully added if AE_OK.
305  *              AE_NO_MEMORY: Memory allocation error
306  *
307  * DESCRIPTION: Insert a table structure into OSL table list.
308  *
309  *****************************************************************************/
310
311 static acpi_status osl_add_table_to_list(char *signature, u32 instance)
312 {
313         struct osl_table_info *new_info;
314         struct osl_table_info *next;
315         u32 next_instance = 0;
316         u8 found = FALSE;
317
318         new_info = calloc(1, sizeof(struct osl_table_info));
319         if (!new_info) {
320                 return (AE_NO_MEMORY);
321         }
322
323         ACPI_MOVE_NAME(new_info->signature, signature);
324
325         if (!gbl_table_list_head) {
326                 gbl_table_list_head = new_info;
327         } else {
328                 next = gbl_table_list_head;
329                 while (1) {
330                         if (ACPI_COMPARE_NAME(next->signature, signature)) {
331                                 if (next->instance == instance) {
332                                         found = TRUE;
333                                 }
334                                 if (next->instance >= next_instance) {
335                                         next_instance = next->instance + 1;
336                                 }
337                         }
338
339                         if (!next->next) {
340                                 break;
341                         }
342                         next = next->next;
343                 }
344                 next->next = new_info;
345         }
346
347         if (found) {
348                 if (instance) {
349                         fprintf(stderr,
350                                 "%4.4s: Warning unmatched table instance %d, expected %d\n",
351                                 signature, instance, next_instance);
352                 }
353                 instance = next_instance;
354         }
355
356         new_info->instance = instance;
357         gbl_table_count++;
358
359         return (AE_OK);
360 }
361
362 /******************************************************************************
363  *
364  * FUNCTION:    acpi_os_get_table_by_index
365  *
366  * PARAMETERS:  index           - Which table to get
367  *              table           - Where a pointer to the table is returned
368  *              instance        - Where a pointer to the table instance no. is
369  *                                returned
370  *              address         - Where the table physical address is returned
371  *
372  * RETURN:      Status; Table buffer and physical address returned if AE_OK.
373  *              AE_LIMIT: Index is beyond valid limit
374  *
375  * DESCRIPTION: Get an ACPI table via an index value (0 through n). Returns
376  *              AE_LIMIT when an invalid index is reached. Index is not
377  *              necessarily an index into the RSDT/XSDT.
378  *
379  *****************************************************************************/
380
381 acpi_status
382 acpi_os_get_table_by_index(u32 index,
383                            struct acpi_table_header **table,
384                            u32 *instance, acpi_physical_address *address)
385 {
386         struct osl_table_info *info;
387         acpi_status status;
388         u32 i;
389
390         /* Get main ACPI tables from memory on first invocation of this function */
391
392         status = osl_table_initialize();
393         if (ACPI_FAILURE(status)) {
394                 return (status);
395         }
396
397         /* Validate Index */
398
399         if (index >= gbl_table_count) {
400                 return (AE_LIMIT);
401         }
402
403         /* Point to the table list entry specified by the Index argument */
404
405         info = gbl_table_list_head;
406         for (i = 0; i < index; i++) {
407                 info = info->next;
408         }
409
410         /* Now we can just get the table via the signature */
411
412         status = acpi_os_get_table_by_name(info->signature, info->instance,
413                                            table, address);
414
415         if (ACPI_SUCCESS(status)) {
416                 *instance = info->instance;
417         }
418         return (status);
419 }
420
421 /******************************************************************************
422  *
423  * FUNCTION:    osl_find_rsdp_via_efi_by_keyword
424  *
425  * PARAMETERS:  keyword         - Character string indicating ACPI GUID version
426  *                                in the EFI table
427  *
428  * RETURN:      RSDP address if found
429  *
430  * DESCRIPTION: Find RSDP address via EFI using keyword indicating the ACPI
431  *              GUID version.
432  *
433  *****************************************************************************/
434
435 static acpi_physical_address
436 osl_find_rsdp_via_efi_by_keyword(FILE * file, const char *keyword)
437 {
438         char buffer[80];
439         unsigned long long address = 0;
440         char format[32];
441
442         snprintf(format, 32, "%s=%s", keyword, "%llx");
443         fseek(file, 0, SEEK_SET);
444         while (fgets(buffer, 80, file)) {
445                 if (sscanf(buffer, format, &address) == 1) {
446                         break;
447                 }
448         }
449
450         return ((acpi_physical_address)(address));
451 }
452
453 /******************************************************************************
454  *
455  * FUNCTION:    osl_find_rsdp_via_efi
456  *
457  * PARAMETERS:  None
458  *
459  * RETURN:      RSDP address if found
460  *
461  * DESCRIPTION: Find RSDP address via EFI.
462  *
463  *****************************************************************************/
464
465 static acpi_physical_address osl_find_rsdp_via_efi(void)
466 {
467         FILE *file;
468         acpi_physical_address address = 0;
469
470         file = fopen(EFI_SYSTAB, "r");
471         if (file) {
472                 address = osl_find_rsdp_via_efi_by_keyword(file, "ACPI20");
473                 if (!address) {
474                         address =
475                             osl_find_rsdp_via_efi_by_keyword(file, "ACPI");
476                 }
477                 fclose(file);
478         }
479
480         return (address);
481 }
482
483 /******************************************************************************
484  *
485  * FUNCTION:    osl_load_rsdp
486  *
487  * PARAMETERS:  None
488  *
489  * RETURN:      Status
490  *
491  * DESCRIPTION: Scan and load RSDP.
492  *
493  *****************************************************************************/
494
495 static acpi_status osl_load_rsdp(void)
496 {
497         struct acpi_table_header *mapped_table;
498         u8 *rsdp_address;
499         acpi_physical_address rsdp_base;
500         acpi_size rsdp_size;
501
502         /* Get RSDP from memory */
503
504         rsdp_size = sizeof(struct acpi_table_rsdp);
505         if (gbl_rsdp_base) {
506                 rsdp_base = gbl_rsdp_base;
507         } else {
508                 rsdp_base = osl_find_rsdp_via_efi();
509         }
510
511         if (!rsdp_base) {
512                 rsdp_base = ACPI_HI_RSDP_WINDOW_BASE;
513                 rsdp_size = ACPI_HI_RSDP_WINDOW_SIZE;
514         }
515
516         rsdp_address = acpi_os_map_memory(rsdp_base, rsdp_size);
517         if (!rsdp_address) {
518                 return (osl_get_last_status(AE_BAD_ADDRESS));
519         }
520
521         /* Search low memory for the RSDP */
522
523         mapped_table = ACPI_CAST_PTR(struct acpi_table_header,
524                                      acpi_tb_scan_memory_for_rsdp(rsdp_address,
525                                                                   rsdp_size));
526         if (!mapped_table) {
527                 acpi_os_unmap_memory(rsdp_address, rsdp_size);
528                 return (AE_NOT_FOUND);
529         }
530
531         gbl_rsdp_address =
532             rsdp_base + (ACPI_CAST8(mapped_table) - rsdp_address);
533
534         memcpy(&gbl_rsdp, mapped_table, sizeof(struct acpi_table_rsdp));
535         acpi_os_unmap_memory(rsdp_address, rsdp_size);
536
537         return (AE_OK);
538 }
539
540 /******************************************************************************
541  *
542  * FUNCTION:    osl_can_use_xsdt
543  *
544  * PARAMETERS:  None
545  *
546  * RETURN:      TRUE if XSDT is allowed to be used.
547  *
548  * DESCRIPTION: This function collects logic that can be used to determine if
549  *              XSDT should be used instead of RSDT.
550  *
551  *****************************************************************************/
552
553 static u8 osl_can_use_xsdt(void)
554 {
555         if (gbl_revision && !acpi_gbl_do_not_use_xsdt) {
556                 return (TRUE);
557         } else {
558                 return (FALSE);
559         }
560 }
561
562 /******************************************************************************
563  *
564  * FUNCTION:    osl_table_initialize
565  *
566  * PARAMETERS:  None
567  *
568  * RETURN:      Status
569  *
570  * DESCRIPTION: Initialize ACPI table data. Get and store main ACPI tables to
571  *              local variables. Main ACPI tables include RSDT, FADT, RSDT,
572  *              and/or XSDT.
573  *
574  *****************************************************************************/
575
576 static acpi_status osl_table_initialize(void)
577 {
578         acpi_status status;
579         acpi_physical_address address;
580
581         if (gbl_table_list_initialized) {
582                 return (AE_OK);
583         }
584
585         if (!gbl_dump_customized_tables) {
586
587                 /* Get RSDP from memory */
588
589                 status = osl_load_rsdp();
590                 if (ACPI_FAILURE(status)) {
591                         return (status);
592                 }
593
594                 /* Get XSDT from memory */
595
596                 if (gbl_rsdp.revision && !gbl_do_not_dump_xsdt) {
597                         if (gbl_xsdt) {
598                                 free(gbl_xsdt);
599                                 gbl_xsdt = NULL;
600                         }
601
602                         gbl_revision = 2;
603                         status = osl_get_bios_table(ACPI_SIG_XSDT, 0,
604                                                     ACPI_CAST_PTR(struct
605                                                                   acpi_table_header
606                                                                   *, &gbl_xsdt),
607                                                     &address);
608                         if (ACPI_FAILURE(status)) {
609                                 return (status);
610                         }
611                 }
612
613                 /* Get RSDT from memory */
614
615                 if (gbl_rsdp.rsdt_physical_address) {
616                         if (gbl_rsdt) {
617                                 free(gbl_rsdt);
618                                 gbl_rsdt = NULL;
619                         }
620
621                         status = osl_get_bios_table(ACPI_SIG_RSDT, 0,
622                                                     ACPI_CAST_PTR(struct
623                                                                   acpi_table_header
624                                                                   *, &gbl_rsdt),
625                                                     &address);
626                         if (ACPI_FAILURE(status)) {
627                                 return (status);
628                         }
629                 }
630
631                 /* Get FADT from memory */
632
633                 if (gbl_fadt) {
634                         free(gbl_fadt);
635                         gbl_fadt = NULL;
636                 }
637
638                 status = osl_get_bios_table(ACPI_SIG_FADT, 0,
639                                             ACPI_CAST_PTR(struct
640                                                           acpi_table_header *,
641                                                           &gbl_fadt),
642                                             &gbl_fadt_address);
643                 if (ACPI_FAILURE(status)) {
644                         return (status);
645                 }
646
647                 /* Add mandatory tables to global table list first */
648
649                 status = osl_add_table_to_list(ACPI_RSDP_NAME, 0);
650                 if (ACPI_FAILURE(status)) {
651                         return (status);
652                 }
653
654                 status = osl_add_table_to_list(ACPI_SIG_RSDT, 0);
655                 if (ACPI_FAILURE(status)) {
656                         return (status);
657                 }
658
659                 if (gbl_revision == 2) {
660                         status = osl_add_table_to_list(ACPI_SIG_XSDT, 0);
661                         if (ACPI_FAILURE(status)) {
662                                 return (status);
663                         }
664                 }
665
666                 status = osl_add_table_to_list(ACPI_SIG_DSDT, 0);
667                 if (ACPI_FAILURE(status)) {
668                         return (status);
669                 }
670
671                 status = osl_add_table_to_list(ACPI_SIG_FACS, 0);
672                 if (ACPI_FAILURE(status)) {
673                         return (status);
674                 }
675
676                 /* Add all tables found in the memory */
677
678                 status = osl_list_bios_tables();
679                 if (ACPI_FAILURE(status)) {
680                         return (status);
681                 }
682         } else {
683                 /* Add all tables found in the static directory */
684
685                 status = osl_list_customized_tables(STATIC_TABLE_DIR);
686                 if (ACPI_FAILURE(status)) {
687                         return (status);
688                 }
689         }
690
691         if (gbl_dump_dynamic_tables) {
692
693                 /* Add all dynamically loaded tables in the dynamic directory */
694
695                 status = osl_list_customized_tables(DYNAMIC_TABLE_DIR);
696                 if (ACPI_FAILURE(status)) {
697                         return (status);
698                 }
699         }
700
701         gbl_table_list_initialized = TRUE;
702         return (AE_OK);
703 }
704
705 /******************************************************************************
706  *
707  * FUNCTION:    osl_list_bios_tables
708  *
709  * PARAMETERS:  None
710  *
711  * RETURN:      Status; Table list is initialized if AE_OK.
712  *
713  * DESCRIPTION: Add ACPI tables to the table list from memory.
714  *
715  * NOTE:        This works on Linux as table customization does not modify the
716  *              addresses stored in RSDP/RSDT/XSDT/FADT.
717  *
718  *****************************************************************************/
719
720 static acpi_status osl_list_bios_tables(void)
721 {
722         struct acpi_table_header *mapped_table = NULL;
723         u8 *table_data;
724         u8 number_of_tables;
725         u8 item_size;
726         acpi_physical_address table_address = 0;
727         acpi_status status = AE_OK;
728         u32 i;
729
730         if (osl_can_use_xsdt()) {
731                 item_size = sizeof(u64);
732                 table_data =
733                     ACPI_CAST8(gbl_xsdt) + sizeof(struct acpi_table_header);
734                 number_of_tables =
735                     (u8)((gbl_xsdt->header.length -
736                           sizeof(struct acpi_table_header))
737                          / item_size);
738         } else {                /* Use RSDT if XSDT is not available */
739
740                 item_size = sizeof(u32);
741                 table_data =
742                     ACPI_CAST8(gbl_rsdt) + sizeof(struct acpi_table_header);
743                 number_of_tables =
744                     (u8)((gbl_rsdt->header.length -
745                           sizeof(struct acpi_table_header))
746                          / item_size);
747         }
748
749         /* Search RSDT/XSDT for the requested table */
750
751         for (i = 0; i < number_of_tables; ++i, table_data += item_size) {
752                 if (osl_can_use_xsdt()) {
753                         table_address =
754                             (acpi_physical_address)(*ACPI_CAST64(table_data));
755                 } else {
756                         table_address =
757                             (acpi_physical_address)(*ACPI_CAST32(table_data));
758                 }
759
760                 /* Skip NULL entries in RSDT/XSDT */
761
762                 if (table_address == 0) {
763                         continue;
764                 }
765
766                 status = osl_map_table(table_address, NULL, &mapped_table);
767                 if (ACPI_FAILURE(status)) {
768                         return (status);
769                 }
770
771                 osl_add_table_to_list(mapped_table->signature, 0);
772                 osl_unmap_table(mapped_table);
773         }
774
775         return (AE_OK);
776 }
777
778 /******************************************************************************
779  *
780  * FUNCTION:    osl_get_bios_table
781  *
782  * PARAMETERS:  signature       - ACPI Signature for common table. Must be
783  *                                a null terminated 4-character string.
784  *              instance        - Multiple table support for SSDT/UEFI (0...n)
785  *                                Must be 0 for other tables.
786  *              table           - Where a pointer to the table is returned
787  *              address         - Where the table physical address is returned
788  *
789  * RETURN:      Status; Table buffer and physical address returned if AE_OK.
790  *              AE_LIMIT: Instance is beyond valid limit
791  *              AE_NOT_FOUND: A table with the signature was not found
792  *
793  * DESCRIPTION: Get a BIOS provided ACPI table
794  *
795  * NOTE:        Assumes the input signature is uppercase.
796  *
797  *****************************************************************************/
798
799 static acpi_status
800 osl_get_bios_table(char *signature,
801                    u32 instance,
802                    struct acpi_table_header **table,
803                    acpi_physical_address *address)
804 {
805         struct acpi_table_header *local_table = NULL;
806         struct acpi_table_header *mapped_table = NULL;
807         u8 *table_data;
808         u8 number_of_tables;
809         u8 item_size;
810         u32 current_instance = 0;
811         acpi_physical_address table_address;
812         acpi_physical_address first_table_address = 0;
813         u32 table_length = 0;
814         acpi_status status = AE_OK;
815         u32 i;
816
817         /* Handle special tables whose addresses are not in RSDT/XSDT */
818
819         if (ACPI_COMPARE_NAME(signature, ACPI_RSDP_NAME) ||
820             ACPI_COMPARE_NAME(signature, ACPI_SIG_RSDT) ||
821             ACPI_COMPARE_NAME(signature, ACPI_SIG_XSDT) ||
822             ACPI_COMPARE_NAME(signature, ACPI_SIG_DSDT) ||
823             ACPI_COMPARE_NAME(signature, ACPI_SIG_FACS)) {
824
825 find_next_instance:
826
827                 table_address = 0;
828
829                 /*
830                  * Get the appropriate address, either 32-bit or 64-bit. Be very
831                  * careful about the FADT length and validate table addresses.
832                  * Note: The 64-bit addresses have priority.
833                  */
834                 if (ACPI_COMPARE_NAME(signature, ACPI_SIG_DSDT)) {
835                         if (current_instance < 2) {
836                                 if ((gbl_fadt->header.length >=
837                                      MIN_FADT_FOR_XDSDT) && gbl_fadt->Xdsdt
838                                     && current_instance == 0) {
839                                         table_address =
840                                             (acpi_physical_address)gbl_fadt->
841                                             Xdsdt;
842                                 } else
843                                     if ((gbl_fadt->header.length >=
844                                          MIN_FADT_FOR_DSDT)
845                                         && gbl_fadt->dsdt !=
846                                         first_table_address) {
847                                         table_address =
848                                             (acpi_physical_address)gbl_fadt->
849                                             dsdt;
850                                 }
851                         }
852                 } else if (ACPI_COMPARE_NAME(signature, ACPI_SIG_FACS)) {
853                         if (current_instance < 2) {
854                                 if ((gbl_fadt->header.length >=
855                                      MIN_FADT_FOR_XFACS) && gbl_fadt->Xfacs
856                                     && current_instance == 0) {
857                                         table_address =
858                                             (acpi_physical_address)gbl_fadt->
859                                             Xfacs;
860                                 } else
861                                     if ((gbl_fadt->header.length >=
862                                          MIN_FADT_FOR_FACS)
863                                         && gbl_fadt->facs !=
864                                         first_table_address) {
865                                         table_address =
866                                             (acpi_physical_address)gbl_fadt->
867                                             facs;
868                                 }
869                         }
870                 } else if (ACPI_COMPARE_NAME(signature, ACPI_SIG_XSDT)) {
871                         if (!gbl_revision) {
872                                 return (AE_BAD_SIGNATURE);
873                         }
874                         if (current_instance == 0) {
875                                 table_address =
876                                     (acpi_physical_address)gbl_rsdp.
877                                     xsdt_physical_address;
878                         }
879                 } else if (ACPI_COMPARE_NAME(signature, ACPI_SIG_RSDT)) {
880                         if (current_instance == 0) {
881                                 table_address =
882                                     (acpi_physical_address)gbl_rsdp.
883                                     rsdt_physical_address;
884                         }
885                 } else {
886                         if (current_instance == 0) {
887                                 table_address =
888                                     (acpi_physical_address)gbl_rsdp_address;
889                                 signature = ACPI_SIG_RSDP;
890                         }
891                 }
892
893                 if (table_address == 0) {
894                         goto exit_find_table;
895                 }
896
897                 /* Now we can get the requested special table */
898
899                 status = osl_map_table(table_address, signature, &mapped_table);
900                 if (ACPI_FAILURE(status)) {
901                         return (status);
902                 }
903
904                 table_length = ap_get_table_length(mapped_table);
905                 if (first_table_address == 0) {
906                         first_table_address = table_address;
907                 }
908
909                 /* Match table instance */
910
911                 if (current_instance != instance) {
912                         osl_unmap_table(mapped_table);
913                         mapped_table = NULL;
914                         current_instance++;
915                         goto find_next_instance;
916                 }
917         } else {                /* Case for a normal ACPI table */
918
919                 if (osl_can_use_xsdt()) {
920                         item_size = sizeof(u64);
921                         table_data =
922                             ACPI_CAST8(gbl_xsdt) +
923                             sizeof(struct acpi_table_header);
924                         number_of_tables =
925                             (u8)((gbl_xsdt->header.length -
926                                   sizeof(struct acpi_table_header))
927                                  / item_size);
928                 } else {        /* Use RSDT if XSDT is not available */
929
930                         item_size = sizeof(u32);
931                         table_data =
932                             ACPI_CAST8(gbl_rsdt) +
933                             sizeof(struct acpi_table_header);
934                         number_of_tables =
935                             (u8)((gbl_rsdt->header.length -
936                                   sizeof(struct acpi_table_header))
937                                  / item_size);
938                 }
939
940                 /* Search RSDT/XSDT for the requested table */
941
942                 for (i = 0; i < number_of_tables; ++i, table_data += item_size) {
943                         if (osl_can_use_xsdt()) {
944                                 table_address =
945                                     (acpi_physical_address)(*ACPI_CAST64
946                                                             (table_data));
947                         } else {
948                                 table_address =
949                                     (acpi_physical_address)(*ACPI_CAST32
950                                                             (table_data));
951                         }
952
953                         /* Skip NULL entries in RSDT/XSDT */
954
955                         if (table_address == 0) {
956                                 continue;
957                         }
958
959                         status =
960                             osl_map_table(table_address, NULL, &mapped_table);
961                         if (ACPI_FAILURE(status)) {
962                                 return (status);
963                         }
964                         table_length = mapped_table->length;
965
966                         /* Does this table match the requested signature? */
967
968                         if (!ACPI_COMPARE_NAME
969                             (mapped_table->signature, signature)) {
970                                 osl_unmap_table(mapped_table);
971                                 mapped_table = NULL;
972                                 continue;
973                         }
974
975                         /* Match table instance (for SSDT/UEFI tables) */
976
977                         if (current_instance != instance) {
978                                 osl_unmap_table(mapped_table);
979                                 mapped_table = NULL;
980                                 current_instance++;
981                                 continue;
982                         }
983
984                         break;
985                 }
986         }
987
988 exit_find_table:
989
990         if (!mapped_table) {
991                 return (AE_LIMIT);
992         }
993
994         if (table_length == 0) {
995                 status = AE_BAD_HEADER;
996                 goto exit;
997         }
998
999         /* Copy table to local buffer and return it */
1000
1001         local_table = calloc(1, table_length);
1002         if (!local_table) {
1003                 status = AE_NO_MEMORY;
1004                 goto exit;
1005         }
1006
1007         memcpy(local_table, mapped_table, table_length);
1008         *address = table_address;
1009         *table = local_table;
1010
1011 exit:
1012         osl_unmap_table(mapped_table);
1013         return (status);
1014 }
1015
1016 /******************************************************************************
1017  *
1018  * FUNCTION:    osl_list_customized_tables
1019  *
1020  * PARAMETERS:  directory           - Directory that contains the tables
1021  *
1022  * RETURN:      Status; Table list is initialized if AE_OK.
1023  *
1024  * DESCRIPTION: Add ACPI tables to the table list from a directory.
1025  *
1026  *****************************************************************************/
1027
1028 static acpi_status osl_list_customized_tables(char *directory)
1029 {
1030         void *table_dir;
1031         u32 instance;
1032         char temp_name[ACPI_NAME_SIZE];
1033         char *filename;
1034         acpi_status status = AE_OK;
1035
1036         /* Open the requested directory */
1037
1038         table_dir = acpi_os_open_directory(directory, "*", REQUEST_FILE_ONLY);
1039         if (!table_dir) {
1040                 return (osl_get_last_status(AE_NOT_FOUND));
1041         }
1042
1043         /* Examine all entries in this directory */
1044
1045         while ((filename = acpi_os_get_next_filename(table_dir))) {
1046
1047                 /* Extract table name and instance number */
1048
1049                 status =
1050                     osl_table_name_from_file(filename, temp_name, &instance);
1051
1052                 /* Ignore meaningless files */
1053
1054                 if (ACPI_FAILURE(status)) {
1055                         continue;
1056                 }
1057
1058                 /* Add new info node to global table list */
1059
1060                 status = osl_add_table_to_list(temp_name, instance);
1061                 if (ACPI_FAILURE(status)) {
1062                         break;
1063                 }
1064         }
1065
1066         acpi_os_close_directory(table_dir);
1067         return (status);
1068 }
1069
1070 /******************************************************************************
1071  *
1072  * FUNCTION:    osl_map_table
1073  *
1074  * PARAMETERS:  address             - Address of the table in memory
1075  *              signature           - Optional ACPI Signature for desired table.
1076  *                                    Null terminated 4-character string.
1077  *              table               - Where a pointer to the mapped table is
1078  *                                    returned
1079  *
1080  * RETURN:      Status; Mapped table is returned if AE_OK.
1081  *              AE_NOT_FOUND: A valid table was not found at the address
1082  *
1083  * DESCRIPTION: Map entire ACPI table into caller's address space.
1084  *
1085  *****************************************************************************/
1086
1087 static acpi_status
1088 osl_map_table(acpi_size address,
1089               char *signature, struct acpi_table_header **table)
1090 {
1091         struct acpi_table_header *mapped_table;
1092         u32 length;
1093
1094         if (!address) {
1095                 return (AE_BAD_ADDRESS);
1096         }
1097
1098         /*
1099          * Map the header so we can get the table length.
1100          * Use sizeof (struct acpi_table_header) as:
1101          * 1. it is bigger than 24 to include RSDP->Length
1102          * 2. it is smaller than sizeof (struct acpi_table_rsdp)
1103          */
1104         mapped_table =
1105             acpi_os_map_memory(address, sizeof(struct acpi_table_header));
1106         if (!mapped_table) {
1107                 fprintf(stderr, "Could not map table header at 0x%8.8X%8.8X\n",
1108                         ACPI_FORMAT_UINT64(address));
1109                 return (osl_get_last_status(AE_BAD_ADDRESS));
1110         }
1111
1112         /* If specified, signature must match */
1113
1114         if (signature) {
1115                 if (ACPI_VALIDATE_RSDP_SIG(signature)) {
1116                         if (!ACPI_VALIDATE_RSDP_SIG(mapped_table->signature)) {
1117                                 acpi_os_unmap_memory(mapped_table,
1118                                                      sizeof(struct
1119                                                             acpi_table_header));
1120                                 return (AE_BAD_SIGNATURE);
1121                         }
1122                 } else
1123                     if (!ACPI_COMPARE_NAME(signature, mapped_table->signature))
1124                 {
1125                         acpi_os_unmap_memory(mapped_table,
1126                                              sizeof(struct acpi_table_header));
1127                         return (AE_BAD_SIGNATURE);
1128                 }
1129         }
1130
1131         /* Map the entire table */
1132
1133         length = ap_get_table_length(mapped_table);
1134         acpi_os_unmap_memory(mapped_table, sizeof(struct acpi_table_header));
1135         if (length == 0) {
1136                 return (AE_BAD_HEADER);
1137         }
1138
1139         mapped_table = acpi_os_map_memory(address, length);
1140         if (!mapped_table) {
1141                 fprintf(stderr,
1142                         "Could not map table at 0x%8.8X%8.8X length %8.8X\n",
1143                         ACPI_FORMAT_UINT64(address), length);
1144                 return (osl_get_last_status(AE_INVALID_TABLE_LENGTH));
1145         }
1146
1147         (void)ap_is_valid_checksum(mapped_table);
1148
1149         *table = mapped_table;
1150         return (AE_OK);
1151 }
1152
1153 /******************************************************************************
1154  *
1155  * FUNCTION:    osl_unmap_table
1156  *
1157  * PARAMETERS:  table               - A pointer to the mapped table
1158  *
1159  * RETURN:      None
1160  *
1161  * DESCRIPTION: Unmap entire ACPI table.
1162  *
1163  *****************************************************************************/
1164
1165 static void osl_unmap_table(struct acpi_table_header *table)
1166 {
1167         if (table) {
1168                 acpi_os_unmap_memory(table, ap_get_table_length(table));
1169         }
1170 }
1171
1172 /******************************************************************************
1173  *
1174  * FUNCTION:    osl_table_name_from_file
1175  *
1176  * PARAMETERS:  filename            - File that contains the desired table
1177  *              signature           - Pointer to 4-character buffer to store
1178  *                                    extracted table signature.
1179  *              instance            - Pointer to integer to store extracted
1180  *                                    table instance number.
1181  *
1182  * RETURN:      Status; Table name is extracted if AE_OK.
1183  *
1184  * DESCRIPTION: Extract table signature and instance number from a table file
1185  *              name.
1186  *
1187  *****************************************************************************/
1188
1189 static acpi_status
1190 osl_table_name_from_file(char *filename, char *signature, u32 *instance)
1191 {
1192
1193         /* Ignore meaningless files */
1194
1195         if (strlen(filename) < ACPI_NAME_SIZE) {
1196                 return (AE_BAD_SIGNATURE);
1197         }
1198
1199         /* Extract instance number */
1200
1201         if (isdigit((int)filename[ACPI_NAME_SIZE])) {
1202                 sscanf(&filename[ACPI_NAME_SIZE], "%u", instance);
1203         } else if (strlen(filename) != ACPI_NAME_SIZE) {
1204                 return (AE_BAD_SIGNATURE);
1205         } else {
1206                 *instance = 0;
1207         }
1208
1209         /* Extract signature */
1210
1211         ACPI_MOVE_NAME(signature, filename);
1212         return (AE_OK);
1213 }
1214
1215 /******************************************************************************
1216  *
1217  * FUNCTION:    osl_read_table_from_file
1218  *
1219  * PARAMETERS:  filename            - File that contains the desired table
1220  *              file_offset         - Offset of the table in file
1221  *              signature           - Optional ACPI Signature for desired table.
1222  *                                    A null terminated 4-character string.
1223  *              table               - Where a pointer to the table is returned
1224  *
1225  * RETURN:      Status; Table buffer is returned if AE_OK.
1226  *
1227  * DESCRIPTION: Read a ACPI table from a file.
1228  *
1229  *****************************************************************************/
1230
1231 static acpi_status
1232 osl_read_table_from_file(char *filename,
1233                          acpi_size file_offset,
1234                          char *signature, struct acpi_table_header **table)
1235 {
1236         FILE *table_file;
1237         struct acpi_table_header header;
1238         struct acpi_table_header *local_table = NULL;
1239         u32 table_length;
1240         s32 count;
1241         acpi_status status = AE_OK;
1242
1243         /* Open the file */
1244
1245         table_file = fopen(filename, "rb");
1246         if (table_file == NULL) {
1247                 fprintf(stderr, "Could not open table file: %s\n", filename);
1248                 return (osl_get_last_status(AE_NOT_FOUND));
1249         }
1250
1251         fseek(table_file, file_offset, SEEK_SET);
1252
1253         /* Read the Table header to get the table length */
1254
1255         count = fread(&header, 1, sizeof(struct acpi_table_header), table_file);
1256         if (count != sizeof(struct acpi_table_header)) {
1257                 fprintf(stderr, "Could not read table header: %s\n", filename);
1258                 status = AE_BAD_HEADER;
1259                 goto exit;
1260         }
1261
1262         /* If signature is specified, it must match the table */
1263
1264         if (signature) {
1265                 if (ACPI_VALIDATE_RSDP_SIG(signature)) {
1266                         if (!ACPI_VALIDATE_RSDP_SIG(header.signature)) {
1267                                 fprintf(stderr,
1268                                         "Incorrect RSDP signature: found %8.8s\n",
1269                                         header.signature);
1270                                 status = AE_BAD_SIGNATURE;
1271                                 goto exit;
1272                         }
1273                 } else if (!ACPI_COMPARE_NAME(signature, header.signature)) {
1274                         fprintf(stderr,
1275                                 "Incorrect signature: Expecting %4.4s, found %4.4s\n",
1276                                 signature, header.signature);
1277                         status = AE_BAD_SIGNATURE;
1278                         goto exit;
1279                 }
1280         }
1281
1282         table_length = ap_get_table_length(&header);
1283         if (table_length == 0) {
1284                 status = AE_BAD_HEADER;
1285                 goto exit;
1286         }
1287
1288         /* Read the entire table into a local buffer */
1289
1290         local_table = calloc(1, table_length);
1291         if (!local_table) {
1292                 fprintf(stderr,
1293                         "%4.4s: Could not allocate buffer for table of length %X\n",
1294                         header.signature, table_length);
1295                 status = AE_NO_MEMORY;
1296                 goto exit;
1297         }
1298
1299         fseek(table_file, file_offset, SEEK_SET);
1300
1301         count = fread(local_table, 1, table_length, table_file);
1302         if (count != table_length) {
1303                 fprintf(stderr, "%4.4s: Could not read table content\n",
1304                         header.signature);
1305                 status = AE_INVALID_TABLE_LENGTH;
1306                 goto exit;
1307         }
1308
1309         /* Validate checksum */
1310
1311         (void)ap_is_valid_checksum(local_table);
1312
1313 exit:
1314         fclose(table_file);
1315         *table = local_table;
1316         return (status);
1317 }
1318
1319 /******************************************************************************
1320  *
1321  * FUNCTION:    osl_get_customized_table
1322  *
1323  * PARAMETERS:  pathname        - Directory to find Linux customized table
1324  *              signature       - ACPI Signature for desired table. Must be
1325  *                                a null terminated 4-character string.
1326  *              instance        - Multiple table support for SSDT/UEFI (0...n)
1327  *                                Must be 0 for other tables.
1328  *              table           - Where a pointer to the table is returned
1329  *              address         - Where the table physical address is returned
1330  *
1331  * RETURN:      Status; Table buffer is returned if AE_OK.
1332  *              AE_LIMIT: Instance is beyond valid limit
1333  *              AE_NOT_FOUND: A table with the signature was not found
1334  *
1335  * DESCRIPTION: Get an OS customized table.
1336  *
1337  *****************************************************************************/
1338
1339 static acpi_status
1340 osl_get_customized_table(char *pathname,
1341                          char *signature,
1342                          u32 instance,
1343                          struct acpi_table_header **table,
1344                          acpi_physical_address *address)
1345 {
1346         void *table_dir;
1347         u32 current_instance = 0;
1348         char temp_name[ACPI_NAME_SIZE];
1349         char table_filename[PATH_MAX];
1350         char *filename;
1351         acpi_status status;
1352
1353         /* Open the directory for customized tables */
1354
1355         table_dir = acpi_os_open_directory(pathname, "*", REQUEST_FILE_ONLY);
1356         if (!table_dir) {
1357                 return (osl_get_last_status(AE_NOT_FOUND));
1358         }
1359
1360         /* Attempt to find the table in the directory */
1361
1362         while ((filename = acpi_os_get_next_filename(table_dir))) {
1363
1364                 /* Ignore meaningless files */
1365
1366                 if (!ACPI_COMPARE_NAME(filename, signature)) {
1367                         continue;
1368                 }
1369
1370                 /* Extract table name and instance number */
1371
1372                 status =
1373                     osl_table_name_from_file(filename, temp_name,
1374                                              &current_instance);
1375
1376                 /* Ignore meaningless files */
1377
1378                 if (ACPI_FAILURE(status) || current_instance != instance) {
1379                         continue;
1380                 }
1381
1382                 /* Create the table pathname */
1383
1384                 if (instance != 0) {
1385                         sprintf(table_filename, "%s/%4.4s%d", pathname,
1386                                 temp_name, instance);
1387                 } else {
1388                         sprintf(table_filename, "%s/%4.4s", pathname,
1389                                 temp_name);
1390                 }
1391                 break;
1392         }
1393
1394         acpi_os_close_directory(table_dir);
1395
1396         if (!filename) {
1397                 return (AE_LIMIT);
1398         }
1399
1400         /* There is no physical address saved for customized tables, use zero */
1401
1402         *address = 0;
1403         status = osl_read_table_from_file(table_filename, 0, NULL, table);
1404
1405         return (status);
1406 }