/*
* Copyright (c) 2011 Samsung Electronics Co., Ltd All Rights Reserved
*
* 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.
*/

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <stdbool.h>
#include <metadata_extractor.h>
#include <metadata_extractor_private.h>

#define SAFE_FREE(src) { if (src) {free(src); src = NULL; } }

#define READ_FROM_FILE(FILE_PATH, data, size) \
	do {	\
		FILE *fp = fopen(FILE_PATH, "r");	\
		if (fp) {	\
			fseek(fp, 0, SEEK_END);	\
			size = ftell(fp);	\
			fseek(fp, 0, SEEK_SET);	\
			if (size > 0) data = malloc(size);	\
			if (data != NULL) { if (fread(data, size, sizeof(char), fp) != size) { printf("fread error\n"); } }	\
			fclose(fp);	\
			printf("file size = %d\n", size);	\
		}	\
	} while (0)

static int _is_file_exist(const char *filename);
static bool __capi_metadata_extractor(metadata_extractor_h metadata);

static int _is_file_exist(const char *filename)
{
	int ret = 1;
	if (filename) {
		const char *to_access = (strstr(filename, "file://") != NULL) ? filename + 7 : filename;
		ret = access(to_access, R_OK);
		if (ret != 0)
			printf("file [%s] not found.\n", to_access);
	}
	return !ret;
}

static bool __capi_metadata_extractor(metadata_extractor_h metadata)
{
	char *duration = 0;
	char *audio_bitrate = 0;
	char *audio_channel = 0;
	char *audio_samplerate = 0;
	char *audio_bitpersample = 0;
	char *audio_track_cnt = 0;
	char *video_bitrate = 0;
	char *video_fps = 0;
	char *video_width = 0;
	char *video_height = 0;
	char *video_track_cnt = 0;
	void *video_thumbnail = NULL;
	int video_thumbnail_len = 0;
	void *video_frame = NULL;
	int video_frame_len = 0;

	/*Tag info*/
	char *artist = NULL;
	char *title = NULL;
	char *album = NULL;
	char *album_artist = NULL;
	char *genre = NULL;
	char *author = NULL;
	char *copyright = NULL;
	char *date = NULL;
	char *description = NULL;
	char *comment = NULL;
	void *artwork = NULL;
	int artwork_size = 0;
	char *artwork_mime = NULL;
	char *track_num = NULL;
	char *classification = NULL;
	char *rating = NULL;
	char *longitude = 0;
	char *latitude = 0;
	char *altitude = 0;
	char *conductor = NULL;
	char *unsynclyrics = NULL;
	char *synclyrics_num = NULL;
	char *rec_date = NULL;
	char *rotate = NULL;
	char *video_codec = NULL;
	char *audio_codec = NULL;
	char *is_360 = NULL;
#ifdef SUPPORT_GSPHERICAL_METADATA
	char *is_stitched_v1 = NULL;
	char *stitching_software_v1 = NULL;
	char *projection_type_v1 = NULL;
	char *stereo_mode_v1 = NULL;
	char *source_count_v1 = NULL;
	char *initial_view_heading_degrees_v1 = NULL;
	char *initial_view_pitch_degrees_v1 = NULL;
	char *initial_view_roll_degrees_v1 = NULL;
	char *timestamp_v1 = NULL;
	char *full_pano_width_v1 = NULL;
	char *full_pano_height_v1 = NULL;
	char *cropped_area_image_width_v1 = NULL;
	char *cropped_area_image_height_v1 = NULL;
	char *cropped_area_left_v1 = NULL;
	char *cropped_area_top_v1 = NULL;

	char *stereo_mode_v2 = NULL;
	char *metadata_source_v2 = NULL;
	char *proj_type_v2 = NULL;
	char *pose_yaw_degrees_v2 = NULL;
	char *pose_pitch_degrees_v2 = NULL;
	char *pose_roll_degrees_v2 = NULL;
	char *cbmp_layout_v2 = NULL;
	char *cbmp_padding_v2 = NULL;
	char *equi_projection_bounds_top_v2 = NULL;
	char *equi_projection_bounds_bottom_v2 = NULL;
	char *equi_projection_bounds_left_v2 = NULL;
	char *equi_projection_bounds_right_v2 = NULL;

	char *ambisonic_type = NULL;
	char *ambisonic_format = NULL;
	char *ambisonic_order = NULL;

#endif

	int idx = 0;
	unsigned long time_info = 0;
	char *lyrics = NULL;
	int video_cnt = 0;
	if (metadata == NULL) {
		printf("Invalid handle \n");
		return false;
	}

	/*Get metadata*/
	metadata_extractor_get_metadata(metadata, METADATA_HAS_AUDIO, &audio_track_cnt);
	printf("audio_track_cnt = [%s]\n", audio_track_cnt);
	metadata_extractor_get_metadata(metadata, METADATA_HAS_VIDEO, &video_track_cnt);
	printf("video_track_cnt = [%s]\n", video_track_cnt);
	if (video_track_cnt != NULL)
		video_cnt = atoi(video_track_cnt);

	metadata_extractor_get_metadata(metadata, METADATA_DURATION, &duration);
	printf("duration = [%s]\n", duration);
	metadata_extractor_get_metadata(metadata, METADATA_AUDIO_BITRATE, &audio_bitrate);
	printf("audio_bitrate = [%s]bps\n", audio_bitrate);
	metadata_extractor_get_metadata(metadata, METADATA_AUDIO_CHANNELS, &audio_channel);
	printf("audio_channel = [%s]\n", audio_channel);
	metadata_extractor_get_metadata(metadata, METADATA_AUDIO_SAMPLERATE, &audio_samplerate);
	printf("audio_samplerate = [%s]Hz\n", audio_samplerate);
	metadata_extractor_get_metadata(metadata, METADATA_AUDIO_BITPERSAMPLE, &audio_bitpersample);
	printf("audio_bitpersample = [%s]Bit\n", audio_bitpersample);

	if (video_cnt > 0) {
		metadata_extractor_get_metadata(metadata, METADATA_VIDEO_BITRATE, &video_bitrate);
		printf("video_bitrate = [%s]bps\n", video_bitrate);
		metadata_extractor_get_metadata(metadata, METADATA_VIDEO_FPS, &video_fps);
		printf("video_fps = [%s]\n", video_fps);
		metadata_extractor_get_metadata(metadata, METADATA_VIDEO_WIDTH, &video_width);
		printf("video_width = [%s]\n", video_width);
		metadata_extractor_get_metadata(metadata, METADATA_VIDEO_HEIGHT, &video_height);
		printf("video_height = [%s]\n", video_height);
	}

	metadata_extractor_get_metadata(metadata, METADATA_ARTIST, &artist);
	printf("artist = [%s]\n", artist);
	metadata_extractor_get_metadata(metadata, METADATA_TITLE, &title);
	printf("title = [%s]\n", title);
	metadata_extractor_get_metadata(metadata, METADATA_ALBUM, &album);
	printf("album = [%s]\n", album);
	metadata_extractor_get_metadata(metadata, METADATA_ALBUM_ARTIST, &album_artist);
	printf("album_artist = [%s]\n", album_artist);
	metadata_extractor_get_metadata(metadata, METADATA_GENRE, &genre);
	printf("genre = [%s]\n", genre);
	metadata_extractor_get_metadata(metadata, METADATA_COMPOSER, &author);
	printf("author = [%s]\n", author);
	metadata_extractor_get_metadata(metadata, METADATA_COPYRIGHT, &copyright);
	printf("copyright = [%s]\n", copyright);
	metadata_extractor_get_metadata(metadata, METADATA_DATE, &date);
	printf("date = [%s]\n", date);
	metadata_extractor_get_metadata(metadata, METADATA_DESCRIPTION, &description);
	printf("description = [%s]\n", description);
	metadata_extractor_get_metadata(metadata, METADATA_COMMENT, &comment);
	printf("comment = [%s]\n", comment);
	metadata_extractor_get_metadata(metadata, METADATA_TRACK_NUM, &track_num);
	printf("track_num = [%s]\n", track_num);
	metadata_extractor_get_metadata(metadata, METADATA_CLASSIFICATION, &classification);
	printf("classification = [%s]\n", classification);
	metadata_extractor_get_metadata(metadata, METADATA_RATING, &rating);
	printf("rating = [%s]\n", rating);
	metadata_extractor_get_metadata(metadata, METADATA_LONGITUDE, &longitude);
	printf("longitude = [%s]\n", longitude);
	metadata_extractor_get_metadata(metadata, METADATA_LATITUDE, &latitude);
	printf("latitude = [%s]\n", latitude);
	metadata_extractor_get_metadata(metadata, METADATA_ALTITUDE, &altitude);
	printf("altitude = [%s]\n", altitude);
	metadata_extractor_get_metadata(metadata, METADATA_CONDUCTOR, &conductor);
	printf("conductor = [%s]\n", conductor);
	metadata_extractor_get_metadata(metadata, METADATA_UNSYNCLYRICS, &unsynclyrics);
	printf("unsynclyrics = [%s]\n", unsynclyrics);
	metadata_extractor_get_metadata(metadata, METADATA_RECDATE, &rec_date);
	printf("rec_date = [%s]\n", rec_date);
	metadata_extractor_get_metadata(metadata, METADATA_ROTATE, &rotate);
	printf("rotate = [%s]\n", rotate);
	metadata_extractor_get_metadata(metadata, METADATA_AUDIO_CODEC, &audio_codec);
	printf("audio_codec = [%s]\n", audio_codec);
	metadata_extractor_get_metadata(metadata, METADATA_VIDEO_CODEC, &video_codec);
	printf("video_codec = [%s]\n", video_codec);
	metadata_extractor_get_metadata(metadata, METADATA_360, &is_360);
	printf("is_360 = [%s]\n", is_360);

#ifdef SUPPORT_GSPHERICAL_METADATA
	metadata_extractor_get_metadata(metadata, METADATA_360_V1_STITCHED, &is_stitched_v1);
	printf("is_stitched_v1 = [%s]\n", is_stitched_v1);
	metadata_extractor_get_metadata(metadata, METADATA_360_V1_STITCHING_SOFTWARE, &stitching_software_v1);
	printf("stitching_software_v1 = [%s]\n", stitching_software_v1);
	metadata_extractor_get_metadata(metadata, METADATA_360_V1_PROJECTION_TYPE, &projection_type_v1);
	printf("projection_type_v1 = [%s]\n", projection_type_v1);
	metadata_extractor_get_metadata(metadata, METADATA_360_V1_STEREO_MODE, &stereo_mode_v1);
	printf("stereo_mode_v1 = [%s]\n", stereo_mode_v1);
	metadata_extractor_get_metadata(metadata, METADATA_360_V1_SOURCE_COUNT, &source_count_v1);
	printf("source_count_v1 = [%s]\n", source_count_v1);
	metadata_extractor_get_metadata(metadata, METADATA_360_V1_INIT_VIEW_HEADING, &initial_view_heading_degrees_v1);
	printf("initial_view_heading_degrees_v1 = [%s]\n", initial_view_heading_degrees_v1);
	metadata_extractor_get_metadata(metadata, METADATA_360_V1_INIT_VIEW_PITCH, &initial_view_pitch_degrees_v1);
	printf("initial_view_pitch_degrees_v1 = [%s]\n", initial_view_pitch_degrees_v1);
	metadata_extractor_get_metadata(metadata, METADATA_360_V1_INIT_VIEW_ROLL, &initial_view_roll_degrees_v1);
	printf("initial_view_roll_degrees_v1 = [%s]\n", initial_view_roll_degrees_v1);
	metadata_extractor_get_metadata(metadata, METADATA_360_V1_TIMESTAMP, &timestamp_v1);
	printf("timestamp_v1 = [%s]\n", timestamp_v1);
	metadata_extractor_get_metadata(metadata, METADATA_360_V1_FULL_PANO_WIDTH, &full_pano_width_v1);
	printf("full_pano_width_v1 = [%s]\n", full_pano_width_v1);
	metadata_extractor_get_metadata(metadata, METADATA_360_V1_FULL_PANO_HEIGHT, &full_pano_height_v1);
	printf("full_pano_height_v1 = [%s]\n", full_pano_height_v1);
	metadata_extractor_get_metadata(metadata, METADATA_360_V1_CROPPED_AREA_IMAGE_WIDTH, &cropped_area_image_width_v1);
	printf("cropped_area_image_width_v1 = [%s]\n", cropped_area_image_width_v1);
	metadata_extractor_get_metadata(metadata, METADATA_360_V1_CROPPED_AREA_IMAGE_HEIGHT, &cropped_area_image_height_v1);
	printf("cropped_area_image_height_v1 = [%s]\n", cropped_area_image_height_v1);
	metadata_extractor_get_metadata(metadata, METADATA_360_V1_CROPPED_AREA_LEFT, &cropped_area_left_v1);
	printf("cropped_area_left_v1 = [%s]\n", cropped_area_left_v1);
	metadata_extractor_get_metadata(metadata, METADATA_360_V1_CROPPED_AREA_TOP, &cropped_area_top_v1);
	printf("cropped_area_top_v1 = [%s]\n", cropped_area_top_v1);

	metadata_extractor_get_metadata(metadata, METADATA_360_V2_STEREO_MODE, &stereo_mode_v2);
	printf("stereo_mode_v2 = [%s]\n", stereo_mode_v2);
	metadata_extractor_get_metadata(metadata, METADATA_360_V2_METADATA_SOURCE, &metadata_source_v2);
	printf("metadata_source_v2 = [%s]\n", metadata_source_v2);
	metadata_extractor_get_metadata(metadata, METADATA_360_V2_PROJ_TYPE, &proj_type_v2);
	printf("proj_type_v2 = [%s]\n", proj_type_v2);
	metadata_extractor_get_metadata(metadata, METADATA_360_V2_POSE_YAW, &pose_yaw_degrees_v2);
	printf("pose_yaw_degrees_v2 = [%s]\n", pose_yaw_degrees_v2);
	metadata_extractor_get_metadata(metadata, METADATA_360_V2_POSE_PITCH, &pose_pitch_degrees_v2);
	printf("pose_pitch_degrees_v2 = [%s]\n", pose_pitch_degrees_v2);
	metadata_extractor_get_metadata(metadata, METADATA_360_V2_POSE_ROLL, &pose_roll_degrees_v2);
	printf("pose_roll_degrees_v2 = [%s]\n", pose_roll_degrees_v2);
	metadata_extractor_get_metadata(metadata, METADATA_360_V2_CBMP_LAYOUT, &cbmp_layout_v2);
	printf("cbmp_layout_v2 = [%s]\n", cbmp_layout_v2);
	metadata_extractor_get_metadata(metadata, METADATA_360_V2_CBMP_PADDING, &cbmp_padding_v2);
	printf("cbmp_padding_v2 = [%s]\n", cbmp_padding_v2);
	metadata_extractor_get_metadata(metadata, METADATA_360_V2_EQUI_BOUNDS_TOP, &equi_projection_bounds_top_v2);
	printf("equi_projection_bounds_top_v2 = [%s]\n", equi_projection_bounds_top_v2);
	metadata_extractor_get_metadata(metadata, METADATA_360_V2_EQUI_BOUNDS_BOTTOM, &equi_projection_bounds_bottom_v2);
	printf("equi_projection_bounds_bottom_v2 = [%s]\n", equi_projection_bounds_bottom_v2);
	metadata_extractor_get_metadata(metadata, METADATA_360_V2_EQUI_BOUNDS_LEFT, &equi_projection_bounds_left_v2);
	printf("equi_projection_bounds_left_v2 = [%s]\n", equi_projection_bounds_left_v2);
	metadata_extractor_get_metadata(metadata, METADATA_360_V2_EQUI_BOUNDS_RIGHT, &equi_projection_bounds_right_v2);
	printf("equi_projection_bounds_right_v2 = [%s]\n", equi_projection_bounds_right_v2);

	metadata_extractor_get_metadata(metadata, METADATA_AMBISONIC_TYPE, &ambisonic_type);
	printf("ambisonic_type = [%s]\n", ambisonic_type);
	metadata_extractor_get_metadata(metadata, METADATA_AMBISONIC_FORMAT, &ambisonic_format);
	printf("ambisonic_format = [%s]\n", ambisonic_format);
	metadata_extractor_get_metadata(metadata, METADATA_AMBISONIC_ORDER, &ambisonic_order);
	printf("ambisonic_order = [%s]\n", ambisonic_order);
#endif

	metadata_extractor_get_metadata(metadata, METADATA_SYNCLYRICS_NUM, &synclyrics_num);
	if (synclyrics_num) {
		int s_num = atoi(synclyrics_num);
		for (idx = 0; idx < s_num; idx++) {
			int ret = -1;
			ret = metadata_extractor_get_synclyrics(metadata, idx, &time_info, &lyrics);
			if (ret == 0)
				printf("[%2d][%6ld][%s]\n", idx, time_info, lyrics);

			SAFE_FREE(lyrics);
		}
	}

	/*Get Artwork*/
	metadata_extractor_get_artwork(metadata, &artwork, &artwork_size, &artwork_mime);
	printf("artwork = [%p], artwork_size = [%d]\n", artwork, artwork_size);
	printf("artwork_mime = [%s]\n", artwork_mime);

	if (video_cnt > 0) {
		/*Get Thumbnail*/
		metadata_extractor_get_frame(metadata, &video_thumbnail, &video_thumbnail_len);
		printf("video_thumbnail[%p], video_thumbnail_len = [%d]\n\n", video_thumbnail, video_thumbnail_len);

		/*Get Video frame at time, extract frame of 22.5 sec and not key frame*/
		metadata_extractor_get_frame_at_time(metadata, 22500, false, &video_frame, &video_frame_len);
		printf("video_frame[%p], video_frame_len = [%d]\n\n", video_frame, video_frame_len);
	}

	SAFE_FREE(audio_track_cnt);
	SAFE_FREE(video_track_cnt);
	SAFE_FREE(duration);
	SAFE_FREE(audio_bitrate);
	SAFE_FREE(audio_channel);
	SAFE_FREE(audio_samplerate);
	SAFE_FREE(audio_bitpersample);
	SAFE_FREE(video_bitrate);
	SAFE_FREE(video_fps);
	SAFE_FREE(video_width);
	SAFE_FREE(video_height);
	SAFE_FREE(video_thumbnail);
	SAFE_FREE(video_frame);

	SAFE_FREE(artist);
	SAFE_FREE(title);
	SAFE_FREE(album);
	SAFE_FREE(album_artist);
	SAFE_FREE(genre);
	SAFE_FREE(author);
	SAFE_FREE(copyright);
	SAFE_FREE(date);
	SAFE_FREE(description);
	SAFE_FREE(comment);
	SAFE_FREE(artwork);
	SAFE_FREE(artwork_mime);
	SAFE_FREE(track_num);
	SAFE_FREE(classification);
	SAFE_FREE(rating);
	SAFE_FREE(longitude);
	SAFE_FREE(latitude);
	SAFE_FREE(altitude);
	SAFE_FREE(conductor);
	SAFE_FREE(unsynclyrics);
	SAFE_FREE(synclyrics_num);
	SAFE_FREE(rec_date);
	SAFE_FREE(rotate);
	SAFE_FREE(audio_codec);
	SAFE_FREE(video_codec);
	SAFE_FREE(is_360);
#ifdef SUPPORT_GSPHERICAL_METADATA
	SAFE_FREE(is_stitched_v1);
	SAFE_FREE(stitching_software_v1);
	SAFE_FREE(projection_type_v1);
	SAFE_FREE(stereo_mode_v1);
	SAFE_FREE(source_count_v1);
	SAFE_FREE(initial_view_heading_degrees_v1);
	SAFE_FREE(initial_view_pitch_degrees_v1);
	SAFE_FREE(initial_view_roll_degrees_v1);
	SAFE_FREE(timestamp_v1);
	SAFE_FREE(full_pano_width_v1);
	SAFE_FREE(full_pano_height_v1);
	SAFE_FREE(cropped_area_image_width_v1);
	SAFE_FREE(cropped_area_image_height_v1);
	SAFE_FREE(cropped_area_left_v1);
	SAFE_FREE(cropped_area_top_v1);

	SAFE_FREE(stereo_mode_v2);
	SAFE_FREE(metadata_source_v2);
	SAFE_FREE(proj_type_v2);
	SAFE_FREE(pose_yaw_degrees_v2);
	SAFE_FREE(pose_pitch_degrees_v2);
	SAFE_FREE(pose_roll_degrees_v2);
	SAFE_FREE(cbmp_layout_v2);
	SAFE_FREE(cbmp_padding_v2);
	SAFE_FREE(equi_projection_bounds_top_v2);
	SAFE_FREE(equi_projection_bounds_bottom_v2);
	SAFE_FREE(equi_projection_bounds_left_v2);
	SAFE_FREE(equi_projection_bounds_right_v2);

	SAFE_FREE(ambisonic_type);
	SAFE_FREE(ambisonic_format);
	SAFE_FREE(ambisonic_order);
#endif

	return true;

}

int main(int argc, char *argv[])
{
	int ret = METADATA_EXTRACTOR_ERROR_NONE;
	metadata_extractor_h metadata;
	int idx = 0;
	int cnt = argc - 1;
	bool file_test = true;
	/* bool file_test = false; */

	printf("--- metadata extractor test start ---\n\n");

	if (cnt < 1) {
		printf("type file path plz. [%d]\n", cnt);
		return 0;
	}

	ret = metadata_extractor_create(&metadata);
	if (ret != METADATA_EXTRACTOR_ERROR_NONE) {
		printf("Fail metadata_extractor_create [%d]\n", ret);
		return 0;
	}

	for (idx = 0; idx < cnt; idx++) {
		if (!_is_file_exist(argv[idx + 1])) {
			printf("there is no file [%s]\n", argv[idx + 1]);
			goto exception;
		}

		if (file_test) {
			printf("Extract meta from file-----------------------\n");
			ret = metadata_extractor_set_path(metadata, argv[idx + 1]);
			if (ret != METADATA_EXTRACTOR_ERROR_NONE) {
				printf("Fail metadata_extractor_set_path [%d]\n", ret);
				goto exception;
			}
		} else {
			printf("Extract meta from memory-----------------------\n");
			unsigned int file_size = 0;
			unsigned char *buffer = NULL;
			/* Read file */
			READ_FROM_FILE(argv[idx + 1], buffer, file_size);

			ret = metadata_extractor_set_buffer(metadata, buffer, file_size);
			if (ret != METADATA_EXTRACTOR_ERROR_NONE) {
				printf("Fail metadata_extractor_set_buffer [%d]\n", ret);
				goto exception;
			}
		}

		__capi_metadata_extractor(metadata);
		printf("--------------------------------------------\n");

	}

exception:
	ret = metadata_extractor_destroy(metadata);
	printf("metadata_extractor_destroy [%d]\n", ret);

	printf("--- metadata extractor test end ---\n\n");

	return 0;

}