/* $OpenBSD: drm_memory.c,v 1.24 2012/12/06 15:05:21 mpi Exp $ */
/*-
 *Copyright 1999 Precision Insight, Inc., Cedar Park, Texas.
 * Copyright 2000 VA Linux Systems, Inc., Sunnyvale, California.
 * 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, sublicense,
 * 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 NONINFRINGEMENT.  IN NO EVENT SHALL
 * VA LINUX SYSTEMS AND/OR ITS SUPPLIERS 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:
 *    Rickard E. (Rik) Faith <faith@valinux.com>
 *    Gareth Hughes <gareth@valinux.com>
 *
 */

/** @file drm_memory.c
 * Wrappers for kernel memory allocation routines, and MTRR management support.
 *
 * This file previously implemented a memory consumption tracking system using
 * the "area" argument for various different types of allocations, but that
 * has been stripped out for now.
 */

#include "drmP.h"

#if !defined(__amd64__) && !defined(__i386__)
#define DRM_NO_MTRR	1
#endif

void*
drm_alloc(size_t size)
{
	return (malloc(size, M_DRM, M_NOWAIT));
}

void *
drm_calloc(size_t nmemb, size_t size)
{
	if (nmemb == 0 || SIZE_MAX / nmemb < size)
		return (NULL);
	else
		return malloc(size * nmemb, M_DRM, M_NOWAIT | M_ZERO);
}

void *
drm_realloc(void *oldpt, size_t oldsize, size_t size)
{
	void *pt;

	pt = malloc(size, M_DRM, M_NOWAIT);
	if (pt == NULL)
		return NULL;
	if (oldpt && oldsize) {
		memcpy(pt, oldpt, min(oldsize, size));
		free(oldpt, M_DRM);
	}
	return pt;
}

void
drm_free(void *pt)
{
	if (pt != NULL)
		free(pt, M_DRM);
}

/* Inline replacements for DRM_IOREMAP macros */
void
drm_core_ioremap(struct drm_local_map *map, struct drm_device *dev)
{
	DRM_DEBUG("offset: 0x%x size: 0x%x type: %d\n", map->offset, map->size,
	    map->type);

	/* default to failure. */
	map->handle = 0;

	switch (map->type) {
#if __OS_HAS_AGP
	case _DRM_AGP:
		DRM_DEBUG("AGP map\n");
		map->bst = dev->bst;
		/* handles are still supposed to be kernel virtual addresses */
		map->handle = agp_map(dev->agp->agpdev,
		    map->offset - dev->agp->base, map->size, &map->bsh);
		if (map->handle == 0) {
			DRM_ERROR("ioremap fail\n");
			return;
		}
		break;
#endif
	case _DRM_FRAME_BUFFER:
		DRM_DEBUG("FRAME_BUFFER map\n");
		map->bst = dev->bst;
		if (bus_space_map(map->bst, map->offset,
		    map->size, BUS_SPACE_MAP_LINEAR |
		    BUS_SPACE_MAP_PREFETCHABLE, &map->bsh)) {
			DRM_ERROR("ioremap fail\n");
			return;
		}
		/* handles are still supposed to be kernel virtual addresses */
		map->handle = bus_space_vaddr(map->bst, map->bsh);
		break;
	default:
		break;
	}
}

void
drm_core_ioremapfree(struct drm_local_map *map, struct drm_device *dev)
{
	if (map->handle == 0 || map->size == 0)
		return;

	switch (map->type) {
#if __OS_HAS_AGP
	case _DRM_AGP:
		agp_unmap(dev->agp->agpdev, map->handle, map->size, map->bsh);
		map->handle = 0;
		break;
#endif
	case _DRM_FRAME_BUFFER:
		bus_space_unmap(map->bst, map->bsh, map->size);
		map->handle = 0;
		break;
	default:
		break;
	}
}

int
drm_mtrr_add(unsigned long offset, size_t size, int flags)
{
#ifndef DRM_NO_MTRR
	int act;
	struct mem_range_desc mrdesc;

	mrdesc.mr_base = offset;
	mrdesc.mr_len = size;
	mrdesc.mr_flags = flags;
	act = MEMRANGE_SET_UPDATE;
	strlcpy(mrdesc.mr_owner, "drm", sizeof(mrdesc.mr_owner));
	return mem_range_attr_set(&mrdesc, &act);
#else
	return 0;
#endif
}

int
drm_mtrr_del(int handle, unsigned long offset, size_t size, int flags)
{
#ifndef DRM_NO_MTRR
	int act;
	struct mem_range_desc mrdesc;

	mrdesc.mr_base = offset;
	mrdesc.mr_len = size;
	mrdesc.mr_flags = flags;
	act = MEMRANGE_SET_REMOVE;
	strlcpy(mrdesc.mr_owner, "drm", sizeof(mrdesc.mr_owner));
	return mem_range_attr_set(&mrdesc, &act);
#else
	return 0;
#endif
}