/*  This file is part of libravatarserv.
 *  Copyright © 2018 tastytea <tastytea@tastytea.de>
 *
 *  This program is free software: you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation, version 3.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License
 *  along with this program.  If not, see <http://www.gnu.org/licenses/>.
 */

#include <iostream>
#include <cstdlib>
#include <basedir.h>
#include "version.hpp"
#include "libravatarserv.hpp"

using std::cout;
using std::cerr;
using std::endl;
using global::avatar_dir;

// Global variables
std::map<const string, const string> hash::table;
fs::path global::avatar_dir = "";


int main()
{
    cout << "Server: libravatarserv/" << global::version << endl;
    const char *request = std::getenv("REQUEST_URI");
    if (request == nullptr)
    {
        cout << "Status: 404 Not Found\n\n";
        cerr << "Error: ${REQUEST_URI} is empty.\n";
        return 1;
    }

    if (!find_avatar_dir())
    {
        cout << "Status: 404 Not Found\n\n";
        cerr << "Error: No avatars found.\n";
        return 3;
    }
    hash::fill_table();

    http::Request avatar = http::parse_request(request);

    image::Image answer = image::get(avatar.digest, avatar.size);
    if (answer.error == 0)
    {
        cout << "Content-type: image/png\n";
        cout << "Cache-Control: max-age=86400\n";
        cout << "Connection: close\n\n";
        cout.flush();   // We need to flush before we use /dev/stdout directly.
        answer.image.write("/dev/stdout");
    }
    else
    {
        cerr << "Error " << std::to_string(answer.error) << ": Could not open file.\n";
        if (avatar.fallback.empty())
        {
            cout << "Status: 404 Not Found\n\n";
        }
        else
        {
            if (avatar.fallback.substr(0, 4) == "http")
            {
                cout << "Status: 307 Temporary Redirect\n";
                cout << "Location: " << avatar.fallback << endl << endl;
            }
        }
    }

    return 0;
}

bool find_avatar_dir()
{
    const char *envdir = std::getenv("AVATAR_DIR");
    if (envdir != nullptr)
    {
        if (fs::is_directory(envdir))
        {
            avatar_dir = envdir;
        }
        else
        {
            return false;
        }
    }
    else
    {
        xdgHandle xdg;
        xdgInitHandle(&xdg);
        auto data_dirs = xdgDataDirectories(&xdg);
        const uint8_t size = sizeof(data_dirs) / sizeof(*data_dirs);

        for (uint8_t index = 0; index <= size; ++index)
        {
            const string searchdir = data_dirs[index] + string("/libravatarserv");
            if (fs::is_directory(searchdir))
            {
                avatar_dir = searchdir;
                break;
            }
        }
        xdgWipeHandle(&xdg);
        if (avatar_dir.empty())
        {
            return false;
        }
    }

    return true;
}