/*

   *  Amiga Gayle IDE Driver

   *
   *     Created 9 Jul 1997 by Geert Uytterhoeven
   *
   *  This file is subject to the terms and conditions of the GNU General Public
   *  License.  See the file COPYING in the main directory of this archive for
   *  more details.
   */

  #include <linux/types.h>
  #include <linux/mm.h>
  #include <linux/interrupt.h>
  #include <linux/blkdev.h>

  #include <linux/ide.h>
  #include <linux/init.h>
  #include <linux/zorro.h>

  #include <linux/module.h>

  #include <linux/platform_device.h>

  
  #include <asm/setup.h>
  #include <asm/amigahw.h>
  #include <asm/amigaints.h>
  #include <asm/amigayle.h>
  
  
      /*

       *  Offsets from one of the above bases
       */

  #define GAYLE_CONTROL	0x101a

      /*
       *  These are at different offsets from the base
       */
  
  #define GAYLE_IRQ_4000	0xdd3020	/* MSB = 1, Harddisk is source of */
  #define GAYLE_IRQ_1200	0xda9000	/* interrupt */
  
  
      /*
       *  Offset of the secondary port for IDE doublers
       *  Note that GAYLE_CONTROL is NOT available then!
       */
  
  #define GAYLE_NEXT_PORT	0x1000

  #define GAYLE_NUM_HWIFS		2
  #define GAYLE_NUM_PROBE_HWIFS	(ide_doubler ? GAYLE_NUM_HWIFS : \
  					       GAYLE_NUM_HWIFS-1)
  #define GAYLE_HAS_CONTROL_REG	(!ide_doubler)

  static bool ide_doubler;

  module_param_named(doubler, ide_doubler, bool, 0);
  MODULE_PARM_DESC(doubler, "enable support for IDE doublers");

  
      /*
       *  Check and acknowledge the interrupt status
       */

  static int gayle_test_irq(ide_hwif_t *hwif)

  {

  	unsigned char ch;

  	ch = z_readb(hwif->io_ports.irq_addr);
  	if (!(ch & GAYLE_IRQ_IDE))
  		return 0;
  	return 1;

  }

  static void gayle_a1200_clear_irq(ide_drive_t *drive)

  {

  	ide_hwif_t *hwif = drive->hwif;

  	(void)z_readb(hwif->io_ports.status_addr);
  	z_writeb(0x7c, hwif->io_ports.irq_addr);

  }

  static void __init gayle_setup_ports(struct ide_hw *hw, unsigned long base,

  				     unsigned long ctl, unsigned long irq_port)

  {
  	int i;
  
  	memset(hw, 0, sizeof(*hw));

  	hw->io_ports.data_addr = base;

  
  	for (i = 1; i < 8; i++)

  		hw->io_ports_array[i] = base + 2 + i * 4;

  	hw->io_ports.ctl_addr = ctl;
  	hw->io_ports.irq_addr = irq_port;

  
  	hw->irq = IRQ_AMIGA_PORTS;

  }

  static const struct ide_port_ops gayle_a4000_port_ops = {
  	.test_irq		= gayle_test_irq,
  };

  static const struct ide_port_ops gayle_a1200_port_ops = {
  	.clear_irq		= gayle_a1200_clear_irq,

  	.test_irq		= gayle_test_irq,

  };

  static const struct ide_port_info gayle_port_info = {

  	.host_flags		= IDE_HFLAG_MMIO | IDE_HFLAG_SERIALIZE |
  				  IDE_HFLAG_NO_DMA,

  	.irq_flags		= IRQF_SHARED,

  	.chipset		= ide_generic,

  };

      /*
       *  Probe for a Gayle IDE interface (and optionally for an IDE doubler)
       */

  static int __init amiga_gayle_ide_probe(struct platform_device *pdev)

  {

  	struct resource *res;
  	struct gayle_ide_platform_data *pdata;
  	unsigned long base, ctrlport, irqport;
  	unsigned int i;
  	int error;
  	struct ide_hw hw[GAYLE_NUM_HWIFS], *hws[GAYLE_NUM_HWIFS];
  	struct ide_port_info d = gayle_port_info;
  	struct ide_host *host;
  
  	res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
  	if (!res)
  		return -ENODEV;
  
  	if (!request_mem_region(res->start, resource_size(res), "IDE"))
  		return -EBUSY;
  
  	pdata = pdev->dev.platform_data;
  	pr_info("ide: Gayle IDE controller (A%u style%s)
  ",
  		pdata->explicit_ack ? 1200 : 4000,
  		ide_doubler ? ", IDE doubler" : "");
  
  	base = (unsigned long)ZTWO_VADDR(pdata->base);
  	ctrlport = 0;
  	irqport = (unsigned long)ZTWO_VADDR(pdata->irqport);
  	if (pdata->explicit_ack)
  		d.port_ops = &gayle_a1200_port_ops;
  	else
  		d.port_ops = &gayle_a4000_port_ops;
  
  	for (i = 0; i < GAYLE_NUM_PROBE_HWIFS; i++, base += GAYLE_NEXT_PORT) {
  		if (GAYLE_HAS_CONTROL_REG)
  			ctrlport = base + GAYLE_CONTROL;
  
  		gayle_setup_ports(&hw[i], base, ctrlport, irqport);
  		hws[i] = &hw[i];

  	}

  	error = ide_host_add(&d, hws, i, &host);
  	if (error)
  		goto out;

  	platform_set_drvdata(pdev, host);
  	return 0;

  out:
  	release_mem_region(res->start, resource_size(res));
  	return error;
  }
  
  static int __exit amiga_gayle_ide_remove(struct platform_device *pdev)
  {
  	struct ide_host *host = platform_get_drvdata(pdev);
  	struct resource *res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
  
  	ide_host_remove(host);
  	release_mem_region(res->start, resource_size(res));
  	return 0;
  }

  static struct platform_driver amiga_gayle_ide_driver = {
  	.remove = __exit_p(amiga_gayle_ide_remove),
  	.driver   = {
  		.name	= "amiga-gayle-ide",
  		.owner	= THIS_MODULE,
  	},
  };

  static int __init amiga_gayle_ide_init(void)
  {
  	return platform_driver_probe(&amiga_gayle_ide_driver,
  				     amiga_gayle_ide_probe);
  }

  module_init(amiga_gayle_ide_init);

  static void __exit amiga_gayle_ide_exit(void)
  {
  	platform_driver_unregister(&amiga_gayle_ide_driver);

  }

  module_exit(amiga_gayle_ide_exit);

  
  MODULE_LICENSE("GPL");

  MODULE_ALIAS("platform:amiga-gayle-ide");