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 #include "style.h"                      /* generated style */
  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 Last reported state
  53  *
  54  * This is updated by log_state().
  55  */
  56 unsigned long last_state;
  57
  58 /** @brief True if some track is playing
  59  *
  60  * This ought to be removed in favour of last_state & DISORDER_PLAYING
  61  */
  62 int playing;
  63
  64 /** @brief Left channel volume */
  65 int volume_l;
  66
  67 /** @brief Right channel volume */
  68 int volume_r;
  69
  70 double goesupto = 10;                   /* volume upper bound */
  71
  72 /** @brief Break up choose tab by initial letter */
  73 int choosealpha;
  74
  75 /** @brief True if a NOP is in flight */
  76 static int nop_in_flight;
  77
  78 /** @brief Global tooltip group */
  79 GtkTooltips *tips;
  80
  81 /* Window creation --------------------------------------------------------- */
  82
  83 /* Note that all the client operations kicked off from here will only complete
  84  * after we've entered the event loop. */
  85
  86 /** @brief Called when main window is deleted
  87  *
  88  * Terminates the program.
  89  */
  90 static gboolean delete_event(GtkWidget attribute((unused)) *widget,
  91                              GdkEvent attribute((unused)) *event,
  92                              gpointer attribute((unused)) data) {
  93   D(("delete_event"));
  94   exit(0);                              /* die immediately */
  95 }
  96
  97 /** @brief Called when the current tab is switched
  98  *
  99  * Updates the menu settings to correspond to the new page.
 100  */
 101 static void tab_switched(GtkNotebook attribute((unused)) *notebook,
 102                          GtkNotebookPage attribute((unused)) *page,
 103                          guint page_num,
 104                          gpointer attribute((unused)) user_data) {
 105   menu_update(page_num);
 106 }
 107
 108 /** @brief Create the report box */
 109 static GtkWidget *report_box(void) {
 110   GtkWidget *vbox = gtk_vbox_new(FALSE, 0);
 111
 112   report_label = gtk_label_new("");
 113   gtk_label_set_ellipsize(GTK_LABEL(report_label), PANGO_ELLIPSIZE_END);
 114   gtk_misc_set_alignment(GTK_MISC(report_label), 0, 0);
 115   gtk_container_add(GTK_CONTAINER(vbox), gtk_hseparator_new());
 116   gtk_container_add(GTK_CONTAINER(vbox), report_label);
 117   return vbox;
 118 }
 119
 120 /** @brief Create and populate the main tab group */
 121 static GtkWidget *notebook(void) {
 122   tabs = gtk_notebook_new();
 123   g_signal_connect(tabs, "switch-page", G_CALLBACK(tab_switched), 0);
 124   gtk_notebook_append_page(GTK_NOTEBOOK(tabs), queue_widget(),
 125                            gtk_label_new("Queue"));
 126   gtk_notebook_append_page(GTK_NOTEBOOK(tabs), recent_widget(),
 127                            gtk_label_new("Recent"));
 128   gtk_notebook_append_page(GTK_NOTEBOOK(tabs), choose_widget(),
 129                            gtk_label_new("Choose"));
 130   gtk_notebook_append_page(GTK_NOTEBOOK(tabs), added_widget(),
 131                            gtk_label_new("Added"));
 132   return tabs;
 133 }
 134
 135 /** @brief Create and populate the main window */
 136 static void make_toplevel_window(void) {
 137   GtkWidget *const vbox = gtk_vbox_new(FALSE, 1);
 138   GtkWidget *const rb = report_box();
 139
 140   D(("top_window"));
 141   toplevel = gtk_window_new(GTK_WINDOW_TOPLEVEL);
 142   /* default size is too small */
 143   gtk_window_set_default_size(GTK_WINDOW(toplevel), 640, 480);
 144   /* terminate on close */
 145   g_signal_connect(G_OBJECT(toplevel), "delete_event",
 146                    G_CALLBACK(delete_event), NULL);
 147   /* lay out the window */
 148   gtk_window_set_title(GTK_WINDOW(toplevel), "Disobedience");
 149   gtk_container_add(GTK_CONTAINER(toplevel), vbox);
 150   /* lay out the vbox */
 151   gtk_box_pack_start(GTK_BOX(vbox),
 152                      menubar(toplevel),
 153                      FALSE,             /* expand */
 154                      FALSE,             /* fill */
 155                      0);
 156   gtk_box_pack_start(GTK_BOX(vbox),
 157                      control_widget(),
 158                      FALSE,             /* expand */
 159                      FALSE,             /* fill */
 160                      0);
 161   gtk_container_add(GTK_CONTAINER(vbox), notebook());
 162   gtk_box_pack_end(GTK_BOX(vbox),
 163                    rb,
 164                    FALSE,             /* expand */
 165                    FALSE,             /* fill */
 166                    0);
 167   gtk_widget_set_name(toplevel, "disobedience");
 168 }
 169
 170 #if MDEBUG
 171 static int widget_count, container_count;
 172
 173 static void count_callback(GtkWidget *w,
 174                            gpointer attribute((unused)) data) {
 175   ++widget_count;
 176   if(GTK_IS_CONTAINER(w)) {
 177     ++container_count;
 178     gtk_container_foreach(GTK_CONTAINER(w), count_callback, 0);
 179   }
 180 }
 181
 182 static void count_widgets(void) {
 183   widget_count = 0;
 184   container_count = 1;
 185   if(toplevel)
 186     gtk_container_foreach(GTK_CONTAINER(toplevel), count_callback, 0);
 187   fprintf(stderr, "widget count: %8d  container count: %8d\n",
 188           widget_count, container_count);
 189 }
 190 #endif
 191
 192 #if MTRACK
 193 const char *mtag = "init";
 194 static hash *mtrack_hash;
 195
 196 static int *mthfind(const char *tag) {
 197   static const int zero = 0;
 198   int *cp = hash_find(mtrack_hash, tag);
 199   if(!cp) {
 200     hash_add(mtrack_hash, tag, &zero, HASH_INSERT);
 201     cp = hash_find(mtrack_hash, tag);
 202   }
 203   return cp;
 204 }
 205
 206 static void *trap_malloc(size_t n) {
 207   void *ptr = malloc(n + sizeof(char *));
 208
 209   *(const char **)ptr = mtag;
 210   ++*mthfind(mtag);
 211   return (char *)ptr + sizeof(char *);
 212 }
 213
 214 static void trap_free(void *ptr) {
 215   const char *tag;
 216   if(!ptr)
 217     return;
 218   ptr = (char *)ptr - sizeof(char *);
 219   tag = *(const char **)ptr;
 220   --*mthfind(tag);
 221   free(ptr);
 222 }
 223
 224 static void *trap_realloc(void *ptr, size_t n) {
 225   if(!ptr)
 226     return trap_malloc(n);
 227   if(!n) {
 228     trap_free(ptr);
 229     return 0;
 230   }
 231   ptr = (char *)ptr - sizeof(char *);
 232   ptr = realloc(ptr, n + sizeof(char *));
 233   *(const char **)ptr = mtag;
 234   return (char *)ptr + sizeof(char *);
 235 }
 236
 237 static int report_tags_callback(const char *key, void *value,
 238                                 void attribute((unused)) *u) {
 239   fprintf(stderr, "%16s: %d\n", key, *(int *)value);
 240   return 0;
 241 }
 242
 243 static void report_tags(void) {
 244   hash_foreach(mtrack_hash, report_tags_callback, 0);
 245   fprintf(stderr, "\n");
 246 }
 247
 248 static const GMemVTable glib_memvtable = {
 249   trap_malloc,
 250   trap_realloc,
 251   trap_free,
 252   0,
 253   0,
 254   0
 255 };
 256 #endif
 257
 258 /** @brief Called once every 10 minutes */
 259 static gboolean periodic(gpointer attribute((unused)) data) {
 260   D(("periodic"));
 261   /* Expire cached data */
 262   cache_expire();
 263   /* Update everything to be sure that the connection to the server hasn't
 264    * mysteriously gone stale on us. */
 265   all_update();
 266 #if MDEBUG
 267   count_widgets();
 268   fprintf(stderr, "cache size: %zu\n", cache_count());
 269 #endif
 270 #if MTRACK
 271   report_tags();
 272 #endif
 273   return TRUE;                          /* don't remove me */
 274 }
 275
 276 /** @brief Called from time to time
 277  *
 278  * Used for debugging purposes
 279  */
 280 static gboolean heartbeat(gpointer attribute((unused)) data) {
 281   static struct timeval last;
 282   struct timeval now;
 283   double delta;
 284
 285   xgettimeofday(&now, 0);
 286   if(last.tv_sec) {
 287     delta = (now.tv_sec + now.tv_sec / 1.0E6)
 288       - (last.tv_sec + last.tv_sec / 1.0E6);
 289     if(delta >= 1.0625)
 290       fprintf(stderr, "%f: %fs between 1s heartbeats\n",
 291               now.tv_sec + now.tv_sec / 1.0E6,
 292               delta);
 293   }
 294   last = now;
 295   return TRUE;
 296 }
 297
 298 /** @brief Called when a NOP completes */
 299 static void nop_completed(void attribute((unused)) *v) {
 300   nop_in_flight = 0;
 301 }
 302
 303 /** @brief Called from time to time to arrange for a NOP to be sent
 304  *
 305  * At most one NOP remains in flight at any moment.  If the client is not
 306  * currently connected then no NOP is sent.
 307  */
 308 static gboolean maybe_send_nop(gpointer attribute((unused)) data) {
 309   if(!nop_in_flight && (disorder_eclient_state(client) & DISORDER_CONNECTED)) {
 310     nop_in_flight = 1;
 311     disorder_eclient_nop(client, nop_completed, 0);
 312   }
 313   return TRUE;                          /* keep call me please */
 314 }
 315
 316 /* main -------------------------------------------------------------------- */
 317
 318 static const struct option options[] = {
 319   { "help", no_argument, 0, 'h' },
 320   { "version", no_argument, 0, 'V' },
 321   { "config", required_argument, 0, 'c' },
 322   { "tufnel", no_argument, 0, 't' },
 323   { "choosealpha", no_argument, 0, 'C' },
 324   { "debug", no_argument, 0, 'd' },
 325   { 0, 0, 0, 0 }
 326 };
 327
 328 /* display usage message and terminate */
 329 static void help(void) {
 330   xprintf("Disobedience - GUI client for DisOrder\n"
 331           "\n"
 332           "Usage:\n"
 333           "  disobedience [OPTIONS]\n"
 334           "Options:\n"
 335           "  --help, -h              Display usage message\n"
 336           "  --version, -V           Display version number\n"
 337           "  --config PATH, -c PATH  Set configuration file\n"
 338           "  --debug, -d             Turn on debugging\n"
 339           "\n"
 340           "Also GTK+ options will work.\n");
 341   xfclose(stdout);
 342   exit(0);
 343 }
 344
 345 /* display version number and terminate */
 346 static void version(void) {
 347   xprintf("disorder version %s\n", disorder_version_string);
 348   xfclose(stdout);
 349   exit(0);
 350 }
 351
 352 int main(int argc, char **argv) {
 353   int n;
 354   disorder_eclient *logclient;
 355
 356   mem_init();
 357   /* garbage-collect PCRE's memory */
 358   pcre_malloc = xmalloc;
 359   pcre_free = xfree;
 360 #if MTRACK
 361   mtrack_hash = hash_new(sizeof (int));
 362   g_mem_set_vtable((GMemVTable *)&glib_memvtable);
 363 #endif
 364   if(!setlocale(LC_CTYPE, "")) fatal(errno, "error calling setlocale");
 365   gtk_init(&argc, &argv);
 366   gtk_rc_parse_string(style);
 367   while((n = getopt_long(argc, argv, "hVc:dtH", options, 0)) >= 0) {
 368     switch(n) {
 369     case 'h': help();
 370     case 'V': version();
 371     case 'c': configfile = optarg; break;
 372     case 'd': debugging = 1; break;
 373     case 't': goesupto = 11; break;
 374     case 'C': choosealpha = 1; break;   /* not well tested any more */
 375     default: fatal(0, "invalid option");
 376     }
 377   }
 378   signal(SIGPIPE, SIG_IGN);
 379   /* create the event loop */
 380   D(("create main loop"));
 381   mainloop = g_main_loop_new(0, 0);
 382   if(config_read(0)) fatal(0, "cannot read configuration");
 383   /* create the clients */
 384   if(!(client = gtkclient())
 385      || !(logclient = gtkclient()))
 386     return 1;                           /* already reported an error */
 387   /* periodic operations (e.g. expiring the cache) */
 388 #if MDEBUG || MTRACK
 389   g_timeout_add(5000/*milliseconds*/, periodic, 0);
 390 #else
 391   g_timeout_add(600000/*milliseconds*/, periodic, 0);
 392 #endif
 393   /* The point of this is to try and get a handle on mysterious
 394    * unresponsiveness.  It's not very useful in production use. */
 395   if(0)
 396     g_timeout_add(1000/*milliseconds*/, heartbeat, 0);
 397   /* global tooltips */
 398   tips = gtk_tooltips_new();
 399   make_toplevel_window();
 400   /* reset styles now everything has its name */
 401   gtk_rc_reset_styles(gtk_settings_get_for_screen(gdk_screen_get_default()));
 402   gtk_widget_show_all(toplevel);
 403   /* issue a NOP every so often */
 404   g_timeout_add_full(G_PRIORITY_LOW,
 405                      1000/*interval, ms*/,
 406                      maybe_send_nop,
 407                      0/*data*/,
 408                      0/*notify*/);
 409   /* Start monitoring the log */
 410   disorder_eclient_log(logclient, &log_callbacks, 0);
 411   D(("enter main loop"));
 412   MTAG("misc");
 413   g_main_loop_run(mainloop);
 414   return 0;
 415 }
 416
 417 /*
 418 Local Variables:
 419 c-basic-offset:2
 420 comment-column:40
 421 fill-column:79
 422 indent-tabs-mode:nil
 423 End:
 424 */