// SPDX-License-Identifier: GPL-2.0-only /* * linux/arch/arm/common/sa1111.c * * SA1111 support * * Original code by John Dorsey * * This file contains all generic SA1111 support. * * All initialization functions provided here are intended to be called * from machine specific code with proper arguments when required. */ #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #ifdef CONFIG_ARCH_SA1100 #include #endif /* SA1111 IRQs */ #define IRQ_GPAIN0 (0) #define IRQ_GPAIN1 (1) #define IRQ_GPAIN2 (2) #define IRQ_GPAIN3 (3) #define IRQ_GPBIN0 (4) #define IRQ_GPBIN1 (5) #define IRQ_GPBIN2 (6) #define IRQ_GPBIN3 (7) #define IRQ_GPBIN4 (8) #define IRQ_GPBIN5 (9) #define IRQ_GPCIN0 (10) #define IRQ_GPCIN1 (11) #define IRQ_GPCIN2 (12) #define IRQ_GPCIN3 (13) #define IRQ_GPCIN4 (14) #define IRQ_GPCIN5 (15) #define IRQ_GPCIN6 (16) #define IRQ_GPCIN7 (17) #define IRQ_MSTXINT (18) #define IRQ_MSRXINT (19) #define IRQ_MSSTOPERRINT (20) #define IRQ_TPTXINT (21) #define IRQ_TPRXINT (22) #define IRQ_TPSTOPERRINT (23) #define SSPXMTINT (24) #define SSPRCVINT (25) #define SSPROR (26) #define AUDXMTDMADONEA (32) #define AUDRCVDMADONEA (33) #define AUDXMTDMADONEB (34) #define AUDRCVDMADONEB (35) #define AUDTFSR (36) #define AUDRFSR (37) #define AUDTUR (38) #define AUDROR (39) #define AUDDTS (40) #define AUDRDD (41) #define AUDSTO (42) #define IRQ_USBPWR (43) #define IRQ_HCIM (44) #define IRQ_HCIBUFFACC (45) #define IRQ_HCIRMTWKP (46) #define IRQ_NHCIMFCIR (47) #define IRQ_USB_PORT_RESUME (48) #define IRQ_S0_READY_NINT (49) #define IRQ_S1_READY_NINT (50) #define IRQ_S0_CD_VALID (51) #define IRQ_S1_CD_VALID (52) #define IRQ_S0_BVD1_STSCHG (53) #define IRQ_S1_BVD1_STSCHG (54) #define SA1111_IRQ_NR (55) extern void sa1110_mb_enable(void); extern void sa1110_mb_disable(void); /* * We keep the following data for the overall SA1111. Note that the * struct device and struct resource are "fake"; they should be supplied * by the bus above us. However, in the interests of getting all SA1111 * drivers converted over to the device model, we provide this as an * anchor point for all the other drivers. */ struct sa1111 { struct device *dev; struct clk *clk; unsigned long phys; int irq; int irq_base; /* base for cascaded on-chip IRQs */ spinlock_t lock; void __iomem *base; struct sa1111_platform_data *pdata; struct irq_domain *irqdomain; struct gpio_chip gc; #ifdef CONFIG_PM void *saved_state; #endif }; /* * We _really_ need to eliminate this. Its only users * are the PWM and DMA checking code. */ static struct sa1111 *g_sa1111; struct sa1111_dev_info { unsigned long offset; unsigned long skpcr_mask; bool dma; unsigned int devid; unsigned int hwirq[6]; }; static struct sa1111_dev_info sa1111_devices[] = { { .offset = SA1111_USB, .skpcr_mask = SKPCR_UCLKEN, .dma = true, .devid = SA1111_DEVID_USB, .hwirq = { IRQ_USBPWR, IRQ_HCIM, IRQ_HCIBUFFACC, IRQ_HCIRMTWKP, IRQ_NHCIMFCIR, IRQ_USB_PORT_RESUME }, }, { .offset = 0x0600, .skpcr_mask = SKPCR_I2SCLKEN | SKPCR_L3CLKEN, .dma = true, .devid = SA1111_DEVID_SAC, .hwirq = { AUDXMTDMADONEA, AUDXMTDMADONEB, AUDRCVDMADONEA, AUDRCVDMADONEB }, }, { .offset = 0x0800, .skpcr_mask = SKPCR_SCLKEN, .devid = SA1111_DEVID_SSP, }, { .offset = SA1111_KBD, .skpcr_mask = SKPCR_PTCLKEN, .devid = SA1111_DEVID_PS2_KBD, .hwirq = { IRQ_TPRXINT, IRQ_TPTXINT }, }, { .offset = SA1111_MSE, .skpcr_mask = SKPCR_PMCLKEN, .devid = SA1111_DEVID_PS2_MSE, .hwirq = { IRQ_MSRXINT, IRQ_MSTXINT }, }, { .offset = 0x1800, .skpcr_mask = 0, .devid = SA1111_DEVID_PCMCIA, .hwirq = { IRQ_S0_READY_NINT, IRQ_S0_CD_VALID, IRQ_S0_BVD1_STSCHG, IRQ_S1_READY_NINT, IRQ_S1_CD_VALID, IRQ_S1_BVD1_STSCHG, }, }, }; static int sa1111_map_irq(struct sa1111 *sachip, irq_hw_number_t hwirq) { return irq_create_mapping(sachip->irqdomain, hwirq); } /* * SA1111 interrupt support. Since clearing an IRQ while there are * active IRQs causes the interrupt output to pulse, the upper levels * will call us again if there are more interrupts to process. */ static void sa1111_irq_handler(struct irq_desc *desc) { unsigned int stat0, stat1, i; struct sa1111 *sachip = irq_desc_get_handler_data(desc); struct irq_domain *irqdomain; void __iomem *mapbase = sachip->base + SA1111_INTC; stat0 = readl_relaxed(mapbase + SA1111_INTSTATCLR0); stat1 = readl_relaxed(mapbase + SA1111_INTSTATCLR1); writel_relaxed(stat0, mapbase + SA1111_INTSTATCLR0); desc->irq_data.chip->irq_ack(&desc->irq_data); writel_relaxed(stat1, mapbase + SA1111_INTSTATCLR1); if (stat0 == 0 && stat1 == 0) { do_bad_IRQ(desc); return; } irqdomain = sachip->irqdomain; for (i = 0; stat0; i++, stat0 >>= 1) if (stat0 & 1) generic_handle_domain_irq(irqdomain, i); for (i = 32; stat1; i++, stat1 >>= 1) if (stat1 & 1) generic_handle_domain_irq(irqdomain, i); /* For level-based interrupts */ desc->irq_data.chip->irq_unmask(&desc->irq_data); } static u32 sa1111_irqmask(struct irq_data *d) { return BIT(irqd_to_hwirq(d) & 31); } static int sa1111_irqbank(struct irq_data *d) { return (irqd_to_hwirq(d) / 32) * 4; } static void sa1111_ack_irq(struct irq_data *d) { } static void sa1111_mask_irq(struct irq_data *d) { struct sa1111 *sachip = irq_data_get_irq_chip_data(d); void __iomem *mapbase = sachip->base + SA1111_INTC + sa1111_irqbank(d); u32 ie; ie = readl_relaxed(mapbase + SA1111_INTEN0); ie &= ~sa1111_irqmask(d); writel(ie, mapbase + SA1111_INTEN0); } static void sa1111_unmask_irq(struct irq_data *d) { struct sa1111 *sachip = irq_data_get_irq_chip_data(d); void __iomem *mapbase = sachip->base + SA1111_INTC + sa1111_irqbank(d); u32 ie; ie = readl_relaxed(mapbase + SA1111_INTEN0); ie |= sa1111_irqmask(d); writel_relaxed(ie, mapbase + SA1111_INTEN0); } /* * Attempt to re-trigger the interrupt. The SA1111 contains a register * (INTSET) which claims to do this. However, in practice no amount of * manipulation of INTEN and INTSET guarantees that the interrupt will * be triggered. In fact, its very difficult, if not impossible to get * INTSET to re-trigger the interrupt. */ static int sa1111_retrigger_irq(struct irq_data *d) { struct sa1111 *sachip = irq_data_get_irq_chip_data(d); void __iomem *mapbase = sachip->base + SA1111_INTC + sa1111_irqbank(d); u32 ip, mask = sa1111_irqmask(d); int i; ip = readl_relaxed(mapbase + SA1111_INTPOL0); for (i = 0; i < 8; i++) { writel_relaxed(ip ^ mask, mapbase + SA1111_INTPOL0); writel_relaxed(ip, mapbase + SA1111_INTPOL0); if (readl_relaxed(mapbase + SA1111_INTSTATCLR0) & mask) break; } if (i == 8) { pr_err("Danger Will Robinson: failed to re-trigger IRQ%d\n", d->irq); return 0; } return 1; } static int sa1111_type_irq(struct irq_data *d, unsigned int flags) { struct sa1111 *sachip = irq_data_get_irq_chip_data(d); void __iomem *mapbase = sachip->base + SA1111_INTC + sa1111_irqbank(d); u32 ip, mask = sa1111_irqmask(d); if (flags == IRQ_TYPE_PROBE) return 0; if ((!(flags & IRQ_TYPE_EDGE_RISING) ^ !(flags & IRQ_TYPE_EDGE_FALLING)) == 0) return -EINVAL; ip = readl_relaxed(mapbase + SA1111_INTPOL0); if (flags & IRQ_TYPE_EDGE_RISING) ip &= ~mask; else ip |= mask; writel_relaxed(ip, mapbase + SA1111_INTPOL0); writel_relaxed(ip, mapbase + SA1111_WAKEPOL0); return 0; } static int sa1111_wake_irq(struct irq_data *d, unsigned int on) { struct sa1111 *sachip = irq_data_get_irq_chip_data(d); void __iomem *mapbase = sachip->base + SA1111_INTC + sa1111_irqbank(d); u32 we, mask = sa1111_irqmask(d); we = readl_relaxed(mapbase + SA1111_WAKEEN0); if (on) we |= mask; else we &= ~mask; writel_relaxed(we, mapbase + SA1111_WAKEEN0); return 0; } static struct irq_chip sa1111_irq_chip = { .name = "SA1111", .irq_ack = sa1111_ack_irq, .irq_mask = sa1111_mask_irq, .irq_unmask = sa1111_unmask_irq, .irq_retrigger = sa1111_retrigger_irq, .irq_set_type = sa1111_type_irq, .irq_set_wake = sa1111_wake_irq, }; static int sa1111_irqdomain_map(struct irq_domain *d, unsigned int irq, irq_hw_number_t hwirq) { struct sa1111 *sachip = d->host_data; /* Disallow unavailable interrupts */ if (hwirq > SSPROR && hwirq < AUDXMTDMADONEA) return -EINVAL; irq_set_chip_data(irq, sachip); irq_set_chip_and_handler(irq, &sa1111_irq_chip, handle_edge_irq); irq_clear_status_flags(irq, IRQ_NOREQUEST | IRQ_NOPROBE); return 0; } static const struct irq_domain_ops sa1111_irqdomain_ops = { .map = sa1111_irqdomain_map, .xlate = irq_domain_xlate_twocell, }; static int sa1111_setup_irq(struct sa1111 *sachip, unsigned irq_base) { void __iomem *irqbase = sachip->base + SA1111_INTC; int ret; /* * We're guaranteed that this region hasn't been taken. */ request_mem_region(sachip->phys + SA1111_INTC, 512, "irq"); ret = irq_alloc_descs(-1, irq_base, SA1111_IRQ_NR, -1); if (ret <= 0) { dev_err(sachip->dev, "unable to allocate %u irqs: %d\n", SA1111_IRQ_NR, ret); if (ret == 0) ret = -EINVAL; return ret; } sachip->irq_base = ret; /* disable all IRQs */ writel_relaxed(0, irqbase + SA1111_INTEN0); writel_relaxed(0, irqbase + SA1111_INTEN1); writel_relaxed(0, irqbase + SA1111_WAKEEN0); writel_relaxed(0, irqbase + SA1111_WAKEEN1); /* * detect on rising edge. Note: Feb 2001 Errata for SA1111 * specifies that S0ReadyInt and S1ReadyInt should be '1'. */ writel_relaxed(0, irqbase + SA1111_INTPOL0); writel_relaxed(BIT(IRQ_S0_READY_NINT & 31) | BIT(IRQ_S1_READY_NINT & 31), irqbase + SA1111_INTPOL1); /* clear all IRQs */ writel_relaxed(~0, irqbase + SA1111_INTSTATCLR0); writel_relaxed(~0, irqbase + SA1111_INTSTATCLR1); sachip->irqdomain = irq_domain_add_linear(NULL, SA1111_IRQ_NR, &sa1111_irqdomain_ops, sachip); if (!sachip->irqdomain) { irq_free_descs(sachip->irq_base, SA1111_IRQ_NR); return -ENOMEM; } irq_domain_associate_many(sachip->irqdomain, sachip->irq_base + IRQ_GPAIN0, IRQ_GPAIN0, SSPROR + 1 - IRQ_GPAIN0); irq_domain_associate_many(sachip->irqdomain, sachip->irq_base + AUDXMTDMADONEA, AUDXMTDMADONEA, IRQ_S1_BVD1_STSCHG + 1 - AUDXMTDMADONEA); /* * Register SA1111 interrupt */ irq_set_irq_type(sachip->irq, IRQ_TYPE_EDGE_RISING); irq_set_chained_handler_and_data(sachip->irq, sa1111_irq_handler, sachip); dev_info(sachip->dev, "Providing IRQ%u-%u\n", sachip->irq_base, sachip->irq_base + SA1111_IRQ_NR - 1); return 0; } static void sa1111_remove_irq(struct sa1111 *sachip) { struct irq_domain *domain = sachip->irqdomain; void __iomem *irqbase = sachip->base + SA1111_INTC; int i; /* disable all IRQs */ writel_relaxed(0, irqbase + SA1111_INTEN0); writel_relaxed(0, irqbase + SA1111_INTEN1); writel_relaxed(0, irqbase + SA1111_WAKEEN0); writel_relaxed(0, irqbase + SA1111_WAKEEN1); irq_set_chained_handler_and_data(sachip->irq, NULL, NULL); for (i = 0; i < SA1111_IRQ_NR; i++) irq_dispose_mapping(irq_find_mapping(domain, i)); irq_domain_remove(domain); release_mem_region(sachip->phys + SA1111_INTC, 512); } enum { SA1111_GPIO_PXDDR = (SA1111_GPIO_PADDR - SA1111_GPIO_PADDR), SA1111_GPIO_PXDRR = (SA1111_GPIO_PADRR - SA1111_GPIO_PADDR), SA1111_GPIO_PXDWR = (SA1111_GPIO_PADWR - SA1111_GPIO_PADDR), SA1111_GPIO_PXSDR = (SA1111_GPIO_PASDR - SA1111_GPIO_PADDR), SA1111_GPIO_PXSSR = (SA1111_GPIO_PASSR - SA1111_GPIO_PADDR), }; static struct sa1111 *gc_to_sa1111(struct gpio_chip *gc) { return container_of(gc, struct sa1111, gc); } static void __iomem *sa1111_gpio_map_reg(struct sa1111 *sachip, unsigned offset) { void __iomem *reg = sachip->base + SA1111_GPIO; if (offset < 4) return reg + SA1111_GPIO_PADDR; if (offset < 10) return reg + SA1111_GPIO_PBDDR; if (offset < 18) return reg + SA1111_GPIO_PCDDR; return NULL; } static u32 sa1111_gpio_map_bit(unsigned offset) { if (offset < 4) return BIT(offset); if (offset < 10) return BIT(offset - 4); if (offset < 18) return BIT(offset - 10); return 0; } static void sa1111_gpio_modify(void __iomem *reg, u32 mask, u32 set) { u32 val; val = readl_relaxed(reg); val &= ~mask; val |= mask & set; writel_relaxed(val, reg); } static int sa1111_gpio_get_direction(struct gpio_chip *gc, unsigned offset) { struct sa1111 *sachip = gc_to_sa1111(gc); void __iomem *reg = sa1111_gpio_map_reg(sachip, offset); u32 mask = sa1111_gpio_map_bit(offset); return !!(readl_relaxed(reg + SA1111_GPIO_PXDDR) & mask); } static int sa1111_gpio_direction_input(struct gpio_chip *gc, unsigned offset) { struct sa1111 *sachip = gc_to_sa1111(gc); unsigned long flags; void __iomem *reg = sa1111_gpio_map_reg(sachip, offset); u32 mask = sa1111_gpio_map_bit(offset); spin_lock_irqsave(&sachip->lock, flags); sa1111_gpio_modify(reg + SA1111_GPIO_PXDDR, mask, mask); sa1111_gpio_modify(reg + SA1111_GPIO_PXSDR, mask, mask); spin_unlock_irqrestore(&sachip->lock, flags); return 0; } static int sa1111_gpio_direction_output(struct gpio_chip *gc, unsigned offset, int value) { struct sa1111 *sachip = gc_to_sa1111(gc); unsigned long flags; void __iomem *reg = sa1111_gpio_map_reg(sachip, offset); u32 mask = sa1111_gpio_map_bit(offset); spin_lock_irqsave(&sachip->lock, flags); sa1111_gpio_modify(reg + SA1111_GPIO_PXDWR, mask, value ? mask : 0); sa1111_gpio_modify(reg + SA1111_GPIO_PXSSR, mask, value ? mask : 0); sa1111_gpio_modify(reg + SA1111_GPIO_PXDDR, mask, 0); sa1111_gpio_modify(reg + SA1111_GPIO_PXSDR, mask, 0); spin_unlock_irqrestore(&sachip->lock, flags); return 0; } static int sa1111_gpio_get(struct gpio_chip *gc, unsigned offset) { struct sa1111 *sachip = gc_to_sa1111(gc); void __iomem *reg = sa1111_gpio_map_reg(sachip, offset); u32 mask = sa1111_gpio_map_bit(offset); return !!(readl_relaxed(reg + SA1111_GPIO_PXDRR) & mask); } static void sa1111_gpio_set(struct gpio_chip *gc, unsigned offset, int value) { struct sa1111 *sachip = gc_to_sa1111(gc); unsigned long flags; void __iomem *reg = sa1111_gpio_map_reg(sachip, offset); u32 mask = sa1111_gpio_map_bit(offset); spin_lock_irqsave(&sachip->lock, flags); sa1111_gpio_modify(reg + SA1111_GPIO_PXDWR, mask, value ? mask : 0); sa1111_gpio_modify(reg + SA1111_GPIO_PXSSR, mask, value ? mask : 0); spin_unlock_irqrestore(&sachip->lock, flags); } static void sa1111_gpio_set_multiple(struct gpio_chip *gc, unsigned long *mask, unsigned long *bits) { struct sa1111 *sachip = gc_to_sa1111(gc); unsigned long flags; void __iomem *reg = sachip->base + SA1111_GPIO; u32 msk, val; msk = *mask; val = *bits; spin_lock_irqsave(&sachip->lock, flags); sa1111_gpio_modify(reg + SA1111_GPIO_PADWR, msk & 15, val); sa1111_gpio_modify(reg + SA1111_GPIO_PASSR, msk & 15, val); sa1111_gpio_modify(reg + SA1111_GPIO_PBDWR, (msk >> 4) & 255, val >> 4); sa1111_gpio_modify(reg + SA1111_GPIO_PBSSR, (msk >> 4) & 255, val >> 4); sa1111_gpio_modify(reg + SA1111_GPIO_PCDWR, (msk >> 12) & 255, val >> 12); sa1111_gpio_modify(reg + SA1111_GPIO_PCSSR, (msk >> 12) & 255, val >> 12); spin_unlock_irqrestore(&sachip->lock, flags); } static int sa1111_gpio_to_irq(struct gpio_chip *gc, unsigned offset) { struct sa1111 *sachip = gc_to_sa1111(gc); return sa1111_map_irq(sachip, offset); } static int sa1111_setup_gpios(struct sa1111 *sachip) { sachip->gc.label = "sa1111"; sachip->gc.parent = sachip->dev; sachip->gc.owner = THIS_MODULE; sachip->gc.get_direction = sa1111_gpio_get_direction; sachip->gc.direction_input = sa1111_gpio_direction_input; sachip->gc.direction_output = sa1111_gpio_direction_output; sachip->gc.get = sa1111_gpio_get; sachip->gc.set = sa1111_gpio_set; sachip->gc.set_multiple = sa1111_gpio_set_multiple; sachip->gc.to_irq = sa1111_gpio_to_irq; sachip->gc.base = -1; sachip->gc.ngpio = 18; return devm_gpiochip_add_data(sachip->dev, &sachip->gc, sachip); } /* * Bring the SA1111 out of reset. This requires a set procedure: * 1. nRESET asserted (by hardware) * 2. CLK turned on from SA1110 * 3. nRESET deasserted * 4. VCO turned on, PLL_BYPASS turned off * 5. Wait lock time, then assert RCLKEn * 7. PCR set to allow clocking of individual functions * * Until we've done this, the only registers we can access are: * SBI_SKCR * SBI_SMCR * SBI_SKID */ static void sa1111_wake(struct sa1111 *sachip) { unsigned long flags, r; spin_lock_irqsave(&sachip->lock, flags); clk_enable(sachip->clk); /* * Turn VCO on, and disable PLL Bypass. */ r = readl_relaxed(sachip->base + SA1111_SKCR); r &= ~SKCR_VCO_OFF; writel_relaxed(r, sachip->base + SA1111_SKCR); r |= SKCR_PLL_BYPASS | SKCR_OE_EN; writel_relaxed(r, sachip->base + SA1111_SKCR); /* * Wait lock time. SA1111 manual _doesn't_ * specify a figure for this! We choose 100us. */ udelay(100); /* * Enable RCLK. We also ensure that RDYEN is set. */ r |= SKCR_RCLKEN | SKCR_RDYEN; writel_relaxed(r, sachip->base + SA1111_SKCR); /* * Wait 14 RCLK cycles for the chip to finish coming out * of reset. (RCLK=24MHz). This is 590ns. */ udelay(1); /* * Ensure all clocks are initially off. */ writel_relaxed(0, sachip->base + SA1111_SKPCR); spin_unlock_irqrestore(&sachip->lock, flags); } #ifdef CONFIG_ARCH_SA1100 static u32 sa1111_dma_mask[] = { ~0, ~(1 << 20), ~(1 << 23), ~(1 << 24), ~(1 << 25), ~(1 << 20), ~(1 << 20), 0, }; /* * Configure the SA1111 shared memory controller. */ static void sa1111_configure_smc(struct sa1111 *sachip, int sdram, unsigned int drac, unsigned int cas_latency) { unsigned int smcr = SMCR_DTIM | SMCR_MBGE | FInsrt(drac, SMCR_DRAC); if (cas_latency == 3) smcr |= SMCR_CLAT; writel_relaxed(smcr, sachip->base + SA1111_SMCR); /* * Now clear the bits in the DMA mask to work around the SA1111 * DMA erratum (Intel StrongARM SA-1111 Microprocessor Companion * Chip Specification Update, June 2000, Erratum #7). */ if (sachip->dev->dma_mask) *sachip->dev->dma_mask &= sa1111_dma_mask[drac >> 2]; sachip->dev->coherent_dma_mask &= sa1111_dma_mask[drac >> 2]; } #endif static void sa1111_dev_release(struct device *_dev) { struct sa1111_dev *dev = to_sa1111_device(_dev); kfree(dev); } static int sa1111_init_one_child(struct sa1111 *sachip, struct resource *parent, struct sa1111_dev_info *info) { struct sa1111_dev *dev; unsigned i; int ret; dev = kzalloc(sizeof(struct sa1111_dev), GFP_KERNEL); if (!dev) { ret = -ENOMEM; goto err_alloc; } device_initialize(&dev->dev); dev_set_name(&dev->dev, "%4.4lx", info->offset); dev->devid = info->devid; dev->dev.parent = sachip->dev; dev->dev.bus = &sa1111_bus_type; dev->dev.release = sa1111_dev_release; dev->res.start = sachip->phys + info->offset; dev->res.end = dev->res.start + 511; dev->res.name = dev_name(&dev->dev); dev->res.flags = IORESOURCE_MEM; dev->mapbase = sachip->base + info->offset; dev->skpcr_mask = info->skpcr_mask; for (i = 0; i < ARRAY_SIZE(info->hwirq); i++) dev->hwirq[i] = info->hwirq[i]; /* * If the parent device has a DMA mask associated with it, and * this child supports DMA, propagate it down to the children. */ if (info->dma && sachip->dev->dma_mask) { dev->dma_mask = *sachip->dev->dma_mask; dev->dev.dma_mask = &dev->dma_mask; dev->dev.coherent_dma_mask = sachip->dev->coherent_dma_mask; } ret = request_resource(parent, &dev->res); if (ret) { dev_err(sachip->dev, "failed to allocate resource for %s\n", dev->res.name); goto err_resource; } ret = device_add(&dev->dev); if (ret) goto err_add; return 0; err_add: release_resource(&dev->res); err_resource: put_device(&dev->dev); err_alloc: return ret; } static int __sa1111_probe(struct device *me, struct resource *mem, int irq) { struct sa1111_platform_data *pd = me->platform_data; struct sa1111 *sachip; unsigned long id; unsigned int has_devs; int i, ret = -ENODEV; if (!pd) return -EINVAL; sachip = devm_kzalloc(me, sizeof(struct sa1111), GFP_KERNEL); if (!sachip) return -ENOMEM; sachip->clk = devm_clk_get(me, "SA1111_CLK"); if (IS_ERR(sachip->clk)) return PTR_ERR(sachip->clk); ret = clk_prepare(sachip->clk); if (ret) return ret; spin_lock_init(&sachip->lock); sachip->dev = me; dev_set_drvdata(sachip->dev, sachip); sachip->pdata = pd; sachip->phys = mem->start; sachip->irq = irq; /* * Map the whole region. This also maps the * registers for our children. */ sachip->base = ioremap(mem->start, PAGE_SIZE * 2); if (!sachip->base) { ret = -ENOMEM; goto err_clk_unprep; } /* * Probe for the chip. Only touch the SBI registers. */ id = readl_relaxed(sachip->base + SA1111_SKID); if ((id & SKID_ID_MASK) != SKID_SA1111_ID) { printk(KERN_DEBUG "SA1111 not detected: ID = %08lx\n", id); ret = -ENODEV; goto err_unmap; } pr_info("SA1111 Microprocessor Companion Chip: silicon revision %lx, metal revision %lx\n", (id & SKID_SIREV_MASK) >> 4, id & SKID_MTREV_MASK); /* * We found it. Wake the chip up, and initialise. */ sa1111_wake(sachip); /* * The interrupt controller must be initialised before any * other device to ensure that the interrupts are available. */ ret = sa1111_setup_irq(sachip, pd->irq_base); if (ret) goto err_clk; /* Setup the GPIOs - should really be done after the IRQ setup */ ret = sa1111_setup_gpios(sachip); if (ret) goto err_irq; #ifdef CONFIG_ARCH_SA1100 { unsigned int val; /* * The SDRAM configuration of the SA1110 and the SA1111 must * match. This is very important to ensure that SA1111 accesses * don't corrupt the SDRAM. Note that this ungates the SA1111's * MBGNT signal, so we must have called sa1110_mb_disable() * beforehand. */ sa1111_configure_smc(sachip, 1, FExtr(MDCNFG, MDCNFG_SA1110_DRAC0), FExtr(MDCNFG, MDCNFG_SA1110_TDL0)); /* * We only need to turn on DCLK whenever we want to use the * DMA. It can otherwise be held firmly in the off position. * (currently, we always enable it.) */ val = readl_relaxed(sachip->base + SA1111_SKPCR); writel_relaxed(val | SKPCR_DCLKEN, sachip->base + SA1111_SKPCR); /* * Enable the SA1110 memory bus request and grant signals. */ sa1110_mb_enable(); } #endif g_sa1111 = sachip; has_devs = ~0; if (pd) has_devs &= ~pd->disable_devs; for (i = 0; i < ARRAY_SIZE(sa1111_devices); i++) if (sa1111_devices[i].devid & has_devs) sa1111_init_one_child(sachip, mem, &sa1111_devices[i]); return 0; err_irq: sa1111_remove_irq(sachip); err_clk: clk_disable(sachip->clk); err_unmap: iounmap(sachip->base); err_clk_unprep: clk_unprepare(sachip->clk); return ret; } static int sa1111_remove_one(struct device *dev, void *data) { struct sa1111_dev *sadev = to_sa1111_device(dev); if (dev->bus != &sa1111_bus_type) return 0; device_del(&sadev->dev); release_resource(&sadev->res); put_device(&sadev->dev); return 0; } static void __sa1111_remove(struct sa1111 *sachip) { device_for_each_child(sachip->dev, NULL, sa1111_remove_one); sa1111_remove_irq(sachip); clk_disable(sachip->clk); clk_unprepare(sachip->clk); iounmap(sachip->base); } struct sa1111_save_data { unsigned int skcr; unsigned int skpcr; unsigned int skcdr; unsigned char skaud; unsigned char skpwm0; unsigned char skpwm1; /* * Interrupt controller */ unsigned int intpol0; unsigned int intpol1; unsigned int inten0; unsigned int inten1; unsigned int wakepol0; unsigned int wakepol1; unsigned int wakeen0; unsigned int wakeen1; }; #ifdef CONFIG_PM static int sa1111_suspend_noirq(struct device *dev) { struct sa1111 *sachip = dev_get_drvdata(dev); struct sa1111_save_data *save; unsigned long flags; unsigned int val; void __iomem *base; save = kmalloc(sizeof(struct sa1111_save_data), GFP_KERNEL); if (!save) return -ENOMEM; sachip->saved_state = save; spin_lock_irqsave(&sachip->lock, flags); /* * Save state. */ base = sachip->base; save->skcr = readl_relaxed(base + SA1111_SKCR); save->skpcr = readl_relaxed(base + SA1111_SKPCR); save->skcdr = readl_relaxed(base + SA1111_SKCDR); save->skaud = readl_relaxed(base + SA1111_SKAUD); save->skpwm0 = readl_relaxed(base + SA1111_SKPWM0); save->skpwm1 = readl_relaxed(base + SA1111_SKPWM1); writel_relaxed(0, sachip->base + SA1111_SKPWM0); writel_relaxed(0, sachip->base + SA1111_SKPWM1); base = sachip->base + SA1111_INTC; save->intpol0 = readl_relaxed(base + SA1111_INTPOL0); save->intpol1 = readl_relaxed(base + SA1111_INTPOL1); save->inten0 = readl_relaxed(base + SA1111_INTEN0); save->inten1 = readl_relaxed(base + SA1111_INTEN1); save->wakepol0 = readl_relaxed(base + SA1111_WAKEPOL0); save->wakepol1 = readl_relaxed(base + SA1111_WAKEPOL1); save->wakeen0 = readl_relaxed(base + SA1111_WAKEEN0); save->wakeen1 = readl_relaxed(base + SA1111_WAKEEN1); /* * Disable. */ val = readl_relaxed(sachip->base + SA1111_SKCR); writel_relaxed(val | SKCR_SLEEP, sachip->base + SA1111_SKCR); clk_disable(sachip->clk); spin_unlock_irqrestore(&sachip->lock, flags); #ifdef CONFIG_ARCH_SA1100 sa1110_mb_disable(); #endif return 0; } /* * sa1111_resume - Restore the SA1111 device state. * @dev: device to restore * * Restore the general state of the SA1111; clock control and * interrupt controller. Other parts of the SA1111 must be * restored by their respective drivers, and must be called * via LDM after this function. */ static int sa1111_resume_noirq(struct device *dev) { struct sa1111 *sachip = dev_get_drvdata(dev); struct sa1111_save_data *save; unsigned long flags, id; void __iomem *base; save = sachip->saved_state; if (!save) return 0; /* * Ensure that the SA1111 is still here. * FIXME: shouldn't do this here. */ id = readl_relaxed(sachip->base + SA1111_SKID); if ((id & SKID_ID_MASK) != SKID_SA1111_ID) { __sa1111_remove(sachip); dev_set_drvdata(dev, NULL); kfree(save); return 0; } /* * First of all, wake up the chip. */ sa1111_wake(sachip); #ifdef CONFIG_ARCH_SA1100 /* Enable the memory bus request/grant signals */ sa1110_mb_enable(); #endif /* * Only lock for write ops. Also, sa1111_wake must be called with * released spinlock! */ spin_lock_irqsave(&sachip->lock, flags); writel_relaxed(0, sachip->base + SA1111_INTC + SA1111_INTEN0); writel_relaxed(0, sachip->base + SA1111_INTC + SA1111_INTEN1); base = sachip->base; writel_relaxed(save->skcr, base + SA1111_SKCR); writel_relaxed(save->skpcr, base + SA1111_SKPCR); writel_relaxed(save->skcdr, base + SA1111_SKCDR); writel_relaxed(save->skaud, base + SA1111_SKAUD); writel_relaxed(save->skpwm0, base + SA1111_SKPWM0); writel_relaxed(save->skpwm1, base + SA1111_SKPWM1); base = sachip->base + SA1111_INTC; writel_relaxed(save->intpol0, base + SA1111_INTPOL0); writel_relaxed(save->intpol1, base + SA1111_INTPOL1); writel_relaxed(save->inten0, base + SA1111_INTEN0); writel_relaxed(save->inten1, base + SA1111_INTEN1); writel_relaxed(save->wakepol0, base + SA1111_WAKEPOL0); writel_relaxed(save->wakepol1, base + SA1111_WAKEPOL1); writel_relaxed(save->wakeen0, base + SA1111_WAKEEN0); writel_relaxed(save->wakeen1, base + SA1111_WAKEEN1); spin_unlock_irqrestore(&sachip->lock, flags); sachip->saved_state = NULL; kfree(save); return 0; } #else #define sa1111_suspend_noirq NULL #define sa1111_resume_noirq NULL #endif /** * sa1111_probe - probe for a single SA1111 chip. * @pdev: platform device. * * Probe for a SA1111 chip. This must be called * before any other SA1111-specific code. * * Returns: * * %-ENODEV - device not found. * * %-ENOMEM - memory allocation failure. * * %-EBUSY - physical address already marked in-use. * * %-EINVAL - no platform data passed * * %0 - successful. */ static int sa1111_probe(struct platform_device *pdev) { struct resource *mem; int irq; mem = platform_get_resource(pdev, IORESOURCE_MEM, 0); if (!mem) return -EINVAL; irq = platform_get_irq(pdev, 0); if (irq < 0) return irq; return __sa1111_probe(&pdev->dev, mem, irq); } static void sa1111_remove(struct platform_device *pdev) { struct sa1111 *sachip = platform_get_drvdata(pdev); if (sachip) { #ifdef CONFIG_PM kfree(sachip->saved_state); sachip->saved_state = NULL; #endif __sa1111_remove(sachip); platform_set_drvdata(pdev, NULL); } } static struct dev_pm_ops sa1111_pm_ops = { .suspend_noirq = sa1111_suspend_noirq, .resume_noirq = sa1111_resume_noirq, }; /* * Not sure if this should be on the system bus or not yet. * We really want some way to register a system device at * the per-machine level, and then have this driver pick * up the registered devices. * * We also need to handle the SDRAM configuration for * PXA250/SA1110 machine classes. */ static struct platform_driver sa1111_device_driver = { .probe = sa1111_probe, .remove = sa1111_remove, .driver = { .name = "sa1111", .pm = &sa1111_pm_ops, }, }; /* * Get the parent device driver (us) structure * from a child function device */ static inline struct sa1111 *sa1111_chip_driver(struct sa1111_dev *sadev) { return (struct sa1111 *)dev_get_drvdata(sadev->dev.parent); } /* * The bits in the opdiv field are non-linear. */ static unsigned char opdiv_table[] = { 1, 4, 2, 8 }; static unsigned int __sa1111_pll_clock(struct sa1111 *sachip) { unsigned int skcdr, fbdiv, ipdiv, opdiv; skcdr = readl_relaxed(sachip->base + SA1111_SKCDR); fbdiv = (skcdr & 0x007f) + 2; ipdiv = ((skcdr & 0x0f80) >> 7) + 2; opdiv = opdiv_table[(skcdr & 0x3000) >> 12]; return 3686400 * fbdiv / (ipdiv * opdiv); } /** * sa1111_pll_clock - return the current PLL clock frequency. * @sadev: SA1111 function block * * BUG: we should look at SKCR. We also blindly believe that * the chip is being fed with the 3.6864MHz clock. * * Returns the PLL clock in Hz. */ unsigned int sa1111_pll_clock(struct sa1111_dev *sadev) { struct sa1111 *sachip = sa1111_chip_driver(sadev); return __sa1111_pll_clock(sachip); } EXPORT_SYMBOL(sa1111_pll_clock); /** * sa1111_select_audio_mode - select I2S or AC link mode * @sadev: SA1111 function block * @mode: One of %SA1111_AUDIO_ACLINK or %SA1111_AUDIO_I2S * * Frob the SKCR to select AC Link mode or I2S mode for * the audio block. */ void sa1111_select_audio_mode(struct sa1111_dev *sadev, int mode) { struct sa1111 *sachip = sa1111_chip_driver(sadev); unsigned long flags; unsigned int val; spin_lock_irqsave(&sachip->lock, flags); val = readl_relaxed(sachip->base + SA1111_SKCR); if (mode == SA1111_AUDIO_I2S) { val &= ~SKCR_SELAC; } else { val |= SKCR_SELAC; } writel_relaxed(val, sachip->base + SA1111_SKCR); spin_unlock_irqrestore(&sachip->lock, flags); } EXPORT_SYMBOL(sa1111_select_audio_mode); /** * sa1111_set_audio_rate - set the audio sample rate * @sadev: SA1111 SAC function block * @rate: sample rate to select */ int sa1111_set_audio_rate(struct sa1111_dev *sadev, int rate) { struct sa1111 *sachip = sa1111_chip_driver(sadev); unsigned int div; if (sadev->devid != SA1111_DEVID_SAC) return -EINVAL; div = (__sa1111_pll_clock(sachip) / 256 + rate / 2) / rate; if (div == 0) div = 1; if (div > 128) div = 128; writel_relaxed(div - 1, sachip->base + SA1111_SKAUD); return 0; } EXPORT_SYMBOL(sa1111_set_audio_rate); /** * sa1111_get_audio_rate - get the audio sample rate * @sadev: SA1111 SAC function block device */ int sa1111_get_audio_rate(struct sa1111_dev *sadev) { struct sa1111 *sachip = sa1111_chip_driver(sadev); unsigned long div; if (sadev->devid != SA1111_DEVID_SAC) return -EINVAL; div = readl_relaxed(sachip->base + SA1111_SKAUD) + 1; return __sa1111_pll_clock(sachip) / (256 * div); } EXPORT_SYMBOL(sa1111_get_audio_rate); /* * Individual device operations. */ /** * sa1111_enable_device - enable an on-chip SA1111 function block * @sadev: SA1111 function block device to enable */ int sa1111_enable_device(struct sa1111_dev *sadev) { struct sa1111 *sachip = sa1111_chip_driver(sadev); unsigned long flags; unsigned int val; int ret = 0; if (sachip->pdata && sachip->pdata->enable) ret = sachip->pdata->enable(sachip->pdata->data, sadev->devid); if (ret == 0) { spin_lock_irqsave(&sachip->lock, flags); val = readl_relaxed(sachip->base + SA1111_SKPCR); writel_relaxed(val | sadev->skpcr_mask, sachip->base + SA1111_SKPCR); spin_unlock_irqrestore(&sachip->lock, flags); } return ret; } EXPORT_SYMBOL(sa1111_enable_device); /** * sa1111_disable_device - disable an on-chip SA1111 function block * @sadev: SA1111 function block device to disable */ void sa1111_disable_device(struct sa1111_dev *sadev) { struct sa1111 *sachip = sa1111_chip_driver(sadev); unsigned long flags; unsigned int val; spin_lock_irqsave(&sachip->lock, flags); val = readl_relaxed(sachip->base + SA1111_SKPCR); writel_relaxed(val & ~sadev->skpcr_mask, sachip->base + SA1111_SKPCR); spin_unlock_irqrestore(&sachip->lock, flags); if (sachip->pdata && sachip->pdata->disable) sachip->pdata->disable(sachip->pdata->data, sadev->devid); } EXPORT_SYMBOL(sa1111_disable_device); int sa1111_get_irq(struct sa1111_dev *sadev, unsigned num) { struct sa1111 *sachip = sa1111_chip_driver(sadev); if (num >= ARRAY_SIZE(sadev->hwirq)) return -EINVAL; return sa1111_map_irq(sachip, sadev->hwirq[num]); } EXPORT_SYMBOL_GPL(sa1111_get_irq); /* * SA1111 "Register Access Bus." * * We model this as a regular bus type, and hang devices directly * off this. */ static int sa1111_match(struct device *_dev, const struct device_driver *_drv) { struct sa1111_dev *dev = to_sa1111_device(_dev); const struct sa1111_driver *drv = SA1111_DRV(_drv); return !!(dev->devid & drv->devid); } static int sa1111_bus_probe(struct device *dev) { struct sa1111_dev *sadev = to_sa1111_device(dev); struct sa1111_driver *drv = SA1111_DRV(dev->driver); int ret = -ENODEV; if (drv->probe) ret = drv->probe(sadev); return ret; } static void sa1111_bus_remove(struct device *dev) { struct sa1111_dev *sadev = to_sa1111_device(dev); struct sa1111_driver *drv = SA1111_DRV(dev->driver); if (drv->remove) drv->remove(sadev); } struct bus_type sa1111_bus_type = { .name = "sa1111-rab", .match = sa1111_match, .probe = sa1111_bus_probe, .remove = sa1111_bus_remove, }; EXPORT_SYMBOL(sa1111_bus_type); int sa1111_driver_register(struct sa1111_driver *driver) { driver->drv.bus = &sa1111_bus_type; return driver_register(&driver->drv); } EXPORT_SYMBOL(sa1111_driver_register); void sa1111_driver_unregister(struct sa1111_driver *driver) { driver_unregister(&driver->drv); } EXPORT_SYMBOL(sa1111_driver_unregister); static int __init sa1111_init(void) { int ret = bus_register(&sa1111_bus_type); if (ret == 0) platform_driver_register(&sa1111_device_driver); return ret; } static void __exit sa1111_exit(void) { platform_driver_unregister(&sa1111_device_driver); bus_unregister(&sa1111_bus_type); } subsys_initcall(sa1111_init); module_exit(sa1111_exit); MODULE_DESCRIPTION("Intel Corporation SA1111 core driver"); MODULE_LICENSE("GPL");