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