xref: /dflybsd-src/sys/dev/acpica/acpi_resource.c (revision b4ddbe789819885eb6f829ae1760b9844c29eb07)
1 /*-
2  * Copyright (c) 2000 Michael Smith
3  * Copyright (c) 2000 BSDi
4  * All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  *
15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25  * SUCH DAMAGE.
26  *
27  * $FreeBSD: head/sys/dev/acpica/acpi_resource.c 263975 2014-03-31 19:37:39Z imp $
28  */
29 
30 #include "opt_acpi.h"
31 #include <sys/param.h>
32 #include <sys/kernel.h>
33 #include <sys/bus.h>
34 #include <sys/limits.h>
35 #include <sys/malloc.h>
36 #include <sys/module.h>
37 #include <sys/resource.h>
38 #include <sys/machintr.h>
39 
40 #include <sys/rman.h>
41 
42 #include "acpi.h"
43 #include <dev/acpica/acpivar.h>
44 
45 /* Hooks for the ACPICA debugging infrastructure */
46 #define _COMPONENT	ACPI_BUS
47 ACPI_MODULE_NAME("RESOURCE")
48 
49 struct lookup_irq_request {
50     ACPI_RESOURCE *acpi_res;
51     struct resource *res;
52     int		counter;
53     int		rid;
54     int		found;
55 };
56 
57 static ACPI_STATUS
58 acpi_lookup_irq_handler(ACPI_RESOURCE *res, void *context)
59 {
60     struct lookup_irq_request *req;
61     size_t len;
62     u_int irqnum;
63     u_int irq __debugvar;
64 
65     switch (res->Type) {
66     case ACPI_RESOURCE_TYPE_IRQ:
67 	irqnum = res->Data.Irq.InterruptCount;
68 	irq = res->Data.Irq.Interrupts[0];
69 	len = ACPI_RS_SIZE(ACPI_RESOURCE_IRQ);
70 	break;
71     case ACPI_RESOURCE_TYPE_EXTENDED_IRQ:
72 	irqnum = res->Data.ExtendedIrq.InterruptCount;
73 	irq = res->Data.ExtendedIrq.Interrupts[0];
74 	len = ACPI_RS_SIZE(ACPI_RESOURCE_EXTENDED_IRQ);
75 	break;
76     default:
77 	return (AE_OK);
78     }
79     if (irqnum != 1)
80 	return (AE_OK);
81     req = (struct lookup_irq_request *)context;
82     if (req->counter != req->rid) {
83 	req->counter++;
84 	return (AE_OK);
85     }
86     req->found = 1;
87     KASSERT(irq == rman_get_start(req->res),
88 	("IRQ resources do not match"));
89     bcopy(res, req->acpi_res, len);
90     return (AE_CTRL_TERMINATE);
91 }
92 
93 ACPI_STATUS
94 acpi_lookup_irq_resource(device_t dev, int rid, struct resource *res,
95     ACPI_RESOURCE *acpi_res)
96 {
97     struct lookup_irq_request req;
98     ACPI_STATUS status;
99 
100     req.acpi_res = acpi_res;
101     req.res = res;
102     req.counter = 0;
103     req.rid = rid;
104     req.found = 0;
105     status = AcpiWalkResources(acpi_get_handle(dev), "_CRS",
106 	acpi_lookup_irq_handler, &req);
107     if (ACPI_SUCCESS(status) && req.found == 0)
108 	status = AE_NOT_FOUND;
109     return (status);
110 }
111 
112 void
113 acpi_config_intr(device_t dev, ACPI_RESOURCE *res)
114 {
115     u_int irq;
116     int pol, trig;
117     enum intr_trigger trigger;
118     enum intr_polarity polarity;
119 
120     switch (res->Type) {
121     case ACPI_RESOURCE_TYPE_IRQ:
122 	KASSERT(res->Data.Irq.InterruptCount == 1,
123 	    ("%s: multiple interrupts", __func__));
124 	irq = res->Data.Irq.Interrupts[0];
125 	trig = res->Data.Irq.Triggering;
126 	pol = res->Data.Irq.Polarity;
127 	break;
128     case ACPI_RESOURCE_TYPE_EXTENDED_IRQ:
129 	KASSERT(res->Data.ExtendedIrq.InterruptCount == 1,
130 	    ("%s: multiple interrupts", __func__));
131 	irq = res->Data.ExtendedIrq.Interrupts[0];
132 	trig = res->Data.ExtendedIrq.Triggering;
133 	pol = res->Data.ExtendedIrq.Polarity;
134 	break;
135     default:
136 	panic("%s: bad resource type %u", __func__, res->Type);
137     }
138 
139 #if defined(__x86_64__)
140     if (irq < 16 && trig == ACPI_EDGE_SENSITIVE && pol == ACPI_ACTIVE_LOW &&
141 	acpi_override_isa_irq_polarity) {
142 	device_printf(dev, "forcing active-hi polarity for IRQ %u\n", irq);
143 	pol = ACPI_ACTIVE_HIGH;
144     }
145 #endif
146 
147     if (trig == ACPI_EDGE_SENSITIVE)
148     	trigger = INTR_TRIGGER_EDGE;
149     else
150     	trigger = INTR_TRIGGER_LEVEL;
151 
152     if (pol == ACPI_ACTIVE_HIGH)
153 	polarity = INTR_POLARITY_HIGH;
154     else
155     	polarity = INTR_POLARITY_LOW;
156 
157     if (machintr_legacy_intr_find(irq, trigger, polarity) < 0)
158 	kprintf("%s: Skip irq %d config\n", __func__, irq);
159     else
160 	BUS_CONFIG_INTR(dev, dev, irq, trigger, polarity);
161 }
162 
163 struct acpi_resource_context {
164     struct acpi_parse_resource_set *set;
165     device_t	dev;
166     void	*context;
167 };
168 
169 #ifdef ACPI_DEBUG_OUTPUT
170 static const char *
171 acpi_address_range_name(UINT8 ResourceType)
172 {
173     static char buf[16];
174 
175     switch (ResourceType) {
176     case ACPI_MEMORY_RANGE:
177 	    return ("Memory");
178     case ACPI_IO_RANGE:
179 	    return ("IO");
180     case ACPI_BUS_NUMBER_RANGE:
181 	    return ("Bus Number");
182     default:
183 	    ksnprintf(buf, sizeof(buf), "type %u", ResourceType);
184 	    return (buf);
185     }
186 }
187 #endif
188 
189 static ACPI_STATUS
190 acpi_parse_resource(ACPI_RESOURCE *res, void *context)
191 {
192     struct acpi_parse_resource_set *set;
193     struct acpi_resource_context *arc;
194     UINT64 min, max, length, gran;
195 #ifdef ACPI_DEBUG
196     const char *name;
197 #endif
198     device_t dev;
199 
200     arc = context;
201     dev = arc->dev;
202     set = arc->set;
203 
204     switch (res->Type) {
205     case ACPI_RESOURCE_TYPE_END_TAG:
206 	ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES, "EndTag\n"));
207 	break;
208     case ACPI_RESOURCE_TYPE_FIXED_IO:
209 	if (res->Data.FixedIo.AddressLength <= 0)
210 	    break;
211 	ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES, "FixedIo 0x%x/%d\n",
212 	    res->Data.FixedIo.Address, res->Data.FixedIo.AddressLength));
213 	set->set_ioport(dev, arc->context, res->Data.FixedIo.Address,
214 	    res->Data.FixedIo.AddressLength);
215 	break;
216     case ACPI_RESOURCE_TYPE_IO:
217 	if (res->Data.Io.AddressLength <= 0)
218 	    break;
219 	if (res->Data.Io.Minimum == res->Data.Io.Maximum) {
220 	    ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES, "Io 0x%x/%d\n",
221 		res->Data.Io.Minimum, res->Data.Io.AddressLength));
222 	    set->set_ioport(dev, arc->context, res->Data.Io.Minimum,
223 		res->Data.Io.AddressLength);
224 	} else {
225 	    ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES, "Io 0x%x-0x%x/%d\n",
226 		res->Data.Io.Minimum, res->Data.Io.Maximum,
227 		res->Data.Io.AddressLength));
228 	    set->set_iorange(dev, arc->context, res->Data.Io.Minimum,
229 		res->Data.Io.Maximum, res->Data.Io.AddressLength,
230 		res->Data.Io.Alignment);
231 	}
232 	break;
233     case ACPI_RESOURCE_TYPE_FIXED_MEMORY32:
234 	if (res->Data.FixedMemory32.AddressLength <= 0)
235 	    break;
236 	ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES, "FixedMemory32 0x%x/%d\n",
237 	    res->Data.FixedMemory32.Address,
238 	    res->Data.FixedMemory32.AddressLength));
239 	set->set_memory(dev, arc->context, res->Data.FixedMemory32.Address,
240 	    res->Data.FixedMemory32.AddressLength);
241 	break;
242     case ACPI_RESOURCE_TYPE_MEMORY32:
243 	if (res->Data.Memory32.AddressLength <= 0)
244 	    break;
245 	if (res->Data.Memory32.Minimum == res->Data.Memory32.Maximum) {
246 	    ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES, "Memory32 0x%x/%d\n",
247 		res->Data.Memory32.Minimum, res->Data.Memory32.AddressLength));
248 	    set->set_memory(dev, arc->context, res->Data.Memory32.Minimum,
249 		res->Data.Memory32.AddressLength);
250 	} else {
251 	    ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES, "Memory32 0x%x-0x%x/%d\n",
252 		res->Data.Memory32.Minimum, res->Data.Memory32.Maximum,
253 		res->Data.Memory32.AddressLength));
254 	    set->set_memoryrange(dev, arc->context, res->Data.Memory32.Minimum,
255 		res->Data.Memory32.Maximum, res->Data.Memory32.AddressLength,
256 		res->Data.Memory32.Alignment);
257 	}
258 	break;
259     case ACPI_RESOURCE_TYPE_MEMORY24:
260 	if (res->Data.Memory24.AddressLength <= 0)
261 	    break;
262 	if (res->Data.Memory24.Minimum == res->Data.Memory24.Maximum) {
263 	    ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES, "Memory24 0x%x/%d\n",
264 		res->Data.Memory24.Minimum, res->Data.Memory24.AddressLength));
265 	    set->set_memory(dev, arc->context, res->Data.Memory24.Minimum,
266 		res->Data.Memory24.AddressLength);
267 	} else {
268 	    ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES, "Memory24 0x%x-0x%x/%d\n",
269 		res->Data.Memory24.Minimum, res->Data.Memory24.Maximum,
270 		res->Data.Memory24.AddressLength));
271 	    set->set_memoryrange(dev, arc->context, res->Data.Memory24.Minimum,
272 		res->Data.Memory24.Maximum, res->Data.Memory24.AddressLength,
273 		res->Data.Memory24.Alignment);
274 	}
275 	break;
276     case ACPI_RESOURCE_TYPE_IRQ:
277 	/*
278 	 * from 1.0b 6.4.2
279 	 * "This structure is repeated for each separate interrupt
280 	 * required"
281 	 */
282 	set->set_irq(dev, arc->context, res->Data.Irq.Interrupts,
283 	    res->Data.Irq.InterruptCount, res->Data.Irq.Triggering,
284 	    res->Data.Irq.Polarity);
285 	break;
286     case ACPI_RESOURCE_TYPE_DMA:
287 	/*
288 	 * from 1.0b 6.4.3
289 	 * "This structure is repeated for each separate DMA channel
290 	 * required"
291 	 */
292 	set->set_drq(dev, arc->context, res->Data.Dma.Channels,
293 	    res->Data.Dma.ChannelCount);
294 	break;
295     case ACPI_RESOURCE_TYPE_START_DEPENDENT:
296 	ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES, "start dependent functions\n"));
297 	set->set_start_dependent(dev, arc->context,
298 	    res->Data.StartDpf.CompatibilityPriority);
299 	break;
300     case ACPI_RESOURCE_TYPE_END_DEPENDENT:
301 	ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES, "end dependent functions\n"));
302 	set->set_end_dependent(dev, arc->context);
303 	break;
304     case ACPI_RESOURCE_TYPE_ADDRESS16:
305     case ACPI_RESOURCE_TYPE_ADDRESS32:
306     case ACPI_RESOURCE_TYPE_ADDRESS64:
307     case ACPI_RESOURCE_TYPE_EXTENDED_ADDRESS64:
308 	switch (res->Type) {
309 	case ACPI_RESOURCE_TYPE_ADDRESS16:
310 	    gran = res->Data.Address16.Address.Granularity;
311 	    min = res->Data.Address16.Address.Minimum;
312 	    max = res->Data.Address16.Address.Maximum;
313 	    length = res->Data.Address16.Address.AddressLength;
314 #ifdef ACPI_DEBUG
315 	    name = "Address16";
316 #endif
317 	    break;
318 	case ACPI_RESOURCE_TYPE_ADDRESS32:
319 	    gran = res->Data.Address32.Address.Granularity;
320 	    min = res->Data.Address32.Address.Minimum;
321 	    max = res->Data.Address32.Address.Maximum;
322 	    length = res->Data.Address32.Address.AddressLength;
323 #ifdef ACPI_DEBUG
324 	    name = "Address32";
325 #endif
326 	    break;
327 	case ACPI_RESOURCE_TYPE_ADDRESS64:
328 	    gran = res->Data.Address64.Address.Granularity;
329 	    min = res->Data.Address64.Address.Minimum;
330 	    max = res->Data.Address64.Address.Maximum;
331 	    length = res->Data.Address64.Address.AddressLength;
332 #ifdef ACPI_DEBUG
333 	    name = "Address64";
334 #endif
335 	    break;
336 	default:
337 	    KASSERT(res->Type == ACPI_RESOURCE_TYPE_EXTENDED_ADDRESS64,
338 		("should never happen"));
339 	    gran = res->Data.ExtAddress64.Address.Granularity;
340 	    min = res->Data.ExtAddress64.Address.Minimum;
341 	    max = res->Data.ExtAddress64.Address.Maximum;
342 	    length = res->Data.ExtAddress64.Address.AddressLength;
343 #ifdef ACPI_DEBUG
344 	    name = "ExtAddress64";
345 #endif
346 	    break;
347 	}
348 	if (length <= 0)
349 	    break;
350 	if (res->Data.Address.ProducerConsumer != ACPI_CONSUMER) {
351 	    ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES,
352 		"ignored %s %s producer\n", name,
353 		acpi_address_range_name(res->Data.Address.ResourceType)));
354 	    break;
355 	}
356 	if (res->Data.Address.ResourceType != ACPI_MEMORY_RANGE &&
357 	    res->Data.Address.ResourceType != ACPI_IO_RANGE) {
358 	    ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES,
359 		"ignored %s for non-memory, non-I/O\n", name));
360 	    break;
361 	}
362 	if (res->Data.Address.MinAddressFixed == ACPI_ADDRESS_FIXED &&
363 	    res->Data.Address.MaxAddressFixed == ACPI_ADDRESS_FIXED) {
364 	    if (res->Data.Address.ResourceType == ACPI_MEMORY_RANGE) {
365 		ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES, "%s/Memory 0x%jx/%ju\n",
366 		    name, (uintmax_t)min, (uintmax_t)length));
367 		set->set_memory(dev, arc->context, min, length);
368 	    } else {
369 		ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES, "%s/IO 0x%jx/%ju\n", name,
370 		    (uintmax_t)min, (uintmax_t)length));
371 		set->set_ioport(dev, arc->context, min, length);
372 	    }
373 	} else {
374 	    if (res->Data.Address32.ResourceType == ACPI_MEMORY_RANGE) {
375 		ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES,
376 		    "%s/Memory 0x%jx-0x%jx/%ju\n", name, (uintmax_t)min,
377 		    (uintmax_t)max, (uintmax_t)length));
378 		set->set_memoryrange(dev, arc->context, min, max, length, gran);
379 	    } else {
380 		ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES, "%s/IO 0x%jx-0x%jx/%ju\n",
381 		    name, (uintmax_t)min, (uintmax_t)max, (uintmax_t)length));
382 		set->set_iorange(dev, arc->context, min, max, length, gran);
383 	    }
384 	}
385 	break;
386     case ACPI_RESOURCE_TYPE_EXTENDED_IRQ:
387 	if (res->Data.ExtendedIrq.ProducerConsumer != ACPI_CONSUMER) {
388 	    ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES, "ignored ExtIRQ producer\n"));
389 	    break;
390 	}
391 	set->set_ext_irq(dev, arc->context, res->Data.ExtendedIrq.Interrupts,
392 	    res->Data.ExtendedIrq.InterruptCount,
393 	    res->Data.ExtendedIrq.Triggering, res->Data.ExtendedIrq.Polarity);
394 	break;
395     case ACPI_RESOURCE_TYPE_VENDOR:
396 	ACPI_DEBUG_PRINT((ACPI_DB_RESOURCES,
397 	    "unimplemented VendorSpecific resource\n"));
398 	break;
399     default:
400 	break;
401     }
402     return (AE_OK);
403 }
404 
405 /*
406  * Fetch a device's resources and associate them with the device.
407  *
408  * Note that it might be nice to also locate ACPI-specific resource items, such
409  * as GPE bits.
410  *
411  * We really need to split the resource-fetching code out from the
412  * resource-parsing code, since we may want to use the parsing
413  * code for _PRS someday.
414  */
415 ACPI_STATUS
416 acpi_parse_resources(device_t dev, ACPI_HANDLE handle,
417 		     struct acpi_parse_resource_set *set, void *arg)
418 {
419     struct acpi_resource_context arc;
420     ACPI_STATUS		status;
421 
422     ACPI_FUNCTION_TRACE((char *)(uintptr_t)__func__);
423 
424     set->set_init(dev, arg, &arc.context);
425     arc.set = set;
426     arc.dev = dev;
427     status = AcpiWalkResources(handle, "_CRS", acpi_parse_resource, &arc);
428     if (ACPI_FAILURE(status) && status != AE_NOT_FOUND) {
429 	kprintf("can't fetch resources for %s - %s\n",
430 	    acpi_name(handle), AcpiFormatException(status));
431 	return_ACPI_STATUS (status);
432     }
433     set->set_done(dev, arc.context);
434     return_ACPI_STATUS (AE_OK);
435 }
436 
437 /*
438  * Resource-set vectors used to attach _CRS-derived resources
439  * to an ACPI device.
440  */
441 static void	acpi_res_set_init(device_t dev, void *arg, void **context);
442 static void	acpi_res_set_done(device_t dev, void *context);
443 static void	acpi_res_set_ioport(device_t dev, void *context,
444 				    uint64_t base, uint64_t length);
445 static void	acpi_res_set_iorange(device_t dev, void *context,
446 				     uint64_t low, uint64_t high,
447 				     uint64_t length, uint64_t align);
448 static void	acpi_res_set_memory(device_t dev, void *context,
449 				    uint64_t base, uint64_t length);
450 static void	acpi_res_set_memoryrange(device_t dev, void *context,
451 					 uint64_t low, uint64_t high,
452 					 uint64_t length, uint64_t align);
453 static void	acpi_res_set_irq(device_t dev, void *context, uint8_t *irq,
454 				 int count, int trig, int pol);
455 static void	acpi_res_set_ext_irq(device_t dev, void *context,
456 				 uint32_t *irq, int count, int trig, int pol);
457 static void	acpi_res_set_drq(device_t dev, void *context, uint8_t *drq,
458 				 int count);
459 static void	acpi_res_set_start_dependent(device_t dev, void *context,
460 					     int preference);
461 static void	acpi_res_set_end_dependent(device_t dev, void *context);
462 
463 struct acpi_parse_resource_set acpi_res_parse_set = {
464     acpi_res_set_init,
465     acpi_res_set_done,
466     acpi_res_set_ioport,
467     acpi_res_set_iorange,
468     acpi_res_set_memory,
469     acpi_res_set_memoryrange,
470     acpi_res_set_irq,
471     acpi_res_set_ext_irq,
472     acpi_res_set_drq,
473     acpi_res_set_start_dependent,
474     acpi_res_set_end_dependent
475 };
476 
477 struct acpi_res_context {
478     int		ar_nio;
479     int		ar_nmem;
480     int		ar_nirq;
481     int		ar_ndrq;
482     void 	*ar_parent;
483 };
484 
485 static void
486 acpi_res_set_init(device_t dev, void *arg, void **context)
487 {
488     struct acpi_res_context	*cp;
489 
490     if ((cp = AcpiOsAllocate(sizeof(*cp))) != NULL) {
491 	bzero(cp, sizeof(*cp));
492 	cp->ar_parent = arg;
493 	*context = cp;
494     }
495 }
496 
497 static void
498 acpi_res_set_done(device_t dev, void *context)
499 {
500     struct acpi_res_context	*cp = (struct acpi_res_context *)context;
501 
502     if (cp == NULL)
503 	return;
504     AcpiOsFree(cp);
505 }
506 
507 static void
508 acpi_res_set_ioport(device_t dev, void *context, uint64_t base,
509 		    uint64_t length)
510 {
511     struct acpi_res_context	*cp = (struct acpi_res_context *)context;
512 
513     if (cp == NULL)
514 	return;
515     bus_set_resource(dev, SYS_RES_IOPORT, cp->ar_nio++, base, length, -1);
516 }
517 
518 static void
519 acpi_res_set_iorange(device_t dev, void *context, uint64_t low,
520 		     uint64_t high, uint64_t length, uint64_t align)
521 {
522     struct acpi_res_context *cp = (struct acpi_res_context *)context;
523     uint64_t base;
524 
525     if (cp == NULL)
526 	return;
527     if (align == 0)	/* broken acpi resources might pass align == 0 */
528 	align = 1;
529 
530     base = roundup(low, align);
531     if (base + length - 1 <= high) {
532 	acpi_res_set_ioport(dev, context, base, length);
533 	return;
534     }
535     device_printf(dev, "I/O range [0x%jx,0x%jx,0x%jx,0x%jx] not supported\n",
536 	(uintmax_t)low, (uintmax_t)high, (uintmax_t)length, (uintmax_t)align);
537 }
538 
539 static void
540 acpi_res_set_memory(device_t dev, void *context, uint64_t base,
541 		    uint64_t length)
542 {
543     struct acpi_res_context	*cp = (struct acpi_res_context *)context;
544 
545     if (cp == NULL)
546 	return;
547 
548     bus_set_resource(dev, SYS_RES_MEMORY, cp->ar_nmem++, base, length, -1);
549 }
550 
551 static void
552 acpi_res_set_memoryrange(device_t dev, void *context, uint64_t low,
553 			 uint64_t high, uint64_t length, uint64_t align)
554 {
555     struct acpi_res_context	*cp = (struct acpi_res_context *)context;
556 
557     if (cp == NULL)
558 	return;
559     device_printf(dev, "memory range [0x%jx,0x%jx,0x%jx,0x%jx] "
560         "not supported\n",
561 	(uintmax_t)low, (uintmax_t)high, (uintmax_t)length, (uintmax_t)align);
562 }
563 
564 static void
565 acpi_res_set_irq(device_t dev, void *context, uint8_t *irq, int count,
566     int trig, int pol)
567 {
568     struct acpi_res_context	*cp = (struct acpi_res_context *)context;
569 
570     if (cp == NULL || irq == NULL)
571 	return;
572 
573     /* This implements no resource relocation. */
574     if (count != 1)
575 	return;
576 
577     bus_set_resource(dev, SYS_RES_IRQ, cp->ar_nirq++, *irq, 1,
578         machintr_legacy_intr_cpuid(*irq));
579 }
580 
581 static void
582 acpi_res_set_ext_irq(device_t dev, void *context, uint32_t *irq, int count,
583     int trig, int pol)
584 {
585     struct acpi_res_context	*cp = (struct acpi_res_context *)context;
586 
587     if (cp == NULL || irq == NULL)
588 	return;
589 
590     /* This implements no resource relocation. */
591     if (count != 1)
592 	return;
593 
594     /* There is no such IRQ at all */
595     if (machintr_legacy_intr_find(*irq,
596 	INTR_TRIGGER_CONFORM, INTR_POLARITY_CONFORM) < 0)
597 	return;
598 
599     bus_set_resource(dev, SYS_RES_IRQ, cp->ar_nirq++, *irq, 1,
600         machintr_legacy_intr_cpuid(*irq));
601 }
602 
603 static void
604 acpi_res_set_drq(device_t dev, void *context, uint8_t *drq, int count)
605 {
606     struct acpi_res_context	*cp = (struct acpi_res_context *)context;
607 
608     if (cp == NULL || drq == NULL)
609 	return;
610 
611     /* This implements no resource relocation. */
612     if (count != 1)
613 	return;
614 
615     bus_set_resource(dev, SYS_RES_DRQ, cp->ar_ndrq++, *drq, 1, -1);
616 }
617 
618 static void
619 acpi_res_set_start_dependent(device_t dev, void *context, int preference)
620 {
621     struct acpi_res_context	*cp = (struct acpi_res_context *)context;
622 
623     if (cp == NULL)
624 	return;
625     device_printf(dev, "dependent functions not supported\n");
626 }
627 
628 static void
629 acpi_res_set_end_dependent(device_t dev, void *context)
630 {
631     struct acpi_res_context	*cp = (struct acpi_res_context *)context;
632 
633     if (cp == NULL)
634 	return;
635     device_printf(dev, "dependent functions not supported\n");
636 }
637 
638 /*
639  * Resource-owning placeholders for IO and memory pseudo-devices.
640  *
641  * This code allocates system resources that will be used by ACPI
642  * child devices.  The acpi parent manages these resources through a
643  * private rman.
644  */
645 
646 static int	acpi_sysres_rid = 100;
647 
648 static int	acpi_sysres_probe(device_t dev);
649 static int	acpi_sysres_attach(device_t dev);
650 
651 static device_method_t acpi_sysres_methods[] = {
652     /* Device interface */
653     DEVMETHOD(device_probe,	acpi_sysres_probe),
654     DEVMETHOD(device_attach,	acpi_sysres_attach),
655 
656     DEVMETHOD_END
657 };
658 
659 static driver_t acpi_sysres_driver = {
660     "acpi_sysresource",
661     acpi_sysres_methods,
662     0,
663     .gpri = KOBJ_GPRI_ACPI+2
664 };
665 
666 static devclass_t acpi_sysres_devclass;
667 DRIVER_MODULE(acpi_sysresource, acpi, acpi_sysres_driver, acpi_sysres_devclass,
668     NULL, NULL);
669 MODULE_DEPEND(acpi_sysresource, acpi, 1, 1, 1);
670 
671 static int
672 acpi_sysres_probe(device_t dev)
673 {
674     static char *sysres_ids[] = { "PNP0C01", "PNP0C02", NULL };
675 
676     if (acpi_disabled("sysresource") ||
677 	ACPI_ID_PROBE(device_get_parent(dev), dev, sysres_ids) == NULL)
678 	return (ENXIO);
679 
680     device_set_desc(dev, "System Resource");
681     if (bootverbose == 0)
682 	    device_quiet(dev);
683     return (BUS_PROBE_DEFAULT);
684 }
685 
686 static int
687 acpi_sysres_attach(device_t dev)
688 {
689     device_t bus;
690     struct resource_list_entry *bus_rle, *dev_rle;
691     struct resource_list *bus_rl, *dev_rl;
692     int done, type;
693     u_long start, end, count;
694 
695     /*
696      * Loop through all current resources to see if the new one overlaps
697      * any existing ones.  If so, grow the old one up and/or down
698      * accordingly.  Discard any that are wholly contained in the old.  If
699      * the resource is unique, add it to the parent.  It will later go into
700      * the rman pool.
701      */
702     bus = device_get_parent(dev);
703     dev_rl = BUS_GET_RESOURCE_LIST(bus, dev);
704     bus_rl = BUS_GET_RESOURCE_LIST(device_get_parent(bus), bus);
705     if (bus_rl)
706 	kprintf("busrl is not null!\n");
707     SLIST_FOREACH(dev_rle, dev_rl, link) {
708 	if (dev_rle->type != SYS_RES_IOPORT && dev_rle->type != SYS_RES_MEMORY)
709 	    continue;
710 
711 	start = dev_rle->start;
712 	end = dev_rle->end;
713 	count = dev_rle->count;
714 	type = dev_rle->type;
715 	done = FALSE;
716 	if (bus_rl) {
717 	    SLIST_FOREACH(bus_rle, bus_rl, link) {
718 		if (bus_rle->type != type)
719 		    continue;
720 
721 		/* New resource wholly contained in old, discard. */
722 		if (start >= bus_rle->start && end <= bus_rle->end)
723 		    break;
724 
725 		/* New tail overlaps old head, grow existing resource downward. */
726 		if (start < bus_rle->start && end >= bus_rle->start) {
727 		    bus_rle->count += bus_rle->start - start;
728 		    bus_rle->start = start;
729 		    done = TRUE;
730 		}
731 
732 		/* New head overlaps old tail, grow existing resource upward. */
733 		if (start <= bus_rle->end && end > bus_rle->end) {
734 		    bus_rle->count += end - bus_rle->end;
735 		    bus_rle->end = end;
736 		    done = TRUE;
737 		}
738 
739 		/* If we adjusted the old resource, we're finished. */
740 		if (done)
741 		    break;
742 	    }
743 	} else {
744 	    bus_rle = NULL;
745 	}
746 	/* If we didn't merge with anything, add this resource. */
747 	if (bus_rle == NULL)
748 	    bus_set_resource(bus, type, acpi_sysres_rid++, start, count, -1);
749     }
750 
751     /* After merging/moving resources to the parent, free the list. */
752     resource_list_free(dev_rl);
753 
754     return (0);
755 }
756