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 
45 static struct nouveau_dsm_priv {
46 	bool dsm_detected;
47 	bool optimus_detected;
48 	acpi_handle dhandle;
49 	acpi_handle other_handle;
50 	acpi_handle rom_handle;
51 } nouveau_dsm_priv;
52 
53 bool nouveau_is_optimus(void) {
54 	return nouveau_dsm_priv.optimus_detected;
55 }
56 
57 bool nouveau_is_v1_dsm(void) {
58 	return nouveau_dsm_priv.dsm_detected;
59 }
60 
61 #define NOUVEAU_DSM_HAS_MUX 0x1
62 #define NOUVEAU_DSM_HAS_OPT 0x2
63 
64 #ifdef CONFIG_VGA_SWITCHEROO
65 static const char nouveau_dsm_muid[] = {
66 	0xA0, 0xA0, 0x95, 0x9D, 0x60, 0x00, 0x48, 0x4D,
67 	0xB3, 0x4D, 0x7E, 0x5F, 0xEA, 0x12, 0x9F, 0xD4,
68 };
69 
70 static const char nouveau_op_dsm_muid[] = {
71 	0xF8, 0xD8, 0x86, 0xA4, 0xDA, 0x0B, 0x1B, 0x47,
72 	0xA7, 0x2B, 0x60, 0x42, 0xA6, 0xB5, 0xBE, 0xE0,
73 };
74 
75 static int nouveau_optimus_dsm(acpi_handle handle, int func, int arg, uint32_t *result)
76 {
77 	int i;
78 	union acpi_object *obj;
79 	char args_buff[4];
80 	union acpi_object argv4 = {
81 		.buffer.type = ACPI_TYPE_BUFFER,
82 		.buffer.length = 4,
83 		.buffer.pointer = args_buff
84 	};
85 
86 	/* ACPI is little endian, AABBCCDD becomes {DD,CC,BB,AA} */
87 	for (i = 0; i < 4; i++)
88 		args_buff[i] = (arg >> i * 8) & 0xFF;
89 
90 	*result = 0;
91 	obj = acpi_evaluate_dsm_typed(handle, nouveau_op_dsm_muid, 0x00000100,
92 				      func, &argv4, ACPI_TYPE_BUFFER);
93 	if (!obj) {
94 		acpi_handle_info(handle, "failed to evaluate _DSM\n");
95 		return AE_ERROR;
96 	} else {
97 		if (obj->buffer.length == 4) {
98 			*result |= obj->buffer.pointer[0];
99 			*result |= (obj->buffer.pointer[1] << 8);
100 			*result |= (obj->buffer.pointer[2] << 16);
101 			*result |= (obj->buffer.pointer[3] << 24);
102 		}
103 		ACPI_FREE(obj);
104 	}
105 
106 	return 0;
107 }
108 
109 /*
110  * On some platforms, _DSM(nouveau_op_dsm_muid, func0) has special
111  * requirements on the fourth parameter, so a private implementation
112  * instead of using acpi_check_dsm().
113  */
114 static int nouveau_check_optimus_dsm(acpi_handle handle)
115 {
116 	int result;
117 
118 	/*
119 	 * Function 0 returns a Buffer containing available functions.
120 	 * The args parameter is ignored for function 0, so just put 0 in it
121 	 */
122 	if (nouveau_optimus_dsm(handle, 0, 0, &result))
123 		return 0;
124 
125 	/*
126 	 * ACPI Spec v4 9.14.1: if bit 0 is zero, no function is supported.
127 	 * If the n-th bit is enabled, function n is supported
128 	 */
129 	return result & 1 && result & (1 << NOUVEAU_DSM_OPTIMUS_CAPS);
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 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 static int nouveau_dsm_pci_probe(struct pci_dev *pdev)
217 {
218 	acpi_handle dhandle;
219 	int retval = 0;
220 
221 	dhandle = ACPI_HANDLE(&pdev->dev);
222 	if (!dhandle)
223 		return false;
224 
225 	if (!acpi_has_method(dhandle, "_DSM")) {
226 		nouveau_dsm_priv.other_handle = dhandle;
227 		return false;
228 	}
229 	if (acpi_check_dsm(dhandle, nouveau_dsm_muid, 0x00000102,
230 			   1 << NOUVEAU_DSM_POWER))
231 		retval |= NOUVEAU_DSM_HAS_MUX;
232 
233 	if (nouveau_check_optimus_dsm(dhandle))
234 		retval |= NOUVEAU_DSM_HAS_OPT;
235 
236 	if (retval & NOUVEAU_DSM_HAS_OPT) {
237 		uint32_t result;
238 		nouveau_optimus_dsm(dhandle, NOUVEAU_DSM_OPTIMUS_CAPS, 0,
239 				    &result);
240 		dev_info(&pdev->dev, "optimus capabilities: %s, status %s%s\n",
241 			 (result & OPTIMUS_ENABLED) ? "enabled" : "disabled",
242 			 (result & OPTIMUS_DYNAMIC_PWR_CAP) ? "dynamic power, " : "",
243 			 (result & OPTIMUS_HDA_CODEC_MASK) ? "hda bios codec supported" : "");
244 	}
245 	if (retval)
246 		nouveau_dsm_priv.dhandle = dhandle;
247 
248 	return retval;
249 }
250 
251 static bool nouveau_dsm_detect(void)
252 {
253 	char acpi_method_name[255] = { 0 };
254 	struct acpi_buffer buffer = {sizeof(acpi_method_name), acpi_method_name};
255 	struct pci_dev *pdev = NULL;
256 	int has_dsm = 0;
257 	int has_optimus = 0;
258 	int vga_count = 0;
259 	bool guid_valid;
260 	int retval;
261 	bool ret = false;
262 
263 	/* lookup the MXM GUID */
264 	guid_valid = mxm_wmi_supported();
265 
266 	if (guid_valid)
267 		printk("MXM: GUID detected in BIOS\n");
268 
269 	/* now do DSM detection */
270 	while ((pdev = pci_get_class(PCI_CLASS_DISPLAY_VGA << 8, pdev)) != NULL) {
271 		vga_count++;
272 
273 		retval = nouveau_dsm_pci_probe(pdev);
274 		if (retval & NOUVEAU_DSM_HAS_MUX)
275 			has_dsm |= 1;
276 		if (retval & NOUVEAU_DSM_HAS_OPT)
277 			has_optimus = 1;
278 	}
279 
280 	while ((pdev = pci_get_class(PCI_CLASS_DISPLAY_3D << 8, pdev)) != NULL) {
281 		vga_count++;
282 
283 		retval = nouveau_dsm_pci_probe(pdev);
284 		if (retval & NOUVEAU_DSM_HAS_MUX)
285 			has_dsm |= 1;
286 		if (retval & NOUVEAU_DSM_HAS_OPT)
287 			has_optimus = 1;
288 	}
289 
290 	/* find the optimus DSM or the old v1 DSM */
291 	if (has_optimus == 1) {
292 		acpi_get_name(nouveau_dsm_priv.dhandle, ACPI_FULL_PATHNAME,
293 			&buffer);
294 		printk(KERN_INFO "VGA switcheroo: detected Optimus DSM method %s handle\n",
295 			acpi_method_name);
296 		nouveau_dsm_priv.optimus_detected = true;
297 		ret = true;
298 	} else if (vga_count == 2 && has_dsm && guid_valid) {
299 		acpi_get_name(nouveau_dsm_priv.dhandle, ACPI_FULL_PATHNAME,
300 			&buffer);
301 		printk(KERN_INFO "VGA switcheroo: detected DSM switching method %s handle\n",
302 			acpi_method_name);
303 		nouveau_dsm_priv.dsm_detected = true;
304 		/*
305 		 * On some systems hotplug events are generated for the device
306 		 * being switched off when _DSM is executed.  They cause ACPI
307 		 * hotplug to trigger and attempt to remove the device from
308 		 * the system, which causes it to break down.  Prevent that from
309 		 * happening by setting the no_hotplug flag for the involved
310 		 * ACPI device objects.
311 		 */
312 		acpi_bus_no_hotplug(nouveau_dsm_priv.dhandle);
313 		acpi_bus_no_hotplug(nouveau_dsm_priv.other_handle);
314 		ret = true;
315 	}
316 
317 
318 	return ret;
319 }
320 
321 void nouveau_register_dsm_handler(void)
322 {
323 	bool r;
324 
325 	r = nouveau_dsm_detect();
326 	if (!r)
327 		return;
328 
329 	vga_switcheroo_register_handler(&nouveau_dsm_handler);
330 }
331 
332 /* Must be called for Optimus models before the card can be turned off */
333 void nouveau_switcheroo_optimus_dsm(void)
334 {
335 	u32 result = 0;
336 	if (!nouveau_dsm_priv.optimus_detected)
337 		return;
338 
339 	nouveau_optimus_dsm(nouveau_dsm_priv.dhandle, NOUVEAU_DSM_OPTIMUS_FLAGS,
340 			    0x3, &result);
341 
342 	nouveau_optimus_dsm(nouveau_dsm_priv.dhandle, NOUVEAU_DSM_OPTIMUS_CAPS,
343 		NOUVEAU_DSM_OPTIMUS_SET_POWERDOWN, &result);
344 
345 }
346 
347 void nouveau_unregister_dsm_handler(void)
348 {
349 	if (nouveau_dsm_priv.optimus_detected || nouveau_dsm_priv.dsm_detected)
350 		vga_switcheroo_unregister_handler();
351 }
352 #else
353 void nouveau_register_dsm_handler(void) {}
354 void nouveau_unregister_dsm_handler(void) {}
355 void nouveau_switcheroo_optimus_dsm(void) {}
356 #endif
357 
358 /* retrieve the ROM in 4k blocks */
359 static int nouveau_rom_call(acpi_handle rom_handle, uint8_t *bios,
360 			    int offset, int len)
361 {
362 	acpi_status status;
363 	union acpi_object rom_arg_elements[2], *obj;
364 	struct acpi_object_list rom_arg;
365 	struct acpi_buffer buffer = { ACPI_ALLOCATE_BUFFER, NULL};
366 
367 	rom_arg.count = 2;
368 	rom_arg.pointer = &rom_arg_elements[0];
369 
370 	rom_arg_elements[0].type = ACPI_TYPE_INTEGER;
371 	rom_arg_elements[0].integer.value = offset;
372 
373 	rom_arg_elements[1].type = ACPI_TYPE_INTEGER;
374 	rom_arg_elements[1].integer.value = len;
375 
376 	status = acpi_evaluate_object(rom_handle, NULL, &rom_arg, &buffer);
377 	if (ACPI_FAILURE(status)) {
378 		printk(KERN_INFO "failed to evaluate ROM got %s\n", acpi_format_exception(status));
379 		return -ENODEV;
380 	}
381 	obj = (union acpi_object *)buffer.pointer;
382 	memcpy(bios+offset, obj->buffer.pointer, len);
383 	kfree(buffer.pointer);
384 	return len;
385 }
386 
387 bool nouveau_acpi_rom_supported(struct pci_dev *pdev)
388 {
389 	acpi_status status;
390 	acpi_handle dhandle, rom_handle;
391 
392 	if (!nouveau_dsm_priv.dsm_detected && !nouveau_dsm_priv.optimus_detected)
393 		return false;
394 
395 	dhandle = ACPI_HANDLE(&pdev->dev);
396 	if (!dhandle)
397 		return false;
398 
399 	status = acpi_get_handle(dhandle, "_ROM", &rom_handle);
400 	if (ACPI_FAILURE(status))
401 		return false;
402 
403 	nouveau_dsm_priv.rom_handle = rom_handle;
404 	return true;
405 }
406 
407 int nouveau_acpi_get_bios_chunk(uint8_t *bios, int offset, int len)
408 {
409 	return nouveau_rom_call(nouveau_dsm_priv.rom_handle, bios, offset, len);
410 }
411 
412 void *
413 nouveau_acpi_edid(struct drm_device *dev, struct drm_connector *connector)
414 {
415 	struct acpi_device *acpidev;
416 	acpi_handle handle;
417 	int type, ret;
418 	void *edid;
419 
420 	switch (connector->connector_type) {
421 	case DRM_MODE_CONNECTOR_LVDS:
422 	case DRM_MODE_CONNECTOR_eDP:
423 		type = ACPI_VIDEO_DISPLAY_LCD;
424 		break;
425 	default:
426 		return NULL;
427 	}
428 
429 	handle = ACPI_HANDLE(&dev->pdev->dev);
430 	if (!handle)
431 		return NULL;
432 
433 	ret = acpi_bus_get_device(handle, &acpidev);
434 	if (ret)
435 		return NULL;
436 
437 	ret = acpi_video_get_edid(acpidev, type, -1, &edid);
438 	if (ret < 0)
439 		return NULL;
440 
441 	return kmemdup(edid, EDID_LENGTH, GFP_KERNEL);
442 }
443