drivers/pci/host/pcie-designware.c

   1 /*
   2  * Synopsys Designware PCIe host controller driver
   3  *
   4  * Copyright (C) 2013 Samsung Electronics Co., Ltd.
   5  *              http://www.samsung.com
   6  *
   7  * Author: Jingoo Han <jg1.han@samsung.com>
   8  *
   9  * This program is free software; you can redistribute it and/or modify
  10  * it under the terms of the GNU General Public License version 2 as
  11  * published by the Free Software Foundation.
  12  */
  13
  14 #include <linux/irq.h>
  15 #include <linux/irqdomain.h>
  16 #include <linux/kernel.h>
  17 #include <linux/module.h>
  18 #include <linux/msi.h>
  19 #include <linux/of_address.h>
  20 #include <linux/of_pci.h>
  21 #include <linux/pci.h>
  22 #include <linux/pci_regs.h>
  23 #include <linux/platform_device.h>
  24 #include <linux/types.h>
  25
  26 #include "pcie-designware.h"
  27
  28 /* Synopsis specific PCIE configuration registers */
  29 #define PCIE_PORT_LINK_CONTROL          0x710
  30 #define PORT_LINK_MODE_MASK             (0x3f << 16)
  31 #define PORT_LINK_MODE_1_LANES          (0x1 << 16)
  32 #define PORT_LINK_MODE_2_LANES          (0x3 << 16)
  33 #define PORT_LINK_MODE_4_LANES          (0x7 << 16)
  34
  35 #define PCIE_LINK_WIDTH_SPEED_CONTROL   0x80C
  36 #define PORT_LOGIC_SPEED_CHANGE         (0x1 << 17)
  37 #define PORT_LOGIC_LINK_WIDTH_MASK      (0x1ff << 8)
  38 #define PORT_LOGIC_LINK_WIDTH_1_LANES   (0x1 << 8)
  39 #define PORT_LOGIC_LINK_WIDTH_2_LANES   (0x2 << 8)
  40 #define PORT_LOGIC_LINK_WIDTH_4_LANES   (0x4 << 8)
  41
  42 #define PCIE_MSI_ADDR_LO                0x820
  43 #define PCIE_MSI_ADDR_HI                0x824
  44 #define PCIE_MSI_INTR0_ENABLE           0x828
  45 #define PCIE_MSI_INTR0_MASK             0x82C
  46 #define PCIE_MSI_INTR0_STATUS           0x830
  47
  48 #define PCIE_ATU_VIEWPORT               0x900
  49 #define PCIE_ATU_REGION_INBOUND         (0x1 << 31)
  50 #define PCIE_ATU_REGION_OUTBOUND        (0x0 << 31)
  51 #define PCIE_ATU_REGION_INDEX1          (0x1 << 0)
  52 #define PCIE_ATU_REGION_INDEX0          (0x0 << 0)
  53 #define PCIE_ATU_CR1                    0x904
  54 #define PCIE_ATU_TYPE_MEM               (0x0 << 0)
  55 #define PCIE_ATU_TYPE_IO                (0x2 << 0)
  56 #define PCIE_ATU_TYPE_CFG0              (0x4 << 0)
  57 #define PCIE_ATU_TYPE_CFG1              (0x5 << 0)
  58 #define PCIE_ATU_CR2                    0x908
  59 #define PCIE_ATU_ENABLE                 (0x1 << 31)
  60 #define PCIE_ATU_BAR_MODE_ENABLE        (0x1 << 30)
  61 #define PCIE_ATU_LOWER_BASE             0x90C
  62 #define PCIE_ATU_UPPER_BASE             0x910
  63 #define PCIE_ATU_LIMIT                  0x914
  64 #define PCIE_ATU_LOWER_TARGET           0x918
  65 #define PCIE_ATU_BUS(x)                 (((x) & 0xff) << 24)
  66 #define PCIE_ATU_DEV(x)                 (((x) & 0x1f) << 19)
  67 #define PCIE_ATU_FUNC(x)                (((x) & 0x7) << 16)
  68 #define PCIE_ATU_UPPER_TARGET           0x91C
  69
  70 static struct hw_pci dw_pci;
  71
  72 static unsigned long global_io_offset;
  73
  74 static inline struct pcie_port *sys_to_pcie(struct pci_sys_data *sys)
  75 {
  76         BUG_ON(!sys->private_data);
  77
  78         return sys->private_data;
  79 }
  80
  81 int dw_pcie_cfg_read(void __iomem *addr, int where, int size, u32 *val)
  82 {
  83         *val = readl(addr);
  84
  85         if (size == 1)
  86                 *val = (*val >> (8 * (where & 3))) & 0xff;
  87         else if (size == 2)
  88                 *val = (*val >> (8 * (where & 3))) & 0xffff;
  89         else if (size != 4)
  90                 return PCIBIOS_BAD_REGISTER_NUMBER;
  91
  92         return PCIBIOS_SUCCESSFUL;
  93 }
  94
  95 int dw_pcie_cfg_write(void __iomem *addr, int where, int size, u32 val)
  96 {
  97         if (size == 4)
  98                 writel(val, addr);
  99         else if (size == 2)
 100                 writew(val, addr + (where & 2));
 101         else if (size == 1)
 102                 writeb(val, addr + (where & 3));
 103         else
 104                 return PCIBIOS_BAD_REGISTER_NUMBER;
 105
 106         return PCIBIOS_SUCCESSFUL;
 107 }
 108
 109 static inline void dw_pcie_readl_rc(struct pcie_port *pp, u32 reg, u32 *val)
 110 {
 111         if (pp->ops->readl_rc)
 112                 pp->ops->readl_rc(pp, pp->dbi_base + reg, val);
 113         else
 114                 *val = readl(pp->dbi_base + reg);
 115 }
 116
 117 static inline void dw_pcie_writel_rc(struct pcie_port *pp, u32 val, u32 reg)
 118 {
 119         if (pp->ops->writel_rc)
 120                 pp->ops->writel_rc(pp, val, pp->dbi_base + reg);
 121         else
 122                 writel(val, pp->dbi_base + reg);
 123 }
 124
 125 static int dw_pcie_rd_own_conf(struct pcie_port *pp, int where, int size,
 126                                u32 *val)
 127 {
 128         int ret;
 129
 130         if (pp->ops->rd_own_conf)
 131                 ret = pp->ops->rd_own_conf(pp, where, size, val);
 132         else
 133                 ret = dw_pcie_cfg_read(pp->dbi_base + (where & ~0x3), where,
 134                                 size, val);
 135
 136         return ret;
 137 }
 138
 139 static int dw_pcie_wr_own_conf(struct pcie_port *pp, int where, int size,
 140                                u32 val)
 141 {
 142         int ret;
 143
 144         if (pp->ops->wr_own_conf)
 145                 ret = pp->ops->wr_own_conf(pp, where, size, val);
 146         else
 147                 ret = dw_pcie_cfg_write(pp->dbi_base + (where & ~0x3), where,
 148                                 size, val);
 149
 150         return ret;
 151 }
 152
 153 static struct irq_chip dw_msi_irq_chip = {
 154         .name = "PCI-MSI",
 155         .irq_enable = unmask_msi_irq,
 156         .irq_disable = mask_msi_irq,
 157         .irq_mask = mask_msi_irq,
 158         .irq_unmask = unmask_msi_irq,
 159 };
 160
 161 /* MSI int handler */
 162 irqreturn_t dw_handle_msi_irq(struct pcie_port *pp)
 163 {
 164         unsigned long val;
 165         int i, pos, irq;
 166         irqreturn_t ret = IRQ_NONE;
 167
 168         for (i = 0; i < MAX_MSI_CTRLS; i++) {
 169                 dw_pcie_rd_own_conf(pp, PCIE_MSI_INTR0_STATUS + i * 12, 4,
 170                                 (u32 *)&val);
 171                 if (val) {
 172                         ret = IRQ_HANDLED;
 173                         pos = 0;
 174                         while ((pos = find_next_bit(&val, 32, pos)) != 32) {
 175                                 irq = irq_find_mapping(pp->irq_domain,
 176                                                 i * 32 + pos);
 177                                 dw_pcie_wr_own_conf(pp,
 178                                                 PCIE_MSI_INTR0_STATUS + i * 12,
 179                                                 4, 1 << pos);
 180                                 generic_handle_irq(irq);
 181                                 pos++;
 182                         }
 183                 }
 184         }
 185
 186         return ret;
 187 }
 188
 189 void dw_pcie_msi_init(struct pcie_port *pp)
 190 {
 191         pp->msi_data = __get_free_pages(GFP_KERNEL, 0);
 192
 193         /* program the msi_data */
 194         dw_pcie_wr_own_conf(pp, PCIE_MSI_ADDR_LO, 4,
 195                         virt_to_phys((void *)pp->msi_data));
 196         dw_pcie_wr_own_conf(pp, PCIE_MSI_ADDR_HI, 4, 0);
 197 }
 198
 199 static int find_valid_pos0(struct pcie_port *pp, int msgvec, int pos, int *pos0)
 200 {
 201         int flag = 1;
 202
 203         do {
 204                 pos = find_next_zero_bit(pp->msi_irq_in_use,
 205                                 MAX_MSI_IRQS, pos);
 206                 /*if you have reached to the end then get out from here.*/
 207                 if (pos == MAX_MSI_IRQS)
 208                         return -ENOSPC;
 209                 /*
 210                  * Check if this position is at correct offset.nvec is always a
 211                  * power of two. pos0 must be nvec bit aligned.
 212                  */
 213                 if (pos % msgvec)
 214                         pos += msgvec - (pos % msgvec);
 215                 else
 216                         flag = 0;
 217         } while (flag);
 218
 219         *pos0 = pos;
 220         return 0;
 221 }
 222
 223 static void dw_pcie_msi_clear_irq(struct pcie_port *pp, int irq)
 224 {
 225         unsigned int res, bit, val;
 226
 227         res = (irq / 32) * 12;
 228         bit = irq % 32;
 229         dw_pcie_rd_own_conf(pp, PCIE_MSI_INTR0_ENABLE + res, 4, &val);
 230         val &= ~(1 << bit);
 231         dw_pcie_wr_own_conf(pp, PCIE_MSI_INTR0_ENABLE + res, 4, val);
 232 }
 233
 234 static void clear_irq_range(struct pcie_port *pp, unsigned int irq_base,
 235                             unsigned int nvec, unsigned int pos)
 236 {
 237         unsigned int i;
 238
 239         for (i = 0; i < nvec; i++) {
 240                 irq_set_msi_desc_off(irq_base, i, NULL);
 241                 clear_bit(pos + i, pp->msi_irq_in_use);
 242                 /* Disable corresponding interrupt on MSI controller */
 243                 if (pp->ops->msi_clear_irq)
 244                         pp->ops->msi_clear_irq(pp, pos + i);
 245                 else
 246                         dw_pcie_msi_clear_irq(pp, pos + i);
 247         }
 248 }
 249
 250 static void dw_pcie_msi_set_irq(struct pcie_port *pp, int irq)
 251 {
 252         unsigned int res, bit, val;
 253
 254         res = (irq / 32) * 12;
 255         bit = irq % 32;
 256         dw_pcie_rd_own_conf(pp, PCIE_MSI_INTR0_ENABLE + res, 4, &val);
 257         val |= 1 << bit;
 258         dw_pcie_wr_own_conf(pp, PCIE_MSI_INTR0_ENABLE + res, 4, val);
 259 }
 260
 261 static int assign_irq(int no_irqs, struct msi_desc *desc, int *pos)
 262 {
 263         int irq, pos0, pos1, i;
 264         struct pcie_port *pp = sys_to_pcie(desc->dev->bus->sysdata);
 265
 266         pos0 = find_first_zero_bit(pp->msi_irq_in_use,
 267                         MAX_MSI_IRQS);
 268         if (pos0 % no_irqs) {
 269                 if (find_valid_pos0(pp, no_irqs, pos0, &pos0))
 270                         goto no_valid_irq;
 271         }
 272         if (no_irqs > 1) {
 273                 pos1 = find_next_bit(pp->msi_irq_in_use,
 274                                 MAX_MSI_IRQS, pos0);
 275                 /* there must be nvec number of consecutive free bits */
 276                 while ((pos1 - pos0) < no_irqs) {
 277                         if (find_valid_pos0(pp, no_irqs, pos1, &pos0))
 278                                 goto no_valid_irq;
 279                         pos1 = find_next_bit(pp->msi_irq_in_use,
 280                                         MAX_MSI_IRQS, pos0);
 281                 }
 282         }
 283
 284         irq = irq_find_mapping(pp->irq_domain, pos0);
 285         if (!irq)
 286                 goto no_valid_irq;
 287
 288         /*
 289          * irq_create_mapping (called from dw_pcie_host_init) pre-allocates
 290          * descs so there is no need to allocate descs here. We can therefore
 291          * assume that if irq_find_mapping above returns non-zero, then the
 292          * descs are also successfully allocated.
 293          */
 294
 295         for (i = 0; i < no_irqs; i++) {
 296                 if (irq_set_msi_desc_off(irq, i, desc) != 0) {
 297                         clear_irq_range(pp, irq, i, pos0);
 298                         goto no_valid_irq;
 299                 }
 300                 set_bit(pos0 + i, pp->msi_irq_in_use);
 301                 /*Enable corresponding interrupt in MSI interrupt controller */
 302                 if (pp->ops->msi_set_irq)
 303                         pp->ops->msi_set_irq(pp, pos0 + i);
 304                 else
 305                         dw_pcie_msi_set_irq(pp, pos0 + i);
 306         }
 307
 308         *pos = pos0;
 309         return irq;
 310
 311 no_valid_irq:
 312         *pos = pos0;
 313         return -ENOSPC;
 314 }
 315
 316 static void clear_irq(unsigned int irq)
 317 {
 318         unsigned int pos, nvec;
 319         struct msi_desc *msi;
 320         struct pcie_port *pp;
 321         struct irq_data *data = irq_get_irq_data(irq);
 322
 323         /* get the port structure */
 324         msi = irq_data_get_msi(data);
 325         pp = sys_to_pcie(msi->dev->bus->sysdata);
 326
 327         /* undo what was done in assign_irq */
 328         pos = data->hwirq;
 329         nvec = 1 << msi->msi_attrib.multiple;
 330
 331         clear_irq_range(pp, irq, nvec, pos);
 332
 333         /* all irqs cleared; reset attributes */
 334         msi->irq = 0;
 335         msi->msi_attrib.multiple = 0;
 336 }
 337
 338 static int dw_msi_setup_irq(struct msi_chip *chip, struct pci_dev *pdev,
 339                         struct msi_desc *desc)
 340 {
 341         int irq, pos, msgvec;
 342         u16 msg_ctr;
 343         struct msi_msg msg;
 344         struct pcie_port *pp = sys_to_pcie(pdev->bus->sysdata);
 345
 346         pci_read_config_word(pdev, pdev->msi_cap + PCI_MSI_FLAGS, &msg_ctr);
 347         msgvec = (msg_ctr & PCI_MSI_FLAGS_QSIZE) >> 4;
 348         if (msgvec == 0)
 349                 msgvec = (msg_ctr & PCI_MSI_FLAGS_QMASK) >> 1;
 350         if (msgvec > 5)
 351                 msgvec = 0;
 352
 353         irq = assign_irq((1 << msgvec), desc, &pos);
 354         if (irq < 0)
 355                 return irq;
 356
 357         /*
 358          * write_msi_msg() will update PCI_MSI_FLAGS so there is
 359          * no need to explicitly call pci_write_config_word().
 360          */
 361         desc->msi_attrib.multiple = msgvec;
 362
 363         if (pp->ops->get_msi_addr)
 364                 msg.address_lo = pp->ops->get_msi_addr(pp);
 365         else
 366                 msg.address_lo = virt_to_phys((void *)pp->msi_data);
 367         msg.address_hi = 0x0;
 368
 369         if (pp->ops->get_msi_data)
 370                 msg.data = pp->ops->get_msi_data(pp, pos);
 371         else
 372                 msg.data = pos;
 373
 374         write_msi_msg(irq, &msg);
 375
 376         return 0;
 377 }
 378
 379 static void dw_msi_teardown_irq(struct msi_chip *chip, unsigned int irq)
 380 {
 381         clear_irq(irq);
 382 }
 383
 384 static struct msi_chip dw_pcie_msi_chip = {
 385         .setup_irq = dw_msi_setup_irq,
 386         .teardown_irq = dw_msi_teardown_irq,
 387 };
 388
 389 int dw_pcie_link_up(struct pcie_port *pp)
 390 {
 391         if (pp->ops->link_up)
 392                 return pp->ops->link_up(pp);
 393         else
 394                 return 0;
 395 }
 396
 397 static int dw_pcie_msi_map(struct irq_domain *domain, unsigned int irq,
 398                         irq_hw_number_t hwirq)
 399 {
 400         irq_set_chip_and_handler(irq, &dw_msi_irq_chip, handle_simple_irq);
 401         irq_set_chip_data(irq, domain->host_data);
 402         set_irq_flags(irq, IRQF_VALID);
 403
 404         return 0;
 405 }
 406
 407 static const struct irq_domain_ops msi_domain_ops = {
 408         .map = dw_pcie_msi_map,
 409 };
 410
 411 int __init dw_pcie_host_init(struct pcie_port *pp)
 412 {
 413         struct device_node *np = pp->dev->of_node;
 414         struct platform_device *pdev = to_platform_device(pp->dev);
 415         struct of_pci_range range;
 416         struct of_pci_range_parser parser;
 417         struct resource *cfg_res;
 418         u32 val, na, ns;
 419         const __be32 *addrp;
 420         int i, index, ret;
 421
 422         /* Find the address cell size and the number of cells in order to get
 423          * the untranslated address.
 424          */
 425         of_property_read_u32(np, "#address-cells", &na);
 426         ns = of_n_size_cells(np);
 427
 428         cfg_res = platform_get_resource_byname(pdev, IORESOURCE_MEM, "config");
 429         if (cfg_res) {
 430                 pp->cfg0_size = resource_size(cfg_res)/2;
 431                 pp->cfg1_size = resource_size(cfg_res)/2;
 432                 pp->cfg0_base = cfg_res->start;
 433                 pp->cfg1_base = cfg_res->start + pp->cfg0_size;
 434
 435                 /* Find the untranslated configuration space address */
 436                 index = of_property_match_string(np, "reg-names", "config");
 437                 addrp = of_get_address(np, index, NULL, NULL);
 438                 pp->cfg0_mod_base = of_read_number(addrp, ns);
 439                 pp->cfg1_mod_base = pp->cfg0_mod_base + pp->cfg0_size;
 440         } else {
 441                 dev_err(pp->dev, "missing *config* reg space\n");
 442         }
 443
 444         if (of_pci_range_parser_init(&parser, np)) {
 445                 dev_err(pp->dev, "missing ranges property\n");
 446                 return -EINVAL;
 447         }
 448
 449         /* Get the I/O and memory ranges from DT */
 450         for_each_of_pci_range(&parser, &range) {
 451                 unsigned long restype = range.flags & IORESOURCE_TYPE_BITS;
 452                 if (restype == IORESOURCE_IO) {
 453                         of_pci_range_to_resource(&range, np, &pp->io);
 454                         pp->io.name = "I/O";
 455                         pp->io.start = max_t(resource_size_t,
 456                                              PCIBIOS_MIN_IO,
 457                                              range.pci_addr + global_io_offset);
 458                         pp->io.end = min_t(resource_size_t,
 459                                            IO_SPACE_LIMIT,
 460                                            range.pci_addr + range.size
 461                                            + global_io_offset - 1);
 462                         pp->io_size = resource_size(&pp->io);
 463                         pp->io_bus_addr = range.pci_addr;
 464                         pp->io_base = range.cpu_addr;
 465
 466                         /* Find the untranslated IO space address */
 467                         pp->io_mod_base = of_read_number(parser.range -
 468                                                          parser.np + na, ns);
 469                 }
 470                 if (restype == IORESOURCE_MEM) {
 471                         of_pci_range_to_resource(&range, np, &pp->mem);
 472                         pp->mem.name = "MEM";
 473                         pp->mem_size = resource_size(&pp->mem);
 474                         pp->mem_bus_addr = range.pci_addr;
 475
 476                         /* Find the untranslated MEM space address */
 477                         pp->mem_mod_base = of_read_number(parser.range -
 478                                                           parser.np + na, ns);
 479                 }
 480                 if (restype == 0) {
 481                         of_pci_range_to_resource(&range, np, &pp->cfg);
 482                         pp->cfg0_size = resource_size(&pp->cfg)/2;
 483                         pp->cfg1_size = resource_size(&pp->cfg)/2;
 484                         pp->cfg0_base = pp->cfg.start;
 485                         pp->cfg1_base = pp->cfg.start + pp->cfg0_size;
 486
 487                         /* Find the untranslated configuration space address */
 488                         pp->cfg0_mod_base = of_read_number(parser.range -
 489                                                            parser.np + na, ns);
 490                         pp->cfg1_mod_base = pp->cfg0_mod_base +
 491                                             pp->cfg0_size;
 492                 }
 493         }
 494
 495         ret = of_pci_parse_bus_range(np, &pp->busn);
 496         if (ret < 0) {
 497                 pp->busn.name = np->name;
 498                 pp->busn.start = 0;
 499                 pp->busn.end = 0xff;
 500                 pp->busn.flags = IORESOURCE_BUS;
 501                 dev_dbg(pp->dev, "failed to parse bus-range property: %d, using default %pR\n",
 502                         ret, &pp->busn);
 503         }
 504
 505         if (!pp->dbi_base) {
 506                 pp->dbi_base = devm_ioremap(pp->dev, pp->cfg.start,
 507                                         resource_size(&pp->cfg));
 508                 if (!pp->dbi_base) {
 509                         dev_err(pp->dev, "error with ioremap\n");
 510                         return -ENOMEM;
 511                 }
 512         }
 513
 514         pp->mem_base = pp->mem.start;
 515
 516         if (!pp->va_cfg0_base) {
 517                 pp->va_cfg0_base = devm_ioremap(pp->dev, pp->cfg0_base,
 518                                                 pp->cfg0_size);
 519                 if (!pp->va_cfg0_base) {
 520                         dev_err(pp->dev, "error with ioremap in function\n");
 521                         return -ENOMEM;
 522                 }
 523         }
 524
 525         if (!pp->va_cfg1_base) {
 526                 pp->va_cfg1_base = devm_ioremap(pp->dev, pp->cfg1_base,
 527                                                 pp->cfg1_size);
 528                 if (!pp->va_cfg1_base) {
 529                         dev_err(pp->dev, "error with ioremap\n");
 530                         return -ENOMEM;
 531                 }
 532         }
 533
 534         if (of_property_read_u32(np, "num-lanes", &pp->lanes)) {
 535                 dev_err(pp->dev, "Failed to parse the number of lanes\n");
 536                 return -EINVAL;
 537         }
 538
 539         if (IS_ENABLED(CONFIG_PCI_MSI)) {
 540                 if (!pp->ops->msi_host_init) {
 541                         pp->irq_domain = irq_domain_add_linear(pp->dev->of_node,
 542                                                 MAX_MSI_IRQS, &msi_domain_ops,
 543                                                 &dw_pcie_msi_chip);
 544                         if (!pp->irq_domain) {
 545                                 dev_err(pp->dev, "irq domain init failed\n");
 546                                 return -ENXIO;
 547                         }
 548
 549                         for (i = 0; i < MAX_MSI_IRQS; i++)
 550                                 irq_create_mapping(pp->irq_domain, i);
 551                 } else {
 552                         ret = pp->ops->msi_host_init(pp, &dw_pcie_msi_chip);
 553                         if (ret < 0)
 554                                 return ret;
 555                 }
 556         }
 557
 558         if (pp->ops->host_init)
 559                 pp->ops->host_init(pp);
 560
 561         dw_pcie_wr_own_conf(pp, PCI_BASE_ADDRESS_0, 4, 0);
 562
 563         /* program correct class for RC */
 564         dw_pcie_wr_own_conf(pp, PCI_CLASS_DEVICE, 2, PCI_CLASS_BRIDGE_PCI);
 565
 566         dw_pcie_rd_own_conf(pp, PCIE_LINK_WIDTH_SPEED_CONTROL, 4, &val);
 567         val |= PORT_LOGIC_SPEED_CHANGE;
 568         dw_pcie_wr_own_conf(pp, PCIE_LINK_WIDTH_SPEED_CONTROL, 4, val);
 569
 570         dw_pci.nr_controllers = 1;
 571         dw_pci.private_data = (void **)&pp;
 572
 573         pci_common_init_dev(pp->dev, &dw_pci);
 574 #ifdef CONFIG_PCI_DOMAINS
 575         dw_pci.domain++;
 576 #endif
 577
 578         return 0;
 579 }
 580
 581 static void dw_pcie_prog_viewport_cfg0(struct pcie_port *pp, u32 busdev)
 582 {
 583         /* Program viewport 0 : OUTBOUND : CFG0 */
 584         dw_pcie_writel_rc(pp, PCIE_ATU_REGION_OUTBOUND | PCIE_ATU_REGION_INDEX0,
 585                           PCIE_ATU_VIEWPORT);
 586         dw_pcie_writel_rc(pp, pp->cfg0_mod_base, PCIE_ATU_LOWER_BASE);
 587         dw_pcie_writel_rc(pp, (pp->cfg0_mod_base >> 32), PCIE_ATU_UPPER_BASE);
 588         dw_pcie_writel_rc(pp, pp->cfg0_mod_base + pp->cfg0_size - 1,
 589                           PCIE_ATU_LIMIT);
 590         dw_pcie_writel_rc(pp, busdev, PCIE_ATU_LOWER_TARGET);
 591         dw_pcie_writel_rc(pp, 0, PCIE_ATU_UPPER_TARGET);
 592         dw_pcie_writel_rc(pp, PCIE_ATU_TYPE_CFG0, PCIE_ATU_CR1);
 593         dw_pcie_writel_rc(pp, PCIE_ATU_ENABLE, PCIE_ATU_CR2);
 594 }
 595
 596 static void dw_pcie_prog_viewport_cfg1(struct pcie_port *pp, u32 busdev)
 597 {
 598         /* Program viewport 1 : OUTBOUND : CFG1 */
 599         dw_pcie_writel_rc(pp, PCIE_ATU_REGION_OUTBOUND | PCIE_ATU_REGION_INDEX1,
 600                           PCIE_ATU_VIEWPORT);
 601         dw_pcie_writel_rc(pp, PCIE_ATU_TYPE_CFG1, PCIE_ATU_CR1);
 602         dw_pcie_writel_rc(pp, pp->cfg1_mod_base, PCIE_ATU_LOWER_BASE);
 603         dw_pcie_writel_rc(pp, (pp->cfg1_mod_base >> 32), PCIE_ATU_UPPER_BASE);
 604         dw_pcie_writel_rc(pp, pp->cfg1_mod_base + pp->cfg1_size - 1,
 605                           PCIE_ATU_LIMIT);
 606         dw_pcie_writel_rc(pp, busdev, PCIE_ATU_LOWER_TARGET);
 607         dw_pcie_writel_rc(pp, 0, PCIE_ATU_UPPER_TARGET);
 608         dw_pcie_writel_rc(pp, PCIE_ATU_ENABLE, PCIE_ATU_CR2);
 609 }
 610
 611 static void dw_pcie_prog_viewport_mem_outbound(struct pcie_port *pp)
 612 {
 613         /* Program viewport 0 : OUTBOUND : MEM */
 614         dw_pcie_writel_rc(pp, PCIE_ATU_REGION_OUTBOUND | PCIE_ATU_REGION_INDEX0,
 615                           PCIE_ATU_VIEWPORT);
 616         dw_pcie_writel_rc(pp, PCIE_ATU_TYPE_MEM, PCIE_ATU_CR1);
 617         dw_pcie_writel_rc(pp, pp->mem_mod_base, PCIE_ATU_LOWER_BASE);
 618         dw_pcie_writel_rc(pp, (pp->mem_mod_base >> 32), PCIE_ATU_UPPER_BASE);
 619         dw_pcie_writel_rc(pp, pp->mem_mod_base + pp->mem_size - 1,
 620                           PCIE_ATU_LIMIT);
 621         dw_pcie_writel_rc(pp, pp->mem_bus_addr, PCIE_ATU_LOWER_TARGET);
 622         dw_pcie_writel_rc(pp, upper_32_bits(pp->mem_bus_addr),
 623                           PCIE_ATU_UPPER_TARGET);
 624         dw_pcie_writel_rc(pp, PCIE_ATU_ENABLE, PCIE_ATU_CR2);
 625 }
 626
 627 static void dw_pcie_prog_viewport_io_outbound(struct pcie_port *pp)
 628 {
 629         /* Program viewport 1 : OUTBOUND : IO */
 630         dw_pcie_writel_rc(pp, PCIE_ATU_REGION_OUTBOUND | PCIE_ATU_REGION_INDEX1,
 631                           PCIE_ATU_VIEWPORT);
 632         dw_pcie_writel_rc(pp, PCIE_ATU_TYPE_IO, PCIE_ATU_CR1);
 633         dw_pcie_writel_rc(pp, pp->io_mod_base, PCIE_ATU_LOWER_BASE);
 634         dw_pcie_writel_rc(pp, (pp->io_mod_base >> 32), PCIE_ATU_UPPER_BASE);
 635         dw_pcie_writel_rc(pp, pp->io_mod_base + pp->io_size - 1,
 636                           PCIE_ATU_LIMIT);
 637         dw_pcie_writel_rc(pp, pp->io_bus_addr, PCIE_ATU_LOWER_TARGET);
 638         dw_pcie_writel_rc(pp, upper_32_bits(pp->io_bus_addr),
 639                           PCIE_ATU_UPPER_TARGET);
 640         dw_pcie_writel_rc(pp, PCIE_ATU_ENABLE, PCIE_ATU_CR2);
 641 }
 642
 643 static int dw_pcie_rd_other_conf(struct pcie_port *pp, struct pci_bus *bus,
 644                 u32 devfn, int where, int size, u32 *val)
 645 {
 646         int ret = PCIBIOS_SUCCESSFUL;
 647         u32 address, busdev;
 648
 649         busdev = PCIE_ATU_BUS(bus->number) | PCIE_ATU_DEV(PCI_SLOT(devfn)) |
 650                  PCIE_ATU_FUNC(PCI_FUNC(devfn));
 651         address = where & ~0x3;
 652
 653         if (bus->parent->number == pp->root_bus_nr) {
 654                 dw_pcie_prog_viewport_cfg0(pp, busdev);
 655                 ret = dw_pcie_cfg_read(pp->va_cfg0_base + address, where, size,
 656                                 val);
 657                 dw_pcie_prog_viewport_mem_outbound(pp);
 658         } else {
 659                 dw_pcie_prog_viewport_cfg1(pp, busdev);
 660                 ret = dw_pcie_cfg_read(pp->va_cfg1_base + address, where, size,
 661                                 val);
 662                 dw_pcie_prog_viewport_io_outbound(pp);
 663         }
 664
 665         return ret;
 666 }
 667
 668 static int dw_pcie_wr_other_conf(struct pcie_port *pp, struct pci_bus *bus,
 669                 u32 devfn, int where, int size, u32 val)
 670 {
 671         int ret = PCIBIOS_SUCCESSFUL;
 672         u32 address, busdev;
 673
 674         busdev = PCIE_ATU_BUS(bus->number) | PCIE_ATU_DEV(PCI_SLOT(devfn)) |
 675                  PCIE_ATU_FUNC(PCI_FUNC(devfn));
 676         address = where & ~0x3;
 677
 678         if (bus->parent->number == pp->root_bus_nr) {
 679                 dw_pcie_prog_viewport_cfg0(pp, busdev);
 680                 ret = dw_pcie_cfg_write(pp->va_cfg0_base + address, where, size,
 681                                 val);
 682                 dw_pcie_prog_viewport_mem_outbound(pp);
 683         } else {
 684                 dw_pcie_prog_viewport_cfg1(pp, busdev);
 685                 ret = dw_pcie_cfg_write(pp->va_cfg1_base + address, where, size,
 686                                 val);
 687                 dw_pcie_prog_viewport_io_outbound(pp);
 688         }
 689
 690         return ret;
 691 }
 692
 693 static int dw_pcie_valid_config(struct pcie_port *pp,
 694                                 struct pci_bus *bus, int dev)
 695 {
 696         /* If there is no link, then there is no device */
 697         if (bus->number != pp->root_bus_nr) {
 698                 if (!dw_pcie_link_up(pp))
 699                         return 0;
 700         }
 701
 702         /* access only one slot on each root port */
 703         if (bus->number == pp->root_bus_nr && dev > 0)
 704                 return 0;
 705
 706         /*
 707          * do not read more than one device on the bus directly attached
 708          * to RC's (Virtual Bridge's) DS side.
 709          */
 710         if (bus->primary == pp->root_bus_nr && dev > 0)
 711                 return 0;
 712
 713         return 1;
 714 }
 715
 716 static int dw_pcie_rd_conf(struct pci_bus *bus, u32 devfn, int where,
 717                         int size, u32 *val)
 718 {
 719         struct pcie_port *pp = sys_to_pcie(bus->sysdata);
 720         int ret;
 721
 722         if (dw_pcie_valid_config(pp, bus, PCI_SLOT(devfn)) == 0) {
 723                 *val = 0xffffffff;
 724                 return PCIBIOS_DEVICE_NOT_FOUND;
 725         }
 726
 727         if (bus->number != pp->root_bus_nr)
 728                 if (pp->ops->rd_other_conf)
 729                         ret = pp->ops->rd_other_conf(pp, bus, devfn,
 730                                                 where, size, val);
 731                 else
 732                         ret = dw_pcie_rd_other_conf(pp, bus, devfn,
 733                                                 where, size, val);
 734         else
 735                 ret = dw_pcie_rd_own_conf(pp, where, size, val);
 736
 737         return ret;
 738 }
 739
 740 static int dw_pcie_wr_conf(struct pci_bus *bus, u32 devfn,
 741                         int where, int size, u32 val)
 742 {
 743         struct pcie_port *pp = sys_to_pcie(bus->sysdata);
 744         int ret;
 745
 746         if (dw_pcie_valid_config(pp, bus, PCI_SLOT(devfn)) == 0)
 747                 return PCIBIOS_DEVICE_NOT_FOUND;
 748
 749         if (bus->number != pp->root_bus_nr)
 750                 if (pp->ops->wr_other_conf)
 751                         ret = pp->ops->wr_other_conf(pp, bus, devfn,
 752                                                 where, size, val);
 753                 else
 754                         ret = dw_pcie_wr_other_conf(pp, bus, devfn,
 755                                                 where, size, val);
 756         else
 757                 ret = dw_pcie_wr_own_conf(pp, where, size, val);
 758
 759         return ret;
 760 }
 761
 762 static struct pci_ops dw_pcie_ops = {
 763         .read = dw_pcie_rd_conf,
 764         .write = dw_pcie_wr_conf,
 765 };
 766
 767 static int dw_pcie_setup(int nr, struct pci_sys_data *sys)
 768 {
 769         struct pcie_port *pp;
 770
 771         pp = sys_to_pcie(sys);
 772
 773         if (global_io_offset < SZ_1M && pp->io_size > 0) {
 774                 sys->io_offset = global_io_offset - pp->io_bus_addr;
 775                 pci_ioremap_io(global_io_offset, pp->io_base);
 776                 global_io_offset += SZ_64K;
 777                 pci_add_resource_offset(&sys->resources, &pp->io,
 778                                         sys->io_offset);
 779         }
 780
 781         sys->mem_offset = pp->mem.start - pp->mem_bus_addr;
 782         pci_add_resource_offset(&sys->resources, &pp->mem, sys->mem_offset);
 783         pci_add_resource(&sys->resources, &pp->busn);
 784
 785         return 1;
 786 }
 787
 788 static struct pci_bus *dw_pcie_scan_bus(int nr, struct pci_sys_data *sys)
 789 {
 790         struct pci_bus *bus;
 791         struct pcie_port *pp = sys_to_pcie(sys);
 792
 793         pp->root_bus_nr = sys->busnr;
 794         bus = pci_create_root_bus(pp->dev, sys->busnr,
 795                                   &dw_pcie_ops, sys, &sys->resources);
 796         if (!bus)
 797                 return NULL;
 798
 799         pci_scan_child_bus(bus);
 800
 801         if (bus && pp->ops->scan_bus)
 802                 pp->ops->scan_bus(pp);
 803
 804         return bus;
 805 }
 806
 807 static int dw_pcie_map_irq(const struct pci_dev *dev, u8 slot, u8 pin)
 808 {
 809         struct pcie_port *pp = sys_to_pcie(dev->bus->sysdata);
 810         int irq;
 811
 812         irq = of_irq_parse_and_map_pci(dev, slot, pin);
 813         if (!irq)
 814                 irq = pp->irq;
 815
 816         return irq;
 817 }
 818
 819 static void dw_pcie_add_bus(struct pci_bus *bus)
 820 {
 821         if (IS_ENABLED(CONFIG_PCI_MSI)) {
 822                 struct pcie_port *pp = sys_to_pcie(bus->sysdata);
 823
 824                 dw_pcie_msi_chip.dev = pp->dev;
 825                 bus->msi = &dw_pcie_msi_chip;
 826         }
 827 }
 828
 829 static struct hw_pci dw_pci = {
 830         .setup          = dw_pcie_setup,
 831         .scan           = dw_pcie_scan_bus,
 832         .map_irq        = dw_pcie_map_irq,
 833         .add_bus        = dw_pcie_add_bus,
 834 };
 835
 836 void dw_pcie_setup_rc(struct pcie_port *pp)
 837 {
 838         u32 val;
 839         u32 membase;
 840         u32 memlimit;
 841
 842         /* set the number of lanes */
 843         dw_pcie_readl_rc(pp, PCIE_PORT_LINK_CONTROL, &val);
 844         val &= ~PORT_LINK_MODE_MASK;
 845         switch (pp->lanes) {
 846         case 1:
 847                 val |= PORT_LINK_MODE_1_LANES;
 848                 break;
 849         case 2:
 850                 val |= PORT_LINK_MODE_2_LANES;
 851                 break;
 852         case 4:
 853                 val |= PORT_LINK_MODE_4_LANES;
 854                 break;
 855         }
 856         dw_pcie_writel_rc(pp, val, PCIE_PORT_LINK_CONTROL);
 857
 858         /* set link width speed control register */
 859         dw_pcie_readl_rc(pp, PCIE_LINK_WIDTH_SPEED_CONTROL, &val);
 860         val &= ~PORT_LOGIC_LINK_WIDTH_MASK;
 861         switch (pp->lanes) {
 862         case 1:
 863                 val |= PORT_LOGIC_LINK_WIDTH_1_LANES;
 864                 break;
 865         case 2:
 866                 val |= PORT_LOGIC_LINK_WIDTH_2_LANES;
 867                 break;
 868         case 4:
 869                 val |= PORT_LOGIC_LINK_WIDTH_4_LANES;
 870                 break;
 871         }
 872         dw_pcie_writel_rc(pp, val, PCIE_LINK_WIDTH_SPEED_CONTROL);
 873
 874         /* setup RC BARs */
 875         dw_pcie_writel_rc(pp, 0x00000004, PCI_BASE_ADDRESS_0);
 876         dw_pcie_writel_rc(pp, 0x00000000, PCI_BASE_ADDRESS_1);
 877
 878         /* setup interrupt pins */
 879         dw_pcie_readl_rc(pp, PCI_INTERRUPT_LINE, &val);
 880         val &= 0xffff00ff;
 881         val |= 0x00000100;
 882         dw_pcie_writel_rc(pp, val, PCI_INTERRUPT_LINE);
 883
 884         /* setup bus numbers */
 885         dw_pcie_readl_rc(pp, PCI_PRIMARY_BUS, &val);
 886         val &= 0xff000000;
 887         val |= 0x00010100;
 888         dw_pcie_writel_rc(pp, val, PCI_PRIMARY_BUS);
 889
 890         /* setup memory base, memory limit */
 891         membase = ((u32)pp->mem_base & 0xfff00000) >> 16;
 892         memlimit = (pp->mem_size + (u32)pp->mem_base) & 0xfff00000;
 893         val = memlimit | membase;
 894         dw_pcie_writel_rc(pp, val, PCI_MEMORY_BASE);
 895
 896         /* setup command register */
 897         dw_pcie_readl_rc(pp, PCI_COMMAND, &val);
 898         val &= 0xffff0000;
 899         val |= PCI_COMMAND_IO | PCI_COMMAND_MEMORY |
 900                 PCI_COMMAND_MASTER | PCI_COMMAND_SERR;
 901         dw_pcie_writel_rc(pp, val, PCI_COMMAND);
 902 }
 903
 904 MODULE_AUTHOR("Jingoo Han <jg1.han@samsung.com>");
 905 MODULE_DESCRIPTION("Designware PCIe host controller driver");
 906 MODULE_LICENSE("GPL v2");