chiark - git - mdw - disorder/blob - 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 */