rt-thread/bsp/renesas/ra6m3-hmi-board/board/ports/avi/player/player.c

532 lines
13 KiB
C

#include "player.h"
#include "avifile.h"
#include "pwm_audio.h"
#include <rthw.h>
#include <dfs_file.h>
#include <unistd.h>
#include <sys/stat.h>
#include <sys/statfs.h>
#include "lv_demo_video.h"
#define DBG_TAG "player"
#define DBG_LVL DBG_INFO
#include <rtdbg.h>
#define T_vids _REV(0x30306463)
#define T_auds _REV(0x30317762)
#define __Map(x, in_min, in_max, out_min, out_max) \
(((x) - (in_min)) * ((out_max) - (out_min)) / ((in_max) - (in_min)) + (out_min))
#define v_pbuffer_size 35 * 1024
struct avi_file_info
{
uint32_t Strsize;
uint32_t Strtype;
size_t BytesRD;
uint32_t cur_time;
uint32_t alltime;
} avi_file;
extern AVI_TypeDef AVI_file;
static uint8_t *v_pbuffer;
static uint32_t _REV(uint32_t value)
{
return (value & 0x000000FFU) << 24 | (value & 0x0000FF00U) << 8 |
(value & 0x00FF0000U) >> 8 | (value & 0xFF000000U) >> 24;
}
static void audio_init(player_t player)
{
pwm_audio_config_t pac;
pac.duty_resolution = 10;
pac.gpio_num_left = 1;
pac.gpio_num_right = -1;
pac.ringbuf_len = 1024 * 8;
pwm_audio_init(&pac);
/* set default volume:-16 -- +16*/
pwm_audio_set_volume(player->volume);
}
static uint32_t read_video_frame(int fd, uint8_t *buffer, uint32_t length, uint32_t *fourcc)
{
AVI_CHUNK_HEAD head;
read(fd, &head, sizeof(AVI_CHUNK_HEAD));
if (head.FourCC)
{
/* code */
}
*fourcc = head.FourCC;
if (head.size % 2)
{
head.size++;
}
if (length < head.size)
{
rt_kprintf("frame size too large\n");
return 0;
}
read(fd, buffer, head.size);
return head.size;
}
static int video_start_parser(player_t player, int fd, char *filename)
{
int ret;
uint32_t alltime;
fd = open(filename, O_WRONLY);
avi_file.BytesRD = read(fd, v_pbuffer, 20480);
ret = AVI_Parser(v_pbuffer, avi_file.BytesRD);
if (0 > ret)
{
LOG_E("parse failed (%d)\n", ret);
return RT_ERROR;
}
/* Audio Init */
audio_init(player);
pwm_audio_set_param(AVI_file.auds_sample_rate, AVI_file.auds_bits, AVI_file.auds_channels);
alltime = (AVI_file.avi_hd.avih.us_per_frame / 1000) * AVI_file.avi_hd.avih.total_frames;
alltime /= 1000; /* s */
player->song_time_all = alltime;
LOG_I("video total time:%02d:%02d:%02d\n", alltime / 3600, (alltime % 3600) / 60, alltime % 60);
lseek(fd, AVI_file.movi_start, SEEK_SET);
avi_file.Strsize = read_video_frame(fd, v_pbuffer, v_pbuffer_size, &avi_file.Strtype);
avi_file.BytesRD = avi_file.Strsize + 8;
return fd;
}
static void search_files(player_t player, const char *dir_path, const char *ext)
{
struct dirent *dirp;
DIR *dir = opendir(dir_path);
if (dir == NULL)
{
LOG_E("open directory error!");
return;
}
while ((dirp = readdir(dir)))
{
if (dirp->d_type == DT_DIR)
{
if (rt_strcmp(dirp->d_name, ".") == 0 || strcmp(dirp->d_name, "..") == 0)
{
continue;
}
char subdir_path[64];
rt_snprintf(subdir_path, sizeof(subdir_path), "%s/%s", dir_path, dirp->d_name);
search_files(player, subdir_path, ext);
}
else
{
char *file_ext = strrchr(dirp->d_name, '.');
if (file_ext != NULL && strcmp(file_ext, ext) == 0)
{
char file_path[64];
rt_snprintf(file_path, sizeof(file_path), "%s/%s", dir_path, dirp->d_name);
LOG_I("%s\n", file_path);
player->video_list[player->video_num] = rt_strdup(file_path);
LOG_E("video_list[%d]:%s", player->video_num, player->video_list[player->video_num]);
player->video_num ++;
}
}
}
closedir(dir);
}
static uint8_t add_video_player(player_t player)
{
uint8_t video_index = 0;
if (player->video_num == 0)
{
player->video_list[player->song_current] = rt_strdup(player->video_name);
LOG_I("Add first res to player list:%s", player->video_list[player->song_current]);
player->song_current ++;
player->video_num++;
}
else
{
rt_bool_t flag = RT_FALSE;
/* 遍历播放列表,若不存在则添加进去 */
for (int index = 0; index < player->video_num; index++)
{
char *video_name = player->video_list[index];
/* 不等于则查找下一个 */
if (rt_strcmp(player->video_name, video_name))
{
flag = RT_TRUE;
}
else
{
flag = RT_FALSE;
video_index = index;
LOG_I("Find name to the list,index:%d", video_index);
break;
}
}
if (flag)
{
player->video_list[player->song_current] = rt_strdup(player->video_name);
LOG_I("Add [%s] to player list", player->video_list[player->song_current]);
player->song_current ++;
player->video_num ++;
/* free currnet player,to play next video */
player_delete(player);
}
}
/* show player */
player_show(player);
return video_index;
}
int player_show(player_t player)
{
uint8_t i;
uint16_t percent;
rt_kprintf("*********** video Player ***********\n");
/* print now video */
for (i = 0; i < player->video_num; i++)
{
rt_kprintf("%02d. %s\n", i + 1, (char *)player->video_list[i]);
}
/* print now player status */
if (PLAYER_RUNNING == player->status)
{
rt_kprintf("<--- current player:");
}
else
{
rt_kprintf("<--- stop player:");
}
/* print current player */
rt_kprintf("%s", (char *)player->video_list[player->song_current]);
rt_kprintf("--->\n");
/* print player process */
percent = player->song_time_pass * 100 / player->song_time_all;
rt_kprintf("Player Progress:%02d%% Volume level:%02d%%\n", percent, player->volume);
rt_kprintf("***********************************\n");
return 0;
}
static int player_init(player_t player)
{
rt_uint32_t level;
if (player->status != PLAYER_RUNNING)
{
level = rt_hw_interrupt_disable();
player->status = PLAYER_READY;
player->song_current = add_video_player(player) + 1;
rt_hw_interrupt_enable(level);
rt_sem_release(player->sem_play);
}
return 0;
}
static int player_play(player_t player)
{
rt_uint32_t level;
if (player->status != PLAYER_RUNNING)
{
level = rt_hw_interrupt_disable();
player->status = PLAYER_RUNNING;
rt_hw_interrupt_enable(level);
rt_sem_release(player->sem_play);
}
return 0;
}
static int player_stop(player_t player)
{
rt_uint32_t level;
if (player->status == PLAYER_RUNNING)
{
level = rt_hw_interrupt_disable();
player->status = PLAYER_STOP;
rt_hw_interrupt_enable(level);
}
return 0;
}
int player_delete(player_t player)
{
rt_uint32_t level;
if (player->status == PLAYER_RUNNING)
{
level = rt_hw_interrupt_disable();
player->status = PLAYER_DELETE;
rt_hw_interrupt_enable(level);
}
return 0;
}
static int player_last(player_t player)
{
rt_uint32_t level;
level = rt_hw_interrupt_disable();
if (player->song_current > 1)
{
player->song_current --;
}
else
{
player->song_current = player->video_num;
}
// player->song_time_pass = 0;
rt_hw_interrupt_enable(level);
player->status = PLAYER_LAST;
level = rt_hw_interrupt_disable();
rt_hw_interrupt_enable(level);
return 0;
}
static int player_next(player_t player)
{
rt_uint32_t level;
level = rt_hw_interrupt_disable();
if (player->song_current < player->video_num)
{
player->song_current ++;
}
else
{
player->song_current = 1;
}
// player->song_time_pass = 0;
rt_hw_interrupt_enable(level);
player->status = PLAYER_NEXT;
level = rt_hw_interrupt_disable();
rt_hw_interrupt_enable(level);
return 0;
}
int player_control(player_t player, int cmd, void *arg)
{
rt_uint32_t level;
switch (cmd)
{
case PLAYER_CMD_INIT:
LOG_I("Rec res name:%s len:%d", (char *)arg, rt_strlen(arg));
rt_memset(player->video_name, 0x00, rt_strlen(arg));
rt_strcpy(player->video_name, arg);
player_init(player);
break;
case PLAYER_CMD_PLAY:
player_play(player);
break;
case PLAYER_CMD_STOP:
player_stop(player);
break;
case PLAYER_CMD_LAST:
player_last(player);
break;
case PLAYER_CMD_NEXT:
player_next(player);
break;
case PLAYER_CMD_SET_VOL:
level = rt_hw_interrupt_disable();
player->volume = *(int16_t *)arg;
rt_hw_interrupt_enable(level);
pwm_audio_set_volume(player->volume);
break;
case PLAYER_CMD_GET_VOL:
*(uint8_t *)arg = player->volume;
break;
case PLAYER_CMD_GET_STATUS:
*(uint8_t *)arg = player->status;
break;
}
return 0;
}
static void player_entry(void *parameter)
{
int fd = -1;
int32_t process;
player_t player = (player_t)parameter;
while (1)
{
if (player->status == PLAYER_READY)
{
fd = video_start_parser(player, fd, player->video_list[player->song_current - 1]);
LOG_I("Player:%s ready decode\n", player->video_list[player->song_current - 1]);
player->status = PLAYER_RUNNING;
}
if (player->status == PLAYER_RUNNING)
{
avi_file.cur_time = ((float)avi_file.BytesRD / AVI_file.movi_size) * avi_file.alltime;
if (avi_file.Strtype == T_vids)
{
JPEG_Draw_frame(player->decode, v_pbuffer, 0x00, 0x00);
}
/* audio output */
else if (avi_file.Strtype == T_auds)
{
size_t cnt;
pwm_audio_write((uint8_t *)v_pbuffer, avi_file.Strsize, &cnt, 500);
}
else
{
LOG_E("Unknow frame\n");
break;
}
/* read frame */
avi_file.Strsize = read_video_frame(fd, v_pbuffer, v_pbuffer_size, &avi_file.Strtype);
avi_file.BytesRD += avi_file.Strsize + 8;
player->song_time_pass = ((double)avi_file.BytesRD / AVI_file.movi_size) * player->song_time_all;
process = __Map((int32_t)player->song_time_pass, 0, player->song_time_all, 0, 100);
set_audio_wave_value(process);
/* if video was play over,play next video */
if (avi_file.BytesRD >= AVI_file.movi_size)
{
set_audio_wave_value(0);
//------------------------------
player_show(player);
player_next(player);
}
}
if (player->status == PLAYER_STOP)
{
LOG_I("Stop player");
pwm_audio_stop();
rt_sem_take(player->sem_play, RT_WAITING_FOREVER);
pwm_audio_start();
}
if (player->status == PLAYER_DELETE)
{
close(fd);
pwm_audio_deinit();
player->status = PLAYER_IDLE;
LOG_I("Free %s resources", player->video_list[player->song_current - 1]);
}
if (player->status == PLAYER_LAST)
{
close(fd);
pwm_audio_deinit();
player->status = PLAYER_READY;
LOG_I("Free %s resources", player->video_list[player->song_current - 1]);
}
if (player->status == PLAYER_NEXT)
{
close(fd);
pwm_audio_deinit();
player->status = PLAYER_READY;
LOG_I("Free %s resources", player->video_list[player->song_current - 1]);
}
if (player->status == PLAYER_IDLE)
{
rt_sem_take(player->sem_play, RT_WAITING_FOREVER);
}
}
}
int player_start(player_t player)
{
static rt_uint8_t inited = 0;
if (inited == 1)
{
return -RT_ERROR;
}
v_pbuffer = rt_malloc(v_pbuffer_size);
RT_ASSERT(v_pbuffer != NULL)
rt_memset(v_pbuffer, 0x00, v_pbuffer_size);
/* read filesystem */
search_files(player, "/", ".avi");
player->status = PLAYER_IDLE;
player->volume = PLAYER_SOUND_SIZE_DEFAULT;
player->song_current = 0;
player->song_time_pass = 0;
player->sem_play = rt_sem_create("sem_play", 0, RT_IPC_FLAG_FIFO);
if (player->sem_play == RT_NULL)
{
return -RT_ERROR;
}
player->play_thread = rt_thread_create("player",
player_entry, player,
2 * 1024, 18, 20);
if (player->play_thread != RT_NULL)
{
rt_thread_startup(player->play_thread);
}
else
{
rt_sem_delete(player->sem_play);
return -RT_ERROR;
}
inited = 1;
return 0;
}