/*      $NetBSD: dbdma.c,v 1.12 2016/07/15 21:08:27 macallan Exp $      */

/*
* Copyright 1991-1998 by Open Software Foundation, Inc.
*              All Rights Reserved
*
* Permission to use, copy, modify, and distribute this software and
* its documentation for any purpose and without fee is hereby granted,
* provided that the above copyright notice appears in all copies and
* that both the copyright notice and this permission notice appear in
* supporting documentation.
*
* OSF DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE
* INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
* FOR A PARTICULAR PURPOSE.
*
* IN NO EVENT SHALL OSF BE LIABLE FOR ANY SPECIAL, INDIRECT, OR
* CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
* LOSS OF USE, DATA OR PROFITS, WHETHER IN ACTION OF CONTRACT,
* NEGLIGENCE, OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION
* WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
*
*/

#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: dbdma.c,v 1.12 2016/07/15 21:08:27 macallan Exp $");

#include <sys/param.h>
#include <sys/kmem.h>
#include <sys/systm.h>

#include <prop/proplib.h>

#include <uvm/uvm_extern.h>

#include <machine/autoconf.h>
#include <machine/pio.h>
#include <macppc/dev/dbdma.h>

dbdma_command_t *dbdma_alloc_commands = NULL;

void
dbdma_start(dbdma_regmap_t *dmap, dbdma_command_t *commands)
{
       unsigned long addr = vtophys((vaddr_t)commands);

       if (addr & 0xf)
               panic("dbdma_start command structure not 16-byte aligned %08x %08x", (uint32_t)commands, (uint32_t)addr);

       dmap->d_intselect = 0xff;  /* Endian magic - clear out interrupts */
       DBDMA_ST4_ENDIAN(&dmap->d_control,
                        DBDMA_CLEAR_CNTRL( (DBDMA_CNTRL_ACTIVE |
                                            DBDMA_CNTRL_DEAD   |
                                            DBDMA_CNTRL_WAKE   |
                                            DBDMA_CNTRL_FLUSH  |
                                            DBDMA_CNTRL_PAUSE  |
                                            DBDMA_CNTRL_RUN      )));

       while (DBDMA_LD4_ENDIAN(&dmap->d_status) & DBDMA_CNTRL_ACTIVE)
               ;

       dmap->d_cmdptrhi = 0;   /* 64-bit not yet */
       DBDMA_ST4_ENDIAN(&dmap->d_cmdptrlo, addr);

       DBDMA_ST4_ENDIAN(&dmap->d_control, DBDMA_SET_CNTRL(DBDMA_CNTRL_RUN));
}

void
dbdma_stop(dbdma_regmap_t *dmap)
{
       out32rb(&dmap->d_control, DBDMA_CLEAR_CNTRL(DBDMA_CNTRL_RUN) |
                         DBDMA_SET_CNTRL(DBDMA_CNTRL_FLUSH));

       while (in32rb(&dmap->d_status) &
               (DBDMA_CNTRL_ACTIVE|DBDMA_CNTRL_FLUSH));
}

void
dbdma_flush(dbdma_regmap_t *dmap)
{
       out32rb(&dmap->d_control, DBDMA_SET_CNTRL(DBDMA_CNTRL_FLUSH));

       while (in32rb(&dmap->d_status) & (DBDMA_CNTRL_FLUSH));
}

void
dbdma_reset(dbdma_regmap_t *dmap)
{
       out32rb(&dmap->d_control,
                        DBDMA_CLEAR_CNTRL( (DBDMA_CNTRL_ACTIVE |
                                            DBDMA_CNTRL_DEAD   |
                                            DBDMA_CNTRL_WAKE   |
                                            DBDMA_CNTRL_FLUSH  |
                                            DBDMA_CNTRL_PAUSE  |
                                            DBDMA_CNTRL_RUN      )));

       while (in32rb(&dmap->d_status) & DBDMA_CNTRL_RUN);
}

void
dbdma_continue(dbdma_regmap_t *dmap)
{
       out32rb(&dmap->d_control,
               DBDMA_SET_CNTRL(DBDMA_CNTRL_RUN | DBDMA_CNTRL_WAKE) |
               DBDMA_CLEAR_CNTRL(DBDMA_CNTRL_PAUSE | DBDMA_CNTRL_DEAD));
}

void
dbdma_pause(dbdma_regmap_t *dmap)
{
       DBDMA_ST4_ENDIAN(&dmap->d_control,DBDMA_SET_CNTRL(DBDMA_CNTRL_PAUSE));

       while (DBDMA_LD4_ENDIAN(&dmap->d_status) & DBDMA_CNTRL_ACTIVE)
               ;
}

dbdma_command_t *
dbdma_alloc(int size, void **fp)
{
       u_int buf;

       buf = (u_int)kmem_alloc(size + 0x0f, KM_SLEEP);
       if (fp != NULL) {
        *fp = (void *)buf;
       }
       buf = (buf + 0x0f) & ~0x0f;

       return (dbdma_command_t *)buf;
}

void
dbdma_free(void *ptr, int size)
{
       kmem_free(ptr, size + 0x0f);
}