src/screen_lyrics.c

   1 /*
   2  * (c) 2006 by Kalle Wallin <kaw@linux.se>
   3  * Copyright (C) 2008 Max Kellermann <max@duempel.org>
   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,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License for more details.
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program; if not, write to the Free Software
  16  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  17  *
  18  */
  19
  20 #include <sys/stat.h>
  21 #include "i18n.h"
  22 #include "options.h"
  23 #include "mpdclient.h"
  24 #include "command.h"
  25 #include "screen.h"
  26 #include "screen_utils.h"
  27 #include "strfsong.h"
  28 #include "lyrics.h"
  29 #include "charset.h"
  30 #include "gcc.h"
  31
  32 #define _GNU_SOURCE
  33 #include <stdlib.h>
  34 #include <string.h>
  35 #include <glib.h>
  36 #include <ncurses.h>
  37 #include <unistd.h>
  38 #include <stdio.h>
  39
  40 static list_window_t *lw = NULL;
  41
  42 static const struct mpd_song *next_song;
  43
  44 static struct {
  45         const struct mpd_song *song;
  46
  47         char *artist, *title;
  48
  49         struct lyrics_loader *loader;
  50
  51         GPtrArray *lines;
  52 } current;
  53
  54 static void
  55 screen_lyrics_abort(void)
  56 {
  57         if (current.loader != NULL) {
  58                 lyrics_free(current.loader);
  59                 current.loader = NULL;
  60         }
  61
  62         if (current.artist != NULL) {
  63                 g_free(current.artist);
  64                 current.artist = NULL;
  65         }
  66
  67         if (current.title != NULL) {
  68                 g_free(current.title);
  69                 current.artist = NULL;
  70         }
  71
  72         current.song = NULL;
  73 }
  74
  75 static void
  76 screen_lyrics_clear(void)
  77 {
  78         guint i;
  79
  80         for (i = 0; i < current.lines->len; ++i)
  81                 g_free(g_ptr_array_index(current.lines, i));
  82
  83         g_ptr_array_set_size(current.lines, 0);
  84 }
  85
  86 static void
  87 lyrics_paint(void);
  88
  89 /**
  90  * Repaint and update the screen.
  91  */
  92 static void
  93 lyrics_repaint(void)
  94 {
  95         lyrics_paint();
  96         wrefresh(lw->w);
  97 }
  98
  99 /**
 100  * Repaint and update the screen, if it is currently active.
 101  */
 102 static void
 103 lyrics_repaint_if_active(void)
 104 {
 105         if (screen_is_visible(&screen_lyrics)) {
 106                 lyrics_repaint();
 107
 108                 /* XXX repaint the screen title */
 109         }
 110 }
 111
 112 static void
 113 screen_lyrics_set(const GString *str)
 114 {
 115         const char *p, *eol, *next;
 116
 117         screen_lyrics_clear();
 118
 119         p = str->str;
 120         while ((eol = strchr(p, '\n')) != NULL) {
 121                 char *line;
 122
 123                 next = eol + 1;
 124
 125                 /* strip whitespace at end */
 126
 127                 while (eol > p && (unsigned char)eol[-1] <= 0x20)
 128                         --eol;
 129
 130                 /* create copy and append it to current.lines*/
 131
 132                 line = g_malloc(eol - p + 1);
 133                 memcpy(line, p, eol - p);
 134                 line[eol - p] = 0;
 135
 136                 g_ptr_array_add(current.lines, line);
 137
 138                 /* reset control characters */
 139
 140                 for (eol = line + (eol - p); line < eol; ++line)
 141                         if ((unsigned char)*line < 0x20)
 142                                 *line = ' ';
 143
 144                 p = next;
 145         }
 146
 147         if (*p != 0)
 148                 g_ptr_array_add(current.lines, g_strdup(p));
 149
 150         /* paint new data */
 151
 152         lyrics_repaint_if_active();
 153 }
 154
 155 static void
 156 screen_lyrics_callback(const GString *result, mpd_unused void *data)
 157 {
 158         assert(current.loader != NULL);
 159
 160         if (result != NULL)
 161                 screen_lyrics_set(result);
 162         else
 163                 screen_status_message (_("No lyrics"));
 164
 165         lyrics_free(current.loader);
 166         current.loader = NULL;
 167 }
 168
 169 static void
 170 screen_lyrics_load(const struct mpd_song *song)
 171 {
 172         char buffer[MAX_SONGNAME_LENGTH];
 173
 174         assert(song != NULL);
 175
 176         screen_lyrics_abort();
 177         screen_lyrics_clear();
 178
 179         current.song = song;
 180
 181         strfsong(buffer, sizeof(buffer), "%artist%", song);
 182         current.artist = g_strdup(buffer);
 183
 184         strfsong(buffer, sizeof(buffer), "%title%", song);
 185         current.title = g_strdup(buffer);
 186
 187         current.loader = lyrics_load(current.artist, current.title,
 188                                      screen_lyrics_callback, NULL);
 189 }
 190
 191 static FILE *create_lyr_file(const char *artist, const char *title)
 192 {
 193         char path[1024];
 194
 195         snprintf(path, 1024, "%s/.lyrics",
 196                  getenv("HOME"));
 197         mkdir(path, S_IRWXU);
 198
 199         snprintf(path, 1024, "%s/.lyrics/%s - %s.txt",
 200                  getenv("HOME"), artist, title);
 201
 202         return fopen(path, "w");
 203 }
 204
 205 static int store_lyr_hd(void)
 206 {
 207         FILE *lyr_file;
 208         unsigned i;
 209
 210         lyr_file = create_lyr_file(current.artist, current.title);
 211         if (lyr_file == NULL)
 212                 return -1;
 213
 214         for (i = 0; i < current.lines->len; ++i)
 215                 fprintf(lyr_file, "%s\n",
 216                         (const char*)g_ptr_array_index(current.lines, i));
 217
 218         fclose(lyr_file);
 219         return 0;
 220 }
 221
 222 static const char *
 223 list_callback(unsigned idx, mpd_unused int *highlight, mpd_unused void *data)
 224 {
 225         static char buffer[256];
 226         char *value;
 227
 228         if (idx >= current.lines->len)
 229                 return NULL;
 230
 231         value = utf8_to_locale(g_ptr_array_index(current.lines, idx));
 232         g_strlcpy(buffer, value, sizeof(buffer));
 233         free(value);
 234
 235         return buffer;
 236 }
 237
 238
 239 static void
 240 lyrics_screen_init(WINDOW *w, int cols, int rows)
 241 {
 242         current.lines = g_ptr_array_new();
 243         lw = list_window_init(w, cols, rows);
 244         lw->flags = LW_HIDE_CURSOR;
 245 }
 246
 247 static void
 248 lyrics_resize(int cols, int rows)
 249 {
 250         lw->cols = cols;
 251         lw->rows = rows;
 252 }
 253
 254 static void
 255 lyrics_exit(void)
 256 {
 257         list_window_free(lw);
 258
 259         screen_lyrics_abort();
 260         screen_lyrics_clear();
 261
 262         g_ptr_array_free(current.lines, TRUE);
 263         current.lines = NULL;
 264 }
 265
 266 static void
 267 lyrics_open(mpd_unused screen_t *screen, mpdclient_t *c)
 268 {
 269         if (next_song == NULL)
 270                 next_song = c->song;
 271
 272         if (next_song != NULL && next_song != current.song)
 273                 screen_lyrics_load(next_song);
 274
 275         next_song = NULL;
 276 }
 277
 278
 279 static const char *
 280 lyrics_title(char *str, size_t size)
 281 {
 282         if (current.loader != NULL)
 283                 return "Lyrics (loading)";
 284         else if (current.artist != NULL && current.title != NULL &&
 285                  current.lines->len > 0) {
 286                 snprintf(str, size, "Lyrics: %s - %s",
 287                          current.artist, current.title);
 288                 return str;
 289         } else
 290                 return "Lyrics";
 291 }
 292
 293 static void
 294 lyrics_paint(void)
 295 {
 296         list_window_paint(lw, list_callback, NULL);
 297 }
 298
 299 static int
 300 lyrics_cmd(screen_t *screen, mpdclient_t *c, command_t cmd)
 301 {
 302         if (list_window_scroll_cmd(lw, current.lines->len, cmd)) {
 303                 lyrics_repaint();
 304                 return 1;
 305         }
 306
 307         switch(cmd) {
 308         case CMD_INTERRUPT:
 309                 if (current.loader != NULL) {
 310                         screen_lyrics_abort();
 311                         screen_lyrics_clear();
 312                 }
 313                 return 1;
 314         case CMD_ADD:
 315                 if (current.loader == NULL && current.artist != NULL &&
 316                     current.title != NULL && store_lyr_hd() == 0)
 317                         screen_status_message (_("Lyrics saved!"));
 318                 return 1;
 319         case CMD_LYRICS_UPDATE:
 320                 if (c->song != NULL) {
 321                         screen_lyrics_load(c->song);
 322                         lyrics_repaint();
 323                 }
 324                 return 1;
 325         default:
 326                 break;
 327         }
 328
 329         lw->selected = lw->start+lw->rows;
 330         if (screen_find(screen,
 331                         lw, current.lines->len,
 332                         cmd, list_callback, NULL)) {
 333                 /* center the row */
 334                 list_window_center(lw, current.lines->len, lw->selected);
 335                 lyrics_repaint();
 336                 return 1;
 337         }
 338
 339         return 0;
 340 }
 341
 342 const struct screen_functions screen_lyrics = {
 343         .init = lyrics_screen_init,
 344         .exit = lyrics_exit,
 345         .open = lyrics_open,
 346         .close = NULL,
 347         .resize = lyrics_resize,
 348         .paint = lyrics_paint,
 349         .cmd = lyrics_cmd,
 350         .get_title = lyrics_title,
 351 };
 352
 353 void
 354 screen_lyrics_switch(struct mpdclient *c, const struct mpd_song *song)
 355 {
 356         assert(song != NULL);
 357
 358         next_song = song;
 359         screen_switch(&screen_lyrics, c);
 360 }