HGKeeper

* Purple - Internet Messaging Library

* Copyright (C) Pidgin Developers <devel@pidgin.im>

* Purple is the legal property of its developers, whose names are too numerous

* to list here. Please refer to the COPYRIGHT file distributed with this

* source distribution.

* This library 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; either version 2 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 General Public License for

* more details.

* You should have received a copy of the GNU General Public License along with

* this library; if not, see <https://www.gnu.org/licenses/>.

#include "image-store.h"

#include "eventloop.h"

#include "util.h"

#define TEMP_IMAGE_TIMEOUT 5

static GHashTable *id_to_image = NULL;

static guint last_id = 0;

/* keys: timeout handle */

static GHashTable *temp_images = NULL;

/* keys: img id */

static GSList *perm_images = NULL;

static void

image_reset_id(gpointer _id)

{

g_return_if_fail(id_to_image != NULL);

g_hash_table_remove(id_to_image, _id);

}

static guint

image_set_id(PurpleImage *image)

{

/* Use the next unused id number. We do it in a loop on the off chance

* that next id wraps back around to 0 and the hash table still contains

* entries from the first time around.

while (TRUE) {

last_id++;

if (G_UNLIKELY(last_id == 0))

continue;

if (purple_image_store_get(last_id) == NULL)

break;

}

g_object_set_data_full(G_OBJECT(image), "purple-image-store-id",

GINT_TO_POINTER(last_id), image_reset_id);

g_hash_table_insert(id_to_image, GINT_TO_POINTER(last_id), image);

return last_id;

}

static guint

image_get_id(PurpleImage *image)

{

return GPOINTER_TO_INT(g_object_get_data(G_OBJECT(image),

"purple-image-store-id"));

}

guint

purple_image_store_add(PurpleImage *image)

{

guint id;

g_return_val_if_fail(PURPLE_IS_IMAGE(image), 0);

id = image_get_id(image);

if (id > 0)

return id;

id = image_set_id(image);

g_object_ref(image);

perm_images = g_slist_prepend(perm_images, image);

return id;

}

guint

purple_image_store_add_weak(PurpleImage *image)

{

guint id;

g_return_val_if_fail(PURPLE_IS_IMAGE(image), 0);

id = image_get_id(image);

if (id > 0)

return id;

return image_set_id(image);

}

static gboolean

remove_temporary(gpointer _image)

{

PurpleImage *image = _image;

guint handle;

handle = GPOINTER_TO_INT(g_object_get_data(G_OBJECT(image),

"purple-image-store-handle"));

g_hash_table_remove(temp_images, GINT_TO_POINTER(handle));

return G_SOURCE_REMOVE;

}

static void

cancel_temporary(gpointer key, G_GNUC_UNUSED gpointer value,

G_GNUC_UNUSED gpointer data)

{

g_source_remove(GPOINTER_TO_INT(key));

}

guint

purple_image_store_add_temporary(PurpleImage *image)

{

guint id;

guint handle;

g_return_val_if_fail(PURPLE_IS_IMAGE(image), 0);

id = image_get_id(image);

/* XXX: add_temporary doesn't extend previous temporary call, sorry */

if (id > 0)

return id;

id = image_set_id(image);

g_object_ref(image);

handle = g_timeout_add_seconds(TEMP_IMAGE_TIMEOUT,

remove_temporary, image);

g_object_set_data(G_OBJECT(image), "purple-image-store-handle",

GINT_TO_POINTER(handle));

g_hash_table_insert(temp_images, GINT_TO_POINTER(handle), image);

return id;

}

PurpleImage *

purple_image_store_get(guint id)

{

return g_hash_table_lookup(id_to_image, GINT_TO_POINTER(id));

}

PurpleImage *

purple_image_store_get_from_uri(const gchar *uri)

{

guint64 longid;

guint id;

gchar *endptr;

gchar endchar;

g_return_val_if_fail(uri != NULL, NULL);

if (!g_str_has_prefix(uri, PURPLE_IMAGE_STORE_PROTOCOL)) {

return NULL;

}

uri += sizeof(PURPLE_IMAGE_STORE_PROTOCOL) - 1;

if (uri[0] == '-')

return NULL;

longid = g_ascii_strtoull(uri, &endptr, 10);

endchar = endptr[0];

if (endchar != '\0' && endchar != '"' &&

endchar != '\'' && endchar != ' ')

{

return NULL;

}

id = longid;

if (id != longid)

return NULL;

return purple_image_store_get(id);

}

gchar *

purple_image_store_get_uri(PurpleImage *image)

{

const gchar *path;

guint img_id;

g_return_val_if_fail(PURPLE_IS_IMAGE(image), NULL);

path = purple_image_get_path(image);

if (path)

return g_filename_to_uri(path, NULL, NULL);

img_id = purple_image_store_add_weak(image);

return g_strdup_printf(PURPLE_IMAGE_STORE_PROTOCOL "%u", img_id);

}

void

_purple_image_store_init(void)

{

id_to_image = g_hash_table_new(g_direct_hash, g_direct_equal);

temp_images = g_hash_table_new_full(g_direct_hash, g_direct_equal,

NULL, g_object_unref);

}

void

_purple_image_store_uninit(void)

{

g_clear_slist(&perm_images, g_object_unref);

g_hash_table_foreach(temp_images, cancel_temporary, NULL);

g_clear_pointer(&temp_images, g_hash_table_destroy);

g_clear_pointer(&id_to_image, g_hash_table_destroy);

}

pidgin/pidgin