Complete Disobedience transition to event_ from _monitor.
[disorder] / disobedience / disobedience.c
1 /*
2 * This file is part of DisOrder.
3 * Copyright (C) 2006, 2007, 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 2 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, but
11 * WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * 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, write to the Free Software
17 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
18 * USA
19 */
20 /** @file disobedience/disobedience.c
21 * @brief Main Disobedience program
22 */
23
24 #include "disobedience.h"
25 #include "mixer.h"
26 #include "version.h"
27
28 #include <getopt.h>
29 #include <locale.h>
30 #include <pcre.h>
31
32 /* Apologies for the numerous de-consting casts, but GLib et al do not seem to
33 * have heard of const. */
34
35 /* Variables --------------------------------------------------------------- */
36
37 /** @brief Event loop */
38 GMainLoop *mainloop;
39
40 /** @brief Top-level window */
41 GtkWidget *toplevel;
42
43 /** @brief Label for progress indicator */
44 GtkWidget *report_label;
45
46 /** @brief Main tab group */
47 GtkWidget *tabs;
48
49 /** @brief Main client */
50 disorder_eclient *client;
51
52 /** @brief Log client */
53 disorder_eclient *logclient;
54
55 /** @brief Last reported state
56 *
57 * This is updated by log_state().
58 */
59 unsigned long last_state;
60
61 /** @brief True if some track is playing
62 *
63 * This ought to be removed in favour of last_state & DISORDER_PLAYING
64 */
65 int playing;
66
67 /** @brief Left channel volume */
68 int volume_l;
69
70 /** @brief Right channel volume */
71 int volume_r;
72
73 double goesupto = 10; /* volume upper bound */
74
75 /** @brief True if a NOP is in flight */
76 static int nop_in_flight;
77
78 /** @brief True if an rtp-address command is in flight */
79 static int rtp_address_in_flight;
80
81 /** @brief Global tooltip group */
82 GtkTooltips *tips;
83
84 /** @brief True if RTP play is available
85 *
86 * This is a bit of a bodge...
87 */
88 int rtp_supported;
89
90 /** @brief True if RTP play is enabled */
91 int rtp_is_running;
92
93 /** @brief Linked list of functions to call when we reset login parameters */
94 static struct reset_callback_node {
95 struct reset_callback_node *next;
96 reset_callback *callback;
97 } *resets;
98
99 /* Window creation --------------------------------------------------------- */
100
101 /* Note that all the client operations kicked off from here will only complete
102 * after we've entered the event loop. */
103
104 /** @brief Called when main window is deleted
105 *
106 * Terminates the program.
107 */
108 static gboolean delete_event(GtkWidget attribute((unused)) *widget,
109 GdkEvent attribute((unused)) *event,
110 gpointer attribute((unused)) data) {
111 D(("delete_event"));
112 exit(0); /* die immediately */
113 }
114
115 /** @brief Called when the current tab is switched
116 *
117 * Updates the menu settings to correspond to the new page.
118 */
119 static void tab_switched(GtkNotebook attribute((unused)) *notebook,
120 GtkNotebookPage attribute((unused)) *page,
121 guint page_num,
122 gpointer attribute((unused)) user_data) {
123 menu_update(page_num);
124 }
125
126 /** @brief Create the report box */
127 static GtkWidget *report_box(void) {
128 GtkWidget *vbox = gtk_vbox_new(FALSE, 0);
129
130 report_label = gtk_label_new("");
131 gtk_label_set_ellipsize(GTK_LABEL(report_label), PANGO_ELLIPSIZE_END);
132 gtk_misc_set_alignment(GTK_MISC(report_label), 0, 0);
133 gtk_container_add(GTK_CONTAINER(vbox), gtk_hseparator_new());
134 gtk_container_add(GTK_CONTAINER(vbox), report_label);
135 return vbox;
136 }
137
138 /** @brief Create and populate the main tab group */
139 static GtkWidget *notebook(void) {
140 tabs = gtk_notebook_new();
141 /* The current tab is _NORMAL, the rest are _ACTIVE, which is bizarre but
142 * produces not too dreadful appearance */
143 gtk_widget_set_style(tabs, tool_style);
144 g_signal_connect(tabs, "switch-page", G_CALLBACK(tab_switched), 0);
145 gtk_notebook_append_page(GTK_NOTEBOOK(tabs), queue_widget(),
146 gtk_label_new("Queue"));
147 gtk_notebook_append_page(GTK_NOTEBOOK(tabs), recent_widget(),
148 gtk_label_new("Recent"));
149 gtk_notebook_append_page(GTK_NOTEBOOK(tabs), choose_widget(),
150 gtk_label_new("Choose"));
151 gtk_notebook_append_page(GTK_NOTEBOOK(tabs), added_widget(),
152 gtk_label_new("Added"));
153 return tabs;
154 }
155
156 /** @brief Create and populate the main window */
157 static void make_toplevel_window(void) {
158 GtkWidget *const vbox = gtk_vbox_new(FALSE, 1);
159 GtkWidget *const rb = report_box();
160
161 D(("top_window"));
162 toplevel = gtk_window_new(GTK_WINDOW_TOPLEVEL);
163 /* default size is too small */
164 gtk_window_set_default_size(GTK_WINDOW(toplevel), 640, 480);
165 /* terminate on close */
166 g_signal_connect(G_OBJECT(toplevel), "delete_event",
167 G_CALLBACK(delete_event), NULL);
168 /* lay out the window */
169 gtk_window_set_title(GTK_WINDOW(toplevel), "Disobedience");
170 gtk_container_add(GTK_CONTAINER(toplevel), vbox);
171 /* lay out the vbox */
172 gtk_box_pack_start(GTK_BOX(vbox),
173 menubar(toplevel),
174 FALSE, /* expand */
175 FALSE, /* fill */
176 0);
177 gtk_box_pack_start(GTK_BOX(vbox),
178 control_widget(),
179 FALSE, /* expand */
180 FALSE, /* fill */
181 0);
182 gtk_container_add(GTK_CONTAINER(vbox), notebook());
183 gtk_box_pack_end(GTK_BOX(vbox),
184 rb,
185 FALSE, /* expand */
186 FALSE, /* fill */
187 0);
188 gtk_widget_set_style(toplevel, tool_style);
189 }
190
191 #if MDEBUG
192 static int widget_count, container_count;
193
194 static void count_callback(GtkWidget *w,
195 gpointer attribute((unused)) data) {
196 ++widget_count;
197 if(GTK_IS_CONTAINER(w)) {
198 ++container_count;
199 gtk_container_foreach(GTK_CONTAINER(w), count_callback, 0);
200 }
201 }
202
203 static void count_widgets(void) {
204 widget_count = 0;
205 container_count = 1;
206 if(toplevel)
207 gtk_container_foreach(GTK_CONTAINER(toplevel), count_callback, 0);
208 fprintf(stderr, "widget count: %8d container count: %8d\n",
209 widget_count, container_count);
210 }
211 #endif
212
213 #if MTRACK
214 const char *mtag = "init";
215 static hash *mtrack_hash;
216
217 static int *mthfind(const char *tag) {
218 static const int zero = 0;
219 int *cp = hash_find(mtrack_hash, tag);
220 if(!cp) {
221 hash_add(mtrack_hash, tag, &zero, HASH_INSERT);
222 cp = hash_find(mtrack_hash, tag);
223 }
224 return cp;
225 }
226
227 static void *trap_malloc(size_t n) {
228 void *ptr = malloc(n + sizeof(char *));
229
230 *(const char **)ptr = mtag;
231 ++*mthfind(mtag);
232 return (char *)ptr + sizeof(char *);
233 }
234
235 static void trap_free(void *ptr) {
236 const char *tag;
237 if(!ptr)
238 return;
239 ptr = (char *)ptr - sizeof(char *);
240 tag = *(const char **)ptr;
241 --*mthfind(tag);
242 free(ptr);
243 }
244
245 static void *trap_realloc(void *ptr, size_t n) {
246 if(!ptr)
247 return trap_malloc(n);
248 if(!n) {
249 trap_free(ptr);
250 return 0;
251 }
252 ptr = (char *)ptr - sizeof(char *);
253 ptr = realloc(ptr, n + sizeof(char *));
254 *(const char **)ptr = mtag;
255 return (char *)ptr + sizeof(char *);
256 }
257
258 static int report_tags_callback(const char *key, void *value,
259 void attribute((unused)) *u) {
260 fprintf(stderr, "%16s: %d\n", key, *(int *)value);
261 return 0;
262 }
263
264 static void report_tags(void) {
265 hash_foreach(mtrack_hash, report_tags_callback, 0);
266 fprintf(stderr, "\n");
267 }
268
269 static const GMemVTable glib_memvtable = {
270 trap_malloc,
271 trap_realloc,
272 trap_free,
273 0,
274 0,
275 0
276 };
277 #endif
278
279 /** @brief Called occasionally */
280 static gboolean periodic_slow(gpointer attribute((unused)) data) {
281 D(("periodic"));
282 /* Expire cached data */
283 cache_expire();
284 /* Update everything to be sure that the connection to the server hasn't
285 * mysteriously gone stale on us. */
286 all_update();
287 #if MDEBUG
288 count_widgets();
289 fprintf(stderr, "cache size: %zu\n", cache_count());
290 #endif
291 #if MTRACK
292 report_tags();
293 #endif
294 return TRUE; /* don't remove me */
295 }
296
297 /** @brief Called frequently */
298 static gboolean periodic_fast(gpointer attribute((unused)) data) {
299 #if 0 /* debugging hack */
300 static struct timeval last;
301 struct timeval now;
302 double delta;
303
304 xgettimeofday(&now, 0);
305 if(last.tv_sec) {
306 delta = (now.tv_sec + now.tv_sec / 1.0E6)
307 - (last.tv_sec + last.tv_sec / 1.0E6);
308 if(delta >= 1.0625)
309 fprintf(stderr, "%f: %fs between 1s heartbeats\n",
310 now.tv_sec + now.tv_sec / 1.0E6,
311 delta);
312 }
313 last = now;
314 #endif
315 if(rtp_supported && mixer_supported(DEFAULT_BACKEND)) {
316 int nl, nr;
317 if(!mixer_control(DEFAULT_BACKEND, &nl, &nr, 0)
318 && (nl != volume_l || nr != volume_r)) {
319 volume_l = nl;
320 volume_r = nr;
321 event_raise("volume-changed", 0);
322 }
323 }
324 return TRUE;
325 }
326
327 /** @brief Called when a NOP completes */
328 static void nop_completed(void attribute((unused)) *v,
329 const char attribute((unused)) *error) {
330 /* TODO report the error somewhere */
331 nop_in_flight = 0;
332 }
333
334 /** @brief Called from time to time to arrange for a NOP to be sent
335 *
336 * At most one NOP remains in flight at any moment. If the client is not
337 * currently connected then no NOP is sent.
338 */
339 static gboolean maybe_send_nop(gpointer attribute((unused)) data) {
340 if(!nop_in_flight && (disorder_eclient_state(client) & DISORDER_CONNECTED)) {
341 nop_in_flight = 1;
342 disorder_eclient_nop(client, nop_completed, 0);
343 }
344 if(rtp_supported) {
345 const int rtp_was_running = rtp_is_running;
346 rtp_is_running = rtp_running();
347 if(rtp_was_running != rtp_is_running)
348 event_raise("rtp-changed", 0);
349 }
350 return TRUE; /* keep call me please */
351 }
352
353 /** @brief Called when a rtp-address command succeeds */
354 static void got_rtp_address(void attribute((unused)) *v,
355 const char *error,
356 int attribute((unused)) nvec,
357 char attribute((unused)) **vec) {
358 const int rtp_was_running = rtp_is_running;
359
360 ++suppress_actions;
361 rtp_address_in_flight = 0;
362 if(error) {
363 /* An error just means that we're not using network play */
364 rtp_supported = 0;
365 rtp_is_running = 0;
366 } else {
367 rtp_supported = 1;
368 rtp_is_running = rtp_running();
369 }
370 if(rtp_is_running != rtp_was_running)
371 event_raise("rtp-changed", 0);
372 --suppress_actions;
373 }
374
375 /** @brief Called to check whether RTP play is available */
376 static void check_rtp_address(void) {
377 if(!rtp_address_in_flight)
378 disorder_eclient_rtp_address(client, got_rtp_address, NULL);
379 }
380
381 /* main -------------------------------------------------------------------- */
382
383 static const struct option options[] = {
384 { "help", no_argument, 0, 'h' },
385 { "version", no_argument, 0, 'V' },
386 { "config", required_argument, 0, 'c' },
387 { "tufnel", no_argument, 0, 't' },
388 { "debug", no_argument, 0, 'd' },
389 { 0, 0, 0, 0 }
390 };
391
392 /* display usage message and terminate */
393 static void help(void) {
394 xprintf("Disobedience - GUI client for DisOrder\n"
395 "\n"
396 "Usage:\n"
397 " disobedience [OPTIONS]\n"
398 "Options:\n"
399 " --help, -h Display usage message\n"
400 " --version, -V Display version number\n"
401 " --config PATH, -c PATH Set configuration file\n"
402 " --debug, -d Turn on debugging\n"
403 "\n"
404 "Also GTK+ options will work.\n");
405 xfclose(stdout);
406 exit(0);
407 }
408
409 /* reset state */
410 void reset(void) {
411 struct reset_callback_node *r;
412
413 /* reset the clients */
414 disorder_eclient_close(client);
415 disorder_eclient_close(logclient);
416 rtp_supported = 0;
417 for(r = resets; r; r = r->next)
418 r->callback();
419 /* Might be a new server so re-check */
420 check_rtp_address();
421 }
422
423 /** @brief Register a reset callback */
424 void register_reset(reset_callback *callback) {
425 struct reset_callback_node *const r = xmalloc(sizeof *r);
426
427 r->next = resets;
428 r->callback = callback;
429 resets = r;
430 }
431
432 int main(int argc, char **argv) {
433 int n;
434 gboolean gtkok;
435
436 mem_init();
437 /* garbage-collect PCRE's memory */
438 pcre_malloc = xmalloc;
439 pcre_free = xfree;
440 #if MTRACK
441 mtrack_hash = hash_new(sizeof (int));
442 g_mem_set_vtable((GMemVTable *)&glib_memvtable);
443 #endif
444 if(!setlocale(LC_CTYPE, "")) fatal(errno, "error calling setlocale");
445 gtkok = gtk_init_check(&argc, &argv);
446 while((n = getopt_long(argc, argv, "hVc:dtHC", options, 0)) >= 0) {
447 switch(n) {
448 case 'h': help();
449 case 'V': version("disobedience");
450 case 'c': configfile = optarg; break;
451 case 'd': debugging = 1; break;
452 case 't': goesupto = 11; break;
453 default: fatal(0, "invalid option");
454 }
455 }
456 if(!gtkok)
457 fatal(0, "failed to initialize GTK+");
458 signal(SIGPIPE, SIG_IGN);
459 init_styles();
460 load_settings();
461 /* create the event loop */
462 D(("create main loop"));
463 mainloop = g_main_loop_new(0, 0);
464 if(config_read(0)) fatal(0, "cannot read configuration");
465 /* create the clients */
466 if(!(client = gtkclient())
467 || !(logclient = gtkclient()))
468 return 1; /* already reported an error */
469 /* periodic operations (e.g. expiring the cache, checking local volume) */
470 g_timeout_add(600000/*milliseconds*/, periodic_slow, 0);
471 g_timeout_add(1000/*milliseconds*/, periodic_fast, 0);
472 /* global tooltips */
473 tips = gtk_tooltips_new();
474 make_toplevel_window();
475 /* reset styles now everything has its name */
476 gtk_rc_reset_styles(gtk_settings_get_for_screen(gdk_screen_get_default()));
477 gtk_widget_show_all(toplevel);
478 /* issue a NOP every so often */
479 g_timeout_add_full(G_PRIORITY_LOW,
480 2000/*interval, ms*/,
481 maybe_send_nop,
482 0/*data*/,
483 0/*notify*/);
484 register_reset(properties_reset);
485 /* Start monitoring the log */
486 disorder_eclient_log(logclient, &log_callbacks, 0);
487 /* See if RTP play supported */
488 check_rtp_address();
489 suppress_actions = 0;
490 /* If no password is set yet pop up a login box */
491 if(!config->password)
492 login_box();
493 D(("enter main loop"));
494 MTAG("misc");
495 g_main_loop_run(mainloop);
496 return 0;
497 }
498
499 /*
500 Local Variables:
501 c-basic-offset:2
502 comment-column:40
503 fill-column:79
504 indent-tabs-mode:nil
505 End:
506 */