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