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 */
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"
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>
40 static list_window_t *lw = NULL;
42 static const struct mpd_song *next_song;
44 static struct {
45 const struct mpd_song *song;
47 char *artist, *title;
49 struct lyrics_loader *loader;
51 GPtrArray *lines;
52 } current;
54 static void
55 screen_lyrics_abort(void)
56 {
57 if (current.loader != NULL) {
58 lyrics_free(current.loader);
59 current.loader = NULL;
60 }
62 if (current.artist != NULL) {
63 g_free(current.artist);
64 current.artist = NULL;
65 }
67 if (current.title != NULL) {
68 g_free(current.title);
69 current.artist = NULL;
70 }
72 current.song = NULL;
73 }
75 static void
76 screen_lyrics_clear(void)
77 {
78 guint i;
80 for (i = 0; i < current.lines->len; ++i)
81 g_free(g_ptr_array_index(current.lines, i));
83 g_ptr_array_set_size(current.lines, 0);
84 }
86 static void
87 lyrics_paint(mpdclient_t *c);
89 /**
90 * Repaint and update the screen.
91 */
92 static void
93 lyrics_repaint(void)
94 {
95 lyrics_paint(NULL);
96 wrefresh(lw->w);
97 }
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();
108 /* XXX repaint the screen title */
109 }
110 }
112 static void
113 screen_lyrics_set(const GString *str)
114 {
115 const char *p, *eol, *next;
117 screen_lyrics_clear();
119 p = str->str;
120 while ((eol = strchr(p, '\n')) != NULL) {
121 char *line;
123 next = eol + 1;
125 /* strip whitespace at end */
127 while (eol > p && (unsigned char)eol[-1] <= 0x20)
128 --eol;
130 /* create copy and append it to current.lines*/
132 line = g_malloc(eol - p + 1);
133 memcpy(line, p, eol - p);
134 line[eol - p] = 0;
136 g_ptr_array_add(current.lines, line);
138 /* reset control characters */
140 for (eol = line + (eol - p); line < eol; ++line)
141 if ((unsigned char)*line < 0x20)
142 *line = ' ';
144 p = next;
145 }
147 if (*p != 0)
148 g_ptr_array_add(current.lines, g_strdup(p));
150 /* paint new data */
152 lyrics_repaint_if_active();
153 }
155 static void
156 screen_lyrics_callback(const GString *result, mpd_unused void *data)
157 {
158 assert(current.loader != NULL);
160 if (result != NULL)
161 screen_lyrics_set(result);
162 else
163 screen_status_message (_("No lyrics"));
165 lyrics_free(current.loader);
166 current.loader = NULL;
167 }
169 static void
170 screen_lyrics_load(const struct mpd_song *song)
171 {
172 char buffer[MAX_SONGNAME_LENGTH];
174 assert(song != NULL);
176 screen_lyrics_abort();
177 screen_lyrics_clear();
179 current.song = song;
181 strfsong(buffer, sizeof(buffer), "%artist%", song);
182 current.artist = g_strdup(buffer);
184 strfsong(buffer, sizeof(buffer), "%title%", song);
185 current.title = g_strdup(buffer);
187 current.loader = lyrics_load(current.artist, current.title,
188 screen_lyrics_callback, NULL);
189 }
191 static FILE *create_lyr_file(const char *artist, const char *title)
192 {
193 char path[1024];
195 snprintf(path, 1024, "%s/.lyrics",
196 getenv("HOME"));
197 mkdir(path, S_IRWXU);
199 snprintf(path, 1024, "%s/.lyrics/%s - %s.txt",
200 getenv("HOME"), artist, title);
202 return fopen(path, "w");
203 }
205 static int store_lyr_hd(void)
206 {
207 FILE *lyr_file;
208 unsigned i;
210 lyr_file = create_lyr_file(current.artist, current.title);
211 if (lyr_file == NULL)
212 return -1;
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));
218 fclose(lyr_file);
219 return 0;
220 }
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;
228 if (idx >= current.lines->len)
229 return NULL;
231 value = utf8_to_locale(g_ptr_array_index(current.lines, idx));
232 g_strlcpy(buffer, value, sizeof(buffer));
233 free(value);
235 return buffer;
236 }
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 }
247 static void
248 lyrics_resize(int cols, int rows)
249 {
250 lw->cols = cols;
251 lw->rows = rows;
252 }
254 static void
255 lyrics_exit(void)
256 {
257 list_window_free(lw);
259 screen_lyrics_abort();
260 screen_lyrics_clear();
262 g_ptr_array_free(current.lines, TRUE);
263 current.lines = NULL;
264 }
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;
272 if (next_song != NULL && next_song != current.song)
273 screen_lyrics_load(next_song);
275 next_song = NULL;
276 }
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 }
293 static void
294 lyrics_paint(mpd_unused mpdclient_t *c)
295 {
296 list_window_paint(lw, list_callback, NULL);
297 }
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 }
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 }
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 }
339 return 0;
340 }
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 };
353 void
354 screen_lyrics_switch(struct mpdclient *c, const struct mpd_song *song)
355 {
356 assert(song != NULL);
358 next_song = song;
359 screen_switch(&screen_lyrics, c);
360 }