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