Retro68/gcc/libgloss/sparc_leon/amba_driver.c
2012-03-27 01:51:53 +02:00

120 lines
3.7 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/leon.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
/*#define DEBUG_CONFIG*/
/* Structure containing address to devices found on the Amba Plug&Play bus */
extern amba_confarea_type amba_conf;
/*collect apb slaves*/
int
amba_get_free_apbslv_devices (int vendor, int device, amba_apb_device * dev,
int nr)
{
unsigned int i, conf, iobar, j = 0;
#ifdef DEBUG_CONFIG
printf ("Apbslv: search for apdslv devices\n");
#endif
for (i = 0; i < amba_conf.apbslv.devnr && j < nr; i++)
{
conf = amba_get_confword (amba_conf.apbslv, i, 0);
#ifdef DEBUG_CONFIG
printf ("Apbslv: check(%x:%x)==(%x:%x)\n", vendor, device,
amba_vendor (conf), amba_device (conf));
#endif
if ((amba_vendor (conf) == vendor) && (amba_device (conf) == device))
{
if (!(amba_conf.apbslv.allocbits[i / 32] & (1 << (i & (32 - 1)))))
{
#ifdef DEBUG_CONFIG
printf ("Apbslv: alloc device idx %i (%x:%x)\n",
j, vendor, device);
#endif
amba_conf.apbslv.allocbits[i / 32] |= (1 << (i & (32 - 1)));
dev[j].irq = amba_irq (conf);
iobar = amba_apb_get_membar (amba_conf.apbslv, i);
dev[j].start =
amba_iobar_start (amba_conf.apbslv.apbmst[i], iobar);
#ifdef DEBUG_CONFIG
printf (" +bar: 0x%x \n", k, dev[j].start);
#endif
j++;
}
}
}
return j;
}
/*collect ahb slaves*/
int
amba_get_free_ahbslv_devices (int vendor, int device, amba_ahb_device * dev,
int nr)
{
unsigned int addr, i, conf, iobar, j = 0, k;
#ifdef DEBUG_CONFIG
printf ("Ahbslv: search for ahdslv devices\n");
#endif
for (i = 0; i < amba_conf.ahbslv.devnr && j < nr; i++)
{
conf = amba_get_confword (amba_conf.ahbslv, i, 0);
#ifdef DEBUG_CONFIG
printf ("Ahbslv: check(%x:%x)==(%x:%x)\n", vendor, device,
amba_vendor (conf), amba_device (conf));
#endif
if ((amba_vendor (conf) == vendor) && (amba_device (conf) == device))
{
if (!(amba_conf.ahbslv.allocbits[i / 32] & (1 << (i & (32 - 1)))))
{
#ifdef DEBUG_CONFIG
printf ("Ahbslv: alloc device idx %i (%x:%x)\n",
j, vendor, device);
#endif
amba_conf.ahbslv.allocbits[i / 32] |= (1 << (i & (32 - 1)));
dev[j].irq = amba_irq (conf);
for (k = 0; k < 4; k++)
{
iobar = amba_ahb_get_membar (amba_conf.ahbslv, i, k);
addr = amba_membar_start (iobar);
if (amba_membar_type (iobar) == AMBA_TYPE_AHBIO)
{
addr = AMBA_TYPE_AHBIO_ADDR (addr);
}
dev[j].start[k] = addr;
#ifdef DEBUG_CONFIG
printf (" +%i: 0x%x \n", k, dev[j].start[k]);
#endif
}
j++;
}
}
}
return j;
}