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 rom_handle;
50 } nouveau_dsm_priv;
51 
52 bool nouveau_is_optimus(void) {
53 	return nouveau_dsm_priv.optimus_detected;
54 }
55 
56 bool 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
64 static 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 
69 static 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 
74 static 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  */
113 static 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 
131 static 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 
154 static 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 
161 static 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 
172 static 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 
182 static 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 
196 static 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 
209 static 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 
215 static 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 
249 static 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 
309 void 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 */
321 void 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 
335 void 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
341 void nouveau_register_dsm_handler(void) {}
342 void nouveau_unregister_dsm_handler(void) {}
343 void nouveau_switcheroo_optimus_dsm(void) {}
344 #endif
345 
346 /* retrieve the ROM in 4k blocks */
347 static 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 
376 bool 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 
393 int 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 
398 void *
399 nouveau_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