Linux Audio

Check our new training course

Loading...
v3.1
  1/*
  2 * Provides ACPI support for IDE drives.
  3 *
  4 * Copyright (C) 2005 Intel Corp.
  5 * Copyright (C) 2005 Randy Dunlap
  6 * Copyright (C) 2006 SUSE Linux Products GmbH
  7 * Copyright (C) 2006 Hannes Reinecke
  8 */
  9
 10#include <linux/ata.h>
 11#include <linux/delay.h>
 12#include <linux/device.h>
 13#include <linux/errno.h>
 14#include <linux/kernel.h>
 15#include <linux/slab.h>
 16#include <acpi/acpi.h>
 17#include <linux/ide.h>
 18#include <linux/pci.h>
 19#include <linux/dmi.h>
 
 20
 21#include <acpi/acpi_bus.h>
 22
 23#define REGS_PER_GTF		7
 24
 25struct GTM_buffer {
 26	u32	PIO_speed0;
 27	u32	DMA_speed0;
 28	u32	PIO_speed1;
 29	u32	DMA_speed1;
 30	u32	GTM_flags;
 31};
 32
 33struct ide_acpi_drive_link {
 34	acpi_handle	 obj_handle;
 35	u8		 idbuff[512];
 36};
 37
 38struct ide_acpi_hwif_link {
 39	ide_hwif_t			*hwif;
 40	acpi_handle			 obj_handle;
 41	struct GTM_buffer		 gtm;
 42	struct ide_acpi_drive_link	 master;
 43	struct ide_acpi_drive_link	 slave;
 44};
 45
 46#undef DEBUGGING
 47/* note: adds function name and KERN_DEBUG */
 48#ifdef DEBUGGING
 49#define DEBPRINT(fmt, args...)	\
 50		printk(KERN_DEBUG "%s: " fmt, __func__, ## args)
 51#else
 52#define DEBPRINT(fmt, args...)	do {} while (0)
 53#endif	/* DEBUGGING */
 54
 55static int ide_noacpi;
 56module_param_named(noacpi, ide_noacpi, bool, 0);
 57MODULE_PARM_DESC(noacpi, "disable IDE ACPI support");
 58
 59static int ide_acpigtf;
 60module_param_named(acpigtf, ide_acpigtf, bool, 0);
 61MODULE_PARM_DESC(acpigtf, "enable IDE ACPI _GTF support");
 62
 63static int ide_acpionboot;
 64module_param_named(acpionboot, ide_acpionboot, bool, 0);
 65MODULE_PARM_DESC(acpionboot, "call IDE ACPI methods on boot");
 66
 67static bool ide_noacpi_psx;
 68static int no_acpi_psx(const struct dmi_system_id *id)
 69{
 70	ide_noacpi_psx = true;
 71	printk(KERN_NOTICE"%s detected - disable ACPI _PSx.\n", id->ident);
 72	return 0;
 73}
 74
 75static const struct dmi_system_id ide_acpi_dmi_table[] = {
 76	/* Bug 9673. */
 77	/* We should check if this is because ACPI NVS isn't save/restored. */
 78	{
 79		.callback = no_acpi_psx,
 80		.ident    = "HP nx9005",
 81		.matches  = {
 82			DMI_MATCH(DMI_BIOS_VENDOR, "Phoenix Technologies Ltd."),
 83			DMI_MATCH(DMI_BIOS_VERSION, "KAM1.60")
 84		},
 85	},
 86
 87	{ }	/* terminate list */
 88};
 89
 90int ide_acpi_init(void)
 91{
 92	dmi_check_system(ide_acpi_dmi_table);
 93	return 0;
 94}
 95
 96bool ide_port_acpi(ide_hwif_t *hwif)
 97{
 98	return ide_noacpi == 0 && hwif->acpidata;
 99}
100
101/**
102 * ide_get_dev_handle - finds acpi_handle and PCI device.function
103 * @dev: device to locate
104 * @handle: returned acpi_handle for @dev
105 * @pcidevfn: return PCI device.func for @dev
106 *
107 * Returns the ACPI object handle to the corresponding PCI device.
108 *
109 * Returns 0 on success, <0 on error.
110 */
111static int ide_get_dev_handle(struct device *dev, acpi_handle *handle,
112			       u64 *pcidevfn)
113{
114	struct pci_dev *pdev = to_pci_dev(dev);
115	unsigned int bus, devnum, func;
116	u64 addr;
117	acpi_handle dev_handle;
118	acpi_status status;
119	struct acpi_device_info	*dinfo = NULL;
120	int ret = -ENODEV;
121
122	bus = pdev->bus->number;
123	devnum = PCI_SLOT(pdev->devfn);
124	func = PCI_FUNC(pdev->devfn);
125	/* ACPI _ADR encoding for PCI bus: */
126	addr = (u64)(devnum << 16 | func);
127
128	DEBPRINT("ENTER: pci %02x:%02x.%01x\n", bus, devnum, func);
129
130	dev_handle = DEVICE_ACPI_HANDLE(dev);
131	if (!dev_handle) {
132		DEBPRINT("no acpi handle for device\n");
133		goto err;
134	}
135
136	status = acpi_get_object_info(dev_handle, &dinfo);
137	if (ACPI_FAILURE(status)) {
138		DEBPRINT("get_object_info for device failed\n");
139		goto err;
140	}
141	if (dinfo && (dinfo->valid & ACPI_VALID_ADR) &&
142	    dinfo->address == addr) {
143		*pcidevfn = addr;
144		*handle = dev_handle;
145	} else {
146		DEBPRINT("get_object_info for device has wrong "
147			" address: %llu, should be %u\n",
148			dinfo ? (unsigned long long)dinfo->address : -1ULL,
149			(unsigned int)addr);
150		goto err;
151	}
152
153	DEBPRINT("for dev=0x%x.%x, addr=0x%llx, *handle=0x%p\n",
154		 devnum, func, (unsigned long long)addr, *handle);
155	ret = 0;
156err:
157	kfree(dinfo);
158	return ret;
159}
160
161/**
162 * ide_acpi_hwif_get_handle - Get ACPI object handle for a given hwif
163 * @hwif: device to locate
164 *
165 * Retrieves the object handle for a given hwif.
166 *
167 * Returns handle on success, 0 on error.
168 */
169static acpi_handle ide_acpi_hwif_get_handle(ide_hwif_t *hwif)
170{
171	struct device		*dev = hwif->gendev.parent;
172	acpi_handle		uninitialized_var(dev_handle);
173	u64			pcidevfn;
174	acpi_handle		chan_handle;
175	int			err;
176
177	DEBPRINT("ENTER: device %s\n", hwif->name);
178
179	if (!dev) {
180		DEBPRINT("no PCI device for %s\n", hwif->name);
181		return NULL;
182	}
183
184	err = ide_get_dev_handle(dev, &dev_handle, &pcidevfn);
185	if (err < 0) {
186		DEBPRINT("ide_get_dev_handle failed (%d)\n", err);
187		return NULL;
188	}
189
190	/* get child objects of dev_handle == channel objects,
191	 * + _their_ children == drive objects */
192	/* channel is hwif->channel */
193	chan_handle = acpi_get_child(dev_handle, hwif->channel);
194	DEBPRINT("chan adr=%d: handle=0x%p\n",
195		 hwif->channel, chan_handle);
196
197	return chan_handle;
198}
199
200/**
201 * do_drive_get_GTF - get the drive bootup default taskfile settings
202 * @drive: the drive for which the taskfile settings should be retrieved
203 * @gtf_length: number of bytes of _GTF data returned at @gtf_address
204 * @gtf_address: buffer containing _GTF taskfile arrays
205 *
206 * The _GTF method has no input parameters.
207 * It returns a variable number of register set values (registers
208 * hex 1F1..1F7, taskfiles).
209 * The <variable number> is not known in advance, so have ACPI-CA
210 * allocate the buffer as needed and return it, then free it later.
211 *
212 * The returned @gtf_length and @gtf_address are only valid if the
213 * function return value is 0.
214 */
215static int do_drive_get_GTF(ide_drive_t *drive,
216		     unsigned int *gtf_length, unsigned long *gtf_address,
217		     unsigned long *obj_loc)
218{
219	acpi_status			status;
220	struct acpi_buffer		output;
221	union acpi_object 		*out_obj;
222	int				err = -ENODEV;
223
224	*gtf_length = 0;
225	*gtf_address = 0UL;
226	*obj_loc = 0UL;
227
228	if (!drive->acpidata->obj_handle) {
229		DEBPRINT("No ACPI object found for %s\n", drive->name);
230		goto out;
231	}
232
233	/* Setting up output buffer */
234	output.length = ACPI_ALLOCATE_BUFFER;
235	output.pointer = NULL;	/* ACPI-CA sets this; save/free it later */
236
237	/* _GTF has no input parameters */
238	err = -EIO;
239	status = acpi_evaluate_object(drive->acpidata->obj_handle, "_GTF",
240				      NULL, &output);
241	if (ACPI_FAILURE(status)) {
242		printk(KERN_DEBUG
243		       "%s: Run _GTF error: status = 0x%x\n",
244		       __func__, status);
245		goto out;
246	}
247
248	if (!output.length || !output.pointer) {
249		DEBPRINT("Run _GTF: "
250		       "length or ptr is NULL (0x%llx, 0x%p)\n",
251		       (unsigned long long)output.length,
252		       output.pointer);
253		goto out;
254	}
255
256	out_obj = output.pointer;
257	if (out_obj->type != ACPI_TYPE_BUFFER) {
258		DEBPRINT("Run _GTF: error: "
259		       "expected object type of ACPI_TYPE_BUFFER, "
260		       "got 0x%x\n", out_obj->type);
261		err = -ENOENT;
262		kfree(output.pointer);
263		goto out;
264	}
265
266	if (!out_obj->buffer.length || !out_obj->buffer.pointer ||
267	    out_obj->buffer.length % REGS_PER_GTF) {
268		printk(KERN_ERR
269		       "%s: unexpected GTF length (%d) or addr (0x%p)\n",
270		       __func__, out_obj->buffer.length,
271		       out_obj->buffer.pointer);
272		err = -ENOENT;
273		kfree(output.pointer);
274		goto out;
275	}
276
277	*gtf_length = out_obj->buffer.length;
278	*gtf_address = (unsigned long)out_obj->buffer.pointer;
279	*obj_loc = (unsigned long)out_obj;
280	DEBPRINT("returning gtf_length=%d, gtf_address=0x%lx, obj_loc=0x%lx\n",
281		 *gtf_length, *gtf_address, *obj_loc);
282	err = 0;
283out:
284	return err;
285}
286
287/**
288 * do_drive_set_taskfiles - write the drive taskfile settings from _GTF
289 * @drive: the drive to which the taskfile command should be sent
290 * @gtf_length: total number of bytes of _GTF taskfiles
291 * @gtf_address: location of _GTF taskfile arrays
292 *
293 * Write {gtf_address, length gtf_length} in groups of
294 * REGS_PER_GTF bytes.
295 */
296static int do_drive_set_taskfiles(ide_drive_t *drive,
297				  unsigned int gtf_length,
298				  unsigned long gtf_address)
299{
300	int			rc = 0, err;
301	int			gtf_count = gtf_length / REGS_PER_GTF;
302	int			ix;
303
304	DEBPRINT("total GTF bytes=%u (0x%x), gtf_count=%d, addr=0x%lx\n",
305		 gtf_length, gtf_length, gtf_count, gtf_address);
306
307	/* send all taskfile registers (0x1f1-0x1f7) *in*that*order* */
308	for (ix = 0; ix < gtf_count; ix++) {
309		u8 *gtf = (u8 *)(gtf_address + ix * REGS_PER_GTF);
310		struct ide_cmd cmd;
311
312		DEBPRINT("(0x1f1-1f7): "
313			 "hex: %02x %02x %02x %02x %02x %02x %02x\n",
314			 gtf[0], gtf[1], gtf[2],
315			 gtf[3], gtf[4], gtf[5], gtf[6]);
316
317		if (!ide_acpigtf) {
318			DEBPRINT("_GTF execution disabled\n");
319			continue;
320		}
321
322		/* convert GTF to taskfile */
323		memset(&cmd, 0, sizeof(cmd));
324		memcpy(&cmd.tf.feature, gtf, REGS_PER_GTF);
325		cmd.valid.out.tf = IDE_VALID_OUT_TF | IDE_VALID_DEVICE;
326		cmd.valid.in.tf  = IDE_VALID_IN_TF  | IDE_VALID_DEVICE;
327
328		err = ide_no_data_taskfile(drive, &cmd);
329		if (err) {
330			printk(KERN_ERR "%s: ide_no_data_taskfile failed: %u\n",
331					__func__, err);
332			rc = err;
333		}
334	}
335
336	return rc;
337}
338
339/**
340 * ide_acpi_exec_tfs - get then write drive taskfile settings
341 * @drive: the drive for which the taskfile settings should be
342 *         written.
343 *
344 * According to the ACPI spec this should be called after _STM
345 * has been evaluated for the interface. Some ACPI vendors interpret
346 * that as a hard requirement and modify the taskfile according
347 * to the Identify Drive information passed down with _STM.
348 * So one should really make sure to call this only after _STM has
349 * been executed.
350 */
351int ide_acpi_exec_tfs(ide_drive_t *drive)
352{
353	int		ret;
354	unsigned int	gtf_length;
355	unsigned long	gtf_address;
356	unsigned long	obj_loc;
357
358	DEBPRINT("call get_GTF, drive=%s port=%d\n", drive->name, drive->dn);
359
360	ret = do_drive_get_GTF(drive, &gtf_length, &gtf_address, &obj_loc);
361	if (ret < 0) {
362		DEBPRINT("get_GTF error (%d)\n", ret);
363		return ret;
364	}
365
366	DEBPRINT("call set_taskfiles, drive=%s\n", drive->name);
367
368	ret = do_drive_set_taskfiles(drive, gtf_length, gtf_address);
369	kfree((void *)obj_loc);
370	if (ret < 0) {
371		DEBPRINT("set_taskfiles error (%d)\n", ret);
372	}
373
374	DEBPRINT("ret=%d\n", ret);
375
376	return ret;
377}
378
379/**
380 * ide_acpi_get_timing - get the channel (controller) timings
381 * @hwif: target IDE interface (channel)
382 *
383 * This function executes the _GTM ACPI method for the target channel.
384 *
385 */
386void ide_acpi_get_timing(ide_hwif_t *hwif)
387{
388	acpi_status		status;
389	struct acpi_buffer	output;
390	union acpi_object 	*out_obj;
391
392	/* Setting up output buffer for _GTM */
393	output.length = ACPI_ALLOCATE_BUFFER;
394	output.pointer = NULL;	/* ACPI-CA sets this; save/free it later */
395
396	/* _GTM has no input parameters */
397	status = acpi_evaluate_object(hwif->acpidata->obj_handle, "_GTM",
398				      NULL, &output);
399
400	DEBPRINT("_GTM status: %d, outptr: 0x%p, outlen: 0x%llx\n",
401		 status, output.pointer,
402		 (unsigned long long)output.length);
403
404	if (ACPI_FAILURE(status)) {
405		DEBPRINT("Run _GTM error: status = 0x%x\n", status);
406		return;
407	}
408
409	if (!output.length || !output.pointer) {
410		DEBPRINT("Run _GTM: length or ptr is NULL (0x%llx, 0x%p)\n",
411		       (unsigned long long)output.length,
412		       output.pointer);
413		kfree(output.pointer);
414		return;
415	}
416
417	out_obj = output.pointer;
418	if (out_obj->type != ACPI_TYPE_BUFFER) {
419		DEBPRINT("Run _GTM: error: "
420		       "expected object type of ACPI_TYPE_BUFFER, "
421		       "got 0x%x\n", out_obj->type);
422		kfree(output.pointer);
423		return;
424	}
425
426	if (!out_obj->buffer.length || !out_obj->buffer.pointer ||
427	    out_obj->buffer.length != sizeof(struct GTM_buffer)) {
428		printk(KERN_ERR
429			"%s: unexpected _GTM length (0x%x)[should be 0x%zx] or "
430			"addr (0x%p)\n",
431			__func__, out_obj->buffer.length,
432			sizeof(struct GTM_buffer), out_obj->buffer.pointer);
433		kfree(output.pointer);
434		return;
435	}
436
437	memcpy(&hwif->acpidata->gtm, out_obj->buffer.pointer,
438	       sizeof(struct GTM_buffer));
439
440	DEBPRINT("_GTM info: ptr: 0x%p, len: 0x%x, exp.len: 0x%Zx\n",
441		 out_obj->buffer.pointer, out_obj->buffer.length,
442		 sizeof(struct GTM_buffer));
443
444	DEBPRINT("_GTM fields: 0x%x, 0x%x, 0x%x, 0x%x, 0x%x\n",
445		 hwif->acpidata->gtm.PIO_speed0,
446		 hwif->acpidata->gtm.DMA_speed0,
447		 hwif->acpidata->gtm.PIO_speed1,
448		 hwif->acpidata->gtm.DMA_speed1,
449		 hwif->acpidata->gtm.GTM_flags);
450
451	kfree(output.pointer);
452}
453
454/**
455 * ide_acpi_push_timing - set the channel (controller) timings
456 * @hwif: target IDE interface (channel)
457 *
458 * This function executes the _STM ACPI method for the target channel.
459 *
460 * _STM requires Identify Drive data, which has to passed as an argument.
461 * Unfortunately drive->id is a mangled version which we can't readily
462 * use; hence we'll get the information afresh.
463 */
464void ide_acpi_push_timing(ide_hwif_t *hwif)
465{
466	acpi_status		status;
467	struct acpi_object_list	input;
468	union acpi_object 	in_params[3];
469	struct ide_acpi_drive_link	*master = &hwif->acpidata->master;
470	struct ide_acpi_drive_link	*slave = &hwif->acpidata->slave;
471
472	/* Give the GTM buffer + drive Identify data to the channel via the
473	 * _STM method: */
474	/* setup input parameters buffer for _STM */
475	input.count = 3;
476	input.pointer = in_params;
477	in_params[0].type = ACPI_TYPE_BUFFER;
478	in_params[0].buffer.length = sizeof(struct GTM_buffer);
479	in_params[0].buffer.pointer = (u8 *)&hwif->acpidata->gtm;
480	in_params[1].type = ACPI_TYPE_BUFFER;
481	in_params[1].buffer.length = ATA_ID_WORDS * 2;
482	in_params[1].buffer.pointer = (u8 *)&master->idbuff;
483	in_params[2].type = ACPI_TYPE_BUFFER;
484	in_params[2].buffer.length = ATA_ID_WORDS * 2;
485	in_params[2].buffer.pointer = (u8 *)&slave->idbuff;
486	/* Output buffer: _STM has no output */
487
488	status = acpi_evaluate_object(hwif->acpidata->obj_handle, "_STM",
489				      &input, NULL);
490
491	if (ACPI_FAILURE(status)) {
492		DEBPRINT("Run _STM error: status = 0x%x\n", status);
493	}
494	DEBPRINT("_STM status: %d\n", status);
495}
496
497/**
498 * ide_acpi_set_state - set the channel power state
499 * @hwif: target IDE interface
500 * @on: state, on/off
501 *
502 * This function executes the _PS0/_PS3 ACPI method to set the power state.
503 * ACPI spec requires _PS0 when IDE power on and _PS3 when power off
504 */
505void ide_acpi_set_state(ide_hwif_t *hwif, int on)
506{
507	ide_drive_t *drive;
508	int i;
509
510	if (ide_noacpi_psx)
511		return;
512
513	DEBPRINT("ENTER:\n");
514
515	/* channel first and then drives for power on and verse versa for power off */
516	if (on)
517		acpi_bus_set_power(hwif->acpidata->obj_handle, ACPI_STATE_D0);
518
519	ide_port_for_each_present_dev(i, drive, hwif) {
520		if (drive->acpidata->obj_handle)
521			acpi_bus_set_power(drive->acpidata->obj_handle,
522					   on ? ACPI_STATE_D0 : ACPI_STATE_D3);
523	}
524
525	if (!on)
526		acpi_bus_set_power(hwif->acpidata->obj_handle, ACPI_STATE_D3);
527}
528
529/**
530 * ide_acpi_init_port - initialize the ACPI link for an IDE interface
531 * @hwif: target IDE interface (channel)
532 *
533 * The ACPI spec is not quite clear when the drive identify buffer
534 * should be obtained. Calling IDENTIFY DEVICE during shutdown
535 * is not the best of ideas as the drive might already being put to
536 * sleep. And obviously we can't call it during resume.
537 * So we get the information during startup; but this means that
538 * any changes during run-time will be lost after resume.
539 */
540void ide_acpi_init_port(ide_hwif_t *hwif)
541{
542	hwif->acpidata = kzalloc(sizeof(struct ide_acpi_hwif_link), GFP_KERNEL);
543	if (!hwif->acpidata)
544		return;
545
546	hwif->acpidata->obj_handle = ide_acpi_hwif_get_handle(hwif);
547	if (!hwif->acpidata->obj_handle) {
548		DEBPRINT("no ACPI object for %s found\n", hwif->name);
549		kfree(hwif->acpidata);
550		hwif->acpidata = NULL;
551	}
552}
553
554void ide_acpi_port_init_devices(ide_hwif_t *hwif)
555{
556	ide_drive_t *drive;
557	int i, err;
558
559	if (hwif->acpidata == NULL)
560		return;
561
562	/*
563	 * The ACPI spec mandates that we send information
564	 * for both drives, regardless whether they are connected
565	 * or not.
566	 */
567	hwif->devices[0]->acpidata = &hwif->acpidata->master;
568	hwif->devices[1]->acpidata = &hwif->acpidata->slave;
569
570	/* get _ADR info for each device */
571	ide_port_for_each_present_dev(i, drive, hwif) {
572		acpi_handle dev_handle;
573
574		DEBPRINT("ENTER: %s at channel#: %d port#: %d\n",
575			 drive->name, hwif->channel, drive->dn & 1);
576
577		/* TBD: could also check ACPI object VALID bits */
578		dev_handle = acpi_get_child(hwif->acpidata->obj_handle,
579					    drive->dn & 1);
580
581		DEBPRINT("drive %s handle 0x%p\n", drive->name, dev_handle);
582
583		drive->acpidata->obj_handle = dev_handle;
584	}
585
586	/* send IDENTIFY for each device */
587	ide_port_for_each_present_dev(i, drive, hwif) {
588		err = taskfile_lib_get_identify(drive, drive->acpidata->idbuff);
589		if (err)
590			DEBPRINT("identify device %s failed (%d)\n",
591				 drive->name, err);
592	}
593
594	if (ide_noacpi || ide_acpionboot == 0) {
595		DEBPRINT("ACPI methods disabled on boot\n");
596		return;
597	}
598
599	/* ACPI _PS0 before _STM */
600	ide_acpi_set_state(hwif, 1);
601	/*
602	 * ACPI requires us to call _STM on startup
603	 */
604	ide_acpi_get_timing(hwif);
605	ide_acpi_push_timing(hwif);
606
607	ide_port_for_each_present_dev(i, drive, hwif) {
608		ide_acpi_exec_tfs(drive);
609	}
610}
v3.5.6
  1/*
  2 * Provides ACPI support for IDE drives.
  3 *
  4 * Copyright (C) 2005 Intel Corp.
  5 * Copyright (C) 2005 Randy Dunlap
  6 * Copyright (C) 2006 SUSE Linux Products GmbH
  7 * Copyright (C) 2006 Hannes Reinecke
  8 */
  9
 10#include <linux/ata.h>
 11#include <linux/delay.h>
 12#include <linux/device.h>
 13#include <linux/errno.h>
 14#include <linux/kernel.h>
 15#include <linux/slab.h>
 16#include <acpi/acpi.h>
 17#include <linux/ide.h>
 18#include <linux/pci.h>
 19#include <linux/dmi.h>
 20#include <linux/module.h>
 21
 22#include <acpi/acpi_bus.h>
 23
 24#define REGS_PER_GTF		7
 25
 26struct GTM_buffer {
 27	u32	PIO_speed0;
 28	u32	DMA_speed0;
 29	u32	PIO_speed1;
 30	u32	DMA_speed1;
 31	u32	GTM_flags;
 32};
 33
 34struct ide_acpi_drive_link {
 35	acpi_handle	 obj_handle;
 36	u8		 idbuff[512];
 37};
 38
 39struct ide_acpi_hwif_link {
 40	ide_hwif_t			*hwif;
 41	acpi_handle			 obj_handle;
 42	struct GTM_buffer		 gtm;
 43	struct ide_acpi_drive_link	 master;
 44	struct ide_acpi_drive_link	 slave;
 45};
 46
 47#undef DEBUGGING
 48/* note: adds function name and KERN_DEBUG */
 49#ifdef DEBUGGING
 50#define DEBPRINT(fmt, args...)	\
 51		printk(KERN_DEBUG "%s: " fmt, __func__, ## args)
 52#else
 53#define DEBPRINT(fmt, args...)	do {} while (0)
 54#endif	/* DEBUGGING */
 55
 56static bool ide_noacpi;
 57module_param_named(noacpi, ide_noacpi, bool, 0);
 58MODULE_PARM_DESC(noacpi, "disable IDE ACPI support");
 59
 60static bool ide_acpigtf;
 61module_param_named(acpigtf, ide_acpigtf, bool, 0);
 62MODULE_PARM_DESC(acpigtf, "enable IDE ACPI _GTF support");
 63
 64static bool ide_acpionboot;
 65module_param_named(acpionboot, ide_acpionboot, bool, 0);
 66MODULE_PARM_DESC(acpionboot, "call IDE ACPI methods on boot");
 67
 68static bool ide_noacpi_psx;
 69static int no_acpi_psx(const struct dmi_system_id *id)
 70{
 71	ide_noacpi_psx = true;
 72	printk(KERN_NOTICE"%s detected - disable ACPI _PSx.\n", id->ident);
 73	return 0;
 74}
 75
 76static const struct dmi_system_id ide_acpi_dmi_table[] = {
 77	/* Bug 9673. */
 78	/* We should check if this is because ACPI NVS isn't save/restored. */
 79	{
 80		.callback = no_acpi_psx,
 81		.ident    = "HP nx9005",
 82		.matches  = {
 83			DMI_MATCH(DMI_BIOS_VENDOR, "Phoenix Technologies Ltd."),
 84			DMI_MATCH(DMI_BIOS_VERSION, "KAM1.60")
 85		},
 86	},
 87
 88	{ }	/* terminate list */
 89};
 90
 91int ide_acpi_init(void)
 92{
 93	dmi_check_system(ide_acpi_dmi_table);
 94	return 0;
 95}
 96
 97bool ide_port_acpi(ide_hwif_t *hwif)
 98{
 99	return ide_noacpi == 0 && hwif->acpidata;
100}
101
102/**
103 * ide_get_dev_handle - finds acpi_handle and PCI device.function
104 * @dev: device to locate
105 * @handle: returned acpi_handle for @dev
106 * @pcidevfn: return PCI device.func for @dev
107 *
108 * Returns the ACPI object handle to the corresponding PCI device.
109 *
110 * Returns 0 on success, <0 on error.
111 */
112static int ide_get_dev_handle(struct device *dev, acpi_handle *handle,
113			       u64 *pcidevfn)
114{
115	struct pci_dev *pdev = to_pci_dev(dev);
116	unsigned int bus, devnum, func;
117	u64 addr;
118	acpi_handle dev_handle;
119	acpi_status status;
120	struct acpi_device_info	*dinfo = NULL;
121	int ret = -ENODEV;
122
123	bus = pdev->bus->number;
124	devnum = PCI_SLOT(pdev->devfn);
125	func = PCI_FUNC(pdev->devfn);
126	/* ACPI _ADR encoding for PCI bus: */
127	addr = (u64)(devnum << 16 | func);
128
129	DEBPRINT("ENTER: pci %02x:%02x.%01x\n", bus, devnum, func);
130
131	dev_handle = DEVICE_ACPI_HANDLE(dev);
132	if (!dev_handle) {
133		DEBPRINT("no acpi handle for device\n");
134		goto err;
135	}
136
137	status = acpi_get_object_info(dev_handle, &dinfo);
138	if (ACPI_FAILURE(status)) {
139		DEBPRINT("get_object_info for device failed\n");
140		goto err;
141	}
142	if (dinfo && (dinfo->valid & ACPI_VALID_ADR) &&
143	    dinfo->address == addr) {
144		*pcidevfn = addr;
145		*handle = dev_handle;
146	} else {
147		DEBPRINT("get_object_info for device has wrong "
148			" address: %llu, should be %u\n",
149			dinfo ? (unsigned long long)dinfo->address : -1ULL,
150			(unsigned int)addr);
151		goto err;
152	}
153
154	DEBPRINT("for dev=0x%x.%x, addr=0x%llx, *handle=0x%p\n",
155		 devnum, func, (unsigned long long)addr, *handle);
156	ret = 0;
157err:
158	kfree(dinfo);
159	return ret;
160}
161
162/**
163 * ide_acpi_hwif_get_handle - Get ACPI object handle for a given hwif
164 * @hwif: device to locate
165 *
166 * Retrieves the object handle for a given hwif.
167 *
168 * Returns handle on success, 0 on error.
169 */
170static acpi_handle ide_acpi_hwif_get_handle(ide_hwif_t *hwif)
171{
172	struct device		*dev = hwif->gendev.parent;
173	acpi_handle		uninitialized_var(dev_handle);
174	u64			pcidevfn;
175	acpi_handle		chan_handle;
176	int			err;
177
178	DEBPRINT("ENTER: device %s\n", hwif->name);
179
180	if (!dev) {
181		DEBPRINT("no PCI device for %s\n", hwif->name);
182		return NULL;
183	}
184
185	err = ide_get_dev_handle(dev, &dev_handle, &pcidevfn);
186	if (err < 0) {
187		DEBPRINT("ide_get_dev_handle failed (%d)\n", err);
188		return NULL;
189	}
190
191	/* get child objects of dev_handle == channel objects,
192	 * + _their_ children == drive objects */
193	/* channel is hwif->channel */
194	chan_handle = acpi_get_child(dev_handle, hwif->channel);
195	DEBPRINT("chan adr=%d: handle=0x%p\n",
196		 hwif->channel, chan_handle);
197
198	return chan_handle;
199}
200
201/**
202 * do_drive_get_GTF - get the drive bootup default taskfile settings
203 * @drive: the drive for which the taskfile settings should be retrieved
204 * @gtf_length: number of bytes of _GTF data returned at @gtf_address
205 * @gtf_address: buffer containing _GTF taskfile arrays
206 *
207 * The _GTF method has no input parameters.
208 * It returns a variable number of register set values (registers
209 * hex 1F1..1F7, taskfiles).
210 * The <variable number> is not known in advance, so have ACPI-CA
211 * allocate the buffer as needed and return it, then free it later.
212 *
213 * The returned @gtf_length and @gtf_address are only valid if the
214 * function return value is 0.
215 */
216static int do_drive_get_GTF(ide_drive_t *drive,
217		     unsigned int *gtf_length, unsigned long *gtf_address,
218		     unsigned long *obj_loc)
219{
220	acpi_status			status;
221	struct acpi_buffer		output;
222	union acpi_object 		*out_obj;
223	int				err = -ENODEV;
224
225	*gtf_length = 0;
226	*gtf_address = 0UL;
227	*obj_loc = 0UL;
228
229	if (!drive->acpidata->obj_handle) {
230		DEBPRINT("No ACPI object found for %s\n", drive->name);
231		goto out;
232	}
233
234	/* Setting up output buffer */
235	output.length = ACPI_ALLOCATE_BUFFER;
236	output.pointer = NULL;	/* ACPI-CA sets this; save/free it later */
237
238	/* _GTF has no input parameters */
239	err = -EIO;
240	status = acpi_evaluate_object(drive->acpidata->obj_handle, "_GTF",
241				      NULL, &output);
242	if (ACPI_FAILURE(status)) {
243		printk(KERN_DEBUG
244		       "%s: Run _GTF error: status = 0x%x\n",
245		       __func__, status);
246		goto out;
247	}
248
249	if (!output.length || !output.pointer) {
250		DEBPRINT("Run _GTF: "
251		       "length or ptr is NULL (0x%llx, 0x%p)\n",
252		       (unsigned long long)output.length,
253		       output.pointer);
254		goto out;
255	}
256
257	out_obj = output.pointer;
258	if (out_obj->type != ACPI_TYPE_BUFFER) {
259		DEBPRINT("Run _GTF: error: "
260		       "expected object type of ACPI_TYPE_BUFFER, "
261		       "got 0x%x\n", out_obj->type);
262		err = -ENOENT;
263		kfree(output.pointer);
264		goto out;
265	}
266
267	if (!out_obj->buffer.length || !out_obj->buffer.pointer ||
268	    out_obj->buffer.length % REGS_PER_GTF) {
269		printk(KERN_ERR
270		       "%s: unexpected GTF length (%d) or addr (0x%p)\n",
271		       __func__, out_obj->buffer.length,
272		       out_obj->buffer.pointer);
273		err = -ENOENT;
274		kfree(output.pointer);
275		goto out;
276	}
277
278	*gtf_length = out_obj->buffer.length;
279	*gtf_address = (unsigned long)out_obj->buffer.pointer;
280	*obj_loc = (unsigned long)out_obj;
281	DEBPRINT("returning gtf_length=%d, gtf_address=0x%lx, obj_loc=0x%lx\n",
282		 *gtf_length, *gtf_address, *obj_loc);
283	err = 0;
284out:
285	return err;
286}
287
288/**
289 * do_drive_set_taskfiles - write the drive taskfile settings from _GTF
290 * @drive: the drive to which the taskfile command should be sent
291 * @gtf_length: total number of bytes of _GTF taskfiles
292 * @gtf_address: location of _GTF taskfile arrays
293 *
294 * Write {gtf_address, length gtf_length} in groups of
295 * REGS_PER_GTF bytes.
296 */
297static int do_drive_set_taskfiles(ide_drive_t *drive,
298				  unsigned int gtf_length,
299				  unsigned long gtf_address)
300{
301	int			rc = 0, err;
302	int			gtf_count = gtf_length / REGS_PER_GTF;
303	int			ix;
304
305	DEBPRINT("total GTF bytes=%u (0x%x), gtf_count=%d, addr=0x%lx\n",
306		 gtf_length, gtf_length, gtf_count, gtf_address);
307
308	/* send all taskfile registers (0x1f1-0x1f7) *in*that*order* */
309	for (ix = 0; ix < gtf_count; ix++) {
310		u8 *gtf = (u8 *)(gtf_address + ix * REGS_PER_GTF);
311		struct ide_cmd cmd;
312
313		DEBPRINT("(0x1f1-1f7): "
314			 "hex: %02x %02x %02x %02x %02x %02x %02x\n",
315			 gtf[0], gtf[1], gtf[2],
316			 gtf[3], gtf[4], gtf[5], gtf[6]);
317
318		if (!ide_acpigtf) {
319			DEBPRINT("_GTF execution disabled\n");
320			continue;
321		}
322
323		/* convert GTF to taskfile */
324		memset(&cmd, 0, sizeof(cmd));
325		memcpy(&cmd.tf.feature, gtf, REGS_PER_GTF);
326		cmd.valid.out.tf = IDE_VALID_OUT_TF | IDE_VALID_DEVICE;
327		cmd.valid.in.tf  = IDE_VALID_IN_TF  | IDE_VALID_DEVICE;
328
329		err = ide_no_data_taskfile(drive, &cmd);
330		if (err) {
331			printk(KERN_ERR "%s: ide_no_data_taskfile failed: %u\n",
332					__func__, err);
333			rc = err;
334		}
335	}
336
337	return rc;
338}
339
340/**
341 * ide_acpi_exec_tfs - get then write drive taskfile settings
342 * @drive: the drive for which the taskfile settings should be
343 *         written.
344 *
345 * According to the ACPI spec this should be called after _STM
346 * has been evaluated for the interface. Some ACPI vendors interpret
347 * that as a hard requirement and modify the taskfile according
348 * to the Identify Drive information passed down with _STM.
349 * So one should really make sure to call this only after _STM has
350 * been executed.
351 */
352int ide_acpi_exec_tfs(ide_drive_t *drive)
353{
354	int		ret;
355	unsigned int	gtf_length;
356	unsigned long	gtf_address;
357	unsigned long	obj_loc;
358
359	DEBPRINT("call get_GTF, drive=%s port=%d\n", drive->name, drive->dn);
360
361	ret = do_drive_get_GTF(drive, &gtf_length, &gtf_address, &obj_loc);
362	if (ret < 0) {
363		DEBPRINT("get_GTF error (%d)\n", ret);
364		return ret;
365	}
366
367	DEBPRINT("call set_taskfiles, drive=%s\n", drive->name);
368
369	ret = do_drive_set_taskfiles(drive, gtf_length, gtf_address);
370	kfree((void *)obj_loc);
371	if (ret < 0) {
372		DEBPRINT("set_taskfiles error (%d)\n", ret);
373	}
374
375	DEBPRINT("ret=%d\n", ret);
376
377	return ret;
378}
379
380/**
381 * ide_acpi_get_timing - get the channel (controller) timings
382 * @hwif: target IDE interface (channel)
383 *
384 * This function executes the _GTM ACPI method for the target channel.
385 *
386 */
387void ide_acpi_get_timing(ide_hwif_t *hwif)
388{
389	acpi_status		status;
390	struct acpi_buffer	output;
391	union acpi_object 	*out_obj;
392
393	/* Setting up output buffer for _GTM */
394	output.length = ACPI_ALLOCATE_BUFFER;
395	output.pointer = NULL;	/* ACPI-CA sets this; save/free it later */
396
397	/* _GTM has no input parameters */
398	status = acpi_evaluate_object(hwif->acpidata->obj_handle, "_GTM",
399				      NULL, &output);
400
401	DEBPRINT("_GTM status: %d, outptr: 0x%p, outlen: 0x%llx\n",
402		 status, output.pointer,
403		 (unsigned long long)output.length);
404
405	if (ACPI_FAILURE(status)) {
406		DEBPRINT("Run _GTM error: status = 0x%x\n", status);
407		return;
408	}
409
410	if (!output.length || !output.pointer) {
411		DEBPRINT("Run _GTM: length or ptr is NULL (0x%llx, 0x%p)\n",
412		       (unsigned long long)output.length,
413		       output.pointer);
414		kfree(output.pointer);
415		return;
416	}
417
418	out_obj = output.pointer;
419	if (out_obj->type != ACPI_TYPE_BUFFER) {
420		DEBPRINT("Run _GTM: error: "
421		       "expected object type of ACPI_TYPE_BUFFER, "
422		       "got 0x%x\n", out_obj->type);
423		kfree(output.pointer);
424		return;
425	}
426
427	if (!out_obj->buffer.length || !out_obj->buffer.pointer ||
428	    out_obj->buffer.length != sizeof(struct GTM_buffer)) {
429		printk(KERN_ERR
430			"%s: unexpected _GTM length (0x%x)[should be 0x%zx] or "
431			"addr (0x%p)\n",
432			__func__, out_obj->buffer.length,
433			sizeof(struct GTM_buffer), out_obj->buffer.pointer);
434		kfree(output.pointer);
435		return;
436	}
437
438	memcpy(&hwif->acpidata->gtm, out_obj->buffer.pointer,
439	       sizeof(struct GTM_buffer));
440
441	DEBPRINT("_GTM info: ptr: 0x%p, len: 0x%x, exp.len: 0x%Zx\n",
442		 out_obj->buffer.pointer, out_obj->buffer.length,
443		 sizeof(struct GTM_buffer));
444
445	DEBPRINT("_GTM fields: 0x%x, 0x%x, 0x%x, 0x%x, 0x%x\n",
446		 hwif->acpidata->gtm.PIO_speed0,
447		 hwif->acpidata->gtm.DMA_speed0,
448		 hwif->acpidata->gtm.PIO_speed1,
449		 hwif->acpidata->gtm.DMA_speed1,
450		 hwif->acpidata->gtm.GTM_flags);
451
452	kfree(output.pointer);
453}
454
455/**
456 * ide_acpi_push_timing - set the channel (controller) timings
457 * @hwif: target IDE interface (channel)
458 *
459 * This function executes the _STM ACPI method for the target channel.
460 *
461 * _STM requires Identify Drive data, which has to passed as an argument.
462 * Unfortunately drive->id is a mangled version which we can't readily
463 * use; hence we'll get the information afresh.
464 */
465void ide_acpi_push_timing(ide_hwif_t *hwif)
466{
467	acpi_status		status;
468	struct acpi_object_list	input;
469	union acpi_object 	in_params[3];
470	struct ide_acpi_drive_link	*master = &hwif->acpidata->master;
471	struct ide_acpi_drive_link	*slave = &hwif->acpidata->slave;
472
473	/* Give the GTM buffer + drive Identify data to the channel via the
474	 * _STM method: */
475	/* setup input parameters buffer for _STM */
476	input.count = 3;
477	input.pointer = in_params;
478	in_params[0].type = ACPI_TYPE_BUFFER;
479	in_params[0].buffer.length = sizeof(struct GTM_buffer);
480	in_params[0].buffer.pointer = (u8 *)&hwif->acpidata->gtm;
481	in_params[1].type = ACPI_TYPE_BUFFER;
482	in_params[1].buffer.length = ATA_ID_WORDS * 2;
483	in_params[1].buffer.pointer = (u8 *)&master->idbuff;
484	in_params[2].type = ACPI_TYPE_BUFFER;
485	in_params[2].buffer.length = ATA_ID_WORDS * 2;
486	in_params[2].buffer.pointer = (u8 *)&slave->idbuff;
487	/* Output buffer: _STM has no output */
488
489	status = acpi_evaluate_object(hwif->acpidata->obj_handle, "_STM",
490				      &input, NULL);
491
492	if (ACPI_FAILURE(status)) {
493		DEBPRINT("Run _STM error: status = 0x%x\n", status);
494	}
495	DEBPRINT("_STM status: %d\n", status);
496}
497
498/**
499 * ide_acpi_set_state - set the channel power state
500 * @hwif: target IDE interface
501 * @on: state, on/off
502 *
503 * This function executes the _PS0/_PS3 ACPI method to set the power state.
504 * ACPI spec requires _PS0 when IDE power on and _PS3 when power off
505 */
506void ide_acpi_set_state(ide_hwif_t *hwif, int on)
507{
508	ide_drive_t *drive;
509	int i;
510
511	if (ide_noacpi_psx)
512		return;
513
514	DEBPRINT("ENTER:\n");
515
516	/* channel first and then drives for power on and verse versa for power off */
517	if (on)
518		acpi_bus_set_power(hwif->acpidata->obj_handle, ACPI_STATE_D0);
519
520	ide_port_for_each_present_dev(i, drive, hwif) {
521		if (drive->acpidata->obj_handle)
522			acpi_bus_set_power(drive->acpidata->obj_handle,
523					   on ? ACPI_STATE_D0 : ACPI_STATE_D3);
524	}
525
526	if (!on)
527		acpi_bus_set_power(hwif->acpidata->obj_handle, ACPI_STATE_D3);
528}
529
530/**
531 * ide_acpi_init_port - initialize the ACPI link for an IDE interface
532 * @hwif: target IDE interface (channel)
533 *
534 * The ACPI spec is not quite clear when the drive identify buffer
535 * should be obtained. Calling IDENTIFY DEVICE during shutdown
536 * is not the best of ideas as the drive might already being put to
537 * sleep. And obviously we can't call it during resume.
538 * So we get the information during startup; but this means that
539 * any changes during run-time will be lost after resume.
540 */
541void ide_acpi_init_port(ide_hwif_t *hwif)
542{
543	hwif->acpidata = kzalloc(sizeof(struct ide_acpi_hwif_link), GFP_KERNEL);
544	if (!hwif->acpidata)
545		return;
546
547	hwif->acpidata->obj_handle = ide_acpi_hwif_get_handle(hwif);
548	if (!hwif->acpidata->obj_handle) {
549		DEBPRINT("no ACPI object for %s found\n", hwif->name);
550		kfree(hwif->acpidata);
551		hwif->acpidata = NULL;
552	}
553}
554
555void ide_acpi_port_init_devices(ide_hwif_t *hwif)
556{
557	ide_drive_t *drive;
558	int i, err;
559
560	if (hwif->acpidata == NULL)
561		return;
562
563	/*
564	 * The ACPI spec mandates that we send information
565	 * for both drives, regardless whether they are connected
566	 * or not.
567	 */
568	hwif->devices[0]->acpidata = &hwif->acpidata->master;
569	hwif->devices[1]->acpidata = &hwif->acpidata->slave;
570
571	/* get _ADR info for each device */
572	ide_port_for_each_present_dev(i, drive, hwif) {
573		acpi_handle dev_handle;
574
575		DEBPRINT("ENTER: %s at channel#: %d port#: %d\n",
576			 drive->name, hwif->channel, drive->dn & 1);
577
578		/* TBD: could also check ACPI object VALID bits */
579		dev_handle = acpi_get_child(hwif->acpidata->obj_handle,
580					    drive->dn & 1);
581
582		DEBPRINT("drive %s handle 0x%p\n", drive->name, dev_handle);
583
584		drive->acpidata->obj_handle = dev_handle;
585	}
586
587	/* send IDENTIFY for each device */
588	ide_port_for_each_present_dev(i, drive, hwif) {
589		err = taskfile_lib_get_identify(drive, drive->acpidata->idbuff);
590		if (err)
591			DEBPRINT("identify device %s failed (%d)\n",
592				 drive->name, err);
593	}
594
595	if (ide_noacpi || ide_acpionboot == 0) {
596		DEBPRINT("ACPI methods disabled on boot\n");
597		return;
598	}
599
600	/* ACPI _PS0 before _STM */
601	ide_acpi_set_state(hwif, 1);
602	/*
603	 * ACPI requires us to call _STM on startup
604	 */
605	ide_acpi_get_timing(hwif);
606	ide_acpi_push_timing(hwif);
607
608	ide_port_for_each_present_dev(i, drive, hwif) {
609		ide_acpi_exec_tfs(drive);
610	}
611}