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 True if a rights lookup is in flight */
  82 static int rights_lookup_in_flight;
  83
  84 /** @brief Current rights bitmap */
  85 rights_type last_rights;
  86
  87 /** @brief Global tooltip group */
  88 GtkTooltips *tips;
  89
  90 /** @brief True if RTP play is available
  91  *
  92  * This is a bit of a bodge...
  93  */
  94 int rtp_supported;
  95
  96 /** @brief True if RTP play is enabled */
  97 int rtp_is_running;
  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 *notebook,
 120                          GtkNotebookPage attribute((unused)) *page,
 121                          guint page_num,
 122                          gpointer attribute((unused)) user_data) {
 123   menu_update(page_num);
 124   GtkWidget *const tab = gtk_notebook_get_nth_page(notebook, page_num);
 125   const struct tabtype *const t = g_object_get_data(G_OBJECT(tab), "type");
 126   if(t->selected)
 127     t->selected();
 128 }
 129
 130 /** @brief Create the report box */
 131 static GtkWidget *report_box(void) {
 132   GtkWidget *vbox = gtk_vbox_new(FALSE, 0);
 133
 134   report_label = gtk_label_new("");
 135   gtk_label_set_ellipsize(GTK_LABEL(report_label), PANGO_ELLIPSIZE_END);
 136   gtk_misc_set_alignment(GTK_MISC(report_label), 0, 0);
 137   gtk_container_add(GTK_CONTAINER(vbox), gtk_hseparator_new());
 138   gtk_container_add(GTK_CONTAINER(vbox), report_label);
 139   return vbox;
 140 }
 141
 142 /** @brief Create and populate the main tab group */
 143 static GtkWidget *notebook(void) {
 144   tabs = gtk_notebook_new();
 145   /* The current tab is _NORMAL, the rest are _ACTIVE, which is bizarre but
 146    * produces not too dreadful appearance */
 147   gtk_widget_set_style(tabs, tool_style);
 148   g_signal_connect(tabs, "switch-page", G_CALLBACK(tab_switched), 0);
 149   gtk_notebook_append_page(GTK_NOTEBOOK(tabs), queue_widget(),
 150                            gtk_label_new("Queue"));
 151   gtk_notebook_append_page(GTK_NOTEBOOK(tabs), recent_widget(),
 152                            gtk_label_new("Recent"));
 153   gtk_notebook_append_page(GTK_NOTEBOOK(tabs), choose_widget(),
 154                            gtk_label_new("Choose"));
 155   gtk_notebook_append_page(GTK_NOTEBOOK(tabs), added_widget(),
 156                            gtk_label_new("Added"));
 157   return tabs;
 158 }
 159
 160 /** @brief Create and populate the main window */
 161 static void make_toplevel_window(void) {
 162   GtkWidget *const vbox = gtk_vbox_new(FALSE, 1);
 163   GtkWidget *const rb = report_box();
 164
 165   D(("top_window"));
 166   toplevel = gtk_window_new(GTK_WINDOW_TOPLEVEL);
 167   /* default size is too small */
 168   gtk_window_set_default_size(GTK_WINDOW(toplevel), 640, 480);
 169   /* terminate on close */
 170   g_signal_connect(G_OBJECT(toplevel), "delete_event",
 171                    G_CALLBACK(delete_event), NULL);
 172   /* lay out the window */
 173   gtk_window_set_title(GTK_WINDOW(toplevel), "Disobedience");
 174   gtk_container_add(GTK_CONTAINER(toplevel), vbox);
 175   /* lay out the vbox */
 176   gtk_box_pack_start(GTK_BOX(vbox),
 177                      menubar(toplevel),
 178                      FALSE,             /* expand */
 179                      FALSE,             /* fill */
 180                      0);
 181   gtk_box_pack_start(GTK_BOX(vbox),
 182                      control_widget(),
 183                      FALSE,             /* expand */
 184                      FALSE,             /* fill */
 185                      0);
 186   gtk_container_add(GTK_CONTAINER(vbox), notebook());
 187   gtk_box_pack_end(GTK_BOX(vbox),
 188                    rb,
 189                    FALSE,             /* expand */
 190                    FALSE,             /* fill */
 191                    0);
 192   gtk_widget_set_style(toplevel, tool_style);
 193 }
 194
 195 #if MDEBUG
 196 static int widget_count, container_count;
 197
 198 static void count_callback(GtkWidget *w,
 199                            gpointer attribute((unused)) data) {
 200   ++widget_count;
 201   if(GTK_IS_CONTAINER(w)) {
 202     ++container_count;
 203     gtk_container_foreach(GTK_CONTAINER(w), count_callback, 0);
 204   }
 205 }
 206
 207 static void count_widgets(void) {
 208   widget_count = 0;
 209   container_count = 1;
 210   if(toplevel)
 211     gtk_container_foreach(GTK_CONTAINER(toplevel), count_callback, 0);
 212   fprintf(stderr, "widget count: %8d  container count: %8d\n",
 213           widget_count, container_count);
 214 }
 215 #endif
 216
 217 #if MTRACK
 218 const char *mtag = "init";
 219 static hash *mtrack_hash;
 220
 221 static int *mthfind(const char *tag) {
 222   static const int zero = 0;
 223   int *cp = hash_find(mtrack_hash, tag);
 224   if(!cp) {
 225     hash_add(mtrack_hash, tag, &zero, HASH_INSERT);
 226     cp = hash_find(mtrack_hash, tag);
 227   }
 228   return cp;
 229 }
 230
 231 static void *trap_malloc(size_t n) {
 232   void *ptr = malloc(n + sizeof(char *));
 233
 234   *(const char **)ptr = mtag;
 235   ++*mthfind(mtag);
 236   return (char *)ptr + sizeof(char *);
 237 }
 238
 239 static void trap_free(void *ptr) {
 240   const char *tag;
 241   if(!ptr)
 242     return;
 243   ptr = (char *)ptr - sizeof(char *);
 244   tag = *(const char **)ptr;
 245   --*mthfind(tag);
 246   free(ptr);
 247 }
 248
 249 static void *trap_realloc(void *ptr, size_t n) {
 250   if(!ptr)
 251     return trap_malloc(n);
 252   if(!n) {
 253     trap_free(ptr);
 254     return 0;
 255   }
 256   ptr = (char *)ptr - sizeof(char *);
 257   ptr = realloc(ptr, n + sizeof(char *));
 258   *(const char **)ptr = mtag;
 259   return (char *)ptr + sizeof(char *);
 260 }
 261
 262 static int report_tags_callback(const char *key, void *value,
 263                                 void attribute((unused)) *u) {
 264   fprintf(stderr, "%16s: %d\n", key, *(int *)value);
 265   return 0;
 266 }
 267
 268 static void report_tags(void) {
 269   hash_foreach(mtrack_hash, report_tags_callback, 0);
 270   fprintf(stderr, "\n");
 271 }
 272
 273 static const GMemVTable glib_memvtable = {
 274   trap_malloc,
 275   trap_realloc,
 276   trap_free,
 277   0,
 278   0,
 279   0
 280 };
 281 #endif
 282
 283 static void userinfo_rights_completed(void attribute((unused)) *v,
 284                                       const char *error,
 285                                       const char *value) {
 286   rights_type r;
 287
 288   if(error) {
 289     popup_protocol_error(0, error);
 290     r = 0;
 291   } else {
 292     if(parse_rights(value, &r, 0))
 293       r = 0;
 294   }
 295   /* If rights have changed, signal everything that cares */
 296   if(r != last_rights) {
 297     last_rights = r;
 298     ++suppress_actions;
 299     event_raise("rights-changed", 0);
 300     --suppress_actions;
 301   }
 302   rights_lookup_in_flight = 0;
 303 }
 304
 305 /** @brief Called occasionally */
 306 static gboolean periodic_slow(gpointer attribute((unused)) data) {
 307   D(("periodic_slow"));
 308   /* Expire cached data */
 309   cache_expire();
 310   /* Update everything to be sure that the connection to the server hasn't
 311    * mysteriously gone stale on us. */
 312   all_update();
 313 #if MDEBUG
 314   count_widgets();
 315   fprintf(stderr, "cache size: %zu\n", cache_count());
 316 #endif
 317 #if MTRACK
 318   report_tags();
 319 #endif
 320   /* Periodically check what our rights are */
 321   if(!rights_lookup_in_flight) {
 322     rights_lookup_in_flight = 1;
 323     disorder_eclient_userinfo(client,
 324                               userinfo_rights_completed,
 325                               config->username, "rights",
 326                               0);
 327   }
 328   return TRUE;                          /* don't remove me */
 329 }
 330
 331 /** @brief Called frequently */
 332 static gboolean periodic_fast(gpointer attribute((unused)) data) {
 333 #if 0                                   /* debugging hack */
 334   static struct timeval last;
 335   struct timeval now;
 336   double delta;
 337
 338   xgettimeofday(&now, 0);
 339   if(last.tv_sec) {
 340     delta = (now.tv_sec + now.tv_sec / 1.0E6)
 341       - (last.tv_sec + last.tv_sec / 1.0E6);
 342     if(delta >= 1.0625)
 343       fprintf(stderr, "%f: %fs between 1s heartbeats\n",
 344               now.tv_sec + now.tv_sec / 1.0E6,
 345               delta);
 346   }
 347   last = now;
 348 #endif
 349   if(rtp_supported && mixer_supported(DEFAULT_BACKEND)) {
 350     int nl, nr;
 351     if(!mixer_control(DEFAULT_BACKEND, &nl, &nr, 0)
 352        && (nl != volume_l || nr != volume_r)) {
 353       volume_l = nl;
 354       volume_r = nr;
 355       event_raise("volume-changed", 0);
 356     }
 357   }
 358   return TRUE;
 359 }
 360
 361 /** @brief Called when a NOP completes */
 362 static void nop_completed(void attribute((unused)) *v,
 363                           const char attribute((unused)) *error) {
 364   /* TODO report the error somewhere */
 365   nop_in_flight = 0;
 366 }
 367
 368 /** @brief Called from time to time to arrange for a NOP to be sent
 369  *
 370  * At most one NOP remains in flight at any moment.  If the client is not
 371  * currently connected then no NOP is sent.
 372  */
 373 static gboolean maybe_send_nop(gpointer attribute((unused)) data) {
 374   if(!nop_in_flight && (disorder_eclient_state(client) & DISORDER_CONNECTED)) {
 375     nop_in_flight = 1;
 376     disorder_eclient_nop(client, nop_completed, 0);
 377   }
 378   if(rtp_supported) {
 379     const int rtp_was_running = rtp_is_running;
 380     rtp_is_running = rtp_running();
 381     if(rtp_was_running != rtp_is_running)
 382       event_raise("rtp-changed", 0);
 383   }
 384   return TRUE;                          /* keep call me please */
 385 }
 386
 387 /** @brief Called when a rtp-address command succeeds */
 388 static void got_rtp_address(void attribute((unused)) *v,
 389                             const char *error,
 390                             int attribute((unused)) nvec,
 391                             char attribute((unused)) **vec) {
 392   const int rtp_was_supported = rtp_supported;
 393   const int rtp_was_running = rtp_is_running;
 394
 395   ++suppress_actions;
 396   rtp_address_in_flight = 0;
 397   if(error) {
 398     /* An error just means that we're not using network play */
 399     rtp_supported = 0;
 400     rtp_is_running = 0;
 401   } else {
 402     rtp_supported = 1;
 403     rtp_is_running = rtp_running();
 404   }
 405   if(rtp_supported != rtp_was_supported
 406      || rtp_is_running != rtp_was_running)
 407     event_raise("rtp-changed", 0);
 408   --suppress_actions;
 409 }
 410
 411 /** @brief Called to check whether RTP play is available */
 412 static void check_rtp_address(void) {
 413   if(!rtp_address_in_flight)
 414     disorder_eclient_rtp_address(client, got_rtp_address, NULL);
 415 }
 416
 417 /* main -------------------------------------------------------------------- */
 418
 419 static const struct option options[] = {
 420   { "help", no_argument, 0, 'h' },
 421   { "version", no_argument, 0, 'V' },
 422   { "config", required_argument, 0, 'c' },
 423   { "tufnel", no_argument, 0, 't' },
 424   { "debug", no_argument, 0, 'd' },
 425   { 0, 0, 0, 0 }
 426 };
 427
 428 /* display usage message and terminate */
 429 static void help(void) {
 430   xprintf("Disobedience - GUI client for DisOrder\n"
 431           "\n"
 432           "Usage:\n"
 433           "  disobedience [OPTIONS]\n"
 434           "Options:\n"
 435           "  --help, -h              Display usage message\n"
 436           "  --version, -V           Display version number\n"
 437           "  --config PATH, -c PATH  Set configuration file\n"
 438           "  --debug, -d             Turn on debugging\n"
 439           "\n"
 440           "Also GTK+ options will work.\n");
 441   xfclose(stdout);
 442   exit(0);
 443 }
 444
 445 void logged_in(void) {
 446   /* reset the clients */
 447   disorder_eclient_close(client);
 448   disorder_eclient_close(logclient);
 449   rtp_supported = 0;
 450   event_raise("logged-in", 0);
 451   /* Force the periodic checks */
 452   check_rtp_address();
 453   periodic_slow(0);
 454   periodic_fast(0);
 455 }
 456
 457 int main(int argc, char **argv) {
 458   int n;
 459   gboolean gtkok;
 460
 461   mem_init();
 462   /* garbage-collect PCRE's memory */
 463   pcre_malloc = xmalloc;
 464   pcre_free = xfree;
 465 #if MTRACK
 466   mtrack_hash = hash_new(sizeof (int));
 467   g_mem_set_vtable((GMemVTable *)&glib_memvtable);
 468 #endif
 469   if(!setlocale(LC_CTYPE, "")) fatal(errno, "error calling setlocale");
 470   gtkok = gtk_init_check(&argc, &argv);
 471   while((n = getopt_long(argc, argv, "hVc:dtHC", options, 0)) >= 0) {
 472     switch(n) {
 473     case 'h': help();
 474     case 'V': version("disobedience");
 475     case 'c': configfile = optarg; break;
 476     case 'd': debugging = 1; break;
 477     case 't': goesupto = 11; break;
 478     default: fatal(0, "invalid option");
 479     }
 480   }
 481   if(!gtkok)
 482     fatal(0, "failed to initialize GTK+");
 483   signal(SIGPIPE, SIG_IGN);
 484   init_styles();
 485   load_settings();
 486   /* create the event loop */
 487   D(("create main loop"));
 488   mainloop = g_main_loop_new(0, 0);
 489   if(config_read(0)) fatal(0, "cannot read configuration");
 490   /* create the clients */
 491   if(!(client = gtkclient())
 492      || !(logclient = gtkclient()))
 493     return 1;                           /* already reported an error */
 494   /* periodic operations (e.g. expiring the cache, checking local volume) */
 495   g_timeout_add(10000/*milliseconds*/, periodic_slow, 0);
 496   g_timeout_add(1000/*milliseconds*/, periodic_fast, 0);
 497   /* global tooltips */
 498   tips = gtk_tooltips_new();
 499   make_toplevel_window();
 500   /* reset styles now everything has its name */
 501   gtk_rc_reset_styles(gtk_settings_get_for_screen(gdk_screen_get_default()));
 502   gtk_widget_show_all(toplevel);
 503   /* issue a NOP every so often */
 504   g_timeout_add_full(G_PRIORITY_LOW,
 505                      2000/*interval, ms*/,
 506                      maybe_send_nop,
 507                      0/*data*/,
 508                      0/*notify*/);
 509   /* Start monitoring the log */
 510   disorder_eclient_log(logclient, &log_callbacks, 0);
 511   /* Initiate all the checks */
 512   check_rtp_address();
 513   periodic_slow(0);
 514   periodic_fast(0);
 515   suppress_actions = 0;
 516   /* If no password is set yet pop up a login box */
 517   if(!config->password)
 518     login_box();
 519   D(("enter main loop"));
 520   MTAG("misc");
 521   g_main_loop_run(mainloop);
 522   return 0;
 523 }
 524
 525 /*
 526 Local Variables:
 527 c-basic-offset:2
 528 comment-column:40
 529 fill-column:79
 530 indent-tabs-mode:nil
 531 End:
 532 */