/*
 * ========================
 * =====    ===============
 * ======  ================
 * ======  ================
 * ======  ====   ====   ==
 * ======  ===     ==  =  =
 * ======  ===  =  ==     =
 * =  ===  ===  =  ==  ====
 * =  ===  ===  =  ==  =  =
 * ==     =====   ====   ==
 * ========================
 *
 * SPDX-License-Identifier: BSD-3-Clause
 *
 * Copyright (c) 2022 Joe
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. Neither the name of the organization nor the
 *    names of its contributors may be used to endorse or promote products
 *    derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY JOE ''AS IS'' AND ANY
 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
 * DISCLAIMED. IN NO EVENT SHALL JOE BE LIABLE FOR ANY
 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
 * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
 * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
 * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 *
 * mpdview: src/c_mpdview.c
 * Tue, 12 Jul 2022 21:36:26 +0200
 * Joe
 *
 * This is the entrypoint of the program.
 */

#include <sys/param.h>
#include <sys/syslimits.h>

#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <unistd.h>

#include <mpd/albumart.h>
#include <mpd/connection.h>
#include <mpd/error.h>
#include <mpd/list.h>
#include <mpd/player.h>
#include <mpd/response.h>
#include <mpd/song.h>
#include <mpd/status.h>

#include "c_defines.h"
#include "c_mpdview.h"

static struct mpdview_s *
c_create_view(void)
{
	struct mpdview_s* view;

	view = (struct mpdview_s*)malloc(sizeof(struct mpdview_s));
	if (view == NULL) {
		return (NULL);
	}
	view->conn = NULL;
	view->status = NULL;
	view->song = NULL;
	view->state = MPD_STATE_UNKNOWN;
	return (view);
}

static void
c_get_music_dir(struct mpdview_s* v)
{
	strlcpy(v->music_dir, DEF_MUSIC_DIR, PATH_MAX);
}

static u8_t
c_connect_mpd(struct mpdview_s* v)
{
	v->conn = mpd_connection_new(NULL, 0, 3000);
	if (mpd_connection_get_error(v->conn) != MPD_ERROR_SUCCESS) {
		dprintf(
			STDERR_FILENO,
			"%s: %s\n",
			PROGNAME,
			mpd_connection_get_error_message(v->conn)
			);
		return (RET_ERR);
	}
	return (RET_OK);
}

static void
c_destroy_mpdview(struct mpdview_s** v)
{
	(*v)->state = MPD_STATE_UNKNOWN;
	if ((*v)->song != NULL) {
		mpd_song_free((*v)->song);
	}
	(*v)->song = NULL;
	if ((*v)->status != NULL) {
		mpd_status_free((*v)->status);
	}
	(*v)->status = NULL;
	if ((*v)->conn != NULL) {
		mpd_connection_free((*v)->conn);
	}
	(*v)->conn = NULL;
	free(*v);
	*v = NULL;
}

static u8_t
c_get_mpd_status(struct mpdview_s* v)
{
	v->status = mpd_run_status(v->conn);
	if (v->status == NULL) {
		dprintf(
			STDERR_FILENO,
			"%s: %s\n",
			PROGNAME,
			mpd_status_get_error(v->status)
			);
		return (RET_ERR);
	}
	v->state = mpd_status_get_state(v->status);
	mpd_status_free(v->status);
	v->status = NULL;
	return (RET_OK);
}

static u8_t
c_get_mpd_song(struct mpdview_s* v)
{
	v->song = mpd_run_current_song(v->conn);
	if (v->song == NULL) {
		dprintf(
			STDERR_FILENO,
			"%s: %s\n",
			PROGNAME,
			"Could not get song"
			);
		return (RET_ERR);
	}
	return (RET_OK);
}

static void
c_get_current_dir(struct mpdview_s* v)
{
	ptr_t ptr;

	strlcpy(v->current_dir, v->music_dir, PATH_MAX);
	v->current_dir[strlen(v->current_dir) + 1] = 0x00;
	v->current_dir[strlen(v->current_dir)] = '/';
	strlcat(v->current_dir, mpd_song_get_uri(v->song), PATH_MAX);
	ptr = v->current_dir;
	ptr += strlen(v->current_dir);
	while (*ptr != '/' && ptr > v->music_dir) {
		ptr--;
	}
	*ptr = 0x00;
}

int
main
(int			argc,
 const char*	argv[],
 const char*	envp[])
{
	struct mpdview_s* view;

	(void)argc;
	(void)argv;
	(void)envp;
	view = c_create_view();
	if (view == NULL) {
		return (EXIT_FAILURE);
	}
	c_get_music_dir(view);
	if (c_connect_mpd(view) != RET_OK) {
		c_destroy_mpdview(&view);
		return (EXIT_FAILURE);
	}
	if (c_get_mpd_status(view) == RET_ERR) {
		c_destroy_mpdview(&view);
		return (EXIT_FAILURE);
	}
	if (view->state == MPD_STATE_PLAY || view->state == MPD_STATE_PAUSE) {
		if (c_get_mpd_song(view) == RET_ERR) {
			c_destroy_mpdview(&view);
			return (EXIT_FAILURE);
		}
		c_get_current_dir(view);
		dprintf(STDOUT_FILENO, "%s\n", view->current_dir);
	}
	c_destroy_mpdview(&view);
	return (EXIT_SUCCESS);
}