/*

 * This file is part of libbluray

 * Copyright (C) 2011  VideoLAN

 *

 * This library is free software; you can redistribute it and/or

 * modify it under the terms of the GNU Lesser General Public

 * License as published by the Free Software Foundation; either

 * version 2.1 of the License, or (at your option) any later version.

 *

 * This library 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

 * Lesser General Public License for more details.

 *

 * You should have received a copy of the GNU Lesser General Public

 * License along with this library. If not, see

 * <http://www.gnu.org/licenses/>.

 */

#ifdef HAVE_CONFIG_H

# include "config.h"

#endif

#include "dirs.h"

#include "util/logging.h"

#include "util/macro.h"

#include <stdio.h>

#include <string.h>

#include <windows.h>

#include <shlobj.h>

#include <limits.h>

char *win32_get_font_dir(const char *font_file)

{

    wchar_t wdir[MAX_PATH];

    if (S_OK != SHGetFolderPathW(NULL, CSIDL_FONTS, NULL, SHGFP_TYPE_CURRENT, wdir)) {

        int lenght = GetWindowsDirectoryW(wdir, MAX_PATH);

        if (lenght == 0 || lenght > (MAX_PATH - 8)) {

            BD_DEBUG(DBG_FILE, "Font directory path too long!\n");

            return NULL;

        }

        if (!wcscat(wdir, L"\\fonts")) {

            BD_DEBUG(DBG_FILE, "Could not construct font directory path!\n");

            return NULL;

        }

    }

    int   len  = WideCharToMultiByte (CP_UTF8, 0, wdir, -1, NULL, 0, NULL, NULL);

    char *path = malloc(len + strlen(font_file) + 2);

    if (path) {

        WideCharToMultiByte(CP_UTF8, 0, wdir, -1, path, len, NULL, NULL);

        path[len - 1] = '\\';

        strcpy(path + len, font_file);

    }

    return path;

}

char *file_get_config_home(void)

{

    return file_get_data_home();

}

char *file_get_data_home(void)

{

    wchar_t wdir[MAX_PATH];

    /* Get the "Application Data" folder for the user */

    if (S_OK == SHGetFolderPathW(NULL, CSIDL_APPDATA | CSIDL_FLAG_CREATE,

                                 NULL, SHGFP_TYPE_CURRENT, wdir)) {

        int len = WideCharToMultiByte (CP_UTF8, 0, wdir, -1, NULL, 0, NULL, NULL);

        char *appdir = malloc(len);

        if (appdir) {

            WideCharToMultiByte (CP_UTF8, 0, wdir, -1, appdir, len, NULL, NULL);

        }

        return appdir;

    }

    BD_DEBUG(DBG_FILE, "Can't find user configuration directory !\n");

    return NULL;

}

char *file_get_cache_home(void)

{

    return file_get_data_home();

}

const char *file_get_config_system(const char *dir)

{

    static char *appdir = NULL;

    wchar_t wdir[MAX_PATH];

    if (!dir) {

        // first call

        if (appdir)

            return appdir;

        /* Get the "Application Data" folder for all users */

        if (S_OK == SHGetFolderPathW(NULL, CSIDL_COMMON_APPDATA | CSIDL_FLAG_CREATE,

                    NULL, SHGFP_TYPE_CURRENT, wdir)) {

            int len = WideCharToMultiByte (CP_UTF8, 0, wdir, -1, NULL, 0, NULL, NULL);

            appdir = malloc(len);

            if (appdir) {

                WideCharToMultiByte (CP_UTF8, 0, wdir, -1, appdir, len, NULL, NULL);

            }

            return appdir;

        } else {

            BD_DEBUG(DBG_FILE, "Can't find common configuration directory !\n");

            return NULL;

        }

    } else {

        // next call

        return NULL;

    }

    return dir;

}