source: mainline/kernel/genarch/src/drivers/bcm2835/mbox.c

/*
 * Copyright (c) 2013 Beniamino Galvani
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * - Redistributions of source code must retain the above copyright
 *   notice, this list of conditions and the following disclaimer.
 * - 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.
 * - The name of the author may not be used to endorse or promote products
 *   derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``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 AUTHOR 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.
 */
/** @addtogroup kernel_genarch
 * @{
 */
/**
 * @file
 * @brief BCM2835 mailbox communication routines
 */

#include <mm/km.h>
#include <typedefs.h>
#include <genarch/drivers/bcm2835/mbox.h>

static void mbox_write(bcm2835_mbox_t *mbox, uint8_t chan, uint32_t value)
{
        while (mbox->status & MBOX_STATUS_FULL)
                ;
        mbox->write = MBOX_COMPOSE(chan, value);
}

static uint32_t mbox_read(bcm2835_mbox_t *mbox, uint8_t chan)
{
        uint32_t msg;

        do {
                while (mbox->status & MBOX_STATUS_EMPTY)
                        ;
                msg = mbox->read;
        } while (MBOX_MSG_CHAN(msg) != chan);

        return MBOX_MSG_VALUE(msg);
}

bool bcm2835_prop_get_memory(uint32_t *base, uint32_t *size)
{
        bool ret;
        MBOX_BUFF_ALLOC(req, mbox_getmem_buf_t);

        req->buf_hdr.size = sizeof(mbox_getmem_buf_t);
        req->buf_hdr.code = MBOX_PROP_CODE_REQ;
        req->tag_hdr.tag_id = TAG_GET_ARM_MEMORY;
        req->tag_hdr.buf_size = sizeof(mbox_tag_getmem_resp_t);
        req->tag_hdr.val_len = 0;
        req->zero = 0;

        mbox_write((bcm2835_mbox_t *)BCM2835_MBOX0_ADDR,
            MBOX_CHAN_PROP_A2V, KA2VCA((uint32_t)req));
        mbox_read((bcm2835_mbox_t *)BCM2835_MBOX0_ADDR,
            MBOX_CHAN_PROP_A2V);

        if (req->buf_hdr.code == MBOX_PROP_CODE_RESP_OK) {
                *base = req->data.base;
                *size = req->data.size;
                ret = true;
        } else {
                ret = false;
        }

        return ret;
}

bool bcm2835_fb_init(fb_properties_t *prop, uint32_t width, uint32_t height)
{
        bcm2835_mbox_t *fb_mbox;
        bool ret = false;
        MBOX_BUFF_ALLOC(fb_desc, bcm2835_fb_desc_t);

        fb_mbox = (void *) km_map(BCM2835_MBOX0_ADDR, sizeof(bcm2835_mbox_t),
            KM_NATURAL_ALIGNMENT, PAGE_NOT_CACHEABLE);

        fb_desc->width = width;
        fb_desc->height = height;
        fb_desc->virt_width = fb_desc->width;
        fb_desc->virt_height = fb_desc->height;
        fb_desc->pitch = 0;                     /* Set by VC */
        fb_desc->bpp = 16;
        fb_desc->x_offset = 0;
        fb_desc->y_offset = 0;
        fb_desc->addr = 0;                      /* Set by VC */
        fb_desc->size = 0;                      /* Set by VC */

        mbox_write(fb_mbox, MBOX_CHAN_FB, KA2VCA(fb_desc));

        if (mbox_read(fb_mbox, MBOX_CHAN_FB)) {
                printf("BCM2835 framebuffer initialization failed\n");
                goto out;
        }

        prop->addr = fb_desc->addr;
        prop->offset = 0;
        prop->x = fb_desc->width;
        prop->y = fb_desc->height;
        prop->scan = fb_desc->pitch;
        prop->visual = VISUAL_RGB_5_6_5_LE;

        printf("BCM2835 framebuffer at 0x%08x (%dx%d)\n", prop->addr,
            prop->x, prop->y);
        ret = true;
out:
        km_unmap((uintptr_t)fb_mbox, sizeof(bcm2835_mbox_t));
        return ret;
}

bool bcm2835_mbox_get_fb_size(uint32_t *w, uint32_t *h)
{
        bool r;
        MBOX_BUFF_ALLOC(msg, mbox_getfbsize_buf_t);
        bcm2835_mbox_t *mbox;

        mbox = (void *) km_map(BCM2835_MBOX0_ADDR, sizeof(bcm2835_mbox_t),
            KM_NATURAL_ALIGNMENT, PAGE_NOT_CACHEABLE);
        assert(mbox);

        msg->buf_hdr.size = sizeof(mbox_getfbsize_buf_t);
        msg->buf_hdr.code = MBOX_PROP_CODE_REQ;
        msg->tag_hdr.tag_id = MBOX_TAG_GET_PHYS_W_H;
        msg->tag_hdr.buf_size = sizeof(msg->body);
        msg->tag_hdr.val_len  = 0;
        msg->zero = 0;

        mbox_write(mbox,
            MBOX_CHAN_PROP_A2V, KA2VCA((uint32_t)msg));
        mbox_read(mbox, MBOX_CHAN_PROP_A2V);

        r = msg->buf_hdr.code == MBOX_PROP_CODE_RESP_OK;
        if (r) {
                *h = msg->body.height;
                *w = msg->body.width;
        }

        km_unmap((uintptr_t) mbox, sizeof(bcm2835_mbox_t));
        return r;
}

/**
 * @}
 */