1/*-
2 * Copyright (c) 2004 Nate Lawson (SDG)
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 *    notice, this list of conditions and the following disclaimer in the
12 *    documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 */
26
27#include <sys/param.h>
28#include <sys/bus.h>
29
30#include <contrib/dev/acpica/include/acpi.h>
31
32#include <dev/acpica/acpivar.h>
33
34enum ops_t {
35	OP_NONE,
36	OP_LEQ,
37	OP_GEQ,
38	OP_EQL,
39};
40
41enum val_t {
42	OEM,
43	OEM_REV,
44	CREATOR,
45	CREATOR_REV,
46};
47
48struct acpi_q_rule {
49    char	sig[ACPI_NAMESEG_SIZE];	/* Table signature to match */
50    enum val_t	val;
51    union {
52	char	*id;
53	enum ops_t op;
54    } x;
55    union {
56	char	*tid;
57	int	rev;
58    } y;
59};
60
61struct acpi_q_entry {
62    const struct acpi_q_rule *match;
63    int		quirks;
64};
65
66#include "acpi_quirks.h"
67
68static int	aq_revcmp(int revision, enum ops_t op, int value);
69static int	aq_strcmp(char *actual, char *possible);
70static int	aq_match_header(ACPI_TABLE_HEADER *hdr,
71		    const struct acpi_q_rule *match);
72
73static int
74aq_revcmp(int revision, enum ops_t op, int value)
75{
76    switch (op) {
77    case OP_LEQ:
78	if (revision <= value)
79	    return (TRUE);
80	break;
81    case OP_GEQ:
82	if (revision >= value)
83	    return (TRUE);
84	break;
85    case OP_EQL:
86	if (revision == value)
87	    return (TRUE);
88	break;
89    case OP_NONE:
90	return (TRUE);
91    default:
92	panic("aq_revcmp: invalid op %d", op);
93    }
94
95    return (FALSE);
96}
97
98static int
99aq_strcmp(char *actual, char *possible)
100{
101    if (actual == NULL || possible == NULL)
102	return (TRUE);
103    return (strncmp(actual, possible, strlen(possible)) == 0);
104}
105
106static int
107aq_match_header(ACPI_TABLE_HEADER *hdr, const struct acpi_q_rule *match)
108{
109    int result;
110
111    result = FALSE;
112    switch (match->val) {
113    case OEM:
114	if (aq_strcmp(hdr->OemId, match->x.id) &&
115	    aq_strcmp(hdr->OemTableId, match->y.tid))
116	    result = TRUE;
117	break;
118    case CREATOR:
119	if (aq_strcmp(hdr->AslCompilerId, match->x.id))
120	    result = TRUE;
121	break;
122    case OEM_REV:
123	if (aq_revcmp(hdr->OemRevision, match->x.op, match->y.rev))
124	    result = TRUE;
125	break;
126    case CREATOR_REV:
127	if (aq_revcmp(hdr->AslCompilerRevision, match->x.op, match->y.rev))
128	    result = TRUE;
129	break;
130    }
131
132    return (result);
133}
134
135int
136acpi_table_quirks(int *quirks)
137{
138    const struct acpi_q_entry *entry;
139    const struct acpi_q_rule *match;
140    ACPI_TABLE_HEADER fadt, dsdt, xsdt, *hdr;
141    int done;
142
143    /* First, allow the machdep system to set its idea of quirks. */
144    KASSERT(quirks != NULL, ("acpi quirks ptr is NULL"));
145    acpi_machdep_quirks(quirks);
146
147    if (ACPI_FAILURE(AcpiGetTableHeader(ACPI_SIG_FADT, 0, &fadt)))
148	bzero(&fadt, sizeof(fadt));
149    if (ACPI_FAILURE(AcpiGetTableHeader(ACPI_SIG_DSDT, 0, &dsdt)))
150	bzero(&dsdt, sizeof(dsdt));
151    if (ACPI_FAILURE(AcpiGetTableHeader(ACPI_SIG_XSDT, 0, &xsdt)))
152	bzero(&xsdt, sizeof(xsdt));
153
154    /* Then, override the quirks with any matched from table signatures. */
155    for (entry = acpi_quirks_table; entry->match; entry++) {
156	done = TRUE;
157	for (match = entry->match; match->sig[0] != '\0'; match++) {
158	    if (!strncmp(match->sig, "FADT", ACPI_NAMESEG_SIZE))
159		hdr = &fadt;
160	    else if (!strncmp(match->sig, ACPI_SIG_DSDT, ACPI_NAMESEG_SIZE))
161		hdr = &dsdt;
162	    else if (!strncmp(match->sig, ACPI_SIG_XSDT, ACPI_NAMESEG_SIZE))
163		hdr = &xsdt;
164	    else
165		panic("invalid quirk header\n");
166
167	    /* If we don't match any, skip to the next entry. */
168	    if (aq_match_header(hdr, match) == FALSE) {
169		done = FALSE;
170		break;
171	    }
172	}
173
174	/* If all entries matched, update the quirks and return. */
175	if (done) {
176	    *quirks = entry->quirks;
177	    break;
178	}
179    }
180
181    return (0);
182}
183