drivers/gpio/gpio-aspeed-sgpio.c

   1 // SPDX-License-Identifier: GPL-2.0-or-later
   2 /*
   3  * Copyright 2019 American Megatrends International LLC.
   4  *
   5  * Author: Karthikeyan Mani <karthikeyanm@amiindia.co.in>
   6  */
   7
   8 #include <linux/bitfield.h>
   9 #include <linux/clk.h>
  10 #include <linux/gpio/driver.h>
  11 #include <linux/hashtable.h>
  12 #include <linux/init.h>
  13 #include <linux/io.h>
  14 #include <linux/kernel.h>
  15 #include <linux/module.h>
  16 #include <linux/platform_device.h>
  17 #include <linux/spinlock.h>
  18 #include <linux/string.h>
  19
  20 /*
  21  * MAX_NR_HW_GPIO represents the number of actual hardware-supported GPIOs (ie,
  22  * slots within the clocked serial GPIO data). Since each HW GPIO is both an
  23  * input and an output, we provide MAX_NR_HW_GPIO * 2 lines on our gpiochip
  24  * device.
  25  *
  26  * We use SGPIO_OUTPUT_OFFSET to define the split between the inputs and
  27  * outputs; the inputs start at line 0, the outputs start at OUTPUT_OFFSET.
  28  */
  29 #define MAX_NR_HW_SGPIO                 80
  30 #define SGPIO_OUTPUT_OFFSET             MAX_NR_HW_SGPIO
  31
  32 #define ASPEED_SGPIO_CTRL               0x54
  33
  34 #define ASPEED_SGPIO_PINS_MASK          GENMASK(9, 6)
  35 #define ASPEED_SGPIO_CLK_DIV_MASK       GENMASK(31, 16)
  36 #define ASPEED_SGPIO_ENABLE             BIT(0)
  37
  38 struct aspeed_sgpio {
  39         struct gpio_chip chip;
  40         struct clk *pclk;
  41         spinlock_t lock;
  42         void __iomem *base;
  43         int irq;
  44         int n_sgpio;
  45 };
  46
  47 struct aspeed_sgpio_bank {
  48         uint16_t    val_regs;
  49         uint16_t    rdata_reg;
  50         uint16_t    irq_regs;
  51         const char  names[4][3];
  52 };
  53
  54 /*
  55  * Note: The "value" register returns the input value when the GPIO is
  56  *       configured as an input.
  57  *
  58  *       The "rdata" register returns the output value when the GPIO is
  59  *       configured as an output.
  60  */
  61 static const struct aspeed_sgpio_bank aspeed_sgpio_banks[] = {
  62         {
  63                 .val_regs = 0x0000,
  64                 .rdata_reg = 0x0070,
  65                 .irq_regs = 0x0004,
  66                 .names = { "A", "B", "C", "D" },
  67         },
  68         {
  69                 .val_regs = 0x001C,
  70                 .rdata_reg = 0x0074,
  71                 .irq_regs = 0x0020,
  72                 .names = { "E", "F", "G", "H" },
  73         },
  74         {
  75                 .val_regs = 0x0038,
  76                 .rdata_reg = 0x0078,
  77                 .irq_regs = 0x003C,
  78                 .names = { "I", "J" },
  79         },
  80 };
  81
  82 enum aspeed_sgpio_reg {
  83         reg_val,
  84         reg_rdata,
  85         reg_irq_enable,
  86         reg_irq_type0,
  87         reg_irq_type1,
  88         reg_irq_type2,
  89         reg_irq_status,
  90 };
  91
  92 #define GPIO_VAL_VALUE      0x00
  93 #define GPIO_IRQ_ENABLE     0x00
  94 #define GPIO_IRQ_TYPE0      0x04
  95 #define GPIO_IRQ_TYPE1      0x08
  96 #define GPIO_IRQ_TYPE2      0x0C
  97 #define GPIO_IRQ_STATUS     0x10
  98
  99 static void __iomem *bank_reg(struct aspeed_sgpio *gpio,
 100                                      const struct aspeed_sgpio_bank *bank,
 101                                      const enum aspeed_sgpio_reg reg)
 102 {
 103         switch (reg) {
 104         case reg_val:
 105                 return gpio->base + bank->val_regs + GPIO_VAL_VALUE;
 106         case reg_rdata:
 107                 return gpio->base + bank->rdata_reg;
 108         case reg_irq_enable:
 109                 return gpio->base + bank->irq_regs + GPIO_IRQ_ENABLE;
 110         case reg_irq_type0:
 111                 return gpio->base + bank->irq_regs + GPIO_IRQ_TYPE0;
 112         case reg_irq_type1:
 113                 return gpio->base + bank->irq_regs + GPIO_IRQ_TYPE1;
 114         case reg_irq_type2:
 115                 return gpio->base + bank->irq_regs + GPIO_IRQ_TYPE2;
 116         case reg_irq_status:
 117                 return gpio->base + bank->irq_regs + GPIO_IRQ_STATUS;
 118         default:
 119                 /* acturally if code runs to here, it's an error case */
 120                 BUG();
 121         }
 122 }
 123
 124 #define GPIO_BANK(x)    ((x % SGPIO_OUTPUT_OFFSET) >> 5)
 125 #define GPIO_OFFSET(x)  ((x % SGPIO_OUTPUT_OFFSET) & 0x1f)
 126 #define GPIO_BIT(x)     BIT(GPIO_OFFSET(x))
 127
 128 static const struct aspeed_sgpio_bank *to_bank(unsigned int offset)
 129 {
 130         unsigned int bank;
 131
 132         bank = GPIO_BANK(offset);
 133
 134         WARN_ON(bank >= ARRAY_SIZE(aspeed_sgpio_banks));
 135         return &aspeed_sgpio_banks[bank];
 136 }
 137
 138 static int aspeed_sgpio_init_valid_mask(struct gpio_chip *gc,
 139                 unsigned long *valid_mask, unsigned int ngpios)
 140 {
 141         struct aspeed_sgpio *sgpio = gpiochip_get_data(gc);
 142         int n = sgpio->n_sgpio;
 143         int c = SGPIO_OUTPUT_OFFSET - n;
 144
 145         WARN_ON(ngpios < MAX_NR_HW_SGPIO * 2);
 146
 147         /* input GPIOs in the lower range */
 148         bitmap_set(valid_mask, 0, n);
 149         bitmap_clear(valid_mask, n, c);
 150
 151         /* output GPIOS above SGPIO_OUTPUT_OFFSET */
 152         bitmap_set(valid_mask, SGPIO_OUTPUT_OFFSET, n);
 153         bitmap_clear(valid_mask, SGPIO_OUTPUT_OFFSET + n, c);
 154
 155         return 0;
 156 }
 157
 158 static void aspeed_sgpio_irq_init_valid_mask(struct gpio_chip *gc,
 159                 unsigned long *valid_mask, unsigned int ngpios)
 160 {
 161         struct aspeed_sgpio *sgpio = gpiochip_get_data(gc);
 162         int n = sgpio->n_sgpio;
 163
 164         WARN_ON(ngpios < MAX_NR_HW_SGPIO * 2);
 165
 166         /* input GPIOs in the lower range */
 167         bitmap_set(valid_mask, 0, n);
 168         bitmap_clear(valid_mask, n, ngpios - n);
 169 }
 170
 171 static bool aspeed_sgpio_is_input(unsigned int offset)
 172 {
 173         return offset < SGPIO_OUTPUT_OFFSET;
 174 }
 175
 176 static int aspeed_sgpio_get(struct gpio_chip *gc, unsigned int offset)
 177 {
 178         struct aspeed_sgpio *gpio = gpiochip_get_data(gc);
 179         const struct aspeed_sgpio_bank *bank = to_bank(offset);
 180         unsigned long flags;
 181         enum aspeed_sgpio_reg reg;
 182         int rc = 0;
 183
 184         spin_lock_irqsave(&gpio->lock, flags);
 185
 186         reg = aspeed_sgpio_is_input(offset) ? reg_val : reg_rdata;
 187         rc = !!(ioread32(bank_reg(gpio, bank, reg)) & GPIO_BIT(offset));
 188
 189         spin_unlock_irqrestore(&gpio->lock, flags);
 190
 191         return rc;
 192 }
 193
 194 static int sgpio_set_value(struct gpio_chip *gc, unsigned int offset, int val)
 195 {
 196         struct aspeed_sgpio *gpio = gpiochip_get_data(gc);
 197         const struct aspeed_sgpio_bank *bank = to_bank(offset);
 198         void __iomem *addr_r, *addr_w;
 199         u32 reg = 0;
 200
 201         if (aspeed_sgpio_is_input(offset))
 202                 return -EINVAL;
 203
 204         /* Since this is an output, read the cached value from rdata, then
 205          * update val. */
 206         addr_r = bank_reg(gpio, bank, reg_rdata);
 207         addr_w = bank_reg(gpio, bank, reg_val);
 208
 209         reg = ioread32(addr_r);
 210
 211         if (val)
 212                 reg |= GPIO_BIT(offset);
 213         else
 214                 reg &= ~GPIO_BIT(offset);
 215
 216         iowrite32(reg, addr_w);
 217
 218         return 0;
 219 }
 220
 221 static void aspeed_sgpio_set(struct gpio_chip *gc, unsigned int offset, int val)
 222 {
 223         struct aspeed_sgpio *gpio = gpiochip_get_data(gc);
 224         unsigned long flags;
 225
 226         spin_lock_irqsave(&gpio->lock, flags);
 227
 228         sgpio_set_value(gc, offset, val);
 229
 230         spin_unlock_irqrestore(&gpio->lock, flags);
 231 }
 232
 233 static int aspeed_sgpio_dir_in(struct gpio_chip *gc, unsigned int offset)
 234 {
 235         return aspeed_sgpio_is_input(offset) ? 0 : -EINVAL;
 236 }
 237
 238 static int aspeed_sgpio_dir_out(struct gpio_chip *gc, unsigned int offset, int val)
 239 {
 240         struct aspeed_sgpio *gpio = gpiochip_get_data(gc);
 241         unsigned long flags;
 242         int rc;
 243
 244         /* No special action is required for setting the direction; we'll
 245          * error-out in sgpio_set_value if this isn't an output GPIO */
 246
 247         spin_lock_irqsave(&gpio->lock, flags);
 248         rc = sgpio_set_value(gc, offset, val);
 249         spin_unlock_irqrestore(&gpio->lock, flags);
 250
 251         return rc;
 252 }
 253
 254 static int aspeed_sgpio_get_direction(struct gpio_chip *gc, unsigned int offset)
 255 {
 256         return !!aspeed_sgpio_is_input(offset);
 257 }
 258
 259 static void irqd_to_aspeed_sgpio_data(struct irq_data *d,
 260                                         struct aspeed_sgpio **gpio,
 261                                         const struct aspeed_sgpio_bank **bank,
 262                                         u32 *bit, int *offset)
 263 {
 264         struct aspeed_sgpio *internal;
 265
 266         *offset = irqd_to_hwirq(d);
 267         internal = irq_data_get_irq_chip_data(d);
 268         WARN_ON(!internal);
 269
 270         *gpio = internal;
 271         *bank = to_bank(*offset);
 272         *bit = GPIO_BIT(*offset);
 273 }
 274
 275 static void aspeed_sgpio_irq_ack(struct irq_data *d)
 276 {
 277         const struct aspeed_sgpio_bank *bank;
 278         struct aspeed_sgpio *gpio;
 279         unsigned long flags;
 280         void __iomem *status_addr;
 281         int offset;
 282         u32 bit;
 283
 284         irqd_to_aspeed_sgpio_data(d, &gpio, &bank, &bit, &offset);
 285
 286         status_addr = bank_reg(gpio, bank, reg_irq_status);
 287
 288         spin_lock_irqsave(&gpio->lock, flags);
 289
 290         iowrite32(bit, status_addr);
 291
 292         spin_unlock_irqrestore(&gpio->lock, flags);
 293 }
 294
 295 static void aspeed_sgpio_irq_set_mask(struct irq_data *d, bool set)
 296 {
 297         const struct aspeed_sgpio_bank *bank;
 298         struct aspeed_sgpio *gpio;
 299         unsigned long flags;
 300         u32 reg, bit;
 301         void __iomem *addr;
 302         int offset;
 303
 304         irqd_to_aspeed_sgpio_data(d, &gpio, &bank, &bit, &offset);
 305         addr = bank_reg(gpio, bank, reg_irq_enable);
 306
 307         spin_lock_irqsave(&gpio->lock, flags);
 308
 309         reg = ioread32(addr);
 310         if (set)
 311                 reg |= bit;
 312         else
 313                 reg &= ~bit;
 314
 315         iowrite32(reg, addr);
 316
 317         spin_unlock_irqrestore(&gpio->lock, flags);
 318 }
 319
 320 static void aspeed_sgpio_irq_mask(struct irq_data *d)
 321 {
 322         aspeed_sgpio_irq_set_mask(d, false);
 323 }
 324
 325 static void aspeed_sgpio_irq_unmask(struct irq_data *d)
 326 {
 327         aspeed_sgpio_irq_set_mask(d, true);
 328 }
 329
 330 static int aspeed_sgpio_set_type(struct irq_data *d, unsigned int type)
 331 {
 332         u32 type0 = 0;
 333         u32 type1 = 0;
 334         u32 type2 = 0;
 335         u32 bit, reg;
 336         const struct aspeed_sgpio_bank *bank;
 337         irq_flow_handler_t handler;
 338         struct aspeed_sgpio *gpio;
 339         unsigned long flags;
 340         void __iomem *addr;
 341         int offset;
 342
 343         irqd_to_aspeed_sgpio_data(d, &gpio, &bank, &bit, &offset);
 344
 345         switch (type & IRQ_TYPE_SENSE_MASK) {
 346         case IRQ_TYPE_EDGE_BOTH:
 347                 type2 |= bit;
 348                 fallthrough;
 349         case IRQ_TYPE_EDGE_RISING:
 350                 type0 |= bit;
 351                 fallthrough;
 352         case IRQ_TYPE_EDGE_FALLING:
 353                 handler = handle_edge_irq;
 354                 break;
 355         case IRQ_TYPE_LEVEL_HIGH:
 356                 type0 |= bit;
 357                 fallthrough;
 358         case IRQ_TYPE_LEVEL_LOW:
 359                 type1 |= bit;
 360                 handler = handle_level_irq;
 361                 break;
 362         default:
 363                 return -EINVAL;
 364         }
 365
 366         spin_lock_irqsave(&gpio->lock, flags);
 367
 368         addr = bank_reg(gpio, bank, reg_irq_type0);
 369         reg = ioread32(addr);
 370         reg = (reg & ~bit) | type0;
 371         iowrite32(reg, addr);
 372
 373         addr = bank_reg(gpio, bank, reg_irq_type1);
 374         reg = ioread32(addr);
 375         reg = (reg & ~bit) | type1;
 376         iowrite32(reg, addr);
 377
 378         addr = bank_reg(gpio, bank, reg_irq_type2);
 379         reg = ioread32(addr);
 380         reg = (reg & ~bit) | type2;
 381         iowrite32(reg, addr);
 382
 383         spin_unlock_irqrestore(&gpio->lock, flags);
 384
 385         irq_set_handler_locked(d, handler);
 386
 387         return 0;
 388 }
 389
 390 static void aspeed_sgpio_irq_handler(struct irq_desc *desc)
 391 {
 392         struct gpio_chip *gc = irq_desc_get_handler_data(desc);
 393         struct irq_chip *ic = irq_desc_get_chip(desc);
 394         struct aspeed_sgpio *data = gpiochip_get_data(gc);
 395         unsigned int i, p;
 396         unsigned long reg;
 397
 398         chained_irq_enter(ic, desc);
 399
 400         for (i = 0; i < ARRAY_SIZE(aspeed_sgpio_banks); i++) {
 401                 const struct aspeed_sgpio_bank *bank = &aspeed_sgpio_banks[i];
 402
 403                 reg = ioread32(bank_reg(data, bank, reg_irq_status));
 404
 405                 for_each_set_bit(p, &reg, 32)
 406                         generic_handle_domain_irq(gc->irq.domain, i * 32 + p);
 407         }
 408
 409         chained_irq_exit(ic, desc);
 410 }
 411
 412 static struct irq_chip aspeed_sgpio_irqchip = {
 413         .name       = "aspeed-sgpio",
 414         .irq_ack    = aspeed_sgpio_irq_ack,
 415         .irq_mask   = aspeed_sgpio_irq_mask,
 416         .irq_unmask = aspeed_sgpio_irq_unmask,
 417         .irq_set_type   = aspeed_sgpio_set_type,
 418 };
 419
 420 static int aspeed_sgpio_setup_irqs(struct aspeed_sgpio *gpio,
 421                                    struct platform_device *pdev)
 422 {
 423         int rc, i;
 424         const struct aspeed_sgpio_bank *bank;
 425         struct gpio_irq_chip *irq;
 426
 427         rc = platform_get_irq(pdev, 0);
 428         if (rc < 0)
 429                 return rc;
 430
 431         gpio->irq = rc;
 432
 433         /* Disable IRQ and clear Interrupt status registers for all SGPIO Pins. */
 434         for (i = 0; i < ARRAY_SIZE(aspeed_sgpio_banks); i++) {
 435                 bank =  &aspeed_sgpio_banks[i];
 436                 /* disable irq enable bits */
 437                 iowrite32(0x00000000, bank_reg(gpio, bank, reg_irq_enable));
 438                 /* clear status bits */
 439                 iowrite32(0xffffffff, bank_reg(gpio, bank, reg_irq_status));
 440         }
 441
 442         irq = &gpio->chip.irq;
 443         irq->chip = &aspeed_sgpio_irqchip;
 444         irq->init_valid_mask = aspeed_sgpio_irq_init_valid_mask;
 445         irq->handler = handle_bad_irq;
 446         irq->default_type = IRQ_TYPE_NONE;
 447         irq->parent_handler = aspeed_sgpio_irq_handler;
 448         irq->parent_handler_data = gpio;
 449         irq->parents = &gpio->irq;
 450         irq->num_parents = 1;
 451
 452         /* Apply default IRQ settings */
 453         for (i = 0; i < ARRAY_SIZE(aspeed_sgpio_banks); i++) {
 454                 bank = &aspeed_sgpio_banks[i];
 455                 /* set falling or level-low irq */
 456                 iowrite32(0x00000000, bank_reg(gpio, bank, reg_irq_type0));
 457                 /* trigger type is edge */
 458                 iowrite32(0x00000000, bank_reg(gpio, bank, reg_irq_type1));
 459                 /* single edge trigger */
 460                 iowrite32(0x00000000, bank_reg(gpio, bank, reg_irq_type2));
 461         }
 462
 463         return 0;
 464 }
 465
 466 static const struct of_device_id aspeed_sgpio_of_table[] = {
 467         { .compatible = "aspeed,ast2400-sgpio" },
 468         { .compatible = "aspeed,ast2500-sgpio" },
 469         {}
 470 };
 471
 472 MODULE_DEVICE_TABLE(of, aspeed_sgpio_of_table);
 473
 474 static int __init aspeed_sgpio_probe(struct platform_device *pdev)
 475 {
 476         struct aspeed_sgpio *gpio;
 477         u32 nr_gpios, sgpio_freq, sgpio_clk_div;
 478         int rc;
 479         unsigned long apb_freq;
 480
 481         gpio = devm_kzalloc(&pdev->dev, sizeof(*gpio), GFP_KERNEL);
 482         if (!gpio)
 483                 return -ENOMEM;
 484
 485         gpio->base = devm_platform_ioremap_resource(pdev, 0);
 486         if (IS_ERR(gpio->base))
 487                 return PTR_ERR(gpio->base);
 488
 489         rc = of_property_read_u32(pdev->dev.of_node, "ngpios", &nr_gpios);
 490         if (rc < 0) {
 491                 dev_err(&pdev->dev, "Could not read ngpios property\n");
 492                 return -EINVAL;
 493         } else if (nr_gpios > MAX_NR_HW_SGPIO) {
 494                 dev_err(&pdev->dev, "Number of GPIOs exceeds the maximum of %d: %d\n",
 495                         MAX_NR_HW_SGPIO, nr_gpios);
 496                 return -EINVAL;
 497         }
 498         gpio->n_sgpio = nr_gpios;
 499
 500         rc = of_property_read_u32(pdev->dev.of_node, "bus-frequency", &sgpio_freq);
 501         if (rc < 0) {
 502                 dev_err(&pdev->dev, "Could not read bus-frequency property\n");
 503                 return -EINVAL;
 504         }
 505
 506         gpio->pclk = devm_clk_get(&pdev->dev, NULL);
 507         if (IS_ERR(gpio->pclk)) {
 508                 dev_err(&pdev->dev, "devm_clk_get failed\n");
 509                 return PTR_ERR(gpio->pclk);
 510         }
 511
 512         apb_freq = clk_get_rate(gpio->pclk);
 513
 514         /*
 515          * From the datasheet,
 516          *      SGPIO period = 1/PCLK * 2 * (GPIO254[31:16] + 1)
 517          *      period = 2 * (GPIO254[31:16] + 1) / PCLK
 518          *      frequency = 1 / (2 * (GPIO254[31:16] + 1) / PCLK)
 519          *      frequency = PCLK / (2 * (GPIO254[31:16] + 1))
 520          *      frequency * 2 * (GPIO254[31:16] + 1) = PCLK
 521          *      GPIO254[31:16] = PCLK / (frequency * 2) - 1
 522          */
 523         if (sgpio_freq == 0)
 524                 return -EINVAL;
 525
 526         sgpio_clk_div = (apb_freq / (sgpio_freq * 2)) - 1;
 527
 528         if (sgpio_clk_div > (1 << 16) - 1)
 529                 return -EINVAL;
 530
 531         iowrite32(FIELD_PREP(ASPEED_SGPIO_CLK_DIV_MASK, sgpio_clk_div) |
 532                   FIELD_PREP(ASPEED_SGPIO_PINS_MASK, (nr_gpios / 8)) |
 533                   ASPEED_SGPIO_ENABLE,
 534                   gpio->base + ASPEED_SGPIO_CTRL);
 535
 536         spin_lock_init(&gpio->lock);
 537
 538         gpio->chip.parent = &pdev->dev;
 539         gpio->chip.ngpio = MAX_NR_HW_SGPIO * 2;
 540         gpio->chip.init_valid_mask = aspeed_sgpio_init_valid_mask;
 541         gpio->chip.direction_input = aspeed_sgpio_dir_in;
 542         gpio->chip.direction_output = aspeed_sgpio_dir_out;
 543         gpio->chip.get_direction = aspeed_sgpio_get_direction;
 544         gpio->chip.request = NULL;
 545         gpio->chip.free = NULL;
 546         gpio->chip.get = aspeed_sgpio_get;
 547         gpio->chip.set = aspeed_sgpio_set;
 548         gpio->chip.set_config = NULL;
 549         gpio->chip.label = dev_name(&pdev->dev);
 550         gpio->chip.base = -1;
 551
 552         aspeed_sgpio_setup_irqs(gpio, pdev);
 553
 554         rc = devm_gpiochip_add_data(&pdev->dev, &gpio->chip, gpio);
 555         if (rc < 0)
 556                 return rc;
 557
 558         return 0;
 559 }
 560
 561 static struct platform_driver aspeed_sgpio_driver = {
 562         .driver = {
 563                 .name = KBUILD_MODNAME,
 564                 .of_match_table = aspeed_sgpio_of_table,
 565         },
 566 };
 567
 568 module_platform_driver_probe(aspeed_sgpio_driver, aspeed_sgpio_probe);
 569 MODULE_DESCRIPTION("Aspeed Serial GPIO Driver");
 570 MODULE_LICENSE("GPL");