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