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 <acpi/acpi.h>
16#include <linux/ide.h>
17#include <linux/pci.h>
18#include <linux/dmi.h>
19
20#include <acpi/acpi_bus.h>
21#include <acpi/acnames.h>
22#include <acpi/acnamesp.h>
23#include <acpi/acparser.h>
24#include <acpi/acexcep.h>
25#include <acpi/acmacros.h>
26#include <acpi/actypes.h>
27
28#define REGS_PER_GTF 7
29struct taskfile_array {
30 u8 tfa[REGS_PER_GTF];
31};
32
33struct GTM_buffer {
34 u32 PIO_speed0;
35 u32 DMA_speed0;
36 u32 PIO_speed1;
37 u32 DMA_speed1;
38 u32 GTM_flags;
39};
40
41struct ide_acpi_drive_link {
42 acpi_handle obj_handle;
43 u8 idbuff[512];
44};
45
46struct ide_acpi_hwif_link {
47 ide_hwif_t *hwif;
48 acpi_handle obj_handle;
49 struct GTM_buffer gtm;
50 struct ide_acpi_drive_link master;
51 struct ide_acpi_drive_link slave;
52};
53
54#undef DEBUGGING
55
56#ifdef DEBUGGING
57#define DEBPRINT(fmt, args...) \
58 printk(KERN_DEBUG "%s: " fmt, __func__, ## args)
59#else
60#define DEBPRINT(fmt, args...) do {} while (0)
61#endif
62
63static int ide_noacpi;
64module_param_named(noacpi, ide_noacpi, bool, 0);
65MODULE_PARM_DESC(noacpi, "disable IDE ACPI support");
66
67static int ide_acpigtf;
68module_param_named(acpigtf, ide_acpigtf, bool, 0);
69MODULE_PARM_DESC(acpigtf, "enable IDE ACPI _GTF support");
70
71static int ide_acpionboot;
72module_param_named(acpionboot, ide_acpionboot, bool, 0);
73MODULE_PARM_DESC(acpionboot, "call IDE ACPI methods on boot");
74
75static bool ide_noacpi_psx;
76static int no_acpi_psx(const struct dmi_system_id *id)
77{
78 ide_noacpi_psx = true;
79 printk(KERN_NOTICE"%s detected - disable ACPI _PSx.\n", id->ident);
80 return 0;
81}
82
83static const struct dmi_system_id ide_acpi_dmi_table[] = {
84
85
86 {
87 .callback = no_acpi_psx,
88 .ident = "HP nx9005",
89 .matches = {
90 DMI_MATCH(DMI_BIOS_VENDOR, "Phoenix Technologies Ltd."),
91 DMI_MATCH(DMI_BIOS_VERSION, "KAM1.60")
92 },
93 },
94
95 { }
96};
97
98static int ide_acpi_blacklist(void)
99{
100 static int done;
101 if (done)
102 return 0;
103 done = 1;
104 dmi_check_system(ide_acpi_dmi_table);
105 return 0;
106}
107
108
109
110
111
112
113
114
115
116
117
118static int ide_get_dev_handle(struct device *dev, acpi_handle *handle,
119 acpi_integer *pcidevfn)
120{
121 struct pci_dev *pdev = to_pci_dev(dev);
122 unsigned int bus, devnum, func;
123 acpi_integer addr;
124 acpi_handle dev_handle;
125 struct acpi_buffer buffer = {.length = ACPI_ALLOCATE_BUFFER,
126 .pointer = NULL};
127 acpi_status status;
128 struct acpi_device_info *dinfo = NULL;
129 int ret = -ENODEV;
130
131 bus = pdev->bus->number;
132 devnum = PCI_SLOT(pdev->devfn);
133 func = PCI_FUNC(pdev->devfn);
134
135 addr = (acpi_integer)(devnum << 16 | func);
136
137 DEBPRINT("ENTER: pci %02x:%02x.%01x\n", bus, devnum, func);
138
139 dev_handle = DEVICE_ACPI_HANDLE(dev);
140 if (!dev_handle) {
141 DEBPRINT("no acpi handle for device\n");
142 goto err;
143 }
144
145 status = acpi_get_object_info(dev_handle, &buffer);
146 if (ACPI_FAILURE(status)) {
147 DEBPRINT("get_object_info for device failed\n");
148 goto err;
149 }
150 dinfo = buffer.pointer;
151 if (dinfo && (dinfo->valid & ACPI_VALID_ADR) &&
152 dinfo->address == addr) {
153 *pcidevfn = addr;
154 *handle = dev_handle;
155 } else {
156 DEBPRINT("get_object_info for device has wrong "
157 " address: %llu, should be %u\n",
158 dinfo ? (unsigned long long)dinfo->address : -1ULL,
159 (unsigned int)addr);
160 goto err;
161 }
162
163 DEBPRINT("for dev=0x%x.%x, addr=0x%llx, *handle=0x%p\n",
164 devnum, func, (unsigned long long)addr, *handle);
165 ret = 0;
166err:
167 kfree(dinfo);
168 return ret;
169}
170
171
172
173
174
175
176
177
178
179static acpi_handle ide_acpi_hwif_get_handle(ide_hwif_t *hwif)
180{
181 struct device *dev = hwif->gendev.parent;
182 acpi_handle uninitialized_var(dev_handle);
183 acpi_integer pcidevfn;
184 acpi_handle chan_handle;
185 int err;
186
187 DEBPRINT("ENTER: device %s\n", hwif->name);
188
189 if (!dev) {
190 DEBPRINT("no PCI device for %s\n", hwif->name);
191 return NULL;
192 }
193
194 err = ide_get_dev_handle(dev, &dev_handle, &pcidevfn);
195 if (err < 0) {
196 DEBPRINT("ide_get_dev_handle failed (%d)\n", err);
197 return NULL;
198 }
199
200
201
202
203 chan_handle = acpi_get_child(dev_handle, hwif->channel);
204 DEBPRINT("chan adr=%d: handle=0x%p\n",
205 hwif->channel, chan_handle);
206
207 return chan_handle;
208}
209
210
211
212
213
214
215
216
217
218
219static acpi_handle ide_acpi_drive_get_handle(ide_drive_t *drive)
220{
221 ide_hwif_t *hwif = HWIF(drive);
222 int port;
223 acpi_handle drive_handle;
224
225 if (!hwif->acpidata)
226 return NULL;
227
228 if (!hwif->acpidata->obj_handle)
229 return NULL;
230
231 port = hwif->channel ? drive->dn - 2: drive->dn;
232
233 DEBPRINT("ENTER: %s at channel#: %d port#: %d\n",
234 drive->name, hwif->channel, port);
235
236
237
238 drive_handle = acpi_get_child(hwif->acpidata->obj_handle, port);
239 DEBPRINT("drive %s handle 0x%p\n", drive->name, drive_handle);
240
241 return drive_handle;
242}
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259static int do_drive_get_GTF(ide_drive_t *drive,
260 unsigned int *gtf_length, unsigned long *gtf_address,
261 unsigned long *obj_loc)
262{
263 acpi_status status;
264 struct acpi_buffer output;
265 union acpi_object *out_obj;
266 ide_hwif_t *hwif = HWIF(drive);
267 struct device *dev = hwif->gendev.parent;
268 int err = -ENODEV;
269 int port;
270
271 *gtf_length = 0;
272 *gtf_address = 0UL;
273 *obj_loc = 0UL;
274
275 if (ide_noacpi)
276 return 0;
277
278 if (!dev) {
279 DEBPRINT("no PCI device for %s\n", hwif->name);
280 goto out;
281 }
282
283 if (!hwif->acpidata) {
284 DEBPRINT("no ACPI data for %s\n", hwif->name);
285 goto out;
286 }
287
288 port = hwif->channel ? drive->dn - 2: drive->dn;
289
290 DEBPRINT("ENTER: %s at %s, port#: %d, hard_port#: %d\n",
291 hwif->name, dev->bus_id, port, hwif->channel);
292
293 if ((drive->dev_flags & IDE_DFLAG_PRESENT) == 0) {
294 DEBPRINT("%s drive %d:%d not present\n",
295 hwif->name, hwif->channel, port);
296 goto out;
297 }
298
299
300 if (!drive->acpidata->obj_handle) {
301 drive->acpidata->obj_handle = ide_acpi_drive_get_handle(drive);
302 if (!drive->acpidata->obj_handle) {
303 DEBPRINT("No ACPI object found for %s\n",
304 drive->name);
305 goto out;
306 }
307 }
308
309
310 output.length = ACPI_ALLOCATE_BUFFER;
311 output.pointer = NULL;
312
313
314 err = -EIO;
315 status = acpi_evaluate_object(drive->acpidata->obj_handle, "_GTF",
316 NULL, &output);
317 if (ACPI_FAILURE(status)) {
318 printk(KERN_DEBUG
319 "%s: Run _GTF error: status = 0x%x\n",
320 __func__, status);
321 goto out;
322 }
323
324 if (!output.length || !output.pointer) {
325 DEBPRINT("Run _GTF: "
326 "length or ptr is NULL (0x%llx, 0x%p)\n",
327 (unsigned long long)output.length,
328 output.pointer);
329 goto out;
330 }
331
332 out_obj = output.pointer;
333 if (out_obj->type != ACPI_TYPE_BUFFER) {
334 DEBPRINT("Run _GTF: error: "
335 "expected object type of ACPI_TYPE_BUFFER, "
336 "got 0x%x\n", out_obj->type);
337 err = -ENOENT;
338 kfree(output.pointer);
339 goto out;
340 }
341
342 if (!out_obj->buffer.length || !out_obj->buffer.pointer ||
343 out_obj->buffer.length % REGS_PER_GTF) {
344 printk(KERN_ERR
345 "%s: unexpected GTF length (%d) or addr (0x%p)\n",
346 __func__, out_obj->buffer.length,
347 out_obj->buffer.pointer);
348 err = -ENOENT;
349 kfree(output.pointer);
350 goto out;
351 }
352
353 *gtf_length = out_obj->buffer.length;
354 *gtf_address = (unsigned long)out_obj->buffer.pointer;
355 *obj_loc = (unsigned long)out_obj;
356 DEBPRINT("returning gtf_length=%d, gtf_address=0x%lx, obj_loc=0x%lx\n",
357 *gtf_length, *gtf_address, *obj_loc);
358 err = 0;
359out:
360 return err;
361}
362
363
364
365
366
367
368
369
370static int taskfile_load_raw(ide_drive_t *drive,
371 const struct taskfile_array *gtf)
372{
373 ide_task_t args;
374 int err = 0;
375
376 DEBPRINT("(0x1f1-1f7): hex: "
377 "%02x %02x %02x %02x %02x %02x %02x\n",
378 gtf->tfa[0], gtf->tfa[1], gtf->tfa[2],
379 gtf->tfa[3], gtf->tfa[4], gtf->tfa[5], gtf->tfa[6]);
380
381 memset(&args, 0, sizeof(ide_task_t));
382
383
384 memcpy(&args.tf_array[7], >f->tfa, 7);
385 args.tf_flags = IDE_TFLAG_TF | IDE_TFLAG_DEVICE;
386
387 if (!ide_acpigtf) {
388 DEBPRINT("_GTF execution disabled\n");
389 return err;
390 }
391
392 err = ide_no_data_taskfile(drive, &args);
393 if (err)
394 printk(KERN_ERR "%s: ide_no_data_taskfile failed: %u\n",
395 __func__, err);
396
397 return err;
398}
399
400
401
402
403
404
405
406
407
408
409static int do_drive_set_taskfiles(ide_drive_t *drive,
410 unsigned int gtf_length,
411 unsigned long gtf_address)
412{
413 int rc = -ENODEV, err;
414 int gtf_count = gtf_length / REGS_PER_GTF;
415 int ix;
416 struct taskfile_array *gtf;
417
418 if (ide_noacpi)
419 return 0;
420
421 DEBPRINT("ENTER: %s, hard_port#: %d\n", drive->name, drive->dn);
422
423 if ((drive->dev_flags & IDE_DFLAG_PRESENT) == 0)
424 goto out;
425
426 if (!gtf_count)
427 goto out;
428
429 DEBPRINT("total GTF bytes=%u (0x%x), gtf_count=%d, addr=0x%lx\n",
430 gtf_length, gtf_length, gtf_count, gtf_address);
431
432 if (gtf_length % REGS_PER_GTF) {
433 printk(KERN_ERR "%s: unexpected GTF length (%d)\n",
434 __func__, gtf_length);
435 goto out;
436 }
437
438 rc = 0;
439 for (ix = 0; ix < gtf_count; ix++) {
440 gtf = (struct taskfile_array *)
441 (gtf_address + ix * REGS_PER_GTF);
442
443
444 err = taskfile_load_raw(drive, gtf);
445 if (err)
446 rc = err;
447 }
448
449out:
450 return rc;
451}
452
453
454
455
456
457
458
459
460
461
462
463
464
465int ide_acpi_exec_tfs(ide_drive_t *drive)
466{
467 int ret;
468 unsigned int gtf_length;
469 unsigned long gtf_address;
470 unsigned long obj_loc;
471
472 if (ide_noacpi)
473 return 0;
474
475 DEBPRINT("call get_GTF, drive=%s port=%d\n", drive->name, drive->dn);
476
477 ret = do_drive_get_GTF(drive, >f_length, >f_address, &obj_loc);
478 if (ret < 0) {
479 DEBPRINT("get_GTF error (%d)\n", ret);
480 return ret;
481 }
482
483 DEBPRINT("call set_taskfiles, drive=%s\n", drive->name);
484
485 ret = do_drive_set_taskfiles(drive, gtf_length, gtf_address);
486 kfree((void *)obj_loc);
487 if (ret < 0) {
488 DEBPRINT("set_taskfiles error (%d)\n", ret);
489 }
490
491 DEBPRINT("ret=%d\n", ret);
492
493 return ret;
494}
495
496
497
498
499
500
501
502
503void ide_acpi_get_timing(ide_hwif_t *hwif)
504{
505 acpi_status status;
506 struct acpi_buffer output;
507 union acpi_object *out_obj;
508
509 if (ide_noacpi)
510 return;
511
512 DEBPRINT("ENTER:\n");
513
514 if (!hwif->acpidata) {
515 DEBPRINT("no ACPI data for %s\n", hwif->name);
516 return;
517 }
518
519
520 output.length = ACPI_ALLOCATE_BUFFER;
521 output.pointer = NULL;
522
523
524 status = acpi_evaluate_object(hwif->acpidata->obj_handle, "_GTM",
525 NULL, &output);
526
527 DEBPRINT("_GTM status: %d, outptr: 0x%p, outlen: 0x%llx\n",
528 status, output.pointer,
529 (unsigned long long)output.length);
530
531 if (ACPI_FAILURE(status)) {
532 DEBPRINT("Run _GTM error: status = 0x%x\n", status);
533 return;
534 }
535
536 if (!output.length || !output.pointer) {
537 DEBPRINT("Run _GTM: length or ptr is NULL (0x%llx, 0x%p)\n",
538 (unsigned long long)output.length,
539 output.pointer);
540 kfree(output.pointer);
541 return;
542 }
543
544 out_obj = output.pointer;
545 if (out_obj->type != ACPI_TYPE_BUFFER) {
546 kfree(output.pointer);
547 DEBPRINT("Run _GTM: error: "
548 "expected object type of ACPI_TYPE_BUFFER, "
549 "got 0x%x\n", out_obj->type);
550 return;
551 }
552
553 if (!out_obj->buffer.length || !out_obj->buffer.pointer ||
554 out_obj->buffer.length != sizeof(struct GTM_buffer)) {
555 kfree(output.pointer);
556 printk(KERN_ERR
557 "%s: unexpected _GTM length (0x%x)[should be 0x%zx] or "
558 "addr (0x%p)\n",
559 __func__, out_obj->buffer.length,
560 sizeof(struct GTM_buffer), out_obj->buffer.pointer);
561 return;
562 }
563
564 memcpy(&hwif->acpidata->gtm, out_obj->buffer.pointer,
565 sizeof(struct GTM_buffer));
566
567 DEBPRINT("_GTM info: ptr: 0x%p, len: 0x%x, exp.len: 0x%Zx\n",
568 out_obj->buffer.pointer, out_obj->buffer.length,
569 sizeof(struct GTM_buffer));
570
571 DEBPRINT("_GTM fields: 0x%x, 0x%x, 0x%x, 0x%x, 0x%x\n",
572 hwif->acpidata->gtm.PIO_speed0,
573 hwif->acpidata->gtm.DMA_speed0,
574 hwif->acpidata->gtm.PIO_speed1,
575 hwif->acpidata->gtm.DMA_speed1,
576 hwif->acpidata->gtm.GTM_flags);
577
578 kfree(output.pointer);
579}
580
581
582
583
584
585
586
587
588
589
590
591void ide_acpi_push_timing(ide_hwif_t *hwif)
592{
593 acpi_status status;
594 struct acpi_object_list input;
595 union acpi_object in_params[3];
596 struct ide_acpi_drive_link *master = &hwif->acpidata->master;
597 struct ide_acpi_drive_link *slave = &hwif->acpidata->slave;
598
599 if (ide_noacpi)
600 return;
601
602 DEBPRINT("ENTER:\n");
603
604 if (!hwif->acpidata) {
605 DEBPRINT("no ACPI data for %s\n", hwif->name);
606 return;
607 }
608
609
610
611
612 input.count = 3;
613 input.pointer = in_params;
614 in_params[0].type = ACPI_TYPE_BUFFER;
615 in_params[0].buffer.length = sizeof(struct GTM_buffer);
616 in_params[0].buffer.pointer = (u8 *)&hwif->acpidata->gtm;
617 in_params[1].type = ACPI_TYPE_BUFFER;
618 in_params[1].buffer.length = sizeof(ATA_ID_WORDS * 2);
619 in_params[1].buffer.pointer = (u8 *)&master->idbuff;
620 in_params[2].type = ACPI_TYPE_BUFFER;
621 in_params[2].buffer.length = sizeof(ATA_ID_WORDS * 2);
622 in_params[2].buffer.pointer = (u8 *)&slave->idbuff;
623
624
625 status = acpi_evaluate_object(hwif->acpidata->obj_handle, "_STM",
626 &input, NULL);
627
628 if (ACPI_FAILURE(status)) {
629 DEBPRINT("Run _STM error: status = 0x%x\n", status);
630 }
631 DEBPRINT("_STM status: %d\n", status);
632}
633
634
635
636
637
638
639
640
641
642void ide_acpi_set_state(ide_hwif_t *hwif, int on)
643{
644 int unit;
645
646 if (ide_noacpi || ide_noacpi_psx)
647 return;
648
649 DEBPRINT("ENTER:\n");
650
651 if (!hwif->acpidata) {
652 DEBPRINT("no ACPI data for %s\n", hwif->name);
653 return;
654 }
655
656 if (on)
657 acpi_bus_set_power(hwif->acpidata->obj_handle, ACPI_STATE_D0);
658 for (unit = 0; unit < MAX_DRIVES; ++unit) {
659 ide_drive_t *drive = &hwif->drives[unit];
660
661 if (!drive->acpidata->obj_handle)
662 drive->acpidata->obj_handle = ide_acpi_drive_get_handle(drive);
663
664 if (drive->acpidata->obj_handle &&
665 (drive->dev_flags & IDE_DFLAG_PRESENT)) {
666 acpi_bus_set_power(drive->acpidata->obj_handle,
667 on? ACPI_STATE_D0: ACPI_STATE_D3);
668 }
669 }
670 if (!on)
671 acpi_bus_set_power(hwif->acpidata->obj_handle, ACPI_STATE_D3);
672}
673
674
675
676
677
678
679
680
681
682
683
684
685void ide_acpi_init(ide_hwif_t *hwif)
686{
687 ide_acpi_blacklist();
688
689 hwif->acpidata = kzalloc(sizeof(struct ide_acpi_hwif_link), GFP_KERNEL);
690 if (!hwif->acpidata)
691 return;
692
693 hwif->acpidata->obj_handle = ide_acpi_hwif_get_handle(hwif);
694 if (!hwif->acpidata->obj_handle) {
695 DEBPRINT("no ACPI object for %s found\n", hwif->name);
696 kfree(hwif->acpidata);
697 hwif->acpidata = NULL;
698 }
699}
700
701void ide_acpi_port_init_devices(ide_hwif_t *hwif)
702{
703 ide_drive_t *drive;
704 int i, err;
705
706 if (hwif->acpidata == NULL)
707 return;
708
709
710
711
712
713
714 hwif->drives[0].acpidata = &hwif->acpidata->master;
715 hwif->drives[1].acpidata = &hwif->acpidata->slave;
716
717
718
719
720 for (i = 0; i < MAX_DRIVES; i++) {
721 drive = &hwif->drives[i];
722
723 memset(drive->acpidata, 0, sizeof(*drive->acpidata));
724
725 if ((drive->dev_flags & IDE_DFLAG_PRESENT) == 0)
726 continue;
727
728 err = taskfile_lib_get_identify(drive, drive->acpidata->idbuff);
729 if (err)
730 DEBPRINT("identify device %s failed (%d)\n",
731 drive->name, err);
732 }
733
734 if (!ide_acpionboot) {
735 DEBPRINT("ACPI methods disabled on boot\n");
736 return;
737 }
738
739
740 ide_acpi_set_state(hwif, 1);
741
742
743
744 ide_acpi_get_timing(hwif);
745 ide_acpi_push_timing(hwif);
746
747 for (i = 0; i < MAX_DRIVES; i++) {
748 drive = &hwif->drives[i];
749
750 if (drive->dev_flags & IDE_DFLAG_PRESENT)
751
752 ide_acpi_exec_tfs(drive);
753 }
754}
755