58b72ad5382a0562fa782df9ad356ee8755310d7
[coreboot.git] / src / southbridge / amd / sb700 / sata.c
1 /*
2  * This file is part of the coreboot project.
3  *
4  * Copyright (C) 2010 Advanced Micro Devices, Inc.
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; version 2 of the License.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program; if not, write to the Free Software
17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
18  */
19
20 #include <console/console.h>
21 #include <device/device.h>
22 #include <delay.h>
23 #include <device/pci.h>
24 #include <device/pci_ids.h>
25 #include <device/pci_ops.h>
26 #include <arch/io.h>
27 #include "sb700.h"
28
29 static int sata_drive_detect(int portnum, u16 iobar)
30 {
31         u8 byte, byte2;
32         int i = 0;
33         outb(0xA0 + 0x10 * (portnum % 2), iobar + 0x6);
34         while (byte = inb(iobar + 0x6), byte2 = inb(iobar + 0x7),
35                 (byte != (0xA0 + 0x10 * (portnum % 2))) ||
36                 ((byte2 & 0x88) != 0)) {
37                 printk(BIOS_SPEW, "0x6=%x, 0x7=%x\n", byte, byte2);
38                 if (byte != (0xA0 + 0x10 * (portnum % 2))) {
39                         /* This will happen at the first iteration of this loop
40                          * if the first SATA port is unpopulated and the
41                          * second SATA port is poulated.
42                          */
43                         printk(BIOS_DEBUG, "drive no longer selected after %i ms, "
44                                 "retrying init\n", i * 10);
45                         return 1;
46                 } else
47                         printk(BIOS_SPEW, "drive detection not yet completed, "
48                                 "waiting...\n");
49                 mdelay(10);
50                 i++;
51         }
52         printk(BIOS_SPEW, "drive detection done after %i ms\n", i * 10);
53         return 0;
54 }
55
56 /* This function can be overloaded in mainboard.c */
57 void __attribute__((weak)) sb7xx_51xx_setup_sata_phys(struct device *dev)
58 {
59         /* RPR7.6.1 Program the PHY Global Control to 0x2C00 */
60         pci_write_config16(dev, 0x86, 0x2c00);
61
62         /* RPR7.6.2 SATA GENI PHY ports setting */
63         pci_write_config32(dev, 0x88, 0x01B48017);
64         pci_write_config32(dev, 0x8c, 0x01B48019);
65         pci_write_config32(dev, 0x90, 0x01B48016);
66         pci_write_config32(dev, 0x94, 0x01B48016);
67         pci_write_config32(dev, 0x98, 0x01B48016);
68         pci_write_config32(dev, 0x9C, 0x01B48016);
69
70         /* RPR7.6.3 SATA GEN II PHY port setting for port [0~5]. */
71         pci_write_config16(dev, 0xA0, 0xA09A);
72         pci_write_config16(dev, 0xA2, 0xA09F);
73         pci_write_config16(dev, 0xA4, 0xA07A);
74         pci_write_config16(dev, 0xA6, 0xA07A);
75         pci_write_config16(dev, 0xA8, 0xA07A);
76         pci_write_config16(dev, 0xAA, 0xA07A);
77 }
78
79 static void sata_init(struct device *dev)
80 {
81         u8 byte;
82         u16 word;
83         u32 dword;
84         u8 rev_id;
85         u32 sata_bar5;
86         u16 sata_bar0, sata_bar1, sata_bar2, sata_bar3, sata_bar4;
87         int i, j;
88
89         struct southbridge_ati_sb700_config *conf;
90         conf = dev->chip_info;
91
92         device_t sm_dev;
93         /* SATA SMBus Disable */
94         sm_dev = dev_find_slot(0, PCI_DEVFN(0x14, 0));
95
96         byte = pci_read_config8(sm_dev, 0xad);
97         /* Disable SATA SMBUS */
98         byte |= (1 << 0);
99         /* Enable SATA and power saving */
100         byte |= (1 << 1);
101         byte |= (1 << 5);
102         pci_write_config8(sm_dev, 0xad, byte);
103
104         /* RPR 7.2 SATA Initialization */
105         /* Set the interrupt Mapping to INTG# */
106         byte = pci_read_config8(sm_dev, 0xaf);
107         byte = 0x6 << 2;
108         pci_write_config8(sm_dev, 0xaf, byte);
109
110         /* get rev_id */
111         rev_id = pci_read_config8(sm_dev, 0x08) - 0x28;
112
113         /* get base address */
114         sata_bar5 = pci_read_config32(dev, 0x24) & ~0x3FF;
115         sata_bar0 = pci_read_config16(dev, 0x10) & ~0x7;
116         sata_bar1 = pci_read_config16(dev, 0x14) & ~0x3;
117         sata_bar2 = pci_read_config16(dev, 0x18) & ~0x7;
118         sata_bar3 = pci_read_config16(dev, 0x1C) & ~0x3;
119         sata_bar4 = pci_read_config16(dev, 0x20) & ~0xf;
120
121         printk(BIOS_SPEW, "sata_bar0=%x\n", sata_bar0); /* 3030 */
122         printk(BIOS_SPEW, "sata_bar1=%x\n", sata_bar1); /* 3070 */
123         printk(BIOS_SPEW, "sata_bar2=%x\n", sata_bar2); /* 3040 */
124         printk(BIOS_SPEW, "sata_bar3=%x\n", sata_bar3); /* 3080 */
125         printk(BIOS_SPEW, "sata_bar4=%x\n", sata_bar4); /* 3000 */
126         printk(BIOS_SPEW, "sata_bar5=%x\n", sata_bar5); /* e0309000 */
127
128         /* disable combined mode */
129         byte = pci_read_config8(sm_dev, 0xAD);
130         byte &= ~(1 << 3);
131         pci_write_config8(sm_dev, 0xAD, byte);
132         /* Program the 2C to 0x43801002 */
133         dword = 0x43801002;
134         pci_write_config32(dev, 0x2c, dword);
135
136         /* SERR-Enable */
137         word = pci_read_config16(dev, 0x04);
138         word |= (1 << 8);
139         pci_write_config16(dev, 0x04, word);
140
141         /* Dynamic power saving */
142         byte = pci_read_config8(dev, 0x40);
143         byte |= (1 << 2);
144         pci_write_config8(dev, 0x40, byte);
145
146         /* Set SATA Operation Mode, Set to IDE mode */
147         byte = pci_read_config8(dev, 0x40);
148         byte |= (1 << 0);
149         byte |= (1 << 4);
150         pci_write_config8(dev, 0x40, byte);
151
152         dword = 0x01018f00;
153         pci_write_config32(dev, 0x8, dword);
154
155         byte = pci_read_config8(dev, 0x40);
156         byte &= ~(1 << 0);
157         pci_write_config8(dev, 0x40, byte);
158
159         /* Enable the SATA watchdog counter */
160         byte = pci_read_config8(dev, 0x44);
161         byte |= (1 << 0);
162         pci_write_config8(dev, 0x44, byte);
163
164         /* Set bit 29 and 24 for A12 */
165         dword = pci_read_config32(dev, 0x40);
166         if (rev_id < 0x14)      /* before A12 */
167                 dword |= (1 << 29);
168         else
169                 dword &= ~(1 << 29); /* A14 and above */
170         pci_write_config32(dev, 0x40, dword);
171
172         /* set bit 21 for A12 */
173         dword = pci_read_config32(dev, 0x48);
174         if (rev_id < 0x14)      /* before A12 */
175                 dword |= 1 << 24 | 1 << 21;
176         else {
177                 dword &= ~(1 << 24 | 1 << 21); /* A14 and above */
178                 dword &= ~0xFF80; /* 15:7 */
179                 dword |= 1 << 15 | 0x7F << 7;
180         }
181         pci_write_config32(dev, 0x48, dword);
182
183         /* Program the watchdog counter to 0x10 */
184         byte = 0x10;
185         pci_write_config8(dev, 0x46, byte);
186         sb7xx_51xx_setup_sata_phys(dev);
187         /* Enable the I/O, MM, BusMaster access for SATA */
188         byte = pci_read_config8(dev, 0x4);
189         byte |= 7 << 0;
190         pci_write_config8(dev, 0x4, byte);
191
192 #if CONFIG_SOUTHBRIDGE_AMD_SP5100
193         /* Master Latency Timer */
194         pci_write_config32(dev, 0xC, 0x00004000);
195 #endif
196
197         /* RPR7.7 SATA drive detection. */
198         /* Use BAR5+0x128,BAR0 for Primary Slave */
199         /* Use BAR5+0x1A8,BAR0 for Primary Slave */
200         /* Use BAR5+0x228,BAR2 for Secondary Master */
201         /* Use BAR5+0x2A8,BAR2 for Secondary Slave */
202         /* Use BAR5+0x328,PATA_BAR0/2 for Primary/Secondary master emulation */
203         /* Use BAR5+0x3A8,PATA_BAR0/2 for Primary/Secondary Slave emulation */
204
205         /* TODO: port 4,5, which are PATA emulations. What are PATA_BARs? */
206
207         for (i = 0; i < 4; i++) {
208                 byte = read8(sata_bar5 + 0x128 + 0x80 * i);
209                 printk(BIOS_SPEW, "SATA port %i status = %x\n", i, byte);
210                 byte &= 0xF;
211                 if( byte == 0x1 ) {
212                         /* If the drive status is 0x1 then we see it but we aren't talking to it. */
213                         /* Try to do something about it. */
214                         printk(BIOS_SPEW, "SATA device detected but not talking. Trying lower speed.\n");
215
216                         /* Read in Port-N Serial ATA Control Register */
217                         byte = read8(sata_bar5 + 0x12C + 0x80 * i);
218
219                         /* Set Reset Bit and 1.5g bit */
220                         byte |= 0x11;
221                         write8((sata_bar5 + 0x12C + 0x80 * i), byte);
222
223                         /* Wait 1ms */
224                         mdelay(1);
225
226                         /* Clear Reset Bit */
227                         byte &= ~0x01;
228                         write8((sata_bar5 + 0x12C + 0x80 * i), byte);
229
230                         /* Wait 1ms */
231                         mdelay(1);
232
233                         /* Reread status */
234                         byte = read8(sata_bar5 + 0x128 + 0x80 * i);
235                         printk(BIOS_SPEW, "SATA port %i status = %x\n", i, byte);
236                         byte &= 0xF;
237                 }
238
239                 if (byte == 0x3) {
240                         for (j = 0; j < 10; j++) {
241                                 if (!sata_drive_detect(i, ((i / 2) == 0) ? sata_bar0 : sata_bar2))
242                                         break;
243                         }
244                         printk(BIOS_DEBUG, "%s %s device is %sready after %i tries\n",
245                                         (i / 2) ? "Secondary" : "Primary",
246                                         (i % 2 ) ? "Slave" : "Master",
247                                         (j == 10) ? "not " : "",
248                                         (j == 10) ? j : j + 1);
249                 } else {
250                         printk(BIOS_DEBUG, "No %s %s SATA drive on Slot%i\n",
251                                         (i / 2) ? "Secondary" : "Primary",
252                                         (i % 2 ) ? "Slave" : "Master", i);
253                 }
254         }
255
256         /* Below is CIM InitSataLateFar */
257         /* Enable interrupts from the HBA  */
258         byte = read8(sata_bar5 + 0x4);
259         byte |= 1 << 1;
260         write8((sata_bar5 + 0x4), byte);
261
262         /* Clear error status */
263         write32((sata_bar5 + 0x130), 0xFFFFFFFF);
264         write32((sata_bar5 + 0x1b0), 0xFFFFFFFF);
265         write32((sata_bar5 + 0x230), 0xFFFFFFFF);
266         write32((sata_bar5 + 0x2b0), 0xFFFFFFFF);
267         write32((sata_bar5 + 0x330), 0xFFFFFFFF);
268         write32((sata_bar5 + 0x3b0), 0xFFFFFFFF);
269
270         /* Clear SATA status,Firstly we get the AcpiGpe0BlkAddr */
271         /* ????? why CIM does not set the AcpiGpe0BlkAddr , but use it??? */
272
273         /* word = 0x0000; */
274         /* word = pm_ioread(0x28); */
275         /* byte = pm_ioread(0x29); */
276         /* word |= byte<<8; */
277         /* printk(BIOS_DEBUG, "AcpiGpe0Blk addr = %x\n", word); */
278         /* write32(word, 0x80000000); */
279 }
280
281 static struct pci_operations lops_pci = {
282         .set_subsystem = pci_dev_set_subsystem,
283 };
284
285 static struct device_operations sata_ops = {
286         .read_resources = pci_dev_read_resources,
287         .set_resources = pci_dev_set_resources,
288         .enable_resources = pci_dev_enable_resources,
289         .init = sata_init,
290         .scan_bus = 0,
291         .ops_pci = &lops_pci,
292 };
293
294 static const struct pci_driver sata0_driver __pci_driver = {
295         .ops = &sata_ops,
296         .vendor = PCI_VENDOR_ID_ATI,
297         .device = PCI_DEVICE_ID_ATI_SB700_SATA,
298 };