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