tests/dtest.py: Force a sensble locale if we don't have one.
[disorder] / disobedience / lookup.c
1 /*
2 * This file is part of DisOrder
3 * Copyright (C) 2008 Richard Kettlewell
4 *
5 * This program is free software: you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation, either version 3 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License
16 * along with this program. If not, see <http://www.gnu.org/licenses/>.
17 */
18 /** @file disobedience/lookup.c
19 * @brief Disobedience server lookups and caching
20 */
21 #include "disobedience.h"
22
23 static int namepart_lookups_outstanding;
24 static const struct cache_type cachetype_string = { 3600 };
25 static const struct cache_type cachetype_integer = { 3600 };
26
27 /** @brief Called when a namepart lookup has completed or failed
28 *
29 * When there are no lookups in flight a redraw is provoked. This might well
30 * provoke further lookups.
31 */
32 static void namepart_completed_or_failed(void) {
33 --namepart_lookups_outstanding;
34 if(!namepart_lookups_outstanding)
35 /* When all lookups complete, we update any displays that care */
36 event_raise("lookups-completed", 0);
37 }
38
39 /** @brief Called when a namepart lookup has completed */
40 static void namepart_completed(void *v, const char *err, const char *value) {
41 D(("namepart_completed"));
42 if(err) {
43 gtk_label_set_text(GTK_LABEL(report_label), err);
44 value = "?";
45 }
46 const char *key = v;
47
48 cache_put(&cachetype_string, key, value);
49 namepart_completed_or_failed();
50 }
51
52 /** @brief Called when a length lookup has completed */
53 static void length_completed(void *v, const char *err, long l) {
54 D(("length_completed"));
55 if(err) {
56 gtk_label_set_text(GTK_LABEL(report_label), err);
57 l = -1;
58 }
59 const char *key = v;
60 long *value;
61
62 D(("namepart_completed"));
63 value = xmalloc(sizeof *value);
64 *value = l;
65 cache_put(&cachetype_integer, key, value);
66 namepart_completed_or_failed();
67 }
68
69 /** @brief Arrange to fill in a namepart cache entry */
70 static void namepart_fill(const char *track,
71 const char *context,
72 const char *part,
73 const char *key) {
74 D(("namepart_fill %s %s %s %s", track, context, part, key));
75 ++namepart_lookups_outstanding;
76 D(("namepart_lookups_outstanding -> %d\n", namepart_lookups_outstanding));
77 disorder_eclient_part(client, namepart_completed,
78 track, context, part, (void *)key);
79 }
80
81 /** @brief Look up a namepart
82 * @param track Track name
83 * @param context Context
84 * @param part Name part
85 *
86 * If it is in the cache then just return its value. If not then look it up
87 * and arrange for the queues to be updated when its value is available. */
88 const char *namepart(const char *track,
89 const char *context,
90 const char *part) {
91 char *key;
92 const char *value;
93
94 D(("namepart %s %s %s", track, context, part));
95 byte_xasprintf(&key, "namepart context=%s part=%s track=%s",
96 context, part, track);
97 value = cache_get(&cachetype_string, key);
98 if(!value) {
99 D(("deferring..."));
100 namepart_fill(track, context, part, key);
101 value = "?";
102 }
103 return value;
104 }
105
106 /** @brief Called from @ref disobedience/properties.c when we know a name part has changed */
107 void namepart_update(const char *track,
108 const char *context,
109 const char *part) {
110 char *key;
111
112 byte_xasprintf(&key, "namepart context=%s part=%s track=%s",
113 context, part, track);
114 /* Only refetch if it's actually in the cache. */
115 if(cache_get(&cachetype_string, key))
116 namepart_fill(track, context, part, key);
117 }
118
119 /** @brief Look up a track length
120 *
121 * If it is in the cache then just return its value. If not then look it up
122 * and arrange for the queues to be updated when its value is available. */
123 long namepart_length(const char *track) {
124 char *key;
125 const long *value;
126
127 D(("getlength %s", track));
128 byte_xasprintf(&key, "length track=%s", track);
129 value = cache_get(&cachetype_integer, key);
130 if(value)
131 return *value;
132 D(("deferring..."));;
133 ++namepart_lookups_outstanding;
134 D(("namepart_lookups_outstanding -> %d\n", namepart_lookups_outstanding));
135 disorder_eclient_length(client, length_completed, track, key);
136 return -1;
137 }
138
139 /** @brief Resolve a track name
140 *
141 * Returns the supplied track name if it doesn't have the answer yet.
142 */
143 char *namepart_resolve(const char *track) {
144 char *key;
145
146 byte_xasprintf(&key, "resolve track=%s", track);
147 const char *value = cache_get(&cachetype_string, key);
148 if(!value) {
149 D(("deferring..."));
150 ++namepart_lookups_outstanding;
151 D(("namepart_lookups_outstanding -> %d\n", namepart_lookups_outstanding));
152 disorder_eclient_resolve(client, namepart_completed,
153 track, (void *)key);
154 value = track;
155 }
156 return xstrdup(value);
157 }
158
159 /*
160 Local Variables:
161 c-basic-offset:2
162 comment-column:40
163 fill-column:79
164 indent-tabs-mode:nil
165 End:
166 */