]> err.no Git - linux-2.6/blob - drivers/ata/sata_promise.c
sata_promise: make pdc_atapi_pkt() use values from qc->tf
[linux-2.6] / drivers / ata / sata_promise.c
1 /*
2  *  sata_promise.c - Promise SATA
3  *
4  *  Maintained by:  Jeff Garzik <jgarzik@pobox.com>
5  *                  Mikael Pettersson <mikpe@it.uu.se>
6  *                  Please ALWAYS copy linux-ide@vger.kernel.org
7  *                  on emails.
8  *
9  *  Copyright 2003-2004 Red Hat, Inc.
10  *
11  *
12  *  This program is free software; you can redistribute it and/or modify
13  *  it under the terms of the GNU General Public License as published by
14  *  the Free Software Foundation; either version 2, or (at your option)
15  *  any later version.
16  *
17  *  This program is distributed in the hope that it will be useful,
18  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
19  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
20  *  GNU General Public License for more details.
21  *
22  *  You should have received a copy of the GNU General Public License
23  *  along with this program; see the file COPYING.  If not, write to
24  *  the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
25  *
26  *
27  *  libata documentation is available via 'make {ps|pdf}docs',
28  *  as Documentation/DocBook/libata.*
29  *
30  *  Hardware information only available under NDA.
31  *
32  */
33
34 #include <linux/kernel.h>
35 #include <linux/module.h>
36 #include <linux/pci.h>
37 #include <linux/init.h>
38 #include <linux/blkdev.h>
39 #include <linux/delay.h>
40 #include <linux/interrupt.h>
41 #include <linux/device.h>
42 #include <scsi/scsi.h>
43 #include <scsi/scsi_host.h>
44 #include <scsi/scsi_cmnd.h>
45 #include <linux/libata.h>
46 #include "sata_promise.h"
47
48 #define DRV_NAME        "sata_promise"
49 #define DRV_VERSION     "2.11"
50
51 enum {
52         PDC_MAX_PORTS           = 4,
53         PDC_MMIO_BAR            = 3,
54         PDC_MAX_PRD             = LIBATA_MAX_PRD - 1, /* -1 for ASIC PRD bug workaround */
55
56         /* register offsets */
57         PDC_FEATURE             = 0x04, /* Feature/Error reg (per port) */
58         PDC_SECTOR_COUNT        = 0x08, /* Sector count reg (per port) */
59         PDC_SECTOR_NUMBER       = 0x0C, /* Sector number reg (per port) */
60         PDC_CYLINDER_LOW        = 0x10, /* Cylinder low reg (per port) */
61         PDC_CYLINDER_HIGH       = 0x14, /* Cylinder high reg (per port) */
62         PDC_DEVICE              = 0x18, /* Device/Head reg (per port) */
63         PDC_COMMAND             = 0x1C, /* Command/status reg (per port) */
64         PDC_ALTSTATUS           = 0x38, /* Alternate-status/device-control reg (per port) */
65         PDC_PKT_SUBMIT          = 0x40, /* Command packet pointer addr */
66         PDC_INT_SEQMASK         = 0x40, /* Mask of asserted SEQ INTs */
67         PDC_FLASH_CTL           = 0x44, /* Flash control register */
68         PDC_GLOBAL_CTL          = 0x48, /* Global control/status (per port) */
69         PDC_CTLSTAT             = 0x60, /* IDE control and status (per port) */
70         PDC_SATA_PLUG_CSR       = 0x6C, /* SATA Plug control/status reg */
71         PDC2_SATA_PLUG_CSR      = 0x60, /* SATAII Plug control/status reg */
72         PDC_TBG_MODE            = 0x41C, /* TBG mode (not SATAII) */
73         PDC_SLEW_CTL            = 0x470, /* slew rate control reg (not SATAII) */
74
75         /* PDC_GLOBAL_CTL bit definitions */
76         PDC_PH_ERR              = (1 <<  8), /* PCI error while loading packet */
77         PDC_SH_ERR              = (1 <<  9), /* PCI error while loading S/G table */
78         PDC_DH_ERR              = (1 << 10), /* PCI error while loading data */
79         PDC2_HTO_ERR            = (1 << 12), /* host bus timeout */
80         PDC2_ATA_HBA_ERR        = (1 << 13), /* error during SATA DATA FIS transmission */
81         PDC2_ATA_DMA_CNT_ERR    = (1 << 14), /* DMA DATA FIS size differs from S/G count */
82         PDC_OVERRUN_ERR         = (1 << 19), /* S/G byte count larger than HD requires */
83         PDC_UNDERRUN_ERR        = (1 << 20), /* S/G byte count less than HD requires */
84         PDC_DRIVE_ERR           = (1 << 21), /* drive error */
85         PDC_PCI_SYS_ERR         = (1 << 22), /* PCI system error */
86         PDC1_PCI_PARITY_ERR     = (1 << 23), /* PCI parity error (from SATA150 driver) */
87         PDC1_ERR_MASK           = PDC1_PCI_PARITY_ERR,
88         PDC2_ERR_MASK           = PDC2_HTO_ERR | PDC2_ATA_HBA_ERR |
89                                   PDC2_ATA_DMA_CNT_ERR,
90         PDC_ERR_MASK            = PDC_PH_ERR | PDC_SH_ERR | PDC_DH_ERR |
91                                   PDC_OVERRUN_ERR | PDC_UNDERRUN_ERR |
92                                   PDC_DRIVE_ERR | PDC_PCI_SYS_ERR |
93                                   PDC1_ERR_MASK | PDC2_ERR_MASK,
94
95         board_2037x             = 0,    /* FastTrak S150 TX2plus */
96         board_2037x_pata        = 1,    /* FastTrak S150 TX2plus PATA port */
97         board_20319             = 2,    /* FastTrak S150 TX4 */
98         board_20619             = 3,    /* FastTrak TX4000 */
99         board_2057x             = 4,    /* SATAII150 Tx2plus */
100         board_2057x_pata        = 5,    /* SATAII150 Tx2plus PATA port */
101         board_40518             = 6,    /* SATAII150 Tx4 */
102
103         PDC_HAS_PATA            = (1 << 1), /* PDC20375/20575 has PATA */
104
105         /* Sequence counter control registers bit definitions */
106         PDC_SEQCNTRL_INT_MASK   = (1 << 5), /* Sequence Interrupt Mask */
107
108         /* Feature register values */
109         PDC_FEATURE_ATAPI_PIO   = 0x00, /* ATAPI data xfer by PIO */
110         PDC_FEATURE_ATAPI_DMA   = 0x01, /* ATAPI data xfer by DMA */
111
112         /* Device/Head register values */
113         PDC_DEVICE_SATA         = 0xE0, /* Device/Head value for SATA devices */
114
115         /* PDC_CTLSTAT bit definitions */
116         PDC_DMA_ENABLE          = (1 << 7),
117         PDC_IRQ_DISABLE         = (1 << 10),
118         PDC_RESET               = (1 << 11), /* HDMA reset */
119
120         PDC_COMMON_FLAGS        = ATA_FLAG_NO_LEGACY |
121                                   ATA_FLAG_MMIO |
122                                   ATA_FLAG_PIO_POLLING,
123
124         /* ap->flags bits */
125         PDC_FLAG_GEN_II         = (1 << 24),
126         PDC_FLAG_SATA_PATA      = (1 << 25), /* supports SATA + PATA */
127         PDC_FLAG_4_PORTS        = (1 << 26), /* 4 ports */
128 };
129
130 struct pdc_port_priv {
131         u8                      *pkt;
132         dma_addr_t              pkt_dma;
133 };
134
135 static int pdc_sata_scr_read(struct ata_port *ap, unsigned int sc_reg, u32 *val);
136 static int pdc_sata_scr_write(struct ata_port *ap, unsigned int sc_reg, u32 val);
137 static int pdc_ata_init_one (struct pci_dev *pdev, const struct pci_device_id *ent);
138 static int pdc_common_port_start(struct ata_port *ap);
139 static int pdc_sata_port_start(struct ata_port *ap);
140 static void pdc_qc_prep(struct ata_queued_cmd *qc);
141 static void pdc_tf_load_mmio(struct ata_port *ap, const struct ata_taskfile *tf);
142 static void pdc_exec_command_mmio(struct ata_port *ap, const struct ata_taskfile *tf);
143 static int pdc_check_atapi_dma(struct ata_queued_cmd *qc);
144 static int pdc_old_sata_check_atapi_dma(struct ata_queued_cmd *qc);
145 static void pdc_irq_clear(struct ata_port *ap);
146 static unsigned int pdc_qc_issue_prot(struct ata_queued_cmd *qc);
147 static void pdc_freeze(struct ata_port *ap);
148 static void pdc_thaw(struct ata_port *ap);
149 static void pdc_pata_error_handler(struct ata_port *ap);
150 static void pdc_sata_error_handler(struct ata_port *ap);
151 static void pdc_post_internal_cmd(struct ata_queued_cmd *qc);
152 static int pdc_pata_cable_detect(struct ata_port *ap);
153 static int pdc_sata_cable_detect(struct ata_port *ap);
154
155 static struct scsi_host_template pdc_ata_sht = {
156         .module                 = THIS_MODULE,
157         .name                   = DRV_NAME,
158         .ioctl                  = ata_scsi_ioctl,
159         .queuecommand           = ata_scsi_queuecmd,
160         .can_queue              = ATA_DEF_QUEUE,
161         .this_id                = ATA_SHT_THIS_ID,
162         .sg_tablesize           = PDC_MAX_PRD,
163         .cmd_per_lun            = ATA_SHT_CMD_PER_LUN,
164         .emulated               = ATA_SHT_EMULATED,
165         .use_clustering         = ATA_SHT_USE_CLUSTERING,
166         .proc_name              = DRV_NAME,
167         .dma_boundary           = ATA_DMA_BOUNDARY,
168         .slave_configure        = ata_scsi_slave_config,
169         .slave_destroy          = ata_scsi_slave_destroy,
170         .bios_param             = ata_std_bios_param,
171 };
172
173 static const struct ata_port_operations pdc_sata_ops = {
174         .tf_load                = pdc_tf_load_mmio,
175         .tf_read                = ata_tf_read,
176         .check_status           = ata_check_status,
177         .exec_command           = pdc_exec_command_mmio,
178         .dev_select             = ata_std_dev_select,
179         .check_atapi_dma        = pdc_check_atapi_dma,
180
181         .qc_prep                = pdc_qc_prep,
182         .qc_issue               = pdc_qc_issue_prot,
183         .freeze                 = pdc_freeze,
184         .thaw                   = pdc_thaw,
185         .error_handler          = pdc_sata_error_handler,
186         .post_internal_cmd      = pdc_post_internal_cmd,
187         .cable_detect           = pdc_sata_cable_detect,
188         .data_xfer              = ata_data_xfer,
189         .irq_clear              = pdc_irq_clear,
190         .irq_on                 = ata_irq_on,
191
192         .scr_read               = pdc_sata_scr_read,
193         .scr_write              = pdc_sata_scr_write,
194         .port_start             = pdc_sata_port_start,
195 };
196
197 /* First-generation chips need a more restrictive ->check_atapi_dma op */
198 static const struct ata_port_operations pdc_old_sata_ops = {
199         .tf_load                = pdc_tf_load_mmio,
200         .tf_read                = ata_tf_read,
201         .check_status           = ata_check_status,
202         .exec_command           = pdc_exec_command_mmio,
203         .dev_select             = ata_std_dev_select,
204         .check_atapi_dma        = pdc_old_sata_check_atapi_dma,
205
206         .qc_prep                = pdc_qc_prep,
207         .qc_issue               = pdc_qc_issue_prot,
208         .freeze                 = pdc_freeze,
209         .thaw                   = pdc_thaw,
210         .error_handler          = pdc_sata_error_handler,
211         .post_internal_cmd      = pdc_post_internal_cmd,
212         .cable_detect           = pdc_sata_cable_detect,
213         .data_xfer              = ata_data_xfer,
214         .irq_clear              = pdc_irq_clear,
215         .irq_on                 = ata_irq_on,
216
217         .scr_read               = pdc_sata_scr_read,
218         .scr_write              = pdc_sata_scr_write,
219         .port_start             = pdc_sata_port_start,
220 };
221
222 static const struct ata_port_operations pdc_pata_ops = {
223         .tf_load                = pdc_tf_load_mmio,
224         .tf_read                = ata_tf_read,
225         .check_status           = ata_check_status,
226         .exec_command           = pdc_exec_command_mmio,
227         .dev_select             = ata_std_dev_select,
228         .check_atapi_dma        = pdc_check_atapi_dma,
229
230         .qc_prep                = pdc_qc_prep,
231         .qc_issue               = pdc_qc_issue_prot,
232         .freeze                 = pdc_freeze,
233         .thaw                   = pdc_thaw,
234         .error_handler          = pdc_pata_error_handler,
235         .post_internal_cmd      = pdc_post_internal_cmd,
236         .cable_detect           = pdc_pata_cable_detect,
237         .data_xfer              = ata_data_xfer,
238         .irq_clear              = pdc_irq_clear,
239         .irq_on                 = ata_irq_on,
240
241         .port_start             = pdc_common_port_start,
242 };
243
244 static const struct ata_port_info pdc_port_info[] = {
245         [board_2037x] =
246         {
247                 .flags          = PDC_COMMON_FLAGS | ATA_FLAG_SATA |
248                                   PDC_FLAG_SATA_PATA,
249                 .pio_mask       = 0x1f, /* pio0-4 */
250                 .mwdma_mask     = 0x07, /* mwdma0-2 */
251                 .udma_mask      = ATA_UDMA6,
252                 .port_ops       = &pdc_old_sata_ops,
253         },
254
255         [board_2037x_pata] =
256         {
257                 .flags          = PDC_COMMON_FLAGS | ATA_FLAG_SLAVE_POSS,
258                 .pio_mask       = 0x1f, /* pio0-4 */
259                 .mwdma_mask     = 0x07, /* mwdma0-2 */
260                 .udma_mask      = ATA_UDMA6,
261                 .port_ops       = &pdc_pata_ops,
262         },
263
264         [board_20319] =
265         {
266                 .flags          = PDC_COMMON_FLAGS | ATA_FLAG_SATA |
267                                   PDC_FLAG_4_PORTS,
268                 .pio_mask       = 0x1f, /* pio0-4 */
269                 .mwdma_mask     = 0x07, /* mwdma0-2 */
270                 .udma_mask      = ATA_UDMA6,
271                 .port_ops       = &pdc_old_sata_ops,
272         },
273
274         [board_20619] =
275         {
276                 .flags          = PDC_COMMON_FLAGS | ATA_FLAG_SLAVE_POSS |
277                                   PDC_FLAG_4_PORTS,
278                 .pio_mask       = 0x1f, /* pio0-4 */
279                 .mwdma_mask     = 0x07, /* mwdma0-2 */
280                 .udma_mask      = ATA_UDMA6,
281                 .port_ops       = &pdc_pata_ops,
282         },
283
284         [board_2057x] =
285         {
286                 .flags          = PDC_COMMON_FLAGS | ATA_FLAG_SATA |
287                                   PDC_FLAG_GEN_II | PDC_FLAG_SATA_PATA,
288                 .pio_mask       = 0x1f, /* pio0-4 */
289                 .mwdma_mask     = 0x07, /* mwdma0-2 */
290                 .udma_mask      = ATA_UDMA6,
291                 .port_ops       = &pdc_sata_ops,
292         },
293
294         [board_2057x_pata] =
295         {
296                 .flags          = PDC_COMMON_FLAGS | ATA_FLAG_SLAVE_POSS |
297                                   PDC_FLAG_GEN_II,
298                 .pio_mask       = 0x1f, /* pio0-4 */
299                 .mwdma_mask     = 0x07, /* mwdma0-2 */
300                 .udma_mask      = ATA_UDMA6,
301                 .port_ops       = &pdc_pata_ops,
302         },
303
304         [board_40518] =
305         {
306                 .flags          = PDC_COMMON_FLAGS | ATA_FLAG_SATA |
307                                   PDC_FLAG_GEN_II | PDC_FLAG_4_PORTS,
308                 .pio_mask       = 0x1f, /* pio0-4 */
309                 .mwdma_mask     = 0x07, /* mwdma0-2 */
310                 .udma_mask      = ATA_UDMA6,
311                 .port_ops       = &pdc_sata_ops,
312         },
313 };
314
315 static const struct pci_device_id pdc_ata_pci_tbl[] = {
316         { PCI_VDEVICE(PROMISE, 0x3371), board_2037x },
317         { PCI_VDEVICE(PROMISE, 0x3373), board_2037x },
318         { PCI_VDEVICE(PROMISE, 0x3375), board_2037x },
319         { PCI_VDEVICE(PROMISE, 0x3376), board_2037x },
320         { PCI_VDEVICE(PROMISE, 0x3570), board_2057x },
321         { PCI_VDEVICE(PROMISE, 0x3571), board_2057x },
322         { PCI_VDEVICE(PROMISE, 0x3574), board_2057x },
323         { PCI_VDEVICE(PROMISE, 0x3577), board_2057x },
324         { PCI_VDEVICE(PROMISE, 0x3d73), board_2057x },
325         { PCI_VDEVICE(PROMISE, 0x3d75), board_2057x },
326
327         { PCI_VDEVICE(PROMISE, 0x3318), board_20319 },
328         { PCI_VDEVICE(PROMISE, 0x3319), board_20319 },
329         { PCI_VDEVICE(PROMISE, 0x3515), board_40518 },
330         { PCI_VDEVICE(PROMISE, 0x3519), board_40518 },
331         { PCI_VDEVICE(PROMISE, 0x3d17), board_40518 },
332         { PCI_VDEVICE(PROMISE, 0x3d18), board_40518 },
333
334         { PCI_VDEVICE(PROMISE, 0x6629), board_20619 },
335
336         { }     /* terminate list */
337 };
338
339 static struct pci_driver pdc_ata_pci_driver = {
340         .name                   = DRV_NAME,
341         .id_table               = pdc_ata_pci_tbl,
342         .probe                  = pdc_ata_init_one,
343         .remove                 = ata_pci_remove_one,
344 };
345
346 static int pdc_common_port_start(struct ata_port *ap)
347 {
348         struct device *dev = ap->host->dev;
349         struct pdc_port_priv *pp;
350         int rc;
351
352         rc = ata_port_start(ap);
353         if (rc)
354                 return rc;
355
356         pp = devm_kzalloc(dev, sizeof(*pp), GFP_KERNEL);
357         if (!pp)
358                 return -ENOMEM;
359
360         pp->pkt = dmam_alloc_coherent(dev, 128, &pp->pkt_dma, GFP_KERNEL);
361         if (!pp->pkt)
362                 return -ENOMEM;
363
364         ap->private_data = pp;
365
366         return 0;
367 }
368
369 static int pdc_sata_port_start(struct ata_port *ap)
370 {
371         int rc;
372
373         rc = pdc_common_port_start(ap);
374         if (rc)
375                 return rc;
376
377         /* fix up PHYMODE4 align timing */
378         if (ap->flags & PDC_FLAG_GEN_II) {
379                 void __iomem *mmio = ap->ioaddr.scr_addr;
380                 unsigned int tmp;
381
382                 tmp = readl(mmio + 0x014);
383                 tmp = (tmp & ~3) | 1;   /* set bits 1:0 = 0:1 */
384                 writel(tmp, mmio + 0x014);
385         }
386
387         return 0;
388 }
389
390 static void pdc_reset_port(struct ata_port *ap)
391 {
392         void __iomem *mmio = ap->ioaddr.cmd_addr + PDC_CTLSTAT;
393         unsigned int i;
394         u32 tmp;
395
396         for (i = 11; i > 0; i--) {
397                 tmp = readl(mmio);
398                 if (tmp & PDC_RESET)
399                         break;
400
401                 udelay(100);
402
403                 tmp |= PDC_RESET;
404                 writel(tmp, mmio);
405         }
406
407         tmp &= ~PDC_RESET;
408         writel(tmp, mmio);
409         readl(mmio);    /* flush */
410 }
411
412 static int pdc_pata_cable_detect(struct ata_port *ap)
413 {
414         u8 tmp;
415         void __iomem *mmio = ap->ioaddr.cmd_addr + PDC_CTLSTAT + 0x03;
416
417         tmp = readb(mmio);
418         if (tmp & 0x01)
419                 return ATA_CBL_PATA40;
420         return ATA_CBL_PATA80;
421 }
422
423 static int pdc_sata_cable_detect(struct ata_port *ap)
424 {
425         return ATA_CBL_SATA;
426 }
427
428 static int pdc_sata_scr_read(struct ata_port *ap, unsigned int sc_reg, u32 *val)
429 {
430         if (sc_reg > SCR_CONTROL)
431                 return -EINVAL;
432         *val = readl(ap->ioaddr.scr_addr + (sc_reg * 4));
433         return 0;
434 }
435
436 static int pdc_sata_scr_write(struct ata_port *ap, unsigned int sc_reg, u32 val)
437 {
438         if (sc_reg > SCR_CONTROL)
439                 return -EINVAL;
440         writel(val, ap->ioaddr.scr_addr + (sc_reg * 4));
441         return 0;
442 }
443
444 static void pdc_atapi_pkt(struct ata_queued_cmd *qc)
445 {
446         struct ata_port *ap = qc->ap;
447         dma_addr_t sg_table = ap->prd_dma;
448         unsigned int cdb_len = qc->dev->cdb_len;
449         u8 *cdb = qc->cdb;
450         struct pdc_port_priv *pp = ap->private_data;
451         u8 *buf = pp->pkt;
452         u32 *buf32 = (u32 *) buf;
453         unsigned int dev_sel, feature;
454
455         /* set control bits (byte 0), zero delay seq id (byte 3),
456          * and seq id (byte 2)
457          */
458         switch (qc->tf.protocol) {
459         case ATA_PROT_ATAPI_DMA:
460                 if (!(qc->tf.flags & ATA_TFLAG_WRITE))
461                         buf32[0] = cpu_to_le32(PDC_PKT_READ);
462                 else
463                         buf32[0] = 0;
464                 break;
465         case ATA_PROT_ATAPI_NODATA:
466                 buf32[0] = cpu_to_le32(PDC_PKT_NODATA);
467                 break;
468         default:
469                 BUG();
470                 break;
471         }
472         buf32[1] = cpu_to_le32(sg_table);       /* S/G table addr */
473         buf32[2] = 0;                           /* no next-packet */
474
475         /* select drive */
476         if (sata_scr_valid(&ap->link))
477                 dev_sel = PDC_DEVICE_SATA;
478         else
479                 dev_sel = qc->tf.device;
480
481         buf[12] = (1 << 5) | ATA_REG_DEVICE;
482         buf[13] = dev_sel;
483         buf[14] = (1 << 5) | ATA_REG_DEVICE | PDC_PKT_CLEAR_BSY;
484         buf[15] = dev_sel; /* once more, waiting for BSY to clear */
485
486         buf[16] = (1 << 5) | ATA_REG_NSECT;
487         buf[17] = qc->tf.nsect;
488         buf[18] = (1 << 5) | ATA_REG_LBAL;
489         buf[19] = qc->tf.lbal;
490
491         /* set feature and byte counter registers */
492         if (qc->tf.protocol != ATA_PROT_ATAPI_DMA)
493                 feature = PDC_FEATURE_ATAPI_PIO;
494         else
495                 feature = PDC_FEATURE_ATAPI_DMA;
496
497         buf[20] = (1 << 5) | ATA_REG_FEATURE;
498         buf[21] = feature;
499         buf[22] = (1 << 5) | ATA_REG_BYTEL;
500         buf[23] = qc->tf.lbam;
501         buf[24] = (1 << 5) | ATA_REG_BYTEH;
502         buf[25] = qc->tf.lbah;
503
504         /* send ATAPI packet command 0xA0 */
505         buf[26] = (1 << 5) | ATA_REG_CMD;
506         buf[27] = qc->tf.command;
507
508         /* select drive and check DRQ */
509         buf[28] = (1 << 5) | ATA_REG_DEVICE | PDC_PKT_WAIT_DRDY;
510         buf[29] = dev_sel;
511
512         /* we can represent cdb lengths 2/4/6/8/10/12/14/16 */
513         BUG_ON(cdb_len & ~0x1E);
514
515         /* append the CDB as the final part */
516         buf[30] = (((cdb_len >> 1) & 7) << 5) | ATA_REG_DATA | PDC_LAST_REG;
517         memcpy(buf+31, cdb, cdb_len);
518 }
519
520 /**
521  *      pdc_fill_sg - Fill PCI IDE PRD table
522  *      @qc: Metadata associated with taskfile to be transferred
523  *
524  *      Fill PCI IDE PRD (scatter-gather) table with segments
525  *      associated with the current disk command.
526  *      Make sure hardware does not choke on it.
527  *
528  *      LOCKING:
529  *      spin_lock_irqsave(host lock)
530  *
531  */
532 static void pdc_fill_sg(struct ata_queued_cmd *qc)
533 {
534         struct ata_port *ap = qc->ap;
535         struct scatterlist *sg;
536         unsigned int idx;
537         const u32 SG_COUNT_ASIC_BUG = 41*4;
538
539         if (!(qc->flags & ATA_QCFLAG_DMAMAP))
540                 return;
541
542         WARN_ON(qc->__sg == NULL);
543         WARN_ON(qc->n_elem == 0 && qc->pad_len == 0);
544
545         idx = 0;
546         ata_for_each_sg(sg, qc) {
547                 u32 addr, offset;
548                 u32 sg_len, len;
549
550                 /* determine if physical DMA addr spans 64K boundary.
551                  * Note h/w doesn't support 64-bit, so we unconditionally
552                  * truncate dma_addr_t to u32.
553                  */
554                 addr = (u32) sg_dma_address(sg);
555                 sg_len = sg_dma_len(sg);
556
557                 while (sg_len) {
558                         offset = addr & 0xffff;
559                         len = sg_len;
560                         if ((offset + sg_len) > 0x10000)
561                                 len = 0x10000 - offset;
562
563                         ap->prd[idx].addr = cpu_to_le32(addr);
564                         ap->prd[idx].flags_len = cpu_to_le32(len & 0xffff);
565                         VPRINTK("PRD[%u] = (0x%X, 0x%X)\n", idx, addr, len);
566
567                         idx++;
568                         sg_len -= len;
569                         addr += len;
570                 }
571         }
572
573         if (idx) {
574                 u32 len = le32_to_cpu(ap->prd[idx - 1].flags_len);
575
576                 if (len > SG_COUNT_ASIC_BUG) {
577                         u32 addr;
578
579                         VPRINTK("Splitting last PRD.\n");
580
581                         addr = le32_to_cpu(ap->prd[idx - 1].addr);
582                         ap->prd[idx - 1].flags_len = cpu_to_le32(len - SG_COUNT_ASIC_BUG);
583                         VPRINTK("PRD[%u] = (0x%X, 0x%X)\n", idx - 1, addr, SG_COUNT_ASIC_BUG);
584
585                         addr = addr + len - SG_COUNT_ASIC_BUG;
586                         len = SG_COUNT_ASIC_BUG;
587                         ap->prd[idx].addr = cpu_to_le32(addr);
588                         ap->prd[idx].flags_len = cpu_to_le32(len);
589                         VPRINTK("PRD[%u] = (0x%X, 0x%X)\n", idx, addr, len);
590
591                         idx++;
592                 }
593
594                 ap->prd[idx - 1].flags_len |= cpu_to_le32(ATA_PRD_EOT);
595         }
596 }
597
598 static void pdc_qc_prep(struct ata_queued_cmd *qc)
599 {
600         struct pdc_port_priv *pp = qc->ap->private_data;
601         unsigned int i;
602
603         VPRINTK("ENTER\n");
604
605         switch (qc->tf.protocol) {
606         case ATA_PROT_DMA:
607                 pdc_fill_sg(qc);
608                 /* fall through */
609
610         case ATA_PROT_NODATA:
611                 i = pdc_pkt_header(&qc->tf, qc->ap->prd_dma,
612                                    qc->dev->devno, pp->pkt);
613
614                 if (qc->tf.flags & ATA_TFLAG_LBA48)
615                         i = pdc_prep_lba48(&qc->tf, pp->pkt, i);
616                 else
617                         i = pdc_prep_lba28(&qc->tf, pp->pkt, i);
618
619                 pdc_pkt_footer(&qc->tf, pp->pkt, i);
620                 break;
621
622         case ATA_PROT_ATAPI:
623                 pdc_fill_sg(qc);
624                 break;
625
626         case ATA_PROT_ATAPI_DMA:
627                 pdc_fill_sg(qc);
628                 /*FALLTHROUGH*/
629         case ATA_PROT_ATAPI_NODATA:
630                 pdc_atapi_pkt(qc);
631                 break;
632
633         default:
634                 break;
635         }
636 }
637
638 static void pdc_freeze(struct ata_port *ap)
639 {
640         void __iomem *mmio = ap->ioaddr.cmd_addr;
641         u32 tmp;
642
643         tmp = readl(mmio + PDC_CTLSTAT);
644         tmp |= PDC_IRQ_DISABLE;
645         tmp &= ~PDC_DMA_ENABLE;
646         writel(tmp, mmio + PDC_CTLSTAT);
647         readl(mmio + PDC_CTLSTAT); /* flush */
648 }
649
650 static void pdc_thaw(struct ata_port *ap)
651 {
652         void __iomem *mmio = ap->ioaddr.cmd_addr;
653         u32 tmp;
654
655         /* clear IRQ */
656         readl(mmio + PDC_INT_SEQMASK);
657
658         /* turn IRQ back on */
659         tmp = readl(mmio + PDC_CTLSTAT);
660         tmp &= ~PDC_IRQ_DISABLE;
661         writel(tmp, mmio + PDC_CTLSTAT);
662         readl(mmio + PDC_CTLSTAT); /* flush */
663 }
664
665 static void pdc_common_error_handler(struct ata_port *ap, ata_reset_fn_t hardreset)
666 {
667         if (!(ap->pflags & ATA_PFLAG_FROZEN))
668                 pdc_reset_port(ap);
669
670         /* perform recovery */
671         ata_do_eh(ap, ata_std_prereset, ata_std_softreset, hardreset,
672                   ata_std_postreset);
673 }
674
675 static void pdc_pata_error_handler(struct ata_port *ap)
676 {
677         pdc_common_error_handler(ap, NULL);
678 }
679
680 static void pdc_sata_error_handler(struct ata_port *ap)
681 {
682         pdc_common_error_handler(ap, sata_std_hardreset);
683 }
684
685 static void pdc_post_internal_cmd(struct ata_queued_cmd *qc)
686 {
687         struct ata_port *ap = qc->ap;
688
689         /* make DMA engine forget about the failed command */
690         if (qc->flags & ATA_QCFLAG_FAILED)
691                 pdc_reset_port(ap);
692 }
693
694 static void pdc_error_intr(struct ata_port *ap, struct ata_queued_cmd *qc,
695                            u32 port_status, u32 err_mask)
696 {
697         struct ata_eh_info *ehi = &ap->link.eh_info;
698         unsigned int ac_err_mask = 0;
699
700         ata_ehi_clear_desc(ehi);
701         ata_ehi_push_desc(ehi, "port_status 0x%08x", port_status);
702         port_status &= err_mask;
703
704         if (port_status & PDC_DRIVE_ERR)
705                 ac_err_mask |= AC_ERR_DEV;
706         if (port_status & (PDC_OVERRUN_ERR | PDC_UNDERRUN_ERR))
707                 ac_err_mask |= AC_ERR_HSM;
708         if (port_status & (PDC2_ATA_HBA_ERR | PDC2_ATA_DMA_CNT_ERR))
709                 ac_err_mask |= AC_ERR_ATA_BUS;
710         if (port_status & (PDC_PH_ERR | PDC_SH_ERR | PDC_DH_ERR | PDC2_HTO_ERR
711                            | PDC_PCI_SYS_ERR | PDC1_PCI_PARITY_ERR))
712                 ac_err_mask |= AC_ERR_HOST_BUS;
713
714         if (sata_scr_valid(&ap->link)) {
715                 u32 serror;
716
717                 pdc_sata_scr_read(ap, SCR_ERROR, &serror);
718                 ehi->serror |= serror;
719         }
720
721         qc->err_mask |= ac_err_mask;
722
723         pdc_reset_port(ap);
724
725         ata_port_abort(ap);
726 }
727
728 static inline unsigned int pdc_host_intr(struct ata_port *ap,
729                                          struct ata_queued_cmd *qc)
730 {
731         unsigned int handled = 0;
732         void __iomem *port_mmio = ap->ioaddr.cmd_addr;
733         u32 port_status, err_mask;
734
735         err_mask = PDC_ERR_MASK;
736         if (ap->flags & PDC_FLAG_GEN_II)
737                 err_mask &= ~PDC1_ERR_MASK;
738         else
739                 err_mask &= ~PDC2_ERR_MASK;
740         port_status = readl(port_mmio + PDC_GLOBAL_CTL);
741         if (unlikely(port_status & err_mask)) {
742                 pdc_error_intr(ap, qc, port_status, err_mask);
743                 return 1;
744         }
745
746         switch (qc->tf.protocol) {
747         case ATA_PROT_DMA:
748         case ATA_PROT_NODATA:
749         case ATA_PROT_ATAPI_DMA:
750         case ATA_PROT_ATAPI_NODATA:
751                 qc->err_mask |= ac_err_mask(ata_wait_idle(ap));
752                 ata_qc_complete(qc);
753                 handled = 1;
754                 break;
755
756         default:
757                 ap->stats.idle_irq++;
758                 break;
759         }
760
761         return handled;
762 }
763
764 static void pdc_irq_clear(struct ata_port *ap)
765 {
766         struct ata_host *host = ap->host;
767         void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
768
769         readl(mmio + PDC_INT_SEQMASK);
770 }
771
772 static int pdc_is_sataii_tx4(unsigned long flags)
773 {
774         const unsigned long mask = PDC_FLAG_GEN_II | PDC_FLAG_4_PORTS;
775         return (flags & mask) == mask;
776 }
777
778 static unsigned int pdc_port_no_to_ata_no(unsigned int port_no,
779                                           int is_sataii_tx4)
780 {
781         static const unsigned char sataii_tx4_port_remap[4] = { 3, 1, 0, 2};
782         return is_sataii_tx4 ? sataii_tx4_port_remap[port_no] : port_no;
783 }
784
785 static irqreturn_t pdc_interrupt(int irq, void *dev_instance)
786 {
787         struct ata_host *host = dev_instance;
788         struct ata_port *ap;
789         u32 mask = 0;
790         unsigned int i, tmp;
791         unsigned int handled = 0;
792         void __iomem *mmio_base;
793         unsigned int hotplug_offset, ata_no;
794         u32 hotplug_status;
795         int is_sataii_tx4;
796
797         VPRINTK("ENTER\n");
798
799         if (!host || !host->iomap[PDC_MMIO_BAR]) {
800                 VPRINTK("QUICK EXIT\n");
801                 return IRQ_NONE;
802         }
803
804         mmio_base = host->iomap[PDC_MMIO_BAR];
805
806         /* read and clear hotplug flags for all ports */
807         if (host->ports[0]->flags & PDC_FLAG_GEN_II)
808                 hotplug_offset = PDC2_SATA_PLUG_CSR;
809         else
810                 hotplug_offset = PDC_SATA_PLUG_CSR;
811         hotplug_status = readl(mmio_base + hotplug_offset);
812         if (hotplug_status & 0xff)
813                 writel(hotplug_status | 0xff, mmio_base + hotplug_offset);
814         hotplug_status &= 0xff; /* clear uninteresting bits */
815
816         /* reading should also clear interrupts */
817         mask = readl(mmio_base + PDC_INT_SEQMASK);
818
819         if (mask == 0xffffffff && hotplug_status == 0) {
820                 VPRINTK("QUICK EXIT 2\n");
821                 return IRQ_NONE;
822         }
823
824         spin_lock(&host->lock);
825
826         mask &= 0xffff;         /* only 16 tags possible */
827         if (mask == 0 && hotplug_status == 0) {
828                 VPRINTK("QUICK EXIT 3\n");
829                 goto done_irq;
830         }
831
832         writel(mask, mmio_base + PDC_INT_SEQMASK);
833
834         is_sataii_tx4 = pdc_is_sataii_tx4(host->ports[0]->flags);
835
836         for (i = 0; i < host->n_ports; i++) {
837                 VPRINTK("port %u\n", i);
838                 ap = host->ports[i];
839
840                 /* check for a plug or unplug event */
841                 ata_no = pdc_port_no_to_ata_no(i, is_sataii_tx4);
842                 tmp = hotplug_status & (0x11 << ata_no);
843                 if (tmp && ap &&
844                     !(ap->flags & ATA_FLAG_DISABLED)) {
845                         struct ata_eh_info *ehi = &ap->link.eh_info;
846                         ata_ehi_clear_desc(ehi);
847                         ata_ehi_hotplugged(ehi);
848                         ata_ehi_push_desc(ehi, "hotplug_status %#x", tmp);
849                         ata_port_freeze(ap);
850                         ++handled;
851                         continue;
852                 }
853
854                 /* check for a packet interrupt */
855                 tmp = mask & (1 << (i + 1));
856                 if (tmp && ap &&
857                     !(ap->flags & ATA_FLAG_DISABLED)) {
858                         struct ata_queued_cmd *qc;
859
860                         qc = ata_qc_from_tag(ap, ap->link.active_tag);
861                         if (qc && (!(qc->tf.flags & ATA_TFLAG_POLLING)))
862                                 handled += pdc_host_intr(ap, qc);
863                 }
864         }
865
866         VPRINTK("EXIT\n");
867
868 done_irq:
869         spin_unlock(&host->lock);
870         return IRQ_RETVAL(handled);
871 }
872
873 static inline void pdc_packet_start(struct ata_queued_cmd *qc)
874 {
875         struct ata_port *ap = qc->ap;
876         struct pdc_port_priv *pp = ap->private_data;
877         void __iomem *mmio = ap->host->iomap[PDC_MMIO_BAR];
878         unsigned int port_no = ap->port_no;
879         u8 seq = (u8) (port_no + 1);
880
881         VPRINTK("ENTER, ap %p\n", ap);
882
883         writel(0x00000001, mmio + (seq * 4));
884         readl(mmio + (seq * 4));        /* flush */
885
886         pp->pkt[2] = seq;
887         wmb();                  /* flush PRD, pkt writes */
888         writel(pp->pkt_dma, ap->ioaddr.cmd_addr + PDC_PKT_SUBMIT);
889         readl(ap->ioaddr.cmd_addr + PDC_PKT_SUBMIT); /* flush */
890 }
891
892 static unsigned int pdc_qc_issue_prot(struct ata_queued_cmd *qc)
893 {
894         switch (qc->tf.protocol) {
895         case ATA_PROT_ATAPI_NODATA:
896                 if (qc->dev->flags & ATA_DFLAG_CDB_INTR)
897                         break;
898                 /*FALLTHROUGH*/
899         case ATA_PROT_NODATA:
900                 if (qc->tf.flags & ATA_TFLAG_POLLING)
901                         break;
902                 /*FALLTHROUGH*/
903         case ATA_PROT_ATAPI_DMA:
904         case ATA_PROT_DMA:
905                 pdc_packet_start(qc);
906                 return 0;
907
908         default:
909                 break;
910         }
911
912         return ata_qc_issue_prot(qc);
913 }
914
915 static void pdc_tf_load_mmio(struct ata_port *ap, const struct ata_taskfile *tf)
916 {
917         WARN_ON(tf->protocol == ATA_PROT_DMA ||
918                 tf->protocol == ATA_PROT_ATAPI_DMA);
919         ata_tf_load(ap, tf);
920 }
921
922 static void pdc_exec_command_mmio(struct ata_port *ap,
923                                   const struct ata_taskfile *tf)
924 {
925         WARN_ON(tf->protocol == ATA_PROT_DMA ||
926                 tf->protocol == ATA_PROT_ATAPI_DMA);
927         ata_exec_command(ap, tf);
928 }
929
930 static int pdc_check_atapi_dma(struct ata_queued_cmd *qc)
931 {
932         u8 *scsicmd = qc->scsicmd->cmnd;
933         int pio = 1; /* atapi dma off by default */
934
935         /* Whitelist commands that may use DMA. */
936         switch (scsicmd[0]) {
937         case WRITE_12:
938         case WRITE_10:
939         case WRITE_6:
940         case READ_12:
941         case READ_10:
942         case READ_6:
943         case 0xad: /* READ_DVD_STRUCTURE */
944         case 0xbe: /* READ_CD */
945                 pio = 0;
946         }
947         /* -45150 (FFFF4FA2) to -1 (FFFFFFFF) shall use PIO mode */
948         if (scsicmd[0] == WRITE_10) {
949                 unsigned int lba =
950                         (scsicmd[2] << 24) |
951                         (scsicmd[3] << 16) |
952                         (scsicmd[4] << 8) |
953                         scsicmd[5];
954                 if (lba >= 0xFFFF4FA2)
955                         pio = 1;
956         }
957         return pio;
958 }
959
960 static int pdc_old_sata_check_atapi_dma(struct ata_queued_cmd *qc)
961 {
962         /* First generation chips cannot use ATAPI DMA on SATA ports */
963         return 1;
964 }
965
966 static void pdc_ata_setup_port(struct ata_port *ap,
967                                void __iomem *base, void __iomem *scr_addr)
968 {
969         ap->ioaddr.cmd_addr             = base;
970         ap->ioaddr.data_addr            = base;
971         ap->ioaddr.feature_addr         =
972         ap->ioaddr.error_addr           = base + 0x4;
973         ap->ioaddr.nsect_addr           = base + 0x8;
974         ap->ioaddr.lbal_addr            = base + 0xc;
975         ap->ioaddr.lbam_addr            = base + 0x10;
976         ap->ioaddr.lbah_addr            = base + 0x14;
977         ap->ioaddr.device_addr          = base + 0x18;
978         ap->ioaddr.command_addr         =
979         ap->ioaddr.status_addr          = base + 0x1c;
980         ap->ioaddr.altstatus_addr       =
981         ap->ioaddr.ctl_addr             = base + 0x38;
982         ap->ioaddr.scr_addr             = scr_addr;
983 }
984
985 static void pdc_host_init(struct ata_host *host)
986 {
987         void __iomem *mmio = host->iomap[PDC_MMIO_BAR];
988         int is_gen2 = host->ports[0]->flags & PDC_FLAG_GEN_II;
989         int hotplug_offset;
990         u32 tmp;
991
992         if (is_gen2)
993                 hotplug_offset = PDC2_SATA_PLUG_CSR;
994         else
995                 hotplug_offset = PDC_SATA_PLUG_CSR;
996
997         /*
998          * Except for the hotplug stuff, this is voodoo from the
999          * Promise driver.  Label this entire section
1000          * "TODO: figure out why we do this"
1001          */
1002
1003         /* enable BMR_BURST, maybe change FIFO_SHD to 8 dwords */
1004         tmp = readl(mmio + PDC_FLASH_CTL);
1005         tmp |= 0x02000; /* bit 13 (enable bmr burst) */
1006         if (!is_gen2)
1007                 tmp |= 0x10000; /* bit 16 (fifo threshold at 8 dw) */
1008         writel(tmp, mmio + PDC_FLASH_CTL);
1009
1010         /* clear plug/unplug flags for all ports */
1011         tmp = readl(mmio + hotplug_offset);
1012         writel(tmp | 0xff, mmio + hotplug_offset);
1013
1014         /* unmask plug/unplug ints */
1015         tmp = readl(mmio + hotplug_offset);
1016         writel(tmp & ~0xff0000, mmio + hotplug_offset);
1017
1018         /* don't initialise TBG or SLEW on 2nd generation chips */
1019         if (is_gen2)
1020                 return;
1021
1022         /* reduce TBG clock to 133 Mhz. */
1023         tmp = readl(mmio + PDC_TBG_MODE);
1024         tmp &= ~0x30000; /* clear bit 17, 16*/
1025         tmp |= 0x10000;  /* set bit 17:16 = 0:1 */
1026         writel(tmp, mmio + PDC_TBG_MODE);
1027
1028         readl(mmio + PDC_TBG_MODE);     /* flush */
1029         msleep(10);
1030
1031         /* adjust slew rate control register. */
1032         tmp = readl(mmio + PDC_SLEW_CTL);
1033         tmp &= 0xFFFFF03F; /* clear bit 11 ~ 6 */
1034         tmp  |= 0x00000900; /* set bit 11-9 = 100b , bit 8-6 = 100 */
1035         writel(tmp, mmio + PDC_SLEW_CTL);
1036 }
1037
1038 static int pdc_ata_init_one(struct pci_dev *pdev,
1039                             const struct pci_device_id *ent)
1040 {
1041         static int printed_version;
1042         const struct ata_port_info *pi = &pdc_port_info[ent->driver_data];
1043         const struct ata_port_info *ppi[PDC_MAX_PORTS];
1044         struct ata_host *host;
1045         void __iomem *base;
1046         int n_ports, i, rc;
1047         int is_sataii_tx4;
1048
1049         if (!printed_version++)
1050                 dev_printk(KERN_DEBUG, &pdev->dev, "version " DRV_VERSION "\n");
1051
1052         /* enable and acquire resources */
1053         rc = pcim_enable_device(pdev);
1054         if (rc)
1055                 return rc;
1056
1057         rc = pcim_iomap_regions(pdev, 1 << PDC_MMIO_BAR, DRV_NAME);
1058         if (rc == -EBUSY)
1059                 pcim_pin_device(pdev);
1060         if (rc)
1061                 return rc;
1062         base = pcim_iomap_table(pdev)[PDC_MMIO_BAR];
1063
1064         /* determine port configuration and setup host */
1065         n_ports = 2;
1066         if (pi->flags & PDC_FLAG_4_PORTS)
1067                 n_ports = 4;
1068         for (i = 0; i < n_ports; i++)
1069                 ppi[i] = pi;
1070
1071         if (pi->flags & PDC_FLAG_SATA_PATA) {
1072                 u8 tmp = readb(base + PDC_FLASH_CTL+1);
1073                 if (!(tmp & 0x80))
1074                         ppi[n_ports++] = pi + 1;
1075         }
1076
1077         host = ata_host_alloc_pinfo(&pdev->dev, ppi, n_ports);
1078         if (!host) {
1079                 dev_printk(KERN_ERR, &pdev->dev, "failed to allocate host\n");
1080                 return -ENOMEM;
1081         }
1082         host->iomap = pcim_iomap_table(pdev);
1083
1084         is_sataii_tx4 = pdc_is_sataii_tx4(pi->flags);
1085         for (i = 0; i < host->n_ports; i++) {
1086                 struct ata_port *ap = host->ports[i];
1087                 unsigned int ata_no = pdc_port_no_to_ata_no(i, is_sataii_tx4);
1088                 unsigned int port_offset = 0x200 + ata_no * 0x80;
1089                 unsigned int scr_offset = 0x400 + ata_no * 0x100;
1090
1091                 pdc_ata_setup_port(ap, base + port_offset, base + scr_offset);
1092
1093                 ata_port_pbar_desc(ap, PDC_MMIO_BAR, -1, "mmio");
1094                 ata_port_pbar_desc(ap, PDC_MMIO_BAR, port_offset, "port");
1095         }
1096
1097         /* initialize adapter */
1098         pdc_host_init(host);
1099
1100         rc = pci_set_dma_mask(pdev, ATA_DMA_MASK);
1101         if (rc)
1102                 return rc;
1103         rc = pci_set_consistent_dma_mask(pdev, ATA_DMA_MASK);
1104         if (rc)
1105                 return rc;
1106
1107         /* start host, request IRQ and attach */
1108         pci_set_master(pdev);
1109         return ata_host_activate(host, pdev->irq, pdc_interrupt, IRQF_SHARED,
1110                                  &pdc_ata_sht);
1111 }
1112
1113 static int __init pdc_ata_init(void)
1114 {
1115         return pci_register_driver(&pdc_ata_pci_driver);
1116 }
1117
1118 static void __exit pdc_ata_exit(void)
1119 {
1120         pci_unregister_driver(&pdc_ata_pci_driver);
1121 }
1122
1123 MODULE_AUTHOR("Jeff Garzik");
1124 MODULE_DESCRIPTION("Promise ATA TX2/TX4/TX4000 low-level driver");
1125 MODULE_LICENSE("GPL");
1126 MODULE_DEVICE_TABLE(pci, pdc_ata_pci_tbl);
1127 MODULE_VERSION(DRV_VERSION);
1128
1129 module_init(pdc_ata_init);
1130 module_exit(pdc_ata_exit);