680 lines
		
	
	
		
			16 KiB
		
	
	
	
		
			C
		
	
	
	
			
		
		
	
	
			680 lines
		
	
	
		
			16 KiB
		
	
	
	
		
			C
		
	
	
	
/*
 | 
						|
 * Copyright (c) 2011 Aeroflex Gaisler
 | 
						|
 *
 | 
						|
 * BSD license:
 | 
						|
 *
 | 
						|
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 | 
						|
 * of this software and associated documentation files (the "Software"), to deal
 | 
						|
 * in the Software without restriction, including without limitation the rights
 | 
						|
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 | 
						|
 * copies of the Software, and to permit persons to whom the Software is
 | 
						|
 * furnished to do so, subject to the following conditions:
 | 
						|
 *
 | 
						|
 * The above copyright notice and this permission notice shall be included in
 | 
						|
 * all copies or substantial portions of the Software.
 | 
						|
 *
 | 
						|
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 | 
						|
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 | 
						|
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 | 
						|
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 | 
						|
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 | 
						|
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 | 
						|
 * THE SOFTWARE.
 | 
						|
 */
 | 
						|
 | 
						|
 | 
						|
#include <asm-leon/amba.h>
 | 
						|
#undef AMBA_TYPE_AHBIO_ADDR
 | 
						|
#include <asm-leon/lambapp.h>
 | 
						|
#include <string.h>
 | 
						|
 | 
						|
#define AMBA_CONF_AREA 0xff000
 | 
						|
#define AMBA_AHB_SLAVE_CONF_AREA (1 << 11)
 | 
						|
#define AMBA_APB_SLAVES 16
 | 
						|
 | 
						|
#define DPRINTF(p)  printf p
 | 
						|
 | 
						|
/* Allocate */
 | 
						|
struct ambapp_dev_hdr *
 | 
						|
ambapp_alloc_dev_struct (int dev_type)
 | 
						|
{
 | 
						|
  int size = sizeof (struct ambapp_dev_hdr);
 | 
						|
  struct ambapp_dev_hdr *dev;
 | 
						|
 | 
						|
  if (dev_type == DEV_APB_SLV)
 | 
						|
    {
 | 
						|
      size += sizeof (struct ambapp_apb_info);
 | 
						|
    }
 | 
						|
  else
 | 
						|
    {
 | 
						|
      /* AHB */
 | 
						|
      size += sizeof (struct ambapp_ahb_info);
 | 
						|
    }
 | 
						|
  dev = malloc (size);
 | 
						|
  if (dev == NULL)
 | 
						|
    return NULL;
 | 
						|
  memset (dev, 0, size);
 | 
						|
  dev->devinfo = (void *) (dev + 1);
 | 
						|
  dev->dev_type = dev_type;
 | 
						|
  return dev;
 | 
						|
}
 | 
						|
 | 
						|
unsigned int
 | 
						|
ambapp_addr_from (struct ambapp_mmap *mmaps, unsigned int address)
 | 
						|
{
 | 
						|
  /* no translation? */
 | 
						|
  if (!mmaps)
 | 
						|
    return address;
 | 
						|
 | 
						|
  while (mmaps->size)
 | 
						|
    {
 | 
						|
      if ((address >= mmaps->remote_adr)
 | 
						|
	  && (address <= (mmaps->remote_adr + (mmaps->size - 1))))
 | 
						|
	{
 | 
						|
	  return (address - mmaps->remote_adr) + mmaps->local_adr;
 | 
						|
	}
 | 
						|
      mmaps++;
 | 
						|
    }
 | 
						|
  return 1;
 | 
						|
}
 | 
						|
 | 
						|
void
 | 
						|
ambapp_ahb_dev_init (unsigned int ioarea,
 | 
						|
		     struct ambapp_mmap *mmaps,
 | 
						|
		     struct ambapp_pnp_ahb *ahb, struct ambapp_dev_hdr *dev)
 | 
						|
{
 | 
						|
  int bar;
 | 
						|
  struct ambapp_ahb_info *ahb_info;
 | 
						|
  unsigned int addr, mask, mbar;
 | 
						|
 | 
						|
  /* Setup device struct */
 | 
						|
  dev->vendor = ambapp_pnp_vendor (ahb->id);
 | 
						|
  dev->device = ambapp_pnp_device (ahb->id);
 | 
						|
  ahb_info = dev->devinfo;
 | 
						|
  ahb_info->ver = ambapp_pnp_ver (ahb->id);
 | 
						|
  ahb_info->irq = ambapp_pnp_irq (ahb->id);
 | 
						|
  ahb_info->custom[0] = (unsigned int) ahb->custom[0];
 | 
						|
  ahb_info->custom[1] = (unsigned int) ahb->custom[1];
 | 
						|
  ahb_info->custom[2] = (unsigned int) ahb->custom[2];
 | 
						|
 | 
						|
  DPRINTF (("+AHB device %d:%d\n", dev->device, dev->vendor));
 | 
						|
 | 
						|
  /* Memory BARs */
 | 
						|
  for (bar = 0; bar < 4; bar++)
 | 
						|
    {
 | 
						|
      mbar = ahb->mbar[bar];
 | 
						|
      if (mbar == 0)
 | 
						|
	{
 | 
						|
	  addr = 0;
 | 
						|
	  mask = 0;
 | 
						|
	}
 | 
						|
      else
 | 
						|
	{
 | 
						|
	  addr = ambapp_pnp_start (mbar);
 | 
						|
	  if (ambapp_pnp_mbar_type (mbar) == AMBA_TYPE_AHBIO)
 | 
						|
	    {
 | 
						|
	      /* AHB I/O area is releative IO_AREA */
 | 
						|
	      addr = AMBA_TYPE_AHBIO_ADDR (addr, ioarea);
 | 
						|
	      mask =
 | 
						|
		(((unsigned int) (ambapp_pnp_mbar_mask ((~mbar)) << 8) |
 | 
						|
		  0xff)) + 1;
 | 
						|
	    }
 | 
						|
	  else
 | 
						|
	    {
 | 
						|
	      /* AHB memory area, absolute address */
 | 
						|
	      addr = ambapp_addr_from (mmaps, addr);
 | 
						|
	      mask =
 | 
						|
		(~((unsigned int) (ambapp_pnp_mbar_mask (mbar) << 20))) + 1;
 | 
						|
	    }
 | 
						|
	}
 | 
						|
      ahb_info->start[bar] = addr;
 | 
						|
      ahb_info->mask[bar] = mask;
 | 
						|
    }
 | 
						|
}
 | 
						|
 | 
						|
void
 | 
						|
ambapp_apb_dev_init (unsigned int base,
 | 
						|
		     struct ambapp_mmap *mmaps,
 | 
						|
		     struct ambapp_pnp_apb *apb, struct ambapp_dev_hdr *dev)
 | 
						|
{
 | 
						|
  struct ambapp_apb_info *apb_info;
 | 
						|
 | 
						|
  /* Setup device struct */
 | 
						|
  dev->vendor = ambapp_pnp_vendor (apb->id);
 | 
						|
  dev->device = ambapp_pnp_device (apb->id);
 | 
						|
  apb_info = dev->devinfo;
 | 
						|
  apb_info->ver = ambapp_pnp_ver (apb->id);
 | 
						|
  apb_info->irq = ambapp_pnp_irq (apb->id);
 | 
						|
  apb_info->start = ambapp_pnp_apb_start (apb->iobar, base);
 | 
						|
  apb_info->mask = ambapp_pnp_apb_mask (apb->iobar);
 | 
						|
 | 
						|
  DPRINTF (("+APB device %d:%d\n", dev->device, dev->vendor));
 | 
						|
 | 
						|
 | 
						|
}
 | 
						|
 | 
						|
#define MAX_NUM_BUSES 16
 | 
						|
void
 | 
						|
ambapp_add_scanned_bus (unsigned int *ioareas, unsigned int ioarea)
 | 
						|
{
 | 
						|
  int i;
 | 
						|
  for (i = 0; i < MAX_NUM_BUSES; i++)
 | 
						|
    {
 | 
						|
      if (ioareas[i] == 0)
 | 
						|
	{
 | 
						|
	  ioareas[i] = ioarea;
 | 
						|
	  return;
 | 
						|
	}
 | 
						|
    }
 | 
						|
}
 | 
						|
 | 
						|
int
 | 
						|
ambapp_has_been_scanned (unsigned int *ioareas, unsigned int ioarea)
 | 
						|
{
 | 
						|
  int i;
 | 
						|
  if (!ioareas)
 | 
						|
    return 0;
 | 
						|
 | 
						|
  for (i = 0; i < MAX_NUM_BUSES; i++)
 | 
						|
    {
 | 
						|
      if (ioareas[i] == 0)
 | 
						|
	{
 | 
						|
	  break;
 | 
						|
	}
 | 
						|
      else if (ioareas[i] == ioarea)
 | 
						|
	{
 | 
						|
	  return 1;
 | 
						|
	}
 | 
						|
    }
 | 
						|
  return 0;
 | 
						|
}
 | 
						|
 | 
						|
int
 | 
						|
ambapp_scan (unsigned int ioarea,
 | 
						|
	     struct ambapp_dev_hdr *parent,
 | 
						|
	     struct ambapp_mmap *mmaps,
 | 
						|
	     void *(*memfunc) (void *dest, const void *src, int n),
 | 
						|
	     struct ambapp_dev_hdr **root, void *internal)
 | 
						|
{
 | 
						|
  struct ambapp_pnp_ahb *ahb, ahb_buf;
 | 
						|
  struct ambapp_pnp_apb *apb, apb_buf;
 | 
						|
  struct ambapp_dev_hdr *dev, *prev, *prevapb, *apbdev;
 | 
						|
  struct ambapp_ahb_info *ahb_info;
 | 
						|
  int maxloops = 64;
 | 
						|
  unsigned int apbbase, bridge_address;
 | 
						|
  int i, j;
 | 
						|
 | 
						|
  DPRINTF (("Scan at 0x%08x\n", ioarea));
 | 
						|
 | 
						|
  /* Default to memcpy() */
 | 
						|
  if (!memfunc)
 | 
						|
    memfunc = (void *(*)(void *dest, const void *src, int n)) memcpy;
 | 
						|
 | 
						|
  *root = NULL;
 | 
						|
 | 
						|
  if (parent)
 | 
						|
    {
 | 
						|
      /* scan first bus for 64 devices, rest for 16 devices */
 | 
						|
      maxloops = 16;
 | 
						|
    }
 | 
						|
  else
 | 
						|
    {
 | 
						|
      DPRINTF (("+(malloc:"));
 | 
						|
      internal = malloc (sizeof (unsigned int) * MAX_NUM_BUSES);
 | 
						|
      DPRINTF (("0x%x)\n", internal));
 | 
						|
 | 
						|
      if (!internal)
 | 
						|
	return -1;
 | 
						|
      memset (internal, 0, sizeof (unsigned int) * MAX_NUM_BUSES);
 | 
						|
 | 
						|
      ambapp_add_scanned_bus (internal, ioarea);
 | 
						|
    }
 | 
						|
 | 
						|
  prev = parent;
 | 
						|
 | 
						|
  /* AHB MASTERS */
 | 
						|
  ahb = (struct ambapp_pnp_ahb *) (ioarea | AMBA_CONF_AREA);
 | 
						|
  for (i = 0; i < maxloops; i++)
 | 
						|
    {
 | 
						|
      memfunc (&ahb_buf, ahb, sizeof (struct ambapp_pnp_ahb));
 | 
						|
      if (ahb_buf.id != 0)
 | 
						|
	{
 | 
						|
	  /* A AHB device present here */
 | 
						|
	  dev = ambapp_alloc_dev_struct (DEV_AHB_MST);
 | 
						|
	  if (!dev)
 | 
						|
	    return -1;
 | 
						|
 | 
						|
	  ambapp_ahb_dev_init (ioarea, mmaps, &ahb_buf, dev);
 | 
						|
 | 
						|
	  if (*root == NULL)
 | 
						|
	    *root = dev;
 | 
						|
 | 
						|
	  if (prev != parent)
 | 
						|
	    prev->next = dev;
 | 
						|
	  dev->prev = prev;
 | 
						|
	  prev = dev;
 | 
						|
	}
 | 
						|
      ahb++;
 | 
						|
    }
 | 
						|
 | 
						|
  /* AHB SLAVES */
 | 
						|
  ahb =
 | 
						|
    (struct ambapp_pnp_ahb *) (ioarea | AMBA_CONF_AREA |
 | 
						|
			       AMBA_AHB_SLAVE_CONF_AREA);
 | 
						|
  for (i = 0; i < maxloops; i++)
 | 
						|
    {
 | 
						|
      memfunc (&ahb_buf, ahb, sizeof (struct ambapp_pnp_ahb));
 | 
						|
      if (ahb_buf.id != 0)
 | 
						|
	{
 | 
						|
	  /* A AHB device present here */
 | 
						|
	  dev = ambapp_alloc_dev_struct (DEV_AHB_SLV);
 | 
						|
	  if (!dev)
 | 
						|
	    return -1;
 | 
						|
 | 
						|
	  ambapp_ahb_dev_init (ioarea, mmaps, &ahb_buf, dev);
 | 
						|
 | 
						|
	  if (prev != parent)
 | 
						|
	    prev->next = dev;
 | 
						|
	  dev->prev = prev;
 | 
						|
	  prev = dev;
 | 
						|
 | 
						|
	  /* Is it a AHB/AHB Bridge ? */
 | 
						|
	  if ((dev->device == GAISLER_AHB2AHB)
 | 
						|
	      && (dev->vendor == VENDOR_GAISLER))
 | 
						|
	    {
 | 
						|
	      /* AHB/AHB Bridge Found, recurse down the Bridge */
 | 
						|
	      ahb_info = dev->devinfo;
 | 
						|
	      if (ahb_info->ver)
 | 
						|
		{
 | 
						|
		  bridge_address =
 | 
						|
		    ambapp_addr_from (mmaps, ahb_info->custom[1]);
 | 
						|
 | 
						|
		  DPRINTF (("+(AHBAHB:0x%x)\n", bridge_address));
 | 
						|
 | 
						|
		  /* Makes sure bus only scanned once */
 | 
						|
		  if (ambapp_has_been_scanned (internal, bridge_address) ==
 | 
						|
		      NULL)
 | 
						|
		    {
 | 
						|
		      ambapp_add_scanned_bus (internal, bridge_address);
 | 
						|
		      if (ambapp_scan
 | 
						|
			  (bridge_address, dev, mmaps, memfunc,
 | 
						|
			   &dev->children, internal))
 | 
						|
			return -1;
 | 
						|
		    }
 | 
						|
		}
 | 
						|
	    }
 | 
						|
	  else if ((dev->device == GAISLER_APBMST)
 | 
						|
		   && (dev->vendor == VENDOR_GAISLER))
 | 
						|
	    {
 | 
						|
	      /* AHB/APB Bridge Found, add the APB devices to this AHB Slave's children */
 | 
						|
	      prevapb = dev;
 | 
						|
	      ahb_info = dev->devinfo;
 | 
						|
	      apbbase = ahb_info->start[0];
 | 
						|
	      apb = (struct ambapp_pnp_apb *) (apbbase | AMBA_CONF_AREA);
 | 
						|
	      for (j = 0; j < AMBA_APB_SLAVES; j++)
 | 
						|
		{
 | 
						|
		  memfunc (&apb_buf, apb, sizeof (struct ambapp_pnp_apb));
 | 
						|
		  if (apb_buf.id)
 | 
						|
		    {
 | 
						|
		      apbdev = ambapp_alloc_dev_struct (DEV_APB_SLV);
 | 
						|
		      if (!dev)
 | 
						|
			return -1;
 | 
						|
 | 
						|
		      ambapp_apb_dev_init (apbbase, mmaps, &apb_buf, apbdev);
 | 
						|
 | 
						|
		      if (prevapb != dev)
 | 
						|
			prevapb->next = apbdev;
 | 
						|
		      else
 | 
						|
			dev->children = apbdev;
 | 
						|
		      apbdev->prev = prevapb;
 | 
						|
		      prevapb = apbdev;
 | 
						|
		    }
 | 
						|
		  apb++;
 | 
						|
		}
 | 
						|
	    }
 | 
						|
	}
 | 
						|
      ahb++;
 | 
						|
    }
 | 
						|
 | 
						|
  if (parent == NULL)
 | 
						|
    {
 | 
						|
      free (internal);
 | 
						|
    }
 | 
						|
 | 
						|
  return 0;
 | 
						|
}
 | 
						|
 | 
						|
/* Match search options againt device */
 | 
						|
int
 | 
						|
ambapp_dev_match_options (struct ambapp_dev_hdr *dev, unsigned int options,
 | 
						|
			  int vendor, int device)
 | 
						|
{
 | 
						|
  if ((((options & (OPTIONS_ALL_DEVS)) == OPTIONS_ALL_DEVS) ||	/* Match TYPE */
 | 
						|
       ((options & OPTIONS_AHB_MSTS) && (dev->dev_type == DEV_AHB_MST)) || ((options & OPTIONS_AHB_SLVS) && (dev->dev_type == DEV_AHB_SLV)) || ((options & OPTIONS_APB_SLVS) && (dev->dev_type == DEV_APB_SLV))) && ((vendor == -1) || (vendor == dev->vendor)) &&	/* Match ID */
 | 
						|
      ((device == -1) || (device == dev->device)) && (((options & OPTIONS_ALL) == OPTIONS_ALL) ||	/* Match Allocated State */
 | 
						|
						      ((options &
 | 
						|
							OPTIONS_FREE)
 | 
						|
						       && DEV_IS_FREE (dev))
 | 
						|
						      ||
 | 
						|
						      ((options &
 | 
						|
							OPTIONS_ALLOCATED)
 | 
						|
						       &&
 | 
						|
						       DEV_IS_ALLOCATED
 | 
						|
						       (dev))))
 | 
						|
    {
 | 
						|
      return 1;
 | 
						|
    }
 | 
						|
  return 0;
 | 
						|
}
 | 
						|
 | 
						|
/* If device is an APB bridge all devices on the APB bridge is processed */
 | 
						|
static int
 | 
						|
ambapp_for_each_apb (struct ambapp_dev_hdr *dev,
 | 
						|
		     unsigned int options,
 | 
						|
		     int vendor,
 | 
						|
		     int device, int maxdepth, ambapp_func_t func, void *arg)
 | 
						|
{
 | 
						|
  int index;
 | 
						|
  struct ambapp_dev_hdr *apbslv;
 | 
						|
 | 
						|
  if (maxdepth < 0)
 | 
						|
    return 0;
 | 
						|
 | 
						|
  if (dev->children && (dev->children->dev_type == DEV_APB_SLV))
 | 
						|
    {
 | 
						|
      /* Found a APB Bridge */
 | 
						|
      index = 0;
 | 
						|
      apbslv = dev->children;
 | 
						|
      while (apbslv)
 | 
						|
	{
 | 
						|
	  if (ambapp_dev_match_options (apbslv, options, vendor, device) == 1)
 | 
						|
	    {
 | 
						|
	      if (func (apbslv, index, maxdepth, arg) == 1)
 | 
						|
		return 1;	/* Signalled stopped */
 | 
						|
	    }
 | 
						|
	  index++;
 | 
						|
	  apbslv = apbslv->next;
 | 
						|
	}
 | 
						|
    }
 | 
						|
  return 0;
 | 
						|
}
 | 
						|
 | 
						|
/* Traverse the prescanned device information */
 | 
						|
int
 | 
						|
ambapp_for_each (struct ambapp_dev_hdr *root,
 | 
						|
		 unsigned int options,
 | 
						|
		 int vendor,
 | 
						|
		 int device, int maxdepth, ambapp_func_t func, void *arg)
 | 
						|
{
 | 
						|
  struct ambapp_dev_hdr *dev;
 | 
						|
  int ahb_slave = 0;
 | 
						|
  int index;
 | 
						|
 | 
						|
  if (maxdepth < 0)
 | 
						|
    return 0;
 | 
						|
 | 
						|
  /* Start at device 'root' and process downwards.
 | 
						|
   *
 | 
						|
   * Breadth first search, search order
 | 
						|
   * 1. AHB MSTS
 | 
						|
   * 2. AHB SLVS
 | 
						|
   * 3. APB SLVS on primary bus
 | 
						|
   * 4. AHB/AHB secondary... -> step to 1.
 | 
						|
   */
 | 
						|
 | 
						|
  /* AHB MST / AHB SLV */
 | 
						|
  if (options & (OPTIONS_AHB_MSTS | OPTIONS_AHB_SLVS | OPTIONS_DEPTH_FIRST))
 | 
						|
    {
 | 
						|
      index = 0;
 | 
						|
      dev = root;
 | 
						|
      while (dev)
 | 
						|
	{
 | 
						|
	  if ((dev->dev_type == DEV_AHB_SLV) && !ahb_slave)
 | 
						|
	    {
 | 
						|
	      /* First AHB Slave */
 | 
						|
	      ahb_slave = 1;
 | 
						|
	      index = 0;
 | 
						|
	    }
 | 
						|
 | 
						|
	  /* Conditions must be fullfilled for function to be called */
 | 
						|
	  if (ambapp_dev_match_options (dev, options, vendor, device) == 1)
 | 
						|
	    {
 | 
						|
	      /* Correct device and vendor ID */
 | 
						|
	      if (func (dev, index, maxdepth, arg) == 1)
 | 
						|
		return 1;	/* Signalled stopped */
 | 
						|
	    }
 | 
						|
 | 
						|
	  if ((options & OPTIONS_DEPTH_FIRST) && (options & OPTIONS_APB_SLVS))
 | 
						|
	    {
 | 
						|
	      /* Check is APB bridge, and process all APB Slaves in that case */
 | 
						|
	      if (ambapp_for_each_apb
 | 
						|
		  (dev, options, vendor, device, (maxdepth - 1), func,
 | 
						|
		   arg) == 1)
 | 
						|
		return 1;	/* Signalled stopped */
 | 
						|
	    }
 | 
						|
 | 
						|
	  if (options & OPTIONS_DEPTH_FIRST)
 | 
						|
	    {
 | 
						|
	      if (dev->children && (dev->children->dev_type != DEV_APB_SLV))
 | 
						|
		{
 | 
						|
		  /* Found AHB Bridge, recurse */
 | 
						|
		  if (ambapp_for_each
 | 
						|
		      (dev->children, options, vendor, device, (maxdepth - 1),
 | 
						|
		       func, arg) == 1)
 | 
						|
		    return 1;
 | 
						|
		}
 | 
						|
	    }
 | 
						|
 | 
						|
	  index++;
 | 
						|
	  dev = dev->next;
 | 
						|
	}
 | 
						|
    }
 | 
						|
 | 
						|
  /* Find APB Bridges */
 | 
						|
  if ((options & OPTIONS_APB_SLVS) && !(options & OPTIONS_DEPTH_FIRST))
 | 
						|
    {
 | 
						|
      dev = root;
 | 
						|
      while (dev)
 | 
						|
	{
 | 
						|
	  /* Check is APB bridge, and process all APB Slaves in that case */
 | 
						|
	  if (ambapp_for_each_apb
 | 
						|
	      (dev, options, vendor, device, (maxdepth - 1), func, arg) == 1)
 | 
						|
	    return 1;		/* Signalled stopped */
 | 
						|
	  dev = dev->next;
 | 
						|
	}
 | 
						|
    }
 | 
						|
 | 
						|
  /* Find AHB Bridges */
 | 
						|
  if (!(options & OPTIONS_DEPTH_FIRST))
 | 
						|
    {
 | 
						|
      dev = root;
 | 
						|
      while (dev)
 | 
						|
	{
 | 
						|
	  if (dev->children && (dev->children->dev_type != DEV_APB_SLV))
 | 
						|
	    {
 | 
						|
	      /* Found AHB Bridge, recurse */
 | 
						|
	      if (ambapp_for_each
 | 
						|
		  (dev->children, options, vendor, device, (maxdepth - 1),
 | 
						|
		   func, arg) == 1)
 | 
						|
		return 1;
 | 
						|
	    }
 | 
						|
	  dev = dev->next;
 | 
						|
	}
 | 
						|
    }
 | 
						|
 | 
						|
  return 0;
 | 
						|
}
 | 
						|
 | 
						|
int
 | 
						|
ambapp_alloc_dev (struct ambapp_dev_hdr *dev, void *owner)
 | 
						|
{
 | 
						|
  if (dev->owner)
 | 
						|
    return -1;
 | 
						|
  dev->owner = owner;
 | 
						|
  return 0;
 | 
						|
}
 | 
						|
 | 
						|
void
 | 
						|
ambapp_free_dev (struct ambapp_dev_hdr *dev)
 | 
						|
{
 | 
						|
  dev->owner = NULL;
 | 
						|
}
 | 
						|
 | 
						|
struct ambapp_dev_find_match_arg
 | 
						|
{
 | 
						|
  int index;
 | 
						|
  int count;
 | 
						|
  int type;
 | 
						|
  void *dev;
 | 
						|
};
 | 
						|
 | 
						|
/* AMBA PP find routines */
 | 
						|
int
 | 
						|
ambapp_dev_find_match (struct ambapp_dev_hdr *dev, int index, int maxdepth,
 | 
						|
		       void *arg)
 | 
						|
{
 | 
						|
  struct ambapp_dev_find_match_arg *p = arg;
 | 
						|
 | 
						|
  if (p->index == 0)
 | 
						|
    {
 | 
						|
      /* Found controller, stop */
 | 
						|
      if (p->type == DEV_APB_SLV)
 | 
						|
	{
 | 
						|
	  *(struct ambapp_apb_info *) p->dev =
 | 
						|
	    *(struct ambapp_apb_info *) dev->devinfo;
 | 
						|
	  p->dev = ((struct ambapp_apb_info *) p->dev) + 1;
 | 
						|
	}
 | 
						|
      else
 | 
						|
	{
 | 
						|
	  *(struct ambapp_ahb_info *) p->dev =
 | 
						|
	    *(struct ambapp_ahb_info *) dev->devinfo;
 | 
						|
	  p->dev = ((struct ambapp_ahb_info *) p->dev) + 1;
 | 
						|
	}
 | 
						|
      p->count--;
 | 
						|
      if (p->count < 1)
 | 
						|
	return 1;
 | 
						|
    }
 | 
						|
  else
 | 
						|
    {
 | 
						|
      p->index--;
 | 
						|
    }
 | 
						|
  return 0;
 | 
						|
}
 | 
						|
 | 
						|
int
 | 
						|
ambapp_find_apbslvs_next (struct ambapp_dev_hdr *root, int vendor, int device,
 | 
						|
			  struct ambapp_apb_info *dev, int index, int maxno)
 | 
						|
{
 | 
						|
  struct ambapp_dev_find_match_arg arg;
 | 
						|
 | 
						|
  arg.index = index;
 | 
						|
  arg.count = maxno;
 | 
						|
  arg.type = DEV_APB_SLV;	/* APB */
 | 
						|
  arg.dev = dev;
 | 
						|
 | 
						|
  ambapp_for_each (root, (OPTIONS_ALL | OPTIONS_APB_SLVS), vendor, device, 10,
 | 
						|
		   ambapp_dev_find_match, &arg);
 | 
						|
 | 
						|
  return maxno - arg.count;
 | 
						|
}
 | 
						|
 | 
						|
int
 | 
						|
ambapp_find_apbslv (struct ambapp_dev_hdr *root, int vendor, int device,
 | 
						|
		    struct ambapp_apb_info *dev)
 | 
						|
{
 | 
						|
  return ambapp_find_apbslvs_next (root, vendor, device, dev, 0, 1);
 | 
						|
}
 | 
						|
 | 
						|
int
 | 
						|
ambapp_find_apbslv_next (struct ambapp_dev_hdr *root, int vendor, int device,
 | 
						|
			 struct ambapp_apb_info *dev, int index)
 | 
						|
{
 | 
						|
  return ambapp_find_apbslvs_next (root, vendor, device, dev, index, 1);
 | 
						|
}
 | 
						|
 | 
						|
int
 | 
						|
ambapp_find_apbslvs (struct ambapp_dev_hdr *root, int vendor, int device,
 | 
						|
		     struct ambapp_apb_info *dev, int maxno)
 | 
						|
{
 | 
						|
  return ambapp_find_apbslvs_next (root, vendor, device, dev, 0, maxno);
 | 
						|
}
 | 
						|
 | 
						|
int
 | 
						|
ambapp_find_ahbslvs_next (struct ambapp_dev_hdr *root, int vendor, int device,
 | 
						|
			  struct ambapp_ahb_info *dev, int index, int maxno)
 | 
						|
{
 | 
						|
  struct ambapp_dev_find_match_arg arg;
 | 
						|
 | 
						|
  arg.index = index;
 | 
						|
  arg.count = maxno;
 | 
						|
  arg.type = DEV_AHB_SLV;	/* AHB SLV */
 | 
						|
  arg.dev = dev;
 | 
						|
 | 
						|
  ambapp_for_each (root, (OPTIONS_ALL | OPTIONS_AHB_SLVS), vendor, device, 10,
 | 
						|
		   ambapp_dev_find_match, &arg);
 | 
						|
 | 
						|
  return maxno - arg.count;
 | 
						|
}
 | 
						|
 | 
						|
int
 | 
						|
ambapp_find_ahbslv_next (struct ambapp_dev_hdr *root, int vendor, int device,
 | 
						|
			 struct ambapp_ahb_info *dev, int index)
 | 
						|
{
 | 
						|
  return ambapp_find_ahbslvs_next (root, vendor, device, dev, index, 1);
 | 
						|
}
 | 
						|
 | 
						|
int
 | 
						|
ambapp_find_ahbslv (struct ambapp_dev_hdr *root, int vendor, int device,
 | 
						|
		    struct ambapp_ahb_info *dev)
 | 
						|
{
 | 
						|
  return ambapp_find_ahbslvs_next (root, vendor, device, dev, 0, 1);
 | 
						|
}
 | 
						|
 | 
						|
int
 | 
						|
ambapp_find_ahbslvs (struct ambapp_dev_hdr *root, int vendor, int device,
 | 
						|
		     struct ambapp_ahb_info *dev, int maxno)
 | 
						|
{
 | 
						|
  return ambapp_find_ahbslvs_next (root, vendor, device, dev, 0, maxno);
 | 
						|
}
 | 
						|
 | 
						|
struct ambapp_dev_hdr *
 | 
						|
ambapp_find_parent (struct ambapp_dev_hdr *dev)
 | 
						|
{
 | 
						|
  while (dev->prev)
 | 
						|
    {
 | 
						|
      if (dev == dev->prev->children)
 | 
						|
	{
 | 
						|
	  return dev->prev;
 | 
						|
	}
 | 
						|
      dev = dev->prev;
 | 
						|
    }
 | 
						|
  return NULL;
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
struct ambapp_dev_hdr *ambapp_root = NULL;
 | 
						|
extern unsigned int console;
 | 
						|
extern unsigned int rtc;
 | 
						|
 | 
						|
void
 | 
						|
pnpinit (void)
 | 
						|
{
 | 
						|
  struct ambapp_apb_info dev;
 | 
						|
  int n;
 | 
						|
  ambapp_scan (LEON3_IO_AREA, NULL, NULL, NULL, &ambapp_root, NULL);
 | 
						|
  if ((n =
 | 
						|
       ambapp_find_apbslv (ambapp_root, VENDOR_GAISLER, GAISLER_APBUART,
 | 
						|
			   &dev)) == 1)
 | 
						|
    {
 | 
						|
      console = dev.start;
 | 
						|
      DPRINTF (("Found abuart at 0x%x\n", console));
 | 
						|
    }
 | 
						|
  if ((n =
 | 
						|
       ambapp_find_apbslv (ambapp_root, VENDOR_GAISLER, GAISLER_GPTIMER,
 | 
						|
			   &dev)) == 1)
 | 
						|
    {
 | 
						|
      rtc = dev.start + 0x10;
 | 
						|
      DPRINTF (("Found rtc at 0x%x\n", rtc));
 | 
						|
    }
 | 
						|
}
 |