/*
 * Copyright 2021 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.
 *
 */
#ifdef __cplusplus
#if __cplusplus
extern "C" {
#endif
#endif /* End of #ifdef __cplusplus */

#include <errno.h>
#include <pthread.h>
#include <stdio.h>
#include <stdlib.h>
#include <sys/poll.h>
#include <sys/prctl.h>
#include <sys/time.h>
#include <time.h>
#include <ucontext.h>
#include <unistd.h>

#include "sample_comm.h"

#define RUN_FRAME_NUM (100)
void PrintStreamDetails(int chnId, int framesize) {
	static int strmfrmCnt = 0;
	static int sumframesize = 0;
	static struct timeval startTime, endTime, passTime;
	double calcTime;

	sumframesize += framesize;

	if (strmfrmCnt == 0)
		gettimeofday(&startTime, NULL);
	if (strmfrmCnt == RUN_FRAME_NUM) {
		gettimeofday(&endTime, NULL);
		printf("\n================= CH%d STREAMING DETAILS ==================\n", chnId);
		printf("Start Time : %ldsec %06ldusec\n", (long)startTime.tv_sec,
		       (long)startTime.tv_usec);
		printf("End Time   : %ldsec %06ldusec\n", (long)endTime.tv_sec,
		       (long)endTime.tv_usec);
		timersub(&endTime, &startTime, &passTime);
		calcTime = (double)passTime.tv_sec * 1000.0 + (double)passTime.tv_usec / 1000.0;
		printf("Total Time to stream %d frames: %.3f msec TotalBytes/sec: %.3f "
		       "Mbps\n",
		       RUN_FRAME_NUM, calcTime,
		       ((float)sumframesize * 8 * 1000) / calcTime / 1024 / 1024);
		printf("Time per frame: %3.4f msec\n", calcTime / RUN_FRAME_NUM);
		printf("Streaming Performance in FPS: %3.4f\n",
		       RUN_FRAME_NUM / (calcTime / 1000));
		// if(RUN_FRAME_NUM/(calcTime/1000) > 31) {
		//    printf("FPS error!!!\n");
		//}
		printf("===========================================================\n");
		strmfrmCnt = 0;
		sumframesize = 0;
	} else {
		strmfrmCnt++;
	}
}

RK_S32 SAMPLE_COMM_Bind(const MPP_CHN_S *pstSrcChn, const MPP_CHN_S *pstDestChn) {
	RK_S32 s32Ret = RK_FAILURE;

	s32Ret = RK_MPI_SYS_Bind(pstSrcChn, pstDestChn);
	if (s32Ret != RK_SUCCESS) {
		RK_LOGE("RK_MPI_SYS_Bind failed with %#x!\n", s32Ret);
		return s32Ret;
	}

	return RK_SUCCESS;
}

RK_S32 SAMPLE_COMM_UnBind(const MPP_CHN_S *pstSrcChn, const MPP_CHN_S *pstDestChn) {
	RK_S32 s32Ret = RK_FAILURE;

	s32Ret = RK_MPI_SYS_UnBind(pstSrcChn, pstDestChn);
	if (s32Ret != RK_SUCCESS) {
		RK_LOGE("RK_MPI_SYS_UnBind failed with %#x!\n", s32Ret);
		return s32Ret;
	}

	return RK_SUCCESS;
}

RK_S32 SAMPLE_COMM_GetBmpResolution(RK_CHAR *pBmpFile, RK_U32 *width, RK_U32 *height) {

	FILE *fp = RK_NULL;
	RK_U16 bfType;
	OSD_BITMAPINFO pBmpInfo;

	*width = 256;
	*height = 256;
	if (pBmpFile == RK_NULL) {
		RK_LOGE("bmp file not exist");
		return RK_FAILURE;
	}

	fp = fopen(pBmpFile, "rb");
	if (fp == RK_NULL) {
		RK_LOGE("open file:%s failure", pBmpFile);
		return RK_FAILURE;
	}

	(void)fread(&bfType, 1, sizeof(bfType), fp);
	if (bfType != 0x4d42) {
		RK_LOGE("is not bmp file");
		fclose(fp);
		return RK_FAILURE;
	}
	fseek(fp, sizeof(OSD_BITMAPFILEHEADER), SEEK_CUR);
	(void)fread(&pBmpInfo, 1, sizeof(OSD_BITMAPINFO), fp);

	*width = pBmpInfo.bmiHeader.biWidth;
	*height = pBmpInfo.bmiHeader.biHeight;
	RK_LOGE("SAMPLE_GET_bmpResolution w:%d  h:%d", *width, *height);

	if (fp) {
		fclose(fp);
		fp = RK_NULL;
	}

	return RK_SUCCESS;
}

RK_S32 SAMPLE_COMM_DumpMeminfo(RK_CHAR *callFunc, RK_S32 moduleTestType) {
	char systemCmd[256];
	system("echo 3 > /proc/sys/vm/drop_caches");
	sprintf(systemCmd, "echo %s %d >> /tmp/testLog.txt", callFunc, moduleTestType);
	system(systemCmd);
	system("cat /proc/meminfo | grep MemAvailable >> /tmp/testLog.txt");
	return RK_SUCCESS;
}

RK_S32 SAMPLE_COMM_GetLdchMesh(RK_CHAR *cam0LdchPath, RK_CHAR *cam1LdchPath,
                               RK_S32 s32MeshDataSize, RK_U16 **pLdchMesh) {
	FILE *fpCam0 = RK_NULL;
	FILE *fpCam1 = RK_NULL;

	fpCam0 = fopen(cam0LdchPath, "rb");
	fpCam1 = fopen(cam1LdchPath, "rb");
	if (!fpCam0 || !fpCam1) {
		RK_LOGE("open %s or %s failure fpCam0:%p fpCam1:%p", cam0LdchPath, cam1LdchPath,
		        fpCam0, fpCam1);
		goto READ_FILE_FAIL;
	}

	if (s32MeshDataSize != fread(pLdchMesh[0], 1, s32MeshDataSize, fpCam0) ||
	    s32MeshDataSize != fread(pLdchMesh[1], 1, s32MeshDataSize, fpCam1)) {
		RK_LOGE("fread %s or %s data failure", cam0LdchPath, cam1LdchPath);
		goto READ_FILE_FAIL;
	}

	if (fpCam0 && fpCam1) {
		fclose(fpCam0);
		fclose(fpCam1);
		fpCam0 = RK_NULL;
		fpCam1 = RK_NULL;
	}

	return RK_SUCCESS;

READ_FILE_FAIL:
	if (fpCam0) {
		fclose(fpCam0);
		fpCam0 = RK_NULL;
	}
	if (fpCam1) {
		fclose(fpCam1);
		fpCam1 = RK_NULL;
	}
	return RK_FAILURE;
}

RK_VOID SAMPLE_COMM_CheckFd(RK_BOOL bStart) {
	static RK_BOOL bQuiltCheckFd = RK_FALSE;
	static pthread_t checkFd_thread_id;
	if (bStart) {
		if (bQuiltCheckFd)
			return NULL;
		else
			bQuiltCheckFd = RK_TRUE;
	} else {
		if (bQuiltCheckFd) {
			bQuiltCheckFd = RK_FALSE;
			if (pthread_join(checkFd_thread_id, NULL) != 0) {
				printf("Failed to join thread!\n");
			}
		}
		return NULL;
	}

	void *checkFd(void *arg) {
		int fd[3];
		prctl(PR_SET_NAME, "check_fd_thread");
		srand(time(NULL));
		while (bQuiltCheckFd) {
			for (int i = 0; i < 3; i++) {
				fd[i] = open("/dev/null", O_RDONLY);
				if (fd[i] == -1) {
					printf("Error opening file descriptor!\n");
				}
			}
			unsigned int delay = rand() % 100;
			usleep(delay * 1000);
			for (int i = 0; i < 3; i++) {
				if (close(fd[i]) == -1) {
					printf("Error closing file descriptor!\n");
					abort();
				}
			}
			usleep(delay * 1000);
		}
		return NULL;
	}

	if (pthread_create(&checkFd_thread_id, NULL, checkFd, NULL) != 0) {
		printf("Failed to create thread!\n");
		return NULL;
	}
}

#ifdef __cplusplus
#if __cplusplus
}
#endif
#endif /* End of #ifdef __cplusplus */