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 static int nouveau_dsm(acpi_handle handle, int func, int arg)
110 {
111 	int ret = 0;
112 	union acpi_object *obj;
113 	union acpi_object argv4 = {
114 		.integer.type = ACPI_TYPE_INTEGER,
115 		.integer.value = arg,
116 	};
117 
118 	obj = acpi_evaluate_dsm_typed(handle, nouveau_dsm_muid, 0x00000102,
119 				      func, &argv4, ACPI_TYPE_INTEGER);
120 	if (!obj) {
121 		acpi_handle_info(handle, "failed to evaluate _DSM\n");
122 		return AE_ERROR;
123 	} else {
124 		if (obj->integer.value == 0x80000002)
125 			ret = -ENODEV;
126 		ACPI_FREE(obj);
127 	}
128 
129 	return ret;
130 }
131 
132 static int nouveau_dsm_switch_mux(acpi_handle handle, int mux_id)
133 {
134 	mxm_wmi_call_mxmx(mux_id == NOUVEAU_DSM_LED_STAMINA ? MXM_MXDS_ADAPTER_IGD : MXM_MXDS_ADAPTER_0);
135 	mxm_wmi_call_mxds(mux_id == NOUVEAU_DSM_LED_STAMINA ? MXM_MXDS_ADAPTER_IGD : MXM_MXDS_ADAPTER_0);
136 	return nouveau_dsm(handle, NOUVEAU_DSM_LED, mux_id);
137 }
138 
139 static int nouveau_dsm_set_discrete_state(acpi_handle handle, enum vga_switcheroo_state state)
140 {
141 	int arg;
142 	if (state == VGA_SWITCHEROO_ON)
143 		arg = NOUVEAU_DSM_POWER_SPEED;
144 	else
145 		arg = NOUVEAU_DSM_POWER_STAMINA;
146 	nouveau_dsm(handle, NOUVEAU_DSM_POWER, arg);
147 	return 0;
148 }
149 
150 static int nouveau_dsm_switchto(enum vga_switcheroo_client_id id)
151 {
152 	if (!nouveau_dsm_priv.dsm_detected)
153 		return 0;
154 	if (id == VGA_SWITCHEROO_IGD)
155 		return nouveau_dsm_switch_mux(nouveau_dsm_priv.dhandle, NOUVEAU_DSM_LED_STAMINA);
156 	else
157 		return nouveau_dsm_switch_mux(nouveau_dsm_priv.dhandle, NOUVEAU_DSM_LED_SPEED);
158 }
159 
160 static int nouveau_dsm_power_state(enum vga_switcheroo_client_id id,
161 				   enum vga_switcheroo_state state)
162 {
163 	if (id == VGA_SWITCHEROO_IGD)
164 		return 0;
165 
166 	/* Optimus laptops have the card already disabled in
167 	 * nouveau_switcheroo_set_state */
168 	if (!nouveau_dsm_priv.dsm_detected)
169 		return 0;
170 
171 	return nouveau_dsm_set_discrete_state(nouveau_dsm_priv.dhandle, state);
172 }
173 
174 static int nouveau_dsm_get_client_id(struct pci_dev *pdev)
175 {
176 	/* easy option one - intel vendor ID means Integrated */
177 	if (pdev->vendor == PCI_VENDOR_ID_INTEL)
178 		return VGA_SWITCHEROO_IGD;
179 
180 	/* is this device on Bus 0? - this may need improving */
181 	if (pdev->bus->number == 0)
182 		return VGA_SWITCHEROO_IGD;
183 
184 	return VGA_SWITCHEROO_DIS;
185 }
186 
187 static struct vga_switcheroo_handler nouveau_dsm_handler = {
188 	.switchto = nouveau_dsm_switchto,
189 	.power_state = nouveau_dsm_power_state,
190 	.get_client_id = nouveau_dsm_get_client_id,
191 };
192 
193 static int nouveau_dsm_pci_probe(struct pci_dev *pdev)
194 {
195 	acpi_handle dhandle;
196 	int retval = 0;
197 
198 	dhandle = ACPI_HANDLE(&pdev->dev);
199 	if (!dhandle)
200 		return false;
201 
202 	if (!acpi_has_method(dhandle, "_DSM")) {
203 		nouveau_dsm_priv.other_handle = dhandle;
204 		return false;
205 	}
206 	if (acpi_check_dsm(dhandle, nouveau_dsm_muid, 0x00000102,
207 			   1 << NOUVEAU_DSM_POWER))
208 		retval |= NOUVEAU_DSM_HAS_MUX;
209 
210 	if (acpi_check_dsm(dhandle, nouveau_op_dsm_muid, 0x00000100,
211 			   1 << NOUVEAU_DSM_OPTIMUS_CAPS))
212 		retval |= NOUVEAU_DSM_HAS_OPT;
213 
214 	if (retval & NOUVEAU_DSM_HAS_OPT) {
215 		uint32_t result;
216 		nouveau_optimus_dsm(dhandle, NOUVEAU_DSM_OPTIMUS_CAPS, 0,
217 				    &result);
218 		dev_info(&pdev->dev, "optimus capabilities: %s, status %s%s\n",
219 			 (result & OPTIMUS_ENABLED) ? "enabled" : "disabled",
220 			 (result & OPTIMUS_DYNAMIC_PWR_CAP) ? "dynamic power, " : "",
221 			 (result & OPTIMUS_HDA_CODEC_MASK) ? "hda bios codec supported" : "");
222 	}
223 	if (retval)
224 		nouveau_dsm_priv.dhandle = dhandle;
225 
226 	return retval;
227 }
228 
229 static bool nouveau_dsm_detect(void)
230 {
231 	char acpi_method_name[255] = { 0 };
232 	struct acpi_buffer buffer = {sizeof(acpi_method_name), acpi_method_name};
233 	struct pci_dev *pdev = NULL;
234 	int has_dsm = 0;
235 	int has_optimus = 0;
236 	int vga_count = 0;
237 	bool guid_valid;
238 	int retval;
239 	bool ret = false;
240 
241 	/* lookup the MXM GUID */
242 	guid_valid = mxm_wmi_supported();
243 
244 	if (guid_valid)
245 		printk("MXM: GUID detected in BIOS\n");
246 
247 	/* now do DSM detection */
248 	while ((pdev = pci_get_class(PCI_CLASS_DISPLAY_VGA << 8, pdev)) != NULL) {
249 		vga_count++;
250 
251 		retval = nouveau_dsm_pci_probe(pdev);
252 		if (retval & NOUVEAU_DSM_HAS_MUX)
253 			has_dsm |= 1;
254 		if (retval & NOUVEAU_DSM_HAS_OPT)
255 			has_optimus = 1;
256 	}
257 
258 	while ((pdev = pci_get_class(PCI_CLASS_DISPLAY_3D << 8, pdev)) != NULL) {
259 		vga_count++;
260 
261 		retval = nouveau_dsm_pci_probe(pdev);
262 		if (retval & NOUVEAU_DSM_HAS_MUX)
263 			has_dsm |= 1;
264 		if (retval & NOUVEAU_DSM_HAS_OPT)
265 			has_optimus = 1;
266 	}
267 
268 	/* find the optimus DSM or the old v1 DSM */
269 	if (has_optimus == 1) {
270 		acpi_get_name(nouveau_dsm_priv.dhandle, ACPI_FULL_PATHNAME,
271 			&buffer);
272 		printk(KERN_INFO "VGA switcheroo: detected Optimus DSM method %s handle\n",
273 			acpi_method_name);
274 		nouveau_dsm_priv.optimus_detected = true;
275 		ret = true;
276 	} else if (vga_count == 2 && has_dsm && guid_valid) {
277 		acpi_get_name(nouveau_dsm_priv.dhandle, ACPI_FULL_PATHNAME,
278 			&buffer);
279 		printk(KERN_INFO "VGA switcheroo: detected DSM switching method %s handle\n",
280 			acpi_method_name);
281 		nouveau_dsm_priv.dsm_detected = true;
282 		/*
283 		 * On some systems hotplug events are generated for the device
284 		 * being switched off when _DSM is executed.  They cause ACPI
285 		 * hotplug to trigger and attempt to remove the device from
286 		 * the system, which causes it to break down.  Prevent that from
287 		 * happening by setting the no_hotplug flag for the involved
288 		 * ACPI device objects.
289 		 */
290 		acpi_bus_no_hotplug(nouveau_dsm_priv.dhandle);
291 		acpi_bus_no_hotplug(nouveau_dsm_priv.other_handle);
292 		ret = true;
293 	}
294 
295 
296 	return ret;
297 }
298 
299 void nouveau_register_dsm_handler(void)
300 {
301 	bool r;
302 
303 	r = nouveau_dsm_detect();
304 	if (!r)
305 		return;
306 
307 	vga_switcheroo_register_handler(&nouveau_dsm_handler);
308 }
309 
310 /* Must be called for Optimus models before the card can be turned off */
311 void nouveau_switcheroo_optimus_dsm(void)
312 {
313 	u32 result = 0;
314 	if (!nouveau_dsm_priv.optimus_detected)
315 		return;
316 
317 	nouveau_optimus_dsm(nouveau_dsm_priv.dhandle, NOUVEAU_DSM_OPTIMUS_FLAGS,
318 			    0x3, &result);
319 
320 	nouveau_optimus_dsm(nouveau_dsm_priv.dhandle, NOUVEAU_DSM_OPTIMUS_CAPS,
321 		NOUVEAU_DSM_OPTIMUS_SET_POWERDOWN, &result);
322 
323 }
324 
325 void nouveau_unregister_dsm_handler(void)
326 {
327 	if (nouveau_dsm_priv.optimus_detected || nouveau_dsm_priv.dsm_detected)
328 		vga_switcheroo_unregister_handler();
329 }
330 #else
331 void nouveau_register_dsm_handler(void) {}
332 void nouveau_unregister_dsm_handler(void) {}
333 void nouveau_switcheroo_optimus_dsm(void) {}
334 #endif
335 
336 /* retrieve the ROM in 4k blocks */
337 static int nouveau_rom_call(acpi_handle rom_handle, uint8_t *bios,
338 			    int offset, int len)
339 {
340 	acpi_status status;
341 	union acpi_object rom_arg_elements[2], *obj;
342 	struct acpi_object_list rom_arg;
343 	struct acpi_buffer buffer = { ACPI_ALLOCATE_BUFFER, NULL};
344 
345 	rom_arg.count = 2;
346 	rom_arg.pointer = &rom_arg_elements[0];
347 
348 	rom_arg_elements[0].type = ACPI_TYPE_INTEGER;
349 	rom_arg_elements[0].integer.value = offset;
350 
351 	rom_arg_elements[1].type = ACPI_TYPE_INTEGER;
352 	rom_arg_elements[1].integer.value = len;
353 
354 	status = acpi_evaluate_object(rom_handle, NULL, &rom_arg, &buffer);
355 	if (ACPI_FAILURE(status)) {
356 		printk(KERN_INFO "failed to evaluate ROM got %s\n", acpi_format_exception(status));
357 		return -ENODEV;
358 	}
359 	obj = (union acpi_object *)buffer.pointer;
360 	memcpy(bios+offset, obj->buffer.pointer, len);
361 	kfree(buffer.pointer);
362 	return len;
363 }
364 
365 bool nouveau_acpi_rom_supported(struct pci_dev *pdev)
366 {
367 	acpi_status status;
368 	acpi_handle dhandle, rom_handle;
369 
370 	if (!nouveau_dsm_priv.dsm_detected && !nouveau_dsm_priv.optimus_detected)
371 		return false;
372 
373 	dhandle = ACPI_HANDLE(&pdev->dev);
374 	if (!dhandle)
375 		return false;
376 
377 	status = acpi_get_handle(dhandle, "_ROM", &rom_handle);
378 	if (ACPI_FAILURE(status))
379 		return false;
380 
381 	nouveau_dsm_priv.rom_handle = rom_handle;
382 	return true;
383 }
384 
385 int nouveau_acpi_get_bios_chunk(uint8_t *bios, int offset, int len)
386 {
387 	return nouveau_rom_call(nouveau_dsm_priv.rom_handle, bios, offset, len);
388 }
389 
390 void *
391 nouveau_acpi_edid(struct drm_device *dev, struct drm_connector *connector)
392 {
393 	struct acpi_device *acpidev;
394 	acpi_handle handle;
395 	int type, ret;
396 	void *edid;
397 
398 	switch (connector->connector_type) {
399 	case DRM_MODE_CONNECTOR_LVDS:
400 	case DRM_MODE_CONNECTOR_eDP:
401 		type = ACPI_VIDEO_DISPLAY_LCD;
402 		break;
403 	default:
404 		return NULL;
405 	}
406 
407 	handle = ACPI_HANDLE(&dev->pdev->dev);
408 	if (!handle)
409 		return NULL;
410 
411 	ret = acpi_bus_get_device(handle, &acpidev);
412 	if (ret)
413 		return NULL;
414 
415 	ret = acpi_video_get_edid(acpidev, type, -1, &edid);
416 	if (ret < 0)
417 		return NULL;
418 
419 	return kmemdup(edid, EDID_LENGTH, GFP_KERNEL);
420 }
421