]> git.street.me.uk Git - andy/viking.git/blob - src/mapcache.c
News feature: external tools
[andy/viking.git] / src / mapcache.c
1 /*
2  * viking -- GPS Data and Topo Analyzer, Explorer, and Manager
3  *
4  * Copyright (C) 2003-2005, Evan Battaglia <gtoevan@gmx.net>
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  *
20  */
21
22 #include <gtk/gtk.h>
23 #include <string.h>
24 #include "mapcache.h"
25
26 #include "config.h"
27
28 typedef struct _List {
29   struct _List *next;
30   gchar *key;
31 } List;
32
33 /* a circular linked list, a pointer to the tail, and the tail points to the head */
34 /* this is so we can free the last */
35 static List *queue_tail = NULL;
36 static int queue_count = 0;
37
38 static guint32 queue_size = 0;
39
40
41 static GHashTable *cache = NULL;
42
43 static GMutex *mc_mutex = NULL;
44
45 #define HASHKEY_FORMAT_STRING "%d-%d-%d-%d-%d-%d-%.3f-%.3f"
46 #define HASHKEY_FORMAT_STRING_NOSHRINK_NOR_ALPHA "%d-%d-%d-%d-%d-"
47
48 void a_mapcache_init ()
49 {
50   mc_mutex = g_mutex_new();
51   cache = g_hash_table_new_full ( g_str_hash, g_str_equal, g_free, g_object_unref );
52 }
53
54 static void cache_add(gchar *key, GdkPixbuf *pixbuf)
55 {
56   /* TODO: Check if already exists */
57   g_hash_table_insert ( cache, key, pixbuf );
58   queue_size += gdk_pixbuf_get_rowstride(pixbuf) * gdk_pixbuf_get_height(pixbuf);
59   queue_size += 100;
60   queue_count++;
61 }
62
63 static void cache_remove(const gchar *key)
64 {
65     GdkPixbuf *buf = g_hash_table_lookup ( cache, key );
66     if (buf) {
67       queue_size -= gdk_pixbuf_get_rowstride(buf) * gdk_pixbuf_get_height(buf);
68       queue_size -= 100;
69       queue_count --;
70       g_hash_table_remove ( cache, key );
71     }
72 }
73
74 /* returns key from head, adds on newtailkey to tail. */
75 static gchar *list_shift_add_entry ( gchar *newtailkey )
76 {
77   gchar *oldheadkey = queue_tail->next->key;
78   queue_tail->next->key = newtailkey;
79   queue_tail = queue_tail->next;
80   return oldheadkey;
81 }
82
83 static gchar *list_shift ()
84 {
85   gchar *oldheadkey = queue_tail->next->key;
86   List *oldhead = queue_tail->next;
87   queue_tail->next = queue_tail->next->next;
88   g_free ( oldhead );
89   return oldheadkey;
90 }
91
92 /* adds key to tail */
93 static void list_add_entry ( gchar *key )
94 {
95   List *newlist = g_malloc ( sizeof ( List ) );
96   newlist->key = key;
97   if ( queue_tail ) {
98     newlist->next = queue_tail->next;
99     queue_tail->next = newlist;
100     queue_tail = newlist;
101   } else {
102     newlist->next = newlist;
103     queue_tail = newlist;
104   }
105 }
106
107 void a_mapcache_add ( GdkPixbuf *pixbuf, gint x, gint y, gint z, guint8 type, guint zoom, guint8 alpha, gdouble xshrinkfactor, gdouble yshrinkfactor )
108 {
109   gchar *key = g_strdup_printf ( HASHKEY_FORMAT_STRING, x, y, z, type, zoom, alpha, xshrinkfactor, yshrinkfactor );
110   static int tmp = 0;
111
112   g_mutex_lock(mc_mutex);
113   cache_add(key, pixbuf);
114
115   if ( queue_size > VIK_CONFIG_MAPCACHE_SIZE ) {
116     gchar *oldkey = list_shift_add_entry ( key );
117     cache_remove(oldkey);
118
119     while ( queue_size > VIK_CONFIG_MAPCACHE_SIZE &&
120         (queue_tail->next != queue_tail) ) { /* make sure there's more than one thing to delete */
121       oldkey = list_shift ();
122       cache_remove(oldkey);
123     }
124
125     /* chop off 'start' etc */
126   } else {
127     list_add_entry ( key );
128     /* business as usual */
129   }
130   g_mutex_unlock(mc_mutex);
131
132   if ( (++tmp == 100 ))  { g_print("DEBUG: queue count=%d %u\n", queue_count, queue_size ); tmp=0; }
133 }
134
135 GdkPixbuf *a_mapcache_get ( gint x, gint y, gint z, guint8 type, guint zoom, guint8 alpha, gdouble xshrinkfactor, gdouble yshrinkfactor )
136 {
137   static char key[48];
138   g_snprintf ( key, sizeof(key), HASHKEY_FORMAT_STRING, x, y, z, type, zoom, alpha, xshrinkfactor, yshrinkfactor );
139   return g_hash_table_lookup ( cache, key );
140 }
141
142 void a_mapcache_remove_all_shrinkfactors ( gint x, gint y, gint z, guint8 type, guint zoom )
143 {
144   char key[40];
145   List *loop = queue_tail;
146   List *tmp;
147   gint len;
148
149   if ( queue_tail == NULL )
150     return;
151
152   g_snprintf ( key, sizeof(key), HASHKEY_FORMAT_STRING_NOSHRINK_NOR_ALPHA, x, y, z, type, zoom );
153   len = strlen(key);
154
155   g_mutex_lock(mc_mutex);
156   /* TODO: check logic here */
157   do {
158     tmp = loop->next;
159     if ( strncmp(tmp->key, key, len) == 0 )
160     {
161       cache_remove(tmp->key);
162       if ( tmp == loop ) /* we deleted the last thing in the queue! */
163         loop = queue_tail = NULL;
164       else {
165         loop->next = tmp->next;
166         if ( tmp == queue_tail )
167           queue_tail = tmp->next;
168       }
169       g_free ( tmp );
170       tmp = NULL;
171     }
172     else
173       loop = tmp;
174
175   } while ( loop && (loop != queue_tail || tmp == NULL) );
176
177   /* loop thru list, looking for the one, compare first whatever chars */
178   cache_remove(key);
179   g_mutex_unlock(mc_mutex);
180 }
181
182 void a_mapcache_uninit ()
183 {
184   g_hash_table_destroy ( cache );
185   /* free list */
186   cache = NULL;
187 }
188
189