/*
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
 *
 * Copyright 2017 Olaf Wintermann. 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.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "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 THE COPYRIGHT HOLDER OR CONTRIBUTORS 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.
 */

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ucx/map.h>

#include "toolkit.h"
#include "image.h"
#include "../common/properties.h"

static UcxMap *image_map;

static GtkIconTheme *icon_theme;

void ui_image_init(void) {
    image_map = ucx_map_new(8);
    
    icon_theme = gtk_icon_theme_get_default();
}

// **** deprecated functions ****

GdkPixbuf* ui_get_image(const char *name) {
    UiImage *img = ucx_map_cstr_get(image_map, name);
    if(img) {
        return img->pixbuf;
    } else {
        //ui_add_image(name, name);
        //return ucx_map_cstr_get(image_map, name);
        // TODO
        return NULL;
    }
}

// **** new functions ****

static UiIcon* get_icon(const char *name, int size, int scale) {
#ifdef UI_SUPPORTS_SCALE
    GtkIconInfo *info = gtk_icon_theme_lookup_icon_for_scale(icon_theme, name, size, scale, 0);
#else
    GtkIconInfo *info = gtk_icon_theme_lookup_icon(icon_theme, name, size, 0);
#endif
    if(info) {
        UiIcon *icon = malloc(sizeof(UiIcon));
        icon->info = info;
        return icon;
    }
    return NULL;
}

UiIcon* ui_icon(const char *name, int size) {
    return get_icon(name, size, ui_get_scalefactor());
}

UiIcon* ui_icon_unscaled(const char *name, int size) {
    return get_icon(name, size, 1);
}

void ui_free_icon(UiIcon *icon) {
    g_object_unref(icon->info);
    free(icon);
}

UiImage* ui_icon_image(UiIcon *icon) {
    GError *error = NULL;
    GdkPixbuf *pixbuf = gtk_icon_info_load_icon(icon->info, &error);
    if(pixbuf) {
        UiImage *img = malloc(sizeof(UiImage));
        img->pixbuf = pixbuf;
        return img;
    }
    return NULL;
}

UiImage* ui_image(const char *filename) {
    return ui_named_image(filename, NULL);
}

UiImage* ui_named_image(const char *filename, const char *name) {
    char *path =  uic_get_image_path(filename);
    if(!path) {
        fprintf(stderr, "UiError: pixmaps directory not set\n");
        return NULL;
    }
    UiImage *img = ui_load_image_from_path(path, name);
    free(path);
    return img;
}

UiImage* ui_load_image_from_path(const char *path, const char *name) {
    GError *error = NULL;
    GdkPixbuf *pixbuf = gdk_pixbuf_new_from_file(path, &error);
    if(!pixbuf) {
        fprintf(stderr, "UiError: Cannot load image: %s\n", path);
        return NULL;
    }
    
    UiImage *img = malloc(sizeof(UiImage));
    img->pixbuf = pixbuf;
    if(name) {
        ucx_map_cstr_put(image_map, name, img);
    }
    return img;
}

void ui_free_image(UiImage *img) {
    g_object_unref(img->pixbuf);
    free(img);
}