|  | /* | 
|  | * File:	pci-acpi.c | 
|  | * Purpose:	Provide PCI support in ACPI | 
|  | * | 
|  | * Copyright (C) 2005 David Shaohua Li <shaohua.li@intel.com> | 
|  | * Copyright (C) 2004 Tom Long Nguyen <tom.l.nguyen@intel.com> | 
|  | * Copyright (C) 2004 Intel Corp. | 
|  | */ | 
|  |  | 
|  | #include <linux/delay.h> | 
|  | #include <linux/init.h> | 
|  | #include <linux/pci.h> | 
|  | #include <linux/module.h> | 
|  | #include <acpi/acpi.h> | 
|  | #include <acpi/acnamesp.h> | 
|  | #include <acpi/acresrc.h> | 
|  | #include <acpi/acpi_bus.h> | 
|  |  | 
|  | #include <linux/pci-acpi.h> | 
|  | #include "pci.h" | 
|  |  | 
|  | static u32 ctrlset_buf[3] = {0, 0, 0}; | 
|  | static u32 global_ctrlsets = 0; | 
|  | static u8 OSC_UUID[16] = {0x5B, 0x4D, 0xDB, 0x33, 0xF7, 0x1F, 0x1C, 0x40, 0x96, 0x57, 0x74, 0x41, 0xC0, 0x3D, 0xD7, 0x66}; | 
|  |  | 
|  | static acpi_status | 
|  | acpi_query_osc ( | 
|  | acpi_handle	handle, | 
|  | u32		level, | 
|  | void		*context, | 
|  | void		**retval ) | 
|  | { | 
|  | acpi_status		status; | 
|  | struct acpi_object_list	input; | 
|  | union acpi_object 	in_params[4]; | 
|  | struct acpi_buffer	output = {ACPI_ALLOCATE_BUFFER, NULL}; | 
|  | union acpi_object 	*out_obj; | 
|  | u32			osc_dw0; | 
|  |  | 
|  |  | 
|  | /* Setting up input parameters */ | 
|  | input.count = 4; | 
|  | input.pointer = in_params; | 
|  | in_params[0].type 		= ACPI_TYPE_BUFFER; | 
|  | in_params[0].buffer.length 	= 16; | 
|  | in_params[0].buffer.pointer	= OSC_UUID; | 
|  | in_params[1].type 		= ACPI_TYPE_INTEGER; | 
|  | in_params[1].integer.value 	= 1; | 
|  | in_params[2].type 		= ACPI_TYPE_INTEGER; | 
|  | in_params[2].integer.value	= 3; | 
|  | in_params[3].type		= ACPI_TYPE_BUFFER; | 
|  | in_params[3].buffer.length 	= 12; | 
|  | in_params[3].buffer.pointer 	= (u8 *)context; | 
|  |  | 
|  | status = acpi_evaluate_object(handle, "_OSC", &input, &output); | 
|  | if (ACPI_FAILURE (status)) { | 
|  | printk(KERN_DEBUG | 
|  | "Evaluate _OSC Set fails. Status = 0x%04x\n", status); | 
|  | return status; | 
|  | } | 
|  | out_obj = output.pointer; | 
|  |  | 
|  | if (out_obj->type != ACPI_TYPE_BUFFER) { | 
|  | printk(KERN_DEBUG | 
|  | "Evaluate _OSC returns wrong type\n"); | 
|  | status = AE_TYPE; | 
|  | goto query_osc_out; | 
|  | } | 
|  | osc_dw0 = *((u32 *) out_obj->buffer.pointer); | 
|  | if (osc_dw0) { | 
|  | if (osc_dw0 & OSC_REQUEST_ERROR) | 
|  | printk(KERN_DEBUG "_OSC request fails\n"); | 
|  | if (osc_dw0 & OSC_INVALID_UUID_ERROR) | 
|  | printk(KERN_DEBUG "_OSC invalid UUID\n"); | 
|  | if (osc_dw0 & OSC_INVALID_REVISION_ERROR) | 
|  | printk(KERN_DEBUG "_OSC invalid revision\n"); | 
|  | if (osc_dw0 & OSC_CAPABILITIES_MASK_ERROR) { | 
|  | /* Update Global Control Set */ | 
|  | global_ctrlsets = *((u32 *)(out_obj->buffer.pointer+8)); | 
|  | status = AE_OK; | 
|  | goto query_osc_out; | 
|  | } | 
|  | status = AE_ERROR; | 
|  | goto query_osc_out; | 
|  | } | 
|  |  | 
|  | /* Update Global Control Set */ | 
|  | global_ctrlsets = *((u32 *)(out_obj->buffer.pointer + 8)); | 
|  | status = AE_OK; | 
|  |  | 
|  | query_osc_out: | 
|  | kfree(output.pointer); | 
|  | return status; | 
|  | } | 
|  |  | 
|  |  | 
|  | static acpi_status | 
|  | acpi_run_osc ( | 
|  | acpi_handle	handle, | 
|  | void		*context) | 
|  | { | 
|  | acpi_status		status; | 
|  | struct acpi_object_list	input; | 
|  | union acpi_object 	in_params[4]; | 
|  | struct acpi_buffer	output = {ACPI_ALLOCATE_BUFFER, NULL}; | 
|  | union acpi_object 	*out_obj; | 
|  | u32			osc_dw0; | 
|  |  | 
|  | /* Setting up input parameters */ | 
|  | input.count = 4; | 
|  | input.pointer = in_params; | 
|  | in_params[0].type 		= ACPI_TYPE_BUFFER; | 
|  | in_params[0].buffer.length 	= 16; | 
|  | in_params[0].buffer.pointer	= OSC_UUID; | 
|  | in_params[1].type 		= ACPI_TYPE_INTEGER; | 
|  | in_params[1].integer.value 	= 1; | 
|  | in_params[2].type 		= ACPI_TYPE_INTEGER; | 
|  | in_params[2].integer.value	= 3; | 
|  | in_params[3].type		= ACPI_TYPE_BUFFER; | 
|  | in_params[3].buffer.length 	= 12; | 
|  | in_params[3].buffer.pointer 	= (u8 *)context; | 
|  |  | 
|  | status = acpi_evaluate_object(handle, "_OSC", &input, &output); | 
|  | if (ACPI_FAILURE (status)) { | 
|  | printk(KERN_DEBUG | 
|  | "Evaluate _OSC Set fails. Status = 0x%04x\n", status); | 
|  | return status; | 
|  | } | 
|  | out_obj = output.pointer; | 
|  | if (out_obj->type != ACPI_TYPE_BUFFER) { | 
|  | printk(KERN_DEBUG | 
|  | "Evaluate _OSC returns wrong type\n"); | 
|  | status = AE_TYPE; | 
|  | goto run_osc_out; | 
|  | } | 
|  | osc_dw0 = *((u32 *) out_obj->buffer.pointer); | 
|  | if (osc_dw0) { | 
|  | if (osc_dw0 & OSC_REQUEST_ERROR) | 
|  | printk(KERN_DEBUG "_OSC request fails\n"); | 
|  | if (osc_dw0 & OSC_INVALID_UUID_ERROR) | 
|  | printk(KERN_DEBUG "_OSC invalid UUID\n"); | 
|  | if (osc_dw0 & OSC_INVALID_REVISION_ERROR) | 
|  | printk(KERN_DEBUG "_OSC invalid revision\n"); | 
|  | if (osc_dw0 & OSC_CAPABILITIES_MASK_ERROR) { | 
|  | printk(KERN_DEBUG "_OSC FW not grant req. control\n"); | 
|  | status = AE_SUPPORT; | 
|  | goto run_osc_out; | 
|  | } | 
|  | status = AE_ERROR; | 
|  | goto run_osc_out; | 
|  | } | 
|  | status = AE_OK; | 
|  |  | 
|  | run_osc_out: | 
|  | kfree(output.pointer); | 
|  | return status; | 
|  | } | 
|  |  | 
|  | /** | 
|  | * pci_osc_support_set - register OS support to Firmware | 
|  | * @flags: OS support bits | 
|  | * | 
|  | * Update OS support fields and doing a _OSC Query to obtain an update | 
|  | * from Firmware on supported control bits. | 
|  | **/ | 
|  | acpi_status pci_osc_support_set(u32 flags) | 
|  | { | 
|  | u32 temp; | 
|  |  | 
|  | if (!(flags & OSC_SUPPORT_MASKS)) { | 
|  | return AE_TYPE; | 
|  | } | 
|  | ctrlset_buf[OSC_SUPPORT_TYPE] |= (flags & OSC_SUPPORT_MASKS); | 
|  |  | 
|  | /* do _OSC query for all possible controls */ | 
|  | temp = ctrlset_buf[OSC_CONTROL_TYPE]; | 
|  | ctrlset_buf[OSC_QUERY_TYPE] = OSC_QUERY_ENABLE; | 
|  | ctrlset_buf[OSC_CONTROL_TYPE] = OSC_CONTROL_MASKS; | 
|  | acpi_get_devices ( PCI_ROOT_HID_STRING, | 
|  | acpi_query_osc, | 
|  | ctrlset_buf, | 
|  | NULL ); | 
|  | ctrlset_buf[OSC_QUERY_TYPE] = !OSC_QUERY_ENABLE; | 
|  | ctrlset_buf[OSC_CONTROL_TYPE] = temp; | 
|  | return AE_OK; | 
|  | } | 
|  | EXPORT_SYMBOL(pci_osc_support_set); | 
|  |  | 
|  | /** | 
|  | * pci_osc_control_set - commit requested control to Firmware | 
|  | * @handle: acpi_handle for the target ACPI object | 
|  | * @flags: driver's requested control bits | 
|  | * | 
|  | * Attempt to take control from Firmware on requested control bits. | 
|  | **/ | 
|  | acpi_status pci_osc_control_set(acpi_handle handle, u32 flags) | 
|  | { | 
|  | acpi_status	status; | 
|  | u32		ctrlset; | 
|  |  | 
|  | ctrlset = (flags & OSC_CONTROL_MASKS); | 
|  | if (!ctrlset) { | 
|  | return AE_TYPE; | 
|  | } | 
|  | if (ctrlset_buf[OSC_SUPPORT_TYPE] && | 
|  | ((global_ctrlsets & ctrlset) != ctrlset)) { | 
|  | return AE_SUPPORT; | 
|  | } | 
|  | ctrlset_buf[OSC_CONTROL_TYPE] |= ctrlset; | 
|  | status = acpi_run_osc(handle, ctrlset_buf); | 
|  | if (ACPI_FAILURE (status)) { | 
|  | ctrlset_buf[OSC_CONTROL_TYPE] &= ~ctrlset; | 
|  | } | 
|  |  | 
|  | return status; | 
|  | } | 
|  | EXPORT_SYMBOL(pci_osc_control_set); | 
|  |  | 
|  | /* | 
|  | * _SxD returns the D-state with the highest power | 
|  | * (lowest D-state number) supported in the S-state "x". | 
|  | * | 
|  | * If the devices does not have a _PRW | 
|  | * (Power Resources for Wake) supporting system wakeup from "x" | 
|  | * then the OS is free to choose a lower power (higher number | 
|  | * D-state) than the return value from _SxD. | 
|  | * | 
|  | * But if _PRW is enabled at S-state "x", the OS | 
|  | * must not choose a power lower than _SxD -- | 
|  | * unless the device has an _SxW method specifying | 
|  | * the lowest power (highest D-state number) the device | 
|  | * may enter while still able to wake the system. | 
|  | * | 
|  | * ie. depending on global OS policy: | 
|  | * | 
|  | * if (_PRW at S-state x) | 
|  | *	choose from highest power _SxD to lowest power _SxW | 
|  | * else // no _PRW at S-state x | 
|  | * 	choose highest power _SxD or any lower power | 
|  | * | 
|  | * currently we simply return _SxD, if present. | 
|  | */ | 
|  |  | 
|  | static int acpi_pci_choose_state(struct pci_dev *pdev, pm_message_t state) | 
|  | { | 
|  | /* TBD */ | 
|  |  | 
|  | return -ENODEV; | 
|  | } | 
|  |  | 
|  | static int acpi_pci_set_power_state(struct pci_dev *dev, pci_power_t state) | 
|  | { | 
|  | acpi_handle handle = DEVICE_ACPI_HANDLE(&dev->dev); | 
|  | static int state_conv[] = { | 
|  | [0] = 0, | 
|  | [1] = 1, | 
|  | [2] = 2, | 
|  | [3] = 3, | 
|  | [4] = 3 | 
|  | }; | 
|  | int acpi_state = state_conv[(int __force) state]; | 
|  |  | 
|  | if (!handle) | 
|  | return -ENODEV; | 
|  | return acpi_bus_set_power(handle, acpi_state); | 
|  | } | 
|  |  | 
|  |  | 
|  | /* ACPI bus type */ | 
|  | static int acpi_pci_find_device(struct device *dev, acpi_handle *handle) | 
|  | { | 
|  | struct pci_dev * pci_dev; | 
|  | acpi_integer	addr; | 
|  |  | 
|  | pci_dev = to_pci_dev(dev); | 
|  | /* Please ref to ACPI spec for the syntax of _ADR */ | 
|  | addr = (PCI_SLOT(pci_dev->devfn) << 16) | PCI_FUNC(pci_dev->devfn); | 
|  | *handle = acpi_get_child(DEVICE_ACPI_HANDLE(dev->parent), addr); | 
|  | if (!*handle) | 
|  | return -ENODEV; | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static int acpi_pci_find_root_bridge(struct device *dev, acpi_handle *handle) | 
|  | { | 
|  | int num; | 
|  | unsigned int seg, bus; | 
|  |  | 
|  | /* | 
|  | * The string should be the same as root bridge's name | 
|  | * Please look at 'pci_scan_bus_parented' | 
|  | */ | 
|  | num = sscanf(dev->bus_id, "pci%04x:%02x", &seg, &bus); | 
|  | if (num != 2) | 
|  | return -ENODEV; | 
|  | *handle = acpi_get_pci_rootbridge_handle(seg, bus); | 
|  | if (!*handle) | 
|  | return -ENODEV; | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | static struct acpi_bus_type acpi_pci_bus = { | 
|  | .bus = &pci_bus_type, | 
|  | .find_device = acpi_pci_find_device, | 
|  | .find_bridge = acpi_pci_find_root_bridge, | 
|  | }; | 
|  |  | 
|  | static int __init acpi_pci_init(void) | 
|  | { | 
|  | int ret; | 
|  |  | 
|  | ret = register_acpi_bus_type(&acpi_pci_bus); | 
|  | if (ret) | 
|  | return 0; | 
|  | platform_pci_choose_state = acpi_pci_choose_state; | 
|  | platform_pci_set_power_state = acpi_pci_set_power_state; | 
|  | return 0; | 
|  | } | 
|  | arch_initcall(acpi_pci_init); |