new/external/mpp/osal/allocator/allocator_ion.c
2025-05-10 21:58:58 +08:00

495 lines
13 KiB
C

/*
* Copyright 2015 Rockchip Electronics Co. LTD
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
#define MODULE_TAG "mpp_ion"
#include <unistd.h>
#include <string.h>
#include <errno.h>
#include <fcntl.h>
#include <sys/ioctl.h>
#include <sys/mman.h>
#if defined(ARMLINUX)
#include <ion.h>
#else
#include "ion.h"
#endif
#include "os_mem.h"
#include "allocator_ion.h"
#include "mpp_env.h"
#include "mpp_mem.h"
#include "mpp_debug.h"
#include "mpp_common.h"
#include "mpp_thread.h"
static RK_U32 ion_debug = 0;
static pthread_once_t once = PTHREAD_ONCE_INIT;
static pthread_mutex_t scandir_lock;
#define ION_FUNCTION (0x00000001)
#define ION_DEVICE (0x00000002)
#define ION_CLINET (0x00000004)
#define ION_IOCTL (0x00000008)
#define ION_DETECT_IOMMU_DISABLE (0x0) /* use ION_HEAP_TYPE_DMA */
#define ION_DETECT_IOMMU_ENABLE (0x1) /* use ION_HEAP_TYPE_SYSTEM */
#define ION_DETECT_NO_DTS (0x2) /* use ION_HEAP_TYPE_CARVEOUT */
#define ion_dbg(flag, fmt, ...) _mpp_dbg(ion_debug, flag, fmt, ## __VA_ARGS__)
#define ion_dbg_f(flag, fmt, ...) _mpp_dbg_f(ion_debug, flag, fmt, ## __VA_ARGS__)
#define ion_dbg_func(fmt, ...) ion_dbg_f(ION_FUNCTION, fmt, ## __VA_ARGS__)
static int ion_ioctl(int fd, int req, void *arg)
{
int ret = ioctl(fd, req, arg);
if (ret < 0) {
mpp_err("ion_ioctl %x failed with code %d: %s\n", req,
ret, strerror(errno));
return -errno;
}
return ret;
}
static int ion_alloc(int fd, size_t len, size_t align, unsigned int heap_mask,
unsigned int flags, ion_user_handle_t *handle)
{
int ret = -EINVAL;
struct ion_allocation_data data = {
.len = len,
.align = align,
.heap_id_mask = heap_mask,
.flags = flags,
};
ion_dbg_func("enter: fd %d len %d align %d heap_mask %x flags %x",
fd, len, align, heap_mask, flags);
if (handle) {
ret = ion_ioctl(fd, ION_IOC_ALLOC, &data);
if (ret >= 0)
*handle = data.handle;
}
ion_dbg_func("leave: ret %d\n", ret);
return ret;
}
static int ion_free(int fd, ion_user_handle_t handle)
{
int ret;
struct ion_handle_data data = {
.handle = handle,
};
ion_dbg_func("enter: fd %d\n", fd);
ret = ion_ioctl(fd, ION_IOC_FREE, &data);
ion_dbg_func("leave: ret %d\n", ret);
return ret;
}
static int ion_map_fd(int fd, ion_user_handle_t handle, int *map_fd)
{
int ret;
struct ion_fd_data data = {
.handle = handle,
};
if (map_fd == NULL)
return -EINVAL;
ret = ion_ioctl(fd, ION_IOC_MAP, &data);
if (ret < 0)
return ret;
*map_fd = data.fd;
if (*map_fd < 0) {
mpp_err("map ioctl returned negative fd\n");
return -EINVAL;
}
return 0;
}
static int ion_mmap(int fd, size_t length, int prot, int flags, off_t offset,
void **ptr)
{
static unsigned long pagesize_mask = 0;
if (ptr == NULL)
return -EINVAL;
if (!pagesize_mask)
pagesize_mask = sysconf(_SC_PAGESIZE) - 1;
offset = offset & (~pagesize_mask);
*ptr = mmap(NULL, length, prot, flags, fd, offset);
if (*ptr == MAP_FAILED) {
mpp_err("mmap failed: %s\n", strerror(errno));
*ptr = NULL;
return -errno;
}
return 0;
}
#include <dirent.h>
static const char *search_name = NULL;
static int _compare_name(const struct dirent *dir)
{
if (search_name && strstr(dir->d_name, search_name))
return 1;
return 0;
}
static void scandir_lock_init(void)
{
pthread_mutexattr_t attr;
pthread_mutexattr_init(&attr);
pthread_mutexattr_settype(&attr, PTHREAD_MUTEX_RECURSIVE);
pthread_mutex_init(&scandir_lock, &attr);
pthread_mutexattr_destroy(&attr);
}
/*
* directory search function:
* search directory with dir_name on path.
* if found match dir append name on path and return
*
* return 0 for failure
* return positive value for length of new path
*/
static RK_S32 find_dir_in_path(char *path, const char *dir_name,
size_t max_length)
{
struct dirent **dir;
RK_S32 path_len = strnlen(path, max_length);
RK_S32 new_path_len = 0;
RK_S32 n;
pthread_once(&once, scandir_lock_init);
pthread_mutex_lock(&scandir_lock);
search_name = dir_name;
n = scandir(path, &dir, _compare_name, alphasort);
if (n <= 0) {
mpp_log("scan %s for %s return %d\n", path, dir_name, n);
} else {
mpp_assert(n == 1);
new_path_len = path_len;
new_path_len += snprintf(path + path_len, max_length - path_len - 1,
"/%s", dir[0]->d_name);
free(dir[0]);
free(dir);
}
search_name = NULL;
pthread_mutex_unlock(&scandir_lock);
return new_path_len;
}
#define MAX_PATH_NAME_SIZE 256
static RK_S32 check_sysfs_iommu()
{
RK_U32 i = 0;
RK_U32 dts_info_found = 0;
RK_U32 ion_info_found = 0;
RK_S32 ret = ION_DETECT_IOMMU_DISABLE;
char path[MAX_PATH_NAME_SIZE];
static char *dts_devices[] = {
"vpu_service",
"hevc_service",
"rkvdec",
"rkvenc",
"vpu_combo",
};
static char *system_heaps[] = {
"vmalloc",
"system-heap",
};
mpp_env_get_u32("ion_debug", &ion_debug, 0);
#ifdef SOFIA_3GR_LINUX
return ret;
#endif
for (i = 0; i < MPP_ARRAY_ELEMS(dts_devices); i++) {
snprintf(path, sizeof(path), "/proc/device-tree");
if (find_dir_in_path(path, dts_devices[i], sizeof(path))) {
if (find_dir_in_path(path, "iommu_enabled", sizeof(path))) {
FILE *iommu_fp = fopen(path, "rb");
if (iommu_fp) {
RK_U32 iommu_enabled = 0;
if (fread(&iommu_enabled, sizeof(RK_U32), 1, iommu_fp))
mpp_log("%s iommu_enabled %d\n", dts_devices[i],
(iommu_enabled > 0));
fclose(iommu_fp);
if (iommu_enabled)
ret = ION_DETECT_IOMMU_ENABLE;
}
dts_info_found = 1;
break;
}
}
}
if (!dts_info_found) {
for (i = 0; i < MPP_ARRAY_ELEMS(system_heaps); i++) {
snprintf(path, sizeof(path), "/sys/kernel/debug/ion/heaps");
if (find_dir_in_path(path, system_heaps[i], sizeof(path))) {
mpp_log("%s found\n", system_heaps[i]);
ret = ION_DETECT_IOMMU_ENABLE;
ion_info_found = 1;
break;
}
}
}
if (!dts_info_found && !ion_info_found) {
mpp_err("can not find any hint from all possible devices\n");
ret = ION_DETECT_NO_DTS;
}
return ret;
}
typedef struct {
RK_U32 alignment;
RK_S32 ion_device;
} allocator_ctx_ion;
static const char *dev_ion = "/dev/ion";
static RK_S32 ion_heap_id = -1;
static RK_U32 ion_heap_mask = (1 << ION_HEAP_TYPE_SYSTEM);
static pthread_mutex_t lock;
static MPP_RET allocator_ion_open(void **ctx, MppAllocatorCfg *cfg)
{
RK_S32 fd;
allocator_ctx_ion *p;
if (NULL == ctx) {
mpp_err("os_allocator_open Android do not accept NULL input\n");
return MPP_ERR_NULL_PTR;
}
*ctx = NULL;
fd = open(dev_ion, O_RDWR | O_CLOEXEC);
if (fd < 0) {
mpp_err("open %s failed!\n", dev_ion);
return MPP_ERR_UNKNOW;
}
ion_dbg(ION_DEVICE, "open ion dev fd %d\n", fd);
p = mpp_malloc(allocator_ctx_ion, 1);
if (NULL == p) {
close(fd);
mpp_err("os_allocator_open Android failed to allocate context\n");
return MPP_ERR_MALLOC;
} else {
/*
* do heap id detection here:
* if there is no vpu_service use default ION_HEAP_TYPE_SYSTEM_CONTIG
* if there is vpu_service then check the iommu_enable status
*/
pthread_mutex_lock(&lock);
if (ion_heap_id < 0) {
int detect_result = check_sysfs_iommu();
const char *heap_name = NULL;
switch (detect_result) {
case ION_DETECT_IOMMU_DISABLE : {
ion_heap_mask = (1 << ION_HEAP_TYPE_DMA);
ion_heap_id = ION_HEAP_TYPE_DMA;
heap_name = "ION_HEAP_TYPE_DMA";
} break;
case ION_DETECT_IOMMU_ENABLE : {
ion_heap_mask = (1 << ION_HEAP_TYPE_SYSTEM);
ion_heap_id = ION_HEAP_TYPE_SYSTEM;
heap_name = "ION_HEAP_TYPE_SYSTEM";
} break;
case ION_DETECT_NO_DTS : {
ion_heap_mask = (1 << ION_HEAP_TYPE_CARVEOUT);
ion_heap_id = ION_HEAP_TYPE_CARVEOUT;
heap_name = "ION_HEAP_TYPE_CARVEOUT";
} break;
default : {
mpp_err("invalid detect result %d\n", detect_result);
ion_heap_mask = (1 << ION_HEAP_TYPE_DMA);
ion_heap_id = ION_HEAP_TYPE_DMA;
heap_name = "ION_HEAP_TYPE_DMA";
} break;
}
mpp_log("using ion heap %s\n", heap_name);
}
pthread_mutex_unlock(&lock);
p->alignment = cfg->alignment;
p->ion_device = fd;
*ctx = p;
}
return MPP_OK;
}
static MPP_RET allocator_ion_alloc(void *ctx, MppBufferInfo *info)
{
MPP_RET ret = MPP_OK;
int fd = -1;
ion_user_handle_t hnd = -1;
allocator_ctx_ion *p = NULL;
if (NULL == ctx) {
mpp_err("os_allocator_close Android do not accept NULL input\n");
return MPP_ERR_NULL_PTR;
}
ion_dbg_func("enter: ctx %p size %d\n", ctx, info->size);
p = (allocator_ctx_ion *)ctx;
ret = ion_alloc(p->ion_device, info->size, p->alignment, ion_heap_mask,
0, &hnd);
if (ret)
mpp_err_f("ion_alloc failed ret %d\n", ret);
else {
ret = ion_map_fd(p->ion_device, hnd, &fd);
if (ret)
mpp_err_f("ion_map_fd failed ret %d\n", ret);
}
info->fd = fd;
info->ptr = NULL;
info->hnd = (void *)(intptr_t)hnd;
ion_dbg_func("leave: ret %d handle %d fd %d\n", ret, hnd, fd);
return ret;
}
static MPP_RET allocator_ion_import(void *ctx, MppBufferInfo *data)
{
MPP_RET ret = MPP_NOK;
allocator_ctx_ion *p = (allocator_ctx_ion *)ctx;
struct ion_fd_data fd_data;
ion_dbg_func("enter: ctx %p dev %d fd %d size %d\n",
ctx, p->ion_device, data->fd, data->size);
fd_data.fd = data->fd;
ret = ion_ioctl(p->ion_device, ION_IOC_IMPORT, &fd_data);
if (0 > fd_data.handle) {
mpp_err_f("fd %d import failed for %s\n", data->fd, strerror(errno));
goto RET;
}
data->hnd = (void *)(intptr_t)fd_data.handle;
ret = ion_map_fd(p->ion_device, fd_data.handle, &data->fd);
data->ptr = NULL;
RET:
ion_dbg_func("leave: ret %d handle %d\n", ret, data->hnd);
return ret;
}
static MPP_RET allocator_ion_mmap(void *ctx, MppBufferInfo *data)
{
MPP_RET ret = MPP_OK;
if (NULL == ctx) {
mpp_err_f("do not accept NULL input\n");
return MPP_ERR_NULL_PTR;
}
ion_dbg_func("enter: ctx %p fd %d size %d\n", ctx, data->fd, data->size);
if (NULL == data->ptr)
ret = ion_mmap(data->fd, data->size, PROT_READ | PROT_WRITE,
MAP_SHARED, 0, &data->ptr);
ion_dbg_func("leave: ret %d ptr %p\n", ret, data->ptr);
return ret;
}
static MPP_RET allocator_ion_free(void *ctx, MppBufferInfo *data)
{
allocator_ctx_ion *p = NULL;
if (NULL == ctx) {
mpp_err_f("do not accept NULL input\n");
return MPP_ERR_NULL_PTR;
}
ion_dbg_func("enter: ctx %p fd %d ptr %p size %d\n",
ctx, data->fd, data->ptr, data->size);
p = (allocator_ctx_ion *)ctx;
if (data->ptr) {
munmap(data->ptr, data->size);
data->ptr = NULL;
}
if (data->fd > 0) {
close(data->fd);
data->fd = -1;
}
if (data->hnd) {
ion_free(p->ion_device, (ion_user_handle_t)((intptr_t)data->hnd));
data->hnd = NULL;
}
ion_dbg_func("leave\n");
return MPP_OK;
}
static MPP_RET allocator_ion_close(void *ctx)
{
int ret;
allocator_ctx_ion *p;
if (NULL == ctx) {
mpp_err("os_allocator_close Android do not accept NULL input\n");
return MPP_ERR_NULL_PTR;
}
ion_dbg_func("enter: ctx\n", ctx);
p = (allocator_ctx_ion *)ctx;
ret = close(p->ion_device);
mpp_free(p);
if (ret < 0)
ret = (MPP_RET) - errno;
ion_dbg_func("leave: ret %d\n", ret);
return ret;
}
os_allocator allocator_ion = {
.type = MPP_BUFFER_TYPE_ION,
.open = allocator_ion_open,
.close = allocator_ion_close,
.alloc = allocator_ion_alloc,
.free = allocator_ion_free,
.import = allocator_ion_import,
.release = allocator_ion_free,
.mmap = allocator_ion_mmap,
};