paraslash 0.4.12
[paraslash.git] / playlist.c
1 /*
2  * Copyright (C) 2007-2012 Andre Noll <maan@systemlinux.org>
3  *
4  * Licensed under the GPL v2. For licencing details see COPYING.
5  */
6
7 #include <regex.h>
8 #include <osl.h>
9
10 #include "para.h"
11 #include "error.h"
12 #include "string.h"
13 #include "afh.h"
14 #include "afs.h"
15 #include "ipc.h"
16 #include "sideband.h"
17
18 /** \file playlist.c Functions for loading and saving playlists. */
19
20 /** Structure used for adding entries to a playlist. */
21 struct playlist_info {
22         /** The name of the playlist. */
23         char *name;
24         /** The number of entries currently in the playlist. */
25         unsigned length;
26 };
27 static struct playlist_info current_playlist;
28
29 /**
30  * Re-insert an audio file into the tree of admissible files.
31  *
32  * \param aft_row Determines the audio file.
33  *
34  * \return The return value of score_update().
35  */
36 static int playlist_update_audio_file(const struct osl_row *aft_row)
37 {
38         /* always re-insert to the top of the tree */
39         return score_update(aft_row, 0);
40 }
41
42 static int add_playlist_entry(char *path, void *data)
43 {
44         struct playlist_info *playlist = data;
45         struct osl_row *aft_row;
46         int ret = aft_get_row_of_path(path, &aft_row);
47
48         if (ret < 0) {
49                 PARA_NOTICE_LOG("%s: %s\n", path, para_strerror(-ret));
50                 return 1;
51         }
52         ret = score_add(aft_row, -playlist->length);
53         if (ret < 0) {
54                 PARA_ERROR_LOG("failed to add %s: %s\n", path, para_strerror(-ret));
55                 return ret;
56         }
57         playlist->length++;
58         return 1;
59 }
60
61 /* returns -E_PLAYLIST_LOADED on _success_ to terminate the loop */
62 static int load_playlist(struct osl_row *row, void *data)
63 {
64         struct playlist_info *playlist = data;
65         struct osl_object playlist_def;
66         char *playlist_name;
67         int ret;
68
69         ret = pl_get_name_and_def_by_row(row, &playlist_name, &playlist_def);
70         if (ret < 0)
71                 goto err;
72         playlist->length = 0;
73         ret = for_each_line_ro(playlist_def.data, playlist_def.size,
74                 add_playlist_entry, playlist);
75         osl_close_disk_object(&playlist_def);
76         if (ret < 0)
77                 goto err;
78         ret = -E_PLAYLIST_EMPTY;
79         if (!playlist->length)
80                 goto err;
81         playlist->name = para_strdup(playlist_name);
82         PARA_NOTICE_LOG("loaded playlist %s (%u files)\n", playlist->name,
83                 playlist->length);
84         return -E_PLAYLIST_LOADED;
85 err:
86         if (ret != -E_DUMMY_ROW)
87                 PARA_NOTICE_LOG("unable to load playlist (%s)\n",
88                         para_strerror(-ret));
89         return 1;
90 }
91
92 static int check_playlist_path(char *path, void *data)
93 {
94         struct para_buffer *pb = data;
95         struct osl_row *aft_row;
96         int ret = aft_get_row_of_path(path, &aft_row);
97
98         if (ret >= 0)
99                 return 1;
100         return para_printf(pb, "%s: %s\n", path, para_strerror(-ret));
101 }
102
103 static int check_playlist(struct osl_row *row, void *data)
104 {
105         struct para_buffer *pb = data;
106         struct osl_object playlist_def;
107         char *playlist_name;
108         int ret = pl_get_name_and_def_by_row(row, &playlist_name, &playlist_def);
109
110         if (ret < 0)
111                 return para_printf(pb, "failed to get playlist data: %s\n",
112                         para_strerror(-ret));
113         if (*playlist_name) { /* skip dummy row */
114                 ret = para_printf(pb, "checking playlist %s...\n", playlist_name);
115                 if (ret < 0)
116                         return ret;
117                 ret = for_each_line_ro(playlist_def.data, playlist_def.size,
118                         check_playlist_path, pb);
119         }
120         osl_close_disk_object(&playlist_def);
121         return ret;
122 }
123
124 /**
125  * Check the playlist table for inconsistencies.
126  *
127  * \param fd The afs socket.
128  * \param query Unused.
129  *
130  * \return The return value of the underlying call to osl_rbtree_loop().
131  */
132 void playlist_check_callback(int fd, __a_unused const struct osl_object *query)
133 {
134         struct para_buffer pb = {
135                 .max_size = shm_get_shmmax(),
136                 .private_data = &(struct afs_max_size_handler_data) {
137                         .fd = fd,
138                         .band = SBD_OUTPUT
139                 },
140                 .max_size_handler = afs_max_size_handler,
141         };
142         int ret = para_printf(&pb, "checking playlists...\n");
143
144         if (ret < 0)
145                 return;
146         osl_rbtree_loop(playlists_table, BLOBCOL_ID, &pb,
147                 check_playlist);
148         if (pb.offset)
149                 pass_buffer_as_shm(fd, SBD_OUTPUT, pb.buf, pb.offset);
150         free(pb.buf);
151 }
152
153 /**
154  * Close the current playlist.
155  *
156  * \sa playlist_open().
157  */
158 void playlist_close(void)
159 {
160         if (!current_playlist.name)
161                 return;
162         free(current_playlist.name);
163         current_playlist.name = NULL;
164 }
165
166 /**
167  * Open the given playlist.
168  *
169  * \param name The name of the playlist to open.
170  *
171  * Files which are listed in the playlist, but not contained in the database
172  * are ignored.  This is not considered an error.
173  *
174  * \return Standard.
175  */
176 int playlist_open(char *name)
177 {
178         struct osl_object obj;
179         int ret;
180         struct osl_row *row;
181
182         obj.data = name;
183         obj.size = strlen(obj.data);
184         ret = osl(osl_get_row(playlists_table, BLOBCOL_NAME, &obj, &row));
185         if (ret < 0) {
186                 PARA_NOTICE_LOG("failed to load playlist %s\n", name);
187                 return ret;
188         }
189         playlist_close();
190         ret = load_playlist(row, &current_playlist);
191         return (ret == -E_PLAYLIST_LOADED)? current_playlist.length : ret;
192 }
193
194 static int search_path(char *path, void *data)
195 {
196         if (strcmp(path, data))
197                 return 1;
198         return -E_PATH_FOUND;
199 }
200
201 static int handle_audio_file_event(enum afs_events event, void *data)
202 {
203         int ret, was_admissible = 0, is_admissible;
204         struct osl_object playlist_def;
205         char *new_path;
206         const struct osl_row *row = data;
207
208         if (!current_playlist.name)
209                 return 1;
210         if (event == AUDIO_FILE_RENAME) {
211                 ret = row_belongs_to_score_table(row, NULL);
212                 if (ret < 0)
213                         return ret;
214                 was_admissible = ret;
215         }
216         ret = get_audio_file_path_of_row(row, &new_path);
217         if (ret < 0)
218                 return ret;
219         ret = pl_get_def_by_name(current_playlist.name, &playlist_def);
220         if (ret < 0)
221                 return ret;
222         ret = for_each_line_ro(playlist_def.data, playlist_def.size,
223                 search_path, new_path);
224         osl_close_disk_object(&playlist_def);
225         is_admissible = (ret < 0);
226         if (was_admissible && is_admissible)
227                 return 1;
228         if (!was_admissible && !is_admissible)
229                 return 1;
230         if (was_admissible && !is_admissible) {
231                 current_playlist.length--;
232                 return score_delete(row);
233         }
234         /* !was_admissible && is_admissible */
235         current_playlist.length++;
236         return score_add(row, 0); /* play it immediately */
237 }
238
239 /**
240  * Handle afs events relevant to playlists.
241  *
242  * \param event The event type.
243  * \param pb Unused.
244  * \param data Depends on the event type.
245  *
246  * \return Standard.
247  */
248 int playlists_event_handler(enum afs_events event,
249         __a_unused struct para_buffer *pb, void *data)
250 {
251         int ret;
252         struct afsi_change_event_data *aced = data;
253
254         switch(event) {
255         case AFSI_CHANGE:
256                 return playlist_update_audio_file(aced->aft_row);
257         case AUDIO_FILE_RENAME:
258         case AUDIO_FILE_ADD:
259                 return handle_audio_file_event(event, data);
260         case AUDIO_FILE_REMOVE:
261                 ret = row_belongs_to_score_table(data, NULL);
262                 if (ret < 0)
263                         return ret;
264                 if (!ret)
265                         return 1;
266                 current_playlist.length--;
267                 return score_delete(data);
268         default:
269                 return 1;
270         }
271 }