/*
   * linux/arch/arm/common/locomo.c
   *
   * Sharp LoCoMo support
   *
   * This program is free software; you can redistribute it and/or modify
   * it under the terms of the GNU General Public License version 2 as
   * published by the Free Software Foundation.
   *
   * This file contains all generic LoCoMo support.
   *
   * All initialization functions provided here are intended to be called
   * from machine specific code with proper arguments when required.
   *
   * Based on sa1111.c
   */
  
  #include <linux/module.h>
  #include <linux/init.h>
  #include <linux/kernel.h>
  #include <linux/delay.h>
  #include <linux/errno.h>
  #include <linux/ioport.h>
  #include <linux/platform_device.h>
  #include <linux/slab.h>
  #include <linux/spinlock.h>
  #include <linux/io.h>
  
  #include <mach/hardware.h>
  #include <asm/irq.h>
  #include <asm/mach/irq.h>
  
  #include <asm/hardware/locomo.h>
  
  /* LoCoMo Interrupts */
  #define IRQ_LOCOMO_KEY		(0)
  #define IRQ_LOCOMO_GPIO		(1)
  #define IRQ_LOCOMO_LT		(2)
  #define IRQ_LOCOMO_SPI		(3)
  
  /* M62332 output channel selection */
  #define M62332_EVR_CH	1	/* M62332 volume channel number  */
  				/*   0 : CH.1 , 1 : CH. 2        */
  /* DAC send data */
  #define	M62332_SLAVE_ADDR	0x4e	/* Slave address  */
  #define	M62332_W_BIT		0x00	/* W bit (0 only) */
  #define	M62332_SUB_ADDR		0x00	/* Sub address    */
  #define	M62332_A_BIT		0x00	/* A bit (0 only) */
  
  /* DAC setup and hold times (expressed in us) */
  #define DAC_BUS_FREE_TIME	5	/*   4.7 us */
  #define DAC_START_SETUP_TIME	5	/*   4.7 us */
  #define DAC_STOP_SETUP_TIME	4	/*   4.0 us */
  #define DAC_START_HOLD_TIME	5	/*   4.7 us */
  #define DAC_SCL_LOW_HOLD_TIME	5	/*   4.7 us */
  #define DAC_SCL_HIGH_HOLD_TIME	4	/*   4.0 us */
  #define DAC_DATA_SETUP_TIME	1	/*   250 ns */
  #define DAC_DATA_HOLD_TIME	1	/*   300 ns */
  #define DAC_LOW_SETUP_TIME	1	/*   300 ns */
  #define DAC_HIGH_SETUP_TIME	1	/*  1000 ns */
  
  /* the following is the overall data for the locomo chip */
  struct locomo {
  	struct device *dev;
  	unsigned long phys;
  	unsigned int irq;
  	int irq_base;
  	spinlock_t lock;
  	void __iomem *base;
  #ifdef CONFIG_PM
  	void *saved_state;
  #endif
  };
  
  struct locomo_dev_info {
  	unsigned long	offset;
  	unsigned long	length;
  	unsigned int	devid;
  	unsigned int	irq[1];
  	const char *	name;
  };
  
  /* All the locomo devices.  If offset is non-zero, the mapbase for the
   * locomo_dev will be set to the chip base plus offset.  If offset is
   * zero, then the mapbase for the locomo_dev will be set to zero.  An
   * offset of zero means the device only uses GPIOs or other helper
   * functions inside this file */
  static struct locomo_dev_info locomo_devices[] = {
  	{
  		.devid 		= LOCOMO_DEVID_KEYBOARD,
  		.irq		= { IRQ_LOCOMO_KEY },
  		.name		= "locomo-keyboard",
  		.offset		= LOCOMO_KEYBOARD,
  		.length		= 16,
  	},
  	{
  		.devid		= LOCOMO_DEVID_FRONTLIGHT,
  		.irq		= {},
  		.name		= "locomo-frontlight",
  		.offset		= LOCOMO_FRONTLIGHT,
  		.length		= 8,
  
  	},
  	{
  		.devid		= LOCOMO_DEVID_BACKLIGHT,
  		.irq		= {},
  		.name		= "locomo-backlight",
  		.offset		= LOCOMO_BACKLIGHT,
  		.length		= 8,
  	},
  	{
  		.devid		= LOCOMO_DEVID_AUDIO,
  		.irq		= {},
  		.name		= "locomo-audio",
  		.offset		= LOCOMO_AUDIO,
  		.length		= 4,
  	},
  	{
  		.devid		= LOCOMO_DEVID_LED,
  		.irq 		= {},
  		.name		= "locomo-led",
  		.offset		= LOCOMO_LED,
  		.length		= 8,
  	},
  	{
  		.devid		= LOCOMO_DEVID_UART,
  		.irq		= {},
  		.name		= "locomo-uart",
  		.offset		= 0,
  		.length		= 0,
  	},
  	{
  		.devid		= LOCOMO_DEVID_SPI,
  		.irq		= {},
  		.name		= "locomo-spi",
  		.offset		= LOCOMO_SPI,
  		.length		= 0x30,
  	},
  };
  
  static void locomo_handler(unsigned int irq, struct irq_desc *desc)
  {
  	struct locomo *lchip = irq_get_chip_data(irq);
  	int req, i;
  
  	/* Acknowledge the parent IRQ */
  	desc->irq_data.chip->irq_ack(&desc->irq_data);
  
  	/* check why this interrupt was generated */
  	req = locomo_readl(lchip->base + LOCOMO_ICR) & 0x0f00;
  
  	if (req) {
  		/* generate the next interrupt(s) */
  		irq = lchip->irq_base;
  		for (i = 0; i <= 3; i++, irq++) {
  			if (req & (0x0100 << i)) {
  				generic_handle_irq(irq);
  			}
  
  		}
  	}
  }
  
  static void locomo_ack_irq(struct irq_data *d)
  {
  }
  
  static void locomo_mask_irq(struct irq_data *d)
  {
  	struct locomo *lchip = irq_data_get_irq_chip_data(d);
  	unsigned int r;
  	r = locomo_readl(lchip->base + LOCOMO_ICR);
  	r &= ~(0x0010 << (d->irq - lchip->irq_base));
  	locomo_writel(r, lchip->base + LOCOMO_ICR);
  }
  
  static void locomo_unmask_irq(struct irq_data *d)
  {
  	struct locomo *lchip = irq_data_get_irq_chip_data(d);
  	unsigned int r;
  	r = locomo_readl(lchip->base + LOCOMO_ICR);
  	r |= (0x0010 << (d->irq - lchip->irq_base));
  	locomo_writel(r, lchip->base + LOCOMO_ICR);
  }
  
  static struct irq_chip locomo_chip = {
  	.name		= "LOCOMO",
  	.irq_ack	= locomo_ack_irq,
  	.irq_mask	= locomo_mask_irq,
  	.irq_unmask	= locomo_unmask_irq,
  };
  
  static void locomo_setup_irq(struct locomo *lchip)
  {
  	int irq = lchip->irq_base;
  
  	/*
  	 * Install handler for IRQ_LOCOMO_HW.
  	 */
  	irq_set_irq_type(lchip->irq, IRQ_TYPE_EDGE_FALLING);
  	irq_set_chip_data(lchip->irq, lchip);
  	irq_set_chained_handler(lchip->irq, locomo_handler);
  
  	/* Install handlers for IRQ_LOCOMO_* */
  	for ( ; irq <= lchip->irq_base + 3; irq++) {
  		irq_set_chip_and_handler(irq, &locomo_chip, handle_level_irq);
  		irq_set_chip_data(irq, lchip);
  		set_irq_flags(irq, IRQF_VALID | IRQF_PROBE);
  	}
  }
  
  
  static void locomo_dev_release(struct device *_dev)
  {
  	struct locomo_dev *dev = LOCOMO_DEV(_dev);
  
  	kfree(dev);
  }
  
  static int
  locomo_init_one_child(struct locomo *lchip, struct locomo_dev_info *info)
  {
  	struct locomo_dev *dev;
  	int ret;
  
  	dev = kzalloc(sizeof(struct locomo_dev), GFP_KERNEL);
  	if (!dev) {
  		ret = -ENOMEM;
  		goto out;
  	}
  
  	/*
  	 * If the parent device has a DMA mask associated with it,
  	 * propagate it down to the children.
  	 */
  	if (lchip->dev->dma_mask) {
  		dev->dma_mask = *lchip->dev->dma_mask;
  		dev->dev.dma_mask = &dev->dma_mask;
  	}
  
  	dev_set_name(&dev->dev, "%s", info->name);
  	dev->devid	 = info->devid;
  	dev->dev.parent  = lchip->dev;
  	dev->dev.bus     = &locomo_bus_type;
  	dev->dev.release = locomo_dev_release;
  	dev->dev.coherent_dma_mask = lchip->dev->coherent_dma_mask;
  
  	if (info->offset)
  		dev->mapbase = lchip->base + info->offset;
  	else
  		dev->mapbase = 0;
  	dev->length = info->length;
  
  	dev->irq[0] = (lchip->irq_base == NO_IRQ) ?
  			NO_IRQ : lchip->irq_base + info->irq[0];
  
  	ret = device_register(&dev->dev);
  	if (ret) {
   out:
  		kfree(dev);
  	}
  	return ret;
  }
  
  #ifdef CONFIG_PM
  
  struct locomo_save_data {
  	u16	LCM_GPO;
  	u16	LCM_SPICT;
  	u16	LCM_GPE;
  	u16	LCM_ASD;
  	u16	LCM_SPIMD;
  };
  
  static int locomo_suspend(struct platform_device *dev, pm_message_t state)
  {
  	struct locomo *lchip = platform_get_drvdata(dev);
  	struct locomo_save_data *save;
  	unsigned long flags;
  
  	save = kmalloc(sizeof(struct locomo_save_data), GFP_KERNEL);
  	if (!save)
  		return -ENOMEM;
  
  	lchip->saved_state = save;
  
  	spin_lock_irqsave(&lchip->lock, flags);
  
  	save->LCM_GPO     = locomo_readl(lchip->base + LOCOMO_GPO);	/* GPIO */
  	locomo_writel(0x00, lchip->base + LOCOMO_GPO);
  	save->LCM_SPICT   = locomo_readl(lchip->base + LOCOMO_SPI + LOCOMO_SPICT);	/* SPI */
  	locomo_writel(0x40, lchip->base + LOCOMO_SPI + LOCOMO_SPICT);
  	save->LCM_GPE     = locomo_readl(lchip->base + LOCOMO_GPE);	/* GPIO */
  	locomo_writel(0x00, lchip->base + LOCOMO_GPE);
  	save->LCM_ASD     = locomo_readl(lchip->base + LOCOMO_ASD);	/* ADSTART */
  	locomo_writel(0x00, lchip->base + LOCOMO_ASD);
  	save->LCM_SPIMD   = locomo_readl(lchip->base + LOCOMO_SPI + LOCOMO_SPIMD);	/* SPI */
  	locomo_writel(0x3C14, lchip->base + LOCOMO_SPI + LOCOMO_SPIMD);
  
  	locomo_writel(0x00, lchip->base + LOCOMO_PAIF);
  	locomo_writel(0x00, lchip->base + LOCOMO_DAC);
  	locomo_writel(0x00, lchip->base + LOCOMO_BACKLIGHT + LOCOMO_TC);
  
  	if ((locomo_readl(lchip->base + LOCOMO_LED + LOCOMO_LPT0) & 0x88) && (locomo_readl(lchip->base + LOCOMO_LED + LOCOMO_LPT1) & 0x88))
  		locomo_writel(0x00, lchip->base + LOCOMO_C32K); 	/* CLK32 off */
  	else
  		/* 18MHz already enabled, so no wait */
  		locomo_writel(0xc1, lchip->base + LOCOMO_C32K); 	/* CLK32 on */
  
  	locomo_writel(0x00, lchip->base + LOCOMO_TADC);		/* 18MHz clock off*/
  	locomo_writel(0x00, lchip->base + LOCOMO_AUDIO + LOCOMO_ACC);			/* 22MHz/24MHz clock off */
  	locomo_writel(0x00, lchip->base + LOCOMO_FRONTLIGHT + LOCOMO_ALS);			/* FL */
  
  	spin_unlock_irqrestore(&lchip->lock, flags);
  
  	return 0;
  }
  
  static int locomo_resume(struct platform_device *dev)
  {
  	struct locomo *lchip = platform_get_drvdata(dev);
  	struct locomo_save_data *save;
  	unsigned long r;
  	unsigned long flags;
  
  	save = lchip->saved_state;
  	if (!save)
  		return 0;
  
  	spin_lock_irqsave(&lchip->lock, flags);
  
  	locomo_writel(save->LCM_GPO, lchip->base + LOCOMO_GPO);
  	locomo_writel(save->LCM_SPICT, lchip->base + LOCOMO_SPI + LOCOMO_SPICT);
  	locomo_writel(save->LCM_GPE, lchip->base + LOCOMO_GPE);
  	locomo_writel(save->LCM_ASD, lchip->base + LOCOMO_ASD);
  	locomo_writel(save->LCM_SPIMD, lchip->base + LOCOMO_SPI + LOCOMO_SPIMD);
  
  	locomo_writel(0x00, lchip->base + LOCOMO_C32K);
  	locomo_writel(0x90, lchip->base + LOCOMO_TADC);
  
  	locomo_writel(0, lchip->base + LOCOMO_KEYBOARD + LOCOMO_KSC);
  	r = locomo_readl(lchip->base + LOCOMO_KEYBOARD + LOCOMO_KIC);
  	r &= 0xFEFF;
  	locomo_writel(r, lchip->base + LOCOMO_KEYBOARD + LOCOMO_KIC);
  	locomo_writel(0x1, lchip->base + LOCOMO_KEYBOARD + LOCOMO_KCMD);
  
  	spin_unlock_irqrestore(&lchip->lock, flags);
  
  	lchip->saved_state = NULL;
  	kfree(save);
  
  	return 0;
  }
  #endif
  
  
  /**
   *	locomo_probe - probe for a single LoCoMo chip.
   *	@phys_addr: physical address of device.
   *
   *	Probe for a LoCoMo chip.  This must be called
   *	before any other locomo-specific code.
   *
   *	Returns:
   *	%-ENODEV	device not found.
   *	%-EBUSY		physical address already marked in-use.
   *	%0		successful.
   */
  static int
  __locomo_probe(struct device *me, struct resource *mem, int irq)
  {
  	struct locomo_platform_data *pdata = me->platform_data;
  	struct locomo *lchip;
  	unsigned long r;
  	int i, ret = -ENODEV;
  
  	lchip = kzalloc(sizeof(struct locomo), GFP_KERNEL);
  	if (!lchip)
  		return -ENOMEM;
  
  	spin_lock_init(&lchip->lock);
  
  	lchip->dev = me;
  	dev_set_drvdata(lchip->dev, lchip);
  
  	lchip->phys = mem->start;
  	lchip->irq = irq;
  	lchip->irq_base = (pdata) ? pdata->irq_base : NO_IRQ;
  
  	/*
  	 * Map the whole region.  This also maps the
  	 * registers for our children.
  	 */
  	lchip->base = ioremap(mem->start, PAGE_SIZE);
  	if (!lchip->base) {
  		ret = -ENOMEM;
  		goto out;
  	}
  
  	/* locomo initialize */
  	locomo_writel(0, lchip->base + LOCOMO_ICR);
  	/* KEYBOARD */
  	locomo_writel(0, lchip->base + LOCOMO_KEYBOARD + LOCOMO_KIC);
  
  	/* GPIO */
  	locomo_writel(0, lchip->base + LOCOMO_GPO);
  	locomo_writel((LOCOMO_GPIO(1) | LOCOMO_GPIO(2) | LOCOMO_GPIO(13) | LOCOMO_GPIO(14))
  			, lchip->base + LOCOMO_GPE);
  	locomo_writel((LOCOMO_GPIO(1) | LOCOMO_GPIO(2) | LOCOMO_GPIO(13) | LOCOMO_GPIO(14))
  			, lchip->base + LOCOMO_GPD);
  	locomo_writel(0, lchip->base + LOCOMO_GIE);
  
  	/* Frontlight */
  	locomo_writel(0, lchip->base + LOCOMO_FRONTLIGHT + LOCOMO_ALS);
  	locomo_writel(0, lchip->base + LOCOMO_FRONTLIGHT + LOCOMO_ALD);
  
  	/* Longtime timer */
  	locomo_writel(0, lchip->base + LOCOMO_LTINT);
  	/* SPI */
  	locomo_writel(0, lchip->base + LOCOMO_SPI + LOCOMO_SPIIE);
  
  	locomo_writel(6 + 8 + 320 + 30 - 10, lchip->base + LOCOMO_ASD);
  	r = locomo_readl(lchip->base + LOCOMO_ASD);
  	r |= 0x8000;
  	locomo_writel(r, lchip->base + LOCOMO_ASD);
  
  	locomo_writel(6 + 8 + 320 + 30 - 10 - 128 + 4, lchip->base + LOCOMO_HSD);
  	r = locomo_readl(lchip->base + LOCOMO_HSD);
  	r |= 0x8000;
  	locomo_writel(r, lchip->base + LOCOMO_HSD);
  
  	locomo_writel(128 / 8, lchip->base + LOCOMO_HSC);
  
  	/* XON */
  	locomo_writel(0x80, lchip->base + LOCOMO_TADC);
  	udelay(1000);
  	/* CLK9MEN */
  	r = locomo_readl(lchip->base + LOCOMO_TADC);
  	r |= 0x10;
  	locomo_writel(r, lchip->base + LOCOMO_TADC);
  	udelay(100);
  
  	/* init DAC */
  	r = locomo_readl(lchip->base + LOCOMO_DAC);
  	r |= LOCOMO_DAC_SCLOEB | LOCOMO_DAC_SDAOEB;
  	locomo_writel(r, lchip->base + LOCOMO_DAC);
  
  	r = locomo_readl(lchip->base + LOCOMO_VER);
  	printk(KERN_INFO "LoCoMo Chip: %lu%lu
  ", (r >> 8), (r & 0xff));
  
  	/*
  	 * The interrupt controller must be initialised before any
  	 * other device to ensure that the interrupts are available.
  	 */
  	if (lchip->irq != NO_IRQ && lchip->irq_base != NO_IRQ)
  		locomo_setup_irq(lchip);
  
  	for (i = 0; i < ARRAY_SIZE(locomo_devices); i++)
  		locomo_init_one_child(lchip, &locomo_devices[i]);
  	return 0;
  
   out:
  	kfree(lchip);
  	return ret;
  }
  
  static int locomo_remove_child(struct device *dev, void *data)
  {
  	device_unregister(dev);
  	return 0;
  } 
  
  static void __locomo_remove(struct locomo *lchip)
  {
  	device_for_each_child(lchip->dev, NULL, locomo_remove_child);
  
  	if (lchip->irq != NO_IRQ) {
  		irq_set_chained_handler(lchip->irq, NULL);
  		irq_set_handler_data(lchip->irq, NULL);
  	}
  
  	iounmap(lchip->base);
  	kfree(lchip);
  }
  
  static int locomo_probe(struct platform_device *dev)
  {
  	struct resource *mem;
  	int irq;
  
  	mem = platform_get_resource(dev, IORESOURCE_MEM, 0);
  	if (!mem)
  		return -EINVAL;
  	irq = platform_get_irq(dev, 0);
  	if (irq < 0)
  		return -ENXIO;
  
  	return __locomo_probe(&dev->dev, mem, irq);
  }
  
  static int locomo_remove(struct platform_device *dev)
  {
  	struct locomo *lchip = platform_get_drvdata(dev);
  
  	if (lchip) {
  		__locomo_remove(lchip);
  		platform_set_drvdata(dev, NULL);
  	}
  
  	return 0;
  }
  
  /*
   *	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.
   */
  static struct platform_driver locomo_device_driver = {
  	.probe		= locomo_probe,
  	.remove		= locomo_remove,
  #ifdef CONFIG_PM
  	.suspend	= locomo_suspend,
  	.resume		= locomo_resume,
  #endif
  	.driver		= {
  		.name	= "locomo",
  	},
  };
  
  /*
   *	Get the parent device driver (us) structure
   *	from a child function device
   */
  static inline struct locomo *locomo_chip_driver(struct locomo_dev *ldev)
  {
  	return (struct locomo *)dev_get_drvdata(ldev->dev.parent);
  }
  
  void locomo_gpio_set_dir(struct device *dev, unsigned int bits, unsigned int dir)
  {
  	struct locomo *lchip = dev_get_drvdata(dev);
  	unsigned long flags;
  	unsigned int r;
  
  	if (!lchip)
  		return;
  
  	spin_lock_irqsave(&lchip->lock, flags);
  
  	r = locomo_readl(lchip->base + LOCOMO_GPD);
  	if (dir)
  		r |= bits;
  	else
  		r &= ~bits;
  	locomo_writel(r, lchip->base + LOCOMO_GPD);
  
  	r = locomo_readl(lchip->base + LOCOMO_GPE);
  	if (dir)
  		r |= bits;
  	else
  		r &= ~bits;
  	locomo_writel(r, lchip->base + LOCOMO_GPE);
  
  	spin_unlock_irqrestore(&lchip->lock, flags);
  }
  EXPORT_SYMBOL(locomo_gpio_set_dir);
  
  int locomo_gpio_read_level(struct device *dev, unsigned int bits)
  {
  	struct locomo *lchip = dev_get_drvdata(dev);
  	unsigned long flags;
  	unsigned int ret;
  
  	if (!lchip)
  		return -ENODEV;
  
  	spin_lock_irqsave(&lchip->lock, flags);
  	ret = locomo_readl(lchip->base + LOCOMO_GPL);
  	spin_unlock_irqrestore(&lchip->lock, flags);
  
  	ret &= bits;
  	return ret;
  }
  EXPORT_SYMBOL(locomo_gpio_read_level);
  
  int locomo_gpio_read_output(struct device *dev, unsigned int bits)
  {
  	struct locomo *lchip = dev_get_drvdata(dev);
  	unsigned long flags;
  	unsigned int ret;
  
  	if (!lchip)
  		return -ENODEV;
  
  	spin_lock_irqsave(&lchip->lock, flags);
  	ret = locomo_readl(lchip->base + LOCOMO_GPO);
  	spin_unlock_irqrestore(&lchip->lock, flags);
  
  	ret &= bits;
  	return ret;
  }
  EXPORT_SYMBOL(locomo_gpio_read_output);
  
  void locomo_gpio_write(struct device *dev, unsigned int bits, unsigned int set)
  {
  	struct locomo *lchip = dev_get_drvdata(dev);
  	unsigned long flags;
  	unsigned int r;
  
  	if (!lchip)
  		return;
  
  	spin_lock_irqsave(&lchip->lock, flags);
  
  	r = locomo_readl(lchip->base + LOCOMO_GPO);
  	if (set)
  		r |= bits;
  	else
  		r &= ~bits;
  	locomo_writel(r, lchip->base + LOCOMO_GPO);
  
  	spin_unlock_irqrestore(&lchip->lock, flags);
  }
  EXPORT_SYMBOL(locomo_gpio_write);
  
  static void locomo_m62332_sendbit(void *mapbase, int bit)
  {
  	unsigned int r;
  
  	r = locomo_readl(mapbase + LOCOMO_DAC);
  	r &=  ~(LOCOMO_DAC_SCLOEB);
  	locomo_writel(r, mapbase + LOCOMO_DAC);
  	udelay(DAC_LOW_SETUP_TIME);	/* 300 nsec */
  	udelay(DAC_DATA_HOLD_TIME);	/* 300 nsec */
  	r = locomo_readl(mapbase + LOCOMO_DAC);
  	r &=  ~(LOCOMO_DAC_SCLOEB);
  	locomo_writel(r, mapbase + LOCOMO_DAC);
  	udelay(DAC_LOW_SETUP_TIME);	/* 300 nsec */
  	udelay(DAC_SCL_LOW_HOLD_TIME);	/* 4.7 usec */
  
  	if (bit & 1) {
  		r = locomo_readl(mapbase + LOCOMO_DAC);
  		r |=  LOCOMO_DAC_SDAOEB;
  		locomo_writel(r, mapbase + LOCOMO_DAC);
  		udelay(DAC_HIGH_SETUP_TIME);	/* 1000 nsec */
  	} else {
  		r = locomo_readl(mapbase + LOCOMO_DAC);
  		r &=  ~(LOCOMO_DAC_SDAOEB);
  		locomo_writel(r, mapbase + LOCOMO_DAC);
  		udelay(DAC_LOW_SETUP_TIME);	/* 300 nsec */
  	}
  
  	udelay(DAC_DATA_SETUP_TIME);	/* 250 nsec */
  	r = locomo_readl(mapbase + LOCOMO_DAC);
  	r |=  LOCOMO_DAC_SCLOEB;
  	locomo_writel(r, mapbase + LOCOMO_DAC);
  	udelay(DAC_HIGH_SETUP_TIME);	/* 1000 nsec */
  	udelay(DAC_SCL_HIGH_HOLD_TIME);	/*  4.0 usec */
  }
  
  void locomo_m62332_senddata(struct locomo_dev *ldev, unsigned int dac_data, int channel)
  {
  	struct locomo *lchip = locomo_chip_driver(ldev);
  	int i;
  	unsigned char data;
  	unsigned int r;
  	void *mapbase = lchip->base;
  	unsigned long flags;
  
  	spin_lock_irqsave(&lchip->lock, flags);
  
  	/* Start */
  	udelay(DAC_BUS_FREE_TIME);	/* 5.0 usec */
  	r = locomo_readl(mapbase + LOCOMO_DAC);
  	r |=  LOCOMO_DAC_SCLOEB | LOCOMO_DAC_SDAOEB;
  	locomo_writel(r, mapbase + LOCOMO_DAC);
  	udelay(DAC_HIGH_SETUP_TIME);	/* 1000 nsec */
  	udelay(DAC_SCL_HIGH_HOLD_TIME);	/* 4.0 usec */
  	r = locomo_readl(mapbase + LOCOMO_DAC);
  	r &=  ~(LOCOMO_DAC_SDAOEB);
  	locomo_writel(r, mapbase + LOCOMO_DAC);
  	udelay(DAC_START_HOLD_TIME);	/* 5.0 usec */
  	udelay(DAC_DATA_HOLD_TIME);	/* 300 nsec */
  
  	/* Send slave address and W bit (LSB is W bit) */
  	data = (M62332_SLAVE_ADDR << 1) | M62332_W_BIT;
  	for (i = 1; i <= 8; i++) {
  		locomo_m62332_sendbit(mapbase, data >> (8 - i));
  	}
  
  	/* Check A bit */
  	r = locomo_readl(mapbase + LOCOMO_DAC);
  	r &=  ~(LOCOMO_DAC_SCLOEB);
  	locomo_writel(r, mapbase + LOCOMO_DAC);
  	udelay(DAC_LOW_SETUP_TIME);	/* 300 nsec */
  	udelay(DAC_SCL_LOW_HOLD_TIME);	/* 4.7 usec */
  	r = locomo_readl(mapbase + LOCOMO_DAC);
  	r &=  ~(LOCOMO_DAC_SDAOEB);
  	locomo_writel(r, mapbase + LOCOMO_DAC);
  	udelay(DAC_LOW_SETUP_TIME);	/* 300 nsec */
  	r = locomo_readl(mapbase + LOCOMO_DAC);
  	r |=  LOCOMO_DAC_SCLOEB;
  	locomo_writel(r, mapbase + LOCOMO_DAC);
  	udelay(DAC_HIGH_SETUP_TIME);	/* 1000 nsec */
  	udelay(DAC_SCL_HIGH_HOLD_TIME);	/* 4.7 usec */
  	if (locomo_readl(mapbase + LOCOMO_DAC) & LOCOMO_DAC_SDAOEB) {	/* High is error */
  		printk(KERN_WARNING "locomo: m62332_senddata Error 1
  ");
  		goto out;
  	}
  
  	/* Send Sub address (LSB is channel select) */
  	/*    channel = 0 : ch1 select              */
  	/*            = 1 : ch2 select              */
  	data = M62332_SUB_ADDR + channel;
  	for (i = 1; i <= 8; i++) {
  		locomo_m62332_sendbit(mapbase, data >> (8 - i));
  	}
  
  	/* Check A bit */
  	r = locomo_readl(mapbase + LOCOMO_DAC);
  	r &=  ~(LOCOMO_DAC_SCLOEB);
  	locomo_writel(r, mapbase + LOCOMO_DAC);
  	udelay(DAC_LOW_SETUP_TIME);	/* 300 nsec */
  	udelay(DAC_SCL_LOW_HOLD_TIME);	/* 4.7 usec */
  	r = locomo_readl(mapbase + LOCOMO_DAC);
  	r &=  ~(LOCOMO_DAC_SDAOEB);
  	locomo_writel(r, mapbase + LOCOMO_DAC);
  	udelay(DAC_LOW_SETUP_TIME);	/* 300 nsec */
  	r = locomo_readl(mapbase + LOCOMO_DAC);
  	r |=  LOCOMO_DAC_SCLOEB;
  	locomo_writel(r, mapbase + LOCOMO_DAC);
  	udelay(DAC_HIGH_SETUP_TIME);	/* 1000 nsec */
  	udelay(DAC_SCL_HIGH_HOLD_TIME);	/* 4.7 usec */
  	if (locomo_readl(mapbase + LOCOMO_DAC) & LOCOMO_DAC_SDAOEB) {	/* High is error */
  		printk(KERN_WARNING "locomo: m62332_senddata Error 2
  ");
  		goto out;
  	}
  
  	/* Send DAC data */
  	for (i = 1; i <= 8; i++) {
  		locomo_m62332_sendbit(mapbase, dac_data >> (8 - i));
  	}
  
  	/* Check A bit */
  	r = locomo_readl(mapbase + LOCOMO_DAC);
  	r &=  ~(LOCOMO_DAC_SCLOEB);
  	locomo_writel(r, mapbase + LOCOMO_DAC);
  	udelay(DAC_LOW_SETUP_TIME);	/* 300 nsec */
  	udelay(DAC_SCL_LOW_HOLD_TIME);	/* 4.7 usec */
  	r = locomo_readl(mapbase + LOCOMO_DAC);
  	r &=  ~(LOCOMO_DAC_SDAOEB);
  	locomo_writel(r, mapbase + LOCOMO_DAC);
  	udelay(DAC_LOW_SETUP_TIME);	/* 300 nsec */
  	r = locomo_readl(mapbase + LOCOMO_DAC);
  	r |=  LOCOMO_DAC_SCLOEB;
  	locomo_writel(r, mapbase + LOCOMO_DAC);
  	udelay(DAC_HIGH_SETUP_TIME);	/* 1000 nsec */
  	udelay(DAC_SCL_HIGH_HOLD_TIME);	/* 4.7 usec */
  	if (locomo_readl(mapbase + LOCOMO_DAC) & LOCOMO_DAC_SDAOEB) {	/* High is error */
  		printk(KERN_WARNING "locomo: m62332_senddata Error 3
  ");
  	}
  
  out:
  	/* stop */
  	r = locomo_readl(mapbase + LOCOMO_DAC);
  	r &=  ~(LOCOMO_DAC_SCLOEB);
  	locomo_writel(r, mapbase + LOCOMO_DAC);
  	udelay(DAC_LOW_SETUP_TIME);	/* 300 nsec */
  	udelay(DAC_SCL_LOW_HOLD_TIME);	/* 4.7 usec */
  	r = locomo_readl(mapbase + LOCOMO_DAC);
  	r |=  LOCOMO_DAC_SCLOEB;
  	locomo_writel(r, mapbase + LOCOMO_DAC);
  	udelay(DAC_HIGH_SETUP_TIME);	/* 1000 nsec */
  	udelay(DAC_SCL_HIGH_HOLD_TIME);	/* 4 usec */
  	r = locomo_readl(mapbase + LOCOMO_DAC);
  	r |=  LOCOMO_DAC_SDAOEB;
  	locomo_writel(r, mapbase + LOCOMO_DAC);
  	udelay(DAC_HIGH_SETUP_TIME);	/* 1000 nsec */
  	udelay(DAC_SCL_HIGH_HOLD_TIME);	/* 4 usec */
  
  	r = locomo_readl(mapbase + LOCOMO_DAC);
  	r |=  LOCOMO_DAC_SCLOEB | LOCOMO_DAC_SDAOEB;
  	locomo_writel(r, mapbase + LOCOMO_DAC);
  	udelay(DAC_LOW_SETUP_TIME);	/* 1000 nsec */
  	udelay(DAC_SCL_LOW_HOLD_TIME);	/* 4.7 usec */
  
  	spin_unlock_irqrestore(&lchip->lock, flags);
  }
  EXPORT_SYMBOL(locomo_m62332_senddata);
  
  /*
   *	Frontlight control
   */
  
  void locomo_frontlight_set(struct locomo_dev *dev, int duty, int vr, int bpwf)
  {
  	unsigned long flags;
  	struct locomo *lchip = locomo_chip_driver(dev);
  
  	if (vr)
  		locomo_gpio_write(dev->dev.parent, LOCOMO_GPIO_FL_VR, 1);
  	else
  		locomo_gpio_write(dev->dev.parent, LOCOMO_GPIO_FL_VR, 0);
  
  	spin_lock_irqsave(&lchip->lock, flags);
  	locomo_writel(bpwf, lchip->base + LOCOMO_FRONTLIGHT + LOCOMO_ALS);
  	udelay(100);
  	locomo_writel(duty, lchip->base + LOCOMO_FRONTLIGHT + LOCOMO_ALD);
  	locomo_writel(bpwf | LOCOMO_ALC_EN, lchip->base + LOCOMO_FRONTLIGHT + LOCOMO_ALS);
  	spin_unlock_irqrestore(&lchip->lock, flags);
  }
  EXPORT_SYMBOL(locomo_frontlight_set);
  
  /*
   *	LoCoMo "Register Access Bus."
   *
   *	We model this as a regular bus type, and hang devices directly
   *	off this.
   */
  static int locomo_match(struct device *_dev, struct device_driver *_drv)
  {
  	struct locomo_dev *dev = LOCOMO_DEV(_dev);
  	struct locomo_driver *drv = LOCOMO_DRV(_drv);
  
  	return dev->devid == drv->devid;
  }
  
  static int locomo_bus_suspend(struct device *dev, pm_message_t state)
  {
  	struct locomo_dev *ldev = LOCOMO_DEV(dev);
  	struct locomo_driver *drv = LOCOMO_DRV(dev->driver);
  	int ret = 0;
  
  	if (drv && drv->suspend)
  		ret = drv->suspend(ldev, state);
  	return ret;
  }
  
  static int locomo_bus_resume(struct device *dev)
  {
  	struct locomo_dev *ldev = LOCOMO_DEV(dev);
  	struct locomo_driver *drv = LOCOMO_DRV(dev->driver);
  	int ret = 0;
  
  	if (drv && drv->resume)
  		ret = drv->resume(ldev);
  	return ret;
  }
  
  static int locomo_bus_probe(struct device *dev)
  {
  	struct locomo_dev *ldev = LOCOMO_DEV(dev);
  	struct locomo_driver *drv = LOCOMO_DRV(dev->driver);
  	int ret = -ENODEV;
  
  	if (drv->probe)
  		ret = drv->probe(ldev);
  	return ret;
  }
  
  static int locomo_bus_remove(struct device *dev)
  {
  	struct locomo_dev *ldev = LOCOMO_DEV(dev);
  	struct locomo_driver *drv = LOCOMO_DRV(dev->driver);
  	int ret = 0;
  
  	if (drv->remove)
  		ret = drv->remove(ldev);
  	return ret;
  }
  
  struct bus_type locomo_bus_type = {
  	.name		= "locomo-bus",
  	.match		= locomo_match,
  	.probe		= locomo_bus_probe,
  	.remove		= locomo_bus_remove,
  	.suspend	= locomo_bus_suspend,
  	.resume		= locomo_bus_resume,
  };
  
  int locomo_driver_register(struct locomo_driver *driver)
  {
  	driver->drv.bus = &locomo_bus_type;
  	return driver_register(&driver->drv);
  }
  EXPORT_SYMBOL(locomo_driver_register);
  
  void locomo_driver_unregister(struct locomo_driver *driver)
  {
  	driver_unregister(&driver->drv);
  }
  EXPORT_SYMBOL(locomo_driver_unregister);
  
  static int __init locomo_init(void)
  {
  	int ret = bus_register(&locomo_bus_type);
  	if (ret == 0)
  		platform_driver_register(&locomo_device_driver);
  	return ret;
  }
  
  static void __exit locomo_exit(void)
  {
  	platform_driver_unregister(&locomo_device_driver);
  	bus_unregister(&locomo_bus_type);
  }
  
  module_init(locomo_init);
  module_exit(locomo_exit);
  
  MODULE_DESCRIPTION("Sharp LoCoMo core driver");
  MODULE_LICENSE("GPL");
  MODULE_AUTHOR("John Lenz <lenz@cs.wisc.edu>");