winsys/radeon: add a private interface for radeon_surface

[mesa.git] / src / gallium / drivers / radeon / radeon_uvd.c

/**************************************************************************
 *
 * Copyright 2011 Advanced Micro Devices, Inc.
 * All Rights Reserved.
 *
 * 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, sub license, 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 (including the
 * next paragraph) 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 NON-INFRINGEMENT.
 * IN NO EVENT SHALL THE COPYRIGHT HOLDER(S) OR AUTHOR(S) 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.
 *
 **************************************************************************/

/*
 * Authors:
 *      Christian König <christian.koenig@amd.com>
 *
 */

#include <sys/types.h>
#include <assert.h>
#include <errno.h>
#include <unistd.h>
#include <stdio.h>

#include "pipe/p_video_codec.h"

#include "util/u_memory.h"
#include "util/u_video.h"

#include "vl/vl_defines.h"
#include "vl/vl_mpeg12_decoder.h"

#include "r600_pipe_common.h"
#include "radeon_video.h"
#include "radeon_uvd.h"

#define NUM_BUFFERS 4

#define NUM_MPEG2_REFS 6
#define NUM_H264_REFS 17
#define NUM_VC1_REFS 5

#define FB_BUFFER_OFFSET 0x1000
#define FB_BUFFER_SIZE 2048

/* UVD decoder representation */
struct ruvd_decoder {
        struct pipe_video_codec         base;

        ruvd_set_dtb                    set_dtb;

        unsigned                        stream_handle;
        unsigned                        frame_number;

        struct pipe_screen              *screen;
        struct radeon_winsys*           ws;
        struct radeon_winsys_cs*        cs;

        unsigned                        cur_buffer;

        struct rvid_buffer              msg_fb_buffers[NUM_BUFFERS];
        struct ruvd_msg                 *msg;
        uint32_t                        *fb;

        struct rvid_buffer              bs_buffers[NUM_BUFFERS];
        void*                           bs_ptr;
        unsigned                        bs_size;

        struct rvid_buffer              dpb;
};

/* flush IB to the hardware */
static void flush(struct ruvd_decoder *dec)
{
        dec->ws->cs_flush(dec->cs, RADEON_FLUSH_ASYNC, NULL, 0);
}

/* add a new set register command to the IB */
static void set_reg(struct ruvd_decoder *dec, unsigned reg, uint32_t val)
{
        uint32_t *pm4 = dec->cs->buf;
        pm4[dec->cs->cdw++] = RUVD_PKT0(reg >> 2, 0);
        pm4[dec->cs->cdw++] = val;
}

/* send a command to the VCPU through the GPCOM registers */
static void send_cmd(struct ruvd_decoder *dec, unsigned cmd,
                     struct radeon_winsys_cs_handle* cs_buf, uint32_t off,
                     enum radeon_bo_usage usage, enum radeon_bo_domain domain)
{
        int reloc_idx;

        reloc_idx = dec->ws->cs_add_reloc(dec->cs, cs_buf, usage, domain,
                                          RADEON_PRIO_MIN);
        set_reg(dec, RUVD_GPCOM_VCPU_DATA0, off);
        set_reg(dec, RUVD_GPCOM_VCPU_DATA1, reloc_idx * 4);
        set_reg(dec, RUVD_GPCOM_VCPU_CMD, cmd << 1);
}

/* map the next available message/feedback buffer */
static void map_msg_fb_buf(struct ruvd_decoder *dec)
{
        struct rvid_buffer* buf;
        uint8_t *ptr;

        /* grab the current message/feedback buffer */
        buf = &dec->msg_fb_buffers[dec->cur_buffer];

        /* and map it for CPU access */
        ptr = dec->ws->buffer_map(buf->res->cs_buf, dec->cs, PIPE_TRANSFER_WRITE);

        /* calc buffer offsets */
        dec->msg = (struct ruvd_msg *)ptr;
        dec->fb = (uint32_t *)(ptr + FB_BUFFER_OFFSET);
}

/* unmap and send a message command to the VCPU */
static void send_msg_buf(struct ruvd_decoder *dec)
{
        struct rvid_buffer* buf;

        /* ignore the request if message/feedback buffer isn't mapped */
        if (!dec->msg || !dec->fb)
                return;

        /* grab the current message buffer */
        buf = &dec->msg_fb_buffers[dec->cur_buffer];

        /* unmap the buffer */
        dec->ws->buffer_unmap(buf->res->cs_buf);
        dec->msg = NULL;
        dec->fb = NULL;

        /* and send it to the hardware */
        send_cmd(dec, RUVD_CMD_MSG_BUFFER, buf->res->cs_buf, 0,
                 RADEON_USAGE_READ, RADEON_DOMAIN_GTT);
}

/* cycle to the next set of buffers */
static void next_buffer(struct ruvd_decoder *dec)
{
        ++dec->cur_buffer;
        dec->cur_buffer %= NUM_BUFFERS;
}

/* convert the profile into something UVD understands */
static uint32_t profile2stream_type(enum pipe_video_profile profile)
{
        switch (u_reduce_video_profile(profile)) {
        case PIPE_VIDEO_FORMAT_MPEG4_AVC:
                return RUVD_CODEC_H264;

        case PIPE_VIDEO_FORMAT_VC1:
                return RUVD_CODEC_VC1;

        case PIPE_VIDEO_FORMAT_MPEG12:
                return RUVD_CODEC_MPEG2;

        case PIPE_VIDEO_FORMAT_MPEG4:
                return RUVD_CODEC_MPEG4;

        default:
                assert(0);
                return 0;
        }
}

/* calculate size of reference picture buffer */
static unsigned calc_dpb_size(const struct pipe_video_codec *templ)
{
        unsigned width_in_mb, height_in_mb, image_size, dpb_size;

        // always align them to MB size for dpb calculation
        unsigned width = align(templ->width, VL_MACROBLOCK_WIDTH);
        unsigned height = align(templ->height, VL_MACROBLOCK_HEIGHT);

        // always one more for currently decoded picture
        unsigned max_references = templ->max_references + 1;

        // aligned size of a single frame
        image_size = width * height;
        image_size += image_size / 2;
        image_size = align(image_size, 1024);

        // picture width & height in 16 pixel units
        width_in_mb = width / VL_MACROBLOCK_WIDTH;
        height_in_mb = align(height / VL_MACROBLOCK_HEIGHT, 2);

        switch (u_reduce_video_profile(templ->profile)) {
        case PIPE_VIDEO_FORMAT_MPEG4_AVC:
                // the firmware seems to allways assume a minimum of ref frames
                max_references = MAX2(NUM_H264_REFS, max_references);

                // reference picture buffer
                dpb_size = image_size * max_references;

                // macroblock context buffer
                dpb_size += width_in_mb * height_in_mb * max_references * 192;

                // IT surface buffer
                dpb_size += width_in_mb * height_in_mb * 32;
                break;

        case PIPE_VIDEO_FORMAT_VC1:
                // the firmware seems to allways assume a minimum of ref frames
                max_references = MAX2(NUM_VC1_REFS, max_references);

                // reference picture buffer
                dpb_size = image_size * max_references;

                // CONTEXT_BUFFER
                dpb_size += width_in_mb * height_in_mb * 128;

                // IT surface buffer
                dpb_size += width_in_mb * 64;

                // DB surface buffer
                dpb_size += width_in_mb * 128;

                // BP
                dpb_size += align(MAX2(width_in_mb, height_in_mb) * 7 * 16, 64);
                break;

        case PIPE_VIDEO_FORMAT_MPEG12:
                // reference picture buffer, must be big enough for all frames
                dpb_size = image_size * NUM_MPEG2_REFS;
                break;

        case PIPE_VIDEO_FORMAT_MPEG4:
                // reference picture buffer
                dpb_size = image_size * max_references;

                // CM
                dpb_size += width_in_mb * height_in_mb * 64;

                // IT surface buffer
                dpb_size += align(width_in_mb * height_in_mb * 32, 64);
                break;

        default:
                // something is missing here
                assert(0);

                // at least use a sane default value
                dpb_size = 32 * 1024 * 1024;
                break;
        }
        return dpb_size;
}

/* get h264 specific message bits */
static struct ruvd_h264 get_h264_msg(struct ruvd_decoder *dec, struct pipe_h264_picture_desc *pic)
{
        struct ruvd_h264 result;

        memset(&result, 0, sizeof(result));
        switch (pic->base.profile) {
        case PIPE_VIDEO_PROFILE_MPEG4_AVC_BASELINE:
                result.profile = RUVD_H264_PROFILE_BASELINE;
                break;

        case PIPE_VIDEO_PROFILE_MPEG4_AVC_MAIN:
                result.profile = RUVD_H264_PROFILE_MAIN;
                break;

        case PIPE_VIDEO_PROFILE_MPEG4_AVC_HIGH:
                result.profile = RUVD_H264_PROFILE_HIGH;
                break;

        default:
                assert(0);
                break;
        }
        if (((dec->base.width * dec->base.height) >> 8) <= 1620)
                result.level = 30;
        else
                result.level = 41;

        result.sps_info_flags = 0;
        result.sps_info_flags |= pic->pps->sps->direct_8x8_inference_flag << 0;
        result.sps_info_flags |= pic->pps->sps->mb_adaptive_frame_field_flag << 1;
        result.sps_info_flags |= pic->pps->sps->frame_mbs_only_flag << 2;
        result.sps_info_flags |= pic->pps->sps->delta_pic_order_always_zero_flag << 3;

        result.bit_depth_luma_minus8 = pic->pps->sps->bit_depth_luma_minus8;
        result.bit_depth_chroma_minus8 = pic->pps->sps->bit_depth_chroma_minus8;
        result.log2_max_frame_num_minus4 = pic->pps->sps->log2_max_frame_num_minus4;
        result.pic_order_cnt_type = pic->pps->sps->pic_order_cnt_type;
        result.log2_max_pic_order_cnt_lsb_minus4 = pic->pps->sps->log2_max_pic_order_cnt_lsb_minus4;

        switch (dec->base.chroma_format) {
        case PIPE_VIDEO_CHROMA_FORMAT_400:
                result.chroma_format = 0;
                break;
        case PIPE_VIDEO_CHROMA_FORMAT_420:
                result.chroma_format = 1;
                break;
        case PIPE_VIDEO_CHROMA_FORMAT_422:
                result.chroma_format = 2;
                break;
        case PIPE_VIDEO_CHROMA_FORMAT_444:
                result.chroma_format = 3;
                break;
        }

        result.pps_info_flags = 0;
        result.pps_info_flags |= pic->pps->transform_8x8_mode_flag << 0;
        result.pps_info_flags |= pic->pps->redundant_pic_cnt_present_flag << 1;
        result.pps_info_flags |= pic->pps->constrained_intra_pred_flag << 2;
        result.pps_info_flags |= pic->pps->deblocking_filter_control_present_flag << 3;
        result.pps_info_flags |= pic->pps->weighted_bipred_idc << 4;
        result.pps_info_flags |= pic->pps->weighted_pred_flag << 6;
        result.pps_info_flags |= pic->pps->bottom_field_pic_order_in_frame_present_flag << 7;
        result.pps_info_flags |= pic->pps->entropy_coding_mode_flag << 8;

        result.num_slice_groups_minus1 = pic->pps->num_slice_groups_minus1;
        result.slice_group_map_type = pic->pps->slice_group_map_type;
        result.slice_group_change_rate_minus1 = pic->pps->slice_group_change_rate_minus1;
        result.pic_init_qp_minus26 = pic->pps->pic_init_qp_minus26;
        result.chroma_qp_index_offset = pic->pps->chroma_qp_index_offset;
        result.second_chroma_qp_index_offset = pic->pps->second_chroma_qp_index_offset;

        memcpy(result.scaling_list_4x4, pic->pps->ScalingList4x4, 6*16);
        memcpy(result.scaling_list_8x8, pic->pps->ScalingList8x8, 2*64);

        result.num_ref_frames = pic->num_ref_frames;

        result.num_ref_idx_l0_active_minus1 = pic->num_ref_idx_l0_active_minus1;
        result.num_ref_idx_l1_active_minus1 = pic->num_ref_idx_l1_active_minus1;

        result.frame_num = pic->frame_num;
        memcpy(result.frame_num_list, pic->frame_num_list, 4*16);
        result.curr_field_order_cnt_list[0] = pic->field_order_cnt[0];
        result.curr_field_order_cnt_list[1] = pic->field_order_cnt[1];
        memcpy(result.field_order_cnt_list, pic->field_order_cnt_list, 4*16*2);

        result.decoded_pic_idx = pic->frame_num;

        return result;
}

/* get vc1 specific message bits */
static struct ruvd_vc1 get_vc1_msg(struct pipe_vc1_picture_desc *pic)
{
        struct ruvd_vc1 result;

        memset(&result, 0, sizeof(result));

        switch(pic->base.profile) {
        case PIPE_VIDEO_PROFILE_VC1_SIMPLE:
                result.profile = RUVD_VC1_PROFILE_SIMPLE;
                result.level = 1;
                break;

        case PIPE_VIDEO_PROFILE_VC1_MAIN:
                result.profile = RUVD_VC1_PROFILE_MAIN;
                result.level = 2;
                break;

        case PIPE_VIDEO_PROFILE_VC1_ADVANCED:
                result.profile = RUVD_VC1_PROFILE_ADVANCED;
                result.level = 4;
                break;

        default:
                assert(0);
        }

        /* fields common for all profiles */
        result.sps_info_flags |= pic->postprocflag << 7;
        result.sps_info_flags |= pic->pulldown << 6;
        result.sps_info_flags |= pic->interlace << 5;
        result.sps_info_flags |= pic->tfcntrflag << 4;
        result.sps_info_flags |= pic->finterpflag << 3;
        result.sps_info_flags |= pic->psf << 1;

        result.pps_info_flags |= pic->range_mapy_flag << 31;
        result.pps_info_flags |= pic->range_mapy << 28;
        result.pps_info_flags |= pic->range_mapuv_flag << 27;
        result.pps_info_flags |= pic->range_mapuv << 24;
        result.pps_info_flags |= pic->multires << 21;
        result.pps_info_flags |= pic->maxbframes << 16;
        result.pps_info_flags |= pic->overlap << 11;
        result.pps_info_flags |= pic->quantizer << 9;
        result.pps_info_flags |= pic->panscan_flag << 7;
        result.pps_info_flags |= pic->refdist_flag << 6;
        result.pps_info_flags |= pic->vstransform << 0;

        /* some fields only apply to main/advanced profile */
        if (pic->base.profile != PIPE_VIDEO_PROFILE_VC1_SIMPLE) {
                result.pps_info_flags |= pic->syncmarker << 20;
                result.pps_info_flags |= pic->rangered << 19;
                result.pps_info_flags |= pic->loopfilter << 5;
                result.pps_info_flags |= pic->fastuvmc << 4;
                result.pps_info_flags |= pic->extended_mv << 3;
                result.pps_info_flags |= pic->extended_dmv << 8;
                result.pps_info_flags |= pic->dquant << 1;
        }

        result.chroma_format = 1;

#if 0
//(((unsigned int)(pPicParams->advance.reserved1))        << SPS_INFO_VC1_RESERVED_SHIFT)
uint32_t        slice_count
uint8_t         picture_type
uint8_t         frame_coding_mode
uint8_t         deblockEnable
uint8_t         pquant
#endif

        return result;
}

/* extract the frame number from a referenced video buffer */
static uint32_t get_ref_pic_idx(struct ruvd_decoder *dec, struct pipe_video_buffer *ref)
{
        uint32_t min = MAX2(dec->frame_number, NUM_MPEG2_REFS) - NUM_MPEG2_REFS;
        uint32_t max = MAX2(dec->frame_number, 1) - 1;
        uintptr_t frame;

        /* seems to be the most sane fallback */
        if (!ref)
                return max;

        /* get the frame number from the associated data */
        frame = (uintptr_t)vl_video_buffer_get_associated_data(ref, &dec->base);

        /* limit the frame number to a valid range */
        return MAX2(MIN2(frame, max), min);
}

/* get mpeg2 specific msg bits */
static struct ruvd_mpeg2 get_mpeg2_msg(struct ruvd_decoder *dec,
                                       struct pipe_mpeg12_picture_desc *pic)
{
        const int *zscan = pic->alternate_scan ? vl_zscan_alternate : vl_zscan_normal;
        struct ruvd_mpeg2 result;
        unsigned i;

        memset(&result, 0, sizeof(result));
        result.decoded_pic_idx = dec->frame_number;
        for (i = 0; i < 2; ++i)
                result.ref_pic_idx[i] = get_ref_pic_idx(dec, pic->ref[i]);

        result.load_intra_quantiser_matrix = 1;
        result.load_nonintra_quantiser_matrix = 1;

        for (i = 0; i < 64; ++i) {
                result.intra_quantiser_matrix[i] = pic->intra_matrix[zscan[i]];
                result.nonintra_quantiser_matrix[i] = pic->non_intra_matrix[zscan[i]];
        }

        result.profile_and_level_indication = 0;
        result.chroma_format = 0x1;

        result.picture_coding_type = pic->picture_coding_type;
        result.f_code[0][0] = pic->f_code[0][0] + 1;
        result.f_code[0][1] = pic->f_code[0][1] + 1;
        result.f_code[1][0] = pic->f_code[1][0] + 1;
        result.f_code[1][1] = pic->f_code[1][1] + 1;
        result.intra_dc_precision = pic->intra_dc_precision;
        result.pic_structure = pic->picture_structure;
        result.top_field_first = pic->top_field_first;
        result.frame_pred_frame_dct = pic->frame_pred_frame_dct;
        result.concealment_motion_vectors = pic->concealment_motion_vectors;
        result.q_scale_type = pic->q_scale_type;
        result.intra_vlc_format = pic->intra_vlc_format;
        result.alternate_scan = pic->alternate_scan;

        return result;
}

/* get mpeg4 specific msg bits */
static struct ruvd_mpeg4 get_mpeg4_msg(struct ruvd_decoder *dec,
                                       struct pipe_mpeg4_picture_desc *pic)
{
        struct ruvd_mpeg4 result;
        unsigned i;

        memset(&result, 0, sizeof(result));
        result.decoded_pic_idx = dec->frame_number;
        for (i = 0; i < 2; ++i)
                result.ref_pic_idx[i] = get_ref_pic_idx(dec, pic->ref[i]);

        result.variant_type = 0;
        result.profile_and_level_indication = 0xF0; // ASP Level0

        result.video_object_layer_verid = 0x5; // advanced simple
        result.video_object_layer_shape = 0x0; // rectangular

        result.video_object_layer_width = dec->base.width;
        result.video_object_layer_height = dec->base.height;

        result.vop_time_increment_resolution = pic->vop_time_increment_resolution;

        result.flags |= pic->short_video_header << 0;
        //result.flags |= obmc_disable << 1;
        result.flags |= pic->interlaced << 2;
        result.flags |= 1 << 3; // load_intra_quant_mat
        result.flags |= 1 << 4; // load_nonintra_quant_mat
        result.flags |= pic->quarter_sample << 5;
        result.flags |= 1 << 6; // complexity_estimation_disable
        result.flags |= pic->resync_marker_disable << 7;
        //result.flags |= data_partitioned << 8;
        //result.flags |= reversible_vlc << 9;
        result.flags |= 0 << 10; // newpred_enable
        result.flags |= 0 << 11; // reduced_resolution_vop_enable
        //result.flags |= scalability << 12;
        //result.flags |= is_object_layer_identifier << 13;
        //result.flags |= fixed_vop_rate << 14;
        //result.flags |= newpred_segment_type << 15;

        result.quant_type = pic->quant_type;

        for (i = 0; i < 64; ++i) {
                result.intra_quant_mat[i] = pic->intra_matrix[vl_zscan_normal[i]];
                result.nonintra_quant_mat[i] = pic->non_intra_matrix[vl_zscan_normal[i]];
        }

        /*
        int32_t         trd [2]
        int32_t         trb [2]
        uint8_t         vop_coding_type
        uint8_t         vop_fcode_forward
        uint8_t         vop_fcode_backward
        uint8_t         rounding_control
        uint8_t         alternate_vertical_scan_flag
        uint8_t         top_field_first
        */

        return result;
}

/**
 * destroy this video decoder
 */
static void ruvd_destroy(struct pipe_video_codec *decoder)
{
        struct ruvd_decoder *dec = (struct ruvd_decoder*)decoder;
        unsigned i;

        assert(decoder);

        map_msg_fb_buf(dec);
        memset(dec->msg, 0, sizeof(*dec->msg));
        dec->msg->size = sizeof(*dec->msg);
        dec->msg->msg_type = RUVD_MSG_DESTROY;
        dec->msg->stream_handle = dec->stream_handle;
        send_msg_buf(dec);

        flush(dec);

        dec->ws->cs_destroy(dec->cs);

        for (i = 0; i < NUM_BUFFERS; ++i) {
                rvid_destroy_buffer(&dec->msg_fb_buffers[i]);
                rvid_destroy_buffer(&dec->bs_buffers[i]);
        }

        rvid_destroy_buffer(&dec->dpb);

        FREE(dec);
}

/* free associated data in the video buffer callback */
static void ruvd_destroy_associated_data(void *data)
{
        /* NOOP, since we only use an intptr */
}

/**
 * start decoding of a new frame
 */
static void ruvd_begin_frame(struct pipe_video_codec *decoder,
                             struct pipe_video_buffer *target,
                             struct pipe_picture_desc *picture)
{
        struct ruvd_decoder *dec = (struct ruvd_decoder*)decoder;
        uintptr_t frame;

        assert(decoder);

        frame = ++dec->frame_number;
        vl_video_buffer_set_associated_data(target, decoder, (void *)frame,
                                            &ruvd_destroy_associated_data);

        dec->bs_size = 0;
        dec->bs_ptr = dec->ws->buffer_map(
                dec->bs_buffers[dec->cur_buffer].res->cs_buf,
                dec->cs, PIPE_TRANSFER_WRITE);
}

/**
 * decode a macroblock
 */
static void ruvd_decode_macroblock(struct pipe_video_codec *decoder,
                                   struct pipe_video_buffer *target,
                                   struct pipe_picture_desc *picture,
                                   const struct pipe_macroblock *macroblocks,
                                   unsigned num_macroblocks)
{
        /* not supported (yet) */
        assert(0);
}

/**
 * decode a bitstream
 */
static void ruvd_decode_bitstream(struct pipe_video_codec *decoder,
                                  struct pipe_video_buffer *target,
                                  struct pipe_picture_desc *picture,
                                  unsigned num_buffers,
                                  const void * const *buffers,
                                  const unsigned *sizes)
{
        struct ruvd_decoder *dec = (struct ruvd_decoder*)decoder;
        unsigned i;

        assert(decoder);

        if (!dec->bs_ptr)
                return;

        for (i = 0; i < num_buffers; ++i) {
                struct rvid_buffer *buf = &dec->bs_buffers[dec->cur_buffer];
                unsigned new_size = dec->bs_size + sizes[i];

                if (new_size > buf->res->buf->size) {
                        dec->ws->buffer_unmap(buf->res->cs_buf);
                        if (!rvid_resize_buffer(dec->screen, dec->cs, buf, new_size)) {
                                RVID_ERR("Can't resize bitstream buffer!");
                                return;
                        }

                        dec->bs_ptr = dec->ws->buffer_map(buf->res->cs_buf, dec->cs,
                                                          PIPE_TRANSFER_WRITE);
                        if (!dec->bs_ptr)
                                return;

                        dec->bs_ptr += dec->bs_size;
                }

                memcpy(dec->bs_ptr, buffers[i], sizes[i]);
                dec->bs_size += sizes[i];
                dec->bs_ptr += sizes[i];
        }
}

/**
 * end decoding of the current frame
 */
static void ruvd_end_frame(struct pipe_video_codec *decoder,
                           struct pipe_video_buffer *target,
                           struct pipe_picture_desc *picture)
{
        struct ruvd_decoder *dec = (struct ruvd_decoder*)decoder;
        struct radeon_winsys_cs_handle *dt;
        struct rvid_buffer *msg_fb_buf, *bs_buf;
        unsigned bs_size;

        assert(decoder);

        if (!dec->bs_ptr)
                return;

        msg_fb_buf = &dec->msg_fb_buffers[dec->cur_buffer];
        bs_buf = &dec->bs_buffers[dec->cur_buffer];

        bs_size = align(dec->bs_size, 128);
        memset(dec->bs_ptr, 0, bs_size - dec->bs_size);
        dec->ws->buffer_unmap(bs_buf->res->cs_buf);

        map_msg_fb_buf(dec);
        dec->msg->size = sizeof(*dec->msg);
        dec->msg->msg_type = RUVD_MSG_DECODE;
        dec->msg->stream_handle = dec->stream_handle;
        dec->msg->status_report_feedback_number = dec->frame_number;

        dec->msg->body.decode.stream_type = profile2stream_type(dec->base.profile);
        dec->msg->body.decode.decode_flags = 0x1;
        dec->msg->body.decode.width_in_samples = dec->base.width;
        dec->msg->body.decode.height_in_samples = dec->base.height;

        dec->msg->body.decode.dpb_size = dec->dpb.res->buf->size;
        dec->msg->body.decode.bsd_size = bs_size;

        dt = dec->set_dtb(dec->msg, (struct vl_video_buffer *)target);

        switch (u_reduce_video_profile(picture->profile)) {
        case PIPE_VIDEO_FORMAT_MPEG4_AVC:
                dec->msg->body.decode.codec.h264 = get_h264_msg(dec, (struct pipe_h264_picture_desc*)picture);
                break;

        case PIPE_VIDEO_FORMAT_VC1:
                dec->msg->body.decode.codec.vc1 = get_vc1_msg((struct pipe_vc1_picture_desc*)picture);
                break;

        case PIPE_VIDEO_FORMAT_MPEG12:
                dec->msg->body.decode.codec.mpeg2 = get_mpeg2_msg(dec, (struct pipe_mpeg12_picture_desc*)picture);
                break;

        case PIPE_VIDEO_FORMAT_MPEG4:
                dec->msg->body.decode.codec.mpeg4 = get_mpeg4_msg(dec, (struct pipe_mpeg4_picture_desc*)picture);
                break;

        default:
                assert(0);
                return;
        }

        dec->msg->body.decode.db_surf_tile_config = dec->msg->body.decode.dt_surf_tile_config;
        dec->msg->body.decode.extension_support = 0x1;

        /* set at least the feedback buffer size */
        dec->fb[0] = FB_BUFFER_SIZE;

        send_msg_buf(dec);

        send_cmd(dec, RUVD_CMD_DPB_BUFFER, dec->dpb.res->cs_buf, 0,
                 RADEON_USAGE_READWRITE, RADEON_DOMAIN_VRAM);
        send_cmd(dec, RUVD_CMD_BITSTREAM_BUFFER, bs_buf->res->cs_buf,
                 0, RADEON_USAGE_READ, RADEON_DOMAIN_GTT);
        send_cmd(dec, RUVD_CMD_DECODING_TARGET_BUFFER, dt, 0,
                 RADEON_USAGE_WRITE, RADEON_DOMAIN_VRAM);
        send_cmd(dec, RUVD_CMD_FEEDBACK_BUFFER, msg_fb_buf->res->cs_buf,
                 FB_BUFFER_OFFSET, RADEON_USAGE_WRITE, RADEON_DOMAIN_GTT);
        set_reg(dec, RUVD_ENGINE_CNTL, 1);

        flush(dec);
        next_buffer(dec);
}

/**
 * flush any outstanding command buffers to the hardware
 */
static void ruvd_flush(struct pipe_video_codec *decoder)
{
}

/**
 * create and UVD decoder
 */
struct pipe_video_codec *ruvd_create_decoder(struct pipe_context *context,
                                             const struct pipe_video_codec *templ,
                                             ruvd_set_dtb set_dtb)
{
        struct radeon_winsys* ws = ((struct r600_common_context *)context)->ws;
        unsigned dpb_size = calc_dpb_size(templ);
        unsigned width = templ->width, height = templ->height;
        unsigned bs_buf_size;
        struct radeon_info info;
        struct ruvd_decoder *dec;
        int i;

        ws->query_info(ws, &info);

        switch(u_reduce_video_profile(templ->profile)) {
        case PIPE_VIDEO_FORMAT_MPEG12:
                if (templ->entrypoint > PIPE_VIDEO_ENTRYPOINT_BITSTREAM || info.family < CHIP_PALM)
                        return vl_create_mpeg12_decoder(context, templ);

                /* fall through */
        case PIPE_VIDEO_FORMAT_MPEG4:
        case PIPE_VIDEO_FORMAT_MPEG4_AVC:
                width = align(width, VL_MACROBLOCK_WIDTH);
                height = align(height, VL_MACROBLOCK_HEIGHT);
                break;

        default:
                break;
        }


        dec = CALLOC_STRUCT(ruvd_decoder);

        if (!dec)
                return NULL;

        dec->base = *templ;
        dec->base.context = context;
        dec->base.width = width;
        dec->base.height = height;

        dec->base.destroy = ruvd_destroy;
        dec->base.begin_frame = ruvd_begin_frame;
        dec->base.decode_macroblock = ruvd_decode_macroblock;
        dec->base.decode_bitstream = ruvd_decode_bitstream;
        dec->base.end_frame = ruvd_end_frame;
        dec->base.flush = ruvd_flush;

        dec->set_dtb = set_dtb;
        dec->stream_handle = rvid_alloc_stream_handle();
        dec->screen = context->screen;
        dec->ws = ws;
        dec->cs = ws->cs_create(ws, RING_UVD, NULL, NULL, NULL);
        if (!dec->cs) {
                RVID_ERR("Can't get command submission context.\n");
                goto error;
        }

        bs_buf_size = width * height * 512 / (16 * 16);
        for (i = 0; i < NUM_BUFFERS; ++i) {
                unsigned msg_fb_size = FB_BUFFER_OFFSET + FB_BUFFER_SIZE;
                STATIC_ASSERT(sizeof(struct ruvd_msg) <= FB_BUFFER_OFFSET);
                if (!rvid_create_buffer(dec->screen, &dec->msg_fb_buffers[i],
                                        msg_fb_size, PIPE_USAGE_STAGING)) {
                        RVID_ERR("Can't allocated message buffers.\n");
                        goto error;
                }

                if (!rvid_create_buffer(dec->screen, &dec->bs_buffers[i],
                                        bs_buf_size, PIPE_USAGE_STAGING)) {
                        RVID_ERR("Can't allocated bitstream buffers.\n");
                        goto error;
                }

                rvid_clear_buffer(context, &dec->msg_fb_buffers[i]);
                rvid_clear_buffer(context, &dec->bs_buffers[i]);
        }

        if (!rvid_create_buffer(dec->screen, &dec->dpb, dpb_size, PIPE_USAGE_DEFAULT)) {
                RVID_ERR("Can't allocated dpb.\n");
                goto error;
        }

        rvid_clear_buffer(context, &dec->dpb);

        map_msg_fb_buf(dec);
        dec->msg->size = sizeof(*dec->msg);
        dec->msg->msg_type = RUVD_MSG_CREATE;
        dec->msg->stream_handle = dec->stream_handle;
        dec->msg->body.create.stream_type = profile2stream_type(dec->base.profile);
        dec->msg->body.create.width_in_samples = dec->base.width;
        dec->msg->body.create.height_in_samples = dec->base.height;
        dec->msg->body.create.dpb_size = dec->dpb.res->buf->size;
        send_msg_buf(dec);
        flush(dec);
        next_buffer(dec);

        return &dec->base;

error:
        if (dec->cs) dec->ws->cs_destroy(dec->cs);

        for (i = 0; i < NUM_BUFFERS; ++i) {
                rvid_destroy_buffer(&dec->msg_fb_buffers[i]);
                rvid_destroy_buffer(&dec->bs_buffers[i]);
        }

        rvid_destroy_buffer(&dec->dpb);

        FREE(dec);

        return NULL;
}

/* calculate top/bottom offset */
static unsigned texture_offset(struct radeon_surf *surface, unsigned layer)
{
        return surface->level[0].offset +
                layer * surface->level[0].slice_size;
}

/* hw encode the aspect of macro tiles */
static unsigned macro_tile_aspect(unsigned macro_tile_aspect)
{
        switch (macro_tile_aspect) {
        default:
        case 1: macro_tile_aspect = 0;  break;
        case 2: macro_tile_aspect = 1;  break;
        case 4: macro_tile_aspect = 2;  break;
        case 8: macro_tile_aspect = 3;  break;
        }
        return macro_tile_aspect;
}

/* hw encode the bank width and height */
static unsigned bank_wh(unsigned bankwh)
{
        switch (bankwh) {
        default:
        case 1: bankwh = 0;     break;
        case 2: bankwh = 1;     break;
        case 4: bankwh = 2;     break;
        case 8: bankwh = 3;     break;
        }
        return bankwh;
}

/**
 * fill decoding target field from the luma and chroma surfaces
 */
void ruvd_set_dt_surfaces(struct ruvd_msg *msg, struct radeon_surf *luma,
                          struct radeon_surf *chroma)
{
        msg->body.decode.dt_pitch = luma->level[0].pitch_bytes;
        switch (luma->level[0].mode) {
        case RADEON_SURF_MODE_LINEAR_ALIGNED:
                msg->body.decode.dt_tiling_mode = RUVD_TILE_LINEAR;
                msg->body.decode.dt_array_mode = RUVD_ARRAY_MODE_LINEAR;
                break;
        case RADEON_SURF_MODE_1D:
                msg->body.decode.dt_tiling_mode = RUVD_TILE_8X8;
                msg->body.decode.dt_array_mode = RUVD_ARRAY_MODE_1D_THIN;
                break;
        case RADEON_SURF_MODE_2D:
                msg->body.decode.dt_tiling_mode = RUVD_TILE_8X8;
                msg->body.decode.dt_array_mode = RUVD_ARRAY_MODE_2D_THIN;
                break;
        default:
                assert(0);
                break;
        }

        msg->body.decode.dt_luma_top_offset = texture_offset(luma, 0);
        msg->body.decode.dt_chroma_top_offset = texture_offset(chroma, 0);
        if (msg->body.decode.dt_field_mode) {
                msg->body.decode.dt_luma_bottom_offset = texture_offset(luma, 1);
                msg->body.decode.dt_chroma_bottom_offset = texture_offset(chroma, 1);
        } else {
                msg->body.decode.dt_luma_bottom_offset = msg->body.decode.dt_luma_top_offset;
                msg->body.decode.dt_chroma_bottom_offset = msg->body.decode.dt_chroma_top_offset;
        }

        assert(luma->bankw == chroma->bankw);
        assert(luma->bankh == chroma->bankh);
        assert(luma->mtilea == chroma->mtilea);

        msg->body.decode.dt_surf_tile_config |= RUVD_BANK_WIDTH(bank_wh(luma->bankw));
        msg->body.decode.dt_surf_tile_config |= RUVD_BANK_HEIGHT(bank_wh(luma->bankh));
        msg->body.decode.dt_surf_tile_config |= RUVD_MACRO_TILE_ASPECT_RATIO(macro_tile_aspect(luma->mtilea));
}