chiark - git - mdw - disorder/blob - 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 old_state = rtp_is_running;
 346     rtp_is_running = rtp_running();
 347     if(old_state != rtp_is_running)
 348       control_monitor(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   ++suppress_actions;
 359   rtp_address_in_flight = 0;
 360   if(error) {
 361     /* An error just means that we're not using network play */
 362     rtp_supported = 0;
 363     rtp_is_running = 0;
 364   } else {
 365     rtp_supported = 1;
 366     rtp_is_running = rtp_running();
 367     control_monitor(0);
 368   }
 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     disorder_eclient_rtp_address(client, got_rtp_address, NULL);
 377 }
 378
 379 /* main -------------------------------------------------------------------- */
 380
 381 static const struct option options[] = {
 382   { "help", no_argument, 0, 'h' },
 383   { "version", no_argument, 0, 'V' },
 384   { "config", required_argument, 0, 'c' },
 385   { "tufnel", no_argument, 0, 't' },
 386   { "debug", no_argument, 0, 'd' },
 387   { 0, 0, 0, 0 }
 388 };
 389
 390 /* display usage message and terminate */
 391 static void help(void) {
 392   xprintf("Disobedience - GUI client for DisOrder\n"
 393           "\n"
 394           "Usage:\n"
 395           "  disobedience [OPTIONS]\n"
 396           "Options:\n"
 397           "  --help, -h              Display usage message\n"
 398           "  --version, -V           Display version number\n"
 399           "  --config PATH, -c PATH  Set configuration file\n"
 400           "  --debug, -d             Turn on debugging\n"
 401           "\n"
 402           "Also GTK+ options will work.\n");
 403   xfclose(stdout);
 404   exit(0);
 405 }
 406
 407 /* reset state */
 408 void reset(void) {
 409   struct reset_callback_node *r;
 410
 411   /* reset the clients */
 412   disorder_eclient_close(client);
 413   disorder_eclient_close(logclient);
 414   rtp_supported = 0;
 415   for(r = resets; r; r = r->next)
 416     r->callback();
 417   /* Might be a new server so re-check */
 418   check_rtp_address();
 419 }
 420
 421 /** @brief Register a reset callback */
 422 void register_reset(reset_callback *callback) {
 423   struct reset_callback_node *const r = xmalloc(sizeof *r);
 424
 425   r->next = resets;
 426   r->callback = callback;
 427   resets = r;
 428 }
 429
 430 int main(int argc, char **argv) {
 431   int n;
 432   gboolean gtkok;
 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   gtkok = gtk_init_check(&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("disobedience");
 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   if(!gtkok)
 455     fatal(0, "failed to initialize GTK+");
 456   signal(SIGPIPE, SIG_IGN);
 457   init_styles();
 458   load_settings();
 459   /* create the event loop */
 460   D(("create main loop"));
 461   mainloop = g_main_loop_new(0, 0);
 462   if(config_read(0)) fatal(0, "cannot read configuration");
 463   /* create the clients */
 464   if(!(client = gtkclient())
 465      || !(logclient = gtkclient()))
 466     return 1;                           /* already reported an error */
 467   /* periodic operations (e.g. expiring the cache, checking local volume) */
 468   g_timeout_add(600000/*milliseconds*/, periodic_slow, 0);
 469   g_timeout_add(1000/*milliseconds*/, periodic_fast, 0);
 470   /* global tooltips */
 471   tips = gtk_tooltips_new();
 472   make_toplevel_window();
 473   /* reset styles now everything has its name */
 474   gtk_rc_reset_styles(gtk_settings_get_for_screen(gdk_screen_get_default()));
 475   gtk_widget_show_all(toplevel);
 476   /* issue a NOP every so often */
 477   g_timeout_add_full(G_PRIORITY_LOW,
 478                      2000/*interval, ms*/,
 479                      maybe_send_nop,
 480                      0/*data*/,
 481                      0/*notify*/);
 482   register_reset(properties_reset);
 483   /* Start monitoring the log */
 484   disorder_eclient_log(logclient, &log_callbacks, 0);
 485   /* See if RTP play supported */
 486   check_rtp_address();
 487   suppress_actions = 0;
 488   /* If no password is set yet pop up a login box */
 489   if(!config->password)
 490     login_box();
 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 */