1#include <linux/pci.h>
2#include <linux/acpi.h>
3#include <linux/slab.h>
4#include <linux/mxm-wmi.h>
5#include <linux/vga_switcheroo.h>
6#include <drm/drm_edid.h>
7#include <acpi/video.h>
8
9#include "nouveau_drm.h"
10#include "nouveau_acpi.h"
11
12#define NOUVEAU_DSM_LED 0x02
13#define NOUVEAU_DSM_LED_STATE 0x00
14#define NOUVEAU_DSM_LED_OFF 0x10
15#define NOUVEAU_DSM_LED_STAMINA 0x11
16#define NOUVEAU_DSM_LED_SPEED 0x12
17
18#define NOUVEAU_DSM_POWER 0x03
19#define NOUVEAU_DSM_POWER_STATE 0x00
20#define NOUVEAU_DSM_POWER_SPEED 0x01
21#define NOUVEAU_DSM_POWER_STAMINA 0x02
22
23#define NOUVEAU_DSM_OPTIMUS_CAPS 0x1A
24#define NOUVEAU_DSM_OPTIMUS_FLAGS 0x1B
25
26#define NOUVEAU_DSM_OPTIMUS_POWERDOWN_PS3 (3 << 24)
27#define NOUVEAU_DSM_OPTIMUS_NO_POWERDOWN_PS3 (2 << 24)
28#define NOUVEAU_DSM_OPTIMUS_FLAGS_CHANGED (1)
29
30#define NOUVEAU_DSM_OPTIMUS_SET_POWERDOWN (NOUVEAU_DSM_OPTIMUS_POWERDOWN_PS3 | NOUVEAU_DSM_OPTIMUS_FLAGS_CHANGED)
31
32/* result of the optimus caps function */
33#define OPTIMUS_ENABLED (1 << 0)
34#define OPTIMUS_STATUS_MASK (3 << 3)
35#define OPTIMUS_STATUS_OFF  (0 << 3)
36#define OPTIMUS_STATUS_ON_ENABLED  (1 << 3)
37#define OPTIMUS_STATUS_PWR_STABLE  (3 << 3)
38#define OPTIMUS_DISPLAY_HOTPLUG (1 << 6)
39#define OPTIMUS_CAPS_MASK (7 << 24)
40#define OPTIMUS_DYNAMIC_PWR_CAP (1 << 24)
41
42#define OPTIMUS_AUDIO_CAPS_MASK (3 << 27)
43#define OPTIMUS_HDA_CODEC_MASK (2 << 27) /* hda bios control */
44
45static struct nouveau_dsm_priv {
46	bool dsm_detected;
47	bool optimus_detected;
48	acpi_handle dhandle;
49	acpi_handle rom_handle;
50} nouveau_dsm_priv;
51
52bool nouveau_is_optimus(void) {
53	return nouveau_dsm_priv.optimus_detected;
54}
55
56bool nouveau_is_v1_dsm(void) {
57	return nouveau_dsm_priv.dsm_detected;
58}
59
60#define NOUVEAU_DSM_HAS_MUX 0x1
61#define NOUVEAU_DSM_HAS_OPT 0x2
62
63#ifdef CONFIG_VGA_SWITCHEROO
64static const char nouveau_dsm_muid[] = {
65	0xA0, 0xA0, 0x95, 0x9D, 0x60, 0x00, 0x48, 0x4D,
66	0xB3, 0x4D, 0x7E, 0x5F, 0xEA, 0x12, 0x9F, 0xD4,
67};
68
69static const char nouveau_op_dsm_muid[] = {
70	0xF8, 0xD8, 0x86, 0xA4, 0xDA, 0x0B, 0x1B, 0x47,
71	0xA7, 0x2B, 0x60, 0x42, 0xA6, 0xB5, 0xBE, 0xE0,
72};
73
74static int nouveau_optimus_dsm(acpi_handle handle, int func, int arg, uint32_t *result)
75{
76	int i;
77	union acpi_object *obj;
78	char args_buff[4];
79	union acpi_object argv4 = {
80		.buffer.type = ACPI_TYPE_BUFFER,
81		.buffer.length = 4,
82		.buffer.pointer = args_buff
83	};
84
85	/* ACPI is little endian, AABBCCDD becomes {DD,CC,BB,AA} */
86	for (i = 0; i < 4; i++)
87		args_buff[i] = (arg >> i * 8) & 0xFF;
88
89	*result = 0;
90	obj = acpi_evaluate_dsm_typed(handle, nouveau_op_dsm_muid, 0x00000100,
91				      func, &argv4, ACPI_TYPE_BUFFER);
92	if (!obj) {
93		acpi_handle_info(handle, "failed to evaluate _DSM\n");
94		return AE_ERROR;
95	} else {
96		if (obj->buffer.length == 4) {
97			*result |= obj->buffer.pointer[0];
98			*result |= (obj->buffer.pointer[1] << 8);
99			*result |= (obj->buffer.pointer[2] << 16);
100			*result |= (obj->buffer.pointer[3] << 24);
101		}
102		ACPI_FREE(obj);
103	}
104
105	return 0;
106}
107
108/*
109 * On some platforms, _DSM(nouveau_op_dsm_muid, func0) has special
110 * requirements on the fourth parameter, so a private implementation
111 * instead of using acpi_check_dsm().
112 */
113static int nouveau_check_optimus_dsm(acpi_handle handle)
114{
115	int result;
116
117	/*
118	 * Function 0 returns a Buffer containing available functions.
119	 * The args parameter is ignored for function 0, so just put 0 in it
120	 */
121	if (nouveau_optimus_dsm(handle, 0, 0, &result))
122		return 0;
123
124	/*
125	 * ACPI Spec v4 9.14.1: if bit 0 is zero, no function is supported.
126	 * If the n-th bit is enabled, function n is supported
127	 */
128	return result & 1 && result & (1 << NOUVEAU_DSM_OPTIMUS_CAPS);
129}
130
131static int nouveau_dsm(acpi_handle handle, int func, int arg)
132{
133	int ret = 0;
134	union acpi_object *obj;
135	union acpi_object argv4 = {
136		.integer.type = ACPI_TYPE_INTEGER,
137		.integer.value = arg,
138	};
139
140	obj = acpi_evaluate_dsm_typed(handle, nouveau_dsm_muid, 0x00000102,
141				      func, &argv4, ACPI_TYPE_INTEGER);
142	if (!obj) {
143		acpi_handle_info(handle, "failed to evaluate _DSM\n");
144		return AE_ERROR;
145	} else {
146		if (obj->integer.value == 0x80000002)
147			ret = -ENODEV;
148		ACPI_FREE(obj);
149	}
150
151	return ret;
152}
153
154static int nouveau_dsm_switch_mux(acpi_handle handle, int mux_id)
155{
156	mxm_wmi_call_mxmx(mux_id == NOUVEAU_DSM_LED_STAMINA ? MXM_MXDS_ADAPTER_IGD : MXM_MXDS_ADAPTER_0);
157	mxm_wmi_call_mxds(mux_id == NOUVEAU_DSM_LED_STAMINA ? MXM_MXDS_ADAPTER_IGD : MXM_MXDS_ADAPTER_0);
158	return nouveau_dsm(handle, NOUVEAU_DSM_LED, mux_id);
159}
160
161static int nouveau_dsm_set_discrete_state(acpi_handle handle, enum vga_switcheroo_state state)
162{
163	int arg;
164	if (state == VGA_SWITCHEROO_ON)
165		arg = NOUVEAU_DSM_POWER_SPEED;
166	else
167		arg = NOUVEAU_DSM_POWER_STAMINA;
168	nouveau_dsm(handle, NOUVEAU_DSM_POWER, arg);
169	return 0;
170}
171
172static int nouveau_dsm_switchto(enum vga_switcheroo_client_id id)
173{
174	if (!nouveau_dsm_priv.dsm_detected)
175		return 0;
176	if (id == VGA_SWITCHEROO_IGD)
177		return nouveau_dsm_switch_mux(nouveau_dsm_priv.dhandle, NOUVEAU_DSM_LED_STAMINA);
178	else
179		return nouveau_dsm_switch_mux(nouveau_dsm_priv.dhandle, NOUVEAU_DSM_LED_SPEED);
180}
181
182static int nouveau_dsm_power_state(enum vga_switcheroo_client_id id,
183				   enum vga_switcheroo_state state)
184{
185	if (id == VGA_SWITCHEROO_IGD)
186		return 0;
187
188	/* Optimus laptops have the card already disabled in
189	 * nouveau_switcheroo_set_state */
190	if (!nouveau_dsm_priv.dsm_detected)
191		return 0;
192
193	return nouveau_dsm_set_discrete_state(nouveau_dsm_priv.dhandle, state);
194}
195
196static int nouveau_dsm_get_client_id(struct pci_dev *pdev)
197{
198	/* easy option one - intel vendor ID means Integrated */
199	if (pdev->vendor == PCI_VENDOR_ID_INTEL)
200		return VGA_SWITCHEROO_IGD;
201
202	/* is this device on Bus 0? - this may need improving */
203	if (pdev->bus->number == 0)
204		return VGA_SWITCHEROO_IGD;
205
206	return VGA_SWITCHEROO_DIS;
207}
208
209static const struct vga_switcheroo_handler nouveau_dsm_handler = {
210	.switchto = nouveau_dsm_switchto,
211	.power_state = nouveau_dsm_power_state,
212	.get_client_id = nouveau_dsm_get_client_id,
213};
214
215static int nouveau_dsm_pci_probe(struct pci_dev *pdev)
216{
217	acpi_handle dhandle;
218	int retval = 0;
219
220	dhandle = ACPI_HANDLE(&pdev->dev);
221	if (!dhandle)
222		return false;
223
224	if (!acpi_has_method(dhandle, "_DSM"))
225		return false;
226
227	if (acpi_check_dsm(dhandle, nouveau_dsm_muid, 0x00000102,
228			   1 << NOUVEAU_DSM_POWER))
229		retval |= NOUVEAU_DSM_HAS_MUX;
230
231	if (nouveau_check_optimus_dsm(dhandle))
232		retval |= NOUVEAU_DSM_HAS_OPT;
233
234	if (retval & NOUVEAU_DSM_HAS_OPT) {
235		uint32_t result;
236		nouveau_optimus_dsm(dhandle, NOUVEAU_DSM_OPTIMUS_CAPS, 0,
237				    &result);
238		dev_info(&pdev->dev, "optimus capabilities: %s, status %s%s\n",
239			 (result & OPTIMUS_ENABLED) ? "enabled" : "disabled",
240			 (result & OPTIMUS_DYNAMIC_PWR_CAP) ? "dynamic power, " : "",
241			 (result & OPTIMUS_HDA_CODEC_MASK) ? "hda bios codec supported" : "");
242	}
243	if (retval)
244		nouveau_dsm_priv.dhandle = dhandle;
245
246	return retval;
247}
248
249static bool nouveau_dsm_detect(void)
250{
251	char acpi_method_name[255] = { 0 };
252	struct acpi_buffer buffer = {sizeof(acpi_method_name), acpi_method_name};
253	struct pci_dev *pdev = NULL;
254	int has_dsm = 0;
255	int has_optimus = 0;
256	int vga_count = 0;
257	bool guid_valid;
258	int retval;
259	bool ret = false;
260
261	/* lookup the MXM GUID */
262	guid_valid = mxm_wmi_supported();
263
264	if (guid_valid)
265		printk("MXM: GUID detected in BIOS\n");
266
267	/* now do DSM detection */
268	while ((pdev = pci_get_class(PCI_CLASS_DISPLAY_VGA << 8, pdev)) != NULL) {
269		vga_count++;
270
271		retval = nouveau_dsm_pci_probe(pdev);
272		if (retval & NOUVEAU_DSM_HAS_MUX)
273			has_dsm |= 1;
274		if (retval & NOUVEAU_DSM_HAS_OPT)
275			has_optimus = 1;
276	}
277
278	while ((pdev = pci_get_class(PCI_CLASS_DISPLAY_3D << 8, pdev)) != NULL) {
279		vga_count++;
280
281		retval = nouveau_dsm_pci_probe(pdev);
282		if (retval & NOUVEAU_DSM_HAS_MUX)
283			has_dsm |= 1;
284		if (retval & NOUVEAU_DSM_HAS_OPT)
285			has_optimus = 1;
286	}
287
288	/* find the optimus DSM or the old v1 DSM */
289	if (has_optimus == 1) {
290		acpi_get_name(nouveau_dsm_priv.dhandle, ACPI_FULL_PATHNAME,
291			&buffer);
292		printk(KERN_INFO "VGA switcheroo: detected Optimus DSM method %s handle\n",
293			acpi_method_name);
294		nouveau_dsm_priv.optimus_detected = true;
295		ret = true;
296	} else if (vga_count == 2 && has_dsm && guid_valid) {
297		acpi_get_name(nouveau_dsm_priv.dhandle, ACPI_FULL_PATHNAME,
298			&buffer);
299		printk(KERN_INFO "VGA switcheroo: detected DSM switching method %s handle\n",
300			acpi_method_name);
301		nouveau_dsm_priv.dsm_detected = true;
302		ret = true;
303	}
304
305
306	return ret;
307}
308
309void nouveau_register_dsm_handler(void)
310{
311	bool r;
312
313	r = nouveau_dsm_detect();
314	if (!r)
315		return;
316
317	vga_switcheroo_register_handler(&nouveau_dsm_handler);
318}
319
320/* Must be called for Optimus models before the card can be turned off */
321void nouveau_switcheroo_optimus_dsm(void)
322{
323	u32 result = 0;
324	if (!nouveau_dsm_priv.optimus_detected)
325		return;
326
327	nouveau_optimus_dsm(nouveau_dsm_priv.dhandle, NOUVEAU_DSM_OPTIMUS_FLAGS,
328			    0x3, &result);
329
330	nouveau_optimus_dsm(nouveau_dsm_priv.dhandle, NOUVEAU_DSM_OPTIMUS_CAPS,
331		NOUVEAU_DSM_OPTIMUS_SET_POWERDOWN, &result);
332
333}
334
335void nouveau_unregister_dsm_handler(void)
336{
337	if (nouveau_dsm_priv.optimus_detected || nouveau_dsm_priv.dsm_detected)
338		vga_switcheroo_unregister_handler();
339}
340#else
341void nouveau_register_dsm_handler(void) {}
342void nouveau_unregister_dsm_handler(void) {}
343void nouveau_switcheroo_optimus_dsm(void) {}
344#endif
345
346/* retrieve the ROM in 4k blocks */
347static int nouveau_rom_call(acpi_handle rom_handle, uint8_t *bios,
348			    int offset, int len)
349{
350	acpi_status status;
351	union acpi_object rom_arg_elements[2], *obj;
352	struct acpi_object_list rom_arg;
353	struct acpi_buffer buffer = { ACPI_ALLOCATE_BUFFER, NULL};
354
355	rom_arg.count = 2;
356	rom_arg.pointer = &rom_arg_elements[0];
357
358	rom_arg_elements[0].type = ACPI_TYPE_INTEGER;
359	rom_arg_elements[0].integer.value = offset;
360
361	rom_arg_elements[1].type = ACPI_TYPE_INTEGER;
362	rom_arg_elements[1].integer.value = len;
363
364	status = acpi_evaluate_object(rom_handle, NULL, &rom_arg, &buffer);
365	if (ACPI_FAILURE(status)) {
366		printk(KERN_INFO "failed to evaluate ROM got %s\n", acpi_format_exception(status));
367		return -ENODEV;
368	}
369	obj = (union acpi_object *)buffer.pointer;
370	len = min(len, (int)obj->buffer.length);
371	memcpy(bios+offset, obj->buffer.pointer, len);
372	kfree(buffer.pointer);
373	return len;
374}
375
376bool nouveau_acpi_rom_supported(struct device *dev)
377{
378	acpi_status status;
379	acpi_handle dhandle, rom_handle;
380
381	dhandle = ACPI_HANDLE(dev);
382	if (!dhandle)
383		return false;
384
385	status = acpi_get_handle(dhandle, "_ROM", &rom_handle);
386	if (ACPI_FAILURE(status))
387		return false;
388
389	nouveau_dsm_priv.rom_handle = rom_handle;
390	return true;
391}
392
393int nouveau_acpi_get_bios_chunk(uint8_t *bios, int offset, int len)
394{
395	return nouveau_rom_call(nouveau_dsm_priv.rom_handle, bios, offset, len);
396}
397
398void *
399nouveau_acpi_edid(struct drm_device *dev, struct drm_connector *connector)
400{
401	struct acpi_device *acpidev;
402	acpi_handle handle;
403	int type, ret;
404	void *edid;
405
406	switch (connector->connector_type) {
407	case DRM_MODE_CONNECTOR_LVDS:
408	case DRM_MODE_CONNECTOR_eDP:
409		type = ACPI_VIDEO_DISPLAY_LCD;
410		break;
411	default:
412		return NULL;
413	}
414
415	handle = ACPI_HANDLE(&dev->pdev->dev);
416	if (!handle)
417		return NULL;
418
419	ret = acpi_bus_get_device(handle, &acpidev);
420	if (ret)
421		return NULL;
422
423	ret = acpi_video_get_edid(acpidev, type, -1, &edid);
424	if (ret < 0)
425		return NULL;
426
427	return kmemdup(edid, EDID_LENGTH, GFP_KERNEL);
428}
429