src/southbridge/amd/sb700/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 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 static void sata_init(struct device *dev)
  57 {
  58         u8 byte;
  59         u16 word;
  60         u32 dword;
  61         u8 rev_id;
  62         u8 *sata_bar5;
  63         u16 sata_bar0, sata_bar1, sata_bar2, sata_bar3, sata_bar4;
  64         int i, j;
  65
  66         struct southbridge_ati_sb700_config *conf;
  67         conf = dev->chip_info;
  68
  69         device_t sm_dev;
  70         /* SATA SMBus Disable */
  71         /* sm_dev = pci_locate_device(PCI_ID(0x1002, 0x4385), 0); */
  72         sm_dev = dev_find_slot(0, PCI_DEVFN(0x14, 0));
  73         /* Disable SATA SMBUS */
  74         byte = pci_read_config8(sm_dev, 0xad);
  75         byte |= (1 << 1);
  76         /* Enable SATA and power saving */
  77         byte = pci_read_config8(sm_dev, 0xad);
  78         byte |= (1 << 0);
  79         byte |= (1 << 5);
  80         pci_write_config8(sm_dev, 0xad, byte);
  81
  82         /* RPR 7.2 SATA Initialization */
  83         /* Set the interrupt Mapping to INTG# */
  84         byte = pci_read_config8(sm_dev, 0xaf);
  85         byte = 0x6 << 2;
  86         pci_write_config8(sm_dev, 0xaf, byte);
  87
  88         /* get rev_id */
  89         rev_id = pci_read_config8(sm_dev, 0x08) - 0x28;
  90
  91         /* get base addresss */
  92         sata_bar5 = (u8 *) (pci_read_config32(dev, 0x24) & ~0x3FF);
  93         sata_bar0 = pci_read_config16(dev, 0x10) & ~0x7;
  94         sata_bar1 = pci_read_config16(dev, 0x14) & ~0x3;
  95         sata_bar2 = pci_read_config16(dev, 0x18) & ~0x7;
  96         sata_bar3 = pci_read_config16(dev, 0x1C) & ~0x3;
  97         sata_bar4 = pci_read_config16(dev, 0x20) & ~0xf;
  98
  99         printk(BIOS_SPEW, "sata_bar0=%x\n", sata_bar0); /* 3030 */
 100         printk(BIOS_SPEW, "sata_bar1=%x\n", sata_bar1); /* 3070 */
 101         printk(BIOS_SPEW, "sata_bar2=%x\n", sata_bar2); /* 3040 */
 102         printk(BIOS_SPEW, "sata_bar3=%x\n", sata_bar3); /* 3080 */
 103         printk(BIOS_SPEW, "sata_bar4=%x\n", sata_bar4); /* 3000 */
 104         printk(BIOS_SPEW, "sata_bar5=%p\n", sata_bar5); /* e0309000 */
 105
 106         /* disable combined mode */
 107         byte = pci_read_config8(sm_dev, 0xAD);
 108         byte &= ~(1 << 3);
 109         pci_write_config8(sm_dev, 0xAD, byte);
 110         /* Program the 2C to 0x43801002 */
 111         dword = 0x43801002;
 112         pci_write_config32(dev, 0x2c, dword);
 113
 114         /* SERR-Enable */
 115         word = pci_read_config16(dev, 0x04);
 116         word |= (1 << 8);
 117         pci_write_config16(dev, 0x04, word);
 118
 119         /* Dynamic power saving */
 120         byte = pci_read_config8(dev, 0x40);
 121         byte |= (1 << 2);
 122         pci_write_config8(dev, 0x40, byte);
 123
 124         /* Set SATA Operation Mode, Set to IDE mode */
 125         byte = pci_read_config8(dev, 0x40);
 126         byte |= (1 << 0);
 127         byte |= (1 << 4);
 128         pci_write_config8(dev, 0x40, byte);
 129
 130         dword = 0x01018f00;
 131         pci_write_config32(dev, 0x8, dword);
 132
 133         byte = pci_read_config8(dev, 0x40);
 134         byte &= ~(1 << 0);
 135         pci_write_config8(dev, 0x40, byte);
 136
 137         /* Enable the SATA watchdog counter */
 138         byte = pci_read_config8(dev, 0x44);
 139         byte |= (1 << 0);
 140         pci_write_config8(dev, 0x44, byte);
 141
 142         /* Set bit 29 and 24 for A12 */
 143         dword = pci_read_config32(dev, 0x40);
 144         if (rev_id < 0x14)      /* before A12 */
 145                 dword |= (1 << 29);
 146         else
 147                 dword &= ~(1 << 29); /* A14 and above */
 148         pci_write_config32(dev, 0x40, dword);
 149
 150         /* set bit 21 for A12 */
 151         dword = pci_read_config32(dev, 0x48);
 152         if (rev_id < 0x14)      /* before A12 */
 153                 dword |= 1 << 24 | 1 << 21;
 154         else {
 155                 dword &= ~(1 << 24 | 1 << 21); /* A14 and above */
 156                 dword &= ~0xFF80; /* 15:7 */
 157                 dword |= 1 << 15 | 0x7F << 7;
 158         }
 159         pci_write_config32(dev, 0x48, dword);
 160
 161         /* Program the watchdog counter to 0x10 */
 162         byte = 0x10;
 163         pci_write_config8(dev, 0x46, byte);
 164
 165         /* RPR7.6.1 Program the PHY Global Control to 0x2C00 */
 166         word = 0x2c00;
 167         pci_write_config16(dev, 0x86, word);
 168
 169         /* RPR7.6.2 SATA GENI PHY ports setting */
 170         pci_write_config32(dev, 0x88, 0x01B48017);
 171         pci_write_config32(dev, 0x8c, 0x01B48019);
 172         pci_write_config32(dev, 0x90, 0x01B48016);
 173         pci_write_config32(dev, 0x94, 0x01B48016);
 174         pci_write_config32(dev, 0x98, 0x01B48016);
 175         pci_write_config32(dev, 0x9C, 0x01B48016);
 176
 177         /* RPR7.6.3 SATA GEN II PHY port setting for port [0~5]. */
 178         pci_write_config16(dev, 0xA0, 0xA09A);
 179         pci_write_config16(dev, 0xA2, 0xA09F);
 180         pci_write_config16(dev, 0xA4, 0xA07A);
 181         pci_write_config16(dev, 0xA6, 0xA07A);
 182         pci_write_config16(dev, 0xA8, 0xA07A);
 183         pci_write_config16(dev, 0xAA, 0xA07A);
 184
 185         /* Enable the I/O, MM, BusMaster access for SATA */
 186         byte = pci_read_config8(dev, 0x4);
 187         byte |= 7 << 0;
 188         pci_write_config8(dev, 0x4, byte);
 189
 190         /* RPR7.7 SATA drive detection. */
 191         /* Use BAR5+0x128,BAR0 for Primary Slave */
 192         /* Use BAR5+0x1A8,BAR0 for Primary Slave */
 193         /* Use BAR5+0x228,BAR2 for Secondary Master */
 194         /* Use BAR5+0x2A8,BAR2 for Secondary Slave */
 195         /* Use BAR5+0x328,PATA_BAR0/2 for Primary/Secondary master emulation */
 196         /* Use BAR5+0x3A8,PATA_BAR0/2 for Primary/Secondary Slave emulation */
 197
 198         /* TODO: port 4,5, which are PATA emulations. What are PATA_BARs? */
 199
 200         for (i = 0; i < 4; i++) {
 201                 byte = read8(sata_bar5 + 0x128 + 0x80 * i);
 202                 printk(BIOS_SPEW, "SATA port %i status = %x\n", i, byte);
 203                 byte &= 0xF;
 204                 if( byte == 0x1 ) {
 205                         /* If the drive status is 0x1 then we see it but we aren't talking to it. */
 206                         /* Try to do something about it. */
 207                         printk(BIOS_SPEW, "SATA device detected but not talking. Trying lower speed.\n");
 208
 209                         /* Read in Port-N Serial ATA Control Register */
 210                         byte = read8(sata_bar5 + 0x12C + 0x80 * i);
 211
 212                         /* Set Reset Bit and 1.5g bit */
 213                         byte |= 0x11;
 214                         write8((sata_bar5 + 0x12C + 0x80 * i), byte);
 215
 216                         /* Wait 1ms */
 217                         mdelay(1);
 218
 219                         /* Clear Reset Bit */
 220                         byte &= ~0x01;
 221                         write8((sata_bar5 + 0x12C + 0x80 * i), byte);
 222
 223                         /* Wait 1ms */
 224                         mdelay(1);
 225
 226                         /* Reread status */
 227                         byte = read8(sata_bar5 + 0x128 + 0x80 * i);
 228                         printk(BIOS_SPEW, "SATA port %i status = %x\n", i, byte);
 229                         byte &= 0xF;
 230                 }
 231
 232                 if (byte == 0x3) {
 233                         for (j = 0; j < 10; j++) {
 234                                 if (!sata_drive_detect(i, ((i / 2) == 0) ? sata_bar0 : sata_bar2))
 235                                         break;
 236                         }
 237                         printk(BIOS_DEBUG, "%s %s device is %sready after %i tries\n",
 238                                         (i / 2) ? "Secondary" : "Primary",
 239                                         (i % 2 ) ? "Slave" : "Master",
 240                                         (j == 10) ? "not " : "",
 241                                         (j == 10) ? j : j + 1);
 242                 } else {
 243                         printk(BIOS_DEBUG, "No %s %s SATA drive on Slot%i\n",
 244                                         (i / 2) ? "Secondary" : "Primary",
 245                                         (i % 2 ) ? "Slave" : "Master", i);
 246                 }
 247         }
 248
 249         /* Below is CIM InitSataLateFar */
 250         /* Enable interrupts from the HBA  */
 251         byte = read8(sata_bar5 + 0x4);
 252         byte |= 1 << 1;
 253         write8((sata_bar5 + 0x4), byte);
 254
 255         /* Clear error status */
 256         write32((sata_bar5 + 0x130), 0xFFFFFFFF);
 257         write32((sata_bar5 + 0x1b0), 0xFFFFFFFF);
 258         write32((sata_bar5 + 0x230), 0xFFFFFFFF);
 259         write32((sata_bar5 + 0x2b0), 0xFFFFFFFF);
 260         write32((sata_bar5 + 0x330), 0xFFFFFFFF);
 261         write32((sata_bar5 + 0x3b0), 0xFFFFFFFF);
 262
 263         /* Clear SATA status,Firstly we get the AcpiGpe0BlkAddr */
 264         /* ????? why CIM does not set the AcpiGpe0BlkAddr , but use it??? */
 265
 266         /* word = 0x0000; */
 267         /* word = pm_ioread(0x28); */
 268         /* byte = pm_ioread(0x29); */
 269         /* word |= byte<<8; */
 270         /* printk(BIOS_DEBUG, "AcpiGpe0Blk addr = %x\n", word); */
 271         /* write32(word, 0x80000000); */
 272 }
 273
 274 static struct pci_operations lops_pci = {
 275         /* .set_subsystem = pci_dev_set_subsystem, */
 276 };
 277
 278 static struct device_operations sata_ops = {
 279         .read_resources = pci_dev_read_resources,
 280         .set_resources = pci_dev_set_resources,
 281         .enable_resources = pci_dev_enable_resources,
 282         .init = sata_init,
 283         .scan_bus = 0,
 284         .ops_pci = &lops_pci,
 285 };
 286
 287 static const struct pci_driver sata0_driver __pci_driver = {
 288         .ops = &sata_ops,
 289         .vendor = PCI_VENDOR_ID_ATI,
 290         .device = PCI_DEVICE_ID_ATI_SB700_SATA,
 291 };