/* $NetBSD: uba_dma.c,v 1.11 2010/12/14 23:38:30 matt Exp $ */

/*-
 * Copyright (c) 1997, 1998 The NetBSD Foundation, Inc.
 * All rights reserved.
 *
 * This code is derived from software contributed to The NetBSD Foundation
 * by Jason R. Thorpe of the Numerical Aerospace Simulation Facility,
 * NASA Ames Research Center.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE.
 */

#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: uba_dma.c,v 1.11 2010/12/14 23:38:30 matt Exp $");

#define _VAX_BUS_DMA_PRIVATE

#include <sys/param.h>
#include <sys/systm.h>
#include <sys/bus.h>
#include <sys/cpu.h>
#include <sys/device.h>
#include <sys/kernel.h>
#include <sys/malloc.h>

#include <uvm/uvm_extern.h>

#include <machine/sgmap.h>

#include <dev/qbus/ubavar.h>

#include <arch/vax/uba/uba_common.h>

int     uba_bus_dmamap_create_sgmap(bus_dma_tag_t, bus_size_t, int,
            bus_size_t, bus_size_t, int, bus_dmamap_t *);

void    uba_bus_dmamap_destroy_sgmap(bus_dma_tag_t, bus_dmamap_t);

int     uba_bus_dmamap_load_sgmap(bus_dma_tag_t, bus_dmamap_t, void *,
            bus_size_t, struct proc *, int);

int     uba_bus_dmamap_load_mbuf_sgmap(bus_dma_tag_t, bus_dmamap_t,
            struct mbuf *, int);

int     uba_bus_dmamap_load_uio_sgmap(bus_dma_tag_t, bus_dmamap_t,
            struct uio *, int);

int     uba_bus_dmamap_load_raw_sgmap(bus_dma_tag_t, bus_dmamap_t,
            bus_dma_segment_t *, int, bus_size_t, int);

void    uba_bus_dmamap_unload_sgmap(bus_dma_tag_t, bus_dmamap_t);

void    uba_bus_dmamap_sync(bus_dma_tag_t, bus_dmamap_t, bus_addr_t,
            bus_size_t, int);

void
uba_dma_init(struct uba_vsoftc *sc)
{
        bus_dma_tag_t t;
        struct pte *pte;

        /*
         * Initialize the DMA tag used for sgmap-mapped DMA.
         */
        t = &sc->uv_dmat;
        t->_cookie = sc;
        t->_wbase = 0;
        t->_wsize = sc->uv_size;
        t->_boundary = 0;
        t->_sgmap = &sc->uv_sgmap;
        t->_dmamap_create = uba_bus_dmamap_create_sgmap;
        t->_dmamap_destroy = uba_bus_dmamap_destroy_sgmap;
        t->_dmamap_load = uba_bus_dmamap_load_sgmap;
        t->_dmamap_load_mbuf = uba_bus_dmamap_load_mbuf_sgmap;
        t->_dmamap_load_uio = uba_bus_dmamap_load_uio_sgmap;
        t->_dmamap_load_raw = uba_bus_dmamap_load_raw_sgmap;
        t->_dmamap_unload = uba_bus_dmamap_unload_sgmap;
        t->_dmamap_sync = uba_bus_dmamap_sync;

        t->_dmamem_alloc = _bus_dmamem_alloc;
        t->_dmamem_free = _bus_dmamem_free;
        t->_dmamem_map = _bus_dmamem_map;
        t->_dmamem_unmap = _bus_dmamem_unmap;
        t->_dmamem_mmap = _bus_dmamem_mmap;

        /*
         * Map in Unibus map registers, if not mapped in already.
         */
        if (sc->uv_uba) {
                pte = sc->uv_uba->uba_map;
        } else {
                pte = (struct pte *)vax_map_physmem(sc->uv_addr,
                    vax_btoc(vax_btoc(sc->uv_size) * sizeof(struct pte)));
                if (pte == 0)
                        panic("uba_dma_init");
        }
        /*
         * Initialize the SGMAP.
         */
        vax_sgmap_init(t, &sc->uv_sgmap, "uba_sgmap", 0, sc->uv_size, pte, 0);

}

/*
 * Create a UBA SGMAP-mapped DMA map.
 */
int
uba_bus_dmamap_create_sgmap(bus_dma_tag_t t, bus_size_t size,  int nsegments,
        bus_size_t maxsegsz, bus_size_t boundary, int flags, 
        bus_dmamap_t *dmamp)
{
        bus_dmamap_t map;
        int error;

        error = _bus_dmamap_create(t, size, nsegments, maxsegsz,
            boundary, flags, dmamp);
        if (error)
                return (error);

        map = *dmamp;

        if (flags & BUS_DMA_ALLOCNOW) {
                error = vax_sgmap_alloc(map, vax_round_page(size),
                    t->_sgmap, flags);
                if (error)
                        uba_bus_dmamap_destroy_sgmap(t, map);
        }

        return (error);
}

/*
 * Destroy a UBA SGMAP-mapped DMA map.
 */
void
uba_bus_dmamap_destroy_sgmap(bus_dma_tag_t t, bus_dmamap_t map)
{

        if (map->_dm_flags & DMAMAP_HAS_SGMAP)
                vax_sgmap_free(map, t->_sgmap);

        _bus_dmamap_destroy(t, map);
}

/*
 * Load a UBA SGMAP-mapped DMA map with a linear buffer.
 */
int
uba_bus_dmamap_load_sgmap(bus_dma_tag_t t, bus_dmamap_t map, void *buf,
        bus_size_t buflen, struct proc *p, int flags)
{
        int error;

        error = vax_sgmap_load(t, map, buf, buflen, p, flags, t->_sgmap);
        /*
         * XXX - Set up BDPs.
         */

        return (error);
}

/*
 * Load a UBA SGMAP-mapped DMA map with an mbuf chain.
 */
int
uba_bus_dmamap_load_mbuf_sgmap( bus_dma_tag_t t, bus_dmamap_t map,
        struct mbuf *m, int flags)
{
        int error;

        error = vax_sgmap_load_mbuf(t, map, m, flags, t->_sgmap);

        return (error);
}

/*
 * Load a UBA SGMAP-mapped DMA map with a uio.
 */
int
uba_bus_dmamap_load_uio_sgmap(bus_dma_tag_t t, bus_dmamap_t map,
        struct uio *uio, int flags)
{
        int error;

        error = vax_sgmap_load_uio(t, map, uio, flags, t->_sgmap);

        return (error);
}

/*
 * Load a UBA SGMAP-mapped DMA map with raw memory.
 */
int
uba_bus_dmamap_load_raw_sgmap(bus_dma_tag_t t, bus_dmamap_t map,
        bus_dma_segment_t *segs, int nsegs, bus_size_t size, int flags)
{
        int error;

        error = vax_sgmap_load_raw(t, map, segs, nsegs, size, flags,
            t->_sgmap);

        return (error);
}

/*
 * Unload a UBA DMA map.
 */
void
uba_bus_dmamap_unload_sgmap(bus_dma_tag_t t, bus_dmamap_t map)
{
        /*
         * Invalidate any SGMAP page table entries used by this
         * mapping.
         */
        vax_sgmap_unload(t, map, t->_sgmap);

        /*
         * Do the generic bits of the unload.
         */
        _bus_dmamap_unload(t, map);
}

/*
 * Sync the bus map. This is only needed if BDP's are used.
 */
void
uba_bus_dmamap_sync(bus_dma_tag_t tag, bus_dmamap_t dmam, bus_addr_t offset,
        bus_size_t len, int ops)
{
        /* Only BDP handling, but not yet. */
}