Subversion Repositories freemyipod

//
//
//    Copyright 2010 TheSeven
//
//
//    This file is part of emCORE.
//
//    emCORE is free software: you can redistribute it and/or
//    modify it under the terms of the GNU General Public License as
//    published by the Free Software Foundation, either version 2 of the
//    License, or (at your option) any later version.
//
//    emCORE is distributed in the hope that it will be useful,
//    but WITHOUT ANY WARRANTY; without even the implied warranty of
//    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
//    See the GNU General Public License for more details.
//
//    You should have received a copy of the GNU General Public License along
//    with emCORE.  If not, see <http://www.gnu.org/licenses/>.
//
//


#include "global.h"
#include "spi.h"
#include "s5l8702.h"
#include "thread.h"
#include "clockgates.h"


static struct mutex spimutex[3];
static struct wakeup spiwakeup[3];


void spi_prepare(int port)
{
    mutex_lock(&spimutex[port], TIMEOUT_BLOCK);
    clockgate_enable(SPICLKGATE(port), true);
    SPISTATUS(port) = 0xf;
    SPICTRL(port) |= 0xc;
    SPICLKDIV(port) = 4;
    SPIUNKREG1(port) = 6;
    SPISETUP(port) = 0x10618;
    SPICTRL(port) |= 0xc;
    SPICTRL(port) = 1;
}

void spi_release(int port)
{
    clockgate_enable(SPICLKGATE(port), false);
    mutex_unlock(&spimutex[port]);
}

uint32_t spi_write(int port, uint32_t data)
{
    SPIRXLIMIT(port) = 1;
    while ((SPISTATUS(port) & 0x1f0) == 0x100) yield();
    SPITXDATA(port) = data;
    while (!(SPISTATUS(port) & 0x3e00)) yield();
    return SPIRXDATA(port);
}

void spi_read(int port, uint32_t size, void* buf)
{
    uint8_t* buffer = (uint8_t*)buf;
    SPIRXLIMIT(port) = size;
    if (size < 0x100)
    {
        SPISETUP(port) |= 1;
        while (size--)
        {
            while (!(SPISTATUS(port) & 0x3e00)) yield();
            *buffer++ = SPIRXDATA(port);
        }
        SPISETUP(port) &= ~1;
        return;
    }
    SPISETUP(port) |= 0x41;
    void* addr = (void*)((uint32_t)buf + size);
    struct dma_lli* lli = (struct dma_lli*)(((uint32_t)addr - 0x10) & ~0xf);
    struct dma_lli* nextlli = NULL;
    while (addr > buf)
    {
        size = (uint32_t)addr - (uint32_t)buf;
        if (size > 0xfff) size = 0xfff;
        else lli = (struct dma_lli*)((int)&DMAC0CLLI(port + 5));
        addr = (void*)((uint32_t)addr - size);
        lli->srcaddr = (void*)((int)&SPIRXDATA(port));
        lli->dstaddr = addr;
        lli->nextlli = nextlli;
        lli->control = 0x78000000 | size | (nextlli == NULL ? 0x80000000 : 0);
        nextlli = lli;
        lli = &lli[-1];
    }
    clean_dcache();
    DMAC0CCONFIG(port + 5) = 0x9001 | (SPIDMA(port) << 1);
    wakeup_wait(&spiwakeup[port], TIMEOUT_BLOCK);
    invalidate_dcache();
    SPISETUP(port) &= ~0x41;
}

void INT_DMAC0C5()
{
    DMAC0INTTCCLR = 1 << 5;
    wakeup_signal(&spiwakeup[0]);
}

void INT_DMAC0C6()
{
    DMAC0INTTCCLR = 1 << 6;
    wakeup_signal(&spiwakeup[1]);
}

void INT_DMAC0C7()
{
    DMAC0INTTCCLR = 1 << 7;
    wakeup_signal(&spiwakeup[2]);
}