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 #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("%s", 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   gboolean gtkok;
 443
 444   mem_init();
 445   /* garbage-collect PCRE's memory */
 446   pcre_malloc = xmalloc;
 447   pcre_free = xfree;
 448 #if MTRACK
 449   mtrack_hash = hash_new(sizeof (int));
 450   g_mem_set_vtable((GMemVTable *)&glib_memvtable);
 451 #endif
 452   if(!setlocale(LC_CTYPE, "")) fatal(errno, "error calling setlocale");
 453   gtkok = gtk_init_check(&argc, &argv);
 454   while((n = getopt_long(argc, argv, "hVc:dtHC", options, 0)) >= 0) {
 455     switch(n) {
 456     case 'h': help();
 457     case 'V': version();
 458     case 'c': configfile = optarg; break;
 459     case 'd': debugging = 1; break;
 460     case 't': goesupto = 11; break;
 461     default: fatal(0, "invalid option");
 462     }
 463   }
 464   if(!gtkok)
 465     fatal(0, "failed to initialize GTK+");
 466   signal(SIGPIPE, SIG_IGN);
 467   init_styles();
 468   load_settings();
 469   /* create the event loop */
 470   D(("create main loop"));
 471   mainloop = g_main_loop_new(0, 0);
 472   if(config_read(0)) fatal(0, "cannot read configuration");
 473   /* create the clients */
 474   if(!(client = gtkclient())
 475      || !(logclient = gtkclient()))
 476     return 1;                           /* already reported an error */
 477   /* periodic operations (e.g. expiring the cache, checking local volume) */
 478   g_timeout_add(600000/*milliseconds*/, periodic_slow, 0);
 479   g_timeout_add(1000/*milliseconds*/, periodic_fast, 0);
 480   /* global tooltips */
 481   tips = gtk_tooltips_new();
 482   make_toplevel_window();
 483   /* reset styles now everything has its name */
 484   gtk_rc_reset_styles(gtk_settings_get_for_screen(gdk_screen_get_default()));
 485   gtk_widget_show_all(toplevel);
 486   /* issue a NOP every so often */
 487   g_timeout_add_full(G_PRIORITY_LOW,
 488                      2000/*interval, ms*/,
 489                      maybe_send_nop,
 490                      0/*data*/,
 491                      0/*notify*/);
 492   register_reset(properties_reset);
 493   /* Start monitoring the log */
 494   disorder_eclient_log(logclient, &log_callbacks, 0);
 495   /* See if RTP play supported */
 496   check_rtp_address();
 497   suppress_actions = 0;
 498   /* If no password is set yet pop up a login box */
 499   if(!config->password)
 500     login_box();
 501   D(("enter main loop"));
 502   MTAG("misc");
 503   g_main_loop_run(mainloop);
 504   return 0;
 505 }
 506
 507 /*
 508 Local Variables:
 509 c-basic-offset:2
 510 comment-column:40
 511 fill-column:79
 512 indent-tabs-mode:nil
 513 End:
 514 */