1
2
3
4
5
6
7
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
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
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
77
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 { }
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
103
104
105
106
107
108
109
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
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
163
164
165
166
167
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
191
192
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
202
203
204
205
206
207
208
209
210
211
212
213
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
234 output.length = ACPI_ALLOCATE_BUFFER;
235 output.pointer = NULL;
236
237
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
289
290
291
292
293
294
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
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
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
341
342
343
344
345
346
347
348
349
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, >f_length, >f_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
381
382
383
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
393 output.length = ACPI_ALLOCATE_BUFFER;
394 output.pointer = NULL;
395
396
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 kfree(output.pointer);
420 DEBPRINT("Run _GTM: error: "
421 "expected object type of ACPI_TYPE_BUFFER, "
422 "got 0x%x\n", out_obj->type);
423 return;
424 }
425
426 if (!out_obj->buffer.length || !out_obj->buffer.pointer ||
427 out_obj->buffer.length != sizeof(struct GTM_buffer)) {
428 kfree(output.pointer);
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 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
456
457
458
459
460
461
462
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
473
474
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
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
499
500
501
502
503
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
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
531
532
533
534
535
536
537
538
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
564
565
566
567 hwif->devices[0]->acpidata = &hwif->acpidata->master;
568 hwif->devices[1]->acpidata = &hwif->acpidata->slave;
569
570
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
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
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
600 ide_acpi_set_state(hwif, 1);
601
602
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}
611