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